<BR>
print "MEMBLOCK EXPRESSION DATA"<BR>
print<BR>
if MEMBLOCK EXIST(MemblockNumber)=1<BR>
print "memblock:";MemblockNumber<BR>
print "exist:";MEMBLOCK EXIST(MemblockNumber)<BR>
print "ptr:";GET MEMBLOCK PTR(MemblockNumber)<BR>
print "size:";GET MEMBLOCK SIZE(MemblockNumber)<BR>
print "float:";MEMBLOCK FLOAT(MemblockNumber, 0)<BR>
endif<BR>
rem Delete memblocks<BR>
if MEMBLOCK EXIST(MemblockNumber)=1 then DELETE MEMBLOCK MemblockNumber<BR>
do<BR>
loop<BR>
end<BR>
</pre>
</font>
<!-- See Also -->
<table wid