64'er Magazin 1990 March

home *** CD-ROM | disk | FTP | other *** search

/ 64'er Magazin 1990 March / 64er_Magazin_90-03_1990_Markt__Technik_de_Side_A.d64 / main (.txt) < prev next >

Wrap

Commodore BASIC | 1990-01-01 | 26.1 KB | 2,207 lines

10 +$8000 20 step"part1,p,w" 30 tab(nib=$02c0 40 tab(bytes=$41 50 tab(kommand=$02ce 60 tab(data=$02d0 70 tab(masks=$0130 80 tab(work=$57 90 tab(dapo=$b0 100 tab(sure=$b4 110 tab(bypo=$b5 120 tab(texts=$0100 130 tab(pclo=$50 140 tab(pchi=$51 150 tab(tablo=$6e 160 tab(tabhi=$6f 170 tab(mnenr=$b1 180 tab(adrnr=$5e 190 tab(lenght=$5f 200 tab(oreg=$0100 210 tab(codo=$52 220 tab(ad=$02c8 230 tab(colhide=$0287 240 tab(tab=$d7 250 tab(inpli=$0200 260 tab(lacha=$ce 270 tab(tarlo=$5c 280 tab(tarhi=$5d 290 tab(llo=$4e 300 tab(lhi=$4f 310 tab(savepos=$a7 320 tab(jump=$92 330 tab(labpo=$a8 340 tab(callpo=$a9 350 tab(labels=$ce00 360 tab(calls=$cf00 370 tab(labon=$aa 380 tab(recon=$55 390 tab(wrcon=$56 400 tab(print=$02 410 tab(getdata=$0230 420 tab(stodata=getdata+15 430 tab(regstore=$0128 500 tab(headl1=$9c57 510 tab(lab1=$9c7f 520 tab(lab2=$9c87 530 tab(outcodes=$9c91 540 tab(commandos=$9c96 550 tab(scrucodes=$9cd8 560 tab(scrdcodes=$9ce2 570 tab(intcodes=$9cec 580 tab(listcodes=$9cf6 590 tab(inpcodes=$9d00 600 tab(mnemonics=$9d42 610 tab(addresses=$9e20 620 tab(table=$9e80 630 tab(adrtab=$9f80 640 tab(headl2=$9c2f 900 spc(startmon,$fe5e 910 fn$c3,$c2,$cd,$38,$30 920 monvec spc(irq,break 1000 startmon (NULL) 1010 (NULL) 1020 peek#$f6 1030 (NULL) 1040 mid$$dc01 1050 asc#$02 1060 (NULL)nosave 1070 len#$00 1080 peek#$e0 1090 (NULL)$ff 1100 (NULL)$fe 1110 (NULL)$fc 1120 (NULL)$fd 1130 peek#$08 1140 sathi mid$($fe),y 1150 (NULL)($fc),y 1160 (NULL) 1170 (NULL)sathi 1180 right$$ff 1190 right$$fd 1200 (NULL) 1210 (NULL)sathi 1220 peek#$04 1230 mid$$ff 1240 (NULL)coyeco 1250 mid$#$d8 1260 (NULL)$ff 1270 (NULL)sathi 1280 coyeco peek#$2b 1290 cosfd mid$safd,x 1300 (NULL)texts,x 1310 (NULL) 1320 (NULL)cosfd 1330 (NULL)texts 1340 nosave (NULL)$fda3 1350 (NULL)$fd50 1360 (NULL)$fd15 1370 (NULL)$ff5b 1380 (NULL)$e453 1390 (NULL)$e3bf 1400 mid$#$ff 1410 (NULL)$028a 1420 peek#$00 1430 (NULL)labpo 1440 (NULL)callpo 1450 shhe1 mid$headl2,x 1460 (NULL)$ffd2 1470 (NULL) 1480 tan#$28 1490 (NULL)shhe1 1500 peek#$03 1510 sevec mid$monvec,x 1520 (NULL)$0314,x 1530 (NULL) 1540 (NULL)sevec 1550 (NULL) 1560 (NULL) 1570 (NULL) 1580 val#$02 1590 (NULL)regstore 1600 (NULL) 1610 val#$00 1620 (NULL)regstore+1 1630 (NULL) 1640 mid$#$30 1650 (NULL)regstore+6 1660 reenter (NULL)dadef 1670 mid$#$00 1680 (NULL)recon 1690 (NULL)wrcon 1700 (NULL)print 1710 (NULL) 1720 (NULL)regstore+5 1730 (NULL) 1740 (NULL)register 1750 main (NULL) 1760 (NULL) 1770 mid$#$00 1780 (NULL)dapo 1790 peek#$27 1800 clda mid$#$00 1810 (NULL)data,x 1820 (NULL)texts,x 1830 mid$#$ff 1840 (NULL)masks,x 1850 (NULL) 1860 (NULL)clda 1870 (NULL)getkom 1880 (NULL) 1890 (NULL) 1900 noint peek#$00 1910 (NULL)sesp 1920 mid$inpli,x 1930 (NULL)kommand 1940 mid$inpli+1,x 1950 (NULL)cote 1960 (NULL)sile 1970 str$#$22 1980 (NULL)sile 1990 (NULL) 2000 (NULL) 2010 (NULL)sime 2020 sile (NULL) 2030 mid$#$20 2040 sime (NULL)kommand+1 2050 seda (NULL)sesp 2060 (NULL)inpend 2070 len#$00 2080 cdiw mid$inpli,x 2090 (NULL)work,y 2100 (NULL) 2110 (NULL) 2120 atn#$04 2130 (NULL)cdiw 2140 (NULL)compute 2150 (NULL)illeg 2160 (NULL)sure 2170 (NULL) 2180 (NULL) 2190 valsure 2200 val#$fc 2210 (NULL) 2220 lendapo 2230 mid$bytes+1 2240 (NULL)data,y 2250 mid$bytes 2260 (NULL)data+1,y 2270 mid$bytes+3 2280 (NULL)masks,y 2290 mid$bytes+2 2300 (NULL)masks+1,y 2310 right$dapo 2320 right$dapo 2330 (NULL)seda 2340 inpend mid$kommand+1 2350 str$#$3b 2360 (NULL)intco 2370 (NULL)komch2 2380 (NULL)nothing 2390 mid$inpcodes,y 2400 (NULL)jump 2410 mid$inpcodes+1,y 2420 (NULL)jump+1 2430 (NULL)commex 2440 (NULL)main 2450 nothing mid$kommand 2460 (NULL)noilen 2470 (NULL)inperr 2480 noilen (NULL)main 2490 illeg mid$kommand+1 2500 str$#$3b 2510 (NULL)intco 2520 contill (NULL)crsrup 2530 (NULL) 2540 (NULL) 2550 (NULL)posget 2560 (NULL) 2570 (NULL) 2580 (NULL)#$04 2590 (NULL)notosm 2600 mid$#$00 2610 notosm (NULL) 2620 peek#$04 2630 shter mid$($fe),y 2640 left$#$80 2650 (NULL)($fe),y 2660 (NULL) 2670 (NULL) 2680 (NULL)shter 2690 (NULL)main 2700 intco mid$dapo 2710 (NULL)contill 2720 mid$kommand 2730 str$#$52 2740 (NULL)defregs 2750 (NULL)komcheck 2760 (NULL)eche 2770 mid$intcodes,y 2780 (NULL)jump 2790 mid$intcodes+1,y 2800 (NULL)jump+1 2810 (NULL)commex 2820 eche (NULL)main 2830 defregs (NULL)configs 2840 (NULL)main 2850 sesp mid$inpli,x 2860 (NULL)error 2870 str$#$22 2880 (NULL)notxt 2890 (NULL)text 2900 notxt (NULL)cote 2910 (NULL)sene 2920 (NULL) 2930 (NULL) 2940 sene (NULL) 2950 tan#$28 2960 (NULL)sesp 2970 error (NULL) 2980 (NULL) 2990 compute mid$#$00 3000 (NULL)bypo 3010 (NULL)bytes 3020 (NULL)bytes+1 3030 mid$#$ff 3040 (NULL)bytes+2 3050 (NULL)bytes+3 3060 len#$00 3070 beco mid$#$ff 3080 (NULL)lenght 3090 mid$work,y 3100 (NULL)cote 3110 (NULL)nf 3120 str$#$58 3130 (NULL)nox1 3140 mid$#$0f 3150 (NULL)lenght 3160 mid$#$30 3170 nox1 (NULL)check 3180 (NULL)error 3190 (NULL) 3200 (NULL) 3210 (NULL) 3220 (NULL) 3230 (NULL)sure 3240 (NULL) 3250 mid$work,y 3260 (NULL)cote 3270 (NULL)nf 3280 str$#$58 3290 (NULL)nox2 3300 mid$lenght 3310 asc#$f0 3320 (NULL)lenght 3330 mid$#$30 3340 nox2 (NULL)check 3350 (NULL)error 3360 (NULL)sure 3370 (NULL)sure 3380 (NULL) 3390 (NULL) 3400 lenbypo 3410 mid$sure 3420 (NULL)bytes,y 3430 mid$lenght 3440 (NULL)bytes+2,y 3450 (NULL) 3460 (NULL) 3470 right$bypo 3480 (NULL) 3490 atn#$04 3500 (NULL)beco 3510 (NULL) 3520 (NULL) 3530 nf mid$bytes 3540 (NULL)bytes+1 3550 mid$bytes+2 3560 (NULL)bytes+3 3570 mid$#$00 3580 (NULL)bytes 3590 mid$#$ff 3600 (NULL)bytes+2 3610 (NULL) 3620 (NULL) 3630 check str$#$30 3640 (NULL)inpok3 3650 (NULL)error 3660 inpok3 str$#$47 3670 (NULL)inpok2 3680 (NULL)error 3690 inpok2 str$#$3a 3700 (NULL)fig 3710 str$#$41 3720 (NULL)inpok 3730 (NULL)error 3740 inpok (NULL) 3750 (NULL)#$37 3760 (NULL) 3770 (NULL) 3780 fig (NULL) 3790 (NULL)#$30 3800 (NULL) 3810 (NULL) 3820 text (NULL) 3830 len#$00 3840 tege mid$inpli,x 3850 (NULL)tend 3860 str$#$22 3870 (NULL)tend 3880 (NULL)texts,y 3890 (NULL) 3900 (NULL) 3910 atn#$20 3920 (NULL)tege 3930 (NULL)lta 3940 tend mid$#$00 3950 (NULL)texts,y 3960 lta (NULL) 3970 (NULL)sesp 3980 cote (NULL)ioot 3990 str$#$20 4000 (NULL)ioot 4010 str$#$2c 4020 (NULL)ioot 4030 str$#$2d 4040 (NULL)ioot 4050 str$#$2e 4060 (NULL)ioot 4070 str$#$24 4080 (NULL)ioot 4090 str$#$2a 4100 (NULL)ioot 4110 (NULL) 4120 (NULL) 4130 ioot (NULL) 4140 (NULL) 4150 commex peek#$1d 4160 czerr mid$zerout,x 4170 (NULL)getdata,x 4180 (NULL) 4190 (NULL)czerr 4200 special (NULL)(jump) 4210 exmon (NULL) 4220 peek#$ea 4230 len#$31 4240 (NULL)$0315 4250 (NULL)$0314 4260 peek#$f8 4270 (NULL) 4280 (NULL) 4290 (NULL) 4300 (NULL)$ff5b 4310 (NULL)$a474 4320 safd mid$#$2f 4330 (NULL)$00 4340 mid$#$35 4350 (NULL)$01 4360 peek#$3f 4370 savall mid$$fd30,x 4380 (NULL)$ec00,x 4390 mid$$d000,x 4400 (NULL)$ec40,x 4410 mid$$dc00,x 4420 (NULL)$ec80,x 4430 mid$$dd00,x 4440 (NULL)$ecc0,x 4450 (NULL) 4460 (NULL)savall 4470 mid$#$37 4480 (NULL)$01 4490 (NULL) 5000 getkom (NULL)curset 5010 key peek#$19 5020 resli mid$$d9,x 5030 (NULL)#$80 5040 (NULL)$d9,x 5050 (NULL) 5060 (NULL)resli 5070 (NULL)$ffe4 5080 (NULL)key 5090 (NULL) 5100 (NULL)curcl 5110 (NULL) 5120 (NULL) 5130 str$#$91 5140 (NULL)up 5150 str$#$11 5160 (NULL)nech 5170 (NULL)down 5180 nech str$#$0d 5190 (NULL)nech3 5200 (NULL)enter 5210 nech3 str$#$93 5220 (NULL)nech2 5230 (NULL)home 5240 nech2 str$#$94 5250 (NULL)nech4 5260 (NULL)delete 5270 nech4 str$#$85 5280 (NULL)goon 5290 (NULL)switchsc 5300 goon (NULL) 5310 (NULL)$ffd2 5320 (NULL)curset 5330 mid$#$00 5340 (NULL)$d4 5350 (NULL)$d8 5360 (NULL)key 5370 up mid$$d6 5380 (NULL)noup 5390 (NULL)scrup 5400 (NULL)noup 5410 (NULL)komcheck 5420 (NULL)noup 5430 mid$scrucodes,y 5440 (NULL)jump 5450 mid$scrucodes+1,y 5460 (NULL)jump+1 5470 (NULL)commex 5480 noup (NULL)goon 5490 scrup peek#$f0 5500 st1 mid$$06cf,x 5510 (NULL)$06f7,x 5520 mid$$dacf,x 5530 (NULL)$daf7,x 5540 (NULL) 5550 (NULL)st1 5560 peek#$f0 5570 st2 mid$$05df,x 5580 (NULL)$0607,x 5590 mid$$d9df,x 5600 (NULL)$da07,x 5610 (NULL) 5620 (NULL)st2 5630 peek#$f0 5640 st3 mid$$04ef,x 5650 (NULL)$0517,x 5660 mid$$d8ef,x 5670 (NULL)$d917,x 5680 (NULL) 5690 (NULL)st3 5700 peek#$f0 5710 st4 mid$$03ff,x 5720 (NULL)$0427,x 5730 mid$$d7ff,x 5740 (NULL)$d827,x 5750 (NULL) 5760 (NULL)st4 5770 peek#$27 5780 mid$#$20 5790 clli (NULL)$0400,x 5800 (NULL) 5810 (NULL)clli 5820 mid$$d3 5830 (NULL)savepos 5840 (NULL)linefeed 5850 (NULL)lanalyse 5860 (NULL) 5870 scruass mid$bytes+1 5880 (NULL) 5890 (NULL)#$20 5900 (NULL)pclo 5910 mid$bytes 5920 (NULL)#$00 5930 (NULL)pchi 5940 assym (NULL)feda 5950 mid$pclo 5960 (NULL)llo 5970 mid$pchi 5980 (NULL)lhi 5990 (NULL)incpc 6000 str$bytes 6010 (NULL)cheklo 6020 (NULL)errou 6030 (NULL)assym 6040 cheklo mid$pclo 6050 str$bytes+1 6060 (NULL)assym 6070 errou mid$llo 6080 (NULL)pclo 6090 mid$lhi 6100 (NULL)pchi 6110 (NULL)crsrup 6120 mid$kommand 6130 str$#$44 6140 (NULL)udis 6150 (NULL)asso 6160 (NULL)uend 6170 udis (NULL)diso 6180 uend (NULL)linefeed 6190 nic2 mid$savepos 6200 (NULL)$d3 6210 (NULL) 6220 scrumem mid$#$08 6230 (NULL)scruev 6240 (NULL)memory 6250 (NULL)uend 6260 scruchar mid$#$01 6270 (NULL)scruev 6280 (NULL)character 6290 (NULL)uend 6300 scruspr mid$#$03 6310 (NULL)scruev 6320 (NULL)sprites 6330 (NULL)uend 6340 feda len#$00 6350 (NULL)getdata 6360 spgel (NULL)gerad 6370 coni1 (NULL) 6380 (NULL) 6390 (NULL) 6400 (NULL) 6410 mid$addresses,y 6420 (NULL)lenght 6430 (NULL) 6440 enter (NULL)posget 6450 len#$27 6460 doc mid$($fe),y 6470 asc#$7f 6480 str$#$20 6490 (NULL)char 6500 mid$#$00 6510 (NULL)inpli,y 6520 (NULL) 6530 (NULL)lacha 6540 (NULL)doc 6550 (NULL)endent 6560 char mid$($fe),y 6570 asc#$7f 6580 (NULL)ascii 6590 (NULL)inpli,y 6600 (NULL) 6610 (NULL)char 6620 endent mid$$d6 6630 str$#$18 6640 (NULL)nodo2 6650 (NULL)scrdo 6660 nodo2 (NULL) 6670 (NULL)$ffd2 6680 down mid$$d6 6690 str$#$18 6700 (NULL)nodo 6710 (NULL)scrdo 6720 (NULL)nodo 6730 (NULL)komcheck 6740 (NULL)nodo 6750 mid$scrdcodes,y 6760 (NULL)jump 6770 mid$scrdcodes+1,y 6780 (NULL)jump+1 6790 (NULL)commex 6800 nodo (NULL)goon 6810 scrdo (NULL)$e8ea 6820 mid$$d3 6830 (NULL)savepos 6840 (NULL)crsrup 6850 (NULL)lanalyse 6860 (NULL) 6870 scrdass peekbytes 6880 lenbytes+1 6890 (NULL)pchi 6900 (NULL)pclo 6910 (NULL)feda 6920 (NULL)scrdev 6930 mid$kommand 6940 str$#$44 6950 (NULL)ddis 6960 (NULL)asso 6970 (NULL)dend 6980 ddis (NULL)diso 6990 dend (NULL)crsrup 7000 nic1 mid$savepos 7010 (NULL)$d3 7020 (NULL) 7030 scrdmem mid$#$08 7040 (NULL)scrdev 7050 (NULL)memory 7060 (NULL)dend 7070 scrdchar mid$#$01 7080 (NULL)scrdev 7090 (NULL)character 7100 (NULL)dend 7110 scrdspr mid$#$03 7120 (NULL)scrdev 7130 (NULL)sprites 7140 (NULL)dend 7150 home mid$$028d 7160 asc#$02 7170 (NULL)nocom 7180 (NULL) 7190 mid$#$00 7200 (NULL) 7210 (NULL)$d3 7220 mid$#$18 7230 (NULL)$d6 7240 mid$#$c0 7250 (NULL)$d1 7260 mid$#$07 7270 (NULL)$d2 7280 nocom (NULL)goon 7290 delete mid$$028d 7300 asc#$02 7310 (NULL)nocom2 7320 (NULL) 7330 mid$#$00 7340 (NULL) 7350 (NULL)posget 7360 lentab 7370 mid$#$20 7380 clli3 (NULL)($fe),y 7390 (NULL) 7400 atn#$28 7410 (NULL)clli3 7420 nocom2 (NULL)goon 7430 curset (NULL)posget 7440 lentab 7450 mid$($fe),y 7460 left$#$80 7470 (NULL)($fe),y 7480 mid$$ff 7490 (NULL) 7500 val#$d4 7510 (NULL)$ff 7520 mid$($fe),y 7530 (NULL)colhide 7540 mid$$0286 7550 (NULL)($fe),y 7560 (NULL) 7570 posget peek$d2 7580 len$d1 7590 (NULL)$ff 7600 (NULL)$fe 7610 mid$$d3 7620 str$#$28 7630 (NULL)norm 7640 (NULL) 7650 (NULL)#$28 7660 (NULL) 7670 mid$$fe 7680 (NULL) 7690 val#$28 7700 (NULL)$fe 7710 mid$$ff 7720 val#$00 7730 (NULL)$ff 7740 (NULL) 7750 norm (NULL)tab 7760 (NULL) 7770 curcl (NULL)posget 7780 lentab 7790 mid$($fe),y 7800 left$#$80 7810 (NULL)($fe),y 7820 mid$$ff 7830 (NULL) 7840 val#$d4 7850 (NULL)$ff 7860 mid$colhide 7870 (NULL)($fe),y 7880 (NULL) 7890 ascii str$#$20 7900 (NULL)fi 7910 str$#$40 7920 (NULL)se 7930 str$#$60 7940 (NULL)th 7950 fi (NULL) 7960 val#$40 7970 se (NULL)cio 7980 th (NULL) 7990 val#$20 8000 cio (NULL) 8010 lanalyse (NULL)posget 8020 len#$00 8030 goch mid$($fe),y 8040 (NULL)cote 8050 (NULL)beggo 8060 (NULL) 8070 atn#$28 8080 (NULL)goch 8090 (NULL)ninco 8100 beggo (NULL)ascii 8110 (NULL)kommand 8120 (NULL) 8130 mid$($fe),y 8140 str$#$3b 8150 (NULL)intern 8160 ninco (NULL) 8170 (NULL) 8180 intern peek#$00 8190 (NULL) 8200 cliw mid$($fe),y 8210 (NULL)ascii 8220 (NULL)work,x 8230 (NULL) 8240 (NULL) 8250 tan#$04 8260 (NULL)cliw 8270 (NULL)compute 8280 gerad (NULL)sure 8290 (NULL) 8300 (NULL) 8310 mid$adrtab,y 8320 (NULL) 8330 (NULL) 8340 (NULL) 8350 str$sure 8360 (NULL)tth 8370 (NULL) 8380 asc#$0f 8390 (NULL)coni 8400 tth (NULL) 8410 (NULL) 8420 (NULL) 8430 (NULL) 8440 (NULL) 8450 coni (NULL) 8460 scruev (NULL)lenght 8470 mid$bytes+1 8480 (NULL) 8490 (NULL)lenght 8500 (NULL)pclo 8510 mid$bytes 8520 (NULL)#$00 8530 (NULL)pchi 8540 (NULL)crsrup 8550 scrdev (NULL)lenght 8560 (NULL)linefeed 8570 mid$bytes+1 8580 (NULL)pclo 8590 mid$bytes 8600 (NULL)pchi 8610 (NULL)incpc 8620 switchsc peek#$27 8630 css mid$swiso,x 8640 (NULL)texts,x 8650 (NULL) 8660 (NULL)css 8670 peek#$04 8680 len#$00 8690 mid$#$f4 8700 (NULL)$ff 8710 (NULL)$fe 8720 (NULL)pchi 8730 (NULL)pclo 8740 peek#$04 8750 (NULL)texts 8760 swiso (NULL) 8770 mid$#$00 8780 (NULL)$01 8790 dotsw mid$($fe),y 8800 (NULL) 8810 mid$(pclo),y 8820 (NULL)($fe),y 8830 (NULL) 8840 (NULL)(pclo),y 8850 (NULL) 8860 (NULL)dotsw 8870 right$pchi 8880 right$$ff 8890 (NULL) 8900 (NULL)dotsw 8910 mid$#$37 8920 (NULL)$01 8930 (NULL) 8940 (NULL)goon 8950 linefeed mid$#$0d 8960 (NULL)$ffd2 8970 crsrup mid$#$91 8980 (NULL)$ffd2 10000 output (NULL)dasto2 10010 (NULL)channel 10020 (NULL)crsrup 10040 redo (NULL)linefeed 10060 mid$kommand 10070 str$#$4d 10080 (NULL)pron 10090 mid$print 10100 (NULL)pron 10110 (NULL)premory 10120 (NULL)donest 10130 pron (NULL)komcheck 10140 mid$listcodes,y 10150 (NULL)jump 10160 mid$listcodes+1,y 10170 (NULL)jump+1 10180 (NULL)commex 10190 donest (NULL)incpc 10200 (NULL)eda 10210 (NULL)brech 10220 (NULL)eda 10230 (NULL)endcheck 10240 (NULL)redo 10250 eda (NULL)crsrup 10270 (NULL)linefeed 10290 (NULL)clall 10300 disass (NULL)lineout 10310 len#$00 10320 (NULL)getdata 10330 (NULL)tablo 10340 (NULL)cole 10350 mid$nib 10360 (NULL)oreg+9 10370 mid$nib+1 10380 (NULL)oreg+10 10390 lentablo 10400 mid$table,y 10410 (NULL)mnenr 10420 mid$tablo 10430 (NULL)gerad 10440 (NULL)adrnr 10450 mid$mnenr 10460 (NULL)ill 10470 mid$#$20 10480 (NULL)www1 10490 ill mid$#$2a 10500 www1 (NULL)oreg+19 10510 mid$mnenr 10520 asc#$7f 10530 (NULL)mnenr 10540 (NULL) 10550 (NULL) 10560 valmnenr 10570 (NULL) 10580 peek#$00 10590 mnout mid$mnemonics,y 10600 (NULL)oreg+20,x 10610 (NULL) 10620 (NULL) 10630 tan#$03 10640 (NULL)mnout 10650 mid$adrnr 10660 (NULL) 10670 (NULL) 10680 (NULL) 10690 (NULL) 10700 (NULL) 10710 mid$addresses,y 10720 (NULL)lenght 10730 str$#$01 10740 (NULL)chene 10750 (NULL)continue 10760 chene str$#$03 10770 (NULL)long 10780 mid$adrnr 10790 str$#$0a 10800 (NULL)branch 10810 len#$01 10820 (NULL)getdata 10830 (NULL)cole 10840 mid$nib 10850 (NULL)ad 10860 (NULL)oreg+12 10870 mid$nib+1 10880 (NULL)ad+1 10890 (NULL)oreg+13 10900 (NULL)continue 10910 long len#$02 10920 (NULL)getdata 10930 (NULL)tabhi 10940 (NULL) 10950 (NULL)getdata 10960 (NULL)tablo 10970 (NULL)compsix 10980 mid$ad 10990 (NULL)oreg+15 11000 mid$ad+1 11010 (NULL)oreg+16 11020 mid$ad+2 11030 (NULL)oreg+12 11040 mid$ad+3 11050 (NULL)oreg+13 11060 (NULL)continue 11070 branch len#$01 11080 (NULL)getdata 11090 (NULL)cole 11100 mid$nib 11110 (NULL)oreg+12 11120 mid$nib+1 11130 (NULL)oreg+13 11140 (NULL)brasub 11150 (NULL)compsix 11160 continue (NULL) 11170 (NULL) 11180 peek#$00 11190 (NULL)mnenr 11200 (NULL)adrnr 11210 mid$#$07 11220 (NULL)codo 11230 adrout mid$addresses+1,y 11240 (NULL)www2 11250 peekmnenr 11260 mid$ad,x 11270 right$mnenr 11280 www2 peekadrnr 11290 (NULL)oreg+24,x 11300 (NULL) 11310 right$adrnr 11320 chr$codo 11330 (NULL)adrout 11340 (NULL) 11350 diso (NULL)disass 11360 (NULL)lishow 11370 lineout mid$#$2e 11380 (NULL)oreg 11390 mid$kommand 11400 (NULL)oreg+1 11410 mid$#$3b 11420 (NULL)oreg+2 11430 mid$pchi 11440 (NULL)cole 11450 mid$nib 11460 (NULL)oreg+3 11470 mid$nib+1 11480 (NULL)oreg+4 11490 mid$pclo 11500 (NULL)cole 11510 mid$nib 11520 (NULL)oreg+5 11530 mid$nib+1 11540 (NULL)oreg+6 11550 peek#$20 11560 mid$#$20 11570 clout (NULL)oreg+7,x 11580 (NULL) 11590 (NULL)clout 11600 (NULL) 11610 cole (NULL) 11620 (NULL) 11630 (NULL) 11640 (NULL) 11650 (NULL) 11660 (NULL)change 11670 (NULL)nib 11680 (NULL) 11690 asc#$0f 11700 (NULL)change 11710 (NULL)nib+1 11720 (NULL) 11730 change str$#$0a 11740 (NULL)letter 11750 (NULL) 11760 val#$30 11770 (NULL) 11780 letter (NULL) 11790 val#$37 11800 (NULL) 11810 compsix mid$tabhi 11820 (NULL)cole 11830 mid$nib 11840 (NULL)ad 11850 mid$nib+1 11860 (NULL)ad+1 11870 mid$tablo 11880 (NULL)cole 11890 mid$nib 11900 (NULL)ad+2 11910 mid$nib+1 11920 (NULL)ad+3 11930 (NULL) 11940 incpc mid$pclo 11950 (NULL) 11960 vallenght 11970 (NULL)pclo 11980 mid$pchi 11990 val#$00 12000 (NULL)pchi 12010 (NULL) 12020 dasto2 (NULL)dasto 12030 mid$data+2 12040 (NULL) 12050 val#$01 12060 (NULL)tarlo 12070 mid$data+3 12080 val#$00 12090 (NULL)tarhi 12100 (NULL) 12110 brech mid$$cb 12120 str$#$3f 12130 (NULL)bknp 12140 (NULL) 12150 (NULL) 12160 bknp (NULL) 12170 (NULL) 12180 endcheck mid$pchi 12190 str$tarhi 12200 (NULL)chelo 12210 (NULL)enoa 12220 tanor (NULL) 12230 (NULL) 12240 chelo mid$pclo 12250 str$tarlo 12260 (NULL)tanor 12270 enoa (NULL) 12280 (NULL) 12290 brasub mid$pclo 12300 (NULL) 12310 val#$02 12320 (NULL)llo 12330 mid$pchi 12340 val#$00 12350 (NULL)lhi 12360 len#$01 12370 (NULL)getdata 12380 (NULL)sub 12390 (NULL)tablo 12400 mid$llo 12410 (NULL) 12420 valtablo 12430 (NULL)tablo 12440 mid$lhi 12450 val#$00 12460 (NULL)tabhi 12470 (NULL) 12480 sub left$#$ff 12490 (NULL)tablo 12500 mid$llo 12510 (NULL) 12520 (NULL)#$01 12530 (NULL)tablo 12540 (NULL)tablo 12550 mid$lhi 12560 (NULL)#$00 12570 (NULL)tabhi 12580 www3 (NULL) 15000 llout mid$dapo 15010 (NULL)elout 15020 (NULL)dasto 15030 (NULL)lineout 15040 peek#$00 15050 llll mid$oreg+1,x 15060 (NULL)$ffd2 15070 (NULL) 15080 tan#$0a 15090 (NULL)llll 15140 mid$#$0a 15150 (NULL)$d3 15160 elout (NULL) 15170 lass1 peek#$00 15180 (NULL)sesp 15190 (NULL) 15200 (NULL) 15210 val#$06 15220 (NULL) 15230 mid$inpli,x 15240 str$#$5a 15250 (NULL)label 15260 (NULL)lass2 15270 label (NULL)dasto 15280 mid$inpli+1,x 15290 (NULL)tablo 15300 mid$inpli+2,x 15310 (NULL)tabhi 15320 (NULL) 15330 (NULL) 15340 peeklabpo 15350 (NULL)expand 15360 peek#$00 15370 doiey mid$labels,x 15380 str$tablo 15390 (NULL)donop 15400 mid$labels+1,x 15410 str$tabhi 15420 (NULL)donop 15430 (NULL)install 15440 donop (NULL) 15450 (NULL) 15460 (NULL) 15470 (NULL) 15480 tanlabpo 15490 (NULL)doiey 15500 expand mid$labpo 15510 (NULL) 15520 val#$04 15530 (NULL)labpo 15540 install mid$tablo 15550 (NULL)labels,x 15560 mid$tabhi 15570 (NULL)labels+1,x 15580 mid$pclo 15590 (NULL)labels+2,x 15600 (NULL)llo 15610 mid$pchi 15620 (NULL)labels+3,x 15630 (NULL)lhi 15640 mid$callpo 15650 (NULL)rrrreeee 15660 peek#$00 15670 checa mid$calls,x 15680 str$tablo 15690 (NULL)donofi 15700 mid$calls+1,x 15710 str$tabhi 15720 (NULL)donofi 15730 (NULL) 15740 (NULL) 15750 mid$calls+2,x 15760 (NULL)pclo 15770 mid$calls+3,x 15780 (NULL)pchi 15790 len#$00 15800 (NULL)getdata 15810 (NULL) 15820 (NULL)gerad 15830 (NULL)adrnr 15840 mid$llo 15850 (NULL)bytes+1 15860 mid$lhi 15870 (NULL)bytes 15880 (NULL)thaco 15890 (NULL) 15900 (NULL)twai 15910 (NULL) 15920 (NULL) 15930 (NULL) 15940 rueck mid$calls+4,x 15950 (NULL)calls,x 15960 (NULL) 15970 tancallpo 15980 (NULL)rueck 15990 mid$callpo 16000 (NULL) 16010 (NULL)#$04 16020 (NULL)callpo 16030 (NULL) 16040 (NULL) 16050 (NULL)routend 16060 donofi (NULL) 16070 (NULL) 16080 (NULL) 16090 (NULL) 16100 routend tancallpo 16110 (NULL)checa 16120 rrrreeee (NULL) 16130 (NULL) 16140 (NULL) 16150 (NULL) 16160 (NULL) 16170 mid$llo 16180 (NULL)data 16190 mid$lhi 16200 (NULL)data+1 16210 lass2 mid$#$00 16220 (NULL)labon 16230 (NULL)dasto 16240 (NULL)sesp 16250 (NULL)shacco 16260 (NULL)codo 16270 len#$00 16280 (NULL)mnenr 16290 nene mid$#$03 16300 (NULL)tablo 16310 mnch mid$inpli,x 16320 str$mnemonics,y 16330 (NULL)oco 16340 (NULL) 16350 (NULL) 16360 chr$tablo 16370 (NULL)mnch 16380 (NULL)mnfo 16390 oco mid$mnenr 16400 str$#$4a 16410 (NULL)eoch1 16420 right$mnenr 16430 mid$mnenr 16440 (NULL) 16450 (NULL) 16460 valmnenr 16470 (NULL) 16480 peekcodo 16490 (NULL)nene 16500 eoch1 (NULL)inperr 16510 shacco (NULL)crsrup 16530 (NULL)asso 16540 mid$#$0a 16550 (NULL)$d3 16560 (NULL) 16570 (NULL) 16580 mnfo (NULL)sesp 16590 (NULL)noeo 16600 (NULL)eoch4 16610 noeo (NULL)codo 16620 mid$callpo 16630 (NULL)tabhi 16640 len#$00 16650 (NULL)adrnr 16660 nnneee1 mid$#$07 16670 (NULL)tablo 16680 mid$#$20 16690 (NULL)work 16700 (NULL)work+1 16710 (NULL)work+2 16720 (NULL)work+3 16730 mid$#$00 16740 (NULL)bypo 16750 nnneee2 mid$inpli,x 16760 (NULL)inz 16770 mid$#$20 16780 (NULL)inz2 16790 inz str$#$5a 16800 (NULL)inz2 16810 mid$addresses+1,y 16820 str$#$24 16830 (NULL)nead 16840 mid$inpli+1,x 16850 (NULL)llo 16860 mid$inpli+2,x 16870 (NULL)lhi 16880 mid$#$ff 16890 (NULL)labon 16900 (NULL)checkex 16910 (NULL) 16920 (NULL) 16930 (NULL) 16940 (NULL) 16950 (NULL) 16960 (NULL) 16970 (NULL) 16980 (NULL) 16990 mid$addresses-1,y 17000 (NULL)nead 17010 mid$tablo 17020 (NULL) 17030 (NULL)#$05 17040 (NULL)tablo 17050 (NULL)nnneee2 17060 inz2 (NULL)sure 17070 (NULL)check 17080 (NULL)tet 17090 (NULL)lenght 17100 lenbypo 17110 mid$sure 17120 (NULL)work,y 17130 right$bypo 17140 lenlenght 17150 mid$#$00 17160 tet str$addresses+1,y 17170 (NULL)ignore 17180 mid$addresses+1,y 17190 str$#$24 17200 (NULL)nead 17210 chr$bypo 17220 (NULL)ignore2 17230 ignore (NULL) 17240 ignore2 (NULL) 17250 chr$tablo 17260 (NULL)nnneee2 17270 (NULL)adrfo 17280 nead right$adrnr 17290 mid$adrnr 17300 str$#$0c 17310 (NULL)eoch2 17320 (NULL) 17330 (NULL) 17340 (NULL) 17350 (NULL) 17360 peekcodo 17370 (NULL)nnneee1 17380 eoch2 (NULL)inperr 17390 eoch4 mid$#$00 17400 (NULL)adrnr 17410 (NULL)doia 17420 adrfo mid$tabhi 17430 (NULL)callpo 17440 mid$labon 17450 (NULL)doia 17460 (NULL)compute 17470 (NULL)eoch2 17480 doia len#$00 17490 corrad mid$table,y 17500 asc#$7f 17510 str$mnenr 17520 (NULL)tinc 17530 (NULL)tablo 17540 (NULL) 17550 (NULL)gerad 17560 eecc lentablo 17570 str$adrnr 17580 (NULL)thaco 17590 tinc (NULL) 17600 (NULL)corrad 17610 mid$adrnr 17620 str$#$06 17630 (NULL)ndc 17640 mid$#$0a 17650 (NULL)adrnr 17660 (NULL)doia 17670 ndc (NULL)inperr 17680 thaco mid$adrnr 17690 str$#$0a 17700 (NULL)nobra 17710 mid$pclo 17720 (NULL) 17730 val#$02 17740 (NULL)tarlo 17750 mid$pchi 17760 val#$00 17770 (NULL)tarhi 17780 back mid$tarlo 17790 (NULL) 17800 (NULL)#$01 17810 (NULL)bytes+1 17820 (NULL)sure 17830 (NULL)ahead 17840 mid$tarhi 17850 (NULL)bytes 17860 (NULL)ahead 17870 mid$sure 17880 left$#$ff 17890 (NULL)bytes+1 17900 (NULL)nobra 17910 ahead mid$bytes+1 17920 (NULL) 17930 (NULL)tarlo 17940 (NULL)sure 17950 (NULL)brerr 17960 mid$bytes 17970 (NULL)tarhi 17980 (NULL)brerr 17990 mid$sure 18000 (NULL)bytes+1 18010 (NULL)nobra 18020 brerr (NULL)inperr 18030 nobra (NULL) 18040 (NULL) 18050 (NULL) 18060 ass (NULL)lass1 18070 (NULL)twar 18080 (NULL)twai 18090 (NULL)incpc 18100 mid$pclo 18110 (NULL)data 18120 mid$pchi 18130 (NULL)data+1 18140 mid$#$01 18150 (NULL)dapo 18160 (NULL)llout 18170 twar (NULL) 18180 twai len#$00 18190 (NULL)stodata 18200 mid$adrnr 18210 (NULL) 18220 (NULL) 18230 (NULL) 18240 (NULL) 18250 mid$addresses,y 18260 (NULL)lenght 18270 mid$lenght 18280 str$#$01 18290 (NULL)single 18300 len#$01 18310 mid$bytes+1 18320 (NULL)stodata 18330 mid$lenght 18340 str$#$02 18350 (NULL)single 18360 (NULL) 18370 mid$bytes 18380 (NULL)stodata 18390 single (NULL) 18400 asso (NULL)disass 18410 peek#$00 18420 reby mid$oreg+19,x 18430 (NULL)oreg+10,x 18440 (NULL) 18450 tan#$0d 18460 (NULL)reby 18470 mid$#$20 18480 gio (NULL)oreg+10,x 18490 (NULL) 18500 tan#$1d 18510 (NULL)gio 18520 mid$#$20 18530 (NULL)oreg+9 18540 (NULL)lishow 18550 inperr (NULL)crsrup 18570 (NULL)posget 18580 len#$27 18590 invli mid$($fe),y 18600 left$#$80 18610 (NULL)($fe),y 18620 (NULL) 18630 (NULL)invli 18640 (NULL) 18650 (NULL) 18660 sensp mid$inpli,x 18670 (NULL)cote 18680 (NULL)foo 18690 (NULL) 18700 tan#$28 18710 (NULL)sensp 18720 (NULL) 18730 (NULL) 18740 foo (NULL) 18750 (NULL) 18760 indis peek#$00 18770 len#$00 18780 rree1 (NULL)sesp 18790 (NULL)alal 18800 (NULL)sensp 18810 (NULL)alal 18820 tan#$12 18830 (NULL)fffooo 18840 (NULL) 18850 (NULL)sure 18860 (NULL)rree1 18870 fffooo atn#$02 18880 (NULL)aall 18890 alal (NULL)crsrup 18910 alal3 (NULL)dasto 18920 alal2 (NULL)shcon 18930 aall (NULL) 18940 (NULL) 18950 (NULL)dapo 18960 peeksure 18970 (NULL)lass2 18980 (NULL)alal3 18990 (NULL)work 19000 mid$bytes+1 19010 (NULL)work+1 19020 mid$bytes 19030 (NULL)work+2 19040 (NULL)crsrup 19060 mid$data+2 19070 (NULL)spgel 19080 (NULL) 19090 (NULL)#$01 19100 str$dapo 19110 (NULL)nobi 19120 (NULL)dapo 19130 nobi mid$dapo 19140 (NULL) 19150 (NULL) 19160 (NULL) 19170 ttteee1 (NULL)getdata 19180 str$data+2,x 19190 (NULL)chan1 19200 (NULL) 19210 (NULL) 19220 (NULL) 19230 (NULL)ttteee1 19240 mid$work 19250 (NULL)spgel 19260 lenlenght 19270 (NULL) 19280 ttteee2 (NULL)getdata 19290 str$work,y 19300 (NULL)chan2 19310 (NULL) 19320 (NULL)ttteee2 19330 (NULL)shcon2 19340 chan1 mid$data+2,x 19350 (NULL)stodata 19360 (NULL) 19370 (NULL) 19380 (NULL) 19390 (NULL)chan1 19400 (NULL)shcon2 19410 chan2 atn#$00 19420 (NULL)intc 19430 (NULL)getdata 19440 (NULL)bypo 19450 (NULL) 19460 mid$table,y 19470 asc#$7f 19480 str$mnenr 19490 (NULL)intc2 19500 mid$bypo 19510 (NULL)gerad 19520 str$adrnr 19530 (NULL)intc2 19540 (NULL)shcon2 19550 intc2 len#$00 19560 intc mid$work,y 19570 (NULL)stodata 19580 (NULL) 19590 (NULL)chan2 19600 (NULL)shcon2 19610 shcon mid$#$00 19620 (NULL)savepos 19630 (NULL)gshc 19640 shcon2 mid$#$ff 19650 (NULL)savepos 19660 gshc (NULL)diso 19670 mid$savepos 19680 (NULL)juol 19690 (NULL)linefeed 19710 (NULL)incpc 19720 (NULL)diso 19730 (NULL)crsrup 19750 (NULL)linefeed 19770 juol mid$#$08 19780 (NULL)$d3 19790 eodi (NULL) 19800 checkex (NULL) 19810 (NULL) 19820 mid$labpo 19830 (NULL)nolex3 19840 peek#$00 19850 bewch mid$labels,x 19860 str$llo 19870 (NULL)donofi2 19880 mid$labels+1,x 19890 str$lhi 19900 (NULL)donofi2 19910 mid$labels+2,x 19920 (NULL)bytes+1 19930 mid$labels+3,x 19940 (NULL)bytes 19950 (NULL)eall 19960 donofi2 (NULL) 19970 (NULL) 19980 (NULL) 19990 (NULL) 20000 tanlabpo 20010 (NULL)bewch 20020 nolex3 peekcallpo 20030 (NULL)benolex 20040 peek#$00 20050 alcall mid$calls+2,x 20060 str$pclo 20070 (NULL)nalcall 20080 mid$calls+3,x 20090 str$pchi 20100 (NULL)nalcall 20110 (NULL)nolex2 20120 nalcall (NULL) 20130 (NULL) 20140 (NULL) 20150 (NULL) 20160 tancallpo 20170 (NULL)alcall 20180 benolex mid$callpo 20190 (NULL) 20200 val#$04 20210 (NULL)tabhi 20220 nolex2 mid$llo 20230 (NULL)calls,x 20240 mid$lhi 20250 (NULL)calls+1,x 20260 mid$pclo 20270 (NULL)calls+2,x 20280 (NULL)bytes+1 20290 mid$pchi 20300 (NULL)calls+3,x 20310 (NULL)bytes 20320 eall (NULL) 20330 (NULL) 20340 (NULL) 21000 memory (NULL)lineout 21010 peek#$00 21020 len#$00 21030 neco (NULL)getdata 21040 (NULL)sure 21050 asc#$7f 21060 str$#$0d 21070 (NULL)conok 21080 str$#$14 21090 (NULL)conok 21100 mid$sure 21110 (NULL)stco 21120 conok mid$#$2e 21130 stco (NULL)oreg+32,y 21140 mid$sure 21150 (NULL)cole 21160 mid$nib 21170 (NULL)oreg+8,x 21180 mid$nib+1 21190 (NULL)oreg+9,x 21200 (NULL) 21210 (NULL) 21220 (NULL) 21230 (NULL) 21240 atn#$08 21250 (NULL)neco 21260 mid$#$08 21270 (NULL)lenght 21280 peek#$00 21290 gitlio mid$oreg+1,x 21300 (NULL)$ffd2 21310 mid$#$01 21320 (NULL)$d4 21330 (NULL) 21340 tan#$27 21350 (NULL)gitlio 21360 mid$#$00 21370 (NULL)$d4 21380 (NULL) 21390 inmem mid$dapo 21400 str$#$12 21410 (NULL)imer 21420 peek#$0e 21430 len#$07 21440 (NULL)dasto 21450 stlim mid$data+2,x 21460 (NULL)stodata 21470 (NULL) 21480 (NULL) 21490 (NULL) 21500 (NULL)stlim 21510 (NULL)crsrup 21530 (NULL)memory 21540 (NULL)linefeed 21560 mid$#$08 21570 (NULL)lenght 21580 (NULL)incpc 21590 (NULL)binend 21600 mid$#$07 21610 (NULL)$d3 21620 (NULL) 21630 imer (NULL)crsrup 21650 (NULL)memory 21660 mid$#$07 21670 (NULL)$d3 21680 (NULL) 21690 dasto mid$data 21700 (NULL)pclo 21710 mid$data+1 21720 (NULL)pchi 21730 (NULL) 25000 komcheck len#$04 25010 mid$kommand 25020 doif str$outcodes,y 25030 (NULL)hitit 25040 (NULL) 25050 (NULL)doif 25060 (NULL) 25070 (NULL) 25080 hitit (NULL) 25090 (NULL) 25100 (NULL) 25110 (NULL) 25120 (NULL) 25130 komch2 len#$40 25140 setrc mid$kommand 25150 str$commandos,y 25160 (NULL)notrc 25170 mid$kommand+1 25180 str$commandos+1,y 25190 (NULL)notrc 25200 (NULL) 25210 (NULL) 25220 notrc (NULL) 25230 (NULL) 25240 (NULL)setrc 25250 (NULL) 25260 (NULL) 26000 character (NULL)lineout 26010 len#$00 26020 (NULL)getdata 26030 (NULL)hexbin 26040 (NULL)lishow 26050 mid$#$01 26060 (NULL)lenght 26070 (NULL) 26080 hexbin (NULL)sure 26090 mid$#$01 26100 (NULL)bypo 26110 peek#$07 26120 begchb mid$sure 26130 ascbypo 26140 (NULL)nost 26150 mid$#$2a 26160 (NULL)gowi 26170 nost mid$#$2d 26180 gowi (NULL)oreg+8,x 26190 (NULL)bypo 26200 (NULL) 26210 (NULL)begchb 26220 (NULL) 26230 charin (NULL)dasto 26240 peek#$00 26250 (NULL)sefibi 26260 (NULL)charo 26270 (NULL)cobite 26280 len#$00 26290 (NULL)stodata 26300 mid$#$01 26310 (NULL)lenght 26320 (NULL)incpc 26330 binend (NULL)lineout 26340 peek#$00 26350 nelo mid$oreg+1,x 26360 (NULL)$ffd2 26370 (NULL) 26380 tan#$07 26390 (NULL)nelo 26400 (NULL) 26410 charo (NULL)crsrup 26420 (NULL)character 26430 mid$#$07 26440 (NULL)$d3 26450 (NULL) 26460 sefibi mid$inpli,x 26470 str$#$2d 26480 (NULL)fofofo 26490 str$#$2a 26500 (NULL)fofofo 26510 (NULL) 26520 tan#$20 26530 (NULL)sefibi 26540 (NULL) 26550 (NULL) 26560 fofofo (NULL) 26570 (NULL) 26580 cobite (NULL) 26590 (NULL) 26600 len#$07 26610 cochte mid$inpli,x 26620 (NULL)texts,y 26630 (NULL) 26640 (NULL) 26650 (NULL)cochte 26660 mid$#$00 26670 (NULL)sure 26680 mid$#$80 26690 (NULL)bypo 26700 len#$07 26710 comne mid$texts,y 26720 str$#$2a 26730 (NULL)iins 26740 mid$sure 26750 (NULL)bypo 26760 (NULL)sure 26770 iins (NULL)bypo 26780 (NULL) 26790 (NULL)comne 26800 (NULL) 26810 (NULL) 26820 mid$sure 26830 (NULL) 26840 sprites (NULL)lineout 26850 len#$02 26860 (NULL)geby 26870 peek#$18 26880 (NULL)cotrp 26890 len#$01 26900 (NULL)geby 26910 peek#$10 26920 (NULL)cotrp 26930 len#$00 26940 (NULL)geby 26950 (NULL)lishow 26960 mid$#$03 26970 (NULL)lenght 26980 (NULL) 26990 geby (NULL)getdata 27000 (NULL)hexbin 27010 cotrp len#$00 27020 docot mid$oreg+8,y 27030 (NULL)oreg,x 27040 (NULL) 27050 (NULL) 27060 atn#$08 27070 (NULL)docot 27080 (NULL) 27090 sprin (NULL)dasto 27100 peek#$00 27110 (NULL)sefibi 27120 (NULL)spro 27130 len#$00 27140 bewit (NULL)cobite 27150 (NULL)stodata 27160 (NULL) 27170 atn#$03 27180 (NULL)bewit 27190 mid$#$03 27200 (NULL)lenght 27210 (NULL)incpc 27220 (NULL)binend 27230 spro (NULL)crsrup 27240 (NULL)sprites 27250 mid$#$07 27260 (NULL)$d3 27270 (NULL) 27280 lishow peek#$00 27290 lino mid$oreg+1,x 27300 (NULL)$ffd2 27310 (NULL) 27320 tan#$27 27330 (NULL)lino 27340 (NULL) 27350 zerout (NULL) 27360 mid$recon 27370 (NULL)$01 27380 mid$(pclo),y 27390 (NULL) 27400 mid$#$37 27410 (NULL)$01 27420 (NULL) 27430 (NULL) 27440 (NULL) 27450 (NULL) 27460 (NULL) 27470 mid$wrcon 27480 (NULL)$01 27490 (NULL) 27500 (NULL)(pclo),y 27510 mid$#$37 27520 (NULL)$01 27530 (NULL) 27540 (NULL) 27550 progcall mid$dapo 27560 (NULL)exprca 27570 mid$data 27580 (NULL)jump 27590 mid$data+1 27600 (NULL)jump+1 27610 mid$recon 27620 str$#$36 27630 (NULL)nolcon 27640 mid$$01 27650 nolcon peekregstore+5 27660 (NULL) 27670 (NULL) 27680 (NULL) 27690 lenregstore+4 27700 peekregstore+3 27710 mid$regstore+6 27720 (NULL) 27730 mid$regstore+2 27740 (NULL) 27750 (NULL)special 27760 exprca peekregstore+1 27770 lenregstore 27780 (NULL)data+1 27790 (NULL)data 27800 mid$#$02 27810 (NULL)dapo 27820 (NULL)progcall 30000 channel mid$print 30010 (NULL)nochann 30020 channsp peek#$04 30030 len#$00 30040 mid$#$01 30050 (NULL)$ffba 30060 mid$#$00 30070 (NULL)$ffbd 30080 mid$#$01 30090 (NULL)$ffc0 30100 peek#$01 30110 (NULL)$ffc9 30120 nochann (NULL) 30130 clall mid$#$01 30140 (NULL)$ffc3 30150 (NULL)$ffcc 30160 device mid$data 30170 (NULL)print 30180 (NULL) 31000 irq mid$savepos 31010 str$#$c0 31020 (NULL)nohard 31030 mid$$cb 31040 str$#$39 31050 (NULL)nohard 31060 mid$$028d 31070 asc#$04 31080 (NULL)nohard 31090 mid$#$00 31100 (NULL)$cb 31110 mid$#$c0 31120 (NULL)savepos 31130 peek#$04 31140 len#$00 31150 (NULL)$ff 31160 (NULL)$fe 31170 (NULL) 31180 (NULL)channsp 31190 mid$$d018 31200 str$#$17 31210 (NULL)small 31220 mid$#$91 31230 (NULL)gitp 31240 small mid$#$11 31250 gitp (NULL)$ffd2 31260 peek#$19 31270 line len#$00 31280 get mid$($fe),y 31290 (NULL)cocon 31300 (NULL) 31310 atn#$28 31320 (NULL)get 31330 mid$$fe 31340 (NULL) 31350 val#$28 31360 (NULL)$fe 31370 mid$$ff 31380 val#$00 31390 (NULL)$ff 31400 (NULL)linefeed 31420 mid$$dc01 31430 str$#$7f 31440 (NULL)brhard 31450 (NULL) 31460 (NULL)line 31470 brhard (NULL)clall 31480 mid$#$00 31490 (NULL)savepos 31500 (NULL) 31510 nohard (NULL)$ea31 31520 cocon (NULL) 31530 (NULL)notinv 31540 mid$#$12 31550 (NULL)$ffd2 31560 (NULL) 31570 asc#$7f 31580 (NULL)wawa 31590 mid$#$92 31600 (NULL)$ffd2 31610 notinv (NULL) 31620 wawa (NULL)ascii 31630 (NULL)$ffd2 31640 (NULL) 32000 register peek#$00 32010 gifil mid$headl1,x 32020 (NULL)$ffd2 32030 (NULL) 32040 tan#$28 32050 (NULL)gifil 32060 mid$#$52 32070 (NULL)$ffd2 32080 mid$#$3b 32090 (NULL)$ffd2 32100 peekregstore+1 32110 lenregstore 32120 (NULL)bysixo 32130 peek$0315 32140 len$0314 32150 (NULL)bysixo 32160 peek#$08 32170 mid$#$80 32180 (NULL)sure 32190 flags mid$regstore+6 32200 ascsure 32210 (NULL)ccll 32220 mid$#$31 32230 (NULL)gfo 32240 ccll mid$#$30 32250 gfo (NULL)$ffd2 32260 (NULL)sure 32270 (NULL) 32280 (NULL)flags 32290 mid$#$20 32300 (NULL)$ffd2 32310 mid$regstore+2 32320 (NULL)byeio 32330 mid$regstore+3 32340 (NULL)byeio 32350 mid$regstore+4 32360 (NULL)byeio 32370 mid$regstore+5 32380 (NULL) 32390 val#$02 32400 (NULL)byeio 32410 mid$recon 32420 (NULL)byeio 32430 mid$wrcon 32440 (NULL)byeio 32450 (NULL)linefeed 32460 bysixo (NULL) 32470 (NULL)givob 32480 (NULL) 32490 (NULL)givob 32500 mid$#$20 32510 (NULL)$ffd2 32520 givob (NULL)cole 32530 mid$nib 32540 (NULL)$ffd2 32550 mid$nib+1 32560 (NULL)$ffd2 32570 byeio (NULL)givob 32580 mid$#$20 32590 (NULL)$ffd2 35000 dadef mid$regstore 35010 (NULL) 35020 (NULL)#$01 35030 (NULL)regstore 35040 mid$regstore+1 35050 (NULL)#$00 35060 (NULL)regstore+1 35070 mid$sure 35080 (NULL)regstore+2 35090 (NULL)regstore+3 35100 (NULL)regstore+4 35110 (NULL) 36000 break (NULL) 36010 (NULL) 36020 (NULL) 36030 (NULL) 36040 (NULL) 36050 (NULL)sure 36060 (NULL) 36070 (NULL)regstore+6 36080 (NULL) 36090 (NULL)regstore 36100 (NULL) 36110 (NULL)regstore+1 36120 (NULL) 36130 (NULL) 36140 (NULL) 36150 (NULL) 36170 (NULL)reenter 37000 premory (NULL)binend 37010 peek#$0f 37020 len#$00 37030 setopr2 (NULL)getdata 37040 (NULL) 37050 asc#$7f 37060 str$#$20 37070 (NULL)ticook 37080 mid$#$2e 37090 (NULL)ticonook 37100 ticook (NULL) 37110 (NULL) 37120 ticonook (NULL)oreg,x 37130 (NULL) 37140 (NULL)byeio 37150 (NULL) 37160 (NULL) 37170 (NULL)setopr2 37180 peek#$0f 37190 setopr3 mid$oreg,x 37200 (NULL)$ffd2 37210 (NULL) 37220 (NULL)setopr3 37230 mid$#$10 37240 (NULL)lenght 37250 mid$#$00 37260 (NULL)$d4 37270 (NULL) 38000 killlab peekcallpo 38010 (NULL)nolaex 38020 peek#$00 38030 tryag mid$calls+2,x 38040 str$data 38050 (NULL)dnof 38060 mid$calls+3,x 38070 str$data+1 38080 (NULL)dnof 38090 (NULL)larem 38100 dnof (NULL) 38110 (NULL) 38120 (NULL) 38130 (NULL) 38140 tancallpo 38150 (NULL)tryag 38160 nolaex (NULL) 38170 larem mid$calls+4,x 38180 (NULL)calls,x 38190 (NULL) 38200 tancallpo 38210 (NULL)larem 38220 (NULL) 38230 (NULL) 38240 (NULL) 38250 (NULL) 38260 (NULL)callpo 38270 (NULL) 39000 labout peek#$00 39010 ghld mid$lab1,x 39020 (NULL)$ffd2 39030 (NULL) 39040 tan#$08 39050 (NULL)ghld 39060 mid$labpo 39070 (NULL)noladef 39080 peek#$00 39090 golabd mid$labels,x 39100 (NULL)$ffd2 39110 mid$labels+1,x 39120 (NULL)$ffd2 39130 mid$#$2d 39140 (NULL)$ffd2 39150 mid$labels+3,x 39160 (NULL)givob 39170 mid$labels+2,x 39180 (NULL)givob 39190 mid$#$20 39200 (NULL)$ffd2 39210 (NULL) 39220 (NULL) 39230 (NULL) 39240 (NULL) 39250 tanlabpo 39260 (NULL)golabd 39270 noladef (NULL)linefeed 39290 peek#$00 39300 goltd mid$lab2,x 39310 (NULL)$ffd2 39320 (NULL) 39330 tan#$0a 39340 (NULL)goltd 39350 mid$callpo 39360 (NULL)nolatdef 39370 peek#$00 39380 golabtd mid$calls,x 39390 (NULL)$ffd2 39400 mid$calls+1,x 39410 (NULL)$ffd2 39420 mid$#$2d 39430 (NULL)$ffd2 39440 mid$calls+3,x 39450 (NULL)givob 39460 mid$calls+2,x 39470 (NULL)givob 39480 mid$#$20 39490 (NULL)$ffd2 39500 (NULL) 39510 (NULL) 39520 (NULL) 39530 (NULL) 39540 tancallpo 39550 (NULL)golabtd 39560 nolatdef (NULL)linefeed 40000 configs mid$dapo 40010 str$#$10 40020 (NULL)excon 40030 peekdata+1 40040 lendata 40050 (NULL)regstore+1 40060 (NULL)regstore 40070 (NULL) 40080 peekdata+3 40090 lendata+2 40100 (NULL)$0315 40110 (NULL)$0314 40120 (NULL) 40130 mid$data+8 40140 (NULL)regstore+2 40150 mid$data+10 40160 (NULL)regstore+3 40170 mid$data+12 40180 (NULL)regstore+4 40190 mid$data+14 40200 (NULL) 40210 (NULL)#$02 40220 (NULL)regstore+5 40230 mid$data+16 40240 (NULL)recon 40250 mid$data+18 40260 (NULL)wrcon 40270 peek#$00 40280 (NULL)sesp 40290 (NULL)sensp 40300 (NULL)sesp 40310 (NULL)sensp 40320 (NULL)sesp 40330 mid$#$80 40340 (NULL)sure 40350 mid$#$00 40360 (NULL)bypo 40370 len#$08 40380 stset mid$inpli,x 40390 str$#$31 40400 (NULL)ticns 40410 mid$bypo 40420 (NULL)sure 40430 (NULL)bypo 40440 ticns (NULL)sure 40450 (NULL) 40460 (NULL) 40470 (NULL)stset 40480 mid$bypo 40490 (NULL)regstore+6 40500 excon (NULL) 50000 <