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
|
2022-10-26
|
27KB
|
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 <