Hier bisschen Pseudocode (Läuft natürlich, aber Du musst das halt dann noch im Programmcode implementieren)
10 DIM banks(257):FOR t=1 TO 257:READ a:banks(t)=a:NEXT
20 MODE 2:PRINT "Bank waehlen im BASIC Code: OUT banks(bank),banks(bank) AND &FF
30 PRINT"Variable 'banks' ist hier dimensioniert und schon eingelesen!"
40 PRINT"bank kann ein Wert (bei 4MB JavaCPC Erweiterung) zwischen 1 und 257 sein.
1000 DATA &7CC0,&78FF, &78FE, &78FD, &78FC
1010 DATA &78F7, &78F6, &78F5, &78F4
1020 DATA &78EF, &78EE, &78ED, &78EC
1030 DATA &78E7, &78E6, &78E5, &78E4
1040 DATA &78DF, &78DE, &78DD, &78DC
1050 DATA &78D7, &78D6, &78D5, &78D4
1060 DATA &78CF, &78CE, &78CD, &78CC
1070 DATA &78C7, &78C6, &78C5, &78C4
1080 DATA &79FF, &79FE, &79FD, &79FC
1090 DATA &79F7, &79F6, &79F5, &79F4
1100 DATA &79EF, &79EE, &79ED, &79EC
1110 DATA &79E7, &79E6, &79E5, &79E4
1120 DATA &79DF, &79DE, &79DD, &79DC
1130 DATA &79D7, &79D6, &79D5, &79D4
1140 DATA &79CF, &79CE, &79CD, &79CC
1150 DATA &79C7, &79C6, &79C5, &79C4
1160 DATA &7AFF, &7AFE, &7AFD, &7AFC
1170 DATA &7AF7, &7AF6, &7AF5, &7AF4
1180 DATA &7AEF, &7AEE, &7AED, &7AEC
1190 DATA &7AE7, &7AE6, &7AE5, &7AE4
1200 DATA &7ADF, &7ADE, &7ADD, &7ADC
1210 DATA &7AD7, &7AD6, &7AD5, &7AD4
1220 DATA &7ACF, &7ACE, &7ACD, &7ACC
1230 DATA &7AC7, &7AC6, &7AC5, &7AC4
1240 DATA &7BFF, &7BFE, &7BFD, &7BFC
1250 DATA &7BF7, &7BF6, &7BF5, &7BF4
1260 DATA &7BEF, &7BEE, &7BED, &7BEC
1270 DATA &7BE7, &7BE6, &7BE5, &7BE4
1280 DATA &7BDF, &7BDE, &7BDD, &7BDC
1290 DATA &7BD7, &7BD6, &7BD5, &7BD4
1300 DATA &7BCF, &7BCE, &7BCD, &7BCC
1310 DATA &7BC7, &7BC6, &7BC5, &7BC4
1320 DATA &7CFF, &7CFE, &7CFD, &7CFC
1330 DATA &7CF7, &7CF6, &7CF5, &7CF4
1340 DATA &7CEF, &7CEE, &7CED, &7CEC
1350 DATA &7CE7, &7CE6, &7CE5, &7CE4
1360 DATA &7CDF, &7CDE, &7CDD, &7CDC
1370 DATA &7CD7, &7CD6, &7CD5, &7CD4
1380 DATA &7CCF, &7CCE, &7CCD, &7CCC
1390 DATA &7CC7, &7CC6, &7CC5, &7CC4
1400 DATA &7DFF, &7DFE, &7DFD, &7DFC
1410 DATA &7DF7, &7DF6, &7DF5, &7DF4
1420 DATA &7DEF, &7DEE, &7DED, &7DEC
1430 DATA &7DE7, &7DE6, &7DE5, &7DE4
1440 DATA &7DDF, &7DDE, &7DDD, &7DDC
1450 DATA &7DD7, &7DD6, &7DD5, &7DD4
1460 DATA &7DCF, &7DCE, &7DCD, &7DCC
1470 DATA &7DC7, &7DC6, &7DC5, &7DC4
1480 DATA &7EFF, &7EFE, &7EFD, &7EFC
1490 DATA &7EF7, &7EF6, &7EF5, &7EF4
1500 DATA &7EEF, &7EEE, &7EED, &7EEC
1510 DATA &7EE7, &7EE6, &7EE5, &7EE4
1520 DATA &7EDF, &7EDE, &7EDD, &7EDC
1530 DATA &7ED7, &7ED6, &7ED5, &7ED4
1540 DATA &7ECF, &7ECE, &7ECD, &7ECC
1550 DATA &7EC7, &7EC6, &7EC5, &7EC4
1560 DATA &7FFF, &7FFE, &7FFD, &7FFC
1570 DATA &7FF7, &7FF6, &7FF5, &7FF4
1580 DATA &7FEF, &7FEE, &7FED, &7FEC
1590 DATA &7FE7, &7FE6, &7FE5, &7FE4
1600 DATA &7FDF, &7FDE, &7FDD, &7FDC
1610 DATA &7FD7, &7FD6, &7FD5, &7FD4
1620 DATA &7FCF, &7FCE, &7FCD, &7FCC
1630 DATA &7FC7, &7FC6, &7FC5, &7FC4