Hi i find memory leak in my program. Please goto row 1192 and find "_FREEIMAGE virt" on row 1197. Add to row 1198 this: _FREEIMAGE Ve(TVO_S + 13).T so as in this short program list:
TeVe(4).T = 0
TeVe(4).T = _COPYIMAGE(virt, 33)
TeVe(4).S = 1
_DEST pred
_FREEIMAGE virt
_FREEIMAGE Ve(TVO_S + 13).T
Cube3D -.5, 0, 2.8, .7, .5, .1, 0, TeVe(), coordinates()
INARR coordinates(), Ve(), TVO_S
END SUB
SUB Krb
FOR S = 1 TO 6
Sofa(S).T = KRB_textura&
memory usage now is cca 206 megabytes. I find no more bugs (just chaotic programming).