; 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 INC XPIXEL�
�JSR PLOTPC�
�LDY #$00�
�LDA ($FB),Y
�� $FD�BEQ MRIII�CLC$�ADC #$012�MRIII TAX:�PLAI�STA XPIXELV�LDA H�,X^�RTS��;                BITMAP ON ROUTINE��GRAPHIC LDA $D018��� #$01���A #$18��STA $D018�LDA $DD02��A #$03�STA $DD02� LDA $DD00
*� #$FC
4�A #$03>STA $DD00)HLDA $D0115R�A #$20C\STA $D011PfLDA #$04\pSTA $FCizLDY #$00u�STY $FB��LDA #$01��GRLOP STA ($FB),Y��INY��BNE GRLOP��INC $FC��LDX $FC��CPX #$08��BNE GRLOP��LDA MULTIREG
�BEQ NOCOLS�JSR IRQ�#�NOCOLS LDA $D016.	� #$EF<	STA $D016D	RTSk�;        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 LINELOP0LDA #$00+:STA XPIXEL=DXLOP JSR �PIXINSTA SEPVX� YPIXELab� #$01ilCLCuvADC SEP�LSR A��STA I��LDA XPIXEL��SEC��SBC I��BCC XRELOP��STA I��CLC��ADC SEP��BCS XRELOP��STA J
�REPEAT LDX I�LDA $C000,X
STA S%
CMP J4
BCS LLELSE> 
STA IK*
JMP L210\4
LLELSE LDA Jl>
STA $C000,XvH
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 I�
STA $C000,X/�
XRELOP LDX XPIXEL7�
INXF�
BEQ YRELOPU�
STX XPIXELb�
JMP XLOPvYRELOP JSR DISP�DEC YPIXEL�LDA YPIXEL�$BEQ π�.JMP �LINE�8π RTS�BDISP LDA #$00�LSTA XPIXEL�VDLOP TAX�`LDA $C000,XjCMP XPIXELtBNE DELSE~LDA RNO)�LSR A5�INC $A2A�ADC $A2M�LDX $A2]�ADC $0000,Xi�STA RNOt�� #$01��LDX XPIXEL��STA $C100,X��JMP NELSE��DELSE LDA $C000,X��TAY�LDA $C100,Y�
STA $C100,X�NELSE CMP #$00�BEQ NOBL
(JSR PLO�N-JMP REDISP02NOBL JSR PLO�FFF<REDISP DEC XPIXELUFLDA XPIXELbPBNE DLOPsZLDA MULTIREG�dBEQ NOFF�nJSR IRQOFF�xNOFF RTS��;               INTERRUPT ROUTINES��IRQ LDA #$01��STA $D019��LDA $D012��BEQ IRQ�P�LDY #$02�ILOP DEY%�BNE ILOP3�LDA $D016?��A #$10M�STA $D016Z�LDA #$00h�STA $D012v�JMP $EA81�IRQ�P LDA $D016�
� #$EF�STA $D016�LDA #$C7�SEC�SBC YPIXEL�(CLC�2ADC #$32�<STA $D012�FJMP $EA31PIRQOFF SEIZLDA #$31"dSTA $0314/nLDA #$EA=xSTA $0315J�LDA #$00X�STA $D012f�LDA $D016q�� #$EF�STA $D016��CLI��RTS��IRQ� SEI��LDA #$01��STA $D019��STA $D01A��STA $DC0D��LDA #$3B�STA $D011�LDA #$00	STA $D012"LDA #�IRQ%,STA $031436LDA #�IRQA@STA $0315IJCLIQTRTSlpH� 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 inc xpixel@.M.Gjsr plotpc@.M.Gldy #$00@.M.Glda ($fb),y@AN.G. $fd@ON.Gbeq mriii@WN.Gclc@$N.Gadc #$01@2N.Gmriii tax@:N.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@.NVHsta $dd02@.N Hlda $dd00@AO*H. #$fc@MO4H.a #$03@[O>Hsta $dd00@)OhHlda $d011@5OrH.a #$20@cO£Hsta $d011@pOFHlda #$04@£OPHsta $fc@IOZHldy #$00@UO.Hsty $fb@.O.Hlda #$01@.O.Hgrlop sta ($fb),y@.O.Hiny@.O.Hbne grlop@.O.Hinc $fc@.O.Hldx $fc@.O.Hcpx #$08@.O.Hbne grlop@.O.Hlda multireg@AP.Hbeq nocols@NP.Hjsr irq.@#P.Hnocols lda $d016@.PFI. #$ef@<PPIsta $d016@dPZIrts@KP.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@.PHLlinelop tya@.PRLsta ($fb),y@.P£Liny@OQ&Lbne linelop@£Q0Llda #$00@+Q:Lsta xpixel@=QdLxlop jsr .pix@iQnLsta sep@vQxL. ypixel@AQBL. #$01@IQLLclc@UQVLadc 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@.Q.Lbcs xrelop@.Q.Lsta j@AR.Lrepeat ldx i@QR.Llda $c000,x@[RBMsta s@%RLMcmp j@4RVMbcs llelse@>R Msta i@kR*Mjmp l210@£R4Mllelse lda j@LR>Msta $c000,x@VRhMsta i@.RrMlda s@.R£Msta j@.RFMl210 ldx i@.RPMlda $c000,x@.RZMcmp i@.R.Mbne repeat@.R.Mldx j@.R.Mlda $c000,x@.R.Mcmp j@.R.Mbne repeat@.R.Mlda j@IS.Mldx i@YS.Msta $c000,x@/S.Mxrelop ldx xpixel@7S.Minx@fS.Mbeq yrelop@uS.Mstx xpixel@BS.Mjmp xlop@VSFNyrelop jsr disp@.SPNdec ypixel@.SZNlda ypixel@.S$Nbeq ..@.S.Njmp .line@.S8N.. rts@.SbNdisp lda #$00@.SlNsta xpixel@.SvNdlop tax@.S.Nlda $c000,x@ETJNcmp xpixel@STTNbne delse@.T.Nlda rno@)T.Nlsr a@5T.Ninc $a2@aT.Nadc $a2@mT.Nldx $a2@]T.Nadc $0000,x@IT.Nsta rno@TT.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@.TTOnelse cmp #$00@.T.Obeq nobl@MU(Ojsr plo.n@£U-Ojmp redisp@0U2Onobl jsr plo.ff@fU<Oredisp dec xpixel@uUfOlda xpixel@BUpObne dlop@SUzOlda multireg@.UDObeq noff@.UNOjsr irqoff@.UXOnoff rts@.U.S;               interrupt routines@.U.Sirq lda #$01@.U.Ssta $d019@.U.Slda $d012@.U.Sbeq irq.p@KV.Sldy #$02@XV.Silop dey@%V.Sbne ilop@3V.Slda $d016@?V.S.a #$10@mV.Ssta $d016@zV.Slda #$00@HV.Ssta $d012@VV.Sjmp $ea81@.V@Tirq.p lda $d016@.VJT. #$ef@.VTTsta $d016@.VWTlda #$c7@.VZTsec@.V.Tsbc ypixel@.V(Tclc@.V2Tadc #$32@.V<Tsta $d012@.VfTjmp $ea31@GWpTirqoff sei@TWzTlda #$31@"WDTsta $0314@/WNTlda #$ea@=WXTsta $0315@jW.Tlda #$00@xW.Tsta $d012@FW.Tlda $d016@QW.T. #$ef@.W.Tsta $d016@.W.Tcli@.W.Trts@.W.Tirq. sei@.W.Tlda #$01@.W.Tsta $d019@.W.Tsta $d01a@.W.Tsta $dc0d@.W.Tlda #$3b@.WDUsta $d011@.WNUlda #$00@IXXUsta $d012@WX"Ulda #.irq@%X,Usta $0314@3X6Ulda #.irq@aX@Usta $0315@iXjUcli@qXtUrts@LXPWh. 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 cb 0d  84 07 4d 52 49 49 20 49  | #$02.....MRII I|
000005c0  4e 43 20 58 50 49 58 45  4c 00 da 0d 86 07 4a 53  |NC XPIXEL.....JS|
000005d0  52 20 50 4c 4f 54 50 43  00 e7 0d 88 07 4c 44 59  |R PLOTPC.....LDY|
000005e0  20 23 24 30 30 00 f7 0d  8a 07 4c 44 41 20 28 24  | #$00.....LDA ($|
000005f0  46 42 29 2c 59 00 01 0e  8c 07 af 20 24 46 44 00  |FB),Y...... $FD.|
00000600  0f 0e 8e 07 42 45 51 20  4d 52 49 49 49 00 17 0e  |....BEQ MRIII...|
00000610  90 07 43 4c 43 00 24 0e  92 07 41 44 43 20 23 24  |..CLC.$...ADC #$|
00000620  30 31 00 32 0e 94 07 4d  52 49 49 49 20 54 41 58  |01.2...MRIII TAX|
00000630  00 3a 0e 96 07 50 4c 41  00 49 0e 98 07 53 54 41  |.:...PLA.I...STA|
00000640  20 58 50 49 58 45 4c 00  56 0e 9a 07 4c 44 41 20  | XPIXEL.V...LDA |
00000650  48 d4 2c 58 00 5e 0e 9c  07 52 54 53 00 85 0e d0  |H.,X.^...RTS....|
00000660  07 3b 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.;              |
00000670  20 20 42 49 54 4d 41 50  20 4f 4e 20 52 4f 55 54  |  BITMAP ON ROUT|
00000680  49 4e 45 00 9b 0e da 07  47 52 41 50 48 49 43 20  |INE.....GRAPHIC |
00000690  4c 44 41 20 24 44 30 31  38 00 a6 0e e4 07 af 20  |LDA $D018...... |
000006a0  23 24 30 31 00 b2 0e ee  07 b0 41 20 23 24 31 38  |#$01......A #$18|
000006b0  00 c0 0e f8 07 53 54 41  20 24 44 30 31 38 00 ce  |.....STA $D018..|
000006c0  0e 02 08 4c 44 41 20 24  44 44 30 32 00 da 0e 0c  |...LDA $DD02....|
000006d0  08 b0 41 20 23 24 30 33  00 e8 0e 16 08 53 54 41  |..A #$03.....STA|
000006e0  20 24 44 44 30 32 00 f6  0e 20 08 4c 44 41 20 24  | $DD02... .LDA $|
000006f0  44 44 30 30 00 01 0f 2a  08 af 20 23 24 46 43 00  |DD00...*.. #$FC.|
00000700  0d 0f 34 08 b0 41 20 23  24 30 33 00 1b 0f 3e 08  |..4..A #$03...>.|
00000710  53 54 41 20 24 44 44 30  30 00 29 0f 48 08 4c 44  |STA $DD00.).H.LD|
00000720  41 20 24 44 30 31 31 00  35 0f 52 08 b0 41 20 23  |A $D011.5.R..A #|
00000730  24 32 30 00 43 0f 5c 08  53 54 41 20 24 44 30 31  |$20.C.\.STA $D01|
00000740  31 00 50 0f 66 08 4c 44  41 20 23 24 30 34 00 5c  |1.P.f.LDA #$04.\|
00000750  0f 70 08 53 54 41 20 24  46 43 00 69 0f 7a 08 4c  |.p.STA $FC.i.z.L|
00000760  44 59 20 23 24 30 30 00  75 0f 84 08 53 54 59 20  |DY #$00.u...STY |
00000770  24 46 42 00 82 0f 8e 08  4c 44 41 20 23 24 30 31  |$FB.....LDA #$01|
00000780  00 98 0f 98 08 47 52 4c  4f 50 20 53 54 41 20 28  |.....GRLOP STA (|
00000790  24 46 42 29 2c 59 00 a0  0f a2 08 49 4e 59 00 ae  |$FB),Y.....INY..|
000007a0  0f ac 08 42 4e 45 20 47  52 4c 4f 50 00 ba 0f b6  |...BNE GRLOP....|
000007b0  08 49 4e 43 20 24 46 43  00 c6 0f c0 08 4c 44 58  |.INC $FC.....LDX|
000007c0  20 24 46 43 00 d3 0f ca  08 43 50 58 20 23 24 30  | $FC.....CPX #$0|
000007d0  38 00 e1 0f d4 08 42 4e  45 20 47 52 4c 4f 50 00  |8.....BNE GRLOP.|
000007e0  f2 0f de 08 4c 44 41 20  4d 55 4c 54 49 52 45 47  |....LDA MULTIREG|
000007f0  00 01 10 e8 08 42 45 51  20 4e 4f 43 4f 4c 53 00  |.....BEQ NOCOLS.|
00000800  0e 10 f2 08 4a 53 52 20  49 52 51 91 00 23 10 fc  |....JSR IRQ..#..|
00000810  08 4e 4f 43 4f 4c 53 20  4c 44 41 20 24 44 30 31  |.NOCOLS LDA $D01|
00000820  36 00 2e 10 06 09 af 20  23 24 45 46 00 3c 10 10  |6...... #$EF.<..|
00000830  09 53 54 41 20 24 44 30  31 36 00 44 10 1a 09 52  |.STA $D016.D...R|
00000840  54 53 00 6b 10 b8 0b 3b  20 20 20 20 20 20 20 20  |TS.k...;        |
00000850  41 55 54 4f 53 54 45 52  45 4f 47 52 41 4d 20 43  |AUTOSTEREOGRAM C|
00000860  41 4c 43 55 4c 41 54 4f  52 00 83 10 c2 0b cf 53  |ALCULATOR......S|
00000870  54 45 52 45 4f 20 4a 53  52 20 47 52 41 50 48 49  |TEREO JSR GRAPHI|
00000880  43 00 90 10 cc 0b 4c 44  41 20 23 24 43 37 00 9f  |C.....LDA #$C7..|
00000890  10 d6 0b 53 54 41 20 59  50 49 58 45 4c 00 b2 10  |...STA YPIXEL...|
000008a0  e0 0b cf 4c 49 4e 45 20  4c 44 59 20 23 24 30 30  |...LINE LDY #$00|
000008b0  00 be 10 ea 0b 53 54 59  20 24 46 42 00 cb 10 f4  |.....STY $FB....|
000008c0  0b 4c 44 41 20 23 24 43  30 00 d7 10 fe 0b 53 54  |.LDA #$C0.....ST|
000008d0  41 20 24 46 43 00 e7 10  08 0c 4c 49 4e 45 4c 4f  |A $FC.....LINELO|
000008e0  50 20 54 59 41 00 f7 10  12 0c 53 54 41 20 28 24  |P TYA.....STA ($|
000008f0  46 42 29 2c 59 00 ff 10  1c 0c 49 4e 59 00 0f 11  |FB),Y.....INY...|
00000900  26 0c 42 4e 45 20 4c 49  4e 45 4c 4f 50 00 1c 11  |&.BNE LINELOP...|
00000910  30 0c 4c 44 41 20 23 24  30 30 00 2b 11 3a 0c 53  |0.LDA #$00.+.:.S|
00000920  54 41 20 58 50 49 58 45  4c 00 3d 11 44 0c 58 4c  |TA XPIXEL.=.D.XL|
00000930  4f 50 20 4a 53 52 20 87  50 49 58 00 49 11 4e 0c  |OP JSR .PIX.I.N.|
00000940  53 54 41 20 53 45 50 00  56 11 58 0c af 20 59 50  |STA SEP.V.X.. YP|
00000950  49 58 45 4c 00 61 11 62  0c af 20 23 24 30 31 00  |IXEL.a.b.. #$01.|
00000960  69 11 6c 0c 43 4c 43 00  75 11 76 0c 41 44 43 20  |i.l.CLC.u.v.ADC |
00000970  53 45 50 00 7f 11 80 0c  4c 53 52 20 41 00 89 11  |SEP.....LSR A...|
00000980  8a 0c 53 54 41 20 49 00  98 11 94 0c 4c 44 41 20  |..STA I.....LDA |
00000990  58 50 49 58 45 4c 00 a0  11 9e 0c 53 45 43 00 aa  |XPIXEL.....SEC..|
000009a0  11 a8 0c 53 42 43 20 49  00 b9 11 b2 0c 42 43 43  |...SBC I.....BCC|
000009b0  20 58 52 45 4c 4f 50 00  c3 11 bc 0c 53 54 41 20  | XRELOP.....STA |
000009c0  49 00 cb 11 c6 0c 43 4c  43 00 d7 11 d0 0c 41 44  |I.....CLC.....AD|
000009d0  43 20 53 45 50 00 e6 11  da 0c 42 43 53 20 58 52  |C SEP.....BCS XR|
000009e0  45 4c 4f 50 00 f0 11 e4  0c 53 54 41 20 4a 00 01  |ELOP.....STA J..|
000009f0  12 ee 0c 52 45 50 45 41  54 20 4c 44 58 20 49 00  |...REPEAT LDX I.|
00000a00  11 12 f8 0c 4c 44 41 20  24 43 30 30 30 2c 58 00  |....LDA $C000,X.|
00000a10  1b 12 02 0d 53 54 41 20  53 00 25 12 0c 0d 43 4d  |....STA S.%...CM|
00000a20  50 20 4a 00 34 12 16 0d  42 43 53 20 4c 4c 45 4c  |P J.4...BCS LLEL|
00000a30  53 45 00 3e 12 20 0d 53  54 41 20 49 00 4b 12 2a  |SE.>. .STA I.K.*|
00000a40  0d 4a 4d 50 20 4c 32 31  30 00 5c 12 34 0d 4c 4c  |.JMP L210.\.4.LL|
00000a50  45 4c 53 45 20 4c 44 41  20 4a 00 6c 12 3e 0d 53  |ELSE LDA J.l.>.S|
00000a60  54 41 20 24 43 30 30 30  2c 58 00 76 12 48 0d 53  |TA $C000,X.v.H.S|
00000a70  54 41 20 49 00 80 12 52  0d 4c 44 41 20 53 00 8a  |TA I...R.LDA S..|
00000a80  12 5c 0d 53 54 41 20 4a  00 99 12 66 0d 4c 32 31  |.\.STA J...f.L21|
00000a90  30 20 4c 44 58 20 49 00  a9 12 70 0d 4c 44 41 20  |0 LDX I...p.LDA |
00000aa0  24 43 30 30 30 2c 58 00  b3 12 7a 0d 43 4d 50 20  |$C000,X...z.CMP |
00000ab0  49 00 c2 12 84 0d 42 4e  45 20 52 45 50 45 41 54  |I.....BNE REPEAT|
00000ac0  00 cc 12 8e 0d 4c 44 58  20 4a 00 dc 12 98 0d 4c  |.....LDX J.....L|
00000ad0  44 41 20 24 43 30 30 30  2c 58 00 e6 12 a2 0d 43  |DA $C000,X.....C|
00000ae0  4d 50 20 4a 00 f5 12 ac  0d 42 4e 45 20 52 45 50  |MP J.....BNE REP|
00000af0  45 41 54 00 ff 12 b6 0d  4c 44 41 20 4a 00 09 13  |EAT.....LDA J...|
00000b00  c0 0d 4c 44 58 20 49 00  19 13 ca 0d 53 54 41 20  |..LDX I.....STA |
00000b10  24 43 30 30 30 2c 58 00  2f 13 d4 0d 58 52 45 4c  |$C000,X./...XREL|
00000b20  4f 50 20 4c 44 58 20 58  50 49 58 45 4c 00 37 13  |OP LDX XPIXEL.7.|
00000b30  de 0d 49 4e 58 00 46 13  e8 0d 42 45 51 20 59 52  |..INX.F...BEQ YR|
00000b40  45 4c 4f 50 00 55 13 f2  0d 53 54 58 20 58 50 49  |ELOP.U...STX XPI|
00000b50  58 45 4c 00 62 13 fc 0d  4a 4d 50 20 58 4c 4f 50  |XEL.b...JMP XLOP|
00000b60  00 76 13 06 0e 59 52 45  4c 4f 50 20 4a 53 52 20  |.v...YRELOP JSR |
00000b70  44 49 53 50 00 85 13 10  0e 44 45 43 20 59 50 49  |DISP.....DEC YPI|
00000b80  58 45 4c 00 94 13 1a 0e  4c 44 41 20 59 50 49 58  |XEL.....LDA YPIX|
00000b90  45 4c 00 9f 13 24 0e 42  45 51 20 cf 80 00 ad 13  |EL...$.BEQ .....|
00000ba0  2e 0e 4a 4d 50 20 cf 4c  49 4e 45 00 b8 13 38 0e  |..JMP .LINE...8.|
00000bb0  cf 80 20 52 54 53 00 ca  13 42 0e 44 49 53 50 20  |.. RTS...B.DISP |
00000bc0  4c 44 41 20 23 24 30 30  00 d9 13 4c 0e 53 54 41  |LDA #$00...L.STA|
00000bd0  20 58 50 49 58 45 4c 00  e6 13 56 0e 44 4c 4f 50  | XPIXEL...V.DLOP|
00000be0  20 54 41 58 00 f6 13 60  0e 4c 44 41 20 24 43 30  | TAX...`.LDA $C0|
00000bf0  30 30 2c 58 00 05 14 6a  0e 43 4d 50 20 58 50 49  |00,X...j.CMP XPI|
00000c00  58 45 4c 00 13 14 74 0e  42 4e 45 20 44 45 4c 53  |XEL...t.BNE DELS|
00000c10  45 00 1f 14 7e 0e 4c 44  41 20 52 4e 4f 00 29 14  |E...~.LDA RNO.).|
00000c20  88 0e 4c 53 52 20 41 00  35 14 92 0e 49 4e 43 20  |..LSR A.5...INC |
00000c30  24 41 32 00 41 14 9c 0e  41 44 43 20 24 41 32 00  |$A2.A...ADC $A2.|
00000c40  4d 14 a6 0e 4c 44 58 20  24 41 32 00 5d 14 b0 0e  |M...LDX $A2.]...|
00000c50  41 44 43 20 24 30 30 30  30 2c 58 00 69 14 ba 0e  |ADC $0000,X.i...|
00000c60  53 54 41 20 52 4e 4f 00  74 14 c4 0e af 20 23 24  |STA RNO.t.... #$|
00000c70  30 31 00 83 14 ce 0e 4c  44 58 20 58 50 49 58 45  |01.....LDX XPIXE|
00000c80  4c 00 93 14 d8 0e 53 54  41 20 24 43 31 30 30 2c  |L.....STA $C100,|
00000c90  58 00 a1 14 e2 0e 4a 4d  50 20 4e 45 4c 53 45 00  |X.....JMP NELSE.|
00000ca0  b7 14 ec 0e 44 45 4c 53  45 20 4c 44 41 20 24 43  |....DELSE LDA $C|
00000cb0  30 30 30 2c 58 00 bf 14  f6 0e 54 41 59 00 cf 14  |000,X.....TAY...|
00000cc0  00 0f 4c 44 41 20 24 43  31 30 30 2c 59 00 df 14  |..LDA $C100,Y...|
00000cd0  0a 0f 53 54 41 20 24 43  31 30 30 2c 58 00 f2 14  |..STA $C100,X...|
00000ce0  14 0f 4e 45 4c 53 45 20  43 4d 50 20 23 24 30 30  |..NELSE CMP #$00|
00000cf0  00 ff 14 1e 0f 42 45 51  20 4e 4f 42 4c 00 0d 15  |.....BEQ NOBL...|
00000d00  28 0f 4a 53 52 20 50 4c  4f a4 4e 00 1c 15 2d 0f  |(.JSR PLO.N...-.|
00000d10  4a 4d 50 20 52 45 44 49  53 50 00 30 15 32 0f 4e  |JMP REDISP.0.2.N|
00000d20  4f 42 4c 20 4a 53 52 20  50 4c 4f a4 46 46 00 46  |OBL JSR PLO.FF.F|
00000d30  15 3c 0f 52 45 44 49 53  50 20 44 45 43 20 58 50  |.<.REDISP DEC XP|
00000d40  49 58 45 4c 00 55 15 46  0f 4c 44 41 20 58 50 49  |IXEL.U.F.LDA XPI|
00000d50  58 45 4c 00 62 15 50 0f  42 4e 45 20 44 4c 4f 50  |XEL.b.P.BNE DLOP|
00000d60  00 73 15 5a 0f 4c 44 41  20 4d 55 4c 54 49 52 45  |.s.Z.LDA MULTIRE|
00000d70  47 00 80 15 64 0f 42 45  51 20 4e 4f 46 46 00 8f  |G...d.BEQ NOFF..|
00000d80  15 6e 0f 4a 53 52 20 49  52 51 4f 46 46 00 9c 15  |.n.JSR IRQOFF...|
00000d90  78 0f 4e 4f 46 46 20 52  54 53 00 c3 15 88 13 3b  |x.NOFF RTS.....;|
00000da0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 49  |               I|
00000db0  4e 54 45 52 52 55 50 54  20 52 4f 55 54 49 4e 45  |NTERRUPT ROUTINE|
00000dc0  53 00 d4 15 92 13 49 52  51 20 4c 44 41 20 23 24  |S.....IRQ LDA #$|
00000dd0  30 31 00 e2 15 94 13 53  54 41 20 24 44 30 31 39  |01.....STA $D019|
00000de0  00 f0 15 96 13 4c 44 41  20 24 44 30 31 32 00 fe  |.....LDA $D012..|
00000df0  15 9c 13 42 45 51 20 49  52 51 a4 50 00 0b 16 a6  |...BEQ IRQ.P....|
00000e00  13 4c 44 59 20 23 24 30  32 00 18 16 b0 13 49 4c  |.LDY #$02.....IL|
00000e10  4f 50 20 44 45 59 00 25  16 ba 13 42 4e 45 20 49  |OP DEY.%...BNE I|
00000e20  4c 4f 50 00 33 16 c4 13  4c 44 41 20 24 44 30 31  |LOP.3...LDA $D01|
00000e30  36 00 3f 16 ce 13 b0 41  20 23 24 31 30 00 4d 16  |6.?....A #$10.M.|
00000e40  d8 13 53 54 41 20 24 44  30 31 36 00 5a 16 e2 13  |..STA $D016.Z...|
00000e50  4c 44 41 20 23 24 30 30  00 68 16 ec 13 53 54 41  |LDA #$00.h...STA|
00000e60  20 24 44 30 31 32 00 76  16 f6 13 4a 4d 50 20 24  | $D012.v...JMP $|
00000e70  45 41 38 31 00 8a 16 00  14 49 52 51 a4 50 20 4c  |EA81.....IRQ.P L|
00000e80  44 41 20 24 44 30 31 36  00 95 16 0a 14 af 20 23  |DA $D016...... #|
00000e90  24 45 46 00 a3 16 14 14  53 54 41 20 24 44 30 31  |$EF.....STA $D01|
00000ea0  36 00 b0 16 17 14 4c 44  41 20 23 24 43 37 00 b8  |6.....LDA #$C7..|
00000eb0  16 1a 14 53 45 43 00 c7  16 1e 14 53 42 43 20 59  |...SEC.....SBC Y|
00000ec0  50 49 58 45 4c 00 cf 16  28 14 43 4c 43 00 dc 16  |PIXEL...(.CLC...|
00000ed0  32 14 41 44 43 20 23 24  33 32 00 ea 16 3c 14 53  |2.ADC #$32...<.S|
00000ee0  54 41 20 24 44 30 31 32  00 f8 16 46 14 4a 4d 50  |TA $D012...F.JMP|
00000ef0  20 24 45 41 33 31 00 07  17 50 14 49 52 51 4f 46  | $EA31...P.IRQOF|
00000f00  46 20 53 45 49 00 14 17  5a 14 4c 44 41 20 23 24  |F SEI...Z.LDA #$|
00000f10  33 31 00 22 17 64 14 53  54 41 20 24 30 33 31 34  |31.".d.STA $0314|
00000f20  00 2f 17 6e 14 4c 44 41  20 23 24 45 41 00 3d 17  |./.n.LDA #$EA.=.|
00000f30  78 14 53 54 41 20 24 30  33 31 35 00 4a 17 82 14  |x.STA $0315.J...|
00000f40  4c 44 41 20 23 24 30 30  00 58 17 8c 14 53 54 41  |LDA #$00.X...STA|
00000f50  20 24 44 30 31 32 00 66  17 96 14 4c 44 41 20 24  | $D012.f...LDA $|
00000f60  44 30 31 36 00 71 17 a0  14 af 20 23 24 45 46 00  |D016.q.... #$EF.|
00000f70  7f 17 aa 14 53 54 41 20  24 44 30 31 36 00 87 17  |....STA $D016...|
00000f80  b4 14 43 4c 49 00 8f 17  be 14 52 54 53 00 9c 17  |..CLI.....RTS...|
00000f90  c8 14 49 52 51 91 20 53  45 49 00 a9 17 d2 14 4c  |..IRQ. SEI.....L|
00000fa0  44 41 20 23 24 30 31 00  b7 17 dc 14 53 54 41 20  |DA #$01.....STA |
00000fb0  24 44 30 31 39 00 c5 17  e6 14 53 54 41 20 24 44  |$D019.....STA $D|
00000fc0  30 31 41 00 d3 17 f0 14  53 54 41 20 24 44 43 30  |01A.....STA $DC0|
00000fd0  44 00 e0 17 fa 14 4c 44  41 20 23 24 33 42 00 ee  |D.....LDA #$3B..|
00000fe0  17 04 15 53 54 41 20 24  44 30 31 31 00 fb 17 0e  |...STA $D011....|
00000ff0  15 4c 44 41 20 23 24 30  30 00 09 18 18 15 53 54  |.LDA #$00.....ST|
00001000  41 20 24 44 30 31 32 00  17 18 22 15 4c 44 41 20  |A $D012...".LDA |
00001010  23 b3 49 52 51 00 25 18  2c 15 53 54 41 20 24 30  |#.IRQ.%.,.STA $0|
00001020  33 31 34 00 33 18 36 15  4c 44 41 20 23 b1 49 52  |314.3.6.LDA #.IR|
00001030  51 00 41 18 40 15 53 54  41 20 24 30 33 31 35 00  |Q.A.@.STA $0315.|
00001040  49 18 4a 15 43 4c 49 00  51 18 54 15 52 54 53 00  |I.J.CLI.Q.T.RTS.|
00001050  6c 18 70 17 48 d4 20 54  58 54 20 24 32 44 2c 24  |l.p.H. TXT $2D,$|
00001060  32 38 2c 24 32 34 2c 24  32 30 00 00 00           |28,$24,$20...|
0000106d