; Y`jLISTENXSUBR,8FEATURESNEWIOzGSTATUSg@!#4B ,8 KLISTEN<+ ,)*U,xTDEFPROPSETQQLAMBDAXU*U*WEXPANDVARCARCDRVALSETQQUOTEMACRO      xW*U.URPAQQ      xNLISTPTHINGNOTLISTP    xNEQTHING1U:U.UTHING2EQ   xIPLUSBODY+  xITIMES*u+U.U  !xILESSP<  #xIGREATERP>  %xDISMISSMILLISECONDSU*]*uSLEEP/$FLOAT "_  ' )'+xFMEMBMEMQ  -xMEMBu*]*u  -xCHARACTERCHASCII/  1xFRPLACDRPLACD  3xNLSETQW*UjWERRSET  5xERROR!ERRORASKUSER ERROR  7  xHELPASKUSER ERROR FOR HELP9  7 xPE# PEEKC-,FILESTRINGP`= QDBAPEEKSTRING+7D`+ ,TYIPEEK`a? "p`1+ ,,80jK',8",o7+PEEKC NOT SUPPORTED FOR FILE X#READC-,`=/ READSTRING! `?7D`3`9 ,,8,8K1READCHoC`? ?,8,8 ,8",o7) 1+READC NOT SUPPORTED FOR FILE"READP-,1!A`=4B$ `W7D+&`Q1N`W W,8,8,,8ATKP",o7+READP NOT SUPPORTED FOR FILE#(ACLEARBUF-,1 c+6,<P!# pe+5 ,TYI$ Np"`a/+9 ,9,8s",I:o7+CLEARBUF NOT SUPPORTED FOR FILEI8YLISTGET-, ,8+>[2D``Z[ `ZZ`w/,xP:$1POSITION-,+Mzl$jUg4BK"[ Z0J` ,8KCHARPOS* a<&+PLINELMCHRCT/'-,+P02 ,P,8,8Q",o7+R.@POSITION NOT DEFINED FOR FILEOXNCONC1*-,,8NCONSG:U`Q $*NCONC$) CHCON1CHARGETCHARNW*U.US * U*+xFORMANDTYPEPLIST  W ,YW -WxCONDFASLOADU*U*USTRINGFASLDSKLIBLSPSTATTYORGETLINPUT-UPPERCASEEXPR@AUTOLOAD[- .]/_0.a/_01c 2 e32a/_031c = e3=]/_03xREAD-PTR gGET4"# g $+-,PUTPROPai B` `A 0 "+dSTRINGLENGTH5 `3n`cA g k-,ai "+d(``Z `NTHCHAR6/,xpU g@(@4 g $+-,(ai B` ` "`5 `Q3n` g k-,ai " `ˀ g-, $-,``]ai `6/,xeNCHARS1`= `5` `FLATC7t,xhPRINCF-, -,*NOPOINT 84D+ `=@04B  ,8MAKE-ATOM`qKPRINC<9+ ,83K<9+ ,@,8,8,8",o7,-,0I:+PRINC NOT SUPPORTED FOR FILESsx READF-,1+ ,READgu+ ,,80jK-",o7+READ OPTION NOT SUPPORTED FOR FILES;  PI#PACK $CONCAT "<*APPLYay`qINTERN`= " =-.EXPLODEN`{QL READLIST>`Q+ [,8*NUMBERP `}4B" `,x8U@aASKUSERLSUBR-0,<k,8 g1n`SNREVERSE@ $`gˀ g2/`+/ g.( Z8-,`_ "3CONSa Np *p Jg+&R.RASKUSER0 "Aiy+GASKUSERPRINC   o xPSZ;ASKUSR 1 RH;Rao  io6PSZ;ASKUSR 2 l *io9-,pOPTIONSLSTANSWER E"QDKEYPROMPTSTRINGEOPTIONSNOECHOFLGFQ@UCONFIRMFLG,<6Bg~+BYesNR@ oGHz~ MP Bg~` g~-, g}a-, g|-,,<j-,}!BA6D+J  J+L 0+LC`ASKUSERTTYSETUPI7Bgz``E Bgz`1JCC`E ao`G4 gy`Y0B-`7Dgy` [gyao1%Zgy Bgy ao`  ? !D@ "Jao`7Dgy`  gyao@@gy!E4`E ao`G7Bgy4+m`Y0B-+h6Dgy+j  gyao@JC+m $B gy, ? ao!@`K gx`}4B3+ gxJ:0 "K*TIMESaFIXL Bgx3`P *`Y0B-`ѳ`-,b `Q`E5B gxSUB1` BgxQDMINUSPM5B!.z.z "h0` ...ao` Bg}+D г` ,8KCURSORPOS<N HbB`=4B `E5B  JI  @`; Bg} 0`/ $+ g}U 1n0`/ {`//.0 A "p`1 Bg}3DESCEND $P 0 gs-,-,~[g~A BgASKUSERSETUPO g~`Y0B-+ 6Dg~`A`+M $p63Bgt+EM3 A`M gt?+'`zqTASKUSERLOOKUPP1{KEYLSTz3)P{ gt gASKUSER1Q )&{,8DKEYSTRINGz-GkeP $5D/*0 ( BD6DF`kz-GkeP $5D4@BC gv( Bgv7BE`s ao $ gv` ( Bgvz3)P  NpH ` gt1BR+E0+EBA`Y1B- "[ Z2Jgt`0 g7B``@`QXB( B``@@`Q B`Zg~ Bg~`7 Bgu@a " $` 5B7Dg~`H 3`6FD` p3` g}210+X0BR` ao `A+( g}0+c1BR+c0+cBA`Y1B- "4Bo[ Z2Jg}` &p g}ASKUSER$SADD1`$0  Npг` `A@4Bo g}11BR+m`  "Tao`'  g}0+X3``  BFC%` ,TERPRIU`A one of:!P bao -. 3 `` gsASKUSEREXPLAINV`Q+ ,U4`ASKUSERINDENT` $C g, p g}0+>1BR#B@1+>`Y1B- $ g}a-5B>#`-@4B[ Dg}+ `= (#4B `E5B  JI@F ;[`= `A Bg}1BR+! &"+&6DF`Kz3)P5B$7g} P$4ao+>0+X`Y1B- "!S4B8[ Z2Jg}`S7BE+5Zz(,34PD!4B54B5[ Z2Jg}+/  E`!"ao $ g( Bg6BF`o AJCao+> g}0+< ?ao41S`G  [confirm] "[ao`-z3)P`-,  Np`'Xb$RETURNa-a- d4BRRETRY "\ $O $M-.0F00@[*EVAL``Q+ Bgw@a " $` 3`[`!+X7DD`*`w` ,W,8,8lH RKo7+h6Bgz` ___ "] `ao`G g|-,@@g @@DbC Np`+`G@@gz@@D g|-, `@@g3 JgyD 0 ,U`,/,x@]ERASE+DH$uFSUBR@0,8[a- B`4BrZH[``a- B`Z[`/,x ^m,8,<hZ,8[`Y0B-`b`0``[`m,8,80h[g~`Y0B-` 3+ 4[ g~`Y0B-+ 6Dg~`+0,<-,8 $p6 $p"61B(++ p[+ @.np` p-,As3+ gk++i&`OCOMPLETEONzP B`4B4B'[  S Z2Jg}`9 ,',8z-GkeP5B"` 3 g}`mP "_@BK<W B`6DF+*4B* ao g@`` `W "/,x 00,8 ZZ%``Y0B-+53`k[ B``Y0B-`s3+:` `00`0` $+6 B`3Bg~`A5BI`Y0B-+I3+IZ`Y @ 0B-+IZ4FI g~Q4BI@0 Jg`@`c g/,xcA  [,8`Y0B-`3`"$#-,@@E $F%$0 BFa- B`4BXZ[`!A`Z`Y0B-`ZDB[Z HE $F% BF  a- B`4BeZ[`@@`[Z [ ( JEZZLJ2Fz'G!P BFzqTP 0 DF+s`=4Bs `E4Bs  JF@@E  "/,x pLPSZ;ASKUSR 4 ioXD -,,85Hz  J-,7B`+)[b""5-,FEOz3)1SP4BEXPLAINSTRING`z P4B`z PF`Q $ g~*APPENDa+ ,,83Tb#6DF+z-GkeP`Q7DE+*`Q`! "KAPPEND<a  $ `V`M g~,SC`z P B`4B ao+#z-Gke!AP5B B`4B#6DF+!0+! Pd0+! ao7BE+# ao 00`K kaM ,U,/0 `Z` B``/.J:+ `(vTTYz<9| gINITIAL-TTY-STATUS BbERRLISTS$4Xz+lPa2INPUT-ACTIVATEc%d4 "INPUT-ECHOh +[b`Q $ a0Zb[`Q $ a`Q,Xa  K#aSSTATUSdXz+lP*DELETEa,x0 c`K 2/`+@8`y ? ",x h<;