Home » Personal collection » Commodore disks » disk41a_autostereo.d64 » autocode2

autocode2

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Commodore disks » disk41a_autostereo.d64
Filename: autocode2
Read OK:
File size: 108D bytes
Load address: 0801
Exec address: 0000
File contents
    10 ; AUTOSTEREOGRAM GENERATOR
    20 ;
    30 ; 17/12/95
    40 ;
    50 *=$C200
    60 I=$CF00
    70 J=$CF01
    80 S=$CF02
    90 SEP=$CF03
   100 XPIXEL=$CF04
   110 YPIXEL=$CF05
   120 XPIB=$CF06
   130 YPIB=$CF07
   140 RNO=$CF08
   150 MULTIREG=$CF09
  1000 ;           GRAPHIC POINT PLOTTER
  1010 PLOTPC LDA #$47
  1020 STA $FB
  1030 LDA #$3F
  1040 STA $FC
  1050 LDA YPIXEL
  1060 LSR A
  1070 LSR A
  1080 LSR A
  1090 STA YPIB
  1100 AND #$03
  1110 ASL A
  1120 ASL A
  1130 ASL A
  1140 ASL A
  1150 ASL A
  1160 ASL A
  1170 STA $02
  1180 LDA $FB
  1190 SEC
  1200 SBC $02
  1210 STA $FB
  1220 LDA $FC
  1230 SBC #$00
  1240 SBC YPIB
  1250 PHA
  1260 LDA YPIB
  1270 LSR A
  1280 LSR A
  1290 STA $02
  1300 PLA
  1310 SEC
  1320 SBC $02
  1330 STA $FC
  1340 LDA YPIXEL
  1350 AND #$07
  1360 STA YPIB
  1370 LDA $FB
  1380 SEC
  1390 SBC YPIB
  1400 PHA
  1410 LDA XPIXEL
  1420 AND #$F8
  1430 STA YPIB
  1440 PLA
  1450 CLC
  1460 ADC YPIB
  1470 STA $FB
  1480 LDA $FC
  1490 SBC #$00
  1500 STA $FC
  1510 LDA XPIXEL
  1520 AND #$07
  1530 TAX
  1540 LDA #$80
  1550 GBITLP CPX #$00
  1560 BEQ PPCONT
  1570 LSR A
  1580 DEX
  1590 JMP GBITLP
  1600 PPCONT STA $FD
  1610 RTS
  1620 PLOTON JSR PLOTPC
  1630 LDY #$00
  1640 LDA ($FB),Y
  1650 ORA $FD
  1660 STA ($FB),Y
  1670 RTS
  1680 PLOTOFF JSR PLOTPC
  1690 LDA $FD
  1700 EOR #$FF
  1710 STA $FD
  1720 LDY #$00
  1730 LDA ($FB),Y
  1740 AND $FD
  1750 STA ($FB),Y
  1760 RTS
  1770 BWREAD JSR PLOTPC
  1780 LDY #$00
  1790 LDA ($FB),Y
  1800 AND $FD
  1810 BNE READPOS
  1815 LDA HINSTR
  1820 RTS
  1830 READPOS LDA HINSTR+1
  1840 RTS
  1850 READPIX LDA MULTIREG
  1860 BNE MULTIREAD
  1870 JMP BWREAD
  1880 MULTIREAD LDA XPIXEL
  1890 PHA
  1900 AND #$FE
  1910 STA XPIXEL
  1912 JSR PLOTPC
  1914 LDY #$00
  1916 LDA ($FB),Y
  1918 AND $FD
  1920 BEQ MRII
  1922 LDA #$02
  1924 MRII PHA
  1925 INC XPIXEL
  1926 JSR PLOTPC
  1928 LDY #$00
  1930 LDA ($FB),Y
  1932 AND $FD
  1934 BEQ MRIII
  1935 PLA
  1936 CLC
  1938 ADC #$01
  1939 PHA
  1940 MRIII PLA
  1941 TAX
  1942 PLA
  1944 STA XPIXEL
  1946 LDA HINSTR,X
  1948 RTS
  2000 ;                BITMAP ON ROUTINE
  2010 GRAPHIC LDA $D018
  2020 AND #$01
  2030 ORA #$18
  2040 STA $D018
  2050 LDA $DD02
  2060 ORA #$03
  2070 STA $DD02
  2080 LDA $DD00
  2090 AND #$FC
  2100 ORA #$03
  2110 STA $DD00
  2120 LDA $D011
  2130 ORA #$20
  2140 STA $D011
  2150 LDA #$04
  2160 STA $FC
  2170 LDY #$00
  2180 STY $FB
  2190 LDA #$01
  2200 GRLOP STA ($FB),Y
  2210 INY
  2220 BNE GRLOP
  2230 INC $FC
  2240 LDX $FC
  2250 CPX #$08
  2260 BNE GRLOP
  2270 LDA MULTIREG
  2280 BEQ NOCOLS
  2290 JMP IRQON
  2300 NOCOLS LDA $D016
  2310 AND #$EF
  2320 STA $D016
  2330 RTS
  3000 ;        AUTOSTEREOGRAM CALCULATOR
  3010 JOYSTEREO JSR GRAPHIC
  3020 LDA #$C7
  3030 STA YPIXEL
  3040 JOYLINE LDY #$00
  3050 STY $FB
  3060 LDA #$C0
  3070 STA $FC
  3080 LINELOP TYA
  3090 STA ($FB),Y
  3100 INY
  3110 BNE LINELOP
  3120 LDA #$00
  3130 STA XPIXEL
  3140 XLOP JSR READPIX
  3150 STA SEP
  3160 AND YPIXEL
  3170 AND #$01
  3180 CLC
  3190 ADC SEP
  3200 LSR A
  3210 STA I
  3220 LDA XPIXEL
  3230 SEC
  3240 SBC I
  3250 BCC XRELOP
  3260 STA I
  3270 CLC
  3280 ADC SEP
  3290 BCS XRELOP
  3300 STA J
  3310 REPEAT LDX I
  3320 LDA $C000,X
  3330 STA S
  3340 CMP J
  3350 BCS LLELSE
  3360 STA I
  3370 JMP L210
  3380 LLELSE LDA J
  3390 STA $C000,X
  3400 STA I
  3410 LDA S
  3420 STA J
  3430 L210 LDX I
  3440 LDA $C000,X
  3450 CMP I
  3460 BNE REPEAT
  3470 LDX J
  3480 LDA $C000,X
  3490 CMP J
  3500 BNE REPEAT
  3510 LDA J
  3520 LDX I
  3530 STA $C000,X
  3540 XRELOP LDX XPIXEL
  3550 INX
  3560 BEQ YRELOP
  3570 STX XPIXEL
  3580 JMP XLOP
  3590 YRELOP JSR DISP
  3600 DEC YPIXEL
  3610 LDA YPIXEL
  3620 BEQ JOYEND
  3630 JMP JOYLINE
  3640 JOYEND RTS
  3650 DISP LDA #$00
  3660 STA XPIXEL
  3670 DLOP TAX
  3680 LDA $C000,X
  3690 CMP XPIXEL
  3700 BNE DELSE
  3710 LDA RNO
  3720 LSR A
  3730 INC $A2
  3740 ADC $A2
  3750 LDX $A2
  3760 ADC $0000,X
  3770 STA RNO
  3780 AND #$01
  3790 LDX XPIXEL
  3800 STA $C100,X
  3810 JMP NELSE
  3820 DELSE LDA $C000,X
  3830 TAY
  3840 LDA $C100,Y
  3850 STA $C100,X
  3860 NELSE CMP #$00
  3870 BEQ NOBL
  3880 JSR PLOTON
  3885 JMP REDISP
  3890 NOBL JSR PLOTOFF
  3900 REDISP DEC XPIXEL
  3910 LDA XPIXEL
  3920 BNE DLOP
  3930 LDA MULTIREG
  3940 BEQ NOFF
  3950 JSR IRQOFF
  3960 NOFF RTS
  5000 ;               INTERRUPT ROUTINES
  5010 IRQ LDA #$01
  5012 STA $D019
  5014 LDA $D012
  5020 BEQ IRQTOP
  5030 LDY #$02
  5040 ILOP DEY
  5050 BNE ILOP
  5060 LDA $D016
  5070 ORA #$40
  5080 STA $D016
  5090 LDA #$00
  5100 STA $D012
  5110 JMP $EA81
  5120 IRQTOP LDA $D016
  5130 AND #$EF
  5140 STA $D016
  5143 LDA #$C7
  5146 SEC
  5150 SBC YPIXEL
  5160 CLC
  5170 ADC #$32
  5180 STA $D012
  5190 JMP $EA31
  5200 IRQOFF SEI
  5210 LDA #$31
  5220 STA $0314
  5230 LDA #$EA
  5240 STA $0315
  5250 LDA #$00
  5260 STA $D012
  5270 LDA $D016
  5280 AND #$BF
  5290 STA $D016
  5300 CLI
  5310 RTS
  5320 IRQON SEI
  5330 LDA #$01
  5340 STA $D019
  5350 STA $D01A
  5360 STA $DC0D
  5370 LDA #$3B
  5380 STA $D011
  5390 LDA #$00
  5400 STA $D012
  5410 LDA #<IRQ
  5420 STA $0314
  5430 LDA #>IRQ
  5440 STA $0315
  5450 CLI
  5460 RTS
  6000 HINSTR TXT $2D,$28,$24,$20

 
; AUTOSTEREOGRAM GENERATOR&;5; 17/12/95;(;G2��$C200S<I�$CF00_FJ�$CF01kPS�$CF02yZSEP�$CF03�dXPIXEL�$CF04�nYPIXEL�$CF05�xXPIB�$CF06��YPIB�$CF07��RNO�$CF08��MULTIREG�$CF09��;           GRAPHIC PO� PLOTTER	�PLOTPC LDA #$47	�STA $FB+	LDA #$3F7	STA $FCF	LDA YPIXELP	$LSR AZ	.LSR Ad	8LSR Aq	BSTA YPIB|	L� #$03�	VASL A�	`ASL A�	jASL A�	tASL A�	~ASL A�	�ASL A�	�STA $02�	�LDA $FB�	�SEC�	�SBC $02�	�STA $FB�	�LDA $FC	
�SBC #$00
�SBC YPIB
�PHA+
�LDA YPIB5
�LSR A?
LSR AK

STA $02S
PLA[
SECg
(SBC $02s
2STA $FC�
<LDA YPIXEL�
F� #$07�
PSTA YPIB�
ZLDA $FB�
dSEC�
nSBC YPIB�
xPHA�
�LDA XPIXEL�
�� #$F8�
�STA YPIB�
�PLA�
�CLC�ADC YPIB�STA $FB�LDA $FC,�SBC #$008�STA $FCG�LDA XPIXELR�� #$07Z�TAXgLDA #$80{GBITLP CPX #$00�BEQ PP��"LSR A�,DEX�6JMP GBITLP�@PP� STA $FD�JRTS�TPLO�N JSR PLOTPC�^LDY #$00�hLDA ($FB),Y�r�A $FD
|STA ($FB),Y�RTS+�PLO�FF JSR PLOTPC7�LDA $FDC�E� #$FFO�STA $FD\�LDY #$00l�LDA ($FB),Yv�� $FD��STA ($FB),Y��RTS��BW� JSR PLOTPC��LDY #$00��LDA ($FB),Y�� $FD�BNE ���LDA H��RTS�&�� LDA HԪ1�0RTS
:�PIX LDA MULTIREG#
DBNE MULTI�/
NJMP BW�E
XMULTI� LDA XPIXELM
bPHAX
l� #$FEg
vSTA XPIXELv
xJSR PLOTPC�
zLDY #$00�
|LDA ($FB),Y�
~� $FD�
�BEQ MRII�
�LDA #$02�
�MRII PHA�
�INC XPIXEL�
�JSR PLOTPC�
�LDY #$00�
�LDA ($FB),Y	�� $FD�BEQ MRIII�PLA'�CLC4�ADC #$01<�PHAJ�MRIII PLAR�TAXZ�PLAi�STA XPIXELv�LDA H�,X~�RTS��;                BITMAP ON ROUTINE��GRAPHIC LDA $D018��� #$01���A #$18��STA $D018�LDA $DD02��A #$03STA $DD02 LDA $DD00!*� #$FC-4�A #$03;>STA $DD00IHLDA $D011UR�A #$20c\STA $D011pfLDA #$04|pSTA $FC�zLDY #$00��STY $FB��LDA #$01��GRLOP STA ($FB),Y��INY��BNE GRLOP��INC $FC��LDX $FC��CPX #$08�BNE GRLOP�LDA MULTIREG!�BEQ NOCOLS.�JMP IRQ�C�NOCOLS LDA $D016N	� #$EF\	STA $D016d	RTS��;        AUTOSTEREOGRAM CALCULATOR���STEREO JSR GRAPHIC��LDA #$C7��STA YPIXEL���LINE LDY #$00��STY $FB��LDA #$C0��STA $FCLINELOP TYASTA ($FB),YINY/&BNE LINELOP<0LDA #$00K:STA XPIXEL]DXLOP JSR �PIXiNSTA SEPvX� YPIXEL�b� #$01�lCLC�vADC SEP��LSR A��STA I��LDA XPIXEL��SEC��SBC I��BCC XRELOP��STA I��CLC��ADC SEP�BCS XRELOP�STA J!�REPEAT LDX I1�LDA $C000,X;
STA SE
CMP JT
BCS LLELSE^ 
STA Ik*
JMP L210|4
LLELSE LDA J�>
STA $C000,X�H
STA I�R
LDA S�\
STA J�f
L210 LDX I�p
LDA $C000,X�z
CMP I��
BNE REPEAT��
LDX J��
LDA $C000,X�
CMP J�
BNE REPEAT�
LDA J)�
LDX I9�
STA $C000,XO�
XRELOP LDX XPIXELW�
INXf�
BEQ YRELOPu�
STX XPIXEL��
JMP XLOP�YRELOP JSR DISP�DEC YPIXEL�LDA YPIXEL�$BEQ π�.JMP �LINE�8π RTS�BDISP LDA #$00�LSTA XPIXELVDLOP TAX`LDA $C000,X%jCMP XPIXEL3tBNE DELSE?~LDA RNOI�LSR AU�INC $A2a�ADC $A2m�LDX $A2}�ADC $0000,X��STA RNO��� #$01��LDX XPIXEL��STA $C100,X��JMP NELSE��DELSE LDA $C000,X��TAY�LDA $C100,Y�
STA $C100,XNELSE CMP #$00BEQ NOBL-(JSR PLO�N<-JMP REDISPP2NOBL JSR PLO�FFf<REDISP DEC XPIXELuFLDA XPIXEL�PBNE DLOP�ZLDA MULTIREG�dBEQ NOFF�nJSR IRQOFF�xNOFF RTS��;               INTERRUPT ROUTINES��IRQ LDA #$01�STA $D019�LDA $D012�BEQ IRQ�P+�LDY #$028�ILOP DEYE�BNE ILOPS�LDA $D016_��A #$40m�STA $D016z�LDA #$00��STA $D012��JMP $EA81�IRQ�P LDA $D016�
� #$EF�STA $D016�LDA #$C7�SEC�SBC YPIXEL�(CLC�2ADC #$32
<STA $D012FJMP $EA31'PIRQOFF SEI4ZLDA #$31BdSTA $0314OnLDA #$EA]xSTA $0315j�LDA #$00x�STA $D012��LDA $D016��� #$BF��STA $D016��CLI��RTS��IRQ� SEI��LDA #$01��STA $D019��STA $D01A��STA $DC0D�LDA #$3BSTA $D011LDA #$00)STA $D0127"LDA #�IRQE,STA $0314S6LDA #�IRQa@STA $0315iJCLIqTRTS�pH� TXT $2D,$28,$24,$20
 HJ@; autostereogram generator@&HT@;@5H.@; 17/12/95@;H(@;@gH2@..$c200@sH<@i.$cf00@.Hf@j.$cf01@KHp@s.$cf02@YHz@sep.$cf03@.HD@xpixel.$cf04@.HN@ypixel.$cf05@.HX@xpib.$cf06@.H.@ypib.$cf07@.H.@rno.$cf08@.H.@multireg.$cf09@.H.C;           graphic po. plotter@RI.Cplotpc lda #$47@.I.Csta $fb@+IFDlda #$3f@7IPDsta $fc@fIZDlda ypixel@pI$Dlsr a@zI.Dlsr a@DI8Dlsr a@QIbDsta ypib@.IlD. #$03@.IvDasl a@.I.Dasl a@.IJDasl a@.ITDasl a@.I.Dasl a@.I.Dasl a@.I.Dsta $02@.I.Dlda $fb@.I.Dsec@.I.Dsbc $02@.I.Dsta $fb@.I.Dlda $fc@IJ.Dsbc #$00@VJ.Dsbc ypib@.J.Dpha@+J.Dlda ypib@5J.Dlsr a@?J@Elsr a@kJJEsta $02@sJTEpla@[J.Esec@GJ(Esbc $02@SJ2Esta $fc@.J<Elda ypixel@.JfE. #$07@.JpEsta ypib@.JzElda $fb@.JDEsec@.JNEsbc ypib@.JXEpha@.J.Elda xpixel@.J.E. #$f8@.J.Esta ypib@.J.Epla@.J.Eclc@GK.Eadc ypib@SK.Esta $fb@.K.Elda $fc@,K.Esbc #$00@8K.Esta $fc@gK.Elda xpixel@rK.E. #$07@zK.Etax@GKDFlda #$80@.KNFgbitlp cpx #$00@.KXFbeq pp.@.K"Flsr a@.K,Fdex@.K6Fjmp gbitlp@.K@Fpp. sta $fd@.KjFrts@.KtFplo.n jsr plotpc@.K.Fldy #$00@.KHFlda ($fb),y@.KRF.a $fd@ML.Fsta ($fb),y@UL.Frts@+L.Fplo.ff jsr plotpc@7L.Flda $fd@cL.Fe. #$ff@oL.Fsta $fd@£L.Fldy #$00@LL.Flda ($fb),y@VL.F. $fd@.L.Fsta ($fb),y@.L.Frts@.L.Fbw. jsr plotpc@.L.Fldy #$00@.L.Flda ($fb),y@.LHG. $fd@.LRGbne ..@.LWGlda h.@.L£Grts@.L&G.. lda h..1@.L0Grts@TM:G.pix lda multireg@#MdGbne multi.@/MnGjmp bw.@eMxGmulti. lda xpixel@mMBGpha@xMLG. #$fe@GMVGsta xpixel@VMXGjsr plotpc@.MZGldy #$00@.M.Glda ($fb),y@.M.G. $fd@.M.Gbeq mrii@.M.Glda #$02@.M.Gmrii pha@.M.Ginc xpixel@.M.Gjsr plotpc@.M.Gldy #$00@.M.Glda ($fb),y@IN.G. $fd@WN.Gbeq mriii@.N.Gpla@'N.Gclc@4N.Gadc #$01@<N.Gpha@jN.Gmriii pla@rN.Gtax@zN.Gpla@IN.Gsta xpixel@VN.Glda h.,x@.N.Grts@.N.G;                bitmap on routine@.N.Ggraphic lda $d018@.N.G. #$01@.N.G.a #$18@.N.Gsta $d018@.NBHlda $dd02@.NLH.a #$03@HOVHsta $dd02@VO Hlda $dd00@!O*H. #$fc@-O4H.a #$03@;O>Hsta $dd00@iOhHlda $d011@uOrH.a #$20@CO£Hsta $d011@POFHlda #$04@.OPHsta $fc@.OZHldy #$00@.O.Hsty $fb@.O.Hlda #$01@.O.Hgrlop sta ($fb),y@.O.Hiny@.O.Hbne grlop@.O.Hinc $fc@.O.Hldx $fc@.O.Hcpx #$08@AP.Hbne grlop@RP.Hlda multireg@!P.Hbeq nocols@.P.Hjmp irq.@cP.Hnocols lda $d016@nPFI. #$ef@£PPIsta $d016@DPZIrts@.P.K;        autostereogram calculator@.P.K.stereo jsr graphic@.P.Klda #$c7@.P.Ksta ypixel@.P.K.line ldy #$00@.P.Ksty $fb@.P.Klda #$c0@.P.Ksta $fc@GQHLlinelop tya@WQRLsta ($fb),y@.Q£Liny@/Q&Lbne linelop@<Q0Llda #$00@kQ:Lsta xpixel@]QdLxlop jsr .pix@IQnLsta sep@VQxL. ypixel@.QBL. #$01@.QLLclc@.QVLadc sep@.Q.Llsr a@.Q.Lsta i@.Q.Llda xpixel@.Q.Lsec@.Q.Lsbc i@.Q.Lbcc xrelop@.Q.Lsta i@.Q.Lclc@.Q.Ladc sep@FR.Lbcs xrelop@PR.Lsta j@!R.Lrepeat ldx i@1R.Llda $c000,x@;RBMsta s@eRLMcmp j@tRVMbcs llelse@.R Msta i@KR*Mjmp l210@.R4Mllelse lda j@.R>Msta $c000,x@.RhMsta i@.RrMlda s@.R£Msta j@.RFMl210 ldx i@.RPMlda $c000,x@.RZMcmp i@.R.Mbne repeat@.R.Mldx j@.R.Mlda $c000,x@FS.Mcmp j@US.Mbne repeat@.S.Mlda j@)S.Mldx i@9S.Msta $c000,x@oS.Mxrelop ldx xpixel@wS.Minx@FS.Mbeq yrelop@US.Mstx xpixel@.S.Mjmp xlop@.SFNyrelop jsr disp@.SPNdec ypixel@.SZNlda ypixel@.S$Nbeq ..@.S.Njmp .line@.S8N.. rts@.SbNdisp lda #$00@.SlNsta xpixel@FTvNdlop tax@VT.Nlda $c000,x@%TJNcmp xpixel@3TTNbne delse@?T.Nlda rno@iT.Nlsr a@uT.Ninc $a2@AT.Nadc $a2@MT.Nldx $a2@.T.Nadc $0000,x@.T.Nsta rno@.T.N. #$01@.T.Nldx xpixel@.T.Nsta $c100,x@.T.Njmp nelse@.T.Ndelse lda $c000,x@.T.Ntay@.T@Olda $c100,y@.TJOsta $c100,x@RUTOnelse cmp #$00@.U.Obeq nobl@-U(Ojsr plo.n@<U-Ojmp redisp@pU2Onobl jsr plo.ff@FU<Oredisp dec xpixel@UUfOlda xpixel@.UpObne dlop@.UzOlda multireg@.UDObeq noff@.UNOjsr irqoff@.UXOnoff rts@.U.S;               interrupt routines@.U.Sirq lda #$01@BV.Ssta $d019@PV.Slda $d012@.V.Sbeq irq.p@+V.Sldy #$02@8V.Silop dey@eV.Sbne ilop@sV.Slda $d016@.V.S.a #$40@MV.Ssta $d016@ZV.Slda #$00@.V.Ssta $d012@.V.Sjmp $ea81@.V@Tirq.p lda $d016@.VJT. #$ef@.VTTsta $d016@.VWTlda #$c7@.VZTsec@.V.Tsbc ypixel@.V(Tclc@.V2Tadc #$32@JW<Tsta $d012@XWfTjmp $ea31@'WpTirqoff sei@4WzTlda #$31@bWDTsta $0314@oWNTlda #$ea@]WXTsta $0315@JW.Tlda #$00@XW.Tsta $d012@.W.Tlda $d016@.W.T. #$bf@.W.Tsta $d016@.W.Tcli@.W.Trts@.W.Tirq. sei@.W.Tlda #$01@.W.Tsta $d019@.W.Tsta $d01a@.W.Tsta $dc0d@@X.Tlda #$3b@NXDUsta $d011@[XNUlda #$00@)XXUsta $d012@7X"Ulda #.irq@eX,Usta $0314@sX6Ulda #.irq@AX@Usta $0315@IXjUcli@QXtUrts@.XPWh. txt $2d,$28,$24,$20@@@
00000000  20 08 0a 00 3b 20 41 55  54 4f 53 54 45 52 45 4f  | ...; AUTOSTEREO|
00000010  47 52 41 4d 20 47 45 4e  45 52 41 54 4f 52 00 26  |GRAM GENERATOR.&|
00000020  08 14 00 3b 00 35 08 1e  00 3b 20 31 37 2f 31 32  |...;.5...; 17/12|
00000030  2f 39 35 00 3b 08 28 00  3b 00 47 08 32 00 ac b2  |/95.;.(.;.G.2...|
00000040  24 43 32 30 30 00 53 08  3c 00 49 b2 24 43 46 30  |$C200.S.<.I.$CF0|
00000050  30 00 5f 08 46 00 4a b2  24 43 46 30 31 00 6b 08  |0._.F.J.$CF01.k.|
00000060  50 00 53 b2 24 43 46 30  32 00 79 08 5a 00 53 45  |P.S.$CF02.y.Z.SE|
00000070  50 b2 24 43 46 30 33 00  8a 08 64 00 58 50 49 58  |P.$CF03...d.XPIX|
00000080  45 4c b2 24 43 46 30 34  00 9b 08 6e 00 59 50 49  |EL.$CF04...n.YPI|
00000090  58 45 4c b2 24 43 46 30  35 00 aa 08 78 00 58 50  |XEL.$CF05...x.XP|
000000a0  49 42 b2 24 43 46 30 36  00 b9 08 82 00 59 50 49  |IB.$CF06.....YPI|
000000b0  42 b2 24 43 46 30 37 00  c7 08 8c 00 52 4e 4f b2  |B.$CF07.....RNO.|
000000c0  24 43 46 30 38 00 da 08  96 00 4d 55 4c 54 49 52  |$CF08.....MULTIR|
000000d0  45 47 b2 24 43 46 30 39  00 fe 08 e8 03 3b 20 20  |EG.$CF09.....;  |
000000e0  20 20 20 20 20 20 20 20  20 47 52 41 50 48 49 43  |         GRAPHIC|
000000f0  20 50 4f b5 20 50 4c 4f  54 54 45 52 00 12 09 f2  | PO. PLOTTER....|
00000100  03 50 4c 4f 54 50 43 20  4c 44 41 20 23 24 34 37  |.PLOTPC LDA #$47|
00000110  00 1e 09 fc 03 53 54 41  20 24 46 42 00 2b 09 06  |.....STA $FB.+..|
00000120  04 4c 44 41 20 23 24 33  46 00 37 09 10 04 53 54  |.LDA #$3F.7...ST|
00000130  41 20 24 46 43 00 46 09  1a 04 4c 44 41 20 59 50  |A $FC.F...LDA YP|
00000140  49 58 45 4c 00 50 09 24  04 4c 53 52 20 41 00 5a  |IXEL.P.$.LSR A.Z|
00000150  09 2e 04 4c 53 52 20 41  00 64 09 38 04 4c 53 52  |...LSR A.d.8.LSR|
00000160  20 41 00 71 09 42 04 53  54 41 20 59 50 49 42 00  | A.q.B.STA YPIB.|
00000170  7c 09 4c 04 af 20 23 24  30 33 00 86 09 56 04 41  ||.L.. #$03...V.A|
00000180  53 4c 20 41 00 90 09 60  04 41 53 4c 20 41 00 9a  |SL A...`.ASL A..|
00000190  09 6a 04 41 53 4c 20 41  00 a4 09 74 04 41 53 4c  |.j.ASL A...t.ASL|
000001a0  20 41 00 ae 09 7e 04 41  53 4c 20 41 00 b8 09 88  | A...~.ASL A....|
000001b0  04 41 53 4c 20 41 00 c4  09 92 04 53 54 41 20 24  |.ASL A.....STA $|
000001c0  30 32 00 d0 09 9c 04 4c  44 41 20 24 46 42 00 d8  |02.....LDA $FB..|
000001d0  09 a6 04 53 45 43 00 e4  09 b0 04 53 42 43 20 24  |...SEC.....SBC $|
000001e0  30 32 00 f0 09 ba 04 53  54 41 20 24 46 42 00 fc  |02.....STA $FB..|
000001f0  09 c4 04 4c 44 41 20 24  46 43 00 09 0a ce 04 53  |...LDA $FC.....S|
00000200  42 43 20 23 24 30 30 00  16 0a d8 04 53 42 43 20  |BC #$00.....SBC |
00000210  59 50 49 42 00 1e 0a e2  04 50 48 41 00 2b 0a ec  |YPIB.....PHA.+..|
00000220  04 4c 44 41 20 59 50 49  42 00 35 0a f6 04 4c 53  |.LDA YPIB.5...LS|
00000230  52 20 41 00 3f 0a 00 05  4c 53 52 20 41 00 4b 0a  |R A.?...LSR A.K.|
00000240  0a 05 53 54 41 20 24 30  32 00 53 0a 14 05 50 4c  |..STA $02.S...PL|
00000250  41 00 5b 0a 1e 05 53 45  43 00 67 0a 28 05 53 42  |A.[...SEC.g.(.SB|
00000260  43 20 24 30 32 00 73 0a  32 05 53 54 41 20 24 46  |C $02.s.2.STA $F|
00000270  43 00 82 0a 3c 05 4c 44  41 20 59 50 49 58 45 4c  |C...<.LDA YPIXEL|
00000280  00 8d 0a 46 05 af 20 23  24 30 37 00 9a 0a 50 05  |...F.. #$07...P.|
00000290  53 54 41 20 59 50 49 42  00 a6 0a 5a 05 4c 44 41  |STA YPIB...Z.LDA|
000002a0  20 24 46 42 00 ae 0a 64  05 53 45 43 00 bb 0a 6e  | $FB...d.SEC...n|
000002b0  05 53 42 43 20 59 50 49  42 00 c3 0a 78 05 50 48  |.SBC YPIB...x.PH|
000002c0  41 00 d2 0a 82 05 4c 44  41 20 58 50 49 58 45 4c  |A.....LDA XPIXEL|
000002d0  00 dd 0a 8c 05 af 20 23  24 46 38 00 ea 0a 96 05  |...... #$F8.....|
000002e0  53 54 41 20 59 50 49 42  00 f2 0a a0 05 50 4c 41  |STA YPIB.....PLA|
000002f0  00 fa 0a aa 05 43 4c 43  00 07 0b b4 05 41 44 43  |.....CLC.....ADC|
00000300  20 59 50 49 42 00 13 0b  be 05 53 54 41 20 24 46  | YPIB.....STA $F|
00000310  42 00 1f 0b c8 05 4c 44  41 20 24 46 43 00 2c 0b  |B.....LDA $FC.,.|
00000320  d2 05 53 42 43 20 23 24  30 30 00 38 0b dc 05 53  |..SBC #$00.8...S|
00000330  54 41 20 24 46 43 00 47  0b e6 05 4c 44 41 20 58  |TA $FC.G...LDA X|
00000340  50 49 58 45 4c 00 52 0b  f0 05 af 20 23 24 30 37  |PIXEL.R.... #$07|
00000350  00 5a 0b fa 05 54 41 58  00 67 0b 04 06 4c 44 41  |.Z...TAX.g...LDA|
00000360  20 23 24 38 30 00 7b 0b  0e 06 47 42 49 54 4c 50  | #$80.{...GBITLP|
00000370  20 43 50 58 20 23 24 30  30 00 87 0b 18 06 42 45  | CPX #$00.....BE|
00000380  51 20 50 50 9a 00 91 0b  22 06 4c 53 52 20 41 00  |Q PP....".LSR A.|
00000390  99 0b 2c 06 44 45 58 00  a8 0b 36 06 4a 4d 50 20  |..,.DEX...6.JMP |
000003a0  47 42 49 54 4c 50 00 b8  0b 40 06 50 50 9a 20 53  |GBITLP...@.PP. S|
000003b0  54 41 20 24 46 44 00 c0  0b 4a 06 52 54 53 00 d5  |TA $FD...J.RTS..|
000003c0  0b 54 06 50 4c 4f a4 4e  20 4a 53 52 20 50 4c 4f  |.T.PLO.N JSR PLO|
000003d0  54 50 43 00 e2 0b 5e 06  4c 44 59 20 23 24 30 30  |TPC...^.LDY #$00|
000003e0  00 f2 0b 68 06 4c 44 41  20 28 24 46 42 29 2c 59  |...h.LDA ($FB),Y|
000003f0  00 fd 0b 72 06 b0 41 20  24 46 44 00 0d 0c 7c 06  |...r..A $FD...|.|
00000400  53 54 41 20 28 24 46 42  29 2c 59 00 15 0c 86 06  |STA ($FB),Y.....|
00000410  52 54 53 00 2b 0c 90 06  50 4c 4f a4 46 46 20 4a  |RTS.+...PLO.FF J|
00000420  53 52 20 50 4c 4f 54 50  43 00 37 0c 9a 06 4c 44  |SR PLOTPC.7...LD|
00000430  41 20 24 46 44 00 43 0c  a4 06 45 b0 20 23 24 46  |A $FD.C...E. #$F|
00000440  46 00 4f 0c ae 06 53 54  41 20 24 46 44 00 5c 0c  |F.O...STA $FD.\.|
00000450  b8 06 4c 44 59 20 23 24  30 30 00 6c 0c c2 06 4c  |..LDY #$00.l...L|
00000460  44 41 20 28 24 46 42 29  2c 59 00 76 0c cc 06 af  |DA ($FB),Y.v....|
00000470  20 24 46 44 00 86 0c d6  06 53 54 41 20 28 24 46  | $FD.....STA ($F|
00000480  42 29 2c 59 00 8e 0c e0  06 52 54 53 00 a1 0c ea  |B),Y.....RTS....|
00000490  06 42 57 87 20 4a 53 52  20 50 4c 4f 54 50 43 00  |.BW. JSR PLOTPC.|
000004a0  ae 0c f4 06 4c 44 59 20  23 24 30 30 00 be 0c fe  |....LDY #$00....|
000004b0  06 4c 44 41 20 28 24 46  42 29 2c 59 00 c8 0c 08  |.LDA ($FB),Y....|
000004c0  07 af 20 24 46 44 00 d3  0c 12 07 42 4e 45 20 87  |.. $FD.....BNE .|
000004d0  b9 00 de 0c 17 07 4c 44  41 20 48 d4 00 e6 0c 1c  |......LDA H.....|
000004e0  07 52 54 53 00 f6 0c 26  07 87 b9 20 4c 44 41 20  |.RTS...&... LDA |
000004f0  48 d4 aa 31 00 fe 0c 30  07 52 54 53 00 14 0d 3a  |H..1...0.RTS...:|
00000500  07 87 50 49 58 20 4c 44  41 20 4d 55 4c 54 49 52  |..PIX LDA MULTIR|
00000510  45 47 00 23 0d 44 07 42  4e 45 20 4d 55 4c 54 49  |EG.#.D.BNE MULTI|
00000520  87 00 2f 0d 4e 07 4a 4d  50 20 42 57 87 00 45 0d  |../.N.JMP BW..E.|
00000530  58 07 4d 55 4c 54 49 87  20 4c 44 41 20 58 50 49  |X.MULTI. LDA XPI|
00000540  58 45 4c 00 4d 0d 62 07  50 48 41 00 58 0d 6c 07  |XEL.M.b.PHA.X.l.|
00000550  af 20 23 24 46 45 00 67  0d 76 07 53 54 41 20 58  |. #$FE.g.v.STA X|
00000560  50 49 58 45 4c 00 76 0d  78 07 4a 53 52 20 50 4c  |PIXEL.v.x.JSR PL|
00000570  4f 54 50 43 00 83 0d 7a  07 4c 44 59 20 23 24 30  |OTPC...z.LDY #$0|
00000580  30 00 93 0d 7c 07 4c 44  41 20 28 24 46 42 29 2c  |0...|.LDA ($FB),|
00000590  59 00 9d 0d 7e 07 af 20  24 46 44 00 aa 0d 80 07  |Y...~.. $FD.....|
000005a0  42 45 51 20 4d 52 49 49  00 b7 0d 82 07 4c 44 41  |BEQ MRII.....LDA|
000005b0  20 23 24 30 32 00 c4 0d  84 07 4d 52 49 49 20 50  | #$02.....MRII P|
000005c0  48 41 00 d3 0d 85 07 49  4e 43 20 58 50 49 58 45  |HA.....INC XPIXE|
000005d0  4c 00 e2 0d 86 07 4a 53  52 20 50 4c 4f 54 50 43  |L.....JSR PLOTPC|
000005e0  00 ef 0d 88 07 4c 44 59  20 23 24 30 30 00 ff 0d  |.....LDY #$00...|
000005f0  8a 07 4c 44 41 20 28 24  46 42 29 2c 59 00 09 0e  |..LDA ($FB),Y...|
00000600  8c 07 af 20 24 46 44 00  17 0e 8e 07 42 45 51 20  |... $FD.....BEQ |
00000610  4d 52 49 49 49 00 1f 0e  8f 07 50 4c 41 00 27 0e  |MRIII.....PLA.'.|
00000620  90 07 43 4c 43 00 34 0e  92 07 41 44 43 20 23 24  |..CLC.4...ADC #$|
00000630  30 31 00 3c 0e 93 07 50  48 41 00 4a 0e 94 07 4d  |01.<...PHA.J...M|
00000640  52 49 49 49 20 50 4c 41  00 52 0e 95 07 54 41 58  |RIII PLA.R...TAX|
00000650  00 5a 0e 96 07 50 4c 41  00 69 0e 98 07 53 54 41  |.Z...PLA.i...STA|
00000660  20 58 50 49 58 45 4c 00  76 0e 9a 07 4c 44 41 20  | XPIXEL.v...LDA |
00000670  48 d4 2c 58 00 7e 0e 9c  07 52 54 53 00 a5 0e d0  |H.,X.~...RTS....|
00000680  07 3b 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.;              |
00000690  20 20 42 49 54 4d 41 50  20 4f 4e 20 52 4f 55 54  |  BITMAP ON ROUT|
000006a0  49 4e 45 00 bb 0e da 07  47 52 41 50 48 49 43 20  |INE.....GRAPHIC |
000006b0  4c 44 41 20 24 44 30 31  38 00 c6 0e e4 07 af 20  |LDA $D018...... |
000006c0  23 24 30 31 00 d2 0e ee  07 b0 41 20 23 24 31 38  |#$01......A #$18|
000006d0  00 e0 0e f8 07 53 54 41  20 24 44 30 31 38 00 ee  |.....STA $D018..|
000006e0  0e 02 08 4c 44 41 20 24  44 44 30 32 00 fa 0e 0c  |...LDA $DD02....|
000006f0  08 b0 41 20 23 24 30 33  00 08 0f 16 08 53 54 41  |..A #$03.....STA|
00000700  20 24 44 44 30 32 00 16  0f 20 08 4c 44 41 20 24  | $DD02... .LDA $|
00000710  44 44 30 30 00 21 0f 2a  08 af 20 23 24 46 43 00  |DD00.!.*.. #$FC.|
00000720  2d 0f 34 08 b0 41 20 23  24 30 33 00 3b 0f 3e 08  |-.4..A #$03.;.>.|
00000730  53 54 41 20 24 44 44 30  30 00 49 0f 48 08 4c 44  |STA $DD00.I.H.LD|
00000740  41 20 24 44 30 31 31 00  55 0f 52 08 b0 41 20 23  |A $D011.U.R..A #|
00000750  24 32 30 00 63 0f 5c 08  53 54 41 20 24 44 30 31  |$20.c.\.STA $D01|
00000760  31 00 70 0f 66 08 4c 44  41 20 23 24 30 34 00 7c  |1.p.f.LDA #$04.||
00000770  0f 70 08 53 54 41 20 24  46 43 00 89 0f 7a 08 4c  |.p.STA $FC...z.L|
00000780  44 59 20 23 24 30 30 00  95 0f 84 08 53 54 59 20  |DY #$00.....STY |
00000790  24 46 42 00 a2 0f 8e 08  4c 44 41 20 23 24 30 31  |$FB.....LDA #$01|
000007a0  00 b8 0f 98 08 47 52 4c  4f 50 20 53 54 41 20 28  |.....GRLOP STA (|
000007b0  24 46 42 29 2c 59 00 c0  0f a2 08 49 4e 59 00 ce  |$FB),Y.....INY..|
000007c0  0f ac 08 42 4e 45 20 47  52 4c 4f 50 00 da 0f b6  |...BNE GRLOP....|
000007d0  08 49 4e 43 20 24 46 43  00 e6 0f c0 08 4c 44 58  |.INC $FC.....LDX|
000007e0  20 24 46 43 00 f3 0f ca  08 43 50 58 20 23 24 30  | $FC.....CPX #$0|
000007f0  38 00 01 10 d4 08 42 4e  45 20 47 52 4c 4f 50 00  |8.....BNE GRLOP.|
00000800  12 10 de 08 4c 44 41 20  4d 55 4c 54 49 52 45 47  |....LDA MULTIREG|
00000810  00 21 10 e8 08 42 45 51  20 4e 4f 43 4f 4c 53 00  |.!...BEQ NOCOLS.|
00000820  2e 10 f2 08 4a 4d 50 20  49 52 51 91 00 43 10 fc  |....JMP IRQ..C..|
00000830  08 4e 4f 43 4f 4c 53 20  4c 44 41 20 24 44 30 31  |.NOCOLS LDA $D01|
00000840  36 00 4e 10 06 09 af 20  23 24 45 46 00 5c 10 10  |6.N.... #$EF.\..|
00000850  09 53 54 41 20 24 44 30  31 36 00 64 10 1a 09 52  |.STA $D016.d...R|
00000860  54 53 00 8b 10 b8 0b 3b  20 20 20 20 20 20 20 20  |TS.....;        |
00000870  41 55 54 4f 53 54 45 52  45 4f 47 52 41 4d 20 43  |AUTOSTEREOGRAM C|
00000880  41 4c 43 55 4c 41 54 4f  52 00 a3 10 c2 0b cf 53  |ALCULATOR......S|
00000890  54 45 52 45 4f 20 4a 53  52 20 47 52 41 50 48 49  |TEREO JSR GRAPHI|
000008a0  43 00 b0 10 cc 0b 4c 44  41 20 23 24 43 37 00 bf  |C.....LDA #$C7..|
000008b0  10 d6 0b 53 54 41 20 59  50 49 58 45 4c 00 d2 10  |...STA YPIXEL...|
000008c0  e0 0b cf 4c 49 4e 45 20  4c 44 59 20 23 24 30 30  |...LINE LDY #$00|
000008d0  00 de 10 ea 0b 53 54 59  20 24 46 42 00 eb 10 f4  |.....STY $FB....|
000008e0  0b 4c 44 41 20 23 24 43  30 00 f7 10 fe 0b 53 54  |.LDA #$C0.....ST|
000008f0  41 20 24 46 43 00 07 11  08 0c 4c 49 4e 45 4c 4f  |A $FC.....LINELO|
00000900  50 20 54 59 41 00 17 11  12 0c 53 54 41 20 28 24  |P TYA.....STA ($|
00000910  46 42 29 2c 59 00 1f 11  1c 0c 49 4e 59 00 2f 11  |FB),Y.....INY./.|
00000920  26 0c 42 4e 45 20 4c 49  4e 45 4c 4f 50 00 3c 11  |&.BNE LINELOP.<.|
00000930  30 0c 4c 44 41 20 23 24  30 30 00 4b 11 3a 0c 53  |0.LDA #$00.K.:.S|
00000940  54 41 20 58 50 49 58 45  4c 00 5d 11 44 0c 58 4c  |TA XPIXEL.].D.XL|
00000950  4f 50 20 4a 53 52 20 87  50 49 58 00 69 11 4e 0c  |OP JSR .PIX.i.N.|
00000960  53 54 41 20 53 45 50 00  76 11 58 0c af 20 59 50  |STA SEP.v.X.. YP|
00000970  49 58 45 4c 00 81 11 62  0c af 20 23 24 30 31 00  |IXEL...b.. #$01.|
00000980  89 11 6c 0c 43 4c 43 00  95 11 76 0c 41 44 43 20  |..l.CLC...v.ADC |
00000990  53 45 50 00 9f 11 80 0c  4c 53 52 20 41 00 a9 11  |SEP.....LSR A...|
000009a0  8a 0c 53 54 41 20 49 00  b8 11 94 0c 4c 44 41 20  |..STA I.....LDA |
000009b0  58 50 49 58 45 4c 00 c0  11 9e 0c 53 45 43 00 ca  |XPIXEL.....SEC..|
000009c0  11 a8 0c 53 42 43 20 49  00 d9 11 b2 0c 42 43 43  |...SBC I.....BCC|
000009d0  20 58 52 45 4c 4f 50 00  e3 11 bc 0c 53 54 41 20  | XRELOP.....STA |
000009e0  49 00 eb 11 c6 0c 43 4c  43 00 f7 11 d0 0c 41 44  |I.....CLC.....AD|
000009f0  43 20 53 45 50 00 06 12  da 0c 42 43 53 20 58 52  |C SEP.....BCS XR|
00000a00  45 4c 4f 50 00 10 12 e4  0c 53 54 41 20 4a 00 21  |ELOP.....STA J.!|
00000a10  12 ee 0c 52 45 50 45 41  54 20 4c 44 58 20 49 00  |...REPEAT LDX I.|
00000a20  31 12 f8 0c 4c 44 41 20  24 43 30 30 30 2c 58 00  |1...LDA $C000,X.|
00000a30  3b 12 02 0d 53 54 41 20  53 00 45 12 0c 0d 43 4d  |;...STA S.E...CM|
00000a40  50 20 4a 00 54 12 16 0d  42 43 53 20 4c 4c 45 4c  |P J.T...BCS LLEL|
00000a50  53 45 00 5e 12 20 0d 53  54 41 20 49 00 6b 12 2a  |SE.^. .STA I.k.*|
00000a60  0d 4a 4d 50 20 4c 32 31  30 00 7c 12 34 0d 4c 4c  |.JMP L210.|.4.LL|
00000a70  45 4c 53 45 20 4c 44 41  20 4a 00 8c 12 3e 0d 53  |ELSE LDA J...>.S|
00000a80  54 41 20 24 43 30 30 30  2c 58 00 96 12 48 0d 53  |TA $C000,X...H.S|
00000a90  54 41 20 49 00 a0 12 52  0d 4c 44 41 20 53 00 aa  |TA I...R.LDA S..|
00000aa0  12 5c 0d 53 54 41 20 4a  00 b9 12 66 0d 4c 32 31  |.\.STA J...f.L21|
00000ab0  30 20 4c 44 58 20 49 00  c9 12 70 0d 4c 44 41 20  |0 LDX I...p.LDA |
00000ac0  24 43 30 30 30 2c 58 00  d3 12 7a 0d 43 4d 50 20  |$C000,X...z.CMP |
00000ad0  49 00 e2 12 84 0d 42 4e  45 20 52 45 50 45 41 54  |I.....BNE REPEAT|
00000ae0  00 ec 12 8e 0d 4c 44 58  20 4a 00 fc 12 98 0d 4c  |.....LDX J.....L|
00000af0  44 41 20 24 43 30 30 30  2c 58 00 06 13 a2 0d 43  |DA $C000,X.....C|
00000b00  4d 50 20 4a 00 15 13 ac  0d 42 4e 45 20 52 45 50  |MP J.....BNE REP|
00000b10  45 41 54 00 1f 13 b6 0d  4c 44 41 20 4a 00 29 13  |EAT.....LDA J.).|
00000b20  c0 0d 4c 44 58 20 49 00  39 13 ca 0d 53 54 41 20  |..LDX I.9...STA |
00000b30  24 43 30 30 30 2c 58 00  4f 13 d4 0d 58 52 45 4c  |$C000,X.O...XREL|
00000b40  4f 50 20 4c 44 58 20 58  50 49 58 45 4c 00 57 13  |OP LDX XPIXEL.W.|
00000b50  de 0d 49 4e 58 00 66 13  e8 0d 42 45 51 20 59 52  |..INX.f...BEQ YR|
00000b60  45 4c 4f 50 00 75 13 f2  0d 53 54 58 20 58 50 49  |ELOP.u...STX XPI|
00000b70  58 45 4c 00 82 13 fc 0d  4a 4d 50 20 58 4c 4f 50  |XEL.....JMP XLOP|
00000b80  00 96 13 06 0e 59 52 45  4c 4f 50 20 4a 53 52 20  |.....YRELOP JSR |
00000b90  44 49 53 50 00 a5 13 10  0e 44 45 43 20 59 50 49  |DISP.....DEC YPI|
00000ba0  58 45 4c 00 b4 13 1a 0e  4c 44 41 20 59 50 49 58  |XEL.....LDA YPIX|
00000bb0  45 4c 00 bf 13 24 0e 42  45 51 20 cf 80 00 cd 13  |EL...$.BEQ .....|
00000bc0  2e 0e 4a 4d 50 20 cf 4c  49 4e 45 00 d8 13 38 0e  |..JMP .LINE...8.|
00000bd0  cf 80 20 52 54 53 00 ea  13 42 0e 44 49 53 50 20  |.. RTS...B.DISP |
00000be0  4c 44 41 20 23 24 30 30  00 f9 13 4c 0e 53 54 41  |LDA #$00...L.STA|
00000bf0  20 58 50 49 58 45 4c 00  06 14 56 0e 44 4c 4f 50  | XPIXEL...V.DLOP|
00000c00  20 54 41 58 00 16 14 60  0e 4c 44 41 20 24 43 30  | TAX...`.LDA $C0|
00000c10  30 30 2c 58 00 25 14 6a  0e 43 4d 50 20 58 50 49  |00,X.%.j.CMP XPI|
00000c20  58 45 4c 00 33 14 74 0e  42 4e 45 20 44 45 4c 53  |XEL.3.t.BNE DELS|
00000c30  45 00 3f 14 7e 0e 4c 44  41 20 52 4e 4f 00 49 14  |E.?.~.LDA RNO.I.|
00000c40  88 0e 4c 53 52 20 41 00  55 14 92 0e 49 4e 43 20  |..LSR A.U...INC |
00000c50  24 41 32 00 61 14 9c 0e  41 44 43 20 24 41 32 00  |$A2.a...ADC $A2.|
00000c60  6d 14 a6 0e 4c 44 58 20  24 41 32 00 7d 14 b0 0e  |m...LDX $A2.}...|
00000c70  41 44 43 20 24 30 30 30  30 2c 58 00 89 14 ba 0e  |ADC $0000,X.....|
00000c80  53 54 41 20 52 4e 4f 00  94 14 c4 0e af 20 23 24  |STA RNO...... #$|
00000c90  30 31 00 a3 14 ce 0e 4c  44 58 20 58 50 49 58 45  |01.....LDX XPIXE|
00000ca0  4c 00 b3 14 d8 0e 53 54  41 20 24 43 31 30 30 2c  |L.....STA $C100,|
00000cb0  58 00 c1 14 e2 0e 4a 4d  50 20 4e 45 4c 53 45 00  |X.....JMP NELSE.|
00000cc0  d7 14 ec 0e 44 45 4c 53  45 20 4c 44 41 20 24 43  |....DELSE LDA $C|
00000cd0  30 30 30 2c 58 00 df 14  f6 0e 54 41 59 00 ef 14  |000,X.....TAY...|
00000ce0  00 0f 4c 44 41 20 24 43  31 30 30 2c 59 00 ff 14  |..LDA $C100,Y...|
00000cf0  0a 0f 53 54 41 20 24 43  31 30 30 2c 58 00 12 15  |..STA $C100,X...|
00000d00  14 0f 4e 45 4c 53 45 20  43 4d 50 20 23 24 30 30  |..NELSE CMP #$00|
00000d10  00 1f 15 1e 0f 42 45 51  20 4e 4f 42 4c 00 2d 15  |.....BEQ NOBL.-.|
00000d20  28 0f 4a 53 52 20 50 4c  4f a4 4e 00 3c 15 2d 0f  |(.JSR PLO.N.<.-.|
00000d30  4a 4d 50 20 52 45 44 49  53 50 00 50 15 32 0f 4e  |JMP REDISP.P.2.N|
00000d40  4f 42 4c 20 4a 53 52 20  50 4c 4f a4 46 46 00 66  |OBL JSR PLO.FF.f|
00000d50  15 3c 0f 52 45 44 49 53  50 20 44 45 43 20 58 50  |.<.REDISP DEC XP|
00000d60  49 58 45 4c 00 75 15 46  0f 4c 44 41 20 58 50 49  |IXEL.u.F.LDA XPI|
00000d70  58 45 4c 00 82 15 50 0f  42 4e 45 20 44 4c 4f 50  |XEL...P.BNE DLOP|
00000d80  00 93 15 5a 0f 4c 44 41  20 4d 55 4c 54 49 52 45  |...Z.LDA MULTIRE|
00000d90  47 00 a0 15 64 0f 42 45  51 20 4e 4f 46 46 00 af  |G...d.BEQ NOFF..|
00000da0  15 6e 0f 4a 53 52 20 49  52 51 4f 46 46 00 bc 15  |.n.JSR IRQOFF...|
00000db0  78 0f 4e 4f 46 46 20 52  54 53 00 e3 15 88 13 3b  |x.NOFF RTS.....;|
00000dc0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 49  |               I|
00000dd0  4e 54 45 52 52 55 50 54  20 52 4f 55 54 49 4e 45  |NTERRUPT ROUTINE|
00000de0  53 00 f4 15 92 13 49 52  51 20 4c 44 41 20 23 24  |S.....IRQ LDA #$|
00000df0  30 31 00 02 16 94 13 53  54 41 20 24 44 30 31 39  |01.....STA $D019|
00000e00  00 10 16 96 13 4c 44 41  20 24 44 30 31 32 00 1e  |.....LDA $D012..|
00000e10  16 9c 13 42 45 51 20 49  52 51 a4 50 00 2b 16 a6  |...BEQ IRQ.P.+..|
00000e20  13 4c 44 59 20 23 24 30  32 00 38 16 b0 13 49 4c  |.LDY #$02.8...IL|
00000e30  4f 50 20 44 45 59 00 45  16 ba 13 42 4e 45 20 49  |OP DEY.E...BNE I|
00000e40  4c 4f 50 00 53 16 c4 13  4c 44 41 20 24 44 30 31  |LOP.S...LDA $D01|
00000e50  36 00 5f 16 ce 13 b0 41  20 23 24 34 30 00 6d 16  |6._....A #$40.m.|
00000e60  d8 13 53 54 41 20 24 44  30 31 36 00 7a 16 e2 13  |..STA $D016.z...|
00000e70  4c 44 41 20 23 24 30 30  00 88 16 ec 13 53 54 41  |LDA #$00.....STA|
00000e80  20 24 44 30 31 32 00 96  16 f6 13 4a 4d 50 20 24  | $D012.....JMP $|
00000e90  45 41 38 31 00 aa 16 00  14 49 52 51 a4 50 20 4c  |EA81.....IRQ.P L|
00000ea0  44 41 20 24 44 30 31 36  00 b5 16 0a 14 af 20 23  |DA $D016...... #|
00000eb0  24 45 46 00 c3 16 14 14  53 54 41 20 24 44 30 31  |$EF.....STA $D01|
00000ec0  36 00 d0 16 17 14 4c 44  41 20 23 24 43 37 00 d8  |6.....LDA #$C7..|
00000ed0  16 1a 14 53 45 43 00 e7  16 1e 14 53 42 43 20 59  |...SEC.....SBC Y|
00000ee0  50 49 58 45 4c 00 ef 16  28 14 43 4c 43 00 fc 16  |PIXEL...(.CLC...|
00000ef0  32 14 41 44 43 20 23 24  33 32 00 0a 17 3c 14 53  |2.ADC #$32...<.S|
00000f00  54 41 20 24 44 30 31 32  00 18 17 46 14 4a 4d 50  |TA $D012...F.JMP|
00000f10  20 24 45 41 33 31 00 27  17 50 14 49 52 51 4f 46  | $EA31.'.P.IRQOF|
00000f20  46 20 53 45 49 00 34 17  5a 14 4c 44 41 20 23 24  |F SEI.4.Z.LDA #$|
00000f30  33 31 00 42 17 64 14 53  54 41 20 24 30 33 31 34  |31.B.d.STA $0314|
00000f40  00 4f 17 6e 14 4c 44 41  20 23 24 45 41 00 5d 17  |.O.n.LDA #$EA.].|
00000f50  78 14 53 54 41 20 24 30  33 31 35 00 6a 17 82 14  |x.STA $0315.j...|
00000f60  4c 44 41 20 23 24 30 30  00 78 17 8c 14 53 54 41  |LDA #$00.x...STA|
00000f70  20 24 44 30 31 32 00 86  17 96 14 4c 44 41 20 24  | $D012.....LDA $|
00000f80  44 30 31 36 00 91 17 a0  14 af 20 23 24 42 46 00  |D016...... #$BF.|
00000f90  9f 17 aa 14 53 54 41 20  24 44 30 31 36 00 a7 17  |....STA $D016...|
00000fa0  b4 14 43 4c 49 00 af 17  be 14 52 54 53 00 bc 17  |..CLI.....RTS...|
00000fb0  c8 14 49 52 51 91 20 53  45 49 00 c9 17 d2 14 4c  |..IRQ. SEI.....L|
00000fc0  44 41 20 23 24 30 31 00  d7 17 dc 14 53 54 41 20  |DA #$01.....STA |
00000fd0  24 44 30 31 39 00 e5 17  e6 14 53 54 41 20 24 44  |$D019.....STA $D|
00000fe0  30 31 41 00 f3 17 f0 14  53 54 41 20 24 44 43 30  |01A.....STA $DC0|
00000ff0  44 00 00 18 fa 14 4c 44  41 20 23 24 33 42 00 0e  |D.....LDA #$3B..|
00001000  18 04 15 53 54 41 20 24  44 30 31 31 00 1b 18 0e  |...STA $D011....|
00001010  15 4c 44 41 20 23 24 30  30 00 29 18 18 15 53 54  |.LDA #$00.)...ST|
00001020  41 20 24 44 30 31 32 00  37 18 22 15 4c 44 41 20  |A $D012.7.".LDA |
00001030  23 b3 49 52 51 00 45 18  2c 15 53 54 41 20 24 30  |#.IRQ.E.,.STA $0|
00001040  33 31 34 00 53 18 36 15  4c 44 41 20 23 b1 49 52  |314.S.6.LDA #.IR|
00001050  51 00 61 18 40 15 53 54  41 20 24 30 33 31 35 00  |Q.a.@.STA $0315.|
00001060  69 18 4a 15 43 4c 49 00  71 18 54 15 52 54 53 00  |i.J.CLI.q.T.RTS.|
00001070  8c 18 70 17 48 d4 20 54  58 54 20 24 32 44 2c 24  |..p.H. TXT $2D,$|
00001080  32 38 2c 24 32 34 2c 24  32 30 00 00 00           |28,$24,$20...|
0000108d