BELLЍ ؍ :ʠ, :"  ڰ=Х :Кe : L  ذ).e= MILLEGAL MNEMONIC.LЩLѭrs {Ґ Ұ MILLEGAL OPERAND.L Lٰ MILLEGAL ADDRESSING MODE.LИH ;* + MILLEGAL BLANK IN OPERAND FIELDhLЩh u e  t LЄtxetr9 r  xt8`xrirsLҤt` uҐ8`HH`Կ䵘8ت-HH`PW''W****TTTcPT8*T**P*'''TTT-TeLӭ L(נ MEQU/EPZ MUST HAVE A LABELhheЭ LUӭ L( MLABEL NOT ALLOWED HERE` !;hh MOPERAND NOT ALLOWEDLЩ8` R%@)hh MILLEGAL SWEET-16 OPERANDLЩL,ԩ ȹ Rǭɾ.ȹ ذ"hh MILLEGAL SWEET-16 REeISTERLLȩ ذL<ȹ,` ֈLe ;Lԩ8` ְ`Lչ   ؐ(LLHH`#/("'*$!%<>hh MILLE IN OPBRK T ADD e bLeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL                  izz002`ůŠeeeSSS-Ӝsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]L iõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pB߮Z\  յյ\BIR Z-^ Jp\IZLL-0ůŠ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH x(`i d£àĠz #???? @Р!@Ԡ"ԠůŠ2 izz002`GAL L 9);:A$(A$,2)(A$,1):K(16384):K128āK175:K:130l 16368,0:KK176:K1KT17K5K17130y K5300 1:868:"PRESS 'LETTER' YOU WISH TO ";:K1B$"LOAD" K2B$"LOCK" K3B$"UNLOCK" K4B$"DELETE": K5E} '  'L)` ' ! '` 'L 'L  '`=?<>B,,=?=B,` 'L 'Lй)ө) SEC #$B1 BUFHI RWTS SEC BUFHI RWTS SEC BUFHI RWTS XCHANGE X $B6FF #$2 DONE UNPACK  ORSLT DPSLT DONE ORDRV DPDRV DONE #$FF $B286 $B287 DONE $B28A  $BCMD RWPROG $B28B  #$23 RWOK  #$23 RWOK TRK #$78 BUFHI #$00 BUFLO VOL #$F SEC RWLOOP RWTS BUFHI BUFHI #$94 RWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONEF #$B0 UPCK1  RWTS #$B7 #$E8 $BD00 RWTS  READINT FLAG #$2 MYREAD READ WRITINT FLAG #$1 MYWRITE M WRITE MYREAD XCHANGE #$1 CMD RWPROG MYWRITE XCHANGE PACK #$2  ($3C),Y ( ($3C),Y ( PCK1 $3D $3F $3F #$B0 PCK1  UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D $3F $3$3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCH1 $3D $3F $3D #$C0 XCH1 $C081  PUP #$78 $3D #$94 $3F #$0 $3C $3E   PACK PUP PCK1 ($3E),Y       #$FF CH2 $FDED  CH1 CH2 $C000 CH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG $1929 XCHANGE $C083 $C083 #$B7 $3D #$D7 $3F #$0 $3C $3E  XCH1 ($3C),Y VAR1 ( $B7F0 CMD $B7F4 VOL $B7EB VAR1 $B6FE CHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACK 3) UNPACK" U 8DFF CHOOSE #$0 $C010 CH1 CHTXT,Y   $B500 $2500 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 )FLAG $B6FF COPY=0,PACK=1,UNPACK=2 TRK $B7EC SEC $B7ED SLT $B7E9 BUFHI $B7F1 BUFLO       WRITE VAR1 1 VAR2 1 VAR3 1 FLAG 1 ORSLT1 1 DPSLT1 1 ORDRV1 1 DPDRV1 1 DCOUNT1 1 TBEG1 1 TEND1 1 TSTEP1 1 NIBFLG1 1 SYNFLG1 1 SIDE 1 TRK1 1 NUMERR 1  $3C $3E #$F5 $42 XCH1 $C083 $C083 #$0 XCH2 ($3C),Y VAR1 ($3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCH2 $3D $3F $3D $42 XCH2 $C081  MREAD MOVE READ MWRITE MOVE RWTS REB $B500 $4500 CH MOVE CHOOSE MOVE $1929  IN MOVE INIT MOVE  R MOVE READINT RW MOVE WRITINT WLEAVE MOVE  MOVE #$E0 $3D #$1D $3F #$0 T35 TDO #$0 SEC #$1 TRK #$B2 SIDE T35LP RWTS T35LP1  T35LP1 TRK TRK BUFHI BUFHI #$94 T35LP #$B1 BUFHI RWTS BUFHI TRK TRK RWTS BUFHI TRK TRK #$4 CMD RWTS CLBOT XCHANGE X SETCRS #$0 $24 #$16 $25 $FC22 PACK PUP PCK1 ($3E),Y        ($3C),Y ( ($3C),Y ( PCK1 $3D $3F $3F #$B0 PCK1 B7E9 INITIT INDUP DPDRV $B7EA DPSLT     $B7E9 INITIT $C010 CLBOT SETCRS #$0 INITIT1 PAK,Y #$FF INITIT2 I $FDED  INITIT1 IINITIT2 $C000 INITIT2 I $C010 #$0 $B7EB XCHANGE X $C010 SETCRS #$0 PINIT INITEXT,Y #$FF INIT2 $FDED  PINIT INIT2 $C000 INIT2 $C010 #"O" INORG #"D" INDUP INIT2 INORG ORDRV $B7EA ORSLT     $ ,  5"  L ",뷩   `$%L" > Q<<=??ɰ` i!췩z `ɔꩱ   L t 5"!  Ln!, `  , 5"  L!,L!귭 L"귭 ɛ`ɱɳ8鱍mL m  ,렠󠠠Ͼľ  `LR͂̓   }L3 o &n 8튲n rpqstuvwmxy%`'d Jn,+  Lɛ`ɱɴ8鱍o1 X,  L`8`o L`o$Lf, 귭 鷩 UL#  鷭 @" UL#pqrst{mxy%uvw{J췩x뷭{ɌL^" ɔL  ==ׅ?<>BL9x=?<>` <ɀL:I<>=??ɰ` " X`0٨ L  5"z Ls |!{LǠˡ報L z#$ i!Lz8#췭ɛ       SEC #$B1 BUFHI RWTS SEC BUFHI RWTS SEC BUFHI RWTS XCHANGE X $B6FF #$2 D1 UNPACK D1 ORSLT DPSLT DONE ORDRV DPDRV DONE #$FF $B286 $B287 DONE $B28A  "  FF TDO SETCRS #$0 TDO1 TDOTXT,Y #$20 TDO2 $FDED  TDO1 TDO2 $C010 TDO3 $C000 TDO3 CLBOT  4TDOTXT " Turn DATA disk over and press RETURN" INIT CLBOT T " 1) Packed parms 2) Your parms"  FF 2INITEXT " riginal or uplicate drive?"  FF ,PAK " Press a key when ready"  FF ]CLR "  #$B1 VAR2 CH6 CH5 #$0 VAR2 CH6 ZYX XCHANGE X$A00 XCHANGE XZYX $C010 tCHTXT " 1) Copy 2) Pack 3) Unpack" E FF PPARMTX #$B1 CH2 #$B4 CH2  #$B1 FLAG #$2 CH5 $FC58 $C010 #$00 CH3 PARMTXT,Y #$FF CH4 $FDED  CH3 CH4 $C000 CH4 #$9B CHI  CHI #$B1 CH4 #$B3 CH4PARM PARM1,Y PARM,Y  RPARM RILDON DSKCMP 1027E80364 CHOOSE CLMID #$FF VAR3 $B286 #$0 $C010 CH1 CHTXT,Y #$FF CH2 $FDED  CH1 CH2 $C000 CH2 #$9B CHH  CHH 1 FLAG 1 ORSLT1 1 DPSLT1 1 ORDRV1 1 DPDRV1 1 DCOUNT1 1 TBEG1 1 TEND1 1 TSTEP1 1 NIBFLG1 1 SYNFLG1 1 SIDE 1 TRK1 1 NUMERR 1  NUMERR 1  1 TRK1 1 NUMERR$C083 $C083 #$0 XCH2 ($3C),Y VAR1 ($3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCH2 $3D $3F $3D $42 XCH2 $C081  MREAD MOVE READ MWRITE MOVE WRITE VAR1 1 VAR2 1 VAR3MOVE CHOOSE MOVE $1929  IN MOVE INIT MOVE  R MOVE READINT RW MOVE WRITINT WLEAVE MOVE  MOVE #$E0 $3D #$1D $3F #$0 $3C $3E #$F5 $42 XCH1 TRK #$B2 SIDE T35LP RWTS T35LP1  T35LP1 TRK TRK BUFHI BUFHI #$94 T35LP #$B1 BUFHI RWTS BUFHI TRK TRK RWTS BUFHI TRK TRK RWTS REB $B500 $4500 CH E X SETCRS #$0 $24 #$16 $25 $FC22 PACK PUP PCK1 ($3E),Y        ($3C),Y ( ($3C),Y ( PCK1 $3D $3F $3F #$B0 PCK1  T35 TDO #$0 SEC #$1  DPSLT     $B7E9 INITIT $C010 CLBOT SETCRS #$0 INITIT1 PAK,Y #$FF INITIT2 I $FDED  INITIT1 IINITIT2 $C000 INITIT2 I $C010 #$0 $B7EB #$4 CMD RWTS CLBOT XCHANGINIT INITEXT,Y #$FF INIT2 $FDED  PINIT INIT2 $C000 INIT2 $C010 #"O" INORG #"D" INDUP INIT2 INORG ORDRV $B7EA ORSLT     $B7E9 INITIT INDUP DPDRV $B7EA SETCRS #$0 TDO1 TDOTXT,Y #$20 TDO2 $FDED  TDO1 TDO2 $C010 TDO3 $C000 TDO3 CLBOT  4TDOTXT " Turn DATA disk over and press RETURN" INIT CLBOT XCHANGE X $C010 SETCRS #$0 P 2) Your parms"  FF 2INITEXT " riginal or uplicate drive?"  FF ,PAK " Press a key when ready"  FF ]CLR " "  FF TDO  #$B1 VAR2 CH6 CH5 #$0 VAR2 CH6 $C010  tCHTXT " 1) Copy 2) Pack 3) Unpack" E FF PPARMTXT " 1) Packed parms CMD RWPROG $B28B  #$23 RWOK  #$23 RWOK TRK #$78 BUFHI #$00 BUFLO VOL #$F SEC RWLOOP RWTS BUFHI BUFHI #$94 RWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONE #$B1 CH2 #$B4 CH2  #$B1 FLAG #$2 CH5 $FC58 $C010 #$00 CH3 PARMTXT,Y #$FF CH4 $FDED  CH3 CH4 $C000 CH4 #$9B CHI  CHI #$B1 CH4 #$B3 CH4PARM PARM1,Y PARM,Y  RPARM RILDON DSKCMP 1027E80364 CHOOSE CLMID #$FF VAR3 $B286 #$0 $C010 CH1 CHTXT,Y #$FF CH2 $FDED  CH1 CH2 $C000 CH2 #$9B CHH  CHHR3 CLBOT ORDRV1  ORDRV ORSLT1  ORSLT DPSLT1  DPSLT DPDRV1  DPDRV DCOUNT1 D DCOUNT  TBEG1 TBEG TEND1 TEND TSTEP1  TSTEP VAR2 RILDON  NIBFLG1 N NIBFLG  SYNFLG1 S SYNFLG #$0 R DPDRV DONE TRK   $12 XCHANGE X $B28B $B87D DONER DONE XCHANGE DONER FLAG #$2 DONE2 UNPACK VAR3 #$FF DONE2 $B28B  $B28A $B287 DONE2 $B28B $12 #$00 VARWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONE SEC #$B1 BUFHI RWTS2 SEC BUFHI RWTS2 SEC BUFHI RWTS2 REB XCHANGE X REB CHKDSK RETIT ORSLT DPSLT DONE ORDRV SPARM RILBEG TBEG TBEG1 TEND TEND1 TSTEP TSTEP1 RETRY TRK1  TRK #$78 BUFHI #$00 BUFLO VOL TRK1 #$8C T34 T35 T34 #$F SEC RWLOOP RWTS BUFHI BUFHI #$94 LEAVE RWPROG ORSLT ORSLT1  DPSLT DPSLT1  ORDRV ORDRV1  DPDRV DPDRV1  DCOUNT  DCOUNT1 D $B28B TRK1 VAR2 RILBEG  NIBFLG  NIBFLG1 N SYNFLG  SYNFLG1 S#$0 SPARM PARM,Y PARM1,Y P MYWRITE M MWRITE MYREAD $C010 XCHANGE X ORDRV DRV ORSLT     SLT #$1 CMD RWPROG  LEAVE MYWRITE XCHANGE DPSLT     SLT DPDRV DRV PACK #$2 CMD RWPROG 1 TDO RWTS0 RWTS1 #$B2 SIDE RWTS0 TRK  #$23 TRK RWTS2 $C000 #$9B RWTS3 #$B7 #$E8 $BD00 RWTS2  RWTS3  READINT FLAG #$2 MYREAD  MREAD WRITINT FLAG #$1 BAD2 $FDED  BAD1 BAD2 TDO2 TRK1 RETRY 4WDSK " WRONG DISK!!!! Insert data disk side " SIDEA B18D  " and press return." e FF GOOD RETIT RWTS #$B1 SIDE TRK #$23 RWTS2 #$24 RWTS$3F $3F #$B0 UPCK1  CLMID #$C $22 $FC58  CHKDSK #$0 CHK1 $B230,Y DSKCMP,Y SBAD  #$5 CHK1  GOOD BAD CLBOT SETCRS SIDE SIDEA #$0 BAD1 WDSK,Y #$FF #$C0 $42 XCH1 PUP #$78 $3D #$94 $3F #$0 $3C $3E   UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D  PARM1 $2500 DRV $B7EA SLT $B7E9 TRK $B7EC SEC $B7ED BUFHI $B7F1 BUFLO $B7F0 CMD $B7F4 VOL $B7EB CLBOT $1610 XCHANGE #$B7 $3D #$D7 $3F #$0 $3C $3E   $1D00 $3D00 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 DCOUNT $B285 TBEG $B288 TEND $B289 TSTEP $B28A NIBFLG $B28D SYNFLG $B28C PARM $B300          F #$B0 UPCK1  RWTS #$B7 #$E8 $BD00 RWTS  READINT FLAG #$2 MYREAD READ WRITINT FLAG #$1 MYWRITE M WRITE MYREAD XCHANGE #$1 CMD RWPROG MYWRITE XCHANGE PACK #$2 R3 CLBOT ORDRV1  ORDRV ORSLT1  ORSLT DPSLT1  DPSLT DPDRV1  DPDRV DCOUNT1 D DCOUNT  TBEG1 TBEG TEND1 TEND TSTEP1  TSTEP VAR2 RILDON  NIBFLG1 N NIBFLG  SYNFLG1 S SYNFLG #$0 R DPDRV DONE TRK   $12 XCHANGE X $B28B $B87D DONER DONE XCHANGE DONER FLAG #$2 DONE2 UNPACK VAR3 #$FF DONE2 $B28B  $B28A $B287 DONE2 $B28B $12 #$00 VARWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONE SEC #$B1 BUFHI RWTS2 SEC BUFHI RWTS2 SEC BUFHI RWTS2 REB XCHANGE X REB CHKDSK RETIT ORSLT DPSLT DONE ORDRV SPARM RILBEG TBEG TBEG1 TEND TEND1 TSTEP TSTEP1 RETRY TRK1  TRK #$78 BUFHI #$00 BUFLO VOL TRK1 #$8C T34 T35 T34 #$F SEC RWLOOP RWTS BUFHI BUFHI #$94 LEAVE RWPROG ORSLT ORSLT1  DPSLT DPSLT1  ORDRV ORDRV1  DPDRV DPDRV1  DCOUNT  DCOUNT1 D $B28B TRK1 VAR2 RILBEG  NIBFLG  NIBFLG1 N SYNFLG  SYNFLG1 S#$0 SPARM PARM,Y PARM1,Y P XVAR 1 YVAR 1  0 $FDF0 XVAR BXLOOP1 B WIDTH XVAR #$8D $FDF0 YVAR BXLOOP1 B$20 $22 $22 $20  WIDTH  #$4 $21 $22  HIGH  #$2 $23 $FC22 $FC58  HIGH 1 WIDTH 1   $3000 #$1 $24 $25 $FC22 #$10 HIGH #$20 WIDTH BOX  BOX $24 $20 $25 $22 $FC22 HIGH HIGH WIDTH WIDTH WIDTH XVAR HIGH YVAR #$8D $FDF0 BXLOOP1 #$2 $3D $3F $3F #$B0 PCK1  UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$1 STRBIT ($3E),Y #$80 ($3C),Y ( ($3C),Y ( UPCK1 $3D $3F $3F #$B0 UPCK1   ( ($3C),Y (VAR1 ($3E),Y ( XCH1 $3D $3F $3D #$C0 XCH1  PUP #$78 $3D #$94 $3F #$0 $3C $3E   PACK PUP PCK1 ($3E),Y #$80 ($3C),Y ( ($3C),Y ( PCK1 1 CHTXT,Y #$FF CH2 $FDED  CH1 CH2 $C000 CH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG  XCHANGE #$B7 $3D #$1D $3F #$0 $3C $3E  XCH1 ($3C),Y VAR1 ($3E),Y $B7F1 BUFLO $B7F0 CMD $B7F4 VOL $B7EB VAR1 $B6FE CHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACK 3) UNPACK" U 8DFF CHOOSE #$0 $C010 CH $B500 $2500 READ $190C WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 )FLAG $B6FF COPY=0,PACK=1,UNPACK=2 RWTS $BD00 TRK $B7EC SEC $B7ED SLT $B7E9 BUFHI      MYWRITE M MWRITE MYREAD $C010 XCHANGE X ORDRV DRV ORSLT     SLT #$1 CMD RWPROG  LEAVE MYWRITE XCHANGE DPSLT     SLT DPDRV DRV PACK #$2 CMD RWPROG 1 TDO RWTS0 RWTS1 #$B2 SIDE RWTS0 TRK  #$23 TRK RWTS2 $C000 #$9B RWTS3 #$B7 #$E8 $BD00 RWTS2  RWTS3  READINT FLAG #$2 MYREAD  MREAD WRITINT FLAG #$1 BAD2 $FDED  BAD1 BAD2 TDO2 TRK1 RETRY 4WDSK " WRONG DISK!!!! Insert data disk side " SIDEA B18D  " and press return." e FF GOOD RETIT RWTS #$B1 SIDE TRK #$23 RWTS2 #$24 RWTS$3F $3F #$B0 UPCK1  CLMID #$C $22 $FC58  CHKDSK #$0 CHK1 $B230,Y DSKCMP,Y SBAD  #$5 CHK1  GOOD BAD CLBOT SETCRS SIDE SIDEA #$0 BAD1 WDSK,Y #$FF #$C0 $42 XCH1 PUP #$78 $3D #$94 $3F #$0 $3C $3E   UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D  PARM1 $2500 DRV $B7EA SLT $B7E9 TRK $B7EC SEC $B7ED BUFHI $B7F1 BUFLO $B7F0 CMD $B7F4 VOL $B7EB CLBOT $1610 XCHANGE #$B7 $3D #$D7 $3F #$0 $3C $3E   $1D00 $3D00 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 DCOUNT $B285 TBEG $B288 TEND $B289 TSTEP $B28A NIBFLG $B28D SYNFLG $B28C PARM $B300VEND LOOP2 LOOP3 PROUT  HORZ LOOP3 LOOP4 PROUT  VERT LOOP4 HORZ VERT HORZ $20 VERT $22 WIDTH $21 VEND $23  #$8D $FDF0 YVAR BXLOOP1 B$20 $22 $22 $20  WIDTH  #$4 $21 $22  HIGH  #$2 $23 $FC22 $FC58  HIGH 1 WIDTH 1 XVAR 1 YVAR 1  1 PROUT  ($3C),Y ( ($3C),Y ( PCK1 $3D $3F $3F #$B0 PCK1  UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D $3F $3$3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCH1 $3D $3F $3D #$C0 XCH1 $C081  PUP #$78 $3D #$94 $3F #$0 $3C $3E   PACK PUP PCK1 ($3E),Y       #$FF CH2 $FDED  CH1 CH2 $C000 CH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG $1929 XCHANGE $C083 $C083 #$B7 $3D #$D7 $3F #$0 $3C $3E  XCH1 ($3C),Y VAR1 ( $B7F0 CMD $B7F4 VOL $B7EB VAR1 $B6FE CHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACK 3) UNPACK" U 8DFF CHOOSE #$0 $C010 CH1 CHTXT,Y  $B500 $2500 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 )FLAG $B6FF COPY=0,PACK=1,UNPACK=2 TRK $B7EC SEC $B7ED SLT $B7E9 BUFHI $B7F1 BUFLO      -HH`PW''W****TTTcPT8*T**P*'''TTT-TLӭ L(נ MEQU/EPZ MUST HAVE A LABELhhLЭ LUӭ L( MLABEL NOT ALLOWED HERE` !;hh MOPERAND NOT ALLOWEDLЩ8` R%@)hh MILLE0 HIGH #$20 WIDTH BOX  BOX $24 $20 $25 $22 $FC22 HIGH HIGH WIDTH WIDTH WIDTH XVAR HIGH YVAR #$8D $FDF0 BXLOOP1 #$20 $FDF0 XVAR BXLOOP1 B WIDTH XVAR   JhzH @ hZH ?@ (P):2 #$04 $3D  $43 SLOOP0 #$0 SLOOP1 #$0 SLOOP2  ($3C),Y ( ($42),Y ( SLOOP3 SLOOP2 ($42),Y ($3C),Y ( SLOOP3 SLOOP1 $3D $43 $43 #$0C SLOOP0  #$1 $24 $25 $FC22 #$1VE PAGE ; X=1 TO RESTORE PAGE CHOOSE LENGTH HIGH CHEND #$17  HIGH  $25 $25 VERT #$27  LENGTH  $24 $24 HORZ $FC22 #$0 SAVETXT SBOX SAVETXT #$00 $3C $4 ; CHOOSE ; INPUT: ; X = NUMBER OF CHOICES ; A = MAXIMUM LENGTH #; TITLE = BUFFER FOR TITLE OF BOX ; Y = CHOICES BEFORE SCROLL ; OUTPUT: ; CH# = # OFF CHOICE ; CHOICE = ASC OF CHOICE ; SAVETXT ; ON ENTRY X=0 TO SA $BF00  C6  SPRE  SPRE SPRE 01 PATHBUF P PATHBUF P SPDONE  ERROR SPDONE READ $BF00  80  RBUF  RBUF RBUF 03 RSLTDRV 00 RBUFLO 00 RBUFHI 00 RBLKNUM 00 RDONE ERROR RDONE ; PRODOS COMMANDS $3000 PREBUF $100 PATHBUF $40 PARMBUF $11 TS1 $400 TS2 $800 ERROR ONLINE $BF00  C5 OLBUF OLBUF OLBUF 0200 PREBUF PREBUF OLDONE  ERROR OLDONE SETPRE    $2000 $FF4A  FA PLX F 7A PLY 7 $F940 #$8D $FDED  5A PHY 5 DA PHX D $FF3F     X ^ ,,ɱ;ɲ `鷩뷍췍귩 L ŠՠǠŠҠϠӿԠˠȠԠΠŠ  L `Ԡ卍8C2,L CH:C  <  - u ɢ-- - ٩ 'd=dAd&Lz oƠ| uL,ϩƍ`='=נ`b,,ƀL, 5 Lƭ  ,`,8`Lg L,,,`ꀖ  `ꀣ ԩȠשĠŬҩԠԮ󠤲ؠ占٠ڠ䍠ؠ堰󍠠Š䍠썠͠䮍ȠӠ嬠ɠ󮮍ŠԠ묠䍠͠占öî嬠ƬƬ䠤Ơ宍쬠ɠ堤ƍøøƬ堤Ơ宠嬠ͮӠɍ򮍠͠Ʃ堤øƠɠ堤ø宠ɠ͠İƠ͠󠤱ƮͨñõƩƮͨñõƍ褐Ʈ͠ðƮƮɠ͠򮍠殠ԍ嬠򮍠ɠ͍󮮮塍͠蠤͍͍͠ᠲ堲͠󠤸ɍɠɠ򮍠ᠧ묠͠𮠠򠱲͍􍍠򠱲姠堯㬠堯宠󩬠ԅ* BBPP,240:828,3:829,173:830,128: }831,192:832,96L& L Lz L L          bLeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCALbLeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCALbLeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCALbLeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL $B00 #$0 M1 $B000,Y $D000,Y $ $4000,Y $ $B000,Y $ M1 M1+2 M1+5 M1+8 M1+11 M1+5 #$E0 M2 M1 M2 #$F0 $36 #$FD $37 $C50   ,  5"  L ",뷩   `$%L" > Q<<=??ɰ` i!췩z `ɔꩱ   L t8`xrirsLҤt` uҐ8`HH`Կ䵘8ت 5"!  Ln!, `  , 5"  L!,L!귭 L"귭 ɛ`ɱɳ8鱍mL m  ,렠󠠠Ͼľ  `LR͂̓   }L3 o &n 8튲n rpqstuvwmxy%`'d Jn,+  Lɛ`ɱɴ8鱍o1 X,  L`8`o L`o$Lf, 귭 鷩 UL#  鷭 @" UL#pqrst{mxy%uvw{J췩x뷭{ɌL^" ɔL   L=ׅ?<>BL9x=?<>` <ɀL:I<>=??ɰ` " X`0٨ L  5"z Ls |!{LǠˡ報L z#$ i!Lz8#췭ɛ D#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~ bLeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCALl ō2#堯 ɠ`mɠ(ɍ}c LHHEFG(`EFGhHI` / :3 g 40 4Ls &>&?1?=A>? I iLHH11`쩻듧ƙɾ5֖+]̵F4ɺл1>@@A`41`>BD`8>6>) LLL u ?l:L```L@ ,C< B< ` hhϹ)` L l8L NL ! (ɛ` $ Ɉɘ  : 3  5ɕ(,0ɍм [=< @L< >=?<) < `JJJ>Ie=?<=` gL J :L S;:3 gL`YE <ӭpd`HVTQ PS 6" _#%L" X `I`ɍ,,L8L,H !ΰɐ,LHJ) )h)i( ((`ɇ@ 0`$($$!fi#bZH&bTDThDt(ntJrtttrDh2"&&rr&HDDȅEELÍE( Lh:h;l Le / XZ , :ILl `Ȇ׍숈l E@A  J 0,*i H/.  `0 .: VȘ L `8/;e:` T0 "T3  T3  T; "D3 D"D3 D"D3 "D3 &1!YMJؤ#]#)i#$S#$S[[i$$)|mi)S4J G(i.&E0%.Q&&` , iH h-`/'-'0 (`HJ) 'h)i& &&`0i)0 00`J G&(JJJJ)`:; H:J jɢ )Jb y.*Lݜ` H:  J/Ȑh,--& W :L ` `  eȱe ` -L -La8 ō`LԽ"I a)_(``H \hL$$!,{I`,0,$8$`{`@ ߩL ʩ(!! $֪ `JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ` g RQPHH, hh`L `*Uf&i'`'i,&i,&iPII&if&HhH8HӰ hIiHӅхhЅhIi҄f8Ъх e8e҅ԥձ&E%0Q&&bӰ eЅԥePفŴxaI1& ')*& 'JJ) e ʥ0)Je ~)`H)&JJ&&h' &' &' f&')'#i媽0J(` Q&%0Q&&`#0JI0`'0 I`0 I0ݩ()%%01&%0)&E%0Q&&e)j00',"&,i8i#H&ii&hizݥ􅸥uv >Lץڅuۅv܅݅ߚLLްij ֥`a, PQ ֥`a```aiśj地a`ʈjiLԭVSL@TL9 ʅPQ wL PȱQL wL,U,R@ ,T,SWP0,-`L ,- 0` (L ,(ʤL (L( Ld ʊL[ I`8f`?2`@ g RPmQnLԥPsoQtp` g RPsQtPiQj֥PiQjLl֩ ޥ8fإuv Lنަߥuڥvۥyܥ~L̑湭`: 808`ORXv( sL  񕰆򊅤TH کURPQQPIPPIPPPQ)stopgh֘gghgh K֩:ۅ<ԅl g RlP L L 0, c # p 祢H 祢0 I p h uL\ !  禎  b𩊠LfHL#IڢIڢ-(h#5ᆥ](IڢʥH HɁ fΠ \hɁf hL` vy{| g|S}dpL}Qz}c0~~D:ƀ1r۠ 饬iP z녒 f륝Ɉ + # i8H rh ` !멓  v禎L酭 뱭Ș殅 饭iȅ 穘ƣ`5Dzh(F 0ɠ 穦 驪 禡 .ɠL+f ck ^ƙ.șI)$Ъ0.ȩ+.8嚪-E/8 i:`  cd pLP袊 +륪 #쩊  UH A驊  hJ I`8;)q4X>Vt~w/z*|cYX ~u q80L>nk'nk(X 1vu8 4L:۠-$șȩ0LW     9ƙ U i 0 i8.ș0șylykyjyi00ڊIi i/ȄȪ) 芢 脤`)F 鄤`ɠ 넬I* L)腞` -+ [..E0 - +f \$8Lf$På8噅 U 9ƚ0`LH$ 9h80 LaH ch 륪EL祚 d$0L e_^^^^ ^`, r^_^^^ %^^`` r` L襝 *` 녞I*L)F``a`Ȫı`E0!` Şȱ`şȱ`Š ȩŬ`(IL륝J8$E ^`e0,iLR襫`I0hhLNL ci ` cP Li v r8坅 Ğğ Ġġ* e24(&&&0⨥塅堅埅垅L@ (LꢅLԥbcdeL.^vvvvvj`^Vy dv88; 54541r LᥝH- 2 f  \7 h < L bcde 饡 饠 饟 饞 LLJ eeededcecbebfbfcfdfefJ`^_^^^^W8Ie Ji `eeeeeLi&&&&8坰IiBfffff`IIIIII `ELԢai0ᦠL LN覸^e^`_a`H` Jh`` g R L楝ɑ 률PQ`PHQH RPhQhPL F犠P` F熅  L熆PE%`dL 饢IEL < LS리8$Ii0ǨV $` lݥ^_ 5^Hȱ^ȱ^h(po Heooph^_`T SRS` H hhhL* ьHH 㥌 hhe^^_ L* IL` ) ʊH񌰸Iš hhhhhhhHH` L ` ^LL g ^ ie^^__Ŕ #^05ȱ^0ȱ^+ȱ^ȱ^poŜ䛐^_e^^__`)Jeiop Ӥȥ敥ȑL䥡HH ` lhhqL 奌  奫  *LݠHȱȱh^_ H^qheqqr "e膮 㦫 R^LԥSR`FHI8eopnm opqrh`M0 䩀hЦstopmnU^_R #ij^_lk 󅔆nmLb^_^ȱ^ȱ^eȱ^e(ӊ0ȱL$8vС,L A  ީ j ީ HHHHH L  ߅Lj A㥋HH jhhȱ𙅄ȱH +륹HHȱHH ghh Lhhhhȑhȑhȑhȑ` jݠ 6hh R䆞`" ȱ ↭^e]eR Ӆmn殤ƕƮ8m因n圑bȱhhћȊћLLȥ e^eʅʥʆd ee`^de *& edeeƙ` 8ompn` gݥ0 ɐ ~LGHHHHH hhhHH ,҄ hh)klnm?Łћȱeȱeעk,5LԢx8` ћLK*L өȥʆȑ $PhihiȑȊLL(L<  } }$%0Ʃ 8(L$0pijlk"ћћliA[8`hH`klmniȅ ӥȅklȥȑȑȑȑȑiȅ` ieȅ q L H ϐ { lhHHH hHL? hυυ Ljݥ ,L mݰ % LߩƉ 慝 憨80 ў*%L L ު `  }LޢٹHH ޥLLޥШh^^h_H r륡HHHHHl^h#d j݄hJhhhhhhE` LJ }d.U"i L=8,LLTҐL {ݩ),(,,ѸLLԠhhL ߅` ȱLL  ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаH $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER  \I` 0  i)8  )b(  L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅hL* ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)<7,;D {$0 4 Lک?`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơe$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$L ) \  ک$ȱȱж \L枱`8Єτ ,0 \ ,0 \ \۩ И F eihh eHiHvHuH j gݥ %ׅ^_L ީ  g ޥHHH XإvyzW4ȱuȱv Н ƹ`ghȥQћ Pћ `֨gȑggiihij ֩*stopijklmn IآURhhHHz`gihi` ,  ,Є hhPQPQD X ȱȱQP- _^ ijL<Ԡȱ^Șe^^_iȑ^^_Ң3 j )` )`ʠ$hh eL $p "tpM?E0<=Ѕυ 8ɀA N4O0Ťș98:I8xІ șh0hhpo`M$L Z۽`H \h ֩P :ۤv  ڢ .ՆF v YLئij YՄ ֐D_i^aeii`jij圪8iae^_^`_a8stopiejȄ ӥPQmnij e֥gh^ DIRECTYPE MISMATCSTRING TOO LONFORMULA TOO COMPLECAN'T CONTINUUNDEF'D FUNCTIO ERROR IN BREAKɁ! i` Ӆmn8囅^圪#8^Ɨ8^ƕƗƕ` i65^^.`p(o"H H ANOҾSGINABUSFRSCRNPDPOSQRNLOEXCOSITAATPEELESTRVAASCHRLEFTRIGHTMIDNEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALESHLOATRACNOTRACNORMAINVERSFLASCOLORPOVTAHIMEMLOMEMONERRESUMRECALSTORSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOWAILOASAVDEPOKPRINCONLISCLEAGENETABTFSPCTHEANOSTE0oeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL                 z # @Ǡ @Ġıı Ա ԠY Ǡ@ı  @Դ  ڠ Ա ڱ@ı Ԡ @Ӡ  @Ԡ@ĠԠ@Ա  Ԡ @Բ  @Š@Գ  @Р!@Ԡ"ԠůŠ2 Үנ @Ԡ ĠϠĠG@ĠҠ Ƞ@Ƞȱ):D B$;:198::K$:K(K$)128Y 16368,0:KK176:K1KT17K5K17B$"RUN":130 ,:CH1:CVSTK17:1000:C194(B$"RUN"B$"LOAD")B$"B"B$ 6D$;B$;:CH739:1000:(C);:CH::100 C1(CV8):C2CVC18:P1024128C240C1CH:C(PA$,39);:A$(A$,2)(A$,1):K(16384):K128āK175:K:130l 16368,0:KK176:K1KT17K5K17130y K5300 1:868:"PRESS 'LETTER' YOU WISH TO ";:K1B$"LOAD" K2B$"LOCK" K3B$"UNLOCK" K4B$"DELETE": K5Ā3d::D$(4):D$"CATALOG":B(37)2:B22B22Of3:" "nT0:CH5:CV023:1000:C160ĹP2,219:P1,T193:P,221:TT1:SCVxCV:24:A$"TYPE LETTER TO RUN, OR LOAD=1 LOCK=2 UNLOCK=3 DELETE=4 EXIT=5....":B$"RUN"= 1:(`뷩 ɔL ͂̓ bLvm $`֢ȹ ؐ`Lȹ Lֹ-Ȣȹ `ȹI0)2`ȹ ȹ'Lȹ ȹ"L֥y8`ȹ E,,=ׅ?<><><>=?=,`x=?<>` 4> Q<<=??ɰ` 4<ɀLvI<>=??ɰ`#$ %8#췩 ` LL 귭 鷩L 鷭 DJ췩x )@:D$(4):D$"CATALOG":B(37)2:B22B22Of3:" "nT0:CH5:CV023:1000:C160ĹP2,219:P1,T193:P,221:TT1:SCVxCV:24:A$"TYPE LETTER TO RUN, OR LOAD=1 LOCK=2 UNLOCK=3 DELETE=4 EXIT=5....":B$"RUN"= 1:( B$;:198::K$:K(K$)128Y 16368,0:KK176:K1KT17K5K17B$"RUN":130 ,:CH1:CVSTK17:1000:C194(B$"RUN"B$"LOAD")B$"B"B$ 6D$;B$;:CH739:1000:(C);:CH::100 C1(CV8):C2CVC18:P1024128C240C1CH:C(PA$,39);:A$(A$,2)(A$,1):K(16384):K128āK175:K:130l 16368,0:KK176:K1KT17K5K17130y K5300 1:868:"PRESS 'LETTER' YOU WISH TO ";:K1B$"LOAD" K2B$"LOCK" K3B$"UNLOCK" K4B$"DELETE": K5Ā3d::D$(4):D$"CATALOG":B(37)2:B22B22Of3:" "nT0:CH5:CV023:1000:C160ĹP2,219:P1,T193:P,221:TT1:SCVxCV:24:A$"TYPE LETTER TO RUN, OR LOAD=1 LOCK=2 UNLOCK=3 DELETE=4 EXIT=5....":B$"RUN"= 1:(   8)'%'%%%% %`8`,  0 # J T J #ʲ ,.  " /  " !#  0  "  # 5 vL!ҍ#L     5 L &̬DzȲ `" $H S5  Sh '$  $  ! 9 Ɉ$L%ɍ$L%L$'$  $ ɠɍLBɠɻ ɺɽɭ`$ $ &HJJJJ h) & p & i7 #`% ( ɰ/ɺ 'ǰ# OLަ0 OLʲɭ ' ;  s : " L    S(0  " #  `  ` e ``  (      `1  O"`1  S6 L2`  s` s `H  S # h` KFӤ FBɦ^Gʲ !  (  Q `  Lc nLc   QLu QLr (`)! ! k ( O  5 ``  00# #L L L+ LQ  `)?:0)`` `xɰ`   " ,Q,T`nophqn`qHnop(` r`r Q|  Z}~`  C@ 5ɐ `(H Nh # d(` N H dh` S ` S ` y #`FjFj ɰ #`     `  ɰ # #` ~L ͓ #  p)LɍɈ 8hh`# 6`- 6`  %(   ɍ%  #%` %͉m͉`튲͉8`ɐH)ihJJi` S ɰ ɹ (`|  |  $  ( ` Ș `8` S    J   OLD͈ J   OL[`   p ɮ0 ɰɺJJ |ɴt 3 L) # eL) )? ` )?0:Ȅ `' ɠɽɺ ɿ )? @ `' ɠɺɿ`)? ` H v #h S`  `  `  `  L ( ɍꭆL `H h   }{{e w x  wx8 `)?z y fvz  f x  Z Q yש`w `  Q(0 )?I ȱ )?vI ȱ I ) Q ̓`   f I `  x  w` x `   ` Q' L&&&& &&` &e`  c a ( ɍ f )?v $ LR a 8w ``    (   f LP `} }  LtɋɈɊɕɠ ɍ`}LL L LL`5).mm..mmL>` 801  Β` d 1 |` l  ( 5 t < t` ,  K t`ɠɊ ɕɋL``)ߍt@,0,tɛ)Ʉ(`),H hɛ hh`L_ LK ɛǥ` 0  ` LeҠL L L LLLL5L u ꭀ   , ! "   ,Q,T u  O ͂ ̓ Lk luLP  i>  Lk   OL ̀L E@   L PzC S@AAuRBKRzݠҠŠĠӠĠӠݠĠΠԣҠŠӠݠӠԠĠϠŠ   ݠŠҠĠΠԣݠҠϠҠĠ̠                         IJ+Ʋ88ŲɰЀL( , N) 5)8`IJƲ88Ųx)ɰ`0ɯ8`@ x`@w8`\ xL(IJŲi8Ʋ`  +x ` [ x +(+!++++8DzȲУН++`8` Dz Ȳ`+IJƲ+++暑8`.++ +IJIJŲƲ`++ɰ8+++!++++\ ) @ 'Dz8Ȳ`8`'| *`' *`IJ8DzŲȲ²Ʋ(Ȳò`IJ8퐲Ų푲²Ʋ(푲ò`''Q(_()) , |) )8DzȲ c)`8`IJiŲi )Ų8++ *^ ðL1&L&L &L*++Hh`  ²òIJŲƲDzȲP  ,  3'Y ('cȲ[VDzȲ )IJ8逨Ų@ S+P   ,  B* >'`^ŲƲIJDzŲ8@IJDzȲ v&8`) '`Ҳ̱ðì؍̠%%РŠҲ̱ðì؍̠̱РōŠҲÍӍҲÍӍӠ԰ȠР԰ҍ˰аб԰̰àаŠ԰ӱàбѠ԰ȍ԰ӱ٠԰̱"`a )` Ս`H Hh`ײ̱ðì؍̠̱Ġ̠ײҠ׍ŠҲ̱ðì؍̠̱РĵŠee`L7#   1"Ue *$   1ӥΗ  #`    `   | Lh#  $ $8&  1` 0.0 m "(ɠI`i   eߩ`   e 1` J    1` # 1) "ΗFff b# 88 q#`! e )L2!   v  S   s # # x L&!   v      #  s H"  $ !  !  !    " ` /" /"   ` ! ! |`  2" " /" " 2" " " W#` /"8 /"( ͐`8`0)0&  I ( `ˠà ٱà Ժ ө٢Υr4 6  % L' @  7 ` O͊  ``Džن)  ح`@ @< %L`ͳhE)͏Z08  I A< 48 I'(  ,   s      ؍ 5 v)Ș  `]P]\P\_(_^(^](]\(\__^^]]\\ <Ӎ˲ өĠà Ӡ΢à ֠ L  , #  |@   S!  #K |'K譈  5`K   KKɞ v `-0`K) K)JJLM8`ɍJJie) tt``׭ݢà ݢà ݢà ݢà ݢà ݢà Dz ` S Ȳ%ADz7( #0 # ##`( ##Dz8ȲLw( #̍#8DzȲ  #8` # # #Hȱɯh Θѩ #`8 9 HJJJJ h)   0 8 #׍#LP   "  & #% 5 ! &   & `+  O %   ɍ% 錘  #%&Ȍ`7 ²ò     8   9  S y #ӠݠˠŠݠŠݠΠϠΠݠԬԠˠݠԠĬĠԠݠΠϠŠΠݠŠӠĠӠݠ̠ˠԽŠ źӠŠΠԠݠϠҠԠŠݠ٠ˠӠݠˠݠ٠ĠŠݠΠϠΠݠˠŠٮݠӠѾϠԮݠݠݠԠҠݠݠԠŠ Š źӠݠŠҠݠ͠Šݠ͠ŠݠԠӠϠݠΠϠΠݠҠϠҠĠΠݠ͠ΠӠƠߠԠDUPLICATE˻ӠԠ˺Ġ˺кݠŠӿŠԿݠNϯAïM̩ݠԠ٠ӿݠŠͼO̠ҠDŠſݠӠҠࠠԠORIGINALDUPLICATEBLANKˠϠݠ    BOTHĠӠԠBOTHӬΠӠԠORIGINAL˻ӠˠݠŠݠˠŠݠˠݠ٠ĠŠݠŠӠĠݠŠˠݠҠҠݠߠӠRETURNϠԠࠠӠŠנĠ֠ĠٺŠ˺ݮݮݮ̺ӽĽźӽĽݠΠՠݠŠҠݠϠݠϠŮţݠݠĠ٠ŠŠ٠ӠʮݠԠéϠݠ̠ȃx0 2223h88X99354C4L44V4q444^:];i;v;J<_<̠ҠݠΠݠ̠Ҡݠ ` /` `+/,/`+/,/` !56012@ABCPQUVWX`abcpqstu, --(-:-E-$-6-..//K-k-------.$.9.@.I.V.c.8pՀ.8L-ee .`8 .` . .`(/ .` .  .` .) .`LY@'/(/*/ .`(/`)/`)/0`)/ )/`hh*/w`(/(/ /`H)/i8h`88``hhhh` / f.L- /-/`*/-/ .`'/ . .L/'/ .L/ f.L/ .LT- .0=/ . .` .Lt- . . .` .././B.// .` .////./// .` .0/0/0// .` . .`eeɰ x .`Lʍ̲ؠ°   . -LP,` . {. a,*/LP, f,`0#)(C1/` L/M/l .'/L,(/ hh8` . . .`( .'/L,(/ hh8` . . .` .(/ hh8` . . .λμߩ` 8+L+ ɰ8`` ]'xò eeLc+FfFfFfe+ò8x(e++8+++`̱ؠ ` + 8` +  `ƲIJƲ l*ŲIJ l*ŲIJ``+++++ ȱ *ɲ+ +0l8ɲ`imò0. 8+ ``)dd  `  ̹`# `8`35 ̹ɖ ̹)U  ̹)U ̹ `8``H3* }hH  S  0`@ 6@xɰ` L`꽌000000 `%`H hbY)cd) cL Lb)i)    LL4L}LLҹLOLLLLLtL*LL)LѺ @@ &0    L x﩯   `@x?????????ff??????????????????????????????ee???????????????????ժr@  ժqުs!s!1ժpppp6t!16t!ժr@  ժqުs!s!1ժpppp6t!16t!!((((PPPP'd  \, 1 890s@1ppppa5XXXa5 5!5`)` 2`5ժݶ!2P6!1ժ`a5!1ժ`5!1ժppqժ`V5XXXX!1a5!1a5!ҠݠӠĠΠݠξ̠ҠՠϠݠŠӠĠӠήHH 5hh 2 鈩LBȹ&ɽɤ ,9Űjjj` -텞`! 6H7H76ˠȺݠźPLUSCARDERRORzݠҠŠĠӠĠӠݠĠΠԣҠŠӠݠӠԠĠϠŠ   ݠŠҠĠΠԣݠҠϠҠĠ̠ƦݠˠΠݠ٠ĠŠˠࠠĠӠĠϮˮࠠĠ˻٠Ӡ ݠˠРˠݠˠԺנˠөݠĠ˺נˠөݠ˺ˠŠݠҠˠĠҠݠ͠͠ŠŠࠠǠŠߠӠΠӠԠөߠӠRETURNӠӠ  WRITEmPROTECTŠORIGINALREMOVEŭԠ͠BLANKŠݠ͠ݠŠݠĠӺݠŠˠŠݠįŠˠ٠ݠŠŠĠݠŠĠΠݠԠݠҩŽݠŠˠԽݠ˩ŽݠĠӠĠԽݠˠŠĠ׭ݠݠ̠ݠŠ 2й@   L 67LP 1  28B    ?@   L PzC S@AAuRBKRzݠҠŠĠӠĠӠݠĠΠԣҠŠӠݠӠԠĠϠŠ   ݠŠҠĠΠԣݠҠϠҠĠ̠ ʥL% ʥLI ʥLm ʥL ʥL ʥHhHh`??L ʥL% ʥLI ʥLm ʥL ʥL ʥLپ ʥL ʥL) ʥLM ʥLq ʥL ʥL ʥLݽ ʥL ʥyL% ʥzLI ʥ{Lm ʥ|L ʥ}L ʥ~Lټ ʥL `@x` L5 ` }8` 8`ILlH$ؾlH$ܽpL(ؼlH$ܻ ʥxY0 h }`ɛ,LL geh f 5e8gfhFfmgmhKLghe8fFfmmhfge` L L` 4HhHhHh" $  ( ` Ș `8` S    J   OLD͈ J   OL[`   p ɮ0 ɰɺJJ |ɴt 3 L) # eL) )? ` )?0:Ȅ `' ɠɽɺ ɿ )? @ `' ɠɺɿ`)? ` H v #h S`  `  `  `  L ( ɍꭆL `H h   }{{e w x  wx8 `)?z y fvz  f x  Z Q yש`w `  Q(0 )?I ȱ )?vI ȱ I ) Q ̓`   f I `  x  w` x `   ` Q' L&&&& &&` &e`  c a ( ɍ f )?v $ LR a 8w ``    (   f LP `} }  LtɋɈɊɕɠ ɍ`}LL L LL`5).mm..mmL>` 801  Β` d 1 |` l  ( 5 t < t` ,  K t`ɠɊ ɕɋL``)ߍt@,0,tɛ)Ʉ(`),H hɛ hh`L_ LK ɛǥ` 0  ` LeL L L LLLL5L uLP ꭀ   , ! "   ,Q,T u  O ͂ ̓ Lk luLP  i>  Lk   OL ̀L(P)P׹@   L 67L A XBKS AABK BĀ X ^ ,,ɱ;ɲ `鷩뷍췍귩 L ŠՠǠŠҠϠӿԠˠȠԠΠŠ  L `Ԡ卍8C2,` CH:C WL 9);:A$(A$,2)(A$,1):K(16384):K128āK175:K:130l 16368,0:KK176:K1KT17K5K17130y K5300 1:868:"PRESS 'LETTER' YOU WISH TO ";:K1B$"LOAD" K2B$"LOCK" K3B$"UNLOCK" K4B$"DELETE": K5           ! ! ! ! !!!!!!!!!" " " " " """""""""    $B28B   3D #$C0 M1  M2 $C083 $C083 M3 ($3E),Y ($3C),Y ( M3 $3D $3D #$C0 M3 $C081  TEXT 8D8D8D8D8D8D8D  " 1) COPY" ) 8D  " 2) PACK" ) 8D  " 3) UNPACKK #$2 OUT CHOICE $1929 MOVER   #$0 #$00 $3D $3F $43 #$A7 $42 #$B7 $3C #$E7 $3E    M2 M1 ($3C),Y ($3E),Y ( ($42),Y ( ($3C),Y ( M1 $3D $ $800 SELECT $FC58 #$0 P1 TEXT,Y #$FF P2 $FDED  P1 P2 $C010 P3 $C000 P3 #$B1 COPY #$B2 PACK #$B3 UNPACK P3 COPY #$0 OUT PACK #$1 OUT UNPAC     |  Z}~`  C@ 5ɐ `(H Nh # d(` N H dh` S ` S ` y #`FjFj ɰ #`     `  ɰ # #` ~L ͓ #  p)LɍɈ 8hh`# 6`- 6`  %(   ɍ%  #%` %͉m͉`튲͉8`ɐH)ihJJi` S ɰ ɹ (`|  | ORSLT DPSLT DONE ORDRV DPDRV DONE #$FF $B286 $B287 DONE $B28A  $B28B $B28B DONE2 CLBOT  $2100 $3100 CHOOSE $FC58 #$0 $C010 CH1 CHTXT,Y #$FF CH2 $FDED S BUFHI BUFHI #$94 RWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONE SEC #$B1 BUFHI RWTS SEC BUFHI RWTS SEC BUFHI RWTS XCHANGE X $B6FF #$2 DONE2 UNPACK D1   SLT DPDRV DRV PACK #$2 CMD RWPROG $B28B  #$22 RWOK RW1  CLBOT TDO  RW1 #$23 RWOK TRK #$78 BUFHI #$00 BUFLO VOL #$F SEC RWLOOP RWT $BD00 RWTS  READINT FLAG #$2 MYREAD READ WRITINT FLAG #$1 MYWRITE M WRITE MYREAD XCHANGE ORDRV DRV ORSLT     SLT #$1 CMD RWPROG MYWRITE XCHANGE DPSLT  $3F $3F #$B0 PCK1  UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D $3F $3F #$B0 UPCK1  RWTS #$B7 #$E8 1 $3D $3F $3D #$C0 XCH1 $C081  PUP #$78 $3D #$94 $3F #$0 $3C $3E   PACK PUP PCK1 ($3E),Y        ($3C),Y ( ($3C),Y ( PCK1 $3D  $B7F1 BUFLO $B7F0 CMD $B7F4 VOL $B7EB VAR1 $B6FE XCHANGE $C083 $C083 #$B7 $3D #$D7 $3F #$0 $3C $3E  XCH1 ($3C),Y VAR1 ($3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCH $B500 $3500 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 )FLAG $B6FF COPY=0,PACK=1,UNPACK=2 DRV $B7EA SLT $B7E9 TRK $B7EC SEC $B7ED BUFHI  "INSERT NEXT SIDE" READ ; ; ; !; PROG TO READ PACKED DISK ; ; ; CHOICE #$0 R2 $19C0 R2 #$1 R3 $19C0 R3 MOVER  RWBEG  MOVER  WRITE ; ; ; "; PROB7ED RW4   RWTS #$B7 #$E8 $BD00 RWTS ADTRAK $B7EC $B7EC #$23 AD2  AD2 #$0 AD3 INSDSK,Y #$FF AD4 $FDED  AD3 AD4 $C010 AD5 $C000 AD5  INSDSK 2 $B7ED RW1 #$B $B7ED ADTRAK RW1 RW2 #$C $B7ED #$00 $B7F0 #$B1 $B7F1 RWTS $B7F1 RWTS $B7F1 RWTS RW3 ADTRAK #$F $B7ED #$A0 $B7F1 RW4 RWTS $B7F1 $$B7F4 $B282 $B7E9 $B283 $B7EA RWDATA $B28B      $B7EC #$0 COUNT #$F $B7ED #$0 $B7EB $B29D $B7F0 $B29E $B7F1 RW1 RWTS $B7F1 COUNT COUNT #$1C RW" U FF RWBEG MOVER ; ; ; ; PROG TO WRITE TRACK DATA ; ; ; ON ENTRY: ; ; CARRY CLEAR= READ ; CARRY SET = WRITE ; WRITE1 READ1 #$1 $B7F4 $B280 $B7E9 $B281 $B7EA RWDATA WRITE1 #$2 в Dz ` S Ȳ%ADz7( #0 # ##`( ##Dz8ȲLw( #̍#8DzȲ  #8` # # #Hȱɯh Θѩ #`8 9 HJJJJ h)   0 8 #׍#LP   "  & #% 5 ! &   & `+  O %   ɍ% 錘  #%&Ȍ`7 ²ò     8   9  S y #8)'%'%%%% %`8`,  0 # J T J #ʲ ,.  " /  " !#  0  "  # 5 vL!ҍ#L     5 L &̬DzȲ `" $H S5  Sh '$  $  ! 9 Ɉ$L%ɍ$L%L$'$  $ ɠɍLBɠɻ ɺɽɭ`$ $ &HJJJJ h) & p & i7 #`% ( ɰ/ɺ 'ǰ# OLަ0 OLʲɭ ' ;  s : " L    S(0  " #  `  ` e ``  (      `1  O"`1  S6 L2`  s` s `H  S # h` KFӤ FBɦ^Gʲ !  (  Q `  Lc nLc   QLu QLr (`! ! k ( O  5 ``  00# #L L L+ LQ  `)?:0)`` `xɰ`   " ,Q,T`nophqn`qHnop(` r`r QCH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG $1929 XCHCHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACK 3) UNPACK" U 8DFF CHOOSE #$0 $C010 CH1 CHTXT,Y #$FF CH2 $FDED  CH1 CH2 $C000 GAL LL8   `ȹ Rǭɾ.e ذ"hh MILLEGAL SWEET-16 REGISTERLLȩ ذL<ȹ,` ֈLչ ;Lԩ8` ְ`Lչ   ؐ(LLHH`#/("'*$!%<>hh MILLEGAL SYMBOL I-HLL8 8  `'''TTT-TLӭ L(נ MEQU/EPZ MUST HAVE A LABELhhLЭ LUӭ L( MLABEL NOT ALLOWED HERE` !;hh MOPERAND NOT ALLOWEDLЩ8` R%@)hh MILLE8 鷭L+鷭귭JJJJ 췩뷭𷭞񷩷  LQ 𷩱 `  xt8`xrirsLҤt` uҐ8`HH`Կ䵘8ت 뷭𷭞񷩷  L 𷩱 Z Z Z ` ꭡ LL8 <8  <`ꭡ LL8 <  <`O "Lѭrs {Ґ Ұ MILLEGAL OPERAND.L Lٰ MILLEGAL ADDRESSING MODE.LИH  X L,ɱ ɲ ɳ LL6L6 L)H=?CB<>h<>B<==`,,><==,`ٍˍ8 <鷭L鷭귭JJJJ          `׭ݢà ݢà ݢà ݢà ݢà ݢà TDOTXT,Y #$FF TDO2 $FDED  TDO1 TDO2 5TDOTXT " PLEASE TURN DATA DISK OVER "  FF $2200 $3200 $B599 #$0 $B7EB #$4 CMD RWTS   #$00 $24 #$16 $25 $FC22 #$0 CLBOT1 CLR,Y #$FF CLBOT2  $FDED  CLBOT1  CLBOT2 ]CLR " "  FF TDO #$0 TDO1 CH1 CH2 $C000 CH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG $1929 CHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACK 3) UNPACK" U FF CLBOT LLXK L,ɱ ɲ ɳ LL6L6L)8e`  ^ **ERROR: `, , Q 8``   ;*^A  ذULs` Ȍ ` MBAD CHARACTER ID#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~ hh@(LH9LHH/Hh/ H-З( ܸ(& ¸$8 HL` *HVDP (FD Z $0x8x D- ܸDL\HIHHHHhHH݌hHhHh݌H6 h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ <=>?+?+2424(((#`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪV`鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ` `Lթy, ذ- U`>H5Hy`*$<>!%'";e֢yȹ ؙ ڐ/ MLABEL TOO LONG`yL֢ȹ ؐ`Lȹ Lֹ-Ȣȹ `ȹI0)2`ȹ ȹ'Lȹ ȹ"L֥y8`ȹ N OPERAND FIELDLЩ ְ`L ְ` ؙ8e2 JE1hh MMUST USE ",X)", "),Y", OR ")"Lй)ө)ߙYéȹ  `8` ְ`,)`Lȹ)ߙX$Y+hh MONLY "X" OR "Y" ALLOWEDLЙLՙΥr4 6  % L' @  7 ` O͊  ``Džن)  ح`@ @< %L`ͳhE)͏Z08  I A< 48 I'(  ,   s      ؍ 5 v)Ș  `]P]\P\_(_^(^](]\(\__^^]]\\ <Ӎ˲ өĠà Ӡ΢à ֠ L  , #  |@   S!  #K |'K譈  5`K   KKɞ v `-0`K) K)JJLM8`ɍJJie) tt`#$0 TDO1 TDOTXT,Y #$FF TDO2 $FDED  TDO1 TDO2 $C010 TDO3 $C000 TDO3  5TDOTXT " PLEASE TURN DATA DISK OVER "  FF $B599 #$0 $B7EB #$4 CMD RWTS   U FF CLBOT #$00 $24 #$16 $25 $FC22 #$0 CLBOT1 CLR,Y #$FF CLBOT2  $FDED  CLBOT1  CLBOT2 ]CLR " "  FF TDO H2 $FDED  CH1 CH2 $C000 CH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG $1929 CHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACK 3) UNPACK"PACK D1 ORSLT DPSLT DONE ORDRV DPDRV DONE #$FF $B286 $B287 DONE $B28A  $B28B $B28B DONE2 CLBOT  $2400 $3400 CHOOSE $FC58 #$0 $C010 CH1 CHTXT,Y #$FF C RWLOOP RWTS BUFHI BUFHI #$94 RWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONE SEC #$B1 BUFHI RWTS SEC BUFHI RWTS SEC BUFHI RWTS XCHANGE X $B6FF #$2 DONE2 UNORSLT     SLT #$1 CMD RWPROG MYWRITE XCHANGE DPSLT     SLT DPDRV DRV PACK #$2 CMD RWPROG $B28B  TRK #$78 BUFHI #$00 BUFLO VOL #$F SEC RWTS2 #$24 RWTS0 TDO RWTS0 TRK  #$23 TRK RWTS2 #$B7 #$E8 $BD00 RWTS  READINT FLAG #$2 MYREAD READ WRITINT FLAG #$1 MYWRITE M WRITE MYREAD XCHANGE ORDRV DRV $3F $3F #$B0 PCK1  UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D $3F $3F #$B0 UPCK1  RWTS TRK #$23 1 $3D $3F $3D #$C0 XCH1 $C081  PUP #$78 $3D #$94 $3F #$0 $3C $3E   PACK PUP PCK1 ($3E),Y        ($3C),Y ( ($3C),Y ( PCK1 $3D  $B7F1 BUFLO $B7F0 CMD $B7F4 VOL $B7EB VAR1 $B6FE XCHANGE $C083 $C083 #$B7 $3D #$D7 $3F #$0 $3C $3E  XCH1 ($3C),Y VAR1 ($3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCH $B500 $4500 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 )FLAG $B6FF COPY=0,PACK=1,UNPACK=2 DRV $B7EA SLT $B7E9 TRK $B7EC SEC $B7ED BUFHI      G TO WRITE PACKED DISK ; ; ; CHOICE #$0 W2 $1A04 W2 #$2 W3 $1A04 W3 MOVER  RWBEG  MOVER  CHOICE 1 COUNT 1  "  FF $B599 #$0 $B7EB #$4 CMD RWTS   $B7EB #$4 CMD RWTS   "  FF TDO #$0 $24 #$16 $25 $FC22 #$0 TDO1 TDOTXT,Y #$FF TDO2 $FDED  TDO1 TDO2 $C010 TDO3 $C000 TDO3  5TDOTXT " PLEASE TURN DATA DISK OVER K 3) UNPACK" U FF CLBOT #$00 $24 #$16 $25 $FC22 #$0 CLBOT1 CLR,Y #$FF CLBOT2  $FDED  CLBOT1  CLBOT2 ]CLR " CH2 #$B1 CH2 #$B4 CH2  #$B1 FLAG #$0 $B275 #$1 $1505 #$21 $1505 #$22 $1505 #$8 $B275 $1929 CHTXT 8D8D8D8D8D8D8D8D l " 1) COPY 2) PACE $B6FF #$2 DONE2 UNPACK  DONE3 DONE2 $B28A  $B28B $B28B DONE3 CLBOT  $2400 $3400 CHOOSE $FC58 #$0 $C010 CH1 CHTXT,Y #$FF CH2 $FDED  CH1 CH2 $C000  RWLOOP RWTS BUFHI BUFHI #$94 RWDONE SEC RWLOOP #$F SEC TRK RWLOOP RWDONE SEC #$B1 BUFHI RWTS SEC BUFHI RWTS SEC BUFHI RWTS XCHANGE X#$FF $B286 $B287 DONORSLT     SLT #$1 CMD RWPROG MYWRITE XCHANGE DPSLT     SLT DPDRV DRV PACK #$2 CMD RWPROG $B28B  TRK #$78 BUFHI #$00 BUFLO VOL #$F SEC RWTS2 #$24 RWTS0 TDO RWTS0 TRK  #$23 TRK RWTS2 #$B7 #$E8 $BD00 RWTS  READINT FLAG #$2 MYREAD READ WRITINT FLAG #$1 MYWRITE M WRITE MYREAD XCHANGE ORDRV DRV $3F $3F #$B0 PCK1  UNPACK PUP UPCK1 ($3C),Y #$80 SETBIT #$0 STRBIT SETBIT #$80 ($3C),Y (#$1 STRBIT ($3E),Y  UPCK1 $3D $3F $3F #$B0 UPCK1  RWTS TRK #$23 1 $3D $3F $3D #$C0 XCH1 $C081  PUP #$78 $3D #$94 $3F #$0 $3C $3E   PACK PUP PCK1 ($3E),Y        ($3C),Y ( ($3C),Y ( PCK1 $3D  $B7F1 BUFLO $B7F0 CMD $B7F4 VOL $B7EB VAR1 $B6FE XCHANGE $C083 $C083 #$B7 $3D #$D7 $3F #$0 $3C $3E  XCH1 ($3C),Y VAR1 ($3E),Y ( ($3C),Y (VAR1 ($3E),Y ( XCHI $B500 $4500 READ $19C0 WRITE $1A04 ORSLT $B280 DPSLT $B282 ORDRV $B281 DPDRV $B283 )FLAG $B6FF COPY=0,PACK=1,UNPACK=2 DRV $B7EA SLT $B7E9 TRK $B7EC SEC $B7ED BUFHI    @,.#C<B< =< @ `L, M Y 벥L `  L L:L` lզl  iǠ3 "#@ Սխɛn [$ ˹ J : ƹ3  ˹ 4  IJ+Ʋ88ŲɰЀL( , N) 5)8`IJƲ88Ųx)ɰ`0ɯ8`@ x`@w8`\ xL(IJŲi8Ʋ`  +x ` [ x +(+!++++8DzȲУН++`8` Dz Ȳ`+IJƲ+++暑8`.++ +IJIJŲƲ`++ɰ8+++!++++\ ) @ 'Dz8Ȳ`8`'| *`' *`IJ8DzŲȲ²Ʋ(Ȳò`IJ8퐲Ų푲²Ʋ(푲ò`''Q(_()) , |) )8DzȲ c)`8`IJiŲi )Ų8++ *^ ðL1&L&L &L*++Hh`  ²òIJŲƲDzȲP  ,  3'Y ('cȲ[VDzȲ )IJ8逨Ų@ S+P   ,  B* >'`^ŲƲIJDzŲ8@IJDzȲ v&8`) '`Ҳ̱ðì؍̠%%РŠҲ̱ðì؍̠̱РōŠҲÍӍҲÍӍӠ԰ȠР԰ҍ˰аб԰̰àаŠ԰ӱàбѠ԰ȍ԰ӱ٠԰̱"`a )` Ս`H Hh`ײ̱ðì؍̠̱Ġ̠ײҠ׍ŠҲ̱ðì؍̠̱РĵŠee`L7#   1"Ue *$   1ӥΗ  #`    `   | Lh#  $ $8&  1` 0.0 m "(ɠI`i   eߩ`   e 1` J    1` # 1) "ΗFff b# 88 q#`! e )L2!   v  S   s # # x L&!   v      #  s H"  $ !  !  !    " ` /" /"   ` ! ! |`  2" " /" " 2" " " W#` /"8 /"( ͐`8`0)0&  I ( `ˠà ٱà Ժ өH $% "?% L(%,`ŠΠˠҠ 뷩 `LH "h `hLȱ DA8) XLHh+HH hehe `-H4 X,@$ L$ɱɴ8鱍u ! " L)٠ˠ$% "$ L$`    $2ED7 SEARCH #$1 $43 SRCH1 ($3C),Y ( SRCH2 SRCH1 $42 ($3C),Y ( SRCH2 $3D $3C $F940 #"," $FDED SRCH2 $FCBA SEARCH   SEARCH   ӠŠ˺ݮݮݮ̺ӽĽźӽĽݠΠՠݠŠҠݠϠݠϠŮţݠݠ٠ĠŠ٠ӠʮݠԠéϠݠ̠ȃx0 2223h88X99354C4L44V4q444^:];i;v;J<_<̠ҠݠΠݠ̠Ҡݠ ` /` `+/,/`+/,/` !56012@ABCPQUVWX`abcpqstu, --(-:-E-$-6-..//K-k-------.$.9.@.I.V.c.8pՀ.8L-ee .`8 .` . .`(/ .` .  .` .) .`LY@'/(/*/ .`(/`)/`)/0`)/ )/`hh*/w`(/(/ /`H)/i8h`88``hhhh` / f.L- /-/`*/-/ .`'/ . .L/'/ .L/ f.L/ .LT- .0=/ . .` .Lt- . . .` .././B.// .` .////./// .` .0/0/0// .` . .`eeɰ x .`Lʍ̲ؠ°   . -LP,` . {. a,*/LP, f,`0#)(C1/` L/M/l .'/L,(/ hh8` . . .`( .'/L,(/ hh8` . . .` .(/ hh8` . . .λμߩ` 8+L+ ɰ8`` ]'xò eeLc+FfFfFfe+ò8x(e++8+++`̱ؠ ` + 8` +  `ƲIJƲ l*ŲIJ l*ŲIJ``+++++ ȱ *ɲ+ +0l8ɲ`imò0. 8+`뷩 ɔL  bLfm $`O LONG`yL֢ȹ ؐ`Lȹ Lֹ-Ȣȹ `ȹI0)2`ȹ ȹ'Lȹ ȹ"L֥y8`ȹ E,,=ׅ?<><><>=?=,`x=?<>` 4> Q<<=??ɰ` 4<ɀLvI<>=??ɰ`#$ %8#췩 ` LL 귭 鷩L 鷭 DJ췩x   .C<B<=< `) XL+HH hehe `-HH 8h呅h咅 ` "; 5SYMBOL WAS NOT PREVIOUSLY DEFINED IN AN EPZ STATEMENT.`L Ȣ LH ᅒh`ȩ1 0&&L8&&L` ˠŠݠҠˠĠҠݠ͠͠ŠŠࠠǠŠߠӠΠӠԠөߠӠRETURNӠӠ  WRITEmPROTECTŠORIGINALREMOVEŭԠ͠BLANKŠݠ͠ݠŠݠĠӺݠŠˠŠݠįŠˠ٠ݠŠŠĠݠŠĠΠݠԠݠҩŽݠŠˠԽݠ˩ŽݠĠӠĠԽݠˠŠĠ׭ݠݠ̠ݠŠӠݠˠŠݠŠݠΠϠΠݠԬԠˠݠԠĬĠԠݠΠϠŠΠݠŠӠĠӠݠ̠ˠԽŠ źӠŠΠԠݠϠҠԠŠݠ٠ˠӠݠˠݠ٠ĠŠݠΠϠΠݠˠŠٮݠӠѾϠԮݠݠݠԠҠݠݠԠŠ Š źӠݠŠҠݠ͠Šݠ͠ŠݠԠӠϠݠΠϠΠݠҠϠҠĠΠݠ͠ΠӠƠߠԠDUPLICATE˻ӠԠ˺Ġ˺кݠŠӿŠԿݠNϯAïM̩ݠԠ٠ӿݠŠͼO̠ҠDŠſݠӠҠࠠԠORIGINALDUPLICATEBLANKˠϠݠ    BOTHĠӠԠBOTHӬΠӠԠORIGINAL˻ӠˠݠŠݠˠŠݠˠݠٯŠݠŠӯݠŠݠҠˠݠŠߠӠRETURNϠԠࠠH $% "D% L-%,`ŠΠˠҠ 뷩 `H "h `hLȱ DA8) XLHh+HH hehe `-H4 X,E$ L$ɱɴ8鱍u ! " uL)٠ˠ$% "$ L$`  $F1AB $21AB  $24     #$6    #$1E $24 $FC22  #$80 #$FF D1 #$A0 D2 D1 #$AE D2 $FDED  $FC22 $FCBA $FE77   ``)dd  `  ̹`# `8`35 ̹ɖ ̹)U  ̹)U ̹ `8``H3* }hH  S  0`@ 6@xɰ` L`꽌000000 `%`H hbY)cd) cL Lb)i)    LL4L}LLҹLOLLLLLtL*LL)LѺ @@ &0    L x﩯   `@x?????????ff??????????????????? '  'L)` ' ! '` 'L 'L  '`=?<>B,,=?=B,` 'L 'Lй)ө)ߙYéȹ  `8` ְ`,)`Lȹ)ߙX$Y+hh MONLY "X" OR "Y" ALLOWEDLЙLՙժr@  ժqުs!s!1ժpppp6t!16t!ժr@  ժqުs!s!1ժpppp6t!16t!!((((PPPP'd  \,6 1 890s@1ppppa5XXXa5 5!5`)` 2`5ժݶ!2P6!1ժ`a5!1ժ`5!1ժppqժ`V5XXXX!1a5!1a5!ҠݠӠĠΠݠξ̠ҠՠϠݠŠӠĠӠήHH 5hh 2 鈩LBȹ&ɽɤ ,9Űjjj` -텞`! 6H7H76ˠȺݠźPLUSCARDERRORzݠҠŠĠӠĠӠݠĠΠԣҠŠӠݠӠԠĠϠŠ   ݠŠҠĠΠԣݠҠϠҠĠ̠ƦݠˠΠݠ٠ĠŠˠࠠĠӠĠϮˮࠠĠ˻٠Ӡ ݠˠРˠݠˠԺנˠөݠĠ˺נˠөݠ˺ SUBA $24 #$26 SUB ADPRT SUB ADPRT $3E $3F #$8D $FDED $F940 #"-" $FDED #" " $FDED  PRT #$80 PRINT #$A0 PRINT #$AE PRINT $FDED   $2000 $3E S $3F S $3C $3E $3D $3F S ADPRT #$0 $42  $43 SUB #$0 ($3E),Y (PRT $3E SUB2 $3F SUB2 $42 SUBA $43 SUBA $3E $3C $3F $3D !! hh@(LH9LHH/Hh/ H-З( ܸ(& ¸$8 HL` *HVDP (FD Z $0x8x D- ܸDL\HIHHHHhHH݌hHhHh݌H6 h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ <=>?.&5.&,24<;;;;+29<*J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪV?鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ` ` ʥL% ʥLI ʥLm ʥL ʥL ʥHhHh`??L ʥL% ʥLI ʥLm ʥL ʥL ʥLپ ʥL ʥL) ʥLM ʥLq ʥL ʥL ʥLݽ ʥL ʥyL% ʥzLI ʥ{Lm ʥ|L ʥ}L ʥ~Lټ ʥL `@x` L5 ` }8` 8`ILlH$ؾlH$ܽpL(ؼlH$ܻ ʥxY0 h }`ɛ,LL geh f 5e8gfhFfmgmhKLghe8fFfmmhfge` L L` 4HhHhHh" h> ?<>=? D BȄC> [ >?B C >? @ `ɀɠL"