@L| }6CD l0C)HCC WhL/h `CmCDiD`  R@P1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD`sDANUSAP10DGKRACBh@AVA` @1 }6-F:A,: (}( AT PAGE ONE!:(PRESS 1 OR 2 FOR THAT PAGE.(PRESS TO GO ON. %%6-F:A`},%F:Aa,$AV @@d6-F:%@,+A&@+@&@O( AT PAGE TWO!}4(PRESS 1 OR 2 FOR THAT PAGE.O(PRESS ΠTO GO ON.AdAU @!6-F:Ad,#"@1}@E$"@@`%"@0@@& @3(%@&@+ @3-%@7 } @3<A%D:NEXT6 D:EXAMPLE6AVA` @1 6`zDANUSAP10DGKRA@6-F:AD}EiͩkΩ͙kCop j`j {j`Hi͝Νh` }L"ELTIT:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G%}H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0})8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH)}`piH n0)բY? 08`0 }8  H H` 1 { LL   !L     Hh SY?  q  1L}  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q G) *Gȩ GȽG GȌd q q G`  8   0G  `D}C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}  $}`piH n0)բY? 08`0 }`piH n0)բY? 08`0 8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR!}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} S gL   8 rii `дCDCG W  #}C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}  $}EK( |||DDOS DOSDOS SYS }%}}%}&} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO /} 0`BDELV !B (}LLu DEHILV 9 .l 9 .l  `` s$B VBH1} L ? .  t`GBJ V~DEHI B V0dV*}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e3}DEL8HI   0 HI,0 0  9 .G VLO,} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D 5} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI.} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO /}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -0}LLu DEHILV 9 .l 9 .l  `` s$B VBH1}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL2}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e3}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D 5}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F 6}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟 7}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i 8} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@CAY? @#@wA( TWO!F "@}"@K , @pMkk19,23,20,23,21,23,19,24,20,24,21,24,20,25,18,26,19,26,20,26,21,26,22,26,17,27,19@},27,20,27,21,27,23,27Nkk17,28,19,28,20,28,21,28,23,28,19,29,20,29,21,29,19,30,20,30,21,30,19,31,21,31,19,32,21,32,18,33,22@},33O9918,34,22,34,18,35,19,35,20,35,22,35,23,35,24,35,0,0P!6-F:A`,!6-F:Aa,U$$**************************@}****ZA&@d +@fAYg( THREE!i @#An ""@}A s,%@  Auee9,23,10,23,11,23,9,24,10,24,11,24,10,25,8,26,9,26,10,26,11,26,12,26,7,27,9,27,10,27,1@}1,27,13,27voo6,28,9,28,10,28,11,28,14,28,9,29,10,29,11,29,9,30,10,30,11,30,9,31,11,31,8,32,12,32,7,33,13,33,7,34,13,34w,@},7,35,8,35,9,35,13,35,14,35,15,35,0,0,0x!6-F:A`,!6-F:Aa,}##*****************************A&@}@$ +@AY( FOUR! @#AW ""A`,%@ @} APkk19,23,20,23,21,23,19,24,20,24,21,24,20,25,18,26,19,26,20,26,21,26,22,26,17,27,19,27,20,27,21,27,23,27kk@}17,28,19,28,20,28,21,28,23,28,19,29,20,29,21,29,19,30,20,30,21,30,19,31,21,31,19,32,21,32,18,33,22,339918,34,22,34,18,35,@}19,35,20,35,22,35,23,35,24,35,0,0!6-F:A`,!6-F:Aa,##*****************************AdAU@}AY6-F:Ad,"@1A"@0A"@&A"@$A @}"@A0 Ap%A`Aa% Ap%A`Aa% Ap%A`@}Aa% Ap%A`Aa% ApA%D:NEXT5 D:EXAMPLE5@f,w (}( AT PAGE ONE!S(4PRESS AND AT THE SAME TIME TO GO ON.w(PRESS BETWEEN 0 AND &@fD}<(4 TO LOOK AT MEMORY IN 1/4 PAGE SCREEN INCREMENTS.f(%THEN PRESS RETURN. REPEAT AS DESIRED. %%6-F:A`,%F:AaD},$AV @@d6-F:%@,+A&@+@&@L( AT PAGE TWO!L(3 PRED}SS AND ΠAT THE SAME TIME TO GO ON9@,B2y@0 @06-F:B2y,0"@@D}!#!+,@`(%@&7 @0<^5(#NUMBER TOO LARGE, MUST BE LESS THAN&@^($WE AD}RE NOW AT 4 PAGES DOWN IN MEMORYA-%@&@-@&@F @0P? BA%@D}3%@?%D:NEXT7 D:EXAMPLE76-F:AD/ BF Bt A A6-F:A,q +@@),@@;/@@ M/@@@ L}_/@@@q/@@ %%6-F:A`,%F:Aa,$AV @@d6-F:%@,AL}&@q +@@),@ @ ;/@ @0M/@0@0_/@0@ q/@ @ L}9@,%%6-F:A`,%F:Aa,$AV6-F:%@,B2y@11()PRESS AND L}TOGETHER TO GO ON.0 @06-F:B2y,0"@@!#!+,@`(POKE DP1+5,SAV-A)%@L}&7 @0<_5(#NUMBER TOO LARGE, MUST BE LESS THAN&@_(%WE ARE NOW AT 4 PAGES DOWN IN MEMORY.A-%L}@&@-@&@F @0P? BA%@3%@?%D:NEXT8 D:EXAL}MPLE8&DANUSAP10DGKRADPDPSAVSAVA@A @LMDLRSWTCMMCMPSMBSVBV0V1LFBOINP10PMCHDLBYTSCROLSIPIXETONCORODISPCOLVRHRBEASFOOQ}PCOLRLODECA Q}Q} !"#$%&&&;A,;@,;AU, ;Q}@W, _D:TDELAY.OBJ**67@,.hh ))67@$,.h67@F,. Q}`( ;@6, _D:CLRMEM.OBJ2**67@,.hhhhḧ< 67@$,. `P Q};@V, _D:MOVCHR.OBJZ**67@,.hhύPhhh̩d))67@$,.̑n67@F,.Q} ޭP` ;A, _D:MOVPMS.OBJ**67@,.hhhЩةΥͪ芅ϥ))67@$,.ЪiΐQ}))67@F,.hh i))67@h,.hhe΅Π̑))67@,.ΩЅϦQ }67A,.hh` ;@, _D:SCROLL.OBJ67@,. hhhhh` ;A6, _D:BEASTS.OBJ**Q }67@,.8\|DJ@8l|DDD8t|D))67@$,. 8t|DDL8t|DDD8t|D))67@F,.DF8\|DDD8l|DDD8t))6Q }7@h,.|DDD<<8l|J8"))67@,.~@8||0>?,((67A,.?~~667Q }A3,.J ;@, _D:VBLANK.OBJT!!67@,.Α̥ύLbh ;@#, _D:VBLNK0.OBJr**67@Q },.nԩb䪩 \h` ;@, _D:VBLNK1.OBJ67@,. hhh \` ;@C, _D:LDFILE.OBJQ}**67@,.h hh`hhhhB''67@$,.hEhDhIhHLV6-A0 6-F:A, 6-&@Q}6-&@6-&@!A!+@%@&!!6-?:C:,<$AV<A@,D-@B:,N##&Q}@%$AV@:7<,,X b@w@l0@v @!!6-?:C:,<$AV<@Q},-@!!@%%$AVAU -@!" '"@)"@!'Q}6-%@"@6-%@ %$AV* H112,112,112,71,112,0R7,7,7,7,7,7,7,7,7,7\7Q}1,0,0,65,0,0'6-+%@,$AV'6-0@@-@@ 6-%Q}@ "4.ENDA%@-@B:,6-@:7<,,"A`6-@2 A(6Q}-%@2!!!A$) A(A#  6-&@2  6-%@6-%@$  . 8Q} 6-%@6-%@B A"@` EDUCATIONAL SOFTWAREj PRESENTS ٠̛t ŠǠQ}~ prof. von chip and his pals teach you how to ##change your screens instantly .END !A`!Q}Aa AY@4( -@@72  @ 6-%@< !@6-&@F 2Q}@@P 0@@Z  ",d 6-?:C:,<@,n  x 70@@@70Q}@@ 1,0,4,2,8,6,4,8,6,4,6,0 1,2,3,4,5,6,3,6,2,3,1,1 3,0,6,8,8,8,7,6,5,0,3,2 1,4,8,4,2,1,3,8,Q}6,6,7,4 4,0,5,8,4,6,3,5,2,4,1,3 5,4,2,2,8,7,4,4,7,8,2,0 4,5 %%2 6-?:C:,Q}<@, --@ @-(@ DUCATIONAL 6-@6-@  6-?:C:,<@@," *-@ @Q}*(@OFTWARE, 6-@@6-@ T -@@ ^ -@(@ h &-@%Q}@&(@Ar 6-?:C:,<@,|   -@(@  11+%@,$AV%@@e&Q}@2 6-A6-@  BBy B2w@ AY@F A#@ B2Q }V@ A 6-A@: 6-@@D -@VAp@N -@X Q!}112$@%A&@@b 6-?:C:,<<<<,l 6-?:C:,<@,v     ++6-?:C:Q"},<<@<<%@, G%2G2@ 6-?:C:,<@,Q#} @x %%6-+$AV,%A%%@ Ad -%@%@b -2@@Q$}-6-&@ #@#%@@   %%2 6-?:C:,<@0,> -@Q%}@6@H -&@6@R ##&@@\  f @A4Pp ))+%Q&}@,$AV%@z &-@%@&(@  -@(@A 6-A6-@Q'}    $-@@$(@  @ %%2 -&@6@Q(} ##&@@   ##&@Ap A@ 6-?:C:,<@0,Q)} -Av@V6@$ -@6@.112$@%A&@@86-?:C:Q*},<<<<,B6-?:C:,<@,L V ~G%2G2@Q+}))6-?:C:,<<<<,6-?:C:,<@0,-@B:,##6-&@%A%$AVQ,}@:7<,, 'A'A@BBv@ @%$AV@!AQ-}@(A!!6-?:C:,<A%$AV,(0@@<!!-%@ @F -Q.}@@6@P6-?:C:,<<,Z d6-?:C:,<<,n x_Run the next programAYQ/}6-?:C:,,A% D:EXAMPLE1^ -@@6@h2r6-?:C:,<@,| Q0}%%2$ D2:TP10PMCHDLBYTSCROLSIPIXETONCORODISPCOLVRHRBEASFOOP80100 ;0110 ; Sir Toot! WORK PART-SIR1.ASY0120 ;0130 ; by0140 ;0150 ; Itay & Nitzan0160 ; Chamiel0170 ;0180 ;U2} (c) 1990-19910190 ; Logic ltd.0200 ;0210 ; Finished all but Magnify!0220 ;0230 .OPT NOLIST0240 ;0250 *=$800260 ;U3}0270 COLORSAV .BYTE $28,$CA,$94,$46,00280 XOLD .BYTE 00290 GR .BYTE 120300 X .BYTE 00310 Y .BYTE 0,00320 COLOR .BYTE 1U4}0330 TEMP .BYTE 00340 NUML .BYTE 00350 NUMH .BYTE 00360 HPOS .BYTE 00370 YOLD .BYTE 00380 MIR .BYTE 0,0,0,0,00390 MEM .U5}BYTE 0,0,0,0,0,0,00400 FLASH .BYTE 10410 SCLO .BYTE 00420 SCHI .BYTE 00430 CP .BYTE 00440 MEMX .BYTE 0,159,0,1590450 MEU6}MY .BYTE 0,0,191,1910460 ABRUSH .WORD BRADR10470 COUNTER .BYTE 00480 SX .BYTE 00490 SY .BYTE 00500 MENUX .BYTE 510510 PU7}RY .BYTE 00520 PRX .BYTE 00530 INV .BYTE 00540 MAIN .BYTE 00550 EOR .BYTE 00560 ONOFF .BYTE 00570 WAIT .BYTE 00580 SCLU8}X .BYTE 800590 SCLY .BYTE 950600 SL .BYTE 00610 CT .BYTE 00620 DRX .BYTE 00630 DRY .BYTE 00640 ADX .BYTE 00650 ADY .BYU9}TE 00660 DLX .BYTE 00670 DLY .BYTE 00680 TXRMH .BYTE 00690 TXRM .BYTE 00700 TXLO .WORD TEXT0710 TXHI=TXLO+10720 CTR1 .U:}BYTE 00730 CTR2 .BYTE 00740 CTR3 .BYTE 00750 WHN .BYTE 00760 GET .BYTE 00770 PUT .BYTE 00780 FX .BYTE 00790 FY .BYTE 0U;},00800 OLDC .BYTE 00810 ;0820 OPEN=30830 CLOSE=120840 LOCATE=70850 TEXT=$B8000860 TRADX=$B8000870 TRADY=$B9000880 M0U<}=$BB000890 PM0=$BC000900 PM1=$BD000910 PM2=$BE000920 PM3=$BF000930 XTAB=PM20940 YTAB=PM30950 PM0X=532480960 PM1X=5324U=}90970 PM2X=532500980 PM3X=532510990 M0X=532521000 M1X=532531010 M2X=532541020 M3X=532551030 PM0S=532561040 PM1S=53257U>}1050 PM2S=532581060 PM3S=532591070 MISS=532601080 ;1090 STIMER=$141100 SETVBV=$E45C1110 XITVBV=$E4621120 ICCOM=$3421U?}130 ICBAL=$3441140 ICBAH=$3451150 ICBLL=$3481160 ICBLH=$3491170 ICAX1=$34A1180 ICAX2=$34B1190 CIOV=$E4561200 STICK=632U@}1210 STRIG=6441220 VCOUNT=$D40B1230 ;1240 ; Variables from main program1250 ;1260 MAINLOOP=$2D751270 NOY=$2D981280 PAUA}INT=$2E031290 KEYCHECK=$2E3A1300 SCALE=$2F511310 CH.SX=$2FDC1320 CLEAR=$30C61330 PRINT=$30F61340 MENU=$313A1350 POINT=UB}$32861360 GET.KEY=$32F11370 NUMBERS=$33011380 MIRROR=$334A1390 BRUSH=$33C01400 ;1410 LINE1=$33EA+401420 LINE2=$3412+40UC}1430 LNPRN=$34F9+401440 CIPRN=$3521+401450 REPRN=$3549+401460 FLPRN=$3571+401470 GRPRN=$3599+401480 WRPRN=$35C1+401490UD} MGPRN=$35E9+401500 BRPRN=$3611+401510 MIPRN=$3639+401520 OOPRN=$3661+401530 DPRN=$36E5+401540 DLOAD=$370D+401550 DSAVEUE}=$3735+401560 QUPRN=$375D+401570 IPRN=$3785+401580 CPRN=$37AD+401590 EPRN=$37D5+401600 BRADR1=$385C+401610 BRADR2=$3898UF}+401620 BRADR3=$38D4+401630 DUMMY=$3820+40 same as STUPID1640 FNAME=$384D+401650 DLIST=$6001660 CHARSET=$A0001670 SCALIUG}NE=$6FF-401680 ;1690 *=$3C001700 TBJMP1710 .WORD PAINT-1,LINE-1,CIRCLE-11720 .WORD RECT-1,FILL-1,GRED-11730 .WORD WUH}RITE-1,MAGNIFY-11740 .WORD CHBRUSH-1,CHMIRRORS-11750 .WORD OOPS-1,SCALE-1,CLEAR-11760 .WORD DISK-1,HELP-1,INSTRUCT-117UI}70 .WORD COLORS-1,BREDIT-11780 RECT LDX #REPRN/2561790 LDY #REPRN&2551800 JSR PRINT1810 RLOOP1820 LDA #11830 STA MUJ}AIN1840 JSR MAINLOOP1850 LDA 7641860 CMP #2551870 BEQ PRE1880 JSR KEYCHECK1890 JMP RLOOP1900 PRE LDA STRIG1910 UK} BEQ PRE1920 LDX X1930 STX PRX1940 LDY Y1950 STY PRY1960 LDX #01970 STX MAIN1980 INX1990 STX EOR2000 RLOOP2 UL}JSR MAINLOOP2010 LDA X2020 STA SX2030 LDA Y2040 STA SY2050 JSR XDRAWTO2060 JSR YDRAWTO2070 JSR XDRAWTO2080 JSUM}R YDRAWTO2090 LDA SX2100 STA X2110 LDA SY2120 STA Y2130 LDA 7642140 CMP #2552150 BNE KCHEK2160 LDA STRIG2170UN} BNE RLOOP22180 FIRE LDA STRIG2190 BEQ FIRE2200 LDA #02210 STA EOR2220 LDA COLOR2230 STA CP2240 JSR XDRAWTO225UO}0 JSR YDRAWTO2260 LDA SX2270 STA X2280 LDA SY2290 STA Y2300 JSR POINT2310 JMP RLOOP2320 KCHEK JSR GET.KEY2330 UP} CMP #322340 BEQ CANCEL2350 CMP #1202360 BEQ BOX2370 JSR ARROWS2380 JSR CHNUM2390 JMP RLOOP22400 CANCEL LDA PRXUQ}2410 STA X2420 LDA PRY2430 STA Y2440 LDA #02450 STA EOR2460 JMP RLOOP2470 BOX2480 LDA X2490 PHA2500 STA SXUR}2510 LDA Y2520 PHA2530 STA SY2540 LDA PRX2550 CMP X2560 BEQ SAMEASFIR2570 LDA PRY2580 CMP Y2590 BEQ SAMEASFIUS}R2600 LDA #02610 STA EOR2620 LDA COLOR2630 STA CP2640 JSR XDRAWTO2650 LDA SX2660 STA X2670 LDA SY2680 STA YUT}2690 JSR POINT2700 BXLOOP2710 LDA SX2720 STA X2730 JSR YDRAWTO2740 LDA SX2750 CMP PRX2760 BEQ ENDBX2770 INC UU}PRX2780 CMP PRX2790 BEQ ENDBX2800 DEC PRX2810 CLC2820 ADC ADX2830 STA SX2840 LDA PRX2850 SEC2860 SBC ADX28UV}70 STA PRX2880 JMP BXLOOP2890 ENDBX2900 PLA2910 STA Y2920 PLA2930 STA X2940 JMP RLOOP2950 SAMEASFIR2960 PLAUW}2970 PLA2980 JMP FIRE2990 GMENU JMP MENU3000 GDIR JMP DIR3010 GKOALA JMP KOALA3020 GSAVE JMP SAVE3030 DISK3040 LDX UX}#DPRN/2563050 LDY #DPRN&2553060 JSR PRINT3070 GKEY3080 LDA 7643090 CMP #2553100 BEQ GKEY3110 JSR GET.KEY3120 CUY}MP #323130 BEQ GMENU3140 CMP #763150 BEQ LOAD3160 CMP #833170 BEQ GSAVE3180 CMP #153190 BEQ GKOALA3200 CMP #6UZ}83210 BEQ GDIR3220 JMP GKEY3230 LOAD3240 LDX #DLOAD/2563250 LDY #DLOAD&2553260 JSR PRINT3270 JSR PROMPT3280 LDU[}X #$203290 LDA #OPEN3300 STA ICCOM+$203310 LDA #FNAME/2563320 STA ICBAH+$203330 LDA #FNAME&2553340 STA ICBAL+$20U\}3350 LDA #43360 STA ICAX1+$203370 LDA #03380 STA ICAX2+$203390 JSR CIOV3400 LDX #$203410 LDA #73420 STA ICCOM+U]}$203430 LDA 893440 STA ICBAH+$203450 LDA 883460 STA ICBAL+$203470 LDA #7680/2563480 STA ICBLH+$203490 LDA #7680U^}&2553500 STA ICBLL+$203510 JSR CIOV3520 LDX #$203530 LDA #73540 STA ICCOM+$203550 LDA #COLOR/2563560 STA ICBAH+U_}$203570 LDA #COLOR&2553580 STA ICBAL+$203590 LDA #03600 STA ICBLH+$203610 LDA #53620 STA ICBLL+$203630 JSR CIOVU`}3640 LDX #43650 MOVCL3660 LDA COLORSAV,X3670 STA 708,X3680 DEX3690 CPX #2553700 BNE MOVCL3710 LDX #$203720 LUa}DA #CLOSE3730 STA ICCOM+$203740 JSR CIOV3750 JMP DISK3760 SAVE LDX #DSAVE/2563770 LDY #DSAVE&2553780 JSR PRINT379Ub}0 JSR PROMPT3800 LDX #$203810 LDA #OPEN3820 STA ICCOM+$203830 LDA #FNAME/2563840 STA ICBAH+$203850 LDA #FNAME&25Uc}53860 STA ICBAL+$203870 LDA #83880 STA ICAX1+$203890 JSR CIOV3900 LDX #$203910 LDA #113920 STA ICCOM+$203930 Ud}LDA 893940 STA ICBAH+$203950 LDA 883960 STA ICBAL+$203970 LDA #7680/2563980 STA ICBLH+$203990 LDA #7680&2554000 Ue} STA ICBLL+$204010 JSR CIOV4020 LDX #$204030 LDA #114040 STA ICCOM+$204050 LDA #708/2564060 STA ICBAH+$204070 LUf}DA #708&2554080 STA ICBAL+$204090 LDA #04100 STA ICBLH+$204110 LDA #54120 STA ICBLL+$204130 JSR CIOV4140 LDX #$Ug}204150 LDA #CLOSE4160 STA ICCOM+$204170 JSR CIOV4180 JMP DISK4190 PROMPT LDA #64200 STA PRX4210 GETK LDX PRX4220Uq}bEXAMPLE6 b AUTORUN SYSb' DOS SYSb*4DUP SYSb ^NEXT4 bhNEXT1 blNEXT2 b pNEXT3 b gNEXT5 b NEXT6 b NEXT7 b NEXT8 bEXAMPLE1 b EXAMPLE2 bEXAMPLE3 bEXAMPLE4 bEXAMPLE5 b EXAMPLE7 bSTART b EXAMPLE8 b1TITLE B1SIR1 ASYBSIR1 OBJ LDA #95-324230 STA DUMMY,X4240 GETK14250 LDA 7644260 CMP #2554270 BEQ GETK14280 JSR GET.KEY4290 CMP #1554300 Ur} BEQ RETURN4310 CMP #1264320 BEQ DELETE4330 CMP #484340 BCC GETK14350 CMP #914360 BCS GETK14370 CMP #584380 BUs}CS WELL4390 BAKWELL4400 SEC4410 SBC #324420 LDX PRX4430 STA DUMMY,X4440 INC PRX4450 LDA PRX4460 CMP #144470 Ut}BNE GETK4480 DEC PRX4490 JMP GETK14500 WELL CMP #654510 BCS BAKWELL4520 JMP GETK14530 RETURN LDX PRX4540 LDA #04Uu}550 STA DUMMY4560 STA DUMMY+14570 STA DUMMY+24580 STA DUMMY+34590 LDA #68-324600 STA DUMMY+44610 LDA #46-324620Uv} STA DUMMY,X4630 LDA #84-324640 STA DUMMY+1,X4650 STA DUMMY+3,X4660 LDA #85-324670 STA DUMMY+2,X4680 LDX #44690Uw} RETLOOP LDA DUMMY,X4700 CLC4710 ADC #324720 STA FNAME-4,X4730 INX4740 CPX #184750 BNE RETLOOP4760 LDA #584770Ux} STA FNAME+54780 RTS4790 DELETE LDX PRX4800 BEQ NOBAK4810 CPX #144820 LDA #04830 STA DUMMY,X4840 DEX4850 CPX Uy}#54860 BEQ BACKH4870 STX PRX4880 NOBAK LDA #95-324890 STA DUMMY,X4900 JMP GETK14910 BACKH PLA4920 PLA4930 JMP DUz}ISK4940 DRAWTO4950 LDX #04960 STX CT4970 INX4980 STX ADX4990 STX ADY5000 LDA DRY5010 SEC5020 SBC Y5030 BCSU{} SKIP15040 DEC ADY5050 DEC ADY5060 LDA Y5070 SEC5080 SBC DRY5090 SKIP1 STA DLY5100 LDA DRX5110 SEC5120 SBC XU|}5130 BCS SKIP25140 DEC ADX5150 DEC ADX5160 LDA X5170 SEC5180 SBC DRX5190 SKIP2 STA DLX5200 CMP DLY5210 BCS XU}}LINE5220 LDA DLY5230 LSR A5240 STA SL5250 LOOPY5260 JSR POINT5270 LDA DLY5280 CMP CT5290 BEQ END5300 LDA Y5U~}310 CLC5320 ADC ADY5330 STA Y5340 INC CT5350 LDA SL5360 CLC5370 ADC DLX5380 STA SL5390 BCS FIXY5400 LDA SLU}5410 CMP DLY5420 BCC LOOPY5430 LDA SL5440 FIXY SEC5450 SBC DLY5460 STA SL5470 LDA X5480 CLC5490 ADC ADX5500U} STA X5510 JMP LOOPY5520 XLINE LDA DLX5530 LSR A5540 STA SL5550 LOOPX JSR POINT5560 LDA DLX5570 CMP CT5580 BEQU} END5590 LDA X5600 CLC5610 ADC ADX5620 STA X5630 INC CT5640 LDA SL5650 CLC5660 ADC DLY5670 STA SL5680 BCSU} FIXX5690 LDA SL5700 CMP DLX5710 BCC LOOPX5720 LDA SL5730 FIXX SEC5740 SBC DLX5750 STA SL5760 LDA Y5770 CLCU}5780 ADC ADY5790 STA Y5800 JMP LOOPX5810 END RTS5820 XDRAWTO5830 LDA SX5840 STA X5850 LDA #15860 STA ADX5870 U} LDA PRX5880 CMP X5890 BEQ LEND5900 BCS XLREC5910 DEC ADX5920 DEC ADX5930 XLREC5940 LDA X5950 CLC5960 ADC ADU}X5970 STA X5980 LDA SY5990 STA Y6000 JSR POINT6010 LDA PRY6020 STA Y6030 JSR POINT6040 LDA PRX6050 CMP X60U}60 BNE XLREC6070 LEND RTS6080 YDRAWTO6090 LDA SY6100 STA Y6110 LDA #16120 STA ADY6130 LDA PRY6140 CMP Y6150 U}BEQ LEND6160 BCS YLREC6170 DEC ADY6180 DEC ADY6190 YLREC6200 LDA Y6210 CLC6220 ADC ADY6230 STA Y6240 LDA SXU}6250 STA X6260 JSR POINT6270 LDA PRX6280 STA X6290 JSR POINT6300 LDA PRY6310 CMP Y6320 BNE YLREC6330 RTS634U}0 LINE LDX #LNPRN/2566350 LDY #LNPRN&2556360 JSR PRINT6370 LDA #POINT&2556380 STA LOOPX+16390 STA LOOPY+16400 LDAU} #POINT&2556410 STA LOOPX+26420 STA LOOPY+26430 LNLOOP6440 LDA #16450 STA MAIN6460 JSR MAINLOOP6470 LDA 7646480U} CMP #2556490 BEQ LNST6500 JSR KEYCHECK6510 JMP LNLOOP6520 LNST LDA STRIG6530 BEQ LNST6540 LDX X6550 STX DRX65U}60 LDY Y6570 STY DRY6580 LDX #06590 STX MAIN6600 INX6610 STX EOR6620 LNLOOP2 JSR MAINLOOP6630 LDA X6640 STA SU}X6650 LDA Y6660 STA SY6670 JSR DRAWTO6680 LDA STIMER6690 WL CMP STIMER6700 BEQ WL6710 LDA SX6720 STA X6730 LU}DA SY6740 STA Y6750 JSR DRAWTO6760 LDA SX6770 STA X6780 LDA SY6790 STA Y6800 PUTJSR6810 NOP6820 NOP6830 NOU}P6840 LDA 7646850 CMP #2556860 BNE KCHEL6870 LDA STRIG6880 BNE LNLOOP26890 FIRL LDA STRIG6900 BEQ FIRL6910 LDAU} #06920 STA EOR6930 LDA COLOR6940 STA CP6950 JSR DRAWTO6960 LDA SX6970 STA X6980 LDA SY6990 STA Y7000 JMP LU}NLOOP7010 KCHEL JSR GET.KEY7020 CMP #327030 BEQ CANCELL7040 CMP #1167050 BEQ GTRACE7060 CMP #1147070 BEQ RAY708U}0 CMP #1077090 BEQ GKLINE7100 JSR ARROWS7110 JSR CHNUM7120 JMP LNLOOP27130 GTRACE JMP TRACE7140 GKLINE JMP KLINE7U}150 CANCELL LDA DRX7160 STA X7170 LDA DRY7180 STA Y7190 LDA #07200 STA EOR7210 JMP LNLOOP7220 RAY7230 LDA #$4CU} JMP7240 STA PUTJSR7250 LDA #RYPRO&2557260 STA PUTJSR+17270 LDA #RYPRO/2567280 STA PUTJSR+27290 LDA DUMMY+187300U} AND #1277310 STA DUMMY+187320 LDA DUMMY+197330 AND #1277340 STA DUMMY+197350 JMP LNLOOP27360 RYPRO7370 LDA 764U}7380 CMP 2557390 BNE RGETK7400 RGETF LDA STRIG7410 BNE RNOFIR7420 LDA #07430 STA EOR7440 LDA COLOR7450 STA CPU}7460 JSR DRAWTO7470 LDA SX7480 STA X7490 LDA SY7500 STA Y7510 LDA #17520 STA EOR7530 RNOFIR JMP LNLOOP27540 RGU}ETK JSR GET.KEY7550 CMP #327560 BEQ RCANC7570 JSR CHNUM7580 JSR ARROWS7590 LDA X7600 STA SX7610 LDA Y7620 STAU} SY7630 JMP RGETF7640 RCANC7650 LDA #$EA7660 STA PUTJSR7670 STA PUTJSR+17680 STA PUTJSR+27690 LDA DUMMY+187700 U} ORA #1287710 STA DUMMY+187720 LDA DUMMY+197730 ORA #1287740 STA DUMMY+197750 JMP CANCELL7760 KLINE7770 LDA #$4CU}7780 STA PUTJSR7790 LDA #KPRO&2557800 STA PUTJSR+17810 LDA #KPRO/2567820 STA PUTJSR+27830 LDA DUMMY+227840 AND U}#1277850 STA DUMMY+227860 LDA DUMMY+237870 AND #1277880 STA DUMMY+237890 LDA DUMMY+247900 AND #1277910 STA DUMMU}Y+247920 LDA DUMMY+257930 AND #1277940 STA DUMMY+257950 LDA DUMMY+267960 AND #1277970 STA DUMMY+267980 JMP LNLOU}OP27990 KPRO8000 LDA STRIG8010 BEQ KFIRE8020 LDA 7648030 CMP #2558040 BEQ KKEY8050 JMP LNLOOP28060 KFIRE LDA STU}RIG8070 BEQ KFIRE8080 LDA #08090 STA EOR8100 LDA COLOR8110 STA CP8120 JSR DRAWTO8130 LDA SX8140 STA X8150 SU}TA DRX8160 LDA SY8170 STA Y8180 STA DRY8190 LDA #18200 STA EOR8210 JMP LNLOOP28220 KKEY8230 JSR GET.KEY8240 U}CMP #328250 BEQ KCANC8260 JSR ARROWS8270 JSR CHNUM8280 JMP LNLOOP28290 KCANC8300 LDA #$EA8310 STA PUTJSR8320 SU}TA PUTJSR+18330 STA PUTJSR+28340 LDA DUMMY+228350 ORA #1288360 STA DUMMY+228370 LDA DUMMY+238380 ORA #1288390 SU}TA DUMMY+238400 LDA DUMMY+248410 ORA #1288420 STA DUMMY+248430 LDA DUMMY+258440 ORA #1288450 STA DUMMY+258460 LU}DA DUMMY+268470 ORA #1288480 STA DUMMY+268490 LDA SX8500 STA X8510 LDA SY8520 STA Y8530 LDA #08540 STA EOR85U}50 JMP LNLOOP8560 TRACE8570 LDA DUMMY+298580 AND #1278590 STA DUMMY+298600 LDA DUMMY+308610 AND #1278620 STA DUU}MMY+308630 LDA DUMMY+318640 AND #1278650 STA DUMMY+318660 LDA DUMMY+328670 AND #1278680 STA DUMMY+328690 LDA #TU}RJ/2568700 STA LOOPY+28710 STA LOOPX+28720 LDA #TRJ&2558730 STA LOOPY+18740 STA LOOPX+18750 LDA #08760 STA XOLDU}8770 STA EOR8780 JSR DRAWTO8790 LDA #2558800 LDX XOLD8810 STA TRADX,X8820 STA TRADY,X8830 LDA #POINT/2568840 U}STA LOOPY+28850 STA LOOPX+28860 LDA #POINT&2558870 STA LOOPY+18880 STA LOOPX+18890 LDA #08900 STA MAIN8910 STA U}XOLD8920 TLOOP8930 LDX XOLD8940 LDA TRADX,X8950 STA X8960 LDA TRADY,X8970 STA Y8980 JSR NOY8990 LDA STRIG9000U} BNE TNOPL9010 JSR POINT9020 TNOPL9030 LDA #49040 BIT STICK9050 BNE NO1009060 LFT LDA XOLD9070 SEC9080 SBC ADXU}9090 JMP DUN9100 NO1009110 LDA #89120 BIT STICK9130 BNE NO10009140 RT LDA XOLD9150 CLC9160 ADC ADX9170 JMP DUU}N9180 NO1000 LDA STICK9190 CMP #149200 BNE NO149210 UP LDA XOLD9220 SEC9230 SBC ADY9240 JMP DUN9250 NO149260 CU}MP #139270 BNE ONE9280 DWN LDA XOLD9290 CLC9300 ADC ADY9310 JMP DUN9320 ONE LDA XOLD9330 DUN9340 TAX9350 CMP #U}2559360 BNE NO2559370 INX9380 NO2559390 LDA TRADX,X9400 CMP #2559410 BNE NOLIM9420 DEX9430 NOLIM9440 STX XOLDU}9450 JSR EORPLOT9460 TW1 LDA VCOUNT9470 BNE TW19480 JSR EORPLOT9490 TW2 LDA VCOUNT9500 BNE TW29510 LDA 7649520 U}CMP #2559530 BNE PRESS9540 JMP TLOOP9550 PRESS JSR GET.KEY9560 CMP #329570 BNE NOCANCEL9580 LDA DUMMY+299590 ORAU} #1289600 STA DUMMY+299610 LDA DUMMY+309620 ORA #1289630 STA DUMMY+309640 LDA DUMMY+319650 ORA #1289660 STA DUMU}MY+319670 LDA DUMMY+329680 ORA #1289690 STA DUMMY+329700 JMP LNLOOP9710 NOCANCEL9720 JSR CHNUM9730 CMP #429740 U} BEQ GLFT9750 CMP #439760 BEQ GRT9770 CMP #459780 BEQ UP9790 CMP #619800 BEQ DWN9810 JMP TLOOP9820 GLFT JMP LFU}T9830 GRT JMP RT9840 EORPLOT LDA X9850 PHA9860 LDA Y9870 PHA9880 LDA DRX9890 STA X9900 LDA DRY9910 STA Y9920U} LDA #19930 STA EOR9940 JSR POINT9950 LDA SX9960 STA X9970 LDA SY9980 STA Y9990 JSR POINT010000 LDA #001001U}0 STA EOR010020 PLA010030 STA Y010040 PLA010050 STA X010060 RTS010070 CHNUM010080 CMP #48010090 BCC NBAK0101U}00 CMP #52010110 BCS NBAK010120 STA TEMP010130 SEC010140 SBC #48010150 STA COLOR010160 STA CP010170 ASL A0101U}80 ASL A010190 CLC010200 ADC #192010210 STA M1X010220 LDA TEMP010230 NBAK RTS010240 TRJ010250 LDX XOLD010260 LU}DA X010270 STA TRADX,X010280 LDA Y010290 STA TRADY,X010300 INC XOLD010310 RTS010320 ARROWS010330 STA TEMP010340U} CMP #43010350 BEQ MLEFT010360 CMP #42010370 BEQ MRIGHT010380 CMP #45010390 BEQ MUP010400 CMP #61010410 BEQ MDU}OWN010420 ABAK LDA TEMP010430 RTS010440 MLEFT LDA X010450 CMP #0010460 BEQ ABAK010470 DEC X010480 JMP ABAK010490U} MRIGHT LDA X010500 CMP #159010510 BEQ ABAK010520 INC X010530 JMP ABAK010540 MUP LDA Y010550 CMP #0010560 BEQ ABU}AK010570 DEC Y010580 JMP ABAK010590 MDOWN LDA Y010600 CMP #191010610 BEQ ABAK010620 INC Y010630 JMP ABAK010640 U}CIRCLE010650 GRED010660 WRITE010670 CHBRUSH010680 CHMIRRORS010690 OOPS010700 HELP010710 INSTRUCT010720 COLORS010730 U}BREDIT010740 ;010750 KOALA010760 DIR010770 ;010780 JMP MENU010790 MGFD LDA X010800 CLC010810 ADC #2010820 AND #2U}52010830 SEC010840 SBC #20010850 BCS NOLEFT010860 LDA #0010870 BEQ NORIGHT010880 NOLEFT010890 CMP #120010900 BU}CC NORIGHT010910 LDA #120010920 NORIGHT STA CTR1010930 CLC010940 ADC #44010950 STA SX010960 LDA Y010970 SEC0109U}80 SBC #19010990 BCS NOUP011000 LDA #0011010 BEQ NODOWN011020 NOUP011030 CMP #154011040 BCC NODOWN011050 LDA #1U}54011060 NODOWN STA CTR2011070 CLC011080 ADC #22011090 STA SY011100 RTS011110 MAGNIFY011120 LDX #MPRN/256011130 U} LDY #MPRN&255011140 JSR PRINT011150 LDA #0011160 STA MAIN011170 STA 53257011180 STA 53259011190 STA TXLO011200 U} LDX #0011210 ERPLR011220 STA PM0,X011230 STA PM1,X011240 STA PM2,X011250 STA PM3,X011260 INX011270 BNE ERPLR01U}1280 LDA #TEXT/256011290 STA TXHI011300 LDA #3011310 STA 53258011320 LDA #15011330 STA 705011340 STA 706011350 U} STA 707011360 JSR MGFD011370 TAX011380 LDY #0011390 INX011400 MOR INX011410 LDA #16011420 STA PM1,X011430 LSRU} A011440 STA PM3,X011450 INY011460 CPY #38011470 BNE MOR011480 MAGLOOP011490 JSR MAINLOOP011500 JSR MGFD011510 U} TAX011520 LDA #0011530 STA PM1,X011540 STA PM2,X011550 STA PM3,X011560 INX011570 LDA #255011580 STA PM2,X0115U}90 LDA #248011600 STA PM3,X011610 LDA #31011620 STA PM1,X011630 INX011640 LDA #0011650 STA PM2,X011660 LDA #8U}011670 STA PM3,X011680 ASL A011690 STA PM1,X011700 TXA011710 CLC011720 ADC #37011730 TAX011740 LDA #16011750 U} STA PM1,X011760 LSR A011770 STA PM3,X011780 LDA #0011790 STA PM2,X011800 INX011810 LDA #255011820 STA PM2,X01U}1830 LDA #248011840 STA PM3,X011850 LDA #31011860 STA PM1,X011870 INX011880 LDA #0011890 STA PM1,X011900 STA PU}M2,X011910 STA PM3,X011920 LDA SX011930 STA 53249011940 CLC011950 ADC #8011960 STA 53250011970 CLC011980 ADC U}#32011990 STA 53251012000 MW LDA VCOUNT012010 BNE MW012020 LDA STRIG012030 BEQ MFIRE012040 LDA 764012050 CMP #25U}5012060 BNE MKEY012070 BMKEY JMP MAGLOOP012080 MKEY JSR GET.KEY012090 CMP #32012100 BNE BMKEY012110 LDA #0012120 U}STA HPOS012130 STA 53248012140 STA 53249012150 STA 53250012160 STA 53251012170 JMP MENU012180 MFIRE012190 LDA 88U}012200 STA SCLO012210 LDA 89012220 STA SCHI012230 LDA #0012240 STA Y+1012250 LDA CTR2012260 ASL A012270 ROL YU}+1012280 ASL A012290 ROL Y+1012300 ADC CTR2012310 BCC CLEAR1012320 INC Y+1012330 CLEAR1012340 ASL A012350 ROL U}Y+1012360 ASL A012370 ROL Y+1012380 ASL A012390 ROL Y+1012400 ADC SCLO012410 BCC CLEAR2012420 INC Y+1012430 CLU}EAR2 STA NUML012440 LDA Y+1012450 CLC012460 ADC SCHI012470 STA SCHI012480 STA NUMH012490 LDA CTR1012500 LSR A0U}12510 LSR A012520 CLC012530 ADC NUML012540 BCC CLEAR3012550 INC SCHI012560 CLEAR3 STA SCLO012570 ;012580 LDA #0U}012590 TAX012600 DEL STA TEXT,X012610 STA TEXT+$100,X012620 STA TEXT+$200-8,X012630 STA PM0,X012640 INX012650 BNEU} DEL012660 STA 53248012670 STA 53249012680 STA 53250012690 STA 53251012700 LDX #40012710 ERSC STA SCALINE,X012720U} DEX012730 CPX #255012740 BNE ERSC012750 LDA #0012760 STA M2X012770 LDA NUML012780 STA LMS1012790 LDA NUMH012U}800 STA LMS1+1012810 LDA SY012820 SEC012830 SBC #20012840 STA XOLD012850 LDX #1012860 LDA #14012870 DODL STA K4U},X012880 INX012890 CPX #40012900 BNE DODL012910 LDA #94012920 SEC012930 SBC XOLD012940 BEQ NO4K012950 CMP #38U}012960 BCS NO4K012970 TAX012980 LDA #64+14012990 STA K4,X013000 LDA #0013010 STA K4+1,X013020 LDA #$90013030 U}STA K4+2,X013040 JMP MAGN013050 NO4K LDA #1013060 STA K4+37013070 LDA #K4+40&255013080 STA K4+38013090 LDA #K4+40/U}256013100 STA K4+39013110 MAGN LDY #0013120 STY CTR1013130 STY CTR2013140 STY CTR3013150 STY WHN013160 B38 LDA TXU}LO013170 STA TXRM013180 LDA TXHI013190 STA TXRMH013200 B10 LDA (SCLO),Y013210 STA TEMP013220 B4 LDA (TXLO),Y013230U} ASL TEMP013240 ROL A013250 ASL TEMP013260 ROL A013270 STA (TXLO),Y013280 LDA TXLO013290 CLC013300 ADC #10133U}10 STA TXLO013320 BCC NOCR1013330 INC TXHI013340 NOCR1 INC CTR1013350 LDA CTR1013360 CMP #4013370 BNE B4013380 U}STY CTR1013390 LDA SCLO013400 CLC013410 ADC #1013420 STA SCLO013430 BCC NOCR2013440 INC SCHI013450 NOCR2 INC CTRU}2013460 LDA CTR2013470 CMP #10013480 BNE B10013490 STY CTR2013500 LDA SCLO013510 CLC013520 ADC #30013530 STA U}SCLO013540 BCC NOCR3013550 INC SCHI013560 NOCR3 LDA WHN013570 EOR #1013580 STA WHN013590 BEQ TXLINE013600 LDA TXU}RM013610 STA TXLO013620 LDA TXRMH013630 STA TXHI013640 TXLINE INC CTR3013650 LDA CTR3013660 CMP #38013670 BNE B3U}8013680 ;013690 LDA #MCHARS/256013700 STA 756013710 LDA #MDLIST/256013720 STA 561013730 LDA #MDLIST&255013740 STU}A 560013750 LDY #MGPRN&255013760 JSR PRINT013770 JSR MGMLOOP013780 WK LDA 764013790 CMP #255013800 BEQ WK013810 U}JSR GET.KEY013820 LDA #0013830 STA 53258013840 LDA #10013850 STA 705013860 LDA #DLIST/256013870 STA 561013880 LU}DA #DLIST&255013890 STA 560013900 LDA #46013910 STA M2X013920 LDA ONOFF013930 BEQ NOSCAL013940 JSR CH.SX013950 NU}OSCAL013960 LDA #CHARSET/256013970 STA 756013980 LDA 89013990 STA SCHI014000 LDA 88014010 STA SCLO014020 JMP MEU}NU014030 MPRN014040 .BYTE "MAGNIFY: "014050 .BYTE " 0123"014060 MDLIST .BYTE $70,$60,""0140U}70 .WORD SCALINE014080 .BYTE "N"014090 LMS1014100 K4=LMS1+1014110 .BYTE ""014120 .BYTE "U}"014130 .BYTE $00,68014140 .WORD TEXT014150 .BYTE "N"014160 .WORD LINE1014170 .BYTEU} "D"014180 .WORD DUMMY014190 .BYTE "N"014200 .WORD LINE2014210 .BYTE "A"014220 .WORD MDLIST014230 MGMLOOP RTS01U}4240 *=$B000014250 MCHARS014260 .BYTE ""014270 .BYTE "***???"014280 .BYTE "U}"014290 .BYTE "***???"014300 .BYTE "******"014310 .BYTE "*********???"014320 .BYTE "????U}??"014330 .BYTE "???***??????"014340 .END014350 FILL LDX #FLPRN/256014360 LDY #FLPRN&255014370 JSR PRINT01U}4380 FLOOP014390 LDA #1014400 STA MAIN014410 JSR MAINLOOP014420 LDA 764014430 CMP #255014440 BEQ FLST014450 JSRU} KEYCHECK014460 JMP FLOOP014470 FLST014480 LDX #0014490 STX GET014500 INX014510 STX PUT014520 LDA SCHI014530 SU}TA NUMH014540 LDA SCLO014550 STA NUML014560 LDA X014570 STA XTAB014580 TAX014590 LDA Y014600 STA YTAB014610 TU}AY014620 LDA #$60014630 STA RET014640 JSR DO014650 RL CPX #3014660 BEQ FRL014670 LSR A014680 BCC CR1014690 CLCU}014700 ADC #128014710 CR1 LSR A014720 BCC CR2014730 CLC014740 ADC #128014750 CR2 INX014760 JMP RL014770 FRL TAXU}014780 LDA CTBL,X014790 STA OLDC014800 LDA #$C5014810 STA RET014820 NP014830 LDX GET014840 LDY YTAB,X014850 LDAU} XTAB,X014860 TAX014870 INX014880 JSR DO014890 DEX014900 DEY014910 JSR DO014920 INY014930 DEX014940 JSR DOU}014950 INX014960 INY014970 JSR DO014980 INC GET014990 LDA GET015000 CMP PUT015010 BNE NP015020 NOT015030 RTSU}015040 DO015050 CPY #192015060 BCS NOT015070 TXA015080 CMP #160015090 BCS NOT015100 STA FX015110 AND #3015120 U} TAX015130 STY FY015140 LDA #0015150 STA FY+1015160 LDA NUML015170 STA SCLO015180 LDA NUMH015190 STA SCHI01520U}0 TYA015210 ASL A015220 ROL FY+1015230 ASL A015240 ROL FY+1015250 ADC FY015260 BCC CE1015270 INC FY+1015280 CU}E1 ASL A015290 ROL FY+1015300 ASL A015310 ROL FY+1015320 ASL A015330 ROL FY+1015340 ADC SCLO015350 STA SCLO015U}360 LDA SCHI015370 ADC FY+1015380 STA SCHI015390 LDA FX015400 LSR A015410 LSR A015420 CLC015430 ADC SCLO01544V}0 BCC CE2015450 INC SCHI015460 CE2 STA SCLO015470 LDA OLDC015480 AND XTBL,X015490 STA TEMP015500 LDY #0015510 LV}DA (SCLO),Y015520 AND XTBL,X015530 RET CMP TEMP015540 BNE NPL015550 LDA (SCLO),Y015560 AND ANTBL,X015570 CLC01558V}0 ADC TEMP015590 STA (SCLO),Y015600 LDX PUT015610 LDA FY015620 STA YTAB,X015630 TAY015640 LDA FX015650 STA XTAV}B,X015660 TAX015670 LDA PUT015680 INC PUT015690 CMP GET015700 BNE OK015710 PLA015720 PLA015730 INC GET015740V} JMP NP015750 OK RTS015760 NPL LDX FX015770 LDY FY015780 RTS015790 CTBL .BYTE $00,$55,$AA,$FF015800 XTBL .BYTE 192,4V}8,12,3015810 ANTBL .BYTE 63,207,243,252015820 *=$B000015830 MCHARS015840 .BYTE ""015850 .BYTE "**V}*???"015860 .BYTE ""015870 .BYTE "***???"015880 .BYTE "******"015890 .BYTE V}"*********???"015900 .BYTE "??????"015910 .BYTE "???***??????" .BYTE "******"015890 .BYTE TU(ʔF 83P_ b8eudjk V bYeXdih V Z }bedih V b VL,=7] 0 => b8eudj V bYeXdih V bZ }ečdih V b VL,=?H8 2ɛ,~e0[:8 H8毥ƯLH>ALH>H8I8J8K8$L8Z}H84I8K85J8H8i q8:z8`H8 ?H8LH>hhL,=膻8到 ƼƼ8庅8凰 ƻƻ8幅ž7JZ} 2Ÿ`e渥ežߥ8待eL?J 2Ÿ)e渥eŽߥ8彅eLK?`Ň!ƻZ}e 2 2Ň`ňƼƼe 2 2ň`5! 0L??M?? u- :.L?Z}膲 u- > > ʭ >L? 2 tr"k LC !CL@LZ}ALAL?LD@E@@F@Z8)'Z8[8)'[8L@ >L@ 2  !C LCL@D@E@Z}F@Z8 Z8[8 [8L@LD@WE@AF@^8)^8_8)_8`8)`8a8)a8b8)b8L@ &L@ >Z}L@ 2 LC !CL@D@E@F@^8 ^8_8 _8`8 `8a8 a8b8 b8L?e8)e8f8)f8g8)g8h8)h8C?MZ}?=?L? >2?M??L? - 2,x8LB,xeLBx8LB Z}eLBʆ B B L4B 2 #e8 e8f8 f8g8 g8h8 h8L? !C*+-=L4BLRBLaBHHZ} 2 2hh`0480 iХ``+*-=$`ƇL^CɟL^CZ}ƈL^CɿL^CL:1i)8xxi,8ɚi`F) 0 Ѝ Ѕ񩸅© ЩZ} CJ& u- C i%JZ}ii Э $LD 2 ЍЍЍL:1XY & &eĐ & & &e扅eJJeZ}枅ЍЍЍТ(ХWFXF8XF(^8&NXFYFZFLkE}F~FFFZ}ÄĄńƥ…**iååiĥ ʄĥi枥Iť&НF1Q0 Z}0 F 2 Щ 10.Х /YXL:1MAGNIFY: 0123p`NZ}DN4DH8N:4AQF`***???***Z}???***************????????????***??????***???***XF