' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL]浍국絍뵍䵺L 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG``0($ p,&"_]` L/  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( 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 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@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@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-(D 0Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ 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˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵ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 ~(`# d ֠z# u`z"#      Ԡɠɠ ӠҠ(Ϡ ̯Ԡ<ŠŠ Ҡ  ̮ʠ\)9SY$"ELSE"SY$"END"SY$"UNTIL"SY$";"SY$"."ıESISI1]SY$"BEGIN"ī5100h15000{SY$";"ī5030SY$"END"SISI1:15000RS(0)SY$"BEGIN"SY$"IF"SY$"WHILE"SY$"REPEAT"ER7:30000:50305000:5040SY$"IF"SY$"REPEAT"SY$"WHILE"ı6(SY$)1ī4010@401515000:SY$";"SY$","SY$"CONST"SY$"VAR"SY$"PROCEDURE"SY$"BEGIN"SY$"CALL"SY$"IF"SY$"REPEAT"SY$"WHILE"ī41004055STATEMENT'S DECLARATIONLN LN(SI55<SY$((SY$))(SY$)32(SY$)0ER28:30000:4100~PR$(PL(PI))A$:PR(PL(PI))0:PV(PL(PI))(SY$):PL(PI)PL(PI)115000SY$","ī4010SY$";"ī15000"ER5:30000:SY$"CONST"SY$"VAR"SY$"PROCEDURE"SY$"BEGIN"SY$"CALL"SME":D$"CLOSE"OB$M::"***** "EN" ERRORS FLAGGED":EN0ĺD$;"DELETE";OB$SoINTERFACE DECLARATION z15000A$SY$:A$"A"A$"["ER4:30000:410015000:SY$","SY$";"PR$(PL(PI))A$:PR(PL(PI))0:PV(PL(PI))0:PL(PI)PL(PI)1:40," STX $0"(SY$"PROCEDURE"ī1000@" JMP MAIN.":7000lXX$"MAIN.":5000:SY$"."ER9:30000XX$;" LDX #0":"END LDA ENDM,X":" JSR $FDF0":" INX":" CPX #$10":" BNE END"" BRK""ENDM ASC /THAT'S ALL FOLKS/"" CHN RUNTI" STX ";VP1," LDX #";ST256(ST256)<" STX ";VPG15000bSY$"INTERFACE"İ4000ySY$"CONST"İ9000SY$"VAR"İ8000SY$"ARRAY"İ9500STST2VN(0)" LDX #";(ST256)" STX $1""" LDX #";ST256(ST256) X #"(ST$)4:" BNE LOAD":" JMP LOADEND"F "LOADM DFB 138,141,132"Z " ASC :"ST$":"j " DFB 141" "LOADEND LDX #";(AD256):" STX $E9":" LDX #";AD256(AD256):" STX $E8" " CLD" " LDX #0" " TXS" " LDX #";(ST256) D$;"OPEN"OB$:D$;"CLOSE"OB$:D$;"DELETE"OB$:D$;"OPEN"OB$[ D$;"WRITE"OB$:" LST OFF" "TOS EQU $3":"LSD EQU $302":"MSD EQU $360":"VARSTACK EQU "ST " ORG ";OB ST$""ī160) " LDX #0":"LOAD LDA LOADM,X":" JSR $FDED":" INX":" CPVP128Ģ16:38:VP= ]18:"SHAPE TO LOAD ";ST$:ST$""ī96` ^(ST$,1)"A"(ST$,1)"Z"ī93 _20:"ADDRESS FOR SHAPE ";AD$:AD(AD$):ST$"BLOAD"ST$",A"AD$:AD0ī95 `: a768,169:770,76:771,240:772,253 dD$(4) nD$;"OPEN"SO$< ""(SO$,1)"A"(SO$,1)"Z"ī45j 212:"OBJECT TEXT ";OB$:OB$""(OB$,1)"A"(OB$,1)"Z"OB$SO$ī50 P14:"OBJECT CODE STARTS AT ";O$:OB(O$):OB0ī80 YVP128 Z16:"STACK STARTS AT ";ST$:ST(ST$):ST0ī90 [ST255VPST:90 \ST"SY$"VAR"SY$"ARRAY"SY$"BEGIN"SY$"END"SY$"IF"SY$"THEN"SY$"ELSE"SY$"WHILE"SY$"DO"SY$"REPEAT"SY$"UNTIL")X ::255: 11:"PL/BIT COMPILER V2.2" 16:"WRITTEN BY" (14:"CARLO MAGNAGHI" -10:"SOURCE TEXT ";SO$:SO$:% COPYRIGHT CARLO MAGNAGHI ;OP(15,20),AR(20)aID(256),ID$(256),IP(256),IT(256)|PR(64),PR$(64),PV(64)IL(16),PL(16),VN(16),LN(64)40000 RS(X)(SY$";"SY$","SY$"."SY$":="SY$"INTERFACE"SY$"PROCEDURE"SY$"CON                  23 3 :"PL/BIT V2.2 7-7-84":"COMPILATORE E DEMO"C"CATALOG"1:20:"I PROGRAMMI HILBERT":20:"SIERPINSKI E QUEENS":20:"SONO TRATTI DAL":20:"LIBRO ALGORITHMS+":20:"DATA STRUCTURES=" (20:"PROGRAMS DI NIKLAUS":20:"WIRTH.": (PI))""#vVN(PI)0:15000:SY$"A"SY$"["SY$"WHILE"SY$"REPEAT"SY$"IF"SY$"BEGIN"SY$"CALL"SY$"PROCEDURE"SY$"CONST"SY$"VAR"İ8020:PV(PL(PI1)1)VN(PI):7060#SY$";"ER5:30000:SY$"A"SY$"["ī7060#15000 $SY$"C MSD":" ORA LSD":" BNE LBL."LN:" JMP LBL."LN1:XX$"LBL."(LN):a"XPROCEDURES' DECLARATION"b15000:(SY$,1)"A"(SY$,1)"Z"ER4:30000"lPNPN1:PR$(PL(PI))SY$:PR(PL(PI))PN#qPL(PI)PL(PI)1:PL(PI1)PL(PI):IL(PI1)IL(PI):PIPI1:PR$(PLk!10000:" LDA #"ID(VA)2256(ID(VA)128):" LDY #"(ID(VA)128):" LDX #"VP2IP(VA):" JSR ASTORE"! SY$";"SY$"."SY$"END"SY$"ELSE"SY$"UNTIL"ER17:30000!*SISI1:D"p15000:XX$" LDA #0":" STA TOS":XX$"":TS0:10000:" LDA30 SY$"="ER13:300002 VA0:15000:5760D RS(0)ī5920N 5760Y 15000 XX$" LDA #0":XX$"":" STA TOS":LS1:TS0:10000:LS0 SY$":="İ15000:5910 ER13:30000:SY$"="SY$":"İ15000:5910! RS(0)ER35:30000:SISI1: LDA LSD":" LDY #"ID(VA)2:" STA ("VP2IP(VA)"),Y"g" LDA MSD":" INY":" STA ("VP2IP(VA)"),Y"SY$";"SY$"."SY$"END"SY$"ELSE"SY$"UNTIL"ER17:30000SISI1:15000:SY$"("ī5840 ER33:30000:SY$"="SY$":="ī580!DVAJ:IT(J)5730,5810:ER12BN30000:15000:SY$"("ī5850LX5735Wb15000|gXX$" LDA #0":XX$"":" STA TOS"iSY$":="İ15000:5760lER13:30000:SY$"="SY$":"İ15000:5760vRS(0)ER35:30000:SISI1:TS0:100005"SY$"="ī56405ER12:30000:SY$"="ER13:3000015000:10000:SY$";"SY$"."SY$"END"SY$"ELSE"SY$"UNTIL"ER17:30000SISI1:ER34:30000RS(0)SY$","SISI1:SY$","ER35:30000:15000:5650&10000:565" PLA":" STA "2TPVP1:" PLA":" STA "2TPVP?wSISI1:L|I0:J1`SY$ID$(I)JI|ID$(I)""II1:5510J1ī5700I0:J1SY$PR$(I)JIPR$(I)""II1:5550J1ī5600ER11:571015000:SY$":=""CALL":15000:5470ScSY$";"SY$"END"SY$"ELSE"SY$"UNTIL"ER17:30000hPR(L)0ĺXX$;" LDA "2TPVP:XX$"":" PHA":" LDA "2TPVP1:" PHA"mPR(L)0ĺXX$;" JSR "PR$(L);PR(L):XX$""nPR(L)0ĺ" JSR "PR$(L);"PR";PR(L)1rPR(L)0ĭIIPV(L)ĭRS(0)SY$","54559HSY$","ER5:30000AJII}OSY$";"SY$"."SY$"END"SY$"UNTIL"SY$"ELSE"ī5480TSY$","ER17:30000:5480YER32:30000^SY$";"SY$"END"SY$"BEGIN"SY$"IF"SY$"WHILE"SY$"REPEAT"SY$"BEGIN"SY$"CALL"SY$"PROCEDURE"ER32:30000:SISI1:Z@SY$","ER25:30000:5455EPR(L)0ĺXX$;" LDA #0":XX$"":" STA TOS":TS0:10000:" LDY #"2(II1):" LDA LSD":" STA ($00),Y":" LDA MSD":" INY":" STA ($00),Y"FPR(L)0İ10000G-ER11.SY$ID$(I)ER15:/ID$(I)""II1:5422V030000:15000:L0:5470p1PV(L)0İ15000:54556PR(L)0ĺXX$;" LDA #0":XX$"":" STA TOS":TS0:;II1PV(L):15000:SY$";"SY$"VAR"SY$"CONST"SY$"WHILE"SY$"REPEAT"SY$"IF"SY$EN"SY$"DO"ER10:30000:53351ER27:30000QIILN:LNLN(SI):6000:LNII_SISI1:vSY$"CALL"ī550015000:I0:L1:(SY$,1)"A"(SY$,1)"Z"ER14:SISI1:30000"SY$PR$(I)LI'PR$(I)""II1:5410,I0:L1ī542515000n5000MxXX$;" JMP LBL."LN(SI)2:XX$"LBL."(LN(SI)1):SISI1:fSY$"REPEAT"ī5400XX$""ĺXX$;" MSB ON"LN(SI)LN:XX$"LBL."(LN1):LNLN2150005000:SY$";"ī5330SY$"UNTIL"ī5360 SY$"ELSE"SY$"THXX$""ĺXX$;" MSB ON":#XX$"LBL."(LN(SI)):SISI1:_<XX$"LBL."(LN(SI)1):SISI1:wPSY$"WHILE"ī5300UXX$""ĺXX$;" MSB ON"ZLN(SI)LN:XX$"LBL."(LN2):6000:LNLN3:SY$"DO"ER18:30000:SY$"THEN"SY$"UNTIL"ī5230dY$"IF"ī5200bLN(SI)LN:6000:LNLN2:SY$"THEN"ER16:30000:SY$"DO"SY$"UNTIL"ī5130m15000w 5000XX$""ĺXX$;" MSB ON"SY$"ELSE"ī5180" JMP LBL."LNXX$"LBL."(LN(SI)1):LN(SI)LN:LNLN115000:5000ER21"3@)PR$(I)""II1:10550J3J)30000:15000:SY$"("LC1:10110Z3T)LC2:10110v3h)LC1:IT(J)10700,108003r)IID(J):I0II653363w)I0I65336ER30:30000'4|)XX$" LDA #"(I256):" STA MSD+"TS:" LDA #"I256(I256):" STA LSD+"TS:15000:RS(1)ī10502,2)SY$":="ġ::573722 )X2 )(SY$,1)"9"(SY$,1)"0"ī10514y2)((SY$))SY$ER26:300002)I(SY$):LC1:106152)J1:I02)ID$(I)SY$JI2)ID$(I)""II1:105162")J1ī106002,)ER11:I036)PR$(I)SY$1ER23:30000*1(OP3LC3ER29:30000H1(OP3LC1ER25:300001(12000:O5(OP3)2(OP6)6(OP8)(OP14)(OP15):O0āI0O:OP(I,PD)0:I1(LC2(OP2):15000:OP(OP,PD)1:101101)LC1ī105081)ER23:30000:PD0ī105082)$"<=")11(SY$"=")12(SY$">=")13(SY$">")14(SY$"<>")15(SY$"AND")16(SY$"OR")1n0(OP1ī105000(SY$"-"ī104400(LC1ER29:300000(LC0ĺXX$" LDA #0":" STA LSD+"TS:" STA MSD+"TS:" INC TOS":TSTS1:XX$"":104701(OP3LC0110/<(SY$")"ī104001/F(LC1ER29:30000c/P(OP100:12000:PDPD1:LC1:15000:PD0LSı/Z(ER22:PD0:30000:10110\0(OP(SY$"ODD")2(SY$"NOT")3(SY$"ABS")4(SY$"/")5(SY$"MOD")6(SY$"*")7(SY$"-")8(SY$"+")9(SY$"<")10(SYOP(I,PD)0:I .~'RS(1)ī102008.'LC1ER25:30000M.'LSER22:30000e.'PD0OP100:12000v.'ER22:30000.'PD0PDPD1::10140.'10130.'SY$"("ī10300.'LC1ER23:30000/'PDPD1:I015:OP(I,PD)0:I:LC0:15000:10100:1IER38:30000'-4&VN(PI)VN(PI)IFB1A->&15000:SY$","ī9510U-H&SY$";"ī15000e-R&ER5:30000s-\&RS(0)ı}-f&9520-'EXPANDED AOS==>RPN-'LC0:PD0:10100:ER0-$'RS(0)(LSSY$"=")ı-.'ER0ER22:30000-8'15000:10020 .t'I015:30000:9665,,%SY$"-"İ15000:SY$"-"SY$W,%SY$((SY$))SY$"-0"I(SY$):9770d,%I0:J1x,%ID$(I)SY$JI,%ID$(I)""II1:9700,%J1ĭIT(J)0IID(J):9770,&ER36:30000:SY$";"ī15000, &SY$","ī9510, &RS(0)ı-*&FBI1:9580*+%J1ĭIT(J)0IID(J):9650K+%ER36:30000:SY$";"ī15000^+%SY$","ī9510q+%SY$"."ī9660+%RS(0)ı+%FBI:ID(IL(PI)1)VN(PI)FB:15000:SY$"."ER37:30000:9670+%15000:SY$"."ER37:30000 ,%15000:SY$"."ER37:30000:15000:SY$","ī95100*D%SY$";"ī15000*N%ID$(IL(PI))SY$:IT(IL(PI))2:IP(IL(PI))PN:15000:IL(PI)IL(PI)1:ID$(IL(PI))"":SY$"-"İ15000:SY$"-"SY$*X%SY$((SY$))SY$"-0"I(SY$):9650*b%I0:J1*l%ID$(I)SY$JI +v%ID$(I)""I:EF11)x#EF0ID(IL(PI))(SY$):IL(PI)IL(PI)1<)#15000O)#SY$","ī9010e)#SY$";"İ15000:u)#ER5:30000)#SY$"VAR"SY$"PROCEDURE"SY$"BEGIN"ı)#EF0:9020)%ARRAY DECLARATION)&%15000)0%RS(1)SY$"A"SY$"["ī9550*:%ER4:(PI)1)"":IT(IL(PI))0>(P#15000:SY$":="ER1:30000:9060X(Z#SY$"="ER3:30000c(d#15000(i#SY$"+"SY$"-"J$SY$:15000:SY$J$SY$(n#SY$"-0"SY$((SY$))SY$"+"((SY$))ER2:30000:EF1)s#(SY$)32768(SY$)32767ER30:300008010'SY$";"ī15000('ER5:30000k'SY$"PROCEDURE"SY$"BEGIN"SY$"IF"SY$"CALL"SY$"WHILE"ıu'8020'(#CONSTANTS DECLARATION')#CO$() CO() CL()'2#15000:EF0'<#(SY$,1)"A"(SY$,1)"Z"ER4:30000:EF1(F#ID$(IL(PI))SY$:ID$(ILIABLES' DECLARATION-&AVA$(),VA(),VP(),VL()8&J15000h&T(SY$,1)"A"(SY$,1)"Z"ER4:30000:EF1&^ID$(IL(PI))SY$:ID$(IL(PI)1)"":IT(IL(PI))1&hID(IL(PI))VN(PI)&rIP(IL(PI))PN&|IL(PI)IL(PI)1:VN(PI)VN(PI)1&15000'SY$","ī" LDA #"(VN(PI)128):" ADC $1":" STA $1":TPPR(I)%5000:XX$;" LDA "2TPVP:XX$"":" STA $0":" LDA "2TPVP1:" STA $1":" RTS"%SY$";"ER8:30000:(SY$)1ī7150%15000%PIPI1:ID$(IL(PI))"":SY$"PROCEDURE"ī7000%&@VARONST"İ9000 $SY$"VAR"İ80007$SY$"ARRAY"İ9500R$SY$"PROCEDURE"İ7000w$IPL(PI1)1:PR$(I);"PR";PR(I);$" LDA $0":" STA "2PR(I)VP:" LDA $1":" STA "2PR(I)VP15%" CLC":" LDA #"VN(PI)2256(VN(PI)128):" ADC $0":" STA $0":     $"A"ī30321Bvv1015+BzvD$;"WRITE";OB$@BvD$;"WRITE ";OB$FBv}B@D$"CLOSE"SO$:D$"CLOSE"OB$:(222)5ER31:30000BE(222)0(222)16ĺ::"DOS ERROR #";(222):BJ::"ERROR ";(222);" IN LINE "(218)256(219):vERR34ĺ"CALL EXPECTED"vERR25ĺ"ILL FORMED EXPRESSION" @HvERR26ĺ"ILL FORME"D>uERR15ĺ"CALL OF A CONSTANT OR A VARIABLE IS MEANINGLESS"a>uERR16ĺ"THEN EXPECTED">uERR17ĺ"SEMICOLON OR END EXPECTED">uERR18ĺ"DO EXPECTED">vERR19ĺ"INCORRECT SYMBOL FOLLOWING STATEMENT"? vERR20ĺ"RELATIONAL OPERATOR EXPED"6=uERR10ĺ"SEMICOLON BETWEEN STATEMENTS MISSING"[=uERR11ĺ"UNDECLARED IDENTIFIER"=uERR12ĺ"ASSIGNEMENT TO CONSTANT OR PROCEDURE IS NOT ALLOWED"=uERR13ĺ"ASSIGNEMENT OPERATOR EXPECTED">uERR14ĺ"CALL MUST BE FOLLOWED BY AN IDENTIFIER FOLLOWED BY AN IDENTIFIER"DNPTPT1:PT(9"SY$"A")SY$"Z"NC0:O9:20000:CH$"0"(CH$"9"CH$"A")CH$"Z"NC1:f9;SY$SY$CH$:15100z9 N GET NEXT CHAR9!N PT,IN$,CH$9%NPT0ī200209*ND$"READ"SO$:IN$""9,NI1$:(I1$)13IN$IN$I1$:20012:.N:D$"WRITE"OB$:(IN$)0Ĺ769NC0İ20000&8:CH$" "İ20000:1502028:SY$CH$`8:SY$"<"İ20000:CH$"="CH$">"NC1:8:SY$"<"SY$SY$CH$:NC0:8:SY$">"İ20000:CH$"="NC1:8:SY$">"SY$SY$CH$:NC0:8:SY$":"İ20000:SY$SY$CH$:NC0:9:SY$"0"(SY$" JSR EQ.":TSTS147l/OP(11,PD)ĺ" JSR GE.":TSTS1W7v/OP(12,PD)ĺ" JSR GT.":TSTS1z7{/OP(13,PD)ĺ" JSR NE.":TSTS17/OP14ı7/OP(14,PD)ĺ" JSR AND.":TSTS17/OP15ı7/OP(15,PD)ĺ" JSR OR.":TSTS17/7:SCANNER7:SY$,NC 8:STS1)6/OP(4,PD)ĺ" JSR MOD.":TSTS1L6/OP(5,PD)ĺ" JSR MUL.":TSTS1X6&/OP6ı{60/OP(6,PD)ĺ" JSR SBC.":TSTS16:/OP(7,PD)ĺ" JSR ADD.":TSTS16D/OP8ı6N/OP(8,PD)ĺ" JSR LT.":TSTS16X/OP(9,PD)ĺ" JSR LE.":TSTS17b/OP(10,PD)ĺ"000:10100:JAR(PD){5D*XX$" LDX #"VP2IP(J):XX$"":" LDA #"ID(J)2256(ID(J)128):" LDY #"(ID(J)128):" JSR ALOAD"5N*101105.OP3ı5.OP(0,PD)ĺ" JSR ODD."5.OP(1,PD)ĺ" JSR NOT."5.OP(2,PD)ĺ" JSR ABS."6.OP(3,PD)ĺ" JSR DIV.":T" INC TOS":TSTS1:XX$"":15000:101104)XX$" LDY #"ID(J)2:XX$"":" LDA ("2IP(J)VP"),Y":" STA LSD+"TS:" INY":" LDA ("2IP(J)VP"),Y":" STA MSD+"TS:" INC TOS":TSTS1:15000:1011040*15000:SY$"("ER33:300005:*AR(PD)J:PDPD1:LC0:15؍ٍŸٍàŹٍīŷīӍΰŴčĠ؍ҠƶÍؠ٠ҠƴҠƳƲŴӍŰčРŠűŶԠҠƶˍ˫ӍװҠҠƶčˍ˫Ӎ٠īؠīīҠƴčٍ̠ŸٍÍàŸàčǰ٠īǰٍīٍǰٍӍĠٍҰčĠ؍РƶÍ԰ؠč٠čīРƴŰؠč٠īčРƵװĭ؍ٍĭ؍Íàǰǰàĭ؍ǰ٠ǰٍĭ؍ٍǰٍĭ؍ӍŠÍà؍ǰà؍ٍ̠č̠ččÍàǰǰĭ؍ӍԮҠŮҠĭ؍ӍӮؠӍĭ؍ɠӱӍӱÍàĭ؍ĭ؍àĭ؍ĭ؍ӍĠÍà؍ǰà؍ؠӍ̠ĭ؍̠ĭ؍Рĭ؍ĭ؍àĭ؍Ųĭ؍̠ĭ؍àӍӍŮؠӍĭ؍Ҡĭ؍̠ű̠ĭ؍РŲűĭ؍Рĭ؍ĭ؍àĭ؍РŲԮҠŮҠѱ٠ѱĭ؍ĭ؍àӍӍŮؠӍ٠ĭ؍Рĭ؍Šѱĭ؍Рĭ؍Šѱ٠РѱŮؠӍĭ؍Ҡĭ؍̠ű̠ĭ؍РŲűĮؠӍĭ؍ĭ؍Р̠ǰĭ؍ĭ؍Рĭ؍̠Ġǰĭ؍àӍӍѮؠӍ٠ĭ؍Рĭ؍Šѱĭ؍Рĭ؍؍Ġĭ؍ӍԮؠӍĭ؍ĭ؍Рĭ؍̠Ҡĭ؍ӍҮؠӍĭ؍ĭ؍ĭ؍ĭ؍Рĭ؍̠ĭ؍àӍӍĮÍàӍؠӍĬ؍àĭ؍ĭ؍Ĭ؍àĭ؍ĭ؍ӍîÍàӍؠӍĭ؍àĬ؍ĭ؍ĭ؍àĬ؍ĭ؍ӍĮؠӍĭ؍ĭDẕ̠DZ̠DZ؍Š̰̲Ҡǰà̳ÍDZàDzDzDZàDzDz̳̠DZ̠DZǰŠ̲ؠӍDzĭ؍Dzĭ؍Ӎĭ؍Ӎ̮àӠؠӍĬ؍ǰĬ؍ǰĭ؍DZĭ؍DZDzDzؠ̰Ҡǰà̱ÍDZàDzDzDZàDzҠDzàDzDzֶؠӍDzĭ؍Dzĭ؍ӍĮҠ֮΍̠ıÍàDZĭؠàDZĭؠӍıDZĭ؍DZ؍ŠֲֳؠѠֶָҠǰҠǰDZРǰDZàǰàִDZDZàǰDZÍִ̠Dz̠Dz؍Šָ΍ֶ̠ÍàDzàDZDZàDZDZְǰֱ̠ÍàǰǰàǰǰֱؠؠDzؠDzֲDZРǰDZàǰàֳ̠ǰ̠ǰǰՠDZՠDzՠΠՠ֮àӍؠӍĭ؍DZĭ؍DZĬ؍ǰĬ؍ǰǰŠַˍַDZҠǰ΍DZְ̠Í=ooppȆbcĂbfUVd8ophLД8= 7MLdlkȄmn;op:E UUȥViлh8HH`Ї{y SՠUEowyywxzzxwIy:e \`fH,Hops8otpf,kiUliVU$f&łmUŁfbUȥcUUŭUVŮMvłGUŁ>UV2ЅUŕȱU喰!UUdUV0*UiUViVUmVnɊȢwU𧰸ХyyUU⥁œ.QP$  e LWHhL:5~    eȱeLaL LRwwxȆwxwHw Jhw`w5U,w`,hbhcbwȱbxcȘHH`wȄ wep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE   ࠰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱbe HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pM䡥UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0  j=i<<=kbޙץ,,stHʈcbhH ʈpoophMm X RQtPsh`bhH     ĠΠ̮ʍ ΠōԠƍӠՠĠՠĠՠˠՠǠčؠӍؠؠؠؠؠؠؠؠήؠĠͬ؍Ҡư؍ؠŠčˍ͠àԧӠ̠ӯ  ӍűРŠŲŶŲӍŰðððؠčð؍Ӎϰؠč٠īčРƵ  l a L ORG   >l a L q 5  L L LDX #0   LLOAD LDA LOADM,X   L. JSR $FDED #  LA INX <  LV CPX # O  q  m ^ Lz BNE LOAD p  L JMP LOADEND   LLOADM DF  eq LCLOSE   q  eq LDELETE   q  eq LOPEN   q  eq L!WRITE   q  L> LST OFF 5  LW TOS EQU $3 L  Lr LSD EQU $302 e  L MSD EQU $360   L VARSTACK EQU m   Iq LI p  'LADDRESS FOR SHAPE   ?q  =q  kLBLOADL,A  5 q    =q  q k (m &L =m > o T sm > p T m > [p T m > p T n  gq eq LOPEN }  Gq  eq LOPEN   q  {q  yq  ;l (m &L o Yl Rp  'LSTACK STARTS AT   q  q  l (m &L l o &L& l YlL \l o LI Rp  Go  \l a yp  'LdSHAPE TO LOAD U  q Lv q 5 u L5LALZ q Rm   2 k q RZ Gq 5   k Gq Rm   2q  k Gq Rm   Iq Lx p  'L  OBJECT TEXT   q LL$AL)Z q 5   k q Rm  " 2q  k q Rm  ' Iq  k q 5 Gq q L 4p  'LOBJECT CODE STARTS AT   k q 5 I q  k q 5 O q  k q 5 Y q  c k ` X p ! s p L+PL/BIT COMPILER V2.2   Rp LJ WRITTEN BY ?  4p LmCARLO MAGNAGHI ^  o  'L SOURCE TEXT   Iq LLALq  k q 5  q  k q 5  q  k q 5  q  k q 5   q  k q 5  q  k q 5  q  k q 5 # q  k q 5 * q  k q 5 0 q  k q 5 8 q  k q 5 @ q%Z ⏯qB 7;iL kL;L,L.L:=L INTERFACEL PROCEDURELCONSTLVARLARRAYL BEGINL'ENDL-IFL5THENL=ELSELFWHILELLDOLVREPEATL_UNTIL q 5   k q 5  q  k q 5  q  k q 5                            ,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨéR L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`   q% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` L  8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘHH` ,խwqq膸 J즸 , :hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J hw0У8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8 Z ZCBЍw U  yUUwyVxz`Зԥwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eУk ЮU 4Г U 5,wЅƩѤ wU! 5BL. l q . L. l ^m lL. +m l Rm n k (LA/ ,UNTIL q 5 0,  k q 5 8, q Lk, [ *( q L, JMP LBL. w,  m p m a L,LBL. m p *  hl a L*LBL. m p ^m  *  q m p hl o hl ^m el [ *(L+ q 5 + L0+ q L%+ MSB ON +  L8+LBL. m p  3+  q am m m`La+LBL. m p ^m  \+  q am m m`L+WHILE q 5 + L,L+ q 5 m _L( *(L(L)IF q 5 ) L+ m p hl o = hl m elL)THEN q 5 ) LK* n m _L*DOL!*UNTIL q 5 *  k q 5 * q LN* [ *(LU* q 5 T* L* q Ly* MSB ON q*  L*ELSE q 5 * LY+L* JMP LBL.( q ` m ^m mL(BEGIN q 5 ( L) [L(; q 5 ( L(L)END q 5 ( L) am m mL[L()BEGINL.)IFL7)WHILELA)REPEAT +m  k q 5 ") q  k q 5 +) q  k q 5 1) q  k q 5 :) q L) m  k q 5 ' q  k q 5 '' q  k q 5 /' q  k q 5 5' q  k q 5 ?' q L&L%L2(ELSEL9(ENDLB(UNTILLG(;LL(. q 5 -(  k q 5 5( q  k q 5 <( q  k q 5 E( q  k q 5 J k q 5 & q  k q 5 %& q ` q  Om $L*$L-$ [L&;L&,L'CONSTL'VARL' PROCEDUREL$'BEGINL,'CALLL2'IFL<'REPEATLE'WHILE q 5 &  k q 5 & q  k q 5 ' q  k q 5  ' q  k q 5 ' q%, q 5 % L*$L%; q 5 % L[ m m _L%CONSTL%VARL& PROCEDUREL &BEGINL&CALLL&IFL"&REPEATL+&WHILE q 5 %  k q 5 % q  k q 5 % q  k q 5 & q  k q 5  & q  k q 5 & q l p q 3q o l p q +m o l p q +m o l p l p ^m o L% q   q  k q  Po q  k q  (m (q LN% n m _L& l p q 3q o l p q +m o l p q q  o l p l p ^m o [L#  q  L#***** #  l aL# ERRORS FLAGGED #  l (m L'$ eq L$DELETE $  q  Lc [ q 5qL8$AL=$[ 3q 5 6$ 2 k 3q 5 ;$ /q Ls$ m m _L& [L{$,L$; q 5 y$  k q 5 ~$ q L% m _ q L" LDX #0 "  L"END LDA ENDM,X "  L" JSR $FDF0 "  L # INX #  L"# CPX #$10 #  L9# BNE END 0#  LL# BRK G#  Lv#ENDM ASC /THAT'S ALL FOLKS/ Z#  L# CHN RUNTIME #  eq L#CLOSE ! L! I m p m l lL! LDX # !  o l # a L! STX $1 !  L " LDX # "  o l # o l a L4" STX $0 ,"  LL" PROCEDURE q 5 B" L{"Lm" JMP MAIN. b"  >L"MAIN. ~" q *(L". q 5 " L" n  TXS   L  LDX #   o l # a L  STX   \l ^m a L! LDX #   o l # o l a L*! STX $!  \l a [LK! INTERFACE q 5 A! La! *$Lj!CONST q 5 d! L! TFL!VAR q 5 ! L! DL!ARRAY q 5B 138,141,132   L ASC :   q L:   L DFB 141   L LOADEND LDX #   o k # a L7  STX $E9 .  LL  LDX # E  o k # o k a Lu  STX $E8 l  L  CLD   L  LDX #0   L  q` [L>AL>Z q Rm  > 2 k q Rm  > Iq L> m m _ l ^m l l p q q o l p q l o l p l p ^m o l ^m p l p o l ^m q l q o l ^m l p qL? ? o l p +m o [L?Aq  k q 5 Y= q L= n m _ am m m` [ q L= LDA #0 =  L > STA TOS >  L> > q +m Jl ML8> LDA MSD />  LO> ORA LSD F>  Lg> BNE LBL. ]>  hl a L> JMP LBL. {>  hl ^m a L>LBL. hl  >k k p c o i # o {k a L< LDY # <  k p c o i # a L= LDX # <  k (q m Vl a L2= JSR ASTORE &=  LB=;LG=.LN=ENDLV=ELSEL_=UNTIL q 5 @=  k q 5 E= q  k q 5 J= q  k q 5 Q= ==L9 [ q L; LDA #0 ;  L; ; qL; STA TOS ;  am l +m Jl M +m lL<:= q 5  < L'< [L< in m _L5<=L:<: q 5 3<  k q 5 8< q Lj< [L< +m L< ko m _ am m m` ML< LDA # <  k p m q 5 : q  k q 5 : q  k q 5 : q  k q 5 : q L; n m _ am m m` [L#;( q 5 !; L; wo m _LD;=LJ;:= q 5 B;  k q 5 G; q L;Ly;= q 5 w; L; in m _ +m k [L9 +m LDA LSD 9  L9 LDY # 9  k p m a L9 STA ( 9  k (q m Vl aL :),Y :  L#: LDA MSD :  L6: INY 1:  LK: STA ( D:  k (q m Vl aLl:),Y h:  L|:;L:.L:ENDL:ELSEL:UNTIL q 5 z:  k 8; Zn m _ [L8( q 5 8 L;L8 [ q L8 LDA #0 8  L8 8 qL9 STA TOS 9  L!9:= q 5 9 L:9 [L9 in m _LH9=LM9: q 5 F9  k q 5 K9 q L}9 [L9 +m L9 ko m _ am m m` +m Jl ML9 LUNTIL q 5 7  k q 5 7 q  k q 5 7 q  k q 5 7 q  k q 5 7 q L*8 n m _ am m m` _o m _LB8, +m  k q 5 @8 q Ln8 am m m`Ls8, q 5 q8 L8 ko m _ [L=8 ML=8 l k l p n l (L8 +m l Rm n l l q q L6 l lL6 l q 6 L 7 l ^m lL6 Rm n l (L(7 2 q L2Lg2, q 5 e2 L2 m m _ 1 qL2;L2.L2ENDL2UNTILL2ELSE q  k q 5 0 q  k q 5 0 q L0 So m _ am m m`L0, q 5 0 L1 n m _L2 k q (m L2 q LA1 LDA #0 91  LP1 O1 qLd1 STA TOS [1  +m Jl ML1 LDY # {1  am k m a L1 LDA LSD 1 +m Jl Rm q k q   [L/;L/VARL/CONSTL/WHILEL/REPEATL/IFL0BEGINL 0CALLL0 PROCEDURE q 5 /  k q 5 / q  k q 5 / q  k q 5 / q  k q 5 / q  k q 5 / q  k q 5 /  l { LNLxNLN( q 5 N L*O k [m $LN n m _ l ^m l m Jr =p   l \ l p +m o 1 Jr +m k [ NLCNL/O) q 5 -O LO k [m LYO n m _ o l ^X am }l l am k [ l (m @r ` n m +m l _LCNLOODDLONOTLOAB_ +m `LI +m k +m l N +m mLM= +m  k q 5 M @r q ` m (m $LN n m _ [LM m Jr =p   l \ l p +m o 1 Jr am LN k [m LgN n m _ lLxN n m _ l (m $LN o lL^X n m _ l (m LN am }lLL l ^m lL{L Rm n l (LL l p (m $LL l p lL6M o m _LM; q 5 L L[LM, q 5 M L I +m ` tl l LMM o m _ l p l p l c tl ^m o [LyM, q 5 wM L ILM; q 5 M L[ m m _LK [LK. q 5 K LK o m _ [LK. q 5 K LK o m _LKLL- q 5 K L,L [LL- L 5 q  qL2L-0 q   q  k q 5 /L q LiL q  lL6M +m l Rm n l l q q LL l lLL l q L J LJ l ^m lLJ Rm n l (LJ l p (m $LJ l p lLVK o m _LK; q 5 K L[L K, q 5 K L IL8K. q 5 6K LK +m ` l ql l q c am p l p c tl o [LK. q 5 K LK o m p m o l q *q l o [ l q l q ^m o l q qLI I o LJ- q 5 J L4J [L#J- !J 5 q  qL:J-0 q   q  k q 5 7J q LqJ q  lLVK +m l Rm n l l q q LJ l lLJ l q ARLH PROCEDURELHBEGIN q 5 H  k q 5 H q  k q 5 H q ` +m lL]F [LIALI[ am  k q 5 I /q  k q 5 I 2q LI m m _ [LcI, q 5 aI L IL{I; q 5 yI L[ l q q q o l qq q  k q   G  q q LG m m _ am l q  k dp xk  k q  Fp q L)H n m _ am l l (m $LgH l q p q  o l q l q ^m o [LoH, q 5 mH LTFLH; q 5 H LH [` m m _LHV q q q o l q ^m qLF F o l q p +m o [LF:= q 5 F LG am m _L7GLG= q 5 G L7G m m _ [L?G+LDG- q 5 =G  k q 5 BG q LG q q [ q 5 q  qLG-0LG+ q 5 G  k q   [ m m _LE PROCEDURELEBEGINLEIFLECALLLEWHILE q 5 E  k q 5 E q  k q 5 E q  k q 5 E q  k q 5 E q `LD [ +m lLbFALgFZ q Rm  `F 2 k q Rm  eF Iq LF m m _ am l l Rm  D Iq LD m m _ am l l q q q o l q ^m qLD D o l q p am o l q p l p o l q *q l o l q l q ^m o l p l p ^m o [LE, q 5 E LDLE; q 5 E LqLC STA $0 C  LC LDA C  m l Vl ^m a LC STA $1 C  LD RTS D  LD; q 5 D LBD xn m _ q  Om LED [ am l l q qL^D ]D o LsD PROCEDURE q 5 iD L>` [LDALDZ q Rm  D 2 k q DA # B  l p m k l p c o i # o {k a LB ADC $0 B  L C STA $0 C  LC LDA # C  l p c o i # a LLC ADC $1 DC  LbC STA $1 ZC  l q l *( q LC LDA C  m l Vl a LC C A LA ILA PROCEDURE q 5 A LA > am l p c am l q LBPR B  l q aL#B LDA $0 B  L7B STA 1B  l q m Vl a L_B LDA $1 WB  LsB STA mB  l q m Vl ^m a LB CLC B  LB Lq 5 ? q  k q 5 ? q LA D am l p c am q l p o L_AL A; q 5  A L\A m m _L-AAL2A[ q 5 +A / k q 5 0A 2q L_A [LhACONST q 5 bA L~A TFLAVAR q 5 A LA DLAARRAY q 5 L?[L?WHILEL?REPEATL?IFL?BEGINL?CALLL? PROCEDUREL?CONSTL?VAR q 5 ? / k q 5 ? 2q  k q 5 ? q  k q 5 ? q  k q 5 ? q  k q 5 ? q  k q 5 ? q  k q 5 ? q  k q 5 ^ q L^ q L^ MSB ON ^  L^ ^ qL^@ Qq Rm  ^ Lb_ Qq |m *  Rm q Qq    jm > Qq k '  4m T =m 8 1 q jm > +p T =m 8L]Lg_ Qq 5 e_  Sq am kL_ _ q` Qq k  Rm 4 q jm > q  4q  k q 5 s] Iq L] am /l` q 5 q  qL^] k (m L_ eq L^READ ]  Gq  L^ ^ Sq  qq  p LE^ Qq 5 oq  SqL^ eq LW^WRITE Q^  q  Qq  m $L^ jm > +p T =m 8L]L^@L^ Qq Rm  ^  k q  q +m /l`L\: q 5 \ L\ ] q 5 q  q +m /l`L\0L\9L\AL\Z q 5 \ 2 k q 5 \ I k q 5 \ 2q q  k q 5 \ Iq L^] +m /l` ]Lf]0Lk]9Lp]ALu]Z q 5 d] 2 k q 5 i] I k q 5 n] 2q [ q 5 [ L[ ]L[ q qL[< q 5 [ L$\ ]L[=L[> q 5 [  k q 5 [ q L$\ am /l`L)\< q 5 '\ LR\ q 5 q  q +m /l`LW\> q 5 U\ L\ ]Lr\= q 5 p\ L\ am /l`L\> q 5 \ L\ q 5  am Gl Jl l \ p pLZLZ JSR GT. Z  am Gl Jl l \ "p pL[L [ JSR NE. [  am Gl Jl l 'n (` l \ 4p pL[[LG[ JSR AND. =[  am Gl Jl l En (` l \ =p pL[L[ JSR OR. {[  am Gl Jl` 2l (m $L[ ]L am Gl Jl l \ o pLYLY JSR ADD. Y  am Gl Jl l rn (` l \ o pL(ZLZ JSR LT.  Z  am Gl Jl l \ o pLYZLEZ JSR LE. =LO>LO<>LOANDLOOR q 5 O  k q 5 O  m ~k k q 5 O  m ~k k q 5 O  m ~k k q 5 O  m ~k k q 5 O  m ~k k q 5 O  m ~k k q 5 O  un ~k k q jLdjLdjLdjLdjLdjLdjLdjLdjLdjLdjLdjLdjLdjLdjL jLdjLdkLdk LdkLdkLdkLdkLjbL jdLdjiLdjnLdjsL juLdjzL j|L j~LdjLdjLdjLdjLdjLdjLdjLdjLdjL jLdrELdrJLdrOLdrTLdrYLdr^LdrcLdrhLdj>L j@LdjEL jGL jIL jKL jMLdjRL jTL jVL jXLdj]LdqLdqLdqLdqLdqLdrLdr LdrLdrLdrLdrLdr"Ldr'Ldr,Ldr1Ldr6Ldr;Ldr@LdXHp08hP( @x& H L 8qL qLdqLdqLdqLdp (q Li Li DOS ERROR # i  p D ^ Lc LiERROR i  p D ^Lj IN LINE  j  p D ok p D Fm lk ^ LcLc@ `@ `0p@P`T? h   ]qLhC [q 5 h Lh LhLhA [q 5 h LhL# eq LiWRITE i  q  eq L)iWRITE "i  q  ` eq LJiCLOSE Di  Gq  eq LjiCLOSE di  q  p D n $Li >o m _ p D m  k p D OgLgEXPRESSION EXPECTED g  m o $LgLgCONSTANT EXPECTED g  m o $L6hL+hRANGE SPECIFICATOR EXPECTED h  m o $L\hLQh BAD RANGE Gh  o   wLphC nh  sLh ONTINUE OR ~h  wLhA h  sLhBORf  m n $LfLfNUMBER TOO LARGE f  m ;o $LgLgPROGRAM INCOMPLETE f  Lc m Po $LGgL +p T =m 8` l ^m l eq L`CLOSE _  q  m [m $LL`LA`USE = INSTEAD OF := -`  m m $L`L|`= MUST BE FOLLOWED BY A NUMBER ]`  m m $L`L` IDENTIFIER MUST BE Š̠Π̠ҠɺȺȰذȻٰȻԠɺɫذذȻȺȯٰٰȻغذٺٰ̠Ԡدٯ̠ɻغثȻٺ٭Ȼ̠Ϡدٯ̠ ɻغحȻٺ٭Ȼ̠Ϡدٯ̠̠ ɭĻƠɾ΍΍̠ɭغثȻٺ٭Ȼ̠Ϡدٯ̠ ɭغثȻ̠Ϡدٯ̠ĠɭغثȻٺ٫Ȼ̠Ϡدٯ̠ɭĻΠԺԠԺԻ̠Š̠Ϡدٯ̠ ɭغحȻٺ٭Ȼ̠Ϡدٯ̠àɭĻƠɾ΍΍̠ ɭغحȻٺ٭Ȼ̠Ϡدٯ̠àɭٺ٭Ȼ̠Ϡدٯ̠ɭغثȻٺ٭Ȼ̠Ϡدٯ̠Ϡدٯ̠ɭٺ٫Ȼ̠Ϡدٯ̠àɭغحȻٺ٫Ȼ̠Ϡدٯ̠ĠɭĻƠɾ΍΍̠àɭغحȻٺ٫Ȼ̠Ϡدٯ̠ĠɭغحȻ̠ύōԠϠŠŠΠҠԍνȰҍɬȬج٬ذٰԻŠɻŠ ɻŠàɻŠĠɻƠɾ΍΍̠ĠɭغثȻٺ٫ȻԠت٪̠ɻ̠ɽ΍̠Į̠ ɭčĻΠԺԠԺԻ̠Š̠Š̠Π̠ҠɺȺȰذȯٰذԍƠԽΠ̠ΠɺɫȺȯذذȯٰٰȯغذٺٰ̠Р̠ ɭٺ٭Ȼ̠Ϡت٪̠ɭčĻΠƠɾ΍΍̠ĠɭغحȻ̠Ϡت٪̠ɭٺ٭Ȼ̠Ϡت٪̠ɭغثȻ̠Ϡت٪àɭٺ٫Ȼ̠Ϡت٪̠àɭغحȻ̠Ϡت٪̠ĠɭčĻΠƠɾ΍΍̠àɭٺ٫Ȼ̠Ϡت٪̠ ɭغثȻ̠Ϡت٪̠Ϡت٪̠ĠɭغحȻ̠Ϡت٪̠Ġɭٺ٫Ȼ̠Ϡت٪̠àɭčĻΠƠɾ΍΍̠ ɭغثȻ̠Ϡت٪̍ōԠϠҠŠŠΠԍνȰҍɬȬج٬ذٰԻŠɻŠ ɻŠàɻŠĠɻΠƠɾ΍΍̠ɭٺ٭Ȼ     [8  ]@8L 8L L kjL 8  mr8  rw8  w@8  y8  uy8  y8  Z8  _@8  @8  8  >8CL 8EL 8GL 8IL 8KL 8ML 8OL 8QL 8SL 8UL 8WL 8YL 8 kL k!Ldk&Ldk+Ldk0L k2L k4Ldk9L k;L k=L k?L kAL kCL kEL kGL kIL kKLdkPL kRL kTLdkYLdk^L k`L kbL kdL kfL khōԠŠŠΠ̠ԠԬϬ¬һԍرزرزҍԬ٬ج٬ĬĬͬ٬٬ŬŬììììììȬ           !!! ! ! ! ! !!!!!!!!!""" " " " ĮʩĠ¨ɫʩĠèɭʩ΍Πبɩʻʩ¨ɫʩèɭʩƠɼΠ̠٠ɫŠ̠Իʩ¨ɫʩèɭʩč̠ʽĻΠɺҠĸԠɺɫɩ̠ɽ̠٠Ҡɻٍ àؠŠԻҠˬԻΠ˺Ԡ˺˫Ժب˩čҠųҠƹ̠˽ҠĸĻŠ٠ɻҠʻΠʺԠʺʫƠϠȨɩרɩʻʺʫ̠ʽ̠ɽͻ̠Šͻ̠̠Š̠Ҡɺԍ̠Ԡɻ̠Ϡɻɺɭ̠ɽ̠Ϡ̠Ϡ̠ϠɺԠɺɫʺԍ̠ԠȨɩרɩʻ̠ððÍà°РӠЍРѠЍˍ˫ɺԠɺɫĨɩȨɩͫɩרɩɍ̠ɽͻ̠Š̠Π̠Ԡرϻ̠Ϡزϻ̠ϽĻĨ˩Ļר˩čĻŠŠǬԬͻƠ͠΍΍̠ŠǬԬ̠ͭˠǬԻ̠ŠǬԬͭĻԍРĻ̠Ԡرϻ̠ϠرϭررĻززĻͺͫĻ̠Ҡ̠Ԡزϻ̠Ϡزϭ̠ͽĻԍϺϫ̠Ҡ̠Ԡرϭ̠Ϡزϭ̠ҠȨ˩ԍ̠Ҡ̠Ԡرϻ̠Ϡزϻ̠Ҡ̠Ԡرϭ̠ϠزϭϺϭ̠ϼŻĺԾǩƠļ΍ΠɺررززɠĻԍ̠ҠԪϺĺɺԍɺɫƠרɩϠĠĨɩϠ΍΍Ϻרɩ˺ɍĻƠרɩĠĠĨɩĠ΍ĺרɩ̠ɽͻĺĭͺĨ˩رͭȨ˩زͫɍōŠŠΠҠԠϠԍŽҠͬɬʻٍĠȠנŠˠǬԻҍϬϬĬĬرزͬɬˬĻ΍ϺǪĺ     àɻغحȻٺ٫Ȼ̠Ϡدٯ̠ĠɻغثȻٺ٫Ȼ̠ϠدٯƠԽΠ̠Π̠ɽ΍̠ĮƸàбﬠбРŠРᬠàв٠٠гà̠嬠ؠàīؠҠƸбᠰҠ場ǭٍ٫Рбﬠвؠвؠ嬠ггР̠̠̠ͬĮڮōвϬŠύī姠٠ᠷààƽᬍŰᩍĻаՠƠбՠŠвՠčгՠÍԠՠŠ̍԰Ġ̠ԠčŠƠԽ΍΍úúúú̠ԍčŠƠԽ΍΍úúúú̠ԍčŠƠԽΠ΍ƠҠŰȭčŠƠԽ΍ΠƠȼΠȺȫčŠƠԽ΍ΠƠȾΠȺȭčŠƠԽ΍Πٺ̠ԠčŠƠԽ΍Πٺ̠ҍƠԽ΍ΠƠپΠٺ٭čŠƠԽ΍ΠƠټΠٺ٫čŠƠԽ΍ΠƠȼΠȺȫčŠƠԽ΍ΠƠȾΠȺɺɫĻŠɼϠ΍̠ŠɬûɺɫĻƠ٠Π΍̠Šû̠Šû̠Šû̠ŠÍĻ̠ōĻŠٻìû̠ԠŠĠìû̠Ԡůìû̠ԠŠĠìÍĻŠԻҠɻ΍̠ŠûɺŠɼϠ΍̠ŠɬûȬû̠̠ٺԫ̠Šر٬ȬûƠ٠Π΍̠Šز٬Ȭû̠Šز٬ȬÍčĻŠŻ΍̠Ԡů̍ŠƠپȠ΍̠Š٭Ȭج̍Š̠Š٭Ȭ٫Ȭج̻ƠټȠ΍̠Š٫ȫجÍĻŠӻ΍̠̠ٺԫ̠Šر٬׺ٻ̠čĻ̠Ԡجٯû̠Ԡ׬ׯûغ׻ٺ׍ĻŠŠج٬Ȭ̻΍Ơپȫ΍̠Š٭ȭجûƠټȠ΍̠Š٫ȬجĻĺīׯٻ̠ҍĻƠľΠĺŠƠļΠĺƠ׼Π΍ĺӠĻ׺ٻ̠čŠƠ׾Π΍ĺӠĻزĠ٩ĠӨׯ٩Ƞ΍΍ĺӠĻĺīׯٻ̠ҍčŠƠ׽رҠ׽زĠ٩ĠӨׯ٩Ƞ΍΍ĺӠȬٻŠ̻Ҡ׬׻΍׺ثĻ׺٫Ļ̠Π׬ׯƠԼàΠ΍Ơ׽Ҡ׽Π΍ĺĻ׺ػ̠čŠƠ׽رҠ׽ƠӍҰŰѠӳ٠ӶؠƍӷðЍЍðЍЍð؍ŠӷƍҠԍٍŠӶӍ΍ƠŰٺٺúƠб堤Ű姠ӱàбѠӳؠбؠðӲ؍ŠӲРӱӳӍ°ŰѠӳؠӴ٠ƍðӵٍŠӵ؍ŠӴŠŠӠŠРﬠԠ򍍍ϰŰ鬍ѠӳĠǭؠҠ±Š嬍٠ˠ٠Ġ٠˫Ӡԍ԰˫ΠàԱưԱˍ̩٠ҠҠĠˠҠٍٍ̩̩Ӎ̰ؠīàΠҠìؠٍ̬ؠ̠̠ȠȬؠȍƠᰠīҠƸīàīŠ٠čРƸ԰īҠƸ٠Ġǭ٠﬍ааРҠΠﬠàаааРба姠姍ŠРабӍӠፍŰīҠƸ٠īǭ٠ؠīؠбؠбĠ鬠ҠҠҠβˠ殍ì˫Ҡȍ٠Ġǭ٠ƠᬠàαàưαĠٍ̩àβҠ  ΰī䮠Ҡؠ̬ؠ̠ȍ̠ȬؠȠՠ̠   İİİİȠ  ìì Ŭð ìì ˠՠŠҠՠϭӠ̠ՠǠ ìì Ŭ  ²ì Ŭ Ŵì٠ŠРӠ Π鬍ûƠؽΠźūŠźū̠Żغ؍̠ŽҠŽ̠ϻ̠ϻ̠ύ̠Įԍ̠ӻ̠̻̠Իðˠ˫ðƠԠΠٍ̠̠ؽҠؽ̠ϻ̠ԠجٯƠԽ΍ΠغĺčōΠغĺĻźź̠Żԍĺ͠ĠͺͫٺӨ͠ĠͺͫŠð̠嬠ԍð姠﬍̠姠̠堰Ġˍ˫̠ԾԍͺͫðˠԻ姠˫姠ԾðƠԠΠ̠ٻ̠ӻúúúúúȺȺźźðððð̠ԻԍԺ