@L |}6CD l0C)HCC WhL/h `CmCDiD`  R@P1  Y0@R !L` L C D     )16CS S)  C)D1 p p 0 C9DI p|L~CiCDiD` L C D     )16CS S)  C)D1 p p }0 C9DI p|L~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLLI $j") $G% }H 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆  LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }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} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} (  DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LV  (Lr8j 3 v8ji`l ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} 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⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8.} 3E:}DISK OPERATING SYSTEM II DOUB.DENS.V2COPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 2.?}D2:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( G}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uptL~p pL@p`GHFH` p`B V xp0ddxp8/ i yp 0zppp %pLmpERROR-V} RIU T2WsLpI0180i1iW}ȠȑȑȑȑAȭ0ȭ1} pT$s %pTU$s %pTUr %pUTr %pU TTr %pU TX}zr %p UTs %p01Y us :UTɢr %p qR`UTr %pR 6pMDsEY} Lq`MMG BASIC COMPILER(C) 1984 special software systems Licensed tZ}o CRACKET BY GUCKY All rights reserved Ю [} OMPILER OR OS? D:CMP.OBJREMOVE CARTRID\}GES AND REBOOT.Rȍ  Y s `r`L̩QiͩiL]}pFH` p`B V xp0ddxp8/ i yp 0zppp %pLmpERROR-%LLLL#LXLjLwLLL.FIL 'D1:ASSEM.SGA'HH IAε< HH Gh _}h    荴hh`δhhɛ𡄂1 X` GDE2HBHI V`I` `} `HHIav BhLHILwEDH I8  -EDJKLED a}JKB V HXL8d/ i 9 0:H) Gh = #) &i b}GL`l *<SYSTEM ERROR: 100=KPRESS TOLX CONTINUE> YiFILE NOT FOUNDj}CAN'T FIND DUP.SYSXLCU`J c}l 5Z 5&̍5Z L(uZZ`ŕ`Ѣ $ l 0 L /CMP/ NO ROOM FOR TOKENY%YUY P-  ( d} ;' /CMP/ END OF PASS 16 ' $ ;' ERROR(S) DETECTEDLmT0  5 T U  ;'SYSTEM E e}RROR-- CAN'T RUN ASSEMBLERLmTD0:ASM.OBJ /CMP/ INSERT COMPILER DISK THEN PRESS UL5Z0  f}GhuZ`iH***8嶅巅5Zh 'XuZ L(vZ`iſuZ`5Z U ƶL5Z U g} U ƶ LuZY%YUY P-uZLE" U UL U U  ' ( ;' /CMP/ COMPILING L h}INE  $ uZ,lB0 F$ ;'MAINJSR INITlBL%Y L(&YYUY P-LM" U uZH K$D  ' $  i} ;'.BYT ' Uɛ L}" ;'',EOSuZL! OGuZL!LUYT9ƨ5 ( ;' /CMP/ COMPILER ERROR BAD FREE TEMPLmT%Y j}Tƨ0`YTY脚 Z'Ŷ ;'LDX #< $  ;'LDY #> $ ;'JSR STOY`樦6ZUZ` ;'STY ` ;'STA ` ;'S k}TX ` ;'LDA ` ;'LDX ` ;'LDY ` ;'TYA` ;'DEY`%Y`UYZŢYTբY $LY $LY $LY $L5Y $LEY $ l}LeY $LuY $LY `0 $LD:DATA.ASM LX8L` `0`i敥ƫƪ` m}YŢY %YY $ $桁` $ $`ơƠ` $Z` LR $ n}0 $L$ƏZ`槦\`\Ƨ` $Y`%YL$ $Y %UYL$ŢYL$YL$uZLz$`TALSᤚ & o}`L` Z'6Z`8ʆŒ % $L` SYM TAB FULL z%ȥ̠ p}ȩXZ ' L(Z``ȱ `  9ȱ q} & &i晥ƬL%̠ȱ ZZ`XZ8嘅JfJfJf ' L(Z` r}&&ѐ&`ѐ`脚 Z'&&&8嶅巅`̠ L5&hh曱 LC' s}HH`Ȅ+- 0G:L'ƼȄ0":H (h)ef 8嶅巅`0( t}( ( 0$0̩`' d /(J uffff` :( 8`h u}hȱȱȱi淠ȱlD:DSEG.ASM` F$)ȱ iiG L ) v}ȱ& ݭXe)k) ٥ԅՅL )X + ;' *=*+ ' $LL*")L)0 + ;' . w}BYT ' [+ ;'',EOS L*@@L* + Z*X3 ;' .DBY I ( 8ԅԩՅդԥ C L* ;' .BYT x} , Ԩ C氦 L*'")L* (L*  (8ƮŕL/)ŔL/)`ȱLݠ y}ȱLݠȱLݠȱL Z* &խX *eԥeեԅՅ 'UYY+YȽYY` A ; z}'JSR STO` A ;'JSR STO` A ;'JSR LD1` AL* A ;'JSR LD0` AL*YY `YUY `Y%Y ` {}Y`TY ' L(Y`†àª…†àȪ0' ' `HHX 8孅JfJfJf ' $hh` |}Y >%2#YYY 6* ٥ԅՅ ' L(Y L(Y`!#YYY L(YY L(YY` L(YY L(Y }}Y+ȩ1ȩ`ŢY >%2#YY>YY L(YY L ~}(YY` L(YY L(YYL9,UY >%ͅ2#eYuYvY N* ٥ԅՅ ' L(wY L(gY`!#eYuYvY }L(gYUY L(wYUY` L(eYUY L(uYUYL9,%Y >%ͅǥ4#5YEY<6Y>FY Z* ٥ԅՅ ' L(GY L(7YL-##5YE }Y<6Y>FY L(7Y%Y L(GY%YL- L(5Y%Y L(EY%Y 9, , F$Y^; XF   ;'*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR S }SEC.WOR VENDJMP MAINLAL/ ;'.FIL 'D:DATA.ASM' K$ ;'.FIL 'D:DSEG.ASM' F$0   (  ;'CSEC") #) ;'V }SEC") #)0T  ' $ ;' *=*+6步ũ֐ ;'SSEC") #) ;'VENDL99999.ENDLA6 " H# ##  }<  #  {#>  #  ;'JSR ADRLA ;'JSR TABLA ;'JSR CRLALW0 " H,YTƨL/Y N*R #eY } $ ;'+1 ;'LDA #EOSBNE *+5 r# # ;',Y `# # ;',Y # ;'BPL *-7LQ0 " r# # ;'STA P1 r# # ;'STA P1+1 r# # ;'ST }A P2 r# # # # {# # ;'JSR MVCY2   =+LAL0%YTƨ ++L0 ;'LDA FR0X' ;'ORA FR0+1L0 r# #X } ;'ORA # =+ ;'BNE *+5LAɚ ;'PLAPLALAɞ ;'RTSLA .L1D~(%Y" ;'LDX #DSECLq1L~( } R =+LA Z* ٥ ;'LDY #$FFLq1 ;'LDX #<~( ԥ C  ;'LDY #>~( ԥ C Y ;'JSR TRAP =+LA ;'JSR REST } =+LA  L 2%YA ;'JMP # L2 RL2Y  ;'JMP LL1 ;'JSR L Z* ٤ԥ C  =+LA }#  =+LA ;'JMP EXITLAɆ ;'JMP MAINLA+ " ++ * ;'JSR GR =+LA " ++ * ;'JSR CMD =+LA,  }h " + * ;'JSR L2 ++ * * ;'JSR IY, ;'PLTL2 ;'DRWL2 ;'POSL2 ;'PNT =+LAL33 ;'JSR N }OTE A ;'JSR ST0 A ;'JSR ST1L2ɬk H, "YTƨ r# ++ ;'FR0L\3 # {# + ;'FR0Lr3 # # + ;'FR0L3բY }$  ;'JSR SCOL =+LA " ++ " A ;'JSR SPRLAɀ^ H, + "TYƨ͕Yƨ + " r#բY $  ;'STA FR0 r# # } {# # # # ;'JSR VOX =+LAɂF " ++ ;'LDX FR0LDY FR0+1LV4 {# # # # ;'STX USRSTY USR+1LAɁH " ++! ;'LDA FR }0PHALDA FR0+1PHAL4 r# # ;'PHA r# # ;'PHALAɅ[ " r# ++ ;'FR0L4 # # + ;'FR0L4 #Y ;'JSR O }PEN =+LA ;'JSR XIO =+LA& " ++ AL65 " * ;'JSR PRN =+LA " ++ * ;'JSR CLOSELA ;'JSR GETLLA } ;'JSR GTL2LAɩ ;'JSR RNUM *LAɮ ɯL56 " + ;'JSR MOV {# # # #L5 B 4BY ;'JSR GETSL/6 } ;'JSR RSTRL/6ɯ ;'JSR FSPCL/6 ;'JSR SPR2 =+LA " H# ;'JSR GETNLA@&L6 "O }6 ++ =+ A ;'JSR INML6 + ++ " * A ;'JSR ADD *L6 A ;'JSR ADD * L(Y%YLA " =+ # LAɫ" };'JSR GETL7 ;'JSR STAT *LAɪ ++ * ;'JSR PUTLAL7 " " f* d$ =+LA H# ++ " * ;'LDX #< #  ;'L }DY #> #  ;'JSR SSCRLAL7 " f* $ $LG7 H# ++ " * ;'LDX #< #  ;'LDY #> # ;'JSR NDXLAFQ } " H#* " # Z* ٤ԥ C ;'LDA #0JSR IFPL=8 ++ " * ;'JSR PEEKLA " + =+ ++ * * L(YUYLAəL8 }"T Z* ;'LDY #ԥ C L8 ++ * ;'JSR FPILDY FR0 W# N* ٤ԥ C L8 + ;'JSR MOV *L8 ++ * }* ;'JSR POKLA7 " + ;'JSR MOV *L"9 ++ * * ;'JSR MVX =+LAL9 " H,YTƨ3- N* ٥ԅՅ B }* 8孅ԥ宅 ' AL9 H# H# +3 " {## <  #  ## >  # ;'JSR LD0 A ;'JSR SUBJSR FPI C+ d$ƨ : }`Y%&) *ɓL< "Le:Le: Z* N*Y% fL\:& `L\:)O6 L\:*  D ' }AL<C= N* 8 '%Y+%YȽ%Y%Y z$L< H#YL!;6Z5Y-5Y16Y7Y }EY-EY1FYGY " A ;'JSR LD1 {# # # # ;'JSR SADL<Y%ɓLt; ++ ALH; + " + AYɓ ;'JSR ADD }L< ;'JSR ADIUZL<&L; ++ A ;'JSR ISUBL< + " + A ;'JSR SUBL<)( ++ AL; + " + A ;'JSR LOR }L< ++ AL; + " + A ;'JSR LANDLALA/5L=ŢY $Y $ H, +YTƨYTƨ " H##6Z " r# # ;'ST }A C1 r# # ;'STA C1+1 r# # ;'STA C2 r# # ;'STA C2+1 r# # ;'STA P1 r# # ;'STA P1+1 r# # ;'STA P2 r# # ;'ST }A P2+1 ;'JSR 8Y/< = S  LALNGLGEEEETTQGNLGLEEEETTQ#L}= " H# +, ++ " * A ;'JSR 8Y< }= Lw= A ;'JSR 8Y = =  LADUL > " H# ++ " * ;'JSR 8Y== = =  LASCUAVLAAC S }RFXLCSSAIPSPSFTHSSAEDTO INRPOLQGBNDTTTPRRRCLNRNS NDEOGGRNSTLKGGIɭ#UYL= Z* ' " ALA? Z*I } ' A =+LA " H# ++ " * ;'JSR NEGLA$ɔ'uɒL1?#Ll?L? " H# ++ AL> + " +Yɔ ;'JSR FPI } AYɔ ;'JSR MULL? ;'JSR MLIUZL? " H# ++ A ;'JSR IDIVL? + " + A ;'JSR DIVL? " H# ++ A ;' }JSR IMODL? + " + A ;'JSR MODL? " H# ++ A ;'JSR IEXPL? + " + A ;'JSR EXPLA( " H# ++ " * ;' }JSR NOTLA@B CALH@UY $ , " H#YB 4B ;'JSR LENLE@C 4B ;'JSR ADRLE@A B 4B ;'JSR VALLE@ 4B ;' }JSR ASCLAQ) " H# ++ " r# #Lf@ # ;'JSR PDLLA " ++ " * ;'JSR COLLA>. ++ " * ;'JSR CHRO6 }' AaB z$LA=. ++ " * ;'JSR STRdB ' AaB z$LALA4%YT " % L(%YZ A ;'JSR STO%Y z$ =+ }LAK. ;'LDA # Z* ٥ C  ;'JSR SCB2LA ++ * ;'JSR SCBLA ( ;'*** ILLEGAL CODE  LZ =+L }( C+ d$L(ZLz$` {## <  #  ## >  #L {## <  #  ## >  #L {# # # # ;'STX FR1STY FR1+ }1` ++ " {# # #L# {# ;'FR0 # ;'FR0+1`S0@ Z $LMGLz$ $ $ ٥ 'Z z$Ʌ`H }H FhhuZ<>ȱ ݥ R ' L(%YZY % P- FY % % P-` 'L$ uZ`uZ5uZL }GC6uZLGC {CuZ%&` $ {C $Y %UYY % P-uZ%&` CuZ$ 'ɒ` $ C % P-uZ$' }ɒ` CuZ#` $ C % P-uZ#`ƭuZ( $ C $Y %UYLP-uZ+ FuZ, RL LyDuZON@H }FBQACD;E7G3I/J+K'L#MPREST =>LD $ uZ: R FUY % $Y P }-$ƭY>=ƭuZ, RLFL ?LE : RH FYUY % P- T F$ r# ;'#>Z $ ;'-1PHA r# ;'#< }Z $ ;'-1PHALDA #>USX-1PHALDA #%LL !Y P- F$ ;'BCS *+5 %ƨLM F$ A ;'BIT Y $ ;'BMI *+9JSR GTBCS *+12BCC } *+7JSR LTBCS *+5 Y%Y $UY P-Y LvR   #H $ uZ2.5Z R P$ L(%YuZ $ }YUY P-LvR%YLIN FY %UY P- F$ =+ ;'LDX FR0uZH T hH> F$ ;'DEXBNE *+8 Y L(%YuZUY }P- Y L(%YZUY P-L(N F$ ;'DEXBNE *+5 Y L(%YuZUY P- h F$ mB %%YTƨLvR FYUY % P-Lv }RLO $  U  RY%YUY P-LN 5ZS 2% uZ+( $ $ FuZ, R % P- LN $Y }%YUY P- % P-L O5Z CY % P-uZLvR"L_O 5Z 2% Y%YUY % P-LUO5Z CY % P-uZLvR }3 $ F$ ;'JSR LPR LO (LcP $  ULO RLO FY % %UY P-LO$Y % P-LOYUY % } P-uZY%YUY P-LPuZ uZ&"LOLOY%YUY P- $3% F$ ;'LDA #$70STA ICBJSR CLO }SE (LvR) *H U U FhYUY % P-LvRL@Q TZ z$ FuZ R %YUY P- Y %%Y }z$UY P- U2iſ)  P$ Y L(%YuZUY P- L)Q U uZ RGuZ F$Z $ mBLvR& FuZ } R FY % P-LvR$' ɤ &Y%YUY P- LvR%A uZ$ F %Y P- F$ ;'JSR RUNL }vR F$ ;'JMP MAINLvR2, F F F FY % +% $% P-LvR0# $ F F F % $% P-LvR+ F+Y }%UY P-LvR ` RLyRjB $MG %%YMG` F$ ;'LDA #0JSR SCB2` ( 7 ;'BAD INPUT FROM BASIC FI }LETOKEN = uZ C  LmT! ;'ILLEGALLY PLACED STATEMENTL,T ;'CAN'T COMPILE STATEMENTL,T ;'GOTO/GOSUB VAR OR EXP }.L,T ;'VARIABLE LINE #L,T ;'ILLEGAL NEXTL,T ;'DYNAMIC DIM NOT ALLOWEDL,T ;'NEXT WITHOUT FORL,T ;'FOR/NEXT } TOO DEEPL,T ;'RE-DIMENSION ERRORL,T ;'SYNTAX ERRORL,T ;'UNDIMENSIONED ARRAY ;' IN LINE  }C ;'SKIPPING STATEMENTɢT C)A  ;'COMPILATION ABORTEDT l  vR CĚL!INSERT DISK WITH DUP.SYSPRE }SS RETURN>CONTINUE OR ABORT (C/A)? ˩AZʅ˅ ' L(Z` FYUY %LP-L@U榢Lȹ:ɛ`V JX }`LU#D C U #X 0U U#XDUYʅ˅΅III- ; }'} T ;'REMOVE CARTRIDGES AND REBOOT.LUIe] e v ;'/// ;'MMG BASIC COMPILER ;'/// V2.0 }(C)1984 SPECIAL SOFTWARE SYSTEMS>>> INSERT PROGRAM DISKLVX XXj X X Xɛ  }  jX ɛLuV !U:DX:XȹXɛ 7$0 U U ;'FILE NOT BASICLV X  !U:D }:ȹɛ  0¢ XX FIXȹOX ȹ]X  U U U U8嶅 }巅 U U U U8庅廅 U U U U UƷƶ8ƻ01 U) **H ;'BAD TYPEhX % Uƶ } +$ $ K$ ;'JMP EXITDSECL!8`D1:SYSLIB.INTD1:SYSLIB.FP FOR DIRECTORY BASIC FILE?-->OBJECT FILE?-->NTE }GER OR LOATING POINT? D1:*.*Phɛ~LX`6 R R YLR R WR < HH Gh ``zLbbLc``fcdifYiPirf5bckbIcfiYc9gԅ ؠȹ0&0 L3`0Hh +xL\`h c蹀)Hh +x`h c` b}c! 4a /ASM/ System Error '` 4a /ASM/ Insert disk with DUP.SYS !b z xL` c`HhLchL+x0 BHI} VLs``H h`Lbc bc Ld 4a} /LOADER/LixhhHh cLPah +x `aLDE} ɛ c 4a Please Insert Correct Disk 4a PRESS ANY KEY TO CONTINUE LcpB͝DcEJKLV bc c@ }sc@BDEJK V5ϩ1 aLhb va0 BDE V aLb0BDEJK VL}s` a a@ sc sc BgDaEJK Vhaha5ϩ1ha aLb BD EH@I VLs` scLe }sc sc0 sc@ BLVHh bcLs`` DbpBHI V cH cp sch`K:J} c J`l s #`D 򩄅01:`"e}d!bjk V`}.Ls`}E F Ls``Le BgDaEJK V Ls` aLd B}D EH@I VLs` sc a`}'Ls`}'򩛙 sc Ld aL-e  BD}EJK V aLNe BD EH@I VLs` sc a`݅إ8 a l 4a} /ASM/ PASS 2} eLeʅ΅ii {cɛ} {cɛHHRXIXhh t mLl};}Ll >mLm}.Lg*L7g  Lm mLm qL$jLm mLm AX }YSP LmHH m}=J pLm̅˅ qLlLCf mLl}=}Ll m Lm nƪ0LmLm+%! qˆLm q̥Lmhh pſ}Lm qLlʦ譯ww m } LgLlў KuLuliiL}l mLm nƪ0(LiLhʦ qUƋLh˅̅ wʦ s s s} s s) СЙ q ymLm},Ll mLlLmh}'  qLh˅̅ }w0}'}' s步 sLCi qLhLm tdLm mLl mLlww Lh)Li L}i @Li)Li Li)Li ymLl},LlLi m̠Lm m}'ˠLm q tdLrLrɅ˅̅ w }sLmʥ mLl};LlA'} jv0 e t sLBjLm# Lj(L}l nƪ0G? Ll}'LlLl}} 'Lm汩 ymO})氥LDLl},}L5Ll}XLkYLm3L-Ll0} 륰Lk Lkl=iҥiѥ8҅}х0 Lkʥ-ʩLk ʩɥɥi Lli \ve}kv8Llɥ8 L lLlɥi Lle t s= s s s s/; %C9}ȊLmɥȩLmLmʦLlLlLmȩLmLm˕ xLt q`}} L Lo m Ln$Ln@Ln%Ln m: m mъ8}Lo mLo pҰVLo*Lo˅̅LoLo m mLo m mъ8х oLo+De}e*% ѩ%ELoLo %LoLo-^8姅妅*% ѩ%E %LoLoѩ}%E o}L2nLo`Lo} , );`} m80Lp m87ū`}͊HLEpLEpLEp ٥ѥҢ&  !&ѐ e҅eх ei hƩ}Lo8`8 _Weejf)􅌥ȱ8`8Шii}Й`ŃńZiiŌ卐L8qȥii` 4a} Overflow }errorLwwwќ=wuw`ii90`HHȊh˙ȥ̙h  }ɐȆe˅˥i̥`Lr8`i n`Ls lr`ą ` r ` ` `L` }a l ~ 4a} /ASM/ PASS 3Le `Lw%ȐLs 4a---->} cΐ 4a /ASM/ Sy}stem error}L ΐLsH 4a /ASM/ Ref: Line #-->hȹ} cΐ 4a /ASM/ Unresolved line number 8nr 4aContin}ue (Y/N) ? cY4N s 4a /ASM/ User abortLs`Ls`#``L tŅ08 r F`e˅iLw˅̅LwH}h`)h`h``)`Luei t8婅 teɀ w}ĩߢ`` w`HV wiʩ ` ` ` `8ei} ` ` ` th` t t ` ` ` ` ` ` `$ `LaiiiiiiiiiiiiiiijiiMhQhIhB}YTWORDBYSKIPAGENDOPTFILGENNOGSYMNOSNOCCNTCOUERRNOESANDIALISNOLADCANDASLBCCBCSBEQBITBMIBNEBPLBRKBVCBVSCLCCLDCLICLVCMPCPXCPYDEC}DEXDEYEORINCINXINYJMPJSRLDALDXLDYLSRNOPORAPHAPHPPLAPLPROLRORRTIRTSSBCSECSEDSEISTASTXSTYTAXTAYTSXTXATXSTYA )7ESao}} }        } a!$0PpXʈAL FHh(&f@`8xuuuuHhL`hL`e` tLa Lwe`H x wh })i0:0iHhL+xhLcJJJJ``PBDEH ILVH BDEh VL!y` bcTUz z }  si x 4a Select option: rint line map un program os Which?--> cPwDRЈ }LOx z xLix 4a Can't find DUP.SYS Insert correct disk` 4a/LOADER/ Can't open output deviceLz 4a To: ri }nter creen isk Which?--> cSVP(Dв 4a DEVICE:FILENAME?--> x xDEBJ}K VL!y 4aMMG Basic Compiler V2.0 Line Reference Map Object file: 轠ɛ cL/z +xL/z 4aѥ}ҩŚuLrzśjLEȱ:> 4aLine # ф cLz +x 4a= ѪѨ '` 4aiѥiҥi}iLaz scLix 4aLs`l @DEC JSR PR` ؠȹ0&0 L3`0Hh +xL\`h c蹀)Hh +x`h c` b1; D:SYSEQU.ABC; ATARI BASIC COMPILER V2.0; SYSTEM EQUATE FILE; (C) 1984 SPECIAL; SOFTWARE; SYSTEMS}; Licensed to; MMG MICRO SOFTWARE; All rights reservedEOS = 155S0 = $480FR0 = $D4FR1 = $E0ICB = $85P1 = $8}CC1 = FR0P2 = $90C2 = $92USR = $94AFP = $D800XPO = $DDC0LOG = $DECDCLG = $DED1SYS *=$2403INIT *=*+3EXIT } *=*+3CLR *=*+3NDX *=*+3MVX *=*+3SSCR *=*+3SAD *=*+3MVC *=*+3MVC2 *=*+3FPI *=*+3LD0 *=*+3LD1 *=*}+3STO *=*+3MOV *=*+3GETL *=*+3GTL2 *=*+3RNUM *=*+3RSTR *=*+3GETN *=*+3GETS *=*+3CR *=*+3TAB *=*+3P}RN *=*+3SPR *=*+3SPR2 *=*+3LPR *=*+3OPEN *=*+3CLOSE *=*+3SCB *=*+3SCB2 *=*+3PUT *=*+3GET *=*+3STAT }*=*+3FSPC *=*+3XIO *=*+3CMD *=*+3INT *=*+3IFP *=*+3RND *=*+3SIN *=*+3COS *=*+3ATN *=*+3SQR *=*+}3ABS *=*+3SGN *=*+3USX *=*+3FRE *=*+3LT *=*+3LE *=*+3GT *=*+3GE *=*+3EQ *=*+3NE *=*+3L}TS *=*+3LES *=*+3GTS *=*+3GES *=*+3EQS *=*+3NES *=*+3ADR *=*+3ASC *=*+3LEN *=*+3VAL *=*+3STR } *=*+3CHR *=*+3ADD *=*+3SUB *=*+3ISUB *=*+3MUL *=*+3DIV *=*+3IDIV *=*+3EXP *=*+3IEXP *=*+3NEG *=}*+3LOR *=*+3LAND *=*+3NOT *=*+3INM *=*+3POK *=*+3PEEK *=*+3GR *=*+3COL *=*+3SCOL *=*+3POS *=*+3}IPOS *=*+3PLT *=*+3IPLT *=*+3DRW *=*+3IDRW *=*+3STK *=*+3STG *=*+3PDL *=*+3PTG *=*+3VOX *=*+3TRA}P *=*+3REST *=*+3ADI *=*+3MLI *=*+3PNT *=*+3IPNT *=*+3NOTE *=*+3ST1 *=*+3RUN *=*+3BYE *=*+3DOS } *=*+3ST0 = STO.FIL 'D:ASSEM.SGA'; SYSTEM EQUATE FILE; (C) 1984 SPECIAL; SOFTWARE; SYSTEMS+$1L 2L>%L+Lx%L'L'L'L(L(L(LLLLLL*L*LE(L(Lk*LR(L@*L|'LM,L*L!(L9'LJ'Lk'L&L&L*L*L&'Ls(LP'L&L00L[0L },L-L-L/Lf-Lb0Lk0L)L)L%L%L%L%L%L%L&L&L"&L+&L9&L2&L4)L;)LJ)Lg)LW,L&)L&L&L&L&L&L&L-L,L6,LF&LS&L@&L&L'L'L!}0Lt'L0L0L0L01L31LJ1LM1L1L1L1L1L1L'L'L)L)L 1L 1L0L)L'L%L% +膚 ɩҍD҅ 2 22"}2 '2222 ` +Lq +l &0JQ &A0?F ݥE07, `ڥ0.,!" &#}0 & & à. 8` D` `& `& `& `&Ԑ `& `&ͥ ݥзг ݥФьɛ$} &0 &0 `ԥ`Ɠƒ` ?,L& `ڰ%` fڰ` ڰ` ?,L& (۰` L+ ݢ. fL %}٥ Ʌ` ٥ԅ`TU HH k'hhL+ B VԩL٩p &PKJBD&}EL+ ٥ԅ`Ę eĘ F*L' ?, ٠` ٠ԅԄL٘7+``&դԦ&eԅԊe'}eԅԥeՅ`L 'ԨL݆Ԅ ?, eԥe`@GԄ ?,ɛ F*0 ` ( ؐL+ȹɛ(}꩛`f ?," (f ?, 8fԆՅɛ摥0L($0`2 2)}L+ (,ɛM (M ( )ɛ )򩀅` ٥ԍ`ԄLنԄLنɛ*}ԆLن ?,󅐩f ( ؐ0LM(ԅԥՅL82ԭ 2Lن` ?, eԥe` ?+}, *ԦԄզՄFԐ eਊe&Ԇfؐ ԅԩՅ`؄քע .*Ե 8`R晄 ^*,}L+`GHFH` *0ɛȄ ؐL+ɛ F*` F*` ٦HI BL+՝HI-}B VL+L?* *򦅩HIDEB Vú5,hh7+l5, ,0dd ,.}8/ i , 0,, * Trace:BASIC exit I`Դ0}` W,L* )ԩ-ȘH h00,)`@?"6?D'8h4d=u#@(>33!1}fffg?@W)WyQB'h M,ԭ ҍ,) ٢Ԡ, L( ?,L- ݥ Q0OLD')ԥ)8@0=,j,H2} ޢ hԅ`, L+0t8??Ԣ ݢ, ڢ, fک ݢ ?, (ۢ fڢ, 3} (n Ƞ, e)`Π, L(ۥIԩ, - IԢ>^ԝ ڢ ݢà. @ݢ7} ݢ ݢ. @ݢ (ۢ ڢ ڢ fڭI miϪi. fhIԥ Π, `LD8}ڥ)D"@Dڔ à. ``ԅL٥I`à. (`` k' ٢`BԝK)I JD0EL+S9}:)H)h y` ?, ?, ٥TԅUՅV`&B +Nԩ ݦLԽML ?, ?, ٠%LMԝN:}BL+ ?, d1` BHIL+ ?, d1`B JKL+ 00 ٥ԅUՅV ?, 00 ٥ԅT`)ҩҊ H) hҘ;}` ٥)xԩL ٥))L &L& ٥)pԩL ٥)|L&L & $L&L*L*L&'Ls(LP'L&L00L[0L`$0L 2L>%L-Lx%Lo(L(L(L(L8)L6)L%L%L%L%L%LY,Ld,L(L)L!,L(L+L$(L*.L,L(L'L'L'Lm'Lv'L,L,L'L(L'L'L.L.Ls=}.L.L.L.L.L.L.L'*L2*L&L&L.&L=&LF&LQ&Lk&Lr&L{&L&L&L&L)L)L)L)L4.L)L:'L'L&LL'L['LR'L*L*L.L&L&L&La'LB(LR(L>}.L(L&/LA/L>/L/L/L/L/L 0L0L30LK0L/L^(Lj(L)'L@'Lw/Lz/LW/L%L'L%L% -膚 ɩҍD҅ 2 22?}2 a(2222 ` -Lq -l ԤՄԅ`ȱ`ȱ`ȥ`@}ԑȥՑ`ԤՄ`ԤԅդՅ` '0=D '04.5 '0.( '0 ' ' 8`ԅ`A} & & & &ѐ & &ʥ %аЪ %Зьɛ &0 &0 `B}ԥ`Ɠƒ` % &LW* %LW* %օ0֥0 W*` %eԥe` %Le* % % s*L% %Ls* % &L* %L* %C}L% % Ʌ` BLV䅆L' %ԅ`TU HH 'hhL, B VԩL%p v'PD}KJBDEL, &fLA) %ԅ`Ę eĘ +L4( % & %` %Ԅԅ`E}-``&eԅԥeՅ`L% o(ԨL%Ԅ & %eԥe` Ԅ &ɛ +0 ` h) ذF}I ( 8ԅԩՅL%L,ȹɛ꩛` h)f & 8fԆՅɛ摥0G}LC)$0`2 2L,(,ɛM(M( )ɛ )򩀅` %ԍ`ԄL%H}ԄL%ɛԆL% &󅐩f A) ؐL(L8,ԅԥՅL%82ԭ 2L%ԤՄԅեI}`8ե`eեe` F* O+fL% F* +fL%8ԨՄԅL% & F*ԥՄԩՅօפԥFf K+J}ԥ O+ԅՅԥզЦ`ԅՅʩ0F+A+ F+ 08f$˹ `' dK} +1ԦԄզՄFԐ eਊe&Ll+Ԇ`hh L, +Ff&֐ݥ ԆՅԠ&&&8થL}օԈ`քע +Ե 8`晄 ,L,`GHFH` Y,0ɛȄ ؐL,HI h M}8ԅԩՅL%?W, ,򦅩DEBHIL,ɛ +` +` %HI BN}L,՝HIB VL,L%B Vú.hh-l. -0dd-8/ i - 0-O}- ,@. ,... + x' $(.Ԏ.8ե *.LW-- , d,ɛD(C` ذ -L- -L 2 P}-. ,L- - -L-l lp '8`ERROR- ?Run address> BASIC exitTrace:S8Յթԅ` 4.L,Q} .-ȘH *h00,)` & ҅ԭ ) *օեׅ` L,0թԅթᨊR}```Յ`8Յթԅ`0 ԩ`ԅ`` ' %`BԝK)I J"D/ELVS:.)H)h S} y` & % & %TԅUՅV`&B ,NLսM` & %ԝL՝MN%BL, & /` BHIL, T}& /`B JKL, %ԅUՅV & %ԅT`)ҩҊ H) hҘ` %)xԩL% %))LcU}&LZ& %)pԩL% %)|LZ&Lc& ^0L-à. (`$L'L'Lm'Lv'L,L,L'L(L'L'L.L.LsWFIH nFF nFF nFԠF nFF nF G nF L4F>G 3GLF>G 3GLF eH tLFDE!W} BHILVYOU MAY EXECUTE THE FOLLOWING OPTIONS: 1. CONVERT DRIVE 1=>DOUBLE DENSITY 2. CONVERT DRIVE 2=>DOUBLE DEN!X}SITY 3. RETURN TO DOSPLEASE SELECT YOUR OPTION BY NUMBER:N@  ԍ Y٩ک۩O !Y}Y0 G nF GLFG nF GLFFH nF`YOUR DRIVE HAS BEEN CONVERTED TO DOUBLE DENSITY!Z}THIS DRIVE Χ BE CONVERTED TO DOUBLE DENSITY. PLEASE CHECK YOUR SYSTEM. PRESS ANY KEY TO CONTINUEoH n![}FLG}PLEASE FLIP YOUR MASTER DISK OVER TO SIDE TWO.} CHANGE DENSITY OF DRIVES!\}FFԠF nFF nF G nF L4F>G 3GLF>G 3GLF eH tLFDE XXYYCOABXYCCD@9@G@@@ddddd @%`};I*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR SSEC.WOR VENDJMP MAINMAINJSR INITL10LDX #X13JSR LD0JSR GRL15a},"@@ F:,"@y@x ++-%A%A%A$@@ A`)@%`}  dd ,dd@Ud +@ n36-6-@9'6-36-@Gx'6-%a}6-@'6-@6-@ 6-@#11;A,;A,;A,;A,N67@,.-67%b}A<A,.<67@,.B6.H6.N6. %!6-6 % 6-6 %!6-6 % 6-6%c} 6-%6-%k 6-%,#,@y&1,@&G,@y&@&U,@%k,@y&@%%d}',A&',@y&A& @6-@!@6-6@Q +,@:7A,,%e}@:7A,,Q,@y&@:7A,,@:7A,,W),@:7A,,@&@:7A,,W,@y&@:7A,,@&%f}@:7A,,W),@:7A,,@%@:7A,,W,@y&@:7A,,@%@:7A,,W),@:7A,,A%g}&@:7A,,W,@y&@:7A,,A&@:7A,, 6.6.)67@<@,.>:,C67@<@,.%q}"b'DOS SYSb*+DUP SYSb UAUTORUN SYSb{^CMP OBJb8ASM OBJbSYSEQU ABCbSYSLIB FP b<SYSLIB INTbVCHANGE B ]GR11 BASB(GR11 OBJCsASSEM SGACtDATA ASMC^ASSEM SGAC_DATA ASMCtASSEM SGACASSEM SG1C`DATA ASMCuDATA ASMCASSEM SGACDATA ASMCDATA ASMCASSEM SGACDATA ASMCASSEM SGACDATA ASM5ASSEM SGADATA ASMDSEG ASM>:,c67@,.7@<@,67@,.7@<@,"F:B7p, @" AP Ap6-F:%r}B7p,& @6-6@& Ap%!Ap6-@% Ap 6-6-F:B7p,& %};I*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR SSEC.WOR VENDJMP MAINMAINJSR INITL10LDY #0STY 18LDY #0STY 19LDY #0ST-u};I*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR SSEC.WOR VENDJMP MAINMAINJSR INITL10L20L30LDX #X16JSR LD0L=v}JMP EXITDSECD40.BYT '104,104,104,10,10,10,10,170,104,104,157,66,3,104,157,69,3,104,157,68,3',EOSD50.BYT '104,157,73,3,10Iy}DX #X2JSR STOA1JSR RNUMLDX #X3JSR STOLDX #X2JSR LD1LDX #X1-1JSR SADLDX #<=w}T1LDY #>T1JSR STOLDX #X3JSR LD0JSR CHRLDA #S0STA P1+1LDA T1STA P2LDA T1+1LDY #<1LDX #>=x}1JSR MVC2LDX #X2JSR INMLDX #X14JSR GTBCS *+5JMP A1L40L50L60LDX #X17JSR LD0JSR GR=z}X17LDY #>X17JSR ADDLDX #X18JSR STOA1L13LDX #X12JSR LD0JSR PEEKLDX #X20JSR EQLDA Iz}LDY 560LDA #0JSR IFPLDX #T1JSR STOLDY 561LDA #0JSR IFPLDX #X19JSR MULLDX #T1JSR AD={}DLDX #X12JSR STOL61LDX #X12JSR LD0LDX #X13JSR STOLDX #X12JSR LD0LDX #X21JSR ADDLDX #X22JSR STOA2L62LDX #X13JSR LD0JSR PEEKLDX #X23JSR EQLDA F=}}R0ORA FR0+1BNE *+5JMP A3LDX #X24JSR LD0LDX #X13JSR LD1JSR POKA3L63LDX #X13JSR LD=~}0JSR PEEKLDX #X25JSR EQLDA FR0ORA FR0+1BNE *+5JMP A4LDX #X26JSR LD0LDX #X13JSR LD=}9LDY #>X29JSR LD0LDX #X30JSR MULLDX #T1JSR ADDLDX #X31JSR STOA4L18LDX #X12JSR INMLDX #X31JSR GTBCS *+5JMP A4L20L100LDA #16JSR SCB2JSR CLOSEL110LDA #16I};I*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR SSEC.WOR VENDJMP MAINMAINJSR INITL10L20L30LDX #X16JSR LD0LM};I*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR SSEC.WOR VENDJMP MAINMAINJSR INITL10L20L30LDX #X16JSR LD0LY};I*=$3200.WOR DSEC.WOR CSEC.WOR VSEC.WOR SSEC.WOR VENDJMP MAINMAINJSR INITL10L20L30LDX #X16JSR LD0La} D:GR11.BASXXYYCOABXYCCD@9@G@@@ddddd @$$0L 2L>%L-Lx%Lo(L(L(L(L8)L6)L%L%L%L%L%LY,Ld,L(L)L!,L(L+L$(L*.L,L(L'L'L'Lm'Lv'L,L,L'L(L'L'L.L.Ls)}8 $8 '$8 !$d8 $8 $L^8LN7`L$ '/dev88O_`cb U$8 '$8 !$d(mJMP EXITDSEC.FIL 'D:DSEG.ASM'l 110LDX #X18JSR LD0LDX #X1JSR STOLDX #X19JSR LD0LDX #X2JSR STOLDX #X18JSR LD0LDX #X3JSR STOLDX #X20JSR LD0LDX #X4JSR STOL120LDX #X18JSR Li}D0LDX #X5JSR STOLDX #X21JSR LD0LDX #X10JSR STOLDX #X21JSR LD0LDX #X11JSR STOL130LDX #X22JSR LD0LDX #X6JSR STOLDX #X23JSR LD0LDX #X7JSR i}STOL140L150LDA #X26STA P1+1LDA #X8+0LDY #<1LDX #>1JSR MVCLDA #X26STA P1+1LDA #X8+99LDY #<1LDX #>1JSR MVC2LDA #X8STA P1+1LDA #X8+1LDY #<100LDX #>100JSR MVCLDA #X8STA P1+1LDA #X9LDY #<100LDX #>100JSR MVCLDi}A #X9STA P1+1LDA #X13LDY #<100LDX #>100JSR MVCLDA #X13STA P1+1LDi}A #X14LDY #<100LDX #>100JSR MVCL170LDX #X6JSR LD0LDX #X10JSR ADDLDX #X2JSR GTLDA FR0ORA FR0+1BNE *+5JMP A1LDX #X10JSR LD0JSR NEGLDX #X10JSR STOA1L180LDX #X6JSR LD0LDX #X10JSR ADDLDX #X1JSR LTLDA FR0ORA FR0+1BNE *+5JMP A2LDX #X10Ji}SR LD0JSR NEGLDX #X10JSR STOA2L190LDX #X7JSR LD0LDX #X11JSR ADDLDX #X4JSi}R GTLDA FR0ORA FR0+1BNE *+5JMP A3LDX #X11JSR LD0JSR NEGLDX #X11JSR STOA3L200LDX #i}X7JSR LD0LDX #X11JSR ADDLDX #X3JSR LTLDA FR0ORA FR0+1BNE *+5JMP A4LDX #X11JSR LD0i}JSR NEGLDX #X11JSR STOA4L205LDX #X6JSR LD0LDX #X10JSR ADDLDX #X6JSR STOLi}DX #X7JSR LD0LDX #X11JSR ADDLDX #X7JSR STOL210LDX #X5JSR LD0LDX #X16JSR ADDLDX #X5JSR STOJSR COLLDX #X6JSR LD0LDX #X7JSR LD1JSR IPLTLDX #Xi}28JSR LD0LDX #X6JSR SUBLDX #X7JSR LD1JSR IPLTLDX #X29JSR LD0LDX #X7JSR SUBi}LDX #X6JSR LD1JSR PLTLDX #X28JSR LD0LDX #X6JSR SUBLDX #T1JSR STOLDX #X29JSR LD0LDX #X7JSR SUBLDX #T1JSR LD1JSR PLTLDX #X30JSR LD0LDX #X7Ji}SR ADDLDX #X6JSR LD1JSR PLTLDX #X28JSR LD0LDX #X6JSR SUBLDX #T1JSR STOLDX i}#X30JSR LD0LDX #X7JSR ADDLDX #T1JSR LD1JSR PLTL211LDX #X31JSR LD0LDX #X7JSR SUBLDX #X6JSR LD1JSR PLTLDX #X28JSR LD0LDX #X6JSR SUBLDX #T1Ji}SR STOLDX #X31JSR LD0LDX #X7JSR SUBLDX #T1JSR LD1JSR PLTL213LDX #X5JSR LD0i}LDX #X27JSR LTLDA FR0ORA FR0+1BNE *+5JMP A5LDX #X21JSR LD0LDX #X16JSR STOA5L214i}LDX #X5JSR LD0LDX #X32JSR GTLDA FR0ORA FR0+1BNE *+5JMP A6LDX #X33JSR LD0LDX #X16JSR STOA6L215LDX #X18JSR LD0JSR COLLDX #X8+99JSR ASCLDX #T1JSR STOLDX #X13+99JSR ASCLDX #T1JSR LD1JSR PLTLDX #X8+99JSR ASCLDX #X28JSR ISUBLDi}X #T1JSR STOLDX #X13+99JSR ASCLDX #T1JSR LD1JSR PLTL216LDX #X8+99JSR i}ASCLDX #T1JSR STOLDX #X13+99JSR ASCLDX #X29JSR ISUBLDX #T1JSR LD1JSR PLi}TLDX #X8+99JSR ASCLDX #X28JSR ISUBLDX #T1JSR STOLDX #X13+99JSR ASCLDi}X #X29JSR ISUBLDX #T1JSR LD1JSR PLTL217LDX #X8+99JSR ASCLDX #T1JSR STOLi}DX #X13+99JSR ASCLDX #X30JSR ADDLDX #T1JSR LD1JSR PLTLDX #X8+99JSR ASi}CLDX #X28JSR ISUBLDX #T1JSR STOLDX #X13+99JSR ASCLDX #X30JSR ADDLDX #T1JSR LD1JSR PLTL218LDX #X8+99JSR ASCLDX #T1JSR STOLDX #X13+99JSR ASCi}LDX #X31JSR ISUBLDX #T1JSR LD1JSR PLTLDX #X8+99JSR ASCLDX #X28JSR ISUBLi}DX #T1JSR STOLDX #X13+99JSR ASCLDX #X31JSR ISUBLDX #T1JSR LD1JSR PLTL22i}0LDA #X8STA P1+1LDA #X9LDY #<100LDX #>100JSR MVCLDA #X13STA P1+1i}LDA #X14LDY #<100LDX #>100JSR MVCLDX #X6JSR LD0JSR CHRLDA #S0STA P1+1LDi}A #X8+0LDY #<1LDX #>1JSR MVC2LDX #X7JSR LD0JSR CHRLDA #S0STA P1+1LDA #i}X13+0LDY #<1LDX #>1JSR MVC2LDA #X9+0STA P1+1LDA #X8+1LDY #<9i}8LDX #>98JSR MVCLDA #X14+0STA P1+1LDA #X13+1LDY #<98LDX #>98JSR MVCL230LDY i}53770LDA #0JSR IFPLDX #X37JSR LTLDA FR0ORA FR0+1BNE *+5JMP A7JSR L250A7L240JMP L170L250LDY 53770LDAi} #0JSR IFPLDX #X15JSR STOL255LDX #X15JSR LD0LDX #X38JSR LTLDA FR0ORA FR0+1BNE *+5i}JMP A8LDX #X33JSR LD0LDX #X10JSR STOJMP L270A8L260LDX #X15JSR LD0LDX #i}X39JSR GTLDA FR0ORA FR0+1BNE *+5JMP A9LDX #X21JSR LD0LDX #X10JSR STOJMP L270A9L265LDX #X18JSR LD0LDX #X10JSR STOL270LDY 53770LDA #0JSR IFPLDX #X15JSR STOL275LDX #X15JSR LD0LDX #X38JSR LTLDA FR0ORA FR0+1BNE *+5JMP A10LDX #X33JSR LD0LDX #X11JSi}R STOJMP L300A10L280LDX #X15JSR LD0LDX #X39JSR GTLDA FR0ORA FR0+1BNE *+5JMP A11LDX #X21JSR LD0LDX #X11JSR STOJMP L300A11L285LDX #X18JSR LD0LDX #X11JSR STOL290LDi}X #X10JSR LD0LDX #X18JSR EQLDX #T1JSR STOLDX #X11JSR LD0LDX #X1i}8JSR EQLDX #T1JSR LANDLDA FR0ORA FR0+1BNE *+5JMP A12JMP L250A12L300RTS.FIL 'D:DATA.ASM' #X1hnCSECX17 .DBY 9X18 .DBY 0X19 .DBY 39X20 .DBY 47X21 .DBY 1X22 .DBY 20X23 .DBY 23X24 .DBY 100X25 .DBY 101X26 .BYT '',q}EOSX27 .DBY 2X28 .DBY 79X29 .DBY 95X30 .DBY 96X31 .DBY 191X32 .DBY 14X33 .DBY 65535X34 .DBY 99X35 .DBY 98X36 .DBY 5q}3770X37 .DBY 10X38 .DBY 85X39 .DBY 170VSECX1 *=*+2X2 *=*+2X3 *=*+2X4 *=*+2X5 *=*+2X6 *=*+2X7 *=*+2X10 *=*+2X11 *q}=*+2X12 *=*+2X15 *=*+2X16 *=*+2T1 *=*+6SSECX8 *=*+102X9 *=*+102X13 *=*+102X14 *=*+102VENDL99999.END0 *=*+2X11 *pp.L.L.L.L.L.L.L'*L2*L&L&L.&L=&LF&LQ&Lk&Lr&L{&L&L&L&L)L)L)L)L4.L)L:'L'L&LL'L['LR'L*L*L.L&L&L&La'LB(LR(L)}.L(L&/LA/L>/L/L/L/L/L 0L0L30LK0L/L^(Lj(L)'L@'Lw/Lz/LW/L%L'L%L% -膚 ɩҍD҅ 2 22)}2 a(2222 ` -Lq -l ԤՄԅ`ȱ`ȱ`ȥ`)}ԑȥՑ`ԤՄ`ԤԅդՅ` '0=D '04.5 '0.( '0 ' ' 8`ԅ`)} & & & &ѐ & &ʥ %аЪ %Зьɛ &0 &0 `)}ԥ`Ɠƒ` % &LW* %LW* %օ0֥0 W*` %eԥe` %Le* % % s*L% %Ls* % &L* %L* %)}L% % Ʌ` BLV䅆L' %ԅ`TU HH 'hhL, B VԩL%p v'P)}KJBDEL, &fLA) %ԅ`Ę eĘ +L4( % & %` %Ԅԅ`)}-``&eԅԥeՅ`L% o(ԨL%Ԅ & %eԥe` Ԅ &ɛ +0 ` h) ذ)}I ( 8ԅԩՅL%L,ȹɛ꩛` h)f & 8fԆՅɛ摥0)}LC)$0`2 2L,(,ɛM(M( )ɛ )򩀅` %ԍ`ԄL%)}ԄL%ɛԆL% &󅐩f A) ؐL(L8,ԅԥՅL%82ԭ 2L%ԤՄԅե)}`8ե`eեe` F* O+fL% F* +fL%8ԨՄԅL% & F*ԥՄԩՅօפԥFf K+)}ԥ O+ԅՅԥզЦ`ԅՅʩ0F+A+ F+ 08f$˹ `' d)} +1ԦԄզՄFԐ eਊe&Ll+Ԇ`hh L, +Ff&֐ݥ ԆՅԠ&&&8થ)}օԈ`քע +Ե 8`晄 ,L,`GHFH` Y,0ɛȄ ؐL,HI h )}8ԅԩՅL%?W, ,򦅩DEBHIL,ɛ +` +` %HI B)}L,՝HIB VL,L%B Vú.hh-l. -0dd-8/ i - 0-)}- ,@. ,... + x' $(.Ԏ.8ե *.LW-- , d,ɛD(C` ذ -L- -L 2 )}-. ,L- - -L-l lp '8`ERROR- ?Run address> BASIC exitTrace:S8Յթԅ` 4.L,)} .-ȘH *h00,)` & ҅ԭ ) *օեׅ` L,0թԅթᨊ)}```Յ`8Յթԅ`0 ԩ`ԅ`` ' %`BԝK)I J"D/ELVS:.)H)h )} y` & % & %TԅUՅV`&B ,NLսM` & %ԝL՝MN%BL, & /` BHIL, )}& /`B JKL, %ԅUՅV & %ԅT`)ҩҊ H) hҘ` %)xԩL% %))Lc)}&LZ& %)pԩL% %)|LZ&Lc& ^0L-à. (`$22b8b888F:L 2 $b8 !$ $d8 !)}$8 '$f8 !$8 '$d8 !$8 '$h8 !$8 '$d8 !$8 '$j8 !$8 '$j8 !$8 '$l822 !$8 '$n8 !$8 ')}$t88 $t89 $88d $89d $9z9d2|3 $z9)}9d $8 !$8 $8 $LE38 !$ $8 '$8 !$8 $8 $Lt38 !$ $8 '$8 !$}338 $)}8 $L38 !$ $8 '$8 !$8 $8 $L38 !$ $8 '$8 !$8 $8 '$8 !$8 $8 '$3{4)}8 !$8 $8 '$ $8 !$8 $$ %x8 !$8 $8 $$ %z8 !$8 $8 $$ %x8 !$8 $8 '$z8 !$8 $)}8|44 $$ %|8 !$8 $8 $$ %x8 !$8 $8 '$|8 !$8 $8 $$ %~8 !$8 $8 $$ %x8 !$8 $)}8 '$~8 !$4x58 $8 $$ %8 !$v8 $L15j8 !$8 '$8 !$8 $LV58 !$8 '$d8 !$ $9 $)}8 '$ݠ9 $8y55 $$ %9 $x8 $8 '$ݠ9 $8 $$ %9 $8 '$ݠ9 $z8 $8 $$ %9 $x8 $8 )}'$ݠ9 $z8 $8 $$ %5w69 $8 '$ݠ9 $|8 $8 $$ %9 $x8 $8 '$ݠ9 $|8 $8 $$ %9 $)}8 '$ݠ9 $~8 $8 $$ %9 $x66x8 $8 '$ݠ9 $~8 $8 $$ %89d $z99d $8)} !$ $8 $8 !$ $6u7z9 $98b $9{9b $ ҩ r$8 $)}LK7 N7L3 ҩ r$8 '$8 !$8 $L7v778 !$8 '$L78 !$8 $L7j8 !$8 '$L7d8 !$8 ')}$ ҩ r$8 '$8 !$8 $L78 !$8 '$L^887u8 !$8 $L8j8 !$8 '$L^8d8 !$8 '$8 !$d)} #0JSR SCB2LDX #X111JSR SPRJSR CRA13L2070LDX #X52JSR LD0JSR STGLDX #X52JSR EQLD-}X #T1JSR STOLDX #X25JSR LD0LDX #X52JSR GTLDX #T1JSR LANDLDA FR0BNE *+5JMP-} A14JSR L4000JMP L2010A14L2075LDX #X52JSR LD0JSR STKLDX #X20JSR STOL2080LDX #X20-}JSR LD0LDX #X92JSR EQLDA FR0BNE *+5JMP A15LDX #X16JSR LD0LDX #X21JSR STOLDX #X17JSR LD0LDX #X16JSR STOLDX #X21JSR LD0JSR NEGLDX #X17JSR STOJMP L2300A15L-}2090LDX #X20JSR LD0LDX #X64JSR EQLDA FR0BNE *+5JMP A16LDX #X16JSR LD0LDX #X21JSR STOLDX #X17JSR LD0JSR NEGLDX #X16JSR STOLDX #X21JSR LD0LDX #X1-}7JSR STOJMP L2300A16L2100LDX #X20JSR LD0LDX #X55JSR NELDA FR0BNE *+5JMP A17JMP L2070A17L2-}110JSR L20020LDX #X14JSR LD0LDX #X16JSR ADDLDX #T1JSR STOLDX #X15JSR LD0-}LDX #X17JSR ADDLDX #X98JSR MULLDX #T1JSR ADDLDX #X50JSR ADDLDX #X22JSR STOLDX #X22JSR SUBJSR FPILDX #T2JSR STOLDX #X22JSR LD1LDX #X7-1-}JSR SADLDX #T1JSR STOLDA #<1STA C1LDA #>1STA C1+1LDA T2STA C2LDA T2+1STA C2+1LDA #X99-}STA P1+1LDA T1STA P2LDA T1+1STA P2+1JSR NESLDA FR0BNE *+5JMP A18JMP L2150A18L2120JSR L20030LDA #0JSR SCB2LDX #-}X112JSR SPRJSR CRL2130LDX #X52JSR LD0LDX #X1JSR STOA19LDX #X1JSR INMLDX-} #X113JSR GTBCS *+5JMP A19JMP L2020.FIL 'D1:ASSEM.SGB'X1LDY #>X1JSR STOA19LDX #X1JSR INMLDX,HL2150LDX #X14JSR LD0LDX #X16JSR ADDLDX #X14JSR STOLDX #X15JSR LD0LDX #X17JSR ADDLDX #X15JSR STOJMP L2000L2300JSR L20010LDX #X12JSR LD0LDX #X21J5}SR STOLDX #X13JSR LD0LDX #X12JSR STOLDX #X21JSR LD0LDX #X13JSR STOL23105}LDX #X13JSR LD0JSR FPILDA #<2LDX FR0LDY #<0JSR SCOLLDX #X12JSR LD0JSR FPILDA #<2LDX FR0LDY 5}#<1JSR SCOLL2320JMP L2000L3000LDY 20LDA #0JSR IFPLDX #T1JSR STOLDY 19LDA #0JSR IFPLDX #X685}JSR MULLDX #T1JSR ADDLDX #T1JSR STOLDX #X68JSR LD0LDX #X68JSR MULLDX #T2JSR STOLDY 18LDA #0JSR IFPLDX #T2JSR MULLDX #T1JSR ADDLDX #X114JSR DIVLDX 5}#X41JSR STOL3010LDX #X41JSR LD0LDX #X115JSR DIVJSR INTLDX #X21JSR STOL5}DX #X115JSR MULLDX #X41JSR ISUBLDX #X41JSR STOL3020LDX #X41JSR LD0LDX #5}X116JSR DIVJSR INTLDX #X42JSR STOLDX #X116JSR MULLDX #X41JSR ISUBLDX #6}X117JSR ADDJSR INTLDX #X43JSR STOL3030JSR L30010LDA #0JSR SCB2LDX #X118JSR SPRJ6}SR CRLDA #0JSR SCB2LDX #X120JSR SPRLDX #X21JSR LD0JSR PRNLDX #X121JSR SPRLDX #X42JSR LD0JSR PRNLDX #X123JSR SPRJSR CRL3035LDA #0JSR SCB2LDX #X124JSR SPRLDX #X43JSR LD0JSR PRNLDX #X125JSR SPRJSR CRL3040LDA #16JSR SCB2JSR GETLDX #X5JSR STOL36}050LDY #255STY 54288JMP EXITL4000JSR L20040LDX #X25JSR LD0LDX #X50JSR SUBLDX #X256}JSR STOLDY #255STY 54286LDX #X101JSR LD0JSR GRL4010LDA #<4LDX #<0LDY #<4JSR SCOLLDA #<0LDX #<2LDY #<6}0JSR SCOLLDA #<12LDX #<0LDY #<1JSR SCOLLDA #<2LDX #<8LDY #<2JSR SCOLL4020LDX #X52JSR LD0LDX #X5JSR STOA20LDX #X52JSR LD0LDX #X4JSR STOA21L4030LDX #X98JSR LD0LDX #X6}4JSR MULLDX #X5JSR ADDLDX #X50JSR ADDLDX #T1JSR STOLDX #X58JSR LD0LDX #T1JSR SUBJSR FPILDX #T2JSR STOLDX #T1JSR LD1LDX #X7-1JSR SADLDX #T6 }1JSR STOLDA T1STA P1LDA T1+1STA P1+1LDA #X10LDY T2LDX T2+1JSR MVCLDA #<1STA C1LDA #>1STA C1+16 }LDA #<1STA C2LDA #>1STA C2+1LDA #X99STA P1+1LDA #X10STA P2+1JSR NESLDX #X50JSR ADDJSR COLL4040LDX #X4JSR LD0LDX #X79JSR ADDLDX #T1JSR STOLDX #6 }X63JSR LD0LDX #X5JSR SUBLDX #T1JSR LD1JSR PLTLDX #X4JSR INMLDX #X63JSR GT6}BCS *+5JMP A21LDX #X5JSR INMLDX #X63JSR GTBCS *+5JMP A20L4050LDX #X52JSR LD0LDX #<6}X1LDY #>X1JSR STOA22L4060LDX #X82JSR LD0JSR COLLDX #X15JSR LD0LDX #X79JSR ADDLDX6} #T1JSR STOLDX #X63JSR LD0LDX #X14JSR SUBLDX #T1JSR LD1JSR PLTL4070LDX #<6}X52LDY #>X52JSR LD0LDX #X22JSR STOA23LDX #X22JSR INMLDX #X56JSR GTBCS *+5JMP A236}L4080LDX #X54JSR LD0JSR COLLDX #X15JSR LD0LDX #X79JSR ADDLDX #T1JSR STOL6}DX #X63JSR LD0LDX #X14JSR SUBLDX #T1JSR LD1JSR PLTL4090LDX #X52JSR LD0LD6}X #X22JSR STOA24LDX #X22JSR INMLDX #X56JSR GTBCS *+5JMP A24LDX #X1JSR IN6}MLDX #X114JSR GTBCS *+5JMP A22L4100LDX #X64JSR LD0JSR GRLDY 560LDA #0JSR IFPLDX #T1JSR STOLDY 561LDA #0JSR IFPLDX #X68JSR MULLDX #T1JSR ADDLDX #X3JSR STOL4110LDX 6}#X3JSR LD0LDX #X70JSR ADDJSR MOVLDX #X71JSR LD0JSR POKLDX #X3JSR LD0LDX #6}X72JSR ADDJSR MOVLDX #X71JSR LD0JSR POKL4120LDY #128STY 512LDY #6STY 513LDY #192STY 54286L6}4130LDA #<4LDX #<0LDY #<4JSR SCOLLDX #X13JSR LD0JSR FPILDA #<2LDX FR0LDY #<0JSR SCOLLDX #X16}2JSR LD0JSR FPILDA #<2LDX FR0LDY #<1JSR SCOLLDA #<2LDX #<8LDY #<2JSR SCOLL4140RTSL5000LDA #0JSR SCB2LDX #X128JSR SPRLDA #0JSR SCB2JSR GETLLDX #<125LDY #>125STX FR1STY FR1+1LDX #X11JSR GETSLDA #X11STA P1+1LDA #X38+2LDY #<125LDX #>125JSR MVCL5005LDY #255STY 54286L5010LDA #32JSR6} SCB2LDX #<14LDY #>14STX FR1STY FR1+1LDX #X38JSR FSPCLDA #<0LDY #<4JSR OPENL5020LDA #32JSR SCB2JSR GT6}L2JSR GETNLDX #X40JSR STOJSR GETNLDX #X19JSR STOJSR GETNLDX #X14JSR STOJSR GETNLD6}X #X15JSR STOL5030LDA #32JSR SCB2JSR GTL2LDX #<125LDY #>125STX FR1STY FR1+1LDX #X11JSR GETS6 }LDA #X11STA P1+1LDA #X7+0LDY #<125LDX #>125JSR MVCL5040LDA #32JSR SCB2JSR GTL26!}LDX #<125LDY #>125STX FR1STY FR1+1LDX #X11JSR GETSLDA #X11STA P1+1LDA #X7+125LDY #<125LDX #>125JSR MVCL5050LDA #32JSR SCB2JSR GTL2LDX #<125LDY #>125STX FR1STY FR1+1LDX #6#}X11JSR GETSLDA #X11STA P1+1LDA #X7+250LDY #<125LDX #>125JSR MVCL5060LDA #32J6$}SR SCB2JSR GTL2LDX #<125LDY #>125STX FR1STY FR1+1LDX #X11JSR GETSLDA #X11STA P1+1LDA #6%}X7+375LDY #<125LDX #>125JSR MVCL5065LDY #192STY 54286L5070RTSL8000LDX #X52JSR LD06&}LDX #X23JSR STOL8010JSR L9000L8020LDA #<1STA C1LDA #>1STA C1+1LDA #<1STA C2LDA #>1STA C2+1LDA #X99STA P1+1LDA #X10STA P2+1JSR EQSLDA FR0BNE *+5JMP A25RTSA25L8030LDA #<1STA C1LDA6(} #>1STA C1+1LDA #<1STA C2LDA #>1STA C2+1LDA #X100STA P1+1LDA #X10STA P2+1JSR E6)}QSLDA FR0BNE *+5JMP A26JMP L8100A26L8040LDX #X23JSR LD0LDX #X50JSR ADDLDX #X23JS6*}R STOLDX #X51JSR LTLDA FR0BNE *+5JMP A27JMP L8010A27L8050LDX #X65JSR LD0LDX #X1JS6+}R STOA28L8055LDX #X133JSR LD0LDX #X1JSR ADDLDX #X28JSR STOLDX #X134JSR6,} LD0LDX #X1JSR SUBLDX #X29JSR STOL8060LDX #X28JSR LD0LDX #X76JSR LD1JSR 6-}IPLTLDX #X76JSR LD0LDX #X1JSR ADDLDX #X28JSR LD1JSR DRWLDX #X50JSR LD0JS6.}R COLLDX #X135JSR LD0LDX #X1JSR SUBLDX #X28JSR LD1JSR DRWLDX #X82JSR LD06/}JSR COLLDX #X28JSR LD0LDX #X135JSR LD1JSR IDRWL8070LDX #X29JSR LD0LDX #X76JSR LD1JSR IPLTLDX #X76JSR LD0LDX #X1JSR ADDLDX #X29JSR LD1JSR DRWLDX #X50JSR LD0JSR COLLDX #X135JSR LD0LDX #X1JSR SUBLDX #X29JSR LD1JSR DRWLDX #X82JSR LD0JSR COLLDX #X29JSR LD0LDX #X135JSR LD1JSR IDRWL8080LDX #X1JSR INM63}LDX #X132JSR GTBCS *+5JMP A28RTSL8100LDX #X24JSR LD0LDX #X136JSR ADDLDX #X1JSR STOLDX #X137JSR LD0LDX #X24JSR SUBLDX #X138JSR STOA29L8110LDX #X1JSR LD0LDX #X76JSR LD1JSR IPLTLDX #X1JSR LD0LDX #X135JSR LD1JSR IDRWL8120LDX 66}#X1JSR INMLDX #X138JSR GTBCS *+5JMP A29RTSL9000LDX #X23JSR LD0LDX #X5067}JSR ADDJSR FPILDX #X6JSR SSCRLDX #X50JSR SUBLDX #X24JSR STOL9010LDX #X2368}JSR LD0LDX #X16JSR MULLDX #X14JSR ADDLDX #X17JSR ADDLDX #T1JSR STOLDX #X23JSR LD0LDX #X17JSR MULLDX #X15JSR ADDLDX #X16JSR SUBLDX #X986:}JSR MULLDX #T1JSR ADDLDX #X50JSR ADDLDX #T1JSR STOLDX #X58JSR LD0LDX #T1JSR SUBJSR FPILDX #T2JSR STOLDX #T1JSR LD1LDX #X7-1JSR SADLDX #T16<}JSR STOLDA T1STA P1LDA T1+1STA P1+1LDA #X8.FIL 'D1:ASSEM.SGC'-1LDY #>X7-1JSR SADLDX #T14ULDY T2LDX T2+1JSR MVCL9020LDX #X23JSR LD0LDX #X16JSR MULLDX #X14JSR ADDLDX #}DY #>X17JSR SUBLDX #T1JSR STOLDX #X23JSR LD0LDX #X17JSR MULLDX #X15JSR AD:?}DLDX #X16JSR ADDLDX #X98JSR MULLDX #T1JSR ADDLDX #X50JSR ADDLDX #T1JSR STOLDX #X58JSR LD0LDX #T1JSR SUBJSR FPILDX #T2JSR STOLDX #T1JSR LD:A}1LDX #X7-1JSR SADLDX #T1JSR STOLDA T1STA P1LDA T1+1STA P1+1LDA #X9LDY T2LDX:B} T2+1JSR MVCL9030LDX #X23JSR LD0LDX #X50JSR ADDLDX #X16JSR MULLDX #X14J:C}SR ADDLDX #T1JSR STOLDX #X23JSR LD0LDX #X50JSR ADDLDX #X17JSR MULLDX #X15JSR ADDLDX #X98JSR MULLDX #T1JSR ADDLDX #X50JSR ADDLDX #T1JSR S:E}TOLDX #X58JSR LD0LDX #T1JSR SUBJSR FPILDX #T2JSR STOLDX #T1JSR LD1LDX #X7-1JSR SADLDX #T1JSR STOLDA T1STA P1LDA T1+1STA P1+1LDA #X10LDY T2LDX T2+1JS:G}R MVCL9035LDX #X23JSR LD0LDX #X54JSR ADDJSR FPILDX #X6JSR SSCRLDX #X24JS:H}R SUBLDX #X50JSR SUBLDX #X34JSR STOL9040LDX #X23JSR LD0JSR FPILDX #X6JSR:I} SSCRLDX #X1JSR STOA30L9045LDA #<1STA C1LDA #>1STA C1+1LDA #<1STA C2LDA #>1STA C2+1LDA #X99STA P1+1LDA #X8STA P2+1JSR EQSLDX #X26JSR STOLDA #<1STA C1LDA #>1STA C1+1LDA #<:K}1STA C2LDA #>1STA C2+1LDA #X99STA P1+1LDA #X9STA P2+1JSR EQSLDX #X27J:L}SR STOLDX #X133JSR LD0LDX #X1JSR ADDLDX #X28JSR STOLDX #X134JSR LD0LDX :M}#X1JSR SUBLDX #X29JSR STOL9046LDX #X52JSR LD0LDX #X32JSR STOLDX #X26JSR LD0LDX #X52JSR EQLDX #T1JSR STOLDA #<1STA C1LDA #>1STA C1+1LDA #<1STA C2LDA #>1ST:O}A C2+1LDA #X99STA P1+1LDA #X10STA P2+1JSR NESLDX #T1JSR LANDLDA FR0BNE:P} *+5JMP A31LDX #X23JSR LD0LDX #X50JSR ADDLDX #X16JSR MULLDX #X14JSR ADD:Q}LDX #X17JSR ADDLDX #T1JSR STOLDX #X23JSR LD0LDX #X50JSR ADDLDX #X17JSR MULLDX #X15JSR ADDLDX #X16JSR SUBLDX #X98JSR MULLDX #T1JSR ADDLD:S}X #X50JSR ADDLDX #X32JSR STOLDX #X32JSR SUBJSR FPILDX #T2JSR STOLDX #X32JSR LD1LDX #X7-1JSR SADLDX #T1JSR STOLDA #<1STA C1LDA #>1STA C1+1LDA T2STA C2LDA :U}T2+1STA C2+1LDA #X99STA P1+1LDA T1STA P2LDA T1+1STA P2+1JSR NESLDX #X32JSR STOA31L90:V}47LDX #X52JSR LD0LDX #X33JSR STOLDX #X27JSR LD0LDX #X52JSR EQLDX #T1JSR STOLDA #<1STA C1LDA #>1STA C1+1LDA #<1STA C2LDA #>1STA C2+1LDA #X99STA P1+1LDA #X10STA P2+1JSR NESLDX #T1JSR LANDLDA FR0BNE *+5JMP A32LDX #X23JSR LD0LDX #X50JSR ADDLDX #X16JSR MULLDX #X14JSR ADDLDX #X17JSR SUBLDX #T1JSR STO:Z}LDX #X23JSR LD0LDX #X50JSR ADDLDX #X17JSR MULLDX #X15JSR ADDLDX #X16JSR ADDLDX #X98JSR MULLDX #T1JSR ADDLDX #X50JSR ADDLDX #X33JSR STO:\}LDX #X33JSR SUBJSR FPILDX #T2JSR STOLDX #X33JSR LD1LDX #X7-1JSR SADLDX :]}#T1JSR STOLDA #<1STA C1LDA #>1STA C1+1LDA T2STA C2LDA T2+1STA C2+1LDA #X99STA P1+1LDA:^} T1STA P2LDA T1+1STA P2+1JSR NESLDX #X33JSR STOA32L9050LDX #X82JSR LD0JSR COLLDX #X28JSR LD0LDX #X76JSR LD1JSR IPLTLDX #X1JSR LD0LDX #X26JSR MULLDX #X76:`}JSR ADDLDX #T1JSR STOLDX #X50JSR LD0LDX #X26JSR SUBLDX #X24JSR MULLDX #T1JSR ADDLDX #T1JSR STOLDX #X34JSR LD0LDX #X32JSR MULLDX #T1JSR AD:b}DLDX #X28JSR LD1JSR DRWL9060LDX #X54JSR LD0LDX #X26JSR SUBJSR COLL9070LDX #X1JSR LD0LDX #X26JSR MULLDX #X135JSR ISUBLDX #T1JSR STOLDX #X50JSR L:d}D0LDX #X26JSR SUBLDX #X24JSR MULLDX #T1JSR ISUBLDX #T1JSR STOLDX #X34JSR LD0LDX #X32JSR MULLDX #T1JSR ISUBLDX #X28JSR LD1JSR DRWLDX #X82:f}JSR LD0JSR COLLDX #X28JSR LD0LDX #X135JSR LD1JSR IDRWL9080LDX #X29JSR LD0LDX #X76JSR LD1JSR IPLTLDX #X1JSR LD0LDX #X27JSR MULLDX #X76JSR ADDLDX #T1JSR STOLDX #X50JSR LD0LDX #X27JSR SUBLDX #X24JSR MULLDX #T1JSR ADDLD:i}X #T1JSR STOLDX #X34JSR LD0LDX #X33JSR MULLDX #T1JSR ADDLDX #X29:j}JSR LD1JSR DRWL9090LDX #X54JSR LD0LDX #X27JSR SUBJSR COLL9100LDX #X1JSR LD0LDX #<:k}X27LDY #>X27JSR MULLDX #X135JSR ISUBLDX #T1JSR STOLDX #X50JSR LD0LDX #X2:l}7JSR SUBLDX #X24JSR MULLDX #T1JSR ISUBLDX #T1JSR STOLDX #X34JSR LD0LDX #<:m}X33LDY #>X33JSR MULLDX #T1JSR ISUBLDX #X29JSR LD1JSR DRWLDX #X82JSR LD0JSR COLLDX :n}#X29JSR LD0LDX #X135JSR LD1JSR IDRWL9110LDX #X1JSR INMLDX #X24JSR GTBCS:o} *+5JMP A30LDA #<1STA C1LDA #>1STA C1+1LDA #<1STA C2LDA #>1STA C2+1LDA #X99STA P1+1LDA #X10STA P2+1JSR NESLDA FR0BNE *+5JMP A33RTSA33L9120LDX #X24JSR LD0LDX #X136JSR A:q}DDLDX #X1JSR STOLDX #X137JSR LD0LDX #X24JSR SUBLDX #X139JSR STOA34L913:r}0LDX #X1JSR LD0LDX #X76JSR LD1JSR IPLTLDX #X76JSR LD0LDX #X24JSR ADDLDX :s}#X1JSR LD1JSR DRWLDX #X54JSR LD0JSR COLLDX #X135JSR LD0LDX #X24JSR SUBL:t}DX #X1JSR LD1JSR DRWLDX #X82JSR LD0JSR COLLDX #X1JSR LD0LDX #X135JSR LD1:u}JSR IDRWL9140LDX #X1JSR INMLDX #X139JSR GTBCS *+5JMP A34RTSL10000L10001L10002L10003L10004:w}212222212222221222212',EOSD10003.BYT '212111112111121111212',EOSD10004.BYT '222222122122221222212',EOSD10005.BYT '221112x}L10005L10006L10007L10008L10009L10010L10011L10012L10013L10014L10015L10016L10017L10018L10019L10020L20000LDA #<:}}1112122121212112',EOSD10006.BYT '211212222121111112222',EOSD10007.BYT '212212112122222211112',EOSD10008.BYT '21121221112y}11121212212',EOSD10009.BYT '222112221212121211212',EOSD10010.BYT '211112121222221212212',EOSD10011.BYT '2122111112211112z}111222',EOSD10012.BYT '212222221211212121212',EOSD10013.BYT '211111121221222221212',EOSD10014.BYT '222221221221211111212{}2',EOSD10015.BYT '211111211121222221212',EOSD10016.BYT '221222222121211121212',EOSD10017.BYT '211211111111212121112',EO2|}SD10018.BYT '212212222221222122222',EOSD10019.BYT '211211111121111111112',EOSD10020.BYT '222222222222222222222',EOS.FI2}1STA FR0LDA #<15LDX #<10LDY #<50JSR VOXLDX #X50JSR LD0LDX #X44JSR STOA35LDX #X44:~}JSR INMLDX #X63JSR GTBCS *+5JMP A35LDA #<1STA FR0LDA #<0LDX #<0LDY #<0JSR VOXRTSL20010LDA #<1STA FR0:}LDA #<15LDX #<10LDY #<20JSR VOXLDX #X50JSR LD0LDX #X44JSR STOA36LDX #X44JSR INML:}DX #X63JSR GTBCS *+5JMP A36LDA #<1STA FR0LDA #<0LDX #<0LDY #<0JSR VOXRTSL20020LDX #X14JSR :}LD0LDX #X64JSR MULLDX #X140JSR ISUBJSR FPILDX #T1JSR STOLDA #<1STA FR0LDA #<15LDX:} #<10LDY T1JSR VOXLDX #X50JSR LD0LDX #X44JSR STOA37LDX #X44JSR INMLDX #:}X63JSR GTBCS *+5JMP A37LDA #<1STA FR0LDA #<0LDX #<0LDY #<0JSR VOXRTSL20030LDA #<1STA FR0LDA #<15LDX #<6LDY #<:}50JSR VOXLDX #X50JSR LD0LDX #X44JSR STOA38LDX #X44JSR INMLDX #X141JSR :}GTBCS *+5JMP A38LDA #<1STA FR0LDA #<0LDX #<0LDY #<0JSR VOXRTSL20040LDX #X50JSR LD0LDX #X45:}JSR STOA39LDA #<1STA FR0LDA #<15LDX #<10LDY #<10JSR VOXLDX #X50JSR LD0LDX #X44JSR STOA40L:}DX #X44JSR INMLDX #X86JSR GTBCS *+5JMP A40LDA #<1STA FR0LDA #<0LDX #<0LDY #<0JSR VOXL20050:}LDX #X45JSR INMLDX #X51JSR GTBCS *+5JMP A39RTSL30010LDX #X52JSR LD0LDX #X46JSR STOLDX #X51JSR GTBCS *+5JMP A39RTSL30010LDX #X52JSR LD0LDX #X52JSR LD0LDX #X47JSR STOJSR L31000L30020JSR L32000L30030JSR L32050L30040JSR L31000L30050JSR L32>}000L30060LDX #X142JSR LD0LDX #X47JSR STOJSR L32050L30070LDX #X133JSR LD0LDX #}7LDY #>X47JSR STOJSR L31000L30080JSR L32000L30090JSR L32050L30100LDX #X143JSR LD0LDX #X46J>}SR STOLDX #X144JSR LD0LDX #X47JSR STOJSR L31000L30110LDX #X133JSR LD0LDX #}Y #>X46JSR STOLDX #X145JSR LD0LDX #X47JSR STOJSR L32000L30120LDX #X144JSR LD0LDX>} #X46JSR STOLDX #X146JSR LD0LDX #X47JSR STOJSR L32050L30130LDX #X145JS>}R LD0LDX #X46JSR STOLDX #X65JSR LD0LDX #X47JSR STOJSR L31000L30140JSR L32000L30150>}JSR L32050L30160LDX #X143JSR LD0LDX #X46JSR STOLDX #X144JSR LD0LDX #X4>}7JSR STOJSR L31000L30170JSR L32000L30180JSR L32050L30190LDX #X133JSR LD0LDX #X46JSR STOLDX>} #X145JSR LD0LDX #X47JSR STOJSR L31000L30200JSR L32000L30210LDX #X143JSR LD0LDX >}#X46JSR STOJSR L32050L30220LDX #X147JSR LD0LDX #X46JSR STOLDX #X146JSR>} LD0LDX #X47JSR STOJSR L31000L30230LDX #X142JSR LD0LDX #X46JSR STOLDX #}>X145JSR LD0LDX #X47JSR STOJSR L32000L30240LDX #X135JSR LD0LDX #X46JSR STOLDX #}133LDY #>X133JSR LD0LDX #X47JSR STOJSR L31000L30250LDX #X135JSR LD0LDX #X46JSR ST>}OLDX #X133JSR LD0LDX #X47JSR STOJSR L31000L30260JSR L32000L30270LDX #X148JSR LD0>}LDX #X46JSR STOLDX #X147JSR LD0LDX #X47JSR STOJSR L32050L30280LDA #<0STA FR0LDA >}#<8LDX #<10LDY #<183JSR VOXL30290LDA #<1STA FR0LDA #<8LDX #<10LDY #<82JSR VOXL30300LDA #<2STA FR0LDA #<8LDX #<>}10LDY #<69JSR VOXL30310LDA #<3STA FR0LDA #<8LDX #<10LDY #<61JSR VOXL30320LDX #X50JSR LD0LDX #} #>X48JSR STOA41LDX #X48JSR INMLDX #X114JSR GTBCS *+5JMP A41L30330LDX #X142JSR >}LD0LDX #X46JSR STOLDX #X52JSR LD0LDX #X47JSR STOLDX #X52JSR LD0LDX #}LDY #>X49JSR STOJSR L32050L30340LDX #X135JSR LD0LDX #X46JSR STOLDX #X133JSR LD0>}LDX #X47JSR STOJSR L31000L30350JSR L32000L30360LDX #X133JSR LD0LDX #X46JSR STOLDX>} #X52JSR LD0LDX #X47JSR STOJSR L32050L30370LDX #X142JSR LD0LDX #X46JSR >}STOLDX #X144JSR LD0LDX #X47JSR STOJSR L31000L30380LDX #X133JSR LD0LDX #}>X46JSR STOLDX #X145JSR LD0LDX #X47JSR STOJSR L32000L30390LDX #X144JSR LD0LDX #<>}X46LDY #>X46JSR STOLDX #X146JSR LD0LDX #X47JSR STOJSR L32050L30400LDX #X145JSR L>}D0LDX #X46JSR STOLDX #X65JSR LD0LDX #X47JSR STOJSR L31000L30410JSR L32000L30420LD>}X #X133JSR LD0LDX #X46JSR STOJSR L32050L30430LDX #X143JSR LD0LDX #X46J>}SR STOLDX #X144JSR LD0LDX #X47JSR STOJSR L31000L30440JSR L32000L30450LDX #X52JSR >}LD0LDX #X46JSR STOLDX #X145JSR LD0LDX #X47JSR STOJSR L32050L30460LDX #>}X147JSR LD0LDX #X46JSR STOLDX #X146JSR LD0LDX #X47JSR STOJSR L31000L30470JSR L320>}00L30480LDX #X52JSR LD0LDX #X46JSR STOJSR L32050L30490LDX #X142JSR LD0LDX #}DY #>X46JSR STOLDX #X146JSR LD0LDX #X47JSR STOJSR L31000L30500LDX #X145JSR LD0LD>}X #X47JSR STOJSR L32000L30510LDX #X148JSR LD0LDX #X46JSR STOLDX #X144J>}SR LD0LDX #X47JSR STOJSR L32050L30520LDX #X135JSR LD0LDX #X46JSR STOLDX #} #>X142JSR LD0LDX #X47JSR STOJSR L31000L30530LDX #X133JSR LD0LDX #X46JSR STOJSR L>}32000L30540LDX #X150JSR LD0LDX #X46JSR STOLDX #X142JSR LD0LDX #X47JSR >}STOJSR L32050L30550LDA #<0STA FR0LDA #<8LDX #<10LDY #<183JSR VOXL30560LDA #<1STA FR0LDA #<8LDX #<10LDY #<92JSR>} VOXL30570LDA #<2STA FR0LDA #<8LDX #<10LDY #<46JSR VOXL30580LDX #X50JSR LD0LDX #X48JSR STO>}A42LDX #X48JSR INMLDX #X152JSR GTBCS *+5JMP A42L30590LDA #<0STA FR0LDA #<0LDX #<0LDY #<0J>}SR VOXL30600LDA #<1STA FR0LDA #<0LDX #<0LDY #<0JSR VOXL30610LDA #<2STA FR0LDA #<0LDX #<0LDY #<0JSR VOXL30620L>}DA #<3STA FR0LDA #<0LDX #<0LDY #<0JSR VOXL30630RTSL31000LDA #<0STA FR0LDA #<8LDX #<10LDY #<183JSR VOXL31010LD>}X #X46JSR LD0JSR FPILDX #T1JSR STOLDA #<1STA FR0LDA #<8LDX #<10LDY T1JSR VOXL31020LDX #}LDY #>X47JSR LD0JSR FPILDX #T1JSR STOLDA #<2STA FR0LDA #<8LDX #<10LDY T1JSR VOXL31030LDX #X5>}0JSR LD0LDX #X48JSR STOA43LDX #X48JSR INMLDX #X153JSR GTBCS *+5JMP A43L31040RTS>}L32000LDA #<0STA FR0LDA #<8LDX #<10LDY #<137JSR VOXL32010LDX #X46JSR LD0JSR FPILDX #T1JSR S>}TOLDA #<1STA FR0LDA #<8LDX #<10LDY T1JSR VOXL32020LDX #X47JSR LD0JSR FPILDX #T1JSR STOLDA #>}<2STA FR0LDA #<8LDX #<10LDY T1JSR VOXL32030LDX #X50JSR LD0LDX #X48JSR STOA44LDX #}>X48JSR INMLDX #X153JSR GTBCS *+5JMP A44L32040RTSL32050LDA #<0STA FR0LDA #<8LDX #<10LDY #<145JSR VO>}XL32060LDX #X46JSR LD0JSR FPILDX #T1JSR STOLDA #<1STA FR0LDA #<8LDX #<10LDY T1JSR VOXL32070>}LDX #X47JSR LD0JSR FPILDX #T1JSR STOLDA #<2STA FR0LDA #<8LDX #<10LDY T1JSR VOXL32080LDX #}50LDY #>X50JSR LD0LDX #X48JSR STOA45LDX #X48JSR INMLDX #X153JSR GTBCS *+5JMP A45>}L32090RTS.FIL 'D:DATA.ASM'LDY #>X48JSR STOA45LDX #X48JSR INMLDX #X153JSR GTBCS *+5JMP A45<L 'D:DSEG.ASM'212212222221222122222',EOSD10019.BYT '211211111121111111112',EOSD10020.BYT '222222222222222222222',EOS.FI0CSECX50 .BYT 64,1,0,0,0,0X51 .BYT 64,4,0,0,0,0X52 .BYT 0,0,0,0,0,0X53 .BYT 'K:',EOSX54 .BYT 64,2,0,0,0,0X55 .BYT 64,20,F}0,0,0,0X56 .BYT 64,21,0,0,0,0X57 .BYT 'D:',EOSX58 .BYT 65,4,65,0,0,0X59 .BYT 65,4,66,0,0,0X60 .BYT 65,1,37,0,0,0X61 .BYF}T 65,1,38,0,0,0X62 .BYT '',EOSX63 .BYT 64,32,0,0,0,0X64 .BYT 64,7,0,0,0,0X65 .BYT 64,49,0,0,0,0X66 .BYT 65,22,100,0,0,0F}X67 .BYT 65,5,96,0,0,0X68 .BYT 65,2,86,0,0,0X69 .BYT 65,5,97,0,0,0X70 .BYT 64,68,0,0,0,0X71 .BYT 65,1,65,0,0,0X72 .BYT 6F}4,132,0,0,0,0X73 .BYT 65,5,18,0,0,0X74 .BYT 65,1,40,0,0,0X75 .BYT 65,5,19,0,0,0X76 .BYT 64,6,0,0,0,0X77 .BYT 66,5,66,134F},0,0X78 .BYT 65,1,146,0,0,0X79 .BYT 64,5,0,0,0,0X80 .BYT 64,19,0,0,0,0X81 .BYT 64,34,0,0,0,0X82 .BYT 64,3,0,0,0,0X83 .BF}YT 64,40,0,0,0,0X84 .BYT 64,18,0,0,0,0X85 .BYT 64,8,0,0,0,0X86 .BYT 64,16,0,0,0,0X87 .BYT '}SOLL ICH EIN LABYRINTH VON DIF}SKETTE LADEN (J/N) ? ',EOSX88 .BYT 64,83,0,0,0,0X89 .BYT 64,116,0,0,0,0X90 .BYT 64,120,0,0,0,0X91 .BYT '}START : 1,',EOF}SX92 .BYT 64,17,0,0,0,0X93 .BYT 'ZIEL : 20,',EOSX94 .BYT 'STANDPUNKT : ',EOSX95 .BYT ',',EOSX96 .BYT 'SOLL ICH START- F}UND ZIELPUNKT NEU BESTIMMEN (J/N) ? ',EOSX97 .BYT 64,86,0,0,0,0X98 .BYT 64,33,0,0,0,0X99 .BYT '2',EOSX100 .BYT '0',EOF}SX101 .BYT 64,25,0,0,0,0X102 .BYT 64,24,0,0,0,0X103 .BYT '}POSITION : ',EOSX104 .BYT ' , ',EOSX105 .BYT 'BLICKRICHTUNG :F} ',EOSX106 .BYT 64,22,0,0,0,0X107 .BYT 'NORDEN',EOSX108 .BYT 192,1,0,0,0,0X109 .BYT 'SUEDEN',EOSX110 .BYT 'OSTEN',EOSX1F}11 .BYT 'WESTEN',EOSX112 .BYT '}DA IST EINE WAND !',EOSX113 .BYT 65,5,0,0,0,0X114 .BYT 64,80,0,0,0,0X115 .BYT 65,54,0,0,F}0,0X116 .BYT 64,96,0,0,0,0X117 .BYT 63,80,0,0,0,0X118 .BYT '}GRATULIERE SIE HABEN DAS LABYRINTH',EOSX119 .BYT 64,53,0,0,0F},0X120 .BYT 'NACH ',EOSX121 .BYT ' STUNDEN ',EOSX122 .BYT 64,9,0,0,0,0X123 .BYT ' MINUTEN ',EOSX124 .BYT 'UND ',EOSX125F} .BYT ' SEKUNDEN VERLASSEN.',EOSX126 .BYT 66,5,66,136,0,0X127 .BYT 65,2,85,0,0,0X128 .BYT '}UNTER WELCHEM NAMEN IST DAS LAD}