Sterge tot din memorie

Scris de **aNgeL =]** Sam Iul 11, 2009 11:15 am

Stergerea Imaginilor Obiectelor dintr-un joc, program...etc

Cod:

function DeleteAll()
sync rate 0
for i = 1 to 99999
if i < 256
if memblock exist(i) = 1 then delete memblock i
if matrix exist(i) = 1 then delete matrix i
if terrain exist(i) = 1 then delete terrain i
if effect exist(i) = 1 then delete effect i
if i < 33
if file open(i) =1 then close file i
if animation exist(i) =1 then delete animation i
if i < 8
if light exist(i) = 1 then delete light i
endif
endif
endif
if image exist(i) = 1 then delete image i
if sprite exist(i) = 1 then delete sprite i
if sound exist(i) = 1 then delete sound i
if music exist(i) = 1 then delete music i
if mesh exist(i) = 1 then delete mesh i
if object exist(i) = 1 then delete object i
next i
endfunction