dS͋^AA[CRËKKYQÉ͋^AA͊FAQ͊FrA͋VAA͋^AASR{͋Ns[ uAA͋N\Z[*Ȉ* uSAA@[ZRSR8[4[܋([S"[ uS[^ [KR[ZCZ[^R[u/y*C7RKK7KCCC7KKt[ZS[u$yZRRCCKKCCtZCt[SS[Rj[SS[R^S[ZCL[ZE[Z"ÈÈ"Lj3[Z ÈÈ Lj"[Z2ÈÈ2Lj[ [߳[Z[C[K[CCZ[)[ x ЈLjЈC[C^ڇ[K[ЈLjЈCZ[QٻۇۇrtY~PۇۇrC)rBXtÈЈˆЈBxЈňЈPAXxÈٻ P{Xr[ZQYR[ZQr xwYSRPr ؈Lj؈È؈ƈ؈XtÈZY^S ,KPXYPXsYRC[ ǻtC1Qň*ˆƈYxZ[[Z[Z)ӈ ûtCZ[4Z[Z*ˆ$÷ u ՈFCBIÈˈYZ^YˈZY^ӈ uCIYjZ[QAY[a[CC݋^C݋^C?[Ӊ͋^AAQC=Y͋^AA͋VAAQ0Ӌ͋^Y[)ډ[ۇӋ)ӋCRӋCCKK[ZQň*ˆƈYx͊FA͊FňRS͊FA͊FA[[uSKK^s2xAA[ډC^K7K^Q)Yx AA[KK [CCC͋NSSSK[͊FA t ͋Nt(͊FA2É͊FPAXt2uct͋F)AA͋VAAs)B͊FS͊F2t ACtr[uˆr sR͊FA tAAtAAtAAAA͊FrA *NC[ZQY[ZQYxT!T? TzT_T >q6>d,T T T 'wT'T w6 q  T: q TATQo TA@  "q -; ;  1"  6EE  T.  1 ,;  1E  * 1" ( q >>>>T}6>^^h ^j ' ^^P >5 ^ c    M  : >d5 "   c   '' '18 6 T? TmT   e  T? TmT  "     TT , T? T}T? T}  1: >E" ^ 'C T'YO,wO? TmC T? TmT ^ >5 w  c  " y : >Qӱ`CڇYQ5 E[آM[CӏEGQIK:u KCCCC u*ˆƈŋG*rوG*CňCCӈRӻrӋCCCCC^ں&ڇӋEM t Z3^ tڱ uGK[EGrCEM uGM uKECC)CCCCsG ubSC*ڠM t6hY<u&IىICCCCC/&ڇӋEYQӋEYCCCCC/YM tISKS: > > >TT c>G=B<T65 m: MT KT AGM>:i15 }: O865 }: >T T E ;O;4T TTT O>I  y>"y>Ja T Ba > T zy,'@ T T T 1 , T T^yT@y   [>c^T_M O>f ET yJy>T y>4kRe>܇ӻڇQSR ՊFՈFCBtZ[ x ՊFՈFCBtӈ u< s0÷YZ^P,y>;m'm'> +T-yJ'mJmTdmJ>T y>T yJmJmT>T yTT>T yT-yECtc'J;JmJJmTJmTJ@BmJmJ'mJmTdmJ> \JmJmT>T  \T>[ZQ uC uYSproc DOSCAN SRF3%__uCBF2$_t Z[CBy$Z[t SC[YS"proc DOSCND 865 431/-+) zxXV Uˑsa * ERROR * 4"2va CONTINUE LOAD (Y/N)? DT_TY AaINPUT IGNORED UNTIL ; dD$;;PUSH Ta *** CLI RESUMING r2"_4e7f "S2TA}TAUK_D>"- \ a$STACK UNDERFLOW ... RESETTING STACK.va STACK EMPTY.D>' 5aCANNOT OPEN FILE "v>f >]a FILE READv>ya FILE WRITEv>,D>,_>>>z2, a(TOO MANY LOAD LEVELS ECOUNTERED AT FILE "v 2"_728> uDKۺڊC7R{E[ t"[2"_7;28E2j< A<AA8DaT<A<LD<  'T E[ u@[$S5 uq ug[S< r'< t 3+DE< t EyE5S V O-\T yyE' "' ,> >SC$u,a IS NOT A 7TH EXECUTABLE WORD"vE CC7Z[S/ZC7C/ /ZC/[Z$l0aaWORD a CANNOT BE FOUND IN DICTIONARY'v>K7KRՊFˆrBC7}c>[Qٻ܊7KKR7KRӻu SR ՊFՈFCBtZ[YYY*Z[r ^C^9D=',T" " , T" ]aSYMBOL a IS UNDEFINED'v7T߿TH TT߿TO @T߿TQ @T߿TB " J1' T+  ''4T- 4 ''1' ,T, _6"6,'T0E;T߿J;;6;1686;NN6+@aSYMBOL a IS UNDEFINED'v66'>H>d,LDIJLDILDIB> SEZ[SJFJNrnfjrJ l9>SEZ[<(t <)tt5d>]TT" T\ #T\ T!T!;(T\ ##911J],,#T ]T ]##9J]> >jLDIS(((>R=2A<  'T  niZ >">`>}xs0lU! #a WITH DO NESTING LEVEL < T0 a/ ENCOUNTERED WHILE DEFINING WORD 1v>a5CONTROL STRUCTURE ENCOUNTERED OUTSIDE WORD DEFINITIONv>a/ ENCOUNTERED WHILE DEFINING WORD 'v>aILLEGAL CONTROL STRUCTUREf >kK"!#a! ENCOUNTERED OUTSIDE A DEFINITION"v>0 1!#a ENCOUNTERED IN LOMODE"v>\!#aENCOUNTERED IN HIMODE"v>Ko!f s!3!>KP!F"K8!>K"P!!% !F! !>XJK8KP""% "F" "> 3"->ޏl"Da** WARNING * aF IS MULTIPLY DEFINED DO YOU WISH TO RE-DEFINE THIS WORD?(Y OR N) T_D$N"v,~#aWORD a CAUSED DICTIONARY OVERFLOW'v=#  ">݈>ci# c#-'> ~#@#,u!">#^! > ,>w!@!BRZ>b!Tu!BRZ>F $BRT!"F$TT !"" D$-> d$T!"$T !"" $-> $T$Ju!">!T!Ju!BRZ>l $BRJ!"0%TJ!" %-"" ,%->#^!"u!"5"TCOLON" f%->ۚ T>'!p%%SRET%TTHREAD" %->[!RRET>K3!'!p%TX;PUSH" &->3!'!p%>#^!T5"TVLOAD" c&->'^!T5"T,VLOAD" &->#^!"u!"5"TXTASK"TCOLON">Eڏl'H'aSYMBOL a" CANNOT BE FOUND IN THE DICTIONARY'v>!&> >'XDEFAU''&>'XDATAU''& '-'>Hl'H#FP>T#^!T5"T'(LVLOAD" (-=(VLOAD" =(-'Y('>؃'8>؃'8>!XENTR'>!XEXIT'>!T@u!U8XDO">d!T@!U8">H؇XLOOP(>9؇X+LOOP(>)!XDOEXIT>!XDOI>!"XDOJ>!'XDOK>!X:EXIT> 3!TCOLON" )->5"T )->^5"T )->4aILLEGAL SYMBOL #a ENCOUNTERED IN IF[ OR END[ LIST'v>ևXIF[$(e*++$]*$**++$"*$*''*)++$THRU*$*"9*)++$ +')++$!+%+9"O*>!Tu!?*>!@!?*>#^!"$]w+x,$(+t,$BYTE+'t,$WORD+'t,$LENGTH+"t,$NOLENGTH+"t,$", , ,t,$'''R,$''2,&N, H,-'d,`,d,,r,t,c+T5"TVLOAD" ,->#^!"5"l,aSYMBOL a IS UNDEFINED.'v  'c>)!Ju!>!J!Ju!XOF>!J!Ju!BR">!J!-"w->!J!Ju!DUP?*>>zӏ$(-$ENDIF->[.$(-$ OTHERWISEENDIF->+ӏl?.aCan't forget - word not foundv~7q.a!Can't forget system/attached defsv.T  VLOAD .'7 7.....>7Ғ'KUi?#>3! >#/TJJT ,'i/T/'aASSEMBLER REGISTER ERRORf >#/''/aASSEMBLER CONSTANT ERRORf >o',/>ZT'JT/,,/>2T'JTY0TP 60TJTPJTX Q0TXJTu0JTi0,,/>Н;/@_>Н#/>#/>TT',/@0T0, 0T0>Н#/JT/>ϝ#/>ϓ#/>ϝ#/" s1->ϝT",/E 1"1T>ϝ#/'T" 1->a#/T u!'T><#/,!T 2"2'T" :2->#/J!Ju!'T>aCODE^!u!"5">TTT{TvTqTlTgTbT] T$@ H:8P4X'~y,$4 <OtKuGrCs?z;{7x3y67u3t/s+r'{#zyx<8u4t0s,r({$z yx*"2 |:?u;t7r3s/{+z'y#xT,/T',/EL4"T@_4Em4"T@_4@_TT>T,/E 4J4TJT/>xTJT4,,/T>QTJT4,T,/@_TJFT>TJT15,T,/@_TJFT>JJ^>J)>J)>J)>J>J)>J)>J)>J>vJJF>aJ>VJ>KJJN>6J>+JJV>J> J>JJ^>J>J>J>JJ^>J >JJ^JA>je`[VQu" 6'_;>Vʏ 6-'>9ʃ666-" > t7 66>->ɯ6>77>ɯ6{{>}TT0T97;7>]T77>M77>@ɚ 6_>/l8>" 6aLVLOADaVLOADaXTASKaCOLON64g886"W8"7 T 9a 7 7T 7 7T 7 8-T89 8- '1'496"_ 9 8a#:TVL T 77T 7"Y9 M9-'7l9,4l9T 7c9T 77,o8a 76;> 67796;a PHASE ERRORv776767777 767-6D'6D6;>" 67776767777 767-76_'6_6;>"J ,  >Qa Dictionary space left: ~\a Definition space left:  ;;6=;\ ;a Cross mode Start Stopa Code: -6\a \a Data: \a 6\D>i>^>7Y[ uS5 Y[ uS%ŏ>ŏ9>ŏ0:> ">@<endfileG<endprocT<a<mB<{>64<<<>jh,ñ[ZՊF:PCBXuS[t("\a ===> start of codeD5" B<g=B<;TTHREAD `>-"`"\a ===> end of codeD>o< >>o< >>> !$!C !Eproc BANNER ͻ ̹ 86 ͼ Original CP/M80 version (c) 1982 United Controls Corporation United P.O. Box 4620 Controls Huntsville, Alabama, 35802 Corporation ͼ 205-837-6144 ͻ MSDOS translation by M.F.Buchan. ͻ EGA graphics, shell to DOS, ͹ Hong Kong and other extensions added (1988) ͹ ͺ ͼ Polytechnic Released to Public Domain by permission of UCC Electrical Engineering Dept. ͼ Version 2.02 Comprehensive user manual $25 from UCC $CC$C߽ؽ0Cѽ7C>Yʽ>CEýEC輽LCýY$C:t:t C酽C u!އӋ:t:t2CzR u7SCC:tC:t C^ CC^ CCR7Z tS[r!"1GD \1 -DD1 cDa STACK EMPTYDa STACK UNDERFLOW..RESETTING STACKvDD,"\R>QRS0CӋڇӋӈ:t:t[Sڋ-S`DaTOOPSCTDET4ET y EDCDET DEDC&C2CE[ZY gE2C"PuE"_2CNC>AC t读&CC2C>蘻&T E'&C9CE6> jD B7>B?1tL&C2CE67>? ACC㻎tܺ CC>TTmm'>ٺCFTT\FT\R4F'FR7FFa *T4F$FT.yFT*y D>?ZFZFZFZFZFZFZFZF>*FF>!\  \R>_RGDG,4G>߹a ---- USER'S DICTIONARY ----1GG  Ga ---- SYSTEM DICTIONARYPa----1GG"=G>[ZQYSJ&GHGH>/GH>H-HaOOPS>ٸ/HӸ6H̸虸蔸菸賸&qHvH{H&'T >}vHqH{HqH>b&1H7HT >H"" I-> 1H7H>H ">ݷGI I"I"I"ZG II">v&VI\THyPTDy>]DODYT4IZFI>;cD\MJR;T 4$Jy J ֶw>Ƕ>虶蔶踶qJvJNOP>蝶qJvJ&>膶vJqJ>w2CKDadb #'TJJT\>SS'E[:t-/׵9CKatraceon HWK]K'H&Ca trace level=NC2C"PE葵E觵KaUnable to trace again>8@notimnotimnotimnotimADADD APUSH EPOPEnotimnotimnotimnotimOROR APUSH C0FnotimnotimnotimnotimADADC APUSH SPOP SnotimnotimnotimnotimSBSBB APUSH DPOP DnotimnotimnotimnotimANAND A26DAnotimnotimnotimnotimSUSUB A2BDAnotimnotimnotimnotimXRXOR A36AAnotimnotimnotimnotimCPCMP A3EAA軳KnotimnotimREC4C5C5notimC7?C9RERETINT ININTIRERLnotimnotimnotimAAAAD6XLAnotimnotimnotimnotimnotimnotimnotimnotimnotimnotimnotimnotimIIN AOUOUT ACALJMnotimnotimIN AL,DIN AX,DOUT DX,AOUT DX,ALOCF1REPNREPHLCMnotimnotimCLSTDECLSTnotimnotimiTMZQ- uZSC$u.CSC?CCC:tC:t [[YSS[ PCXPCCXYCC? tYޱJmJmTmm'>NfOmOTLy%O>[Ȉ醱趱; OOoOaACEL-BDH y>花TO O >lTyTO O>I%P4!PTP O T P O'P>  KKO >  KKO  oP->4JaH#Tv$>EnqP6 \P耰'_4P ' P'_PP">GKT;yHQSO>+ %O>\$?QOMOO"FQ)PK7FQ'\Q@PK%OP Q1oQ)PT,y7FQ6Q@PT,y%OP QKKOW$G@QKKaINXK,;}OW$OHQKKaDCXK,;}OW$WPRKKaPUSHK,;}OW$_X-RKKaPOPK,;}OW$q`NRKKanotimpWTrnR KKaJCKQWTsR KKaJNCKQWTtR KKaJZKQWTuR KKaJNZKQWTvRKKanotimpWTwSKKanotimpWTx$S KKaJMKQWTyDS KKaJPKQWTzeS KKaJPEKQWT{S KKaJPOKQW$|SKKanotimpWTS T SKKaXCHGKaAL,AHSKKanotimpWT3T T TKKaXCHG/TKKanotimpWTeT KKaMOV K;}OT,yT8}OWTT KKaSHLD K%O WTT KKaMOV KT8}OT,y;}OWTT KKaLHLD K%O W$UKKanotimpWT/UKKaPUSHFWTGUKKaPOPFWT_UKKaSAHFWTwUKKaLAHFWTU  KKaLDA K%O WTUKKanotimpWTU  KKaSTA K%O W$VKKanotimpW$DV KKaMVI K;}OT,y 7FWT^VKKanotimpW$V  KKaLXI K,;}OT,y %O W$VKKanotimpW$WTNOO"V)PK7FW'V@PK%O W,W@PK%OP P  ,W-P@W"KW"PWKW'nWD \ W,WD \ "KW1WD \  "KWWKKOW D>U\\KKHPPXXX\X"-XR X'=X X,SX\\X1X XwX\X"X\a THRU\X YX\X6X"KX;XKXD>Va1============================== code definition KQ*Y"KKYK Ya1------------------------------ colon definition KWY"KKzYK" X>w>Y[芧&X> Aproc NEGAM +proc CGAM proc NCGAM proc NORM proc NNORM ٦proc EGADOT Z]Z]YVWb_^]鲦proc SETDOT VW%s –$*Ȱ˻Ë& &Ȏ_^RS@ۻI[uZÀZuVWQRH&proc EGANIB Z]Z]Y]proc EGABYTE VWQR@$tX&&]&&=ZY_^ȎË–%*Ȱúú_proc EGABOX ]XY+t.XY+t$]]QPS6[XHu]YQBKuYXXX]proc DLINE Z]Z]YVW_^]proc DOLINE ]]]]]]]]]]á]+]}أ]]+]}أ];]|:á]裠]]]+ۋ]]PQYX];]~+]]}á]裞]]]+ۋ]]PQYX];]~+]]}proc CIRCLE ]]Z]]]VW] QP+XS[ˋPSRZ]xs]x ^s<[XYIQuY_^]鄣proc EGAPARM MB^ˎôJ!D^&F^.,^^^"^^^K!D^&F^B^proc C:\VED.COMP^b^^PATH=COMSPEC=C:\COMMAND.COM鹢proc EDHELP ??????????????????????USQ^^^^,!.^^6^^Y[6^6^6^6^proc 1#uslin>_Za COMMAND.COMpglinT\pglinuslin_uslin]_uslin>辡ZaVED.COMpglinT\pglin]>蓡uslin>脡u__>{^a:a:a.J__D>__ _` ``` `'`ڠ.`Ӡ5``"`_`_`_ `^`___`a:_a:_a._J``a ==> _``T<)`_`aT<)`)`0`_ `0aTd0`0`7`)`am 0`a.7`Jcaiaa s elapsed D>莟艟脟\裟< A2aaT $zaaT_>nDaT?yaT aaT a>BT5 m: T|aaa$ !bT T= dba TZbaa^ba#ba>ɞ|a T 4bT bTT 4bbaaT: ba $PAbT@ba'ba4caT. ,c  caEcT: ;cacHcT JcE TcaaT* cvcT xc@4cT?,cc1 b'>膝5 m: T ca Not Found>dT 4cT? cca>7aajbca5 Tm: T daa {T Ddy%d;>aajba T {da ??????????? a T c5 TT},aTm'd: aNo File=,xeT _TJTT Tdme ,%eT "}J"}aT@"}T:"}T "}:eT "}T:"}T "}@4Pe "}DeT "}'4ke "}_eaTmd: >賛TT5 }: >蠛e>藛e>莛"e>腛'e>|Z5>s1_'#[>94X>.5>޻ډ3e>SINGLE-TASK-INITeSYSIZEeSYSTKeBOOTepad2epad1ed4pixZdpix7ZdboxebyeeD:eC:eB:eA:eLOGDISKeDIRJdTYPEcWILDCHKcDOMON2cPARFNjbGETFNaFNERRORaGCUPaCCPFCBaFNTERMaFNSTRINGadrve|atd<`hdre7`secse0`minse)`hrs0"`mins0`secs0`hdr0 `hrs`mins_secs_hdr_tm_redit_reload_editu_sys_lenbyt_using_TDAT3^t^USLINP^PGLIN^dos]EGAPARM]CIRCLE\DOLINE%\DLINE\EGABOX[EGABYTE [EGANIBZSETDOT^ZEGADOT7ZNNORM"ZNORMZNCGAMYCGAMYNEGAMYegamYDDYDDHYDDLXDC:WDAQrelbQDACMTP SPCLCODE@PDATABLEPD:TABLEP THREEBYTES@PTWOBYTES)P@OPCODEO.OPCODEOOPCMD@OREGS}O8/oO.VCBSODHX%O.VCANC0-FFN0-3FOMDDCONTKTABKDDTKTAG-KDEBUGKCLI1JUNPATJPATJPNOP{JPATDFAvJPATADRqJNOPlJFMEM]J.FCBI.FCBRISIZEISIZE1VIupd)IRPDHunlinkHlinkHolkad2{Holkad1vHolkadqHPDCHodef2>Hodef17Hodefa1H.'1H.'HPDICTG'?GDDICTTG%DDICTA1G%PDICTG16DM G8DMFDMZFDHB7FDMF(FTRACEOFFETRACEONETERMSGETTHREADwETRACELJEGTWRD#D%TDSD'?#CTSRETCTCOLONSCTAGLNCTRACEGCDDHSTART@CTAGADR9C DCSPOFFSET2C%DCSP+CTRCADR&CTSTATEC%DSTCDMFBCBANNER>logo>cload>ctload>CsLOAD >DOLOADg=STEST:=LXWRD=FBUFF<LXSTRG<RBYTE<FIND[t<CTFLAGo<IBUFFh<SLASTc<NTRYSTRG\<EOFSTRGO<FCBADDB<RECURSE)<ISAVE <ILOAD<FLOAD<<-L;->L;[[;]];STATUS:STOPMAP:PIMAGE0:GIMAGE9MAP#8%MFIND8%MPRINT7%MHEX47%MHEX27%MHEX17%MWGET7%MWPUT7%MPUT7ORGv7UNCROSSK7 CROSS-COMPILE6PATCH6SAVE6%MLINE6%MEXA6%MFCB6OLDLUM6OLDHEAD6CROSSTOP6LDAXHB,6or-bcbc,~6 mov-hl[hl],i6 mov-[hl]de,^6 mov-hlde,S6 mov-[hl]bc,H6 mov-hl[bc],36 mov-hlbc,(6 mov-de[hl],6 mov-de[bc],6 mov-bc[hl],5 mov-bc[bc],5 mov-bcax,5 mov-axhl,5 mov-ax[bc],5 mov-axbc,5 sub-hlde,5 sub-hlbc,5 sub-dehl,5 add-[bx]de,5 sub-[bx]de,{5 sub-axhl,p5 sub-axde,e5XTHL,P5STAX,5LDAX,4LXI,4MVI,4MOV,4WHILEP4WHILEM4WHILEPO4WHILEPE 4WHILENC4WHILEC4WHILENZ4WHILEZ3CMP,3ORA,3XRA,3ANA,3SBB,3SUB,3ADC,3ADD,3ENDP3ENDM3ENDPO3ENDPE3ENDNC3ENDC3ENDNZ3ENDZ3ENDU3IFP3IFM3IFPO3IFPE3IFNC3IFC3IFNZ3IFZ3STA,3LDA,3popw,3pushw,3dcxw,3inxw,|3LHLD,w3SHLD,r3CM,n3CP,j3CPE,f3CPO,b3CC,^3CNC,Z3CZ,V3CNZ,R3CALL,N3JMP,J3OUT,F3IN,B3CPI,>3ORI,:3XRI,63ANI,23SBI,.3SUI,*3ACI,&3ADI,"3PCHL,3SPHL,3CMA,3XCHG,3RAR, 3RAL,3RRC,2RLC,2POPF,2PUSHF,2EI,2DI,2CMC,2STC,2DAA,2HLT,2NOP,2RET,2RST,2POP,2PUSH,2DCR,2INR,2DAD,2DCX,2INX,2M2H2D2B2SP2L2E2C2PSW2A2CODEj2%XACL8,>2%XACL6,1%XACL5,1%XACLCL1%XACL7,w1%XACL44,R1%XACL4S,E1%XACL4,81%XACL3,"1%XACLZSS0%XACLZS0%XACLZ2B0%XACL2,0%XACL15w0%XACL130%XACL11/%XACL1C/%XVAVAL/%XVAREG,/%XVALVL#/ICOM.FORGET.IFTRUE- OTHERWISE-ENDIF-OF[-ENDCASEl-ENDOF<-OF-CASE -SYNONYM,DATA[V+END[G+IF[1+TSTLIST?*BADTL)DACLS2)DACLS):ENTERu):EXIT])KI)J5)I!)EXIT )+LOOP(LOOP(COMLOOP(DO( EXIT-FRAME( ENTER-FRAME( OLD-CONTEXTp( NEW-CONTEXT[(BLOCK'GETFP'CONTEXT'''''t'STDFSU' [COMPILE]J'GTDFA&TASK&,CONSTi&CONST2& ;NOTHREAD!&;PUSH%RETURN%;%CLRFINDp%:2%ENDWHILE$WHILE$REPEAT$THENJ$ELSE#IF#END#ASM# IMMEDIATE#BEGINk#XDATAH#REDEFINE?#DEFINE5"GETLOC"CNVPOP!CNVCHK!CNVPSHu!CMPERR3^!LOMODCHK3!HIMODCHK!LVLCHK CMPERR2 CMPERRf CMPERR1% DOLVLCHKolastINITLUMINITHEAD%ERNUMREDEFLUMDICTION~DDSsdepth`ICLITOPDICT""HEAD"PROCESS(())CLIDEBUGCLIWORDNUMBERJVAL9GVALGVALESC%DS+%DS*XDEFASTRIMcXDFDOITHEADB!HEAD!STORIT%ASMCHKGETIMMEDCHARS]GCLOADPRINTLOC PRINTLOADSYSWBYTESYSRBYTE{SYSWRITE_SYSREADDSYSCLOSE;SYSOPEN DSERMSGv DEBUGERMSGsONnOFFi %WORDFORWARDd %CLIFORWARD_SYSLASTZDOLVLUCNVMAXPCNVNUMKCNVSTKFCONIPACONBUF<FCBS7CURCHAN2BASE-STRING(ATOM#HIMODEOLDLASTLASTHEADCROSS NLLINMAYPLOCMAYPRNTCLISPCLICSPDOSCNDDOSCANfindlDISPLAYN,.H(,..HB.H\.P.L%LST2DOUTmSPCS\SPCRCRLFD.Cy."QUIT5INITIOGETLINLBKSPGETCHRPUTLINPUTCHRyPC1TCOLCNTOGETSTSGLGC1CBUF CTRLPFLAGGETCLIWRITEREAD%RWCOM %DIO# CLOSEf %CLOSE OPEN ADDFCBS %IBUFSM %DIOSET? UNLOCKIO: LOCKIO5 IOFLAG0 PFN%PFNERR%UPCMON1}MON2m%DTMPhSYSFCBcFCBSIZE^RECSIZEYNUMFCBSTRECOFSO10J9E8@7;66514,3'2"10-1XIF[$XDOEXITXDOK XDOJXDOIX+LOOPXLOOPXDO4%CSPSH##CSPICKXEXITXENTRLVLOADFP$!FILLwMOVEcMOVE#LU>70>->== ><RELAT#0=*/~%MPYU#E/MOD"/%CDIV#SGNDE#SGNBC#NEGDE#%DIVU#*_-1*N+!8ABS -2+1-1+ +SHL8SHR8XORORANDB!!SP@B@DUPB@@DUP@INSRT_XTRCT#ROTPOKEPICKSWAP?DUPDUPKILLDROPOVERXOFBRZBR,LDIvLDISaLDIBTLDIJX:EXITEEXECDSRET>RRET=COLON6POPBC#)PSHBC#CSPvload thpat threadx;push蓄,'>耄,'>m,'>[C7CC?SRZ[^Z^rC^Z*ˆCƈCZˆCƈ΃[C7CC?SR黃[ZC7CZC7骃[ZRSR顃[[靃Z[R闃ZxKSR鄃[^ӻ7K[^R[7KRK7KREZ[^*ˆZ[ˆƻyZ Z uκyR[Z ƻtZ[^*ÈZ[Èǻx鼂Z[^*ˆZ[ˆƻx锂Z[^*ˆÈ* Z[P*ˆÈ*ƈX ûtVPƈCtXQ/xKKKKYû S ЈCtKKKKSR ӉՊFՈFCBtZ[r!R ӉՊFՈFCBtZ[[t貁Y讁܋ӻڱՈFCBt2KKKKK *KKKK#PCӻڇ@XrCCCCrNQJ}Z[X^R CCCCrR ՊFCBtZCCCC K؈ttCCCC7KK/K[RQPӻXr'[ZYYRS蚀r腀 Pk CCCC/BBBB+S,rrKKKx  [ ZSSSSSR CЈŰغڈƊCЈ؈2uRK K7KKKK7KZK7KK/K x2űCtKr KK >Oz~i>Fzli>=z}i>4z5i>?@ A=zJ>yZ}OJ>y->y}Q>qy|e|~>Z[ < sKts C\yy66;@Z}+'+Z}v?}$v=}~JETT'TT14[Sm}64v JT@JgJ@;yb}>}xT0y>qxTEy݈ T-T+yJ">Gx4 >0x4,"(6''\>wT y[T-y,1q16y1$6T0yT.y6ʉT.y 11ˆ1>[ZۇrCSRw[Z ؈ƈ؈ˆ؈Lj؈Rv,wZ}JTT'TT'$OT4K牏E{$qJN4mЉg{b}v}vG~~>vZ} vK}Z}vG~~J,JJ,T,ŠTЉ,T,v||>(vTv64Ռ6$90T0m}11v }~v |'',,11,,,1 1,T,$+-ߋ ׋T- ۋT. ,,T ,TE@ 4@$90IT0J_$+-}  uT- q"y@ 6T 6"_616 ь,T ,'ی~,-4 4 ''>[S7ƲuC<.tRsW Kb}SY>{I@t?s},6}E4b}}}}JJ}T ,T 6}66}b}}b}}b}>csZ}\>`N 58c< ]#@ s/sbZ}v@Ѝv@Z}Q5}Z}Z}1i>rb>,0cx29X4`:<61#8:Ք;Ρ=0?rXrbZ}v@Ѝv@Z}Qm}}}g}}Z}Z}|@i}g}}>Orv.eB>Brv.eB>fe3=e2`8<~~?qrv;?Z}Ѝ䆀}}};i}g}TTT_>&痱2HIէ50py8N)b\;c&ʰ>m@?wqgq+JTTm}vr1?}J?J?v@v@@톓Ji>Lqv[>>=q}#>0q+Z}JTT~. T@_J?}TRJ>VJ?TZ}vʰ/?vʰ>'4}}{}b}>0W72#35 6Y 8R79=;%=K?OpspZ}Z}Z}v?Qv@@}v@톻Ei}vb}톀}:5v@톻Eiv?>ob}>Xc%1d3u66۷B97 s6ATANyCOEFATANtACOS7ASINCOEFASINSQRTPWRLOGLNCOEFLNEXP#COEFEXPR>DD>RTANCOEFTAN|COSMSINCOEFSINENTIERЍCHEBYiPI/2bPI[FPPATFPEVAL FLOATINTEGER,2/,2*ЉF.HPSDIGSPDIGSPEXPˆPDIGFPOUTFPDRNDyF=lF=MASKeF<\F>QF-1*:FABS+.1$10.2.1.0.F/F*F-F+FPEXCEPiDIV/0dUNFLW_OVFLWZFP+~FP-lFPNEG#XFP/5FP*}FP0CHK#NSSEXIT# FPEXIT#FPSET# FPADEXP#Ԁ,*/,* %,MULEXITv %,MULUTILA%,MPYU,/,/MOD%,CDIVe%,DIVU~,-1*~,ABS~%,MKPOS~%,CHSGN~,=o~,~,0=~,0>},>=},OVER},SWAP}DOUBLEm}SINGLEg},DROPb},DUPZ},!I},@6},-},+|,VLOAD|,XOR|,OR|,AND|f