blitz-research
21 lines
1.5 KiB
HTML
21 lines
1.5 KiB
HTML
<html><head><title>Command: FreeBank </title><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'><link rel='stylesheet' href='../css/commands.css' type='text/css'></head><body><span class='Command'> FreeBank bank </span></p><span class='header'>Definition:</span> <br><br><table width='100%' border='0' cellspacing='2' cellpadding='2' align='center'><tr><td>Frees a memory bank from memory.</td></tr></table><span class='header'><br>Parameter Description:</span> <br><br><table width='100%' border='0' cellspacing='2' cellpadding='2' align='center'><tr><td>bank = variable containing handle to valid bank</td></tr></table><p class='header'>Command Description: <br><br><table width='100%' border='0' cellspacing='2' cellpadding='2' align='center'><tr><td>This releases a memory bank allocated with the <a href='CreateBank.htm'>CreateBank</a> command.</td></tr></table><p class='header'>Example: <br><br><table width='100%' border='0' cellspacing='2' cellpadding='2' align='center'><tr><td>; Bank Commands Example<br>
|
|
<br>
|
|
bnkTest=CreateBank(500)<br>
|
|
<br>
|
|
For t = 1 To 50<br>
|
|
PokeByte bnkTest,t,Rnd(255)<br>
|
|
PokeInt bnkTest,t+1,Rnd(10000)<br>
|
|
PokeShort bnkTest,t+2,Rnd(10000)<br>
|
|
PokeFloat bnkTest,t+3,Rnd(-.999,.999)<br>
|
|
Next<br>
|
|
<br>
|
|
For t = 1 To 50<br>
|
|
Print PeekByte (bnkTest,t)<br>
|
|
Print PeekInt (bnkTest,t+1)<br>
|
|
Print PeekShort (bnkTest,t+2)<br>
|
|
Print PeekFloat (bnkTest,t+3)<br>
|
|
Next<br>
|
|
<br>
|
|
Freebank bnkTest<br></td></tr></table><p><b><a target="_top" href="../index.htm">Index</a></b></p></body>
|
|
</html>
|