/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / bb_ext.dms / in.adf / LibsDev.lha / userlibprogs / BankTest.bb2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |;#######|########|
|00000010| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 00 |########|#######.|
|00000020| 3b 23 20 45 78 61 6d 70 | 6c 65 20 31 2e 30 20 2d |;# Examp|le 1.0 -|
|00000030| 20 4d 65 6d 6f 72 79 20 | 42 61 6e 6b 73 20 23 00 | Memory |Banks #.|
|00000040| 3b 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |;#######|########|
|00000050| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 00 |########|#######.|
|00000060| 3b 20 42 79 20 53 74 65 | 76 65 6e 20 4d 61 74 74 |; By Ste|ven Matt|
|00000070| 79 00 3b 00 3b 20 54 68 | 69 73 20 70 72 6f 67 72 |y.;.; Th|is progr|
|00000080| 61 6d 20 72 75 6e 73 20 | 74 68 72 6f 75 67 68 20 |am runs |through |
|00000090| 6d 6f 73 74 20 6f 66 20 | 74 68 65 20 6d 65 6d 6f |most of |the memo|
|000000a0| 72 79 20 62 61 6e 6b 20 | 63 6f 6d 6d 61 6e 64 73 |ry bank |commands|
|000000b0| 00 3b 20 65 2e 67 2e 20 | 42 4c 6f 61 64 20 2f 20 |.; e.g. |BLoad / |
|000000c0| 42 53 61 76 65 20 2f 20 | 52 65 73 65 72 76 65 20 |BSave / |Reserve |
|000000d0| 2f 20 43 6f 70 79 42 61 | 6e 6b 20 2f 20 45 72 61 |/ CopyBa|nk / Era|
|000000e0| 73 65 20 2f 20 45 72 61 | 73 65 41 6c 6c 20 2f 20 |se / Era|seAll / |
|000000f0| 53 74 61 72 74 20 2f 20 | 4c 65 6e 67 74 68 00 00 |Start / |Length..|
|00000100| dd 82 20 22 4c 6f 61 64 | 69 6e 67 20 53 3a 73 74 |.. "Load|ing S:st|
|00000110| 61 72 74 75 70 2d 73 65 | 71 75 65 6e 63 65 20 74 |artup-se|quence t|
|00000120| 6f 20 42 61 6e 6b 20 30 | 22 00 73 75 63 63 65 73 |o Bank 0|".succes|
|00000130| 73 3d a5 8f 28 22 53 3a | 73 74 61 72 74 75 70 2d |s=..("S:|startup-|
|00000140| 73 65 71 75 65 6e 63 65 | 22 2c 30 29 00 80 0b 20 |sequence|",0)... |
|00000150| 73 75 63 63 65 73 73 00 | 20 20 dd 82 20 22 4f 6b |success.|  .. "Ok|
|00000160| 61 79 21 22 00 80 22 00 | 20 20 dd 82 20 22 45 72 |ay!"..".|  .. "Er|
|00000170| 72 6f 72 21 22 00 20 20 | 80 02 00 80 c0 00 00 80 |ror!".  |........|
|00000180| 37 20 35 30 00 00 dd 82 | 20 22 53 61 76 69 6e 67 |7 50....| "Saving|
|00000190| 20 42 61 6e 6b 20 30 20 | 54 6f 20 52 41 4d 3a 50 | Bank 0 |To RAM:P|
|000001a0| 6c 6f 70 22 00 73 75 63 | 63 65 73 73 3d a5 90 28 |lop".suc|cess=..(|
|000001b0| 22 52 61 6d 3a 50 6c 6f | 70 22 2c 30 29 00 80 0b |"Ram:Plo|p",0)...|
|000001c0| 20 73 75 63 63 65 73 73 | 00 20 20 dd 82 20 22 4f | success|.  .. "O|
|000001d0| 6b 61 79 21 22 00 80 22 | 00 20 20 dd 82 20 22 45 |kay!".."|.  .. "E|
|000001e0| 72 72 6f 72 21 22 00 20 | 20 80 02 00 80 c0 00 00 |rror!". | .......|
|000001f0| 80 37 20 35 30 00 00 dd | 82 20 22 43 6f 70 79 69 |.7 50...|. "Copyi|
|00000200| 6e 67 20 42 61 6e 6b 20 | 30 20 74 6f 20 42 61 6e |ng Bank |0 to Ban|
|00000210| 6b 20 31 2e 2e 22 00 73 | 75 63 63 65 73 73 3d 43 |k 1..".s|uccess=C|
|00000220| 6f 70 79 42 61 6e 6b 28 | 30 2c 31 29 00 80 0b 20 |opyBank(|0,1)... |
|00000230| 73 75 63 63 65 73 73 00 | 20 20 dd 82 20 22 4f 6b |success.|  .. "Ok|
|00000240| 61 79 21 22 00 80 22 00 | 20 20 dd 82 20 22 45 72 |ay!"..".|  .. "Er|
|00000250| 72 6f 72 21 22 00 20 20 | 80 02 00 80 c0 00 00 80 |ror!".  |........|
|00000260| 37 20 35 30 00 00 dd 82 | 20 22 41 6c 6c 6f 63 61 |7 50....| "Alloca|
|00000270| 74 69 6e 67 20 42 61 6e | 6b 20 31 20 28 43 48 49 |ting Ban|k 1 (CHI|
|00000280| 50 20 52 41 4d 29 2e 2e | 22 00 73 75 63 63 65 73 |P RAM)..|".succes|
|00000290| 73 3d a5 95 28 31 2c a5 | 92 28 30 29 2c 25 31 30 |s=..(1,.|.(0),%10|
|000002a0| 29 00 80 0b 20 73 75 63 | 63 65 73 73 00 20 20 dd |)... suc|cess.  .|
|000002b0| 82 20 22 4f 6b 61 79 21 | 22 00 80 22 00 20 20 dd |. "Okay!|"..".  .|
|000002c0| 82 20 22 45 72 72 6f 72 | 21 22 00 20 20 80 02 00 |. "Error|!".  ...|
|000002d0| 80 c0 00 00 80 37 20 35 | 30 00 00 dd 82 20 22 45 |.....7 5|0.... "E|
|000002e0| 72 61 73 69 6e 67 20 42 | 61 6e 6b 20 31 2e 2e 22 |rasing B|ank 1.."|
|000002f0| 00 a5 93 20 31 00 00 80 | 37 20 35 30 00 00 dd 82 |... 1...|7 50....|
|00000300| 20 22 41 6c 6c 6f 63 61 | 74 69 6e 67 20 42 61 6e | "Alloca|ting Ban|
|00000310| 6b 20 31 20 28 34 30 30 | 30 20 62 79 74 65 73 20 |k 1 (400|0 bytes |
|00000320| 50 55 42 4c 49 43 20 52 | 41 4d 29 2e 2e 22 00 73 |PUBLIC R|AM)..".s|
|00000330| 75 63 63 65 73 73 3d a5 | 95 28 31 2c 34 30 30 30 |uccess=.|.(1,4000|
|00000340| 29 00 80 0b 20 73 75 63 | 63 65 73 73 00 20 20 dd |)... suc|cess.  .|
|00000350| 82 20 22 4f 6b 61 79 21 | 22 00 80 22 00 20 20 dd |. "Okay!|"..".  .|
|00000360| 82 20 22 45 72 72 6f 72 | 21 22 00 20 20 80 02 00 |. "Error|!".  ...|
|00000370| 80 c0 00 00 80 37 20 35 | 30 00 00 dd 82 20 22 53 |.....7 5|0.... "S|
|00000380| 74 61 72 74 20 6f 66 20 | 42 61 6e 6b 20 30 20 20 |tart of |Bank 0  |
|00000390| 3d 20 22 2c a5 91 28 30 | 29 00 dd 82 20 22 4c 65 |= ",..(0|)... "Le|
|000003a0| 6e 67 74 68 20 4f 66 20 | 42 61 6e 6b 20 30 20 3d |ngth Of |Bank 0 =|
|000003b0| 20 22 2c a5 92 28 30 29 | 2c 22 20 62 79 74 65 73 | ",..(0)|," bytes|
|000003c0| 2e 22 00 dd 82 20 22 53 | 74 61 72 74 20 6f 66 20 |."... "S|tart of |
|000003d0| 42 61 6e 6b 20 31 20 20 | 3d 20 22 2c a5 91 28 31 |Bank 1  |= ",..(1|
|000003e0| 29 00 dd 82 20 22 4c 65 | 6e 67 74 68 20 4f 66 20 |)... "Le|ngth Of |
|000003f0| 42 61 6e 6b 20 31 20 3d | 20 22 2c a5 92 28 31 29 |Bank 1 =| ",..(1)|
|00000400| 2c 22 20 62 79 74 65 73 | 2e 22 00 00 80 37 20 35 |," bytes|."...7 5|
|00000410| 30 00 00 dd 82 20 22 4e | 65 78 74 20 46 72 65 65 |0.... "N|ext Free|
|00000420| 20 42 61 6e 6b 20 3d 20 | 22 2c a5 96 28 30 29 00 | Bank = |",..(0).|
|00000430| 00 80 37 20 35 30 00 00 | dd 82 20 22 45 72 61 73 |..7 50..|.. "Eras|
|00000440| 69 6e 67 20 41 4c 4c 20 | 42 61 6e 6b 73 2e 2e 2e |ing ALL |Banks...|
|00000450| 22 00 a5 94 00 dd 82 20 | 22 50 72 65 73 73 20 74 |"...... |"Press t|
|00000460| 68 65 20 6d 6f 75 73 65 | 20 62 75 74 74 6f 6e 2e |he mouse| button.|
|00000470| 2e 2e 22 00 80 0a 00 80 | 02 00 00 00             |..".....|....    |
+--------+-------------------------+-------------------------+--------+--------+