FANDOM



This command will delete any memblock that has been attached to the object using the ADD MEMBLOCK TO OBJECT command.

Syntax
DELETE MEMBLOCK FROM OBJECT Object Number
Parameters
Object Number

Integer
The object number

Returns

This command does not return a value.

Example Code
input "(c)reate or (l)oad?";a$

if a$="c"

 make object sphere 1,100

 scale object 1,25,100,25

 make memblock 1,12

 write memblock dword 1,0,25

 write memblock dword 1,4,100

 write memblock dword 1,8,25

 add memblock to object 1,1

 f$="scaledobject.dbo"

 if file exist(f$)=1 then delete file f$

 save object f$,1

 delete object 1

endif

load object "scaledobject.dbo",1

get memblock from object 1,1

sx#=memblock dword(1,0)

sy#=memblock dword(1,4)

sz#=memblock dword(1,8)

scale object 1,sx#,sy#,sz#

delete memblock from object 1

wait key

end