Home » Archimedes archive » Acorn User » AU 1995-04.adf » !Internet_StarterPak » !SLIPdial/!Runimage

!SLIPdial/!Runimage

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn User » AU 1995-04.adf » !Internet_StarterPak
Filename: !SLIPdial/!Runimage
Read OK:
File size: CD2D bytes
Load address: 0000
Exec address: 0000
File contents
   20ONERRORREPORT:PRINT" at ";ERL:END
   30END=HIMEM+&2000
   40PROCA_
   50PROCB_
   60PROCC_
   70PROCD_
   80PROCE_
   90ONERRORPROCF_:END
  100PROCG_
  110WHILEFNH_(I_%DIV2*J_%):END=HIMEM+&2000:ENDWHILE
  120PROCK_
  130SYS131080,17,L_$TOA%,,,,S%
  140WHILEFNH_(S%):END=HIMEM+&2000:ENDWHILE
  150PROCM_(L_$)
  160A%=FNN_("")
  170REPEAT
  180O_%=0
  190REPEAT
  200IFFNH_(0)THENPROCP_(FNQ_("MoreMem")):END=HIMEM+&2000
  210IFFNR_THENA$=FNS_ELSEA$=FNT_(O_%):O_%+=1
  220U_%=FNV_(A$)
  230UNTILO_%>=W_%ORX_%=FALSE
  240X_%=FALSE:IFO_%>=W_%THENPROCY_("",FNQ_("Idle"),"")
  250PROCZ_
  260UNTIL0
  270END
  300DEFPROCA_
  310DIMa_% 256,b_ 4096
  320SYS6,129,0,&FFTO,c_%
  330d_%=&1B00
  340e_%=FALSE
  350f_%=1:g_%=0:h_%=FALSE:i_%=FALSE:X_%=FALSE:j_%=0:k_%=-1
  360l_%=FALSE:m_%=0:n_%=FALSE:o_%=0:p_%=0:q_%=0:r_$="":O_%=0
  370s_%=20:DIMt_%(s_%),u_%(s_%)
  380v_%=10:DIMw_$(v_%),x_% v_%,y_$(3),y_%(3)
  390z_%=30:DIM__$(z_%,1),`_$(1),A`$(1)
  400B`%=50:DIMC`%(B`%),C`$(B`%):D`%=0:U_$=""
  410E`%=150:DIMF`$(E`%,1),G`$(3),H`$(3),I`$(10):I`%=0
  420J`%=10:DIMK`$(J`%,1),L`%(J`%),M`$(J`%)
  430N`%=8:DIMO`$(N`%),P`$(N`%),Q`$(N`%,1)
  440DIMR`$(N`%),P`%(N`%)
  450S`%=8:DIMT`$(S`%),U`$(S`%),V`%(S`%)
  460W`%=8:DIMX`$(W`%),Y`$(W`%),Z`$(W`%)
  470DIMa`%(W`%),b`%(W`%),c`$(W`%),d`%(W`%)
  480DIMe`%(W`%),f`%(W`%),g`%(W`%),h`%(W`%)
  490H`%=-1:d`%()=0:f`%()=0:i`%=29:I_%=80:J_%=24
  500j`%=10:DIMk`$(j`%),k`%(j`%),l`%(j`%):k`%()=TRUE
  510m`%=10:DIMn`%(m`%),o`$(m`%),p`%(m`%),q`$(m`%)
  520r`%=25:s`$="":t`$="":u`%=0:s`%=0:v`%=TRUE:w`%=0
  530x`$=FNy`("Slipdial$dir")
  540z`$=FNy`("Slipdial$resources")
  550_`$=z`$+".UK":``$="":Aa%=1:Ba$="none"
  560ENDPROC
  590DEFPROCE_
  600DIMCa% d_%:!Ca%=d_%:Ca%!8=0
  610SYS46,&109,Ca%
  620IFFNDa(z`$+".Sprites")=0THENERROR0,"Couldn't load sprites"
  630DIMEa%4:$Ea%="TASK":Fa$="SLIPdial"
  640DIMGa%4:!Ga%=0
  650SYS262336,310,!Ea%,Fa$,Ga%TOHa%,Ia%
  660IFHa%<310THENERROR1,"Window Manager too old"
  670Ja%=0:Ka%=0
  680p_%=FNLa(z`$+".!windows")
  690IFp_%>0THEN
  700Ja%=VALGET$#p_%:Ka%=VALGET$#p_%
  710ENDIF
  720PROCMa(p_%)
  730DIMq%&400,Na%&200,Oa%&100,Pa%&100
  740SYS262361,,_`$+".Templates"
  750Qa%=FNRa("Info")
  760Sa%=FNRa("Status")
  770Ta%=FNRa("txtwin")
  780Ua%=FNRa("config")
  790Va%=FNRa("message")
  800Wa%=FNRa("input")
  810Xa%=FNRa("yesno")
  820SYS262362
  830PROCYa(Qa%,4,"0.33 (17-Feb-1995)"):PROCZa("$ver","33")
  840aa$="nodev":ba%=FNca(aa$,-1)
  850IFba%=0THENERROR0,"Couldn't create icon"
  860M%=%10000001100000110000:da%=-20
  870SYS66TOea%:fa%=ea%
  880ga%=fa%:ha%=fa%:PROCia:PROCja("")
  890ENDPROC
  910DEFFNRa(A$)
  920LOCALb%,i%,s%,ka%,la%,h%
  930SYS262363,,-1,0,0,-1,A$,0TO,b%,i%
  940s%=FNma(ka%,b%,"TBUF"):DIMla% i%
  950SYS262363,,ka%,la%,la%+i%,-1,A$,0
  960IFA$="message"THENna%=ka%!72
  970IFA$="Status"THENPROCoa(ka%,Ja%,Ka%)
  980ka%!64=Ca%:SYS262337,,ka%TOh%:PROCpa(s%)
  990=h%
 1010DEFPROCoa(q%,x%,y%)
 1020LOCALw%,h%
 1030IFx%>0THEN
 1040w%=q%!8-!q%:h%=q%!12-q%!4
 1050!q%=x%:q%!8=x%+w%
 1060q%!4=y%:q%!12=y%+h%
 1070ENDIF
 1080ENDPROC
 1110DEFFNDa(A$)
 1120LOCALs%,f%,n%,r%:r%=0
 1130SYS131080,17,A$TOA%,,,,S%
 1140SYS131118,&108,Ca%TO,,s%,n%,,f%
 1150IFA%=1ANDS%<=(s%-f%)THEN
 1160SYS131118,&10B+(n%=0),Ca%,A$TO;F%
 1170IF(F%AND1)=0THENr%=s%-f%-S%
 1180ENDIF
 1190=r%
 1210DEFFNqa
 1220LOCALs%,f%:SYS131118,&108,Ca%TO,,s%,,,f%
 1230=s%-f%
 1260DEFFNca(A$,n%)
 1270LOCALZ%,ra%,w%,h%
 1280SYS46,&100+40,Ca%,A$TO,,,w%,h%:IFw%>200ORh%>70THEN=0
 1290IFn%<0THEN
 1300!Oa%=-1:ra%=0
 1320DIMsa%12:$sa%=A$:Oa%!24=sa%
 1330ELSE
 1340ra%=ba%
 1350FORZ%=0TOn%:IFP`%(Z%)>0THENra%=P`%(Z%)
 1360NEXT:!Oa%=-3
 1380DIMOa%!24 12:$(Oa%!24)=A$
 1390ENDIF
 1400Oa%!4=0:Oa%!8=0:Oa%!12=w%*2:Oa%!16=100:Oa%!20=&3102
 1410Oa%!28=Ca%:Oa%!32=11
 1420SYS262338,ra%,Oa%TOca%
 1430=ca%
 1460DEFPROCia
 1470LOCALta$
 1480IFl_%=FALSETHEN
 1490ta$="nodev"
 1500ELSE
 1510IF(FNd(9,ua%,0,0)AND8)=0THEN
 1520ta$="dev"
 1530ELSE
 1540IFaa$="online1"THENta$="online2"ELSEta$="online1"
 1550ENDIF
 1560ENDIF
 1570ha%=fa%
 1580IFsa%>0ANDta$<>aa$THEN
 1590PROCva(aa$,ta$)
 1600aa$=ta$
 1610SYS131118,&118,Ca%,ta$TO,,wa%;F%
 1620IF(F%AND1)=0THEN
 1630$sa%=ta$:!q%=-1:q%!4=ba%:q%!8=0:q%!12=0
 1640SYS262349,,q%
 1650ENDIF
 1660ENDIF
 1670ENDPROC
 1700DEFPROCva(A$,B$)
 1710CASEB$OF
 1720WHEN"nodev":IFA$="online1"ORA$="online2"ORA$="dev"THENPROCxa(TIME$+": offline after "+r_$)
 1730WHEN"online1":IFA$<>"online2"THENPROCxa(TIME$+": online to "+Ba$):ya%=fa%:ELSEPROCza
 1740WHEN"online2":PROCza
 1750ENDCASE
 1760ENDPROC
 1790DEFPROCza
 1800LOCALT%
 1810T%=ABS(fa%-ya%)DIV100
 1820r_$=RIGHT$("0"+STR$(T%DIV3600),2)+":"
 1830r_$+=RIGHT$("0"+STR$((T%DIV60)MOD60),2)+":"
 1840r_$+=RIGHT$("0"+STR$(T%MOD60),2)
 1850PROC_a(Sa%,8,r_$)
 1860ENDPROC
 1890DEFPROCxa(A$)
 1900p_%=FN`a(x`$+".logfile")
 1910IFp_%<>0THENPTR#p_%=EXT#p_%:BPUT#p_%,A$:PROCMa(p_%)
 1920ENDPROC
 1940DEFPROCAb(Bb%)
 1960SYS66TOfa%
 1970IFBb%>=0ORea%-fa%<Bb%THEN
 1980ea%=fa%
 1990REPEAT
 2000SYS262369,M%,q%,fa%+Bb%TOR%
 2010IFl_%THENJ%=FNd(19,ua%,0,0)
 2020CASER%OF
 2030WHEN1:PROCCb(!q%)
 2040WHEN2:PROCDb(!q%,q%!4,q%!8,q%!12,q%!16,q%!20,q%!24,q%!28)
 2050WHEN3:PROCEb(!q%)
 2060WHEN6:PROCFb(!q%,q%!4,q%!8,q%!12,q%!16)
 2070WHEN8:PROCGb(!q%,q%!4,q%!24)
 2080WHEN9:PROCHb:PROCIb(q%)
 2090WHEN17,18:PROCJb(q%)
 2100ENDCASE
 2110UNTILR%=0
 2120IFfa%>ha%+100THENPROCia:PROCKb:PROCLb
 2130IFfa%>ga%+500THENPROCMb:PROCNb
 2140IFs`%>0ANDfa%>w`%+500THENPROCOb("")
 2150ENDIF
 2160ENDPROC
 2180DEFPROCGb(w%,i%,k%)
 2190LOCALl%
 2200IFw%=Ta%ANDi%=Pb%THEN
 2210CASEk%OF
 2220WHEN13:FORl%=10TO1STEP-1:I`$(l%)=I`$(l%-1):NEXT
 2230I`$(0)=FNQb(w%,i%):PROCRb(I`$(0),0):I`%=-1
 2240PROC_a(w%,i%,""):SYS262354,w%,i%,,,-1,0
 2250WHEN&18F:IFI`%<10ANDI`$(I`%+1)>""THEN
 2260I`%+=1:PROC_a(w%,i%,I`$(I`%))
 2270SYS262354,w%,i%,,,-1,LENI`$(I`%)
 2280ENDIF
 2290WHEN&18E:IFI`%>0THEN
 2300I`%-=1:PROC_a(w%,i%,I`$(I`%))
 2310SYS262354,w%,i%,,,-1,LENI`$(I`%)
 2320ELSE
 2330I`%=-1:PROC_a(w%,i%,""):SYS262354,w%,i%,,,-1,0
 2340ENDIF
 2350OTHERWISE:SYS262364,q%!24
 2360ENDCASE
 2370ELSE
 2380IFw%=Wa%ANDi%=1ANDk%=13THEN
 2390Wa$=FNQb(w%,i%):IFWa$=""THENWa$=" "
 2400ELSE
 2410SYS262364,q%!24
 2420ENDIF
 2430ENDIF
 2440ENDPROC
 2460DEFPROCJb(q%)
 2470LOCALZ%,h%,i%,t%,f$,Sb%,a%,A$
 2480CASEq%!16OF
 2490WHEN0:PROCTb:END
 2500WHEN1:q%!16=2:q%!36=-1:$(q%+44)="<Wimp$Scrap>"+CHR$0
 2510q%!12=q%!8:SYS262375,17,q%,q%!4
 2520WHEN3:i%=q%!24:h%=q%!20:t%=q%!40:f$=FNUb(q%+44)
 2530q%!16=4:SYS262375,17,q%,q%!4
 2540CASEh%OF
 2550WHENUa%:IFt%=&FFFTHEN
 2560IFi%=4PROC_a(Ua%,4,f$)
 2570ELSE
 2580PROCM_(f$)
 2590ENDIF
 2600WHENSa%:IFt%=&FFFTHENPROCM_(f$)
 2610WHEN-1,-2:IFt%=&FFFANDi%=ba%THEN
 2620PROCM_(f$)
 2630ELSE
 2640FORZ%=0TON`%
 2650IFi%=P`%(Z%)ANDO`$(Z%)>""THENPROCO`(Z%,f$,t%)
 2660NEXT
 2670ENDIF
 2680ENDCASE
 2690Z%=FNVb("<Wimp$Scrap>")
 2700WHEN11:IFl_%ANDq%!4<>Ia%THENPROCWb
 2710WHEN12:IFq%!4<>Ia%THEN
 2720PROCY_("Device claim failed",FNUb(q%+28),"")
 2730PROCXb(Sa%):l_%=FALSE
 2740ENDIF
 2750WHEN&502:A$=FNYb(q%!32,q%!36)
 2760IFA$>""THEN
 2770q%!16=&503:q%!12=q%!8:$(q%+20)=A$:q%?(20+LENA$)=0:!q%=256
 2780SYS262375,17,q%,q%!4
 2790ENDIF
 2800WHEN&400C2:IFj_%<>0THEN
 2810IFV`%(j_%)=0THEN
 2820V`%(j_%)=q%!4:PROCZb(FNab("TaskStart2",U`$(j_%)))
 2830ENDIF
 2840j_%=0
 2850ENDIF
 2860WHEN&400C3
 2870FORl%=0TOS`%
 2880IFV`%(l%)=q%!4THEN
 2890V`%(l%)=0:IFT`$(l%)>""THENPROCRb(T`$(l%),3)
 2900ENDIF
 2910NEXT
 2920PROCbb
 2930WHEN&808C1
 2940Sb%=0:cb%=q%!20-1
 2950WHILEa`%(Sb%)<>q%!4ANDSb%<W`%:Sb%+=1:ENDWHILE
 2960IFb`%(Sb%)=0THEN
 2970FORZ%=0TOcb%STEP4:a_%!Z%=q%!(24+Z%):NEXT
 2980PROCdb(Sb%,a_%,cb%)
 2990ELSE
 3000FORZ%=0TOcb%:BPUT#b`%(Sb%),q%!(24+Z%):NEXT
 3010ENDIF
 3020WHEN&808C2
 3030IFq%!20>=Ia%ANDq%!20<=(Ia%+W`%)THEN
 3040a`%(q%!20-Ia%)=q%!4:PROCZb("Task started: "+Y`$(q%!20-Ia%))
 3050ENDIF
 3060WHEN&808C3
 3070Sb%=0:WHILEq%!4<>a`%(Sb%)ANDSb%<W`%:Sb%+=1:ENDWHILE
 3080IFq%!4=a`%(Sb%)THEN
 3090PROCZb(FNab("TaskEnd",Y`$(Sb%)))
 3100IFg`%(Sb%)=0THEN
 3110a`%(Sb%)=0:PROCEb(d`%(Sb%))
 3120ELSE
 3130a`%(Sb%)=-1:$h`%(Sb%)=Y`$(Sb%)+FNQ_("TaskFin")
 3140PROCeb(d`%(Sb%))
 3150ENDIF
 3160Y`$(Sb%)="":PROCMa(b`%(Sb%)):b`%(Sb%)=0
 3170IFX`$(Sb%)>""THENPROCRb(X`$(Sb%),4)
 3180ENDIF
 3190ENDCASE
 3200ENDPROC
 3220DEFFNYb(w%,i%)
 3230LOCALA$,l%
 3240A$="Hgeneric":CASEw%OF
 3250WHENTa%:A$="Htext"
 3260WHENSa%:A$="Hstatus":CASEi%OF
 3270WHEN1,2:A$="Haction"
 3280WHEN3:A$="Hip"
 3290WHEN4:A$="Hstop"
 3300WHEN5:A$="Hpause"
 3310WHEN6,7:A$="Hmenus"
 3320WHEN8:A$="Htime"
 3330WHEN10:A$="Hmodem"
 3340ENDCASE
 3350WHENVa%:A$="Hmess":IFh_%THENA$="Hmess2"
 3360WHENWa%:A$="Henter"
 3370WHENXa%:A$="Hyesno"
 3380WHENQa%:A$="Hinfo"
 3390WHENUa%:A$="Hconfig"
 3400OTHERWISE:FORl%=0TOW`%:IFw%=d`%(l%)THENA$="Htask"
 3410NEXT
 3420ENDCASE
 3430=FNQ_(A$)
 3450DEFPROCTb
 3460LOCALl%
 3470IFl_%<>0THEN
 3480J%=FNd(8,ua%,0,0)
 3490J%=FNd(18,ua%,0,0)
 3500ENDIF
 3510PROCfb("")
 3520PROCMa(p_%):PROCMa(q_%)
 3530FORl%=0TOW`%:PROCMa(b`%(l%)):NEXT
 3540FORl%=0TOm`%:PROCMa(n`%(l%)):NEXT
 3550PROCgb
 3560ENDPROC
 3580DEFPROCMa(RETURNC%)
 3590IFC%<>0THENSYS131085,0,C%:C%=0
 3600ENDPROC
 3620DEFPROCHb
 3630SYS262351,,Pa%
 3640hb%=!Pa%:ib%=Pa%!4:b%=Pa%!8:jb%=Pa%!12
 3650la%=Pa%!16:kb%=Pa%!20
 3660ENDPROC
 3680DEFPROCFb(hb%,ib%,b%,w%,i%)
 3690LOCALZ%
 3700CASEb%OF
 3710WHEN2
 3720CASEw%OF
 3730WHEN-2:IFi%=ba%THEN
 3740PROClb(TRUE)
 3750ELSE
 3760FORZ%=0TON`%
 3770IFi%=P`%(Z%)ANDQ`$(Z%,0)>""THENPROCmb(102,FNnb(Q`$(Z%,0),Q`$(Z%,1)),R`$(Z%),TRUE)
 3780NEXT
 3790ENDIF
 3800WHENTa%:SYS6,121,(1EOR&80)TO,Z%
 3810IFZ%=0THEN
 3820PROCmb(101,"Alarm list,Menu list,Var list,Task list,|Script list,Quit","Control",0)
 3830ELSE
 3840PROCmb(101,"DbgLev 0,DbgLev 1,DbgLev 2,DbgLev 3","Debug",0)
 3850ENDIF
 3860WHENSa%
 3870CASEi%OF
 3880WHEN7:IF`_$(0)>""THENPROCmb(102,FNnb(`_$(0),`_$(1)),"User menu",FALSE)
 3890OTHERWISE:PROClb(0)
 3900ENDCASE
 3910OTHERWISE:PROClb(0)
 3920ENDCASE
 3930WHEN1,4
 3940CASEw%OF
 3950WHENSa%
 3960CASEi%OF
 3970WHEN5
 3980IFNOTh_%THEN
 3990PROCY_("",FNQ_("PauseP"),"")
 4000h_%=TRUE:PROCRb("pause",0)
 4010ELSE
 4020PROCob
 4030ENDIF
 4040WHEN4
 4050i_%=TRUE:PROCY_("",FNQ_("StopP"),""):PROCi_
 4060WHEN6:IF`_$(0)>""THENPROCmb(102,FNnb(`_$(0),`_$(1)),"User menu",FALSE)
 4070WHEN11:IFFNQb(Sa%,i%)="Redial"THENe_%=TRUE:PROCY_("",FNQ_("RedialP"),"")
 4080ENDCASE
 4090WHENUa%
 4100IFi%=6THENPROCpb:PROCEb(Ua%)
 4110WHENXa%
 4120IFi%=0THENqb%=2
 4130IFi%=1THENqb%=1
 4140WHENTa%
 4150SYS262354,w%,Pb%,,,-1,LENFNQb(w%,Pb%)
 4160WHEN-2
 4170IFi%=ba%THEN
 4180IFb%=4THENPROCXb(Sa%)ELSEPROCXb(Ta%)
 4190ELSE
 4200FORZ%=0TON`%
 4210IFi%=P`%(Z%)ANDP`$(Z%)>""THENPROCRb(P`$(Z%),6)
 4220NEXT
 4230ENDIF
 4240ENDCASE
 4250ENDCASE
 4260ENDPROC
 4280DEFPROClb(i%)
 4290PROCmb(101,">Info,Choices...,|Control...,Quit","SLIPdial",i%)
 4300ENDPROC
 4320DEFPROCrb(Va$)
 4330sb%=0:u_%()=0:k`$()="":k`%()=TRUE
 4340IFtb$>""THENPROCRb(tb$,0):tb$="":ENDPROC
 4350PROCub(""""+FNvb("Escript",STR$O_%,Va$)+""""):VDU7
 4360PROCY_("",FNQ_("StopE"),"")
 4370O_%=0:X_%=FALSE:PROCZ_
 4380ENDPROC
 4400DEFPROCWa(A$)
 4410LOCALv$,p$:p$="Input:"
 4420REPEATB$=FNwb(A$):Wa$=""
 4430IFLEFT$(B$,1)="/"THEN
 4440C$=FNxb(B$):CASELEFT$(B$,2)OF
 4450WHEN"pr":p$=LEFT$(C$,40)
 4460ENDCASE
 4470ELSE
 4480v$=B$:PROC_a(Wa%,1,""):PROC_a(Wa%,0,p$)
 4490PROCXb(Wa%):SYS262354,Wa%,1,,,-1,0
 4500REPEATPROCAb(50):UNTILWa$>"":p$="Input:"
 4510IFWa$=" "THENWa$=""
 4520PROCZa(v$,Wa$)
 4530ENDIF
 4540UNTILA$=""
 4550PROCEb(Wa%)
 4560ENDPROC
 4580DEFPROCub(A$)
 4590LOCALw%,n%,t$
 4600t$=FNQ_("Message"):v`%=FALSE
 4610w%=0:n%=0
 4620REPEATB$=FNwb(A$)
 4630IFLEFT$(B$,1)="/"THEN
 4640C$=FNxb(B$):CASELEFT$(B$,2)OF
 4650WHEN"cl":PROCEb(Va%)
 4660WHEN"wa":w%=TRUE
 4670WHEN"ti":t$=C$
 4680WHEN"ca":s`$=C$:t`$=""
 4690u`%=r`%:s`%=1:w`%=fa%:IFn%=0THENyb$()=""
 4700WHEN"ce":v`%=TRUE
 4710WHEN"en":t`$=C$
 4720WHEN"ma":u`%=VALC$
 4730WHEN"ad":n%+=1
 4740WHEN"na","id"
 4750ENDCASE
 4760ELSE
 4770IFB$>""ANDn%=0THENyb$()=""
 4780IFB$>""THENPROCOb(B$):n%+=1
 4790ENDIF
 4800UNTILB$=""ORn%>r`%
 4810$na%=t$:PROCeb(Va%)
 4820IFn%>0THEN
 4830PROCOb("")
 4840ENDIF
 4850IFw%THENPROCRb("pause",0)
 4860ENDPROC
 4880DEFPROCOb(A$)
 4890LOCALl%,w%,t$:l%=-1:w%=0
 4900REPEATl%+=1:t$=yb$(l%):IFLENt$>w%THENw%=LENt$
 4910UNTILt$=""ORl%=r`%:w`%=fa%
 4920IFA$>""THEN
 4930IFl%=r`%THENFORl%=1TOr`%:yb$(l%-1)=yb$(l%):NEXT
 4940yb$(l%)=A$
 4950ELSE
 4960IFl%>0THENPROCzb(l%,w%)
 4970ENDIF
 4980ENDPROC
 5000DEFPROCzb(y%,x%)
 5010LOCALo%
 5020!a_%=0:a_%!4=-y%*32-32:a_%!8=x%*16+10:a_%!12=0
 5030SYS262359,Va%,a_%
 5040!q%=Va%:SYS262347,,q%:o%=(q%!32)AND(1<<16)
 5050q%!12=q%!4+x%*16+10:q%!16=q%!8+y%*32+32
 5060q%!20=0:q%!24=0:q%!28=-1:SYS262341,,q%
 5070IFo%=0THENPROC_b(Va%,0,150)ELSEPROCXb(Va%)
 5080!q%=Va%:SYS262347,,q%:`b%=q%!12-q%!4
 5090PROCAc(0,-y%*32-32,`b%,0)
 5100ENDPROC
 5120DEFPROCBc(A$)
 5130IFs`%=1ANDINSTR(A$,s`$)>0THENs`%=2
 5140IFs`%=2THEN
 5150u`%-=1:PROCOb(A$)
 5160IFu`%<1OR(t`$>""ANDINSTR(A$,t`$)>0)THENs`%=0:PROCOb("")
 5170ENDIF
 5180ENDPROC
 5200DEFPROCZ_
 5210h_%=TRUE:PROC_a(Sa%,5,FNQ_("Resume"))
 5220PROCY_("",FNQ_("Paused"),"")
 5230REPEATPROCAb(30):UNTILh_%=FALSE
 5240ENDPROC
 5260DEFPROCob
 5270h_%=FALSE:i_%=FALSE:X_%=TRUE:PROC_a(Sa%,5,FNQ_("Pause"))
 5280PROCY_(""," ","")
 5290ENDPROC
 5310DEFPROCi_
 5320sb%=0:u_%()=0:k`$()="":k`%()=TRUE:s`%=0
 5330IFO_%>0ANDi_$<>""THENPROCRb(i_$,0):i_$="":ELSEPROCRb("pause",0):O_%=0:PROCCc
 5340ENDPROC
 5360DEFPROCmb(jb%,Dc$,Ec$,I%)
 5370LOCALi%,Fc$,Gc%,Hc%
 5380IFDc$=""THENENDPROC
 5390Gc%=0
 5400Ic%=jb%
 5410Hc%=Na%
 5420i%=0
 5430Hc%!20=44
 5440$Hc%=Ec$
 5450Hc%?12=7:Hc%?13=2:Hc%?14=&7:Hc%?15=0
 5460Hc%!16=230-24:Hc%!24=0
 5470Hc%+=28
 5480REPEAT
 5490Fc$=FNJc(Dc$,",",i%):PROCKc(Fc$):Gc%+=1
 5500UNTILFc$=""
 5510Hc%!-24=(Hc%!-24)OR&80
 5520IFI%<>0THENY%=120+(Gc%-1)*44ELSEY%=ib%
 5530SYS262356,,Na%,hb%-64,Y%
 5540ENDPROC
 5560DEFPROCKc(Lc$)
 5570LOCALMc$
 5580IFLc$>""THEN
 5590!Hc%=0
 5600IFLEFT$(Lc$,1)="|"THENLc$=MID$(Lc$,2):!Hc%=2
 5610Mc$=LEFT$(Lc$,1):Hc%!4=-1
 5620IFMc$=">"THENHc%!4=Qa%
 5630Hc%!8=&07000021
 5640IFMc$=">"ORMc$="<"THEN$(Hc%+12)=MID$(Lc$,2)ELSE$(Hc%+12)=Lc$
 5650Hc%+=24
 5660ENDIF
 5670ENDPROC
 5690DEFFNJc(Dc$,Nc$,RETURNi%)
 5700LOCALOc%
 5710Oc%=i%+1:i%=INSTR(Dc$+Nc$,Nc$,Oc%)
 5720=MID$(Dc$,Oc%,i%-Oc%)
 5740DEFPROCIb(Qc%)
 5750LOCALA$
 5760LOCALl%:SYS262357,,Na%,Qc%,STRING$(20," ")TO,,,A$
 5770CASEA$OF
 5780WHEN"Choices...":PROCXb(Ua%)
 5790WHEN"Control...":PROCXb(Ta%)
 5800WHEN"Quit":PROCTb:END
 5810WHEN"Alarm list":PROCRc
 5820WHEN"Menu list":PROCSc
 5830WHEN"Task list":PROCTc
 5840WHEN"Var list":PROCUc
 5850WHEN"Script list":PROCVc("")
 5860WHEN"DbgLev 0":n_%=0
 5870WHEN"DbgLev 1":n_%=1
 5880WHEN"DbgLev 2":n_%=2
 5890WHEN"DbgLev 3":n_%=3
 5900OTHERWISE:IF__%>0THEN
 5910FORl%=1TO__%
 5920IFA$=__$(l%,0)THEN
 5930PROC_a(Sa%,7,__$(l%,0))
 5940PROCRb(__$(l%,1),8)
 5950ENDIF
 5960NEXT
 5970ENDIF
 5980ENDCASE
 5990ENDPROC
 6010DEFPROCF_
 6020!Pa%=ERR:$(Pa%+4)=REPORT$+" (internal code "+STR$ERL+")."+CHR$0
 6030SYS262367,Pa%,1,Fa$:PROCTb
 6040ENDPROC
 6060DEFPROCXb(h%)
 6070!q%=h%:SYS262347,,q%
 6080q%!28=-1:SYS262341,,q%
 6090IFh%=Ta%THENSYS262354,h%,Pb%,,,-1,LENFNQb(h%,Pb%)
 6100ENDPROC
 6120DEFPROC_b(h%,Wc%,Xc%)
 6130LOCALx%,y%,Yc%,Zc%,ac%,bc%
 6140IFAa%=0ANDh%=Sa%THEN
 6150PROCXb(h%)
 6160ELSE
 6170SYS53,-1,4TO,,ac%:SYS53,-1,11TO,,x%
 6180SYS53,-1,5TO,,bc%:SYS53,-1,12TO,,y%
 6190!q%=h%:SYS262347,,q%
 6200x%=x%<<ac%:y%=y%<<bc%:Yc%=q%!12-q%!4:Zc%=q%!16-q%!8
 6210q%!4=(x%-Yc%)DIV2-Wc%:q%!12=q%!4+Yc%:q%!8=(y%-Zc%)DIV2-Xc%:q%!16=q%!8+Zc%
 6220q%!20=0:q%!24=0:q%!28=-1:SYS262341,,q%
 6230ENDIF
 6240ENDPROC
 6260DEFPROCeb(h%)
 6270!q%=h%:SYS262368,,q%
 6280SYS262353,-1,q%!4,q%!16-44,q%!12,q%!16
 6290ENDPROC
 6310DEFFNQb(H%,I%)
 6320!q%=H%:q%!4=I%:SYS262350,,q%
 6330=FNUb(q%!28)
 6350DEFPROCYa(H%,I%,A$)
 6360!q%=H%:q%!4=I%:SYS393422,,q%TO;F%
 6370IFFNcc(F%)ANDq%!28>&8800THEN$(q%!28)=A$+CHR$0
 6380ENDPROC
 6400DEFPROC_a(H%,I%,A$)
 6410PROCYa(H%,I%,A$):!q%=H%:q%!4=I%:q%!8=0:q%!12=0
 6420SYS262349,,q%
 6430ENDPROC
 6450DEFPROCdc(H%,I%,S%)
 6460S%=ABS(S%=0):!q%=H%:q%!4=I%:q%!8=((1)<<21)*S%:q%!12=(1<<21)
 6470SYS262349,,q%
 6480ENDPROC
 6500DEFFNec(H%,I%)
 6510!q%=H%:q%!4=I%:SYS262350,,q%
 6520=NOT(((q%!24)AND(1<<21))DIV2097152<>0)
 6540DEFPROCfc(H%,I%,S%)
 6550!q%=H%:q%!4=I%:q%!8=((1)<<22)*ABSS%:q%!12=(1<<22)
 6560SYS262349,,q%
 6570ENDPROC
 6590DEFPROCY_(a$,b$,c$)
 6600IFa$>""THENPROC_a(Sa%,1,RIGHT$(a$,34)):IFLENa$>1THENPROCZb("Action: "+a$)
 6610IFb$>""THENPROC_a(Sa%,2,RIGHT$(b$,34)):IFLENb$>1THENPROCZb("Status: "+b$)
 6620IFc$>""THENPROC_a(Sa%,3,RIGHT$(c$,34)):IFLENc$>1THENPROCZb("IP add: "+c$)
 6630ENDPROC
 6650DEFPROCDb(jb%,gc%,hc%,ic%,jc%,kc%,lc%,mc%)
 6660IFjb%>-1THEN
 6670q%!0=jb%:q%!28=mc%
 6680q%!4=gc%:q%!8=hc%:q%!12=ic%:q%!16=jc%
 6690q%!20=kc%:q%!24=lc%
 6700SYS262341,,q%
 6710ENDIF
 6720ENDPROC
 6740DEFPROCEb(h%)
 6750LOCALL%
 6760CASEh%OF
 6770WHENVa%:IFh_%THENPROCob
 6780WHENWa%:Wa$=" "
 6790OTHERWISE
 6800FORL%=0TOW`%
 6810IFh%=d`%(L%)ANDa`%(L%)>0THEN
 6820VDU7:IFFNXa(FNQ_("TaskKill"),3)=2THEN
 6830PROCnc(Y`$(L%),&808C4)
 6840ELSE
 6850h%=0
 6860ENDIF
 6870L%=W`%
 6880ENDIF
 6890NEXT
 6900ENDCASE
 6910IFh%>0THEN!q%=h%:SYS262342,,q%
 6920ENDPROC
 6940DEFFNoc(A$)
 6950LOCALd%,r%,qc%:d%=60:r%=0:qc%=1
 6960REPEATB$=FNwb(A$)
 6970IFLEFT$(B$,1)="/"THEN
 6980C$=FNxb(B$):CASELEFT$(B$,3)OF
 6990WHEN"del":d%=VALC$:IFd%<5THENd%=5
 7000WHEN"def":C$=FNrc(C$):IFLEFT$(C$,1)="y"THENqc%=2
 7010ENDCASE
 7020ELSE
 7030r%=FNXa(B$,d%)
 7040ENDIF
 7050UNTILA$=""
 7060IFr%=0THENr%=qc%
 7070=-(r%=2)
 7110DEFFNXa(A$,sc%)
 7130LOCALtc%:tc%=fa%:sc%=sc%*100:PROC_a(Xa%,2,LEFT$(A$,57))
 7140PROC_b(Xa%,0,0):IFsc%=0THENsc%=60000
 7150qb%=0:REPEAT:PROCAb(50):UNTILqb%>0ORfa%-tc%>sc%
 7160PROCEb(Xa%)
 7170=qb%
 7190DEFFNy`(A$)
 7200LOCALL%,F%
 7210SYS131107,A$,a_%,256,0,3TO,,L%;F%
 7220IF(F%AND1)ORL%>256THEN:=""
 7230a_%?L%=13:=$a_%
 7250DEFPROCQa(q%)
 7260gc%=!q%:hc%=q%!4:ic%=q%!8:jc%=q%!12:kc%=q%!16:lc%=q%!20
 7270uc%=gc%-kc%:vc%=jc%-lc%:wc%=q%!28:xc%=q%!36
 7280ENDPROC
 7300DEFPROCCb(h%)
 7310LOCALSb%:!q%=h%:CASEh%OF
 7320WHENTa%
 7330SYS262344,,q%TOyc%
 7340PROCzc(yc%)
 7350WHENVa%
 7360SYS262344,,q%TOyc%
 7370PROC_c(yc%)
 7380OTHERWISE
 7390FORSb%=0TOW`%:IFh%=d`%(Sb%)THEN
 7400SYS262344,,q%TOyc%
 7410PROC`c(Sb%,yc%)
 7420ENDIF
 7430NEXT
 7440ENDCASE
 7450ENDPROC
 7470DEFPROCK_
 7480Ad%=0
 7490Bd%=1:DIMCd$(J_%),Dd% J_%,yb$(r`%):`b%=0
 7500Cd$()=STRING$(I_%DIV2," "):Ed%=40
 7510!a_%=0:a_%!4=-J_%*32-Ed%-8:a_%!8=I_%*16:a_%!12=0
 7520SYS262359,Ta%,a_%
 7530FORi%=0TO1:!a_%=Ta%:a_%!4=i%:SYS262350,,a_%
 7540a_%!12=a_%!12-J_%*32:a_%!20=a_%!20-J_%*32:a_%!4=Ta%
 7550!q%=Ta%:q%!4=i%:SYS262340,,q%
 7560SYS262338,,a_%+4TOPb%:NEXT
 7570Fd%=0:Gd%=0:Hd$="":c`$=""
 7580PROCY_("Starting SLIPdial","Idle"," ")
 7590IFId%=0ANDFNec(Ua%,2)=0THENPROCXb(Ta%)
 7600ENDPROC
 7620DEFPROCJd(Sb%,Kd%,T$)
 7630LOCALLd%:Ld%=(Sb%MOD4)*40
 7640IFd`%(Sb%)=0THEN
 7650SYS262361,,_`$+".Templates"
 7660SYS262363,,q%,Md%,Nd%+Od%,-1,"task",0TO,,Md%
 7670h`%(Sb%)=q%!72:q%!44=-i`%*32
 7680!q%=!q%+Ld%:q%!8=q%!8+Ld%:q%!4=q%!4-Ld%:q%!12=q%!12-Ld%
 7690SYS262337,,q%TOd`%(Sb%)
 7700SYS262362
 7710CASESb%OF
 7720WHEN0:DIMPd$(i`%)
 7730WHEN1:DIMQd$(i`%)
 7740WHEN2:DIMRd$(i`%)
 7750WHEN3:DIMSd$(i`%)
 7760WHEN4:DIMTd$(i`%)
 7770WHEN5:DIMUd$(i`%)
 7780WHEN6:DIMVd$(i`%)
 7790OTHERWISE:PROCrb(FNQ_("Etask1")):ENDPROC
 7800ENDCASE
 7810ELSE
 7820CASESb%OF
 7830WHEN0:Pd$()=""
 7840WHEN1:Qd$()=""
 7850WHEN2:Rd$()=""
 7860WHEN3:Sd$()=""
 7870WHEN4:Td$()=""
 7880WHEN5:Ud$()=""
 7890WHEN6:Vd$()=""
 7900ENDCASE
 7910ENDIF
 7920$h`%(Sb%)=FNab("TaskRun",T$):c`$(Sb%)="":e`%(Sb%)=0:f`%(Sb%)=0
 7930IFKd%THENPROCXb(d`%(Sb%))
 7940ENDPROC
 7960DEFPROCWd(Xd%,Yd%,Zd%,ad%)
 7970!q%=Ta%:q%!4=Xd%:q%!8=Yd%:q%!12=Zd%:q%!16=ad%
 7980SYS262345,,q%TOyc%
 7990PROCzc(yc%)
 8000ENDPROC
 8020DEFPROCAc(Xd%,Yd%,Zd%,ad%)
 8030!q%=Va%:q%!4=Xd%:q%!8=Yd%:q%!12=Zd%:q%!16=ad%
 8040SYS262345,,q%TOyc%
 8050PROC_c(yc%)
 8060ENDPROC
 8080DEFPROCbd(Sb%,Xd%,Yd%,Zd%,ad%)
 8090!q%=d`%(Sb%):q%!4=Xd%:q%!8=Yd%:q%!12=Zd%:q%!16=ad%
 8100SYS262345,,q%TOyc%
 8110PROC`c(Sb%,yc%)
 8120ENDPROC
 8140DEFPROC_c(yc%)
 8150WHILEyc%
 8160PROCQa(q%+4):CLG
 8170cd%=ABS(xc%-vc%+16)DIV32:dd%=ABS(wc%-vc%+16)DIV32
 8180IFdd%>r`%THENdd%=r`%:IFcd%>dd%THENcd%=dd%
 8190SYS262374,7:FORL%=cd%TOdd%
 8200MOVEuc%+4-v`%*(`b%DIV2-LENyb$(L%)*8),vc%-L%*32-16
 8210PRINTyb$(L%):NEXT
 8220SYS262346,,q%TOyc%
 8230ENDWHILE
 8240ENDPROC
 8260DEFPROC`c(Sb%,yc%)
 8270LOCALL%,y%,cd%,dd%:WHILEyc%
 8280PROCQa(q%+4):CLG
 8290cd%=ABS(xc%-vc%)DIV32:dd%=ABS(wc%-vc%)DIV32
 8300IFdd%>i`%THENdd%=i`%:IFcd%>dd%THENcd%=dd%
 8310SYS262374,7:FORL%=cd%TOdd%
 8320y%=(L%+f`%(Sb%))MODi`%
 8330MOVEuc%+4,vc%-L%*32-4
 8340CASESb%OF
 8350WHEN0:PRINTPd$(y%)
 8360WHEN1:PRINTQd$(y%)
 8370WHEN2:PRINTRd$(y%)
 8380WHEN3:PRINTSd$(y%)
 8390WHEN4:PRINTTd$(y%)
 8400WHEN5:PRINTUd$(y%)
 8410WHEN6:PRINTVd$(y%)
 8420ENDCASE
 8430NEXT
 8440SYS262346,,q%TOyc%
 8450ENDWHILE
 8460ENDPROC
 8480DEFPROCzc(yc%)
 8490LOCALL%,y%,cd%,dd%:WHILEyc%
 8500PROCQa(q%+4):CLG
 8510cd%=ABS(xc%-vc%)DIV32:dd%=ABS(wc%-vc%)DIV32
 8520IFdd%>J_%THENdd%=J_%:IFcd%>dd%THENcd%=dd%
 8530FORL%=cd%TOdd%:y%=(L%+Ad%)MODJ_%
 8540MOVEuc%,vc%-L%*32:SYS262374,Dd%?y%:PRINTCd$(y%):NEXT
 8550SYS262346,,q%TOyc%
 8560ENDWHILE
 8570ENDPROC
 8590DEFPROCed(A$)
 8600IFHd$>""THENPROCfd
 8610PROCgd(A$,7)
 8620ENDPROC
 8640DEFPROCP_(A$)
 8650PROCgd(A$,11)
 8660ENDPROC
 8680DEFPROCfd
 8690IFHd$>""THEN
 8700IF(n_%AND2)<>0ANDo_%<>0THENBPUT#o_%,Hd$
 8710IFs`%>0THENPROCBc(Hd$)
 8720PROCgd(Hd$,5):Hd$=""
 8730ENDIF
 8740ENDPROC
 8760DEFFNhd:IFl_%=0THEN=-1
 8770Z%=FNd(1,ua%,0,0)
 8780IFZ%>0AND(n_%AND2)>0ORs`%>0THEN
 8790IFZ%>31ANDZ%<128THENHd$+=CHR$Z%
 8800IFZ%=13ORZ%=10ORLENHd$>=I_%THENPROCfd
 8810ENDIF
 8820=Z%
 8840DEFPROCdb(Sb%,id%,jd%)
 8850LOCALl%
 8860FORl%=0TOjd%:C%=id%?l%
 8870IFC%>31ANDC%<128THENc`$(Sb%)+=CHR$C%
 8880IFC%=13ORC%=10ORLENc`$(Sb%)>78THEN
 8890PROCkd(Sb%,c`$(Sb%))
 8900IFH`%=Sb%ANDH`$(0)>""THENPROCH`(c`$(Sb%))
 8910c`$(Sb%)=""
 8920ENDIF
 8930NEXT
 8940IFH`%=Sb%ANDH`$(0)>""THENPROCH`(c`$(Sb%))
 8950ENDPROC
 8970DEFPROCkd(Sb%,A$)
 8980LOCALt%,B$
 8990IF(n_%AND4)<>0ANDo_%<>0THENBPUT#o_%,"TW"+STR$Sb%+">"+A$
 9000WHILEA$>""
 9010t%=(e`%(Sb%)+f`%(Sb%))MODi`%
 9020B$=LEFT$(A$,79):A$=MID$(A$,79)
 9030CASESb%OF
 9040WHEN0:Pd$(t%)=B$
 9050WHEN1:Qd$(t%)=B$
 9060WHEN2:Rd$(t%)=B$
 9070WHEN3:Sd$(t%)=B$
 9080WHEN4:Td$(t%)=B$
 9090WHEN5:Ud$(t%)=B$
 9100WHEN6:Vd$(t%)=B$
 9110ENDCASE
 9120IFe`%(Sb%)<i`%THEN
 9130!q%=d`%(Sb%):SYS262347,,q%:f%=(q%!32)AND(1<<16)
 9140IFe`%(Sb%)>=ABS(q%!8-q%!16)DIV32THENq%!24=-(e`%(Sb%)*32-ABS(q%!8-q%!16))-32:SYS262341,,q%
 9150PROCbd(Sb%,0,-e`%(Sb%)*32-32,1280,-e`%(Sb%)*32+4)
 9160e`%(Sb%)+=1
 9170ELSE
 9180f`%(Sb%)=(f`%(Sb%)+1)MODi`%
 9190SYS262379,d`%(Sb%),0,-32*i`%,1280,0,0,-32*(i`%-1)
 9200PROCbd(Sb%,0,-32*i`%,1280,-32*(i`%-1)+4)
 9210ENDIF
 9220ENDWHILE
 9230ENDPROC
 9250DEFPROCgd(A$,ld%)
 9260LOCALt%:PROCAb(da%)
 9270WHILEA$>""
 9280t%=(Bd%+Ad%)MODJ_%
 9290Cd$(t%)=LEFT$(A$,I_%):A$=MID$(A$,I_%)
 9300Dd%?t%=ld%:IFBd%<J_%THEN
 9310!q%=Ta%:SYS262347,,q%:f%=(q%!32)AND(1<<16)
 9320IFf%<>0ANDBd%>=ABS(q%!8-q%!16)DIV32THENq%!24=-(Bd%*32-ABS(q%!8-q%!16))-32:SYS262341,,q%
 9330PROCWd(0,-Bd%*32-32,1280,-Bd%*32+4)
 9340Bd%+=1
 9350ELSE
 9360Ad%=(Ad%+1)MODJ_%
 9370SYS262379,Ta%,0,-32*J_%,1280,0,0,-32*(J_%-1)
 9380PROCWd(0,-32*J_%,1280,-32*(J_%-1)+4)
 9390ENDIF
 9400ENDWHILE
 9410ENDPROC
 9430DEFPROCmd
 9440Cd$()="":Bd%=0:Ad%=0:Hd$=""
 9450PROCWd(0,-J_%*32-Ed%-8,16*I_%,0)
 9460ENDPROC
 9480DEFPROCZb(m$)
 9490IF(n_%AND1)THEN
 9500PROCed(m$)
 9510IFo_%<>0THENBPUT#o_%,m$
 9520ENDIF
 9530ENDPROC
 9550DEFPROCfb(A$)
 9560B$=FNwb(A$)
 9570IFB$=""THEN
 9580PROCfd:PROCMa(o_%)
 9590ELSE
 9600B$=FNnd(B$)
 9610SYS131085,&CF,B$TOo_%;F%
 9620IF(F%AND1)THENSYS131085,&8F,B$TOo_%;F%
 9630IF(F%AND1)THENo_%=0:PROCrb(FNQ_("Etrace")):ENDPROC
 9640SYS131080,18,B$,&FFF
 9650IFo_%<>0THENPTR#o_%=EXT#o_%
 9660ENDIF
 9670ENDPROC
 9690DEFPROCod
 9700IFpd%>-1THEN
 9710!q%=256:q%!12=0:q%!16=11:q%!20=2:q%!24=pd%+ua%
 9720$(q%+28)="SLIPdial"+CHR$0
 9730SYS262375,18,q%,0
 9740l_%=TRUE:FORL%=1TO5:PROCAb(0):NEXT
 9750ENDIF
 9760ENDPROC
 9780DEFPROCWb
 9790IFpd%>-1THEN
 9800IFq%!20=2ANDq%!24=pd%+ua%THEN
 9810!q%=256:q%!12=q%!8:q%!16=12
 9820$(q%+28)=FNQ_("DevMine")+CHR$0
 9830SYS262375,17,q%,q%!4
 9840ENDIF
 9850ENDIF
 9860ENDPROC
 9880DEFFNqd(A$)
 9890A%=INSTR(A$," "):IFA%>=0THEN
 9900b_$=LEFT$(A$,A%-1)
 9910ua%=VAL(MID$(A$,A%+1))
 9920ELSE
 9930b_$="internal"
 9940ua%=0
 9950ENDIF
 9970PROCZa("port",b_$+" "+STR$ua%)
 9980PROCY_(FNab("DevLoad",b_$)," ","")
 9990SYS131080,16,"SerialDev:modules."+b_$+".driver",b_,0TO;F%
10000IF(F%AND1)THENPROCrb(FNab("Edev",b_$)):=0
10010PROCY_("",FNQ_("DevOK"),"")
10020pd%=b_!&C8
10030=ua%
10050DEFPROCrd(B$)
10060sd%=VALB$:IFsd%=0THENsd%=19200
10070PROCZa("speed",STR$sd%)
10080ENDPROC
10100DEFPROCRb(A$,t%)
10140PROCZb(FNab("Qadd",A$))
10150L%=0:WHILEk`$(L%)>""ANDL%<j`%
10160L%+=1:ENDWHILE
10170k`$(L%)=A$:l`%(L%)=t%:ENDPROC
10190DEFFNS_
10200LOCALt%,l%,A$,n%:l%=0:A$="":n%=0
10210REPEATIFk`$(l%)>""ANDk`%(l`%(l%))=TRUETHENA$=k`$(l%):n%=l%
10220l%+=1:UNTILA$>""ORk`$(l%)=""ORl%=j`%
10230IFA$>""THEN
10240FORl%=n%TOj`%-1:k`$(l%)=k`$(l%+1):l`%(l%)=l`%(l%+1):NEXT
10250k`$(j`%)=""
10260ENDIF
10270=A$
10290DEFFNR_
10300LOCALt%,l%,r%:l%=0:r%=0
10310REPEATIFk`$(l%)>""ANDk`%(l`%(l%))=TRUETHENr%=TRUE
10320l%+=1:UNTILr%<>0ORk`$(l%)=""ORl%=j`%
10330=r%
10350DEFFNV_(td$)
10360WHILEtd$>""ANDi_%=0:A$=FNud(td$)
10370PROCAb(da%)
10380PROCZb(STR$O_%+": "+A$)
10390B$=FNwb(A$):B$=FNrc(B$):vd$=B$
10400IFLEFT$(B$,1)<>":"THEN
10410CASEB$OF
10420WHEN"if":U_%=FNwd(A$,td$)
10430WHEN"ask":U_%=FNoc(A$)
10440WHEN"case":U_%=FNw_(A$)
10450WHEN"when":U_%=FNxd(A$,td$)
10460WHEN"otherwise":PROCyd(td$)
10470WHEN"endcase":U_%=FNzd
10480WHEN"claim":U_%=FN_d(A$)
10490WHEN"debug":n_%=FNn_(A$)
10500WHEN"driver":U_%=FNN_(A$)
10510WHEN"source":U_%=FN`d(A$)
10520WHEN"library":U_%=FNAe(A$)
10530WHEN"chain":PROCBe(A$)
10540WHEN"port":ua%=FNqd(A$)
10550WHEN"speed":PROCrd(A$)
10560WHEN"release":PROCCc
10570WHEN"init":U_%=FNCe(A$)
10580WHEN"reinit":PROCDe
10590WHEN"dial":U_%=FNEe(A$)
10600WHEN"wait":U_%=FNsc(A$)
10610WHEN"trace":PROCfb(A$)
10620WHEN"send":PROCFe(A$)
10630WHEN"ipget":U_%=FNGe(A$)
10640WHEN"make":PROCHe(A$)
10650WHEN"task":U_%=FNIa(A$)
10660WHEN"taskwindow":U_%=FNIe(A$)
10670WHEN"sleep","pause":PROCh_(VAL(A$))
10680WHEN"alarm":PROCK`(A$)
10690WHEN"set":PROCJe(A$)
10700WHEN"unset":PROCKe(A$)
10710WHEN"?eq","?ne","?lt","?le","?gt","?ge":U_%=FNLe(B$,A$)
10720WHEN"string":U_%=FNMe(A$)
10730WHEN"eval":U_%=FNNe(A$)
10740WHEN"label"
10750WHEN"goto":PROCOe(A$,O_%)
10760WHEN"call":PROCPe(A$,O_%)
10770WHEN"return":U_%=FNU_(A$,O_%)
10780WHEN"echo":PROCQe(A$)
10790WHEN"?file":U_%=FNL_(A$)
10800WHEN"?line":U_%=FNRe(A$)
10810WHEN"?free":U_%=FNSe(A$)
10820WHEN"retry":PROCTe(A$)
10830WHEN"open":U_%=FNUe(A$)
10840WHEN"close":U_%=FNVe(A$)
10850WHEN"read":U_%=FNWe(A$)
10860WHEN"write":U_%=FNXe(A$)
10870WHEN"ptr":U_%=FNFd(A$)
10880WHEN"move":U_%=FNYe(A$)
10890WHEN"copy":U_%=FNZe(A$)
10900WHEN"append":U_%=FNae(A$)
10910WHEN"delete":U_%=FNbe(A$)
10920WHEN"newsrate":U_%=FNce(A$)
10930WHEN"?task":U_%=FNde(A$)
10940WHEN"dopen","dataopen":U_%=FNee(A$)
10950WHEN"stamp":PROCZb("("+STR$(TIMEDIV100)+") "+A$)
10960WHEN"error":PROCrb(A$)
10970WHEN"message":PROCub(A$)
10980WHEN"menu":PROCfe(A$)
10990WHEN"list":PROCge(A$)
11000WHEN"icon":U_%=FNhe(A$)
11010WHEN"analyse","analyze":PROCie(A$)
11020WHEN"help":PROCje(A$)
11030WHEN"event":PROCke(A$)
11040WHEN"stop":PROCi_
11050WHEN"quit":PROCle(FNQ_("Quit"))
11060WHEN"exit":PROCme
11070WHEN"input":PROCWa(A$)
11080WHEN"oscli":U_%=FNne(A$)
11090OTHERWISE:PROCZb(FNQ_("BadCom"))
11100ENDCASE
11110ENDIF
11120IFU_%<0THENPROCZa("$status",U_$)ELSEPROCZa("$status",STR$U_%)
11130ENDWHILE
11140=U_%
11160DEFPROCQe(A$)
11170LOCALB$,s%:s%=0
11180REPEAT
11190B$=FNwb(A$)
11200IFLEFT$(B$,1)="/"THEN
11210CASELEFT$(B$,3)OF
11220WHEN"/st":s%=TRUE
11230WHEN"/lo":s%=0
11240WHEN"/da":A$=""""+TIME$+""" "+A$
11250ENDCASE
11260ELSE
11270IFs%THEN
11280PROCY_("",B$,"")
11290ELSE
11300PROCed(B$)
11310IF(n_%AND3)<>0ANDo_%<>0THENBPUT#o_%,B$
11320ENDIF
11330ENDIF
11340UNTILA$=""
11350ENDPROC
11370DEFFN_d(A$)
11380LOCALJ%,t%,d%,oe%
11390PROCY_(FNQ_("DevClaim")," ","")
11400t%=VALFNwb(A$):IFt%<0THENt%=pe%
11410d%=VALFNwb(A$):IFd%<2THENd%=qe%
11420oe%=1
11430REPEAT
11440PROCod
11450IFl_%<>0THEN
11460J%=FNd(17,ua%,0,0)
11470J%=FNd(13,ua%,sd%,0):IFJ%<>sd%THENsd%=J%
11480J%=FNd(14,ua%,sd%,0):IFJ%<>sd%THENsd%=J%
11490J%=FNd(15,ua%,0,0)
11500J%=FNd(16,ua%,1,0)
11510J%=FNd(6,ua%,0,0)
11520J%=FNd(7,ua%,0,0)
11530ELSE
11540PROCh_(d%):IFt%>0THENoe%+=1
11550ENDIF
11560UNTILl_%<>0ORoe%>t%ORi_%<>0
11570=l_%
11590DEFPROCCc
11600LOCALJ%
11610IFl_%THEN
11620PROCY_(FNQ_("DevRel"),FNQ_("DevDrop"),"")
11630J%=FNd(8,ua%,0,0)
11640J%=FNd(18,ua%,0,0)
11650l_%=FALSE
11660ENDIF
11670ENDPROC
11690DEFFNCe(A$)
11700LOCALB$,h%:h%=0
11710IFFNre<>0THEN
11720PROCY_(FNQ_("DevInit"),"","")
11730IFA$=""THENA$=FNse("$init")
11740REPEAT
11750B$=FNwb(A$)
11760PROCY_("",FNab("Sending",B$),"")
11770PROCFe(B$):h%=FNte("OK","","","",5)
11780UNTILA$=""ORh%=0
11790ENDIF
11800=h%
11820DEFPROCDe
11830LOCALJ%
11840J%=FNd(13,ua%,sd%,0):IFJ%<>sd%THENsd%=J%
11850J%=FNd(14,ua%,sd%,0):IFJ%<>sd%THENsd%=J%
11860J%=FNd(15,ua%,0,0)
11870J%=FNd(16,ua%,1,0)
11880J%=FNd(8,ua%,3,0)
11890ENDPROC
11910DEFPROCTe(A$)
11920LOCALB$
11930B$=FNwb(A$)
11940IFVALB$>0THENpe%=VALB$
11950IFVALA$>2THENqe%=VALA$
11960ENDPROC
11980DEFPROCja(A$)
11990PROC_a(Sa%,11,A$)
12000PROCfc(Sa%,11,(A$=""))
12010ENDPROC
12030DEFFNEe(ue$)
12040LOCALve%,r%,d%,we%,xe%,ye%,ze$,B$,C$
12050ve%=0:ze$="ATDT"
12060r%=pe%:d%=qe%:we%=d%:xe%=d%:ye%=d%
12070PROCja(FNQ_("Redial"))
12080REPEAT
12090B$=FNwb(ue$)
12100IFLEFT$(B$,1)="/"THEN
12110C$=FNxb(B$):CASELEFT$(B$,3)OF
12120WHEN"ret":r%=VALC$:IFr%<1THENr%=1
12130WHEN"del":d%=VALC$:IFd%<2THENd%=2
12140we%=d%:xe%=d%:ye%=d%
12150WHEN"noc":xe%=VALC$
12160WHEN"nod":we%=VALC$
12170WHEN"not","pul":ze$="ATDP"
12180WHEN"ton","nop":ze$="ATDT"
12190WHEN"bus":ye%=VALC$
12200ENDCASE
12210ELSE
12220_e%=1:ve%=0:Ba$=B$
12230REPEAT
12240PROCY_(FNab("Dialling",Ba$),FNvb("Dattempt",STR$_e%,STR$r%),"")
12250PROCFe(ze$+Ba$):_e%+=1
12260U_%=FNte(FNse("$conn"),FNse("$busy"),FNse("$nocarr"),FNse("$nodial"),120)
12270IFi_%=0THEN
12280IFe_%=TRUETHEN
12290A%=FNre:WHILEFNd(5,ua%,0,0)>0:J%=FNhd:ENDWHILE:e_%=FALSE
12300ELSE
12310CASEU_%OF
12320WHEN1:PROCY_("",FNQ_("Dconnect"),""):ve%=1
12330WHEN2:PROCY_("",FNQ_("Dbusy"),""):PROCh_(ye%)
12340WHEN3:PROCY_("",FNQ_("Dnc"),""):PROCh_(xe%)
12350WHEN4:PROCY_("",FNQ_("Dnd"),""):PROCh_(we%)
12360WHEN2,3,4:WHILEFNd(5,ua%,0,0)>0:J%=FNhd:ENDWHILE
12370OTHERWISEPROCY_("",FNQ_("Dnr"),""):PROCh_(d%)
12380ENDCASE
12390ENDIF
12400ELSE
12410A%=FNre
12420ENDIF
12430UNTIL_e%>r%ORi_%<>0ORve%>0ORl_%=0
12440IFve%=0ANDue$>""THENPROCY_(FNQ_("Dnext"),"",""):PROCh_(1)
12450ENDIF
12460UNTILue$=""ORi_%<>0ORve%>0ORl_%=0
12470PROCja("")
12480=ve%
12500DEFFNsc(A$)
12510LOCALl%,m%,d%,s%,U_%,B$,C$,`e%
12520d%=600:H`%=-1:U_%=0
12530REPEATB$=FNwb(A$):`e%=FALSE
12540IFLEFT$(B$,1)="/"THEN
12550C$=FNxb(B$):`e%=TRUE
12560CASELEFT$(B$,2)OF
12570WHEN"ev":U_%=FNAf
12580WHEN"de","del":d%=VALC$
12590WHEN"na","id":FORl%=0TOW`%:IFC$=Y`$(l%)THENH`%=l%:l%=W`%
12600NEXT:IFH`%<0THENPROCrb(FNQ_("Ebadtask")):=0
12610OTHERWISE:PROCrb(FNQ_("Ebadwait")):=0
12620ENDCASE
12630ENDIF
12640UNTIL`e%=FALSE
12650IFU_%=0THEN
12660IFd%=0THENPROCrb(FNab("Ebaddel",A$)):=0
12670G`$()="":l%=0:C$="":REPEAT
12680G`$(l%)=B$:C$+=B$+"/":l%+=1:B$=FNwb(A$)
12690UNTILB$=""ORl%=4:C$=LEFT$(C$,LENC$-1)
12700PROCY_(FNab("Wait",C$),FNab("Timeout",STR$d%),"")
12710IFH`%<0THEN
12720U_%=FNte(G`$(0),G`$(1),G`$(2),G`$(3),d%)
12730ELSE
12740U_%=FNBf(G`$(0),G`$(1),G`$(2),G`$(3),d%)
12750ENDIF
12760IFU_%>0THENPROCY_("",FNab("Received",G`$(U_%-1)),"")ELSEPROCY_("",FNQ_("TimedOut"),"")
12770ENDIF
12780=U_%
12800DEFFNAf
12810PROC_a(Sa%,7,FNQ_("Select"))
12820PROCY_(FNQ_("Waiting")," ","")
12830REPEATPROCAb(50):UNTILFNR_
12840=1
12860DEFPROCke(A$)
12870LOCALa%,B$:a%=TRUE
12880REPEATB$=FNwb(A$)
12890CASELEFT$(B$,2)OF
12900WHEN"/e":a%=TRUE
12910WHEN"/d":a%=FALSE
12920WHEN"ti":k`%(1)=a%
12930WHEN"li":k`%(2)=a%
12940WHEN"ta":k`%(3)=a%
12950WHEN"tw":k`%(4)=a%
12960WHEN"in":k`%(5)=a%
12970WHEN"ic":k`%(6)=a%
12980WHEN"fi":k`%(7)=a%
12990WHEN"me":k`%(8)=a%
13000WHEN"eo":k`%(9)=a%
13010WHEN"al":k`%()=a%
13020ENDCASE
13030UNTILA$="":k`%(0)=TRUE
13040ENDPROC
13060DEFFNBf(H`$(0),H`$(1),H`$(2),H`$(3),sc%)
13070LOCALtc%,r%
13080r%=0:Cf%=0:sc%=sc%*100:tc%=fa%
13090PROCH`(c`$(H`%))
13100REPEATPROCAb(50):UNTILCf%>0ORABS(fa%-tc%)>sc%ORi_%<>0
13110IFCf%>0THENr%=Cf%
13120=r%
13140DEFPROCH`(A$)
13150LOCALL%
13160FORL%=0TO3
13170IFH`$(L%)>""ANDINSTR(A$,H`$(L%))>0THENCf%=L%+1:L%=3
13180NEXT
13190H`%=-1
13200ENDPROC
13220DEFFNte(Df$,Ef$,Ff$,G`$,sc%)
13230LOCALve%,tc%,J%
13240sc%=sc%*100:tc%=fa%
13250Gf%=ASCDf$:Hf%=ASCEf$:If%=ASCFf$:Jf%=ASCG`$
13260Kf%=1:Lf%=1:Mf%=1:Nf%=1:ve%=0
13270REPEAT
13280J%=FNhd
13290IFJ%>-1THEN
13300IFJ%=Gf%THENKf%+=1:Gf%=ASC(MID$(Df$,Kf%))ELSEGf%=ASCDf$:Kf%=1
13310IFJ%=Hf%THENLf%+=1:Hf%=ASC(MID$(Ef$,Lf%))ELSEHf%=ASCEf$:Lf%=1
13320IFJ%=If%THENMf%+=1:If%=ASC(MID$(Ff$,Mf%))ELSEIf%=ASCFf$:Mf%=1
13330IFJ%=Jf%THENNf%+=1:Jf%=ASC(MID$(G`$,Nf%))ELSEJf%=ASCG`$:Nf%=1
13340ELSE
13350PROCAb(10)
13360ENDIF
13370IFKf%>LENDf$ANDDf$>"":ve%=1
13380IFLf%>LENEf$ANDEf$>"":ve%=2
13390IFMf%>LENFf$ANDFf$>"":ve%=3
13400IFNf%>LENG`$ANDG`$>"":ve%=4
13410UNTILve%>0ORABS(fa%-tc%)>sc%ORi_%<>0ORe_%<>0
13420IFve%>0THEN:=ve%
13430=0
13450DEFPROCFe(A$)
13460LOCALA%,J%,R%,t$,Sb%,B$,C$:t$="":R%=0
13470REPEATB$=FNwb(A$)
13480IFLEFT$(B$,1)="/"THEN
13490C$=FNxb(B$):CASELEFT$(B$,2)OF
13500WHEN"ra":R%=TRUE
13510WHEN"no":R%=FALSE
13520WHEN"na","id":t$=C$
13530ENDCASE
13540ELSE
13550IFt$=""THEN
13560IFl_%=0THENPROCrb(FNQ_("Enodev")):ENDPROC
13570FORA%=1TOLENB$:J%=FNd(0,ua%,ASCMID$(B$,A%,1),0):NEXT
13580IFR%=0THENJ%=FNd(0,ua%,13,0)
13590ELSE
13600Sb%=0:WHILEY`$(Sb%)<>t$ANDSb%<W`%:Sb%+=1:ENDWHILE
13610IFSb%<W`%ANDa`%(Sb%)<>0THEN
13620!q%=256:q%!12=0:q%!16=&808C0:q%!20=LENB$-(R%=0):$(q%+24)=B$
13630SYS262375,17,q%,a`%(Sb%)
13640PROCZb(FNvb("TaskSend",LEFT$(B$,100),Y`$(Sb%)))
13650ENDIF
13660ENDIF
13670ENDIF
13680UNTILA$=""
13690ENDPROC
13710DEFFNGe(A$)
13720LOCALr%,Of$,d%,a%,Pf%,Qf%,B$,C$,J%
13730r%=0:d%=60:a%=0
13740REPEATB$=FNwb(A$)
13750IFLEFT$(B$,1)="/"THEN
13760C$=FNxb(B$):CASELEFT$(B$,2)OF
13770WHEN"de":d%=VALC$:IFd%<10THENd%=10
13780WHEN"au":a%=TRUE
13790ENDCASE
13800ELSE
13810Of$=B$
13820ENDIF
13830UNTILA$=""
13840IFa%=0THEN
13850r%=FNte(Of$,"","","",d%)
13860ELSE
13870Of$="":Pf%=0:r%=0:Qf%=fa%+d%*100
13880REPEAT
13890J%=FNhd
13900IFJ%>0THEN
13910CASEPf%OF
13920WHEN0,1,2:IFJ%>47ANDJ%<57THENOf$+=CHR$J%:Pf%+=1:ELSEOf$="":Pf%=0
13930WHEN3:IFJ%=46THENOf$+=".":Pf%+=1:ELSEOf$="":Pf%=0
13940ENDCASE
13950ELSE
13960PROCAb(da%)
13970ENDIF
13980UNTILPf%=4ORfa%>Qf%:IFPf%=4THENr%=1
13990ENDIF
14000IFr%=1THEN
14010Rf$=Of$
14020J%=FNhd
14040WHILE(J%>32ORJ%=0)ANDLENRf$<20
14050IFJ%>31THENRf$=Rf$+CHR$J%:PROCAb(da%):ELSEPROCAb(10)
14060J%=FNhd
14070ENDWHILE
14080C%=ASC(RIGHT$(Rf$,1))
14090WHILE(C%<48ORC%>57)ANDLENRf$>5
14100Rf$=LEFT$(Rf$,LEN(Rf$)-1)
14110C%=ASC(RIGHT$(Rf$,1))
14120ENDWHILE
14130PROCZa("ipaddress",Rf$)
14140PROCZa("route",FNSf("%ip1.%ip2.%ip3.254"))
14150U_$=Rf$:r%=-1:A$=""
14160ENDIF
14170=r%
14190DEFPROCTf(A$)
14200LOCALl%,m%
14210l%=INSTR(A$,"."):PROCZa("ip1",LEFT$(A$,l%-1))
14220m%=INSTR(A$,".",l%+1):PROCZa("ip2",MID$(A$,l%+1,m%-l%-1))
14230l%=INSTR(A$,".",m%+1):PROCZa("ip3",MID$(A$,m%+1,l%-m%-1))
14240PROCZa("ip4",MID$(A$,l%+1))
14250PROCY_("","",A$)
14260ENDPROC
14280DEFPROCHe(ta$)
14290A%=INSTR(ta$," ")
14300IFA%<=1THENPROCle(FNab("Ebadmake",ta$))
14310`d$=LEFT$(ta$,A%-1):Uf$=MID$(ta$,A%+1)
14320PROCY_(FNab("Make",Uf$),"","")
14330IF`d$="-"THEN`d$="null:"
14340p_%=FNLa(`d$)
14350IFp_%=0THENPROCrb(FNab("Enotfound",`d$)):ENDPROC
14360q_%=FNVf(Uf$)
14370IFq_%=0THENPROCrb(FNab("Ebadfile",Uf$)):ENDPROC
14380WHILE(EOF#p_%=FALSEORLEFT$(FNT_(O_%+1),1)="+")
14390IFEOF#p_%THEN
14400O_%+=1:A$=MID$(FNT_(O_%),2)
14410ELSE
14420A$=GET$#p_%
14430ENDIF
14440A$=FNSf(A$)
14450IFLEFT$(A$,1)<>"#"THENBPUT#q_%,A$
14460PROCAb(da%)
14470ENDWHILE
14480PROCMa(p_%):PROCMa(q_%)
14490ENDPROC
14510DEFFNLa(f$)
14520=FNWf(f$,&4F)
14540DEFFNVf(f$)
14550=FNWf(f$,&8F):PROCXf(f$,&FFF)
14570DEFFN`a(f$)
14580LOCALh%
14590h%=FNWf(f$,&CF)
14600IFh%=0THENh%=FNWf(f$,&8F):PROCXf(f$,&FFF)
14610=h%
14630DEFFNWf(f$,r%)
14640LOCALh%,F%
14650SYS131085,r%,f$TOh%;F%
14660IF(F%AND1)THENh%=0
14670=h%
14690DEFFNVb(f$)
14700LOCALF%:SYS131080,6,f$TO;F%
14710=(F%AND1)
14730DEFPROCXf(f$,t%)
14740SYS131080,18,f$,t%
14750ENDPROC
14770DEFPROCh_(sc%)
14780LOCALYf%
14790IFsc%=0THEN
14800PROCZ_
14810ELSE
14820PROCZb(FNab("Wait",STR$sc%+"s"))
14830PROCAb(0):tc%=fa%:sc%=sc%*100
14840REPEAT
14850PROCAb(50)
14860UNTILABS(tc%-fa%)>sc%
14870ENDIF
14880ENDPROC
14900DEFPROCLb
14910LOCALl%,m%
14920?q%=3:SYS7,14,q%
14930SYS193,q%,a_%,256,"%24%MI%SE"TOl%,m%:Zf$=FNUb(l%)
14940PROCZa("$time",Zf$):PROCZa("$mtime",STR$(fa%DIV100))
14950ENDPROC
14970DEFPROCNb
14980LOCALl%,m%
14990?q%=3:SYS7,14,q%
15000SYS193,q%,a_%,256,"%YR%MN%DY"TOl%,m%:Zf$=FNUb(l%)
15010PROCZa("$date",Zf$)
15020ENDPROC
15040DEFPROCK`(A$)
15050LOCALaf%,a$,bf%,cf%,df%,B$,C$
15060bf%=-1:af%=-1:df%=-1:a$=A$
15070REPEATB$=FNwb(A$)
15080IFLEFT$(B$,1)="/"THEN
15090C$=FNxb(B$)
15100CASELEFT$(B$,2)OF
15110WHEN"st":i_$=C$
15120WHEN"er":tb$=C$
15130WHEN"dt","cts":y_%(0)=FNcc(VALC$):af%=0
15140WHEN"ds":y_%(1)=FNcc(VALC$):af%=1
15150WHEN"rn":y_%(2)=FNcc(VALC$):af%=2
15160WHEN"dc":y_%(3)=FNcc(VALC$):af%=3
15170WHEN"ti":cf%=FNef(C$)
15180WHEN"ic":df%=FNff(C$)
15190WHEN"na","id":bf%=FNgf(C$):M`$(bf%)=C$
15200WHEN"ca","de":PROChf(C$)
15210ENDCASE
15220ENDIF
15230UNTILA$=""
15240IFcf%>0THEN
15250IFbf%<0THENbf%=FNgf("~")
15260K`$(bf%,0)=B$:K`$(bf%,1)=a$:L`%(bf%)=cf%
15270ELSE
15280IFaf%>=0THENy_$(af%)=B$
15290IFdf%>=0THENO`$(df%)=B$
15300ENDIF
15310ENDPROC
15330DEFFNgf(A$)
15340LOCALa%:a%=0
15350REPEATa%+=1:UNTILK`$(a%,0)=""ORM`$(a%)=A$ORa%=J`%
15360IFa%=J`%THENPROCrb(FNQ_("Ealarm")):=0
15370=a%
15390DEFFNcc(A%):=-(A%<>0)
15410DEFPROChf(C$)
15420LOCALa%:a%=0
15430REPEATa%+=1:UNTILM`$(a%)=C$ORa%=J`%
15440IFM`$(a%)=C$THENK`$(a%,0)="":PROCZb(FNab("Acancel",C$))
15450ENDPROC
15470DEFFNef(C$)
15480LOCALl%,m%,if%,jf%,kf%,lf%,r%,Zf%,mf%,nf%,of%,sc%,pf%
15490IFLEFT$(C$,1)="+"THENlf%=TRUE:C$=MID$(C$,2)ELSElf%=FALSE
15500l%=INSTR(C$,":"):IFl%>0THEN
15510m%=INSTR(C$,":",l%+1):IFm%>0THEN
15520if%=VALLEFT$(C$,l%-1)
15530jf%=VALMID$(C$,l%+1,m%-1)
15540kf%=VALMID$(C$,m%+1,m%+3)
15550ELSE
15560IFlf%THEN
15570if%=0:jf%=VALLEFT$(C$,l%-1):kf%=VALMID$(C$,l%+1,l%+3)
15580ELSE
15590kf%=0:if%=VALLEFT$(C$,l%-1):jf%=VALMID$(C$,l%+1,l%+3)
15600ENDIF
15610ENDIF
15620ELSE
15630IFlf%THENif%=0:jf%=0:kf%=VALLEFT$(C$,2)ELSEkf%=0:jf%=0:if%=VALLEFT$(C$,2)
15640ENDIF
15650SYS66TOZf%
15660IFlf%THEN
15670r%=Zf%+100*kf%+6000*jf%+360000*if%
15680ELSE
15690?q%=3:SYS7,14,q%
15700SYS193,q%,a_%,256,"%24%MI%SE"TOl%,m%:Zf$=FNUb(l%)
15710mf%=VALLEFT$(Zf$,2):nf%=VALMID$(Zf$,3,2):of%=VALRIGHT$(Zf$,2)
15720pf%=of%+nf%*60+mf%*3600
15730sc%=(kf%+jf%*60+if%*3600)-pf%:WHILEsc%<0:sc%+=24*3600:ENDWHILE
15740r%=Zf%+sc%*100
15750ENDIF
15760=r%
15780DEFPROCMb
15790LOCALc%:c%=0
15800REPEATc%+=1
15810IFK`$(c%,0)>""ANDfa%>L`%(c%)THEN
15820td$=K`$(c%,0):K`$(c%,0)=""
15830IFINSTR(K`$(c%,1),"/repeat")>0THENPROCK`(K`$(c%,1))
15840PROCRb(td$,1)
15850ENDIF
15860UNTILc%=J`%
15870ga%=fa%
15880ENDPROC
15900DEFPROCKb
15910LOCALqf%,J%
15920IFl_%THEN
15930J%=FNd(9,ua%,0,0)
15940IFJ%<>m_%THEN
15950m_%=J%:IF(J%AND1)THENt$="�"ELSEt$=" "
15960IF(J%AND2)THENt$+="�"ELSEt$+=" "
15970IF(J%AND8)THENt$+="�"ELSEt$+=" "
15980PROC_a(Sa%,10,t$)
15990ENDIF
16000FORqf%=0TO3
16010IFy_$(qf%)>""AND(J%AND(1<<qf%))=y_%(qf%)THENPROCRb(y_$(qf%),2):y_$(qf%)=""
16020NEXTqf%
16030ELSE
16040IFm_%>0THENm_%=0:PROC_a(Sa%,15,"")
16050ENDIF
16060ENDPROC
16080DEFPROCge(A$)
16090LOCALB$,C$
16100B$=FNwb(A$):C$=FNxb(B$)
16110CASELEFT$(B$,2)OF
16120WHEN"al":PROCRc
16130WHEN"me":PROCSc
16140WHEN"ta":PROCTc
16150WHEN"va":PROCUc
16160WHEN"sc":PROCVc(A$)
16170WHEN"fi":PROCrf
16180WHEN"ju":PROCsf
16190ENDCASE
16200ENDPROC
16220DEFPROCRc
16230LOCALc%,A%,A$
16240PROCP_(FNQ_("Condition")+"    "+FNQ_("Action"))
16250FORc%=0TOJ`%
16260IFK`$(c%,0)>""THEN
16270A%=(L`%(c%)-fa%)DIV100
16280A$="t+"+RIGHT$("00"+STR$(A%DIV3600),2)+":"
16290A$+=RIGHT$("00"+STR$((A%MOD3600)DIV60),2)+":"
16300A$+=RIGHT$("00"+STR$(A%MOD60),2)
16310PROCtf(A$,K`$(c%,1)+" ("+M`$(c%)+")")
16320ENDIF
16330NEXT
16340FORc%=0TON`%
16350IFP`$(c%)>""THENPROCtf(FNQ_("Iclick"),P`$(c%)+" ("+R`$(c%)+")")
16360IFO`$(c%)>""THENPROCtf(FNQ_("Ifile"),O`$(c%)+" ("+R`$(c%)+")")
16370NEXT
16380PROCtf("stop",i_$)
16390IFy_$(0)>""THENPROCtf("DTR"+" ("+STR$y_%(0)+")",y_$(0))
16400IFy_$(1)>""THENPROCtf("DSR"+" ("+STR$y_%(1)+")",y_$(1))
16410IFy_$(2)>""THENPROCtf("RNG"+" ("+STR$y_%(2)+")",y_$(2))
16420IFy_$(3)>""THENPROCtf("DCD"+" ("+STR$y_%(3)+")",y_$(3))
16430ENDPROC
16450DEFPROCtf(A$,B$)
16460IFB$>""THENPROCP_(" "+A$+STRING$(13-LENA$," ")+B$)
16470ENDPROC
16490DEFFNhe(A$)
16500LOCALr%,uf$,vf$,s$,B$,C$
16510uf$="":vf$="":s$=""
16520REPEAT
16530B$=FNwb(A$)
16540IFLEFT$(B$,1)="/"THEN
16550C$=FNxb(B$)
16560CASELEFT$(B$,2)OF
16570WHEN"fi":r%=FNDa(C$)
16580WHEN"id","name":uf$=C$
16590WHEN"ac":vf$=C$
16600WHEN"ca","de":r%=FNwf(C$)
16610WHEN"fr":r%=FNqa
16620ENDCASE
16630ELSE
16640s$=B$
16650ENDIF
16660UNTILA$=""
16670IFuf$>""ANDs$>""THENr%=FNxf(s$,uf$,vf$)
16680=r%
16700DEFFNff(A$)
16710LOCALa%:a%=0
16720REPEATa%+=1:UNTILR`$(a%)=A$ORa%=N`%
16730IFa%=N`%ORA$=""THENPROCZb(FNQ_("Eicon1")):=-1
16740=a%
16760DEFFNyf(A$)
16770LOCALa%:a%=0
16780REPEATa%+=1:UNTILR`$(a%)=A$ORP`%(a%)=0ORa%=N`%
16790IFa%=N`%ORA$=""THENPROCZb(FNQ_("Eicon1")):=-1
16800=a%
16820DEFFNxf(A$,uf$,vf$)
16830LOCALa%,Z%
16840a%=FNyf(uf$)
16850IFa%<0THEN=0
16860IFA$>""THEN
16870IFR`$(a%)=uf$THENZ%=FNwf(uf$)
16880PROCZb("Adding icon "+A$)
16890P`%(a%)=FNca(A$,a%):R`$(a%)=uf$
16900ENDIF
16910P`$(a%)=vf$
16920=FNcc(P`%(a%))
16940DEFFNwf(A$)
16950LOCALa%
16960a%=FNff(A$)
16970IFa%<0THENPROCZb(FNQ_("Eicon1")):=0
16980IFP`%(a%)<1THENPROCZb(FNQ_("Eicon2")):=0
16990!Oa%=-2:Oa%!4=P`%(a%):SYS393412,,Oa%TO;F%
17000P`%(a%)=0:R`$(a%)=""
17010=FNcc(F%)
17030DEFPROCO`(Z%,f$,zf%)
17040PROCZa("$type",STR$~zf%):PROCZa("$file",+f$)
17050PROCRb(O`$(Z%),7)
17060ENDPROC
17080DEFPROCJe(A$)
17090LOCALl%,m%,B$,C$
17100B$=FNwb(A$):C$=FNwb(A$)
17110PROCZa(B$,C$)
17120ENDPROC
17140DEFPROCZa(B$,C$)
17150LOCALl%,p%:p%=-1:FORl%=0TOE`%
17160IFF`$(l%,0)=B$ORF`$(l%,0)=""THENF`$(l%,0)=B$:F`$(l%,1)=C$:p%=l%:l%=E`%+1
17170NEXT
17180IFB$="ipaddress"THENPROCTf(C$)
17190IFp%=-1THENPROCrb(FNQ_("Evar"))
17200ENDPROC
17220DEFPROCKe(A$)
17230LOCALl%,B$
17240B$=FNwb(A$)
17250FORl%=0TOE`%
17260IFF`$(l%,0)=B$THENF`$(l%,0)="":F`$(l%,1)=""
17270NEXT
17280IFB$="ipaddress"THENPROCY_("",""," ")
17290ENDPROC
17310DEFFNse(A$)
17320LOCALl%,t$,B$:t$=""
17330B$=FNwb(A$)
17340FORl%=0TOE`%
17350IFF`$(l%,0)=B$THENt$=F`$(l%,1):l%=E`%
17360NEXT
17370=t$
17390DEFPROCUc
17400LOCALc%
17410PROCP_(FNQ_("Variable")+"      "+FNQ_("Value"))
17420FORc%=0TOE`%
17430IFF`$(c%,0)>""THENPROCtf(F`$(c%,0),F`$(c%,1))
17440NEXT
17450ENDPROC
17470DEFFNre
17480LOCALJ%
17490IFl_%=0THEN=0
17500PROCY_("",FNQ_("DevDrop"),"")
17510J%=FNd(8,ua%,0,0)
17520PROCAb(100)
17530J%=FNd(8,ua%,3,0)
17540=1
17560DEFPROCOe(A$,RETURNO_%)
17570LOCALl%,ve%,Uf$
17580l%=0:ve%=-1:Uf$=FNwb(A$)
17590REPEAT
17600IFC`$(l%)=Uf$THENve%=C`%(l%):l%=D`%
17610l%+=1:UNTILl%>=D`%
17620IFve%<0THENPROCrb(FNab("Elabel",Uf$)):ENDPROC
17630O_%=ve%
17640ENDPROC
17660DEFPROCPe(A$,RETURNO_%)
17670LOCALB$,p%,_f%,`f%
17680IFsb%=s_%THENPROCrb(FNQ_("Elevel")):ENDPROC
17690Uf$=FNwb(A$)
17700`f%=FALSE:IFUf$="/lock"THEN`f%=TRUE:Uf$=FNwb(A$)
17710p%=0:IFA$>""THEN
17720REPEATp%+=1:B$=FNwb(A$):PROCZa("p"+STR$p%,B$):UNTILA$=""
17730ENDIF
17740_f%=O_%:PROCOe(Uf$,O_%)
17750IF`f%THEN
17760FORp%=0TOsb%:IFu_%(p%)=O_%THENO_%=_f%:PROCP_(FNab("Elock",Uf$))
17770NEXT
17780ENDIF
17790IFO_%<>_f%THEN
17800sb%+=1:t_%(sb%)=_f%
17810IF`f%THENu_%(sb%)=O_%
17820ENDIF
17830ENDPROC
17850DEFFNU_(A$,RETURNO_%)
17860IFsb%=0THENPROCrb(FNQ_("Ereturn")):=0
17870O_%=t_%(sb%):sb%-=1
17880U_$=A$
17890=-1
17910DEFFNAg(A$)
17920LOCALr%
17930SYS131080,17,A$TOr%
17940=r%
17960DEFFNL_(A$)
17970LOCALr%,n%,l%,B$,C$
17980r%=0:B$=FNwb(A$):C$=FNwb(A$)
17990CASELEFT$(B$,3)OF
18000WHEN"/si":SYS131080,23,C$TOn%,,,,r%
18010WHEN"/at":SYS131080,23,C$TOn%,,,,,r%
18020WHEN"/ty":SYS131080,23,C$TOn%,,,,,,r%:U_$=STR$~r%:r%=-1
18030WHEN"/ex":U_$=FNnd(C$):IFU_$>""THENr%=-1:n%=1
18040WHEN"/le":U_$=FNnd(C$):n%=LENU_$
18050WHILEn%>0ANDMID$(U_$,n%,1)<>".":n%-=1:ENDWHILE
18060IFn%>1THENU_$=MID$(U_$,n%+1):r%=-1
18070WHEN"/pa":U_$=FNnd(C$):n%=LENU_$
18080WHILEn%>0ANDMID$(U_$,n%,1)<>".":n%-=1:ENDWHILE
18090IFn%>1THENU_$=LEFT$(U_$,n%-1):r%=-1
18100OTHERWISE:SYS131080,23,B$TOr%:n%=r%
18110ENDCASE
18120IFn%=0THENr%=0
18130=r%
18150DEFFNnd(A$)
18160LOCALr$:r$=""
18170SYS131113,37,A$,a_%,,,256TO,,,,,r%;F%
18180IFr%>0AND(F%AND1)=0THENr$=FNUb(a_%)
18190=r$
18210DEFFNRe(A$)
18220LOCALU_%,J%,B$:U_%=0
18230J%=FNd(9,ua%,0,0)
18240REPEATB$=FNwb(A$)
18250CASEB$OF
18260WHEN"/cts","/dtr":U_%+=(J%AND1)
18270WHEN"/dsr":U_%+=(J%AND2)
18280WHEN"/rng":U_%+=(J%AND4)
18290WHEN"/dcd":U_%+=(J%AND8)
18300OTHERWISE:PROCrb(FNQ_("Eparam")):=0
18310ENDCASE
18320UNTILA$=""
18330=U_%
18350DEFFNSe(A$)
18360LOCALn%,f%,r%,B$,C$
18370SYS262380,-1,-1TO,n%,f%
18380REPEATB$=FNwb(A$)
18390IFLEFT$(B$,1)="/"THEN
18400C$=FNxb(B$)
18410CASELEFT$(B$,2)OF
18420WHEN"me":r%=n%+f%
18430WHEN"ne":r%=n%
18440WHEN"fr":r%=f%
18450WHEN"in":r%=HIMEM-END
18460WHEN"de":SYS131113,49,C$TOr%;F%:IFFNcc(F%)=0THENr%=0
18470ENDCASE
18480ELSE
18490IFB$>""THENPROCZa(B$,STR$r%)
18500ENDIF
18510UNTILA$=""
18520=r%
18540DEFFNwd(A$,Bg$)
18550LOCALCg$,wd$,Dg%,U_%,l%,m%,n%
18560l%=INSTR(A$,"("):m%=INSTR(A$,")",l%):n%=INSTR(A$," ",m%)
18570IFl%*m%*n%=0THENPROCZb(FNQ_("Eif")):=0
18580Dg%=FALSE:Cg$=MID$(A$,l%+1,m%-l%-1):wd$=MID$(A$,n%+1)
18590IFLEFT$(Cg$,1)="!"THENDg%=TRUE:Cg$=MID$(Cg$,2)
18600U_%=FNV_(Cg$):IFDg%THENU_%=-(U_%=0)
18610IFU_%<>0ANDi_%=0THENU_%=FNV_(wd$)ELSEtd$=""
18620=U_%
18640DEFFNw_(A$)
18650Eg%+=1:IFEg%>v_%THENPROCrb(FNQ_("Ecase")):=0
18660w_$(Eg%)=FNwb(A$):x_%?Eg%=0:=1
18680DEFFNxd(A$,Bg$)
18690LOCALm%,B$:m%=FALSE
18700IFEg%=0THENPROCrb(FNQ_("Ewhen")):=0
18710REPEATB$=FNwb(A$)
18720IFB$=w_$(Eg%)THENm%=TRUE:x_%?Eg%=1
18730UNTILA$=""
18740IFm%=FALSETHENtd$=""
18750=0
18770DEFPROCyd(Bg$)
18780IFEg%=0THENPROCrb(FNQ_("Ewhen")):ENDPROC
18790IFx_%?Eg%=1THENtd$=""
18800ENDPROC
18820DEFFNzd
18830IFEg%=0THENPROCrb(FNQ_("Ewhen")):=0
18840Eg%-=1:=1
18860DEFFNLe(c$,A$)
18870LOCALr%,n%,l%,c%,b$,B$,C$:r%=0
18880B$=FNwb(A$):C$=FNwb(A$)
18890b$=B$+C$:n%=TRUE:FORl%=1TOLENb$:c%=ASCMID$(b$,l%,1)
18900IFc%<46ORc%>57ORc%=47THENn%=FALSE:l%=LENb$
18910NEXT
18920LOCALERROR
18930ONERRORLOCAL:PROCZb(FNab("Ecomp",c$)):ENDPROC
18940CASEc$OF
18950WHEN"?eq":IFn%THENr%=(VALB$=VALC$)ELSEr%=(B$=C$)
18960WHEN"?ne":IFn%THENr%=(VALB$<>VALC$)ELSEr%=(B$<>C$)
18970WHEN"?lt":IFn%THENr%=(VALB$<VALC$)ELSEr%=(B$<C$)
18980WHEN"?gt":IFn%THENr%=(VALB$>VALC$)ELSEr%=(B$>C$)
18990WHEN"?le":IFn%THENr%=(VALB$<=VALC$)ELSEr%=(B$<=C$)
19000WHEN"?ge":IFn%THENr%=(VALB$>=VALC$)ELSEr%=(B$>=C$)
19010ENDCASE
19020=-(r%<>0)
19040DEFFNNe(A$)
19050LOCALB$
19060U_$=""
19070B$=FNwb(A$)
19080LOCALERROR
19090ONERRORLOCAL:PROCZb(FNab("Eeval",B$)):=0
19100U_$=STR$(EVALB$)
19110=-1
19130DEFFNMe(A$)
19140LOCALa%,s%,l%,s$,b$,B$,C$:a%=0:s%=0:l%=0
19150REPEATB$=FNwb(A$)
19160IFLEFT$(B$,1)="/"THEN
19170C$=FNxb(B$):CASELEFT$(B$,3)OF
19180WHEN"siz":a%=1
19190WHEN"low":a%=2
19200WHEN"lef":a%=3:s%=VALC$
19210WHEN"rig":a%=4:s%=VALC$
19220WHEN"sta":a%=5:s%=VALC$
19230WHEN"len":l%=VALC$
19240WHEN"ins":a%=6:b$=C$
19250WHEN"upp":a%=7
19260ENDCASE
19270ELSE
19280s$=B$
19290ENDIF
19300UNTILA$=""
19310CASEa%OF
19320WHEN1:U_$=STR$LENs$
19330WHEN2:U_$=FNrc(s$)
19340WHEN3:U_$=LEFT$(s$,s%)
19350WHEN4:U_$=RIGHT$(s$,s%)
19360WHEN5:IFl%<1THENU_$=MID$(s$,s%)ELSEU_$=MID$(s$,s%,l%)
19370WHEN6:U_$=STR$(INSTR(s$,b$))
19380WHEN7:U_$=FNFg(s$)
19390OTHERWISE:U_$=s$
19400ENDCASE
19410=-1
19430DEFFNYe(A$)
19440LOCALl%,B$
19450PROCY_(FNQ_("Fmove1")," ","")
19460B$=FNwb(A$)
19470IFA$=""THENPROCY_("",FNQ_("Fbad"),""):=0
19480l%=INSTR(A$,"*")
19490IFl%>0THEN
19500REPEATA$=LEFT$(A$,l%-1)+RIGHT$(STR$(TIME),4)+MID$(A$,l%+1)
19510PROCAb(da%)
19520UNTILFNAg(A$)<>1
19530ENDIF
19540PROCY_("",FNvb("Fto",B$,A$),"")
19550SYS131113,25,B$,A$TO;F%
19560IF(F%AND1)THEN
19570SYS131113,26,B$,A$,%10000010TO;F%
19580ENDIF
19590PROCZa("$dest",A$)
19600=-((F%AND1)=0)
19620DEFFNZe(A$)
19630LOCALl%,vf%,s$,d$,n%,B$,C$
19640vf%=0:s$="":d$=""
19650PROCY_(FNQ_("Fcopy")," ","")
19660REPEATB$=FNwb(A$)
19670IFLEFT$(B$,1)="/"THEN
19680C$=FNxb(B$):CASELEFT$(B$,2)OF
19690WHEN"ta":vf%=1:n%=VALC$:IFn%=0THENn%=50
19700WHEN"he":vf%=2:n%=VALC$:IFn%=0THENn%=50
19710ENDCASE
19720ELSE
19730IFs$=""THENs$=B$:ELSEd$=B$
19740ENDIF
19750UNTILA$=""
19760IFd$=""THENPROCY_("",FNQ_("Fbad"),""):=0
19770l%=INSTR(d$,"*"):IFl%>0THEN
19780REPEATd$=LEFT$(d$,l%-1)+RIGHT$(STR$(TIME),4)+MID$(d$,l%+1)
19790UNTILFNAg(d$)<>1
19800ENDIF
19810PROCY_("",FNvb("Fto",B$,A$),"")
19820l%=0:CASEvf%OF
19830WHEN0:SYS131113,26,s$,d$TO;F%:l%=-((F%AND1)=0)
19840WHEN1:PROCY_(FNQ_("Ftail"),"",""):l%=FNGg(s$,d$,n%)
19850WHEN2:PROCY_(FNQ_("Fhead"),"",""):l%=FNHg(s$,d$,n%)
19860ENDCASE
19870PROCZa("$dest",A$)
19880=l%
19900DEFFNae(A$)
19910LOCALS%,r%,Ig%,Jg%,f$,t$,F%
19920PROCY_(FNQ_("Fapp")," ","")
19930f$=FNwb(A$):t$=FNwb(A$)
19940IFt$=""THENPROCY_("",FNQ_("Fbad"),""):=0
19950PROCY_("",FNvb("Fto",f$,t$),"")
19960Ig%=FNLa(f$):IFIg%=0THENPROCZb(FNab("Fsource",f$)):=0
19970Jg%=FN`a(t$):IFJg%=0THENSYS131080,11,t$,&FFF,,0,0:Jg%=FNVf(t$)
19980IFJg%>0ANDEXT#Ig%>0THEN
19990PTR#Jg%=EXT#Jg%:S%=0:REPEATSYS131084,4,Ig%,a_%,256TO,,,r%;F%
20000IFr%<>256AND(F%AND1)=0THENSYS131084,2,Jg%,a_%,256-r%TO;F%:PROCAb(da%)
20010S%+=256-r%
20020UNTILS%>=EXT#Ig%OR(F%AND1)<>0
20030ENDIF
20040PROCMa(Ig%):PROCMa(Jg%)
20050=1
20070DEFFNGg(s$,d$,l%)
20080LOCALn%,m%,A$
20090Ig%=FNLa(s$):IFIg%=0THENPROCZb(FNab("Fsource",s$)):=0
20100SYS131080,11,d$,&FFF,,0,0:Jg%=FNVf(d$)
20110IFJg%>0ANDEXT#Ig%>0THEN
20120n%=0:REPEAT
20130A$=GET$#Ig%:n%+=1:PROCAb(da%*2)
20140UNTILEOF#Ig%:PTR#Ig%=0
20150m%=n%-l%:IFm%<0THENm%=0
20160n%=0:REPEAT
20170A$=GET$#Ig%:n%+=1:PROCAb(da%*2)
20180UNTILn%>=m%
20190REPEAT
20200A$=GET$#Ig%:BPUT#Jg%,A$:PROCAb(da%*2)
20210UNTILEOF#Ig%
20220ENDIF
20230PROCMa(Ig%):PROCMa(Jg%)
20240=1
20260DEFFNHg(s$,d$,l%)
20270LOCALn%,m%,A$
20280Ig%=FNLa(s$):IFIg%=0THENPROCZb(FNab("Fsource",s$)):=0
20290SYS131080,11,d$,&FFF,,0,0:Jg%=FNVf(d$)
20300IFJg%>0ANDEXT#Ig%>0THEN
20310n%=0:REPEAT
20320A$=GET$#Ig%:BPUT#Jg%,A$:n%+=1:PROCAb(da%*2)
20330UNTILEOF#Ig%ORn%>=l%
20340ENDIF
20350PROCMa(Ig%):PROCMa(Jg%)
20360=1
20380DEFFNbe(A$)
20390LOCALw%,B$
20400w%=0
20410REPEATB$=FNwb(A$)
20420IFLEFT$(B$,3)="/wi"THEN
20430w%=TRUE
20440ELSE
20450IFw%=0THENSYS131080,6,B$TO;F%ELSESYS131113,27,B$,,2TO;F%
20460ENDIF
20470UNTILA$=""
20480=-((F%AND1)=0)
20500DEFFNee(A$)
20510LOCALl%,h%,Kg%,B$
20520B$=FNwb(A$)
20530IFA$=""THENPROCrb(FNQ_("Edata")):=0
20540PROCY_(FNQ_("DataOpen")," ","")
20550h%=FNLg(B$)
20560SYS131080,23,A$TOl%,,,,,,Kg%
20570IFh%<>0ANDl%=1THEN
20580U_%=1
20590PROCY_("",A$+" (type &"+STR$~Kg%+") to "+B$,"")
20600q%!12=0:q%!16=5:q%!20=0:q%!24=0:q%!28=0:q%!32=0:q%!36=0
20610q%!40=Kg%:$(q%+44)=A$+CHR$0:!q%=47+LENA$+1ANDNOT3
20620SYS262375,18,q%,h%
20630ELSE
20640U_%=0
20650IFh%=0THENPROCY_("",FNab("Enotask",B$),"")
20660IFl%<>1THENPROCY_("",FNab("Enofile",A$),"")
20670ENDIF
20680=U_%
20700DEFPROCTc
20710LOCALl%
20720PROCP_(FNQ_("TaskList1"))
20730FORl%=0TOS`%
20740IFV`%(l%)>0THEN
20750PROCtf(STR$~V`%(l%),FNMg(V`%(l%))+" ("+U`$(l%)+")")
20760IFT`$(l%)>""THENPROCtf(""," exit: "+T`$(l%))
20770ENDIF
20780NEXT
20790PROCP_(FNQ_("TaskList2"))
20800FORl%=0TOW`%
20810IFa`%(l%)>0THEN
20820PROCtf(STR$~a`%(l%),Z`$(l%)+" ("+Y`$(l%)+")")
20830IFX`$(l%)>""THENPROCtf(""," exit: "+X`$(l%))
20840ENDIF
20850NEXT
20860ENDPROC
20880DEFFNne(A$)
20890LOCALB$
20900REPEATB$=FNwb(A$)
20910SYS393438,B$TO;F%
20920UNTILA$=""
20930=(F%AND1)
20950DEFFNIa(A$)
20960LOCALa%,w%,h%,Ng%,B$,C$
20970sc%=0:a%=0
20980REPEATa%+=1:UNTILV`%(a%)=0ORa%=S`%
20990IFV`%(a%)<>0THENPROCrb(FNQ_("Etask2")):ENDPROC
21000U`$(a%)="task"+STR$a%:T`$(a%)="":h%=0
21010REPEATB$=FNwb(A$)
21020IFLEFT$(B$,1)="/"THEN
21030C$=FNxb(B$)
21040CASELEFT$(B$,2)OF
21050WHEN"ki","de":h%=FNOg(C$):B$="":A$=""
21060WHEN"na","id":U`$(a%)=C$
21070WHEN"ex":T`$(a%)=C$
21080WHEN"wa":sc%=TRUE
21090ENDCASE
21100ENDIF
21110UNTILA$=""
21120IFB$>""THEN
21130PROCY_(FNab("TaskStart1",B$),"","")
21140SYS393438,B$TO;F%
21150IF(F%AND1)=0THEN
21160j_%=a%:Ng%=0
21170REPEATNg%+=1:PROCAb(0):UNTILj_%=0ORNg%>10:j_%=0
21180ENDIF
21190IFV`%(a%)<>0ANDsc%<>0THEN
21200REPEAT:PROCAb(50):UNTILV`%(a%)=0
21210ENDIF
21220h%=-((F%AND1)=0)
21230ENDIF
21240=h%
21260DEFFNOg(A$)
21270LOCALl%,h%
21280IFA$=""THEN
21290l%=S`%:WHILEV`%(l%)=0ANDl%>0:l%-=1:ENDWHILE
21300IFV`%(l%)>0THENh%=V`%(l%)
21310ELSE
21320FORl%=0TOS`%
21330IFV`%(l%)>0THEN
21340IFFNMg(V`%(l%))=A$ORU`$(l%)=A$THENh%=V`%(l%)
21350ENDIF
21360NEXT
21370ENDIF
21380IFh%<>0THEN
21390PROCZb("Killing task: "+A$)
21400!q%=256:q%!12=0:q%!16=0:SYS262375,17,q%,h%:PROCAb(0)
21410ENDIF
21420=-(h%<>0)
21440DEFFNde(A$)
21450=FNLg(A$)
21470DEFFNMg(h%)
21480LOCALf$,n%
21490f$="":SYS403072,h%TOh%;F%
21500IF(F%AND1)=0THEN
21510n%=0:WHILEh%?n%>31:f$+=CHR$(h%?n%):n%+=1:ENDWHILE
21520ENDIF
21530=f$
21550DEFFNLg(A$)
21560LOCALA%,r%,l%,h%,B$
21570r%=0:A%=0:A$=FNrc(A$)
21580REPEAT
21590SYS272001,A%,Pa%,&100TOA%,l%
21600Fd%=0
21610WHILE(A%>=0ANDr%=0AND(Fd%+Pa%)<=l%)
21620h%=Pa%!Fd%:B$=FNUb(Pa%!(Fd%+4)):Fd%+=16
21630IFA$=FNrc(B$)THENr%=h%
21640ENDWHILE
21650UNTILA%<0ORr%<>0
21660=r%
21680DEFPROCbb
21690LOCALl%
21700FORl%=0TOS`%-1
21710IFV`%(l%)=0ANDV`%(l%+1)<>0THEN
21720SWAPV`%(l%),V`%(l%+1)
21730SWAPU`$(l%),U`$(l%+1)
21740SWAPT`$(l%),T`$(l%+1)
21750ENDIF
21760NEXT
21770ENDPROC
21790DEFFNIe(A$)
21800LOCALSb%,w%,Ng%,n%,F%,Kd%,B$,C$,S$
21810Sb%=0:sc%=0:F%=0:Kd%=TRUE
21820WHILEa`%(Sb%)<>0ANDSb%<W`%:Sb%+=1:ENDWHILE
21830IFSb%=W`%THENPROCrb(FNQ_("Etask2")):=0
21840SYS262380,-1,-1TO,n%:n%=n%DIV1024
21850S$=STR$n%+"k":Y`$(Sb%)="SDtask"+STR$Sb%:X`$(Sb%)="":g`%(Sb%)=0
21860REPEATB$=FNwb(A$)
21870IFLEFT$(B$,1)="/"THEN
21880C$=FNxb(B$)
21890CASELEFT$(B$,2)OF
21900WHEN"si":S$=C$
21910WHEN"na","id":Y`$(Sb%)=C$
21920WHEN"ex":X`$(Sb%)=C$
21930WHEN"ou":PROCMa(b`%(Sb%)):b`%(Sb%)=FNVf(C$)
21940WHEN"wa":sc%=TRUE
21950WHEN"ke":g`%(Sb%)=TRUE
21960WHEN"ki":PROCnc(C$,&808C4)
21970WHEN"su":PROCnc(C$,&808C6)
21980WHEN"re":PROCnc(C$,&808C7)
21990WHEN"no":Kd%=FALSE
22000ENDCASE
22010B$=""
22020ENDIF
22030UNTILA$=""
22040IFB$>""THEN
22050PROCY_(FNab("TaskStart1",Y`$(Sb%)),"",""):Z`$(Sb%)=B$
22060IFb`%(Sb%)=0THENPROCJd(Sb%,Kd%,Y`$(Sb%))
22070SYS393438,"TaskWindow """+B$+""" -quit -wimpslot "+S$+" -name """+Y`$(Sb%)+""" -task &"+STR$~Ia%+" -txt &"+STR$~(Ia%+Sb%)TO;F%
22080Ng%=0:REPEATNg%+=1:PROCAb(0):UNTILa`%(Sb%)<>0ORNg%>10
22090IFa`%(Sb%)=0THENPROCMa(b`%(Sb%)):Y`$(Sb%)="":PROCEb(d`%(Sb%))
22100IFsc%<>0ANDa`%(Sb%)<>0THEN
22110REPEAT:PROCAb(50):UNTILa`%(Sb%)=0
22120ENDIF
22130ENDIF
22140=ABS((F%AND1)=0)
22160DEFPROCnc(A$,m%)
22170A$=FNrc(A$)
22180LOCALSb%:FORSb%=0TOW`%
22190IFA$=FNrc(Y`$(Sb%))ANDa`%(Sb%)>0THEN
22200!q%=20:q%!4=0:q%!8=0:q%!12=0:q%!16=m%
22210SYS262375,17,q%,a`%(Sb%)
22220CASEm%OF
22230WHEN&808C6:$h`%(Sb%)=FNab("TaskSusp",Y`$(Sb%)):PROCeb(d`%(Sb%))
22240WHEN&808C7:$h`%(Sb%)=FNab("TaskRun",Y`$(Sb%)):PROCeb(d`%(Sb%))
22250ENDCASE
22260Sb%=W`%
22270ENDIF
22280NEXT
22290ENDPROC
22310DEFFNUe(A$)
22320LOCALf%,r%,Pg$,B$,C$
22330Pg$="":f%=0:WHILEn`%(f%)<>0ANDf%<m`%:f%+=1:ENDWHILE
22340IFf%=m`%THENPROCrb(FNQ_("Efullfile")):=0
22350o`$(f%)="":p`%(f%)=1:r%=&4F
22360REPEATB$=FNwb(A$)
22370IFLEFT$(B$,1)="/"THEN
22380C$=FNxb(B$)
22390CASELEFT$(B$,2)OF
22400WHEN"na","id":o`$(f%)=C$
22410WHEN"re":p`%(f%)=1:r%=&4F
22420WHEN"wr":p`%(f%)=2:r%=&8F
22430WHEN"rw":p`%(f%)=3:r%=&CF
22440WHEN"er":Pg$=C$
22450ENDCASE
22460ELSE
22470q`$(f%)=B$
22480ENDIF
22490UNTILA$=""
22500IFo`$(f%)>""THENSYS131085,r%,q`$(f%)TOn`%(f%);F%
22510IF(F%AND1)<>0THEN
22520n`%(f%)=0:o`$(f%)=""
22530IFPg$=""THENPROCrb(FNQ_("Efilefail")):ELSEPROCRb(Pg$,9)
22540ELSE
22550IFp`%(f%)=2THENSYS131080,18,q`$(f%),&FFF
22560ENDIF
22570=n`%(f%)
22590DEFFNVe(A$)
22600LOCALn%,r%,B$,C$
22610r%=0
22620REPEATB$=FNwb(A$)
22630IFLEFT$(B$,1)="/"THEN
22640C$=FNxb(B$)
22650CASELEFT$(B$,2)OF
22660WHEN"na","id":FORn%=0TOm`%
22670IFo`$(n%)=C$THENPROCMa(n`%(n%)):o`$(n%)="":n%=m`%:r%=1
22680NEXT
22690ENDCASE
22700ENDIF
22710UNTILA$=""
22720=r%
22740DEFFNWe(A$)
22750LOCALf%,r%,Qg$,B$,C$
22760f%=-1:r%=0:Qg$=""
22770REPEATB$=FNwb(A$)
22780IFLEFT$(B$,1)="/"THEN
22790C$=FNxb(B$)
22800CASELEFT$(B$,2)OF
22810WHEN"na","id":f%=FNRg(C$)
22820WHEN"eof":Qg$=C$
22830ENDCASE
22840ELSE
22850IFf%>-1ANDf%<m`%THEN
22860IF(p`%(f%)AND1)=0THENPROCrb(FNQ_("Enoread")):=0
22870IFNOTEOF#n`%(f%)THENPROCZa(B$,GET$#n`%(f%)):r%=1
22880IFEOF#n`%(f%)ANDQg$>""THENPROCRb(Qg$,9)
22890ENDIF
22900ENDIF
22910UNTILA$=""
22920=r%
22940DEFFNXe(A$)
22950LOCALf%,r%,B$,C$
22960f%=-1:r%=0
22970REPEATB$=FNwb(A$)
22980IFLEFT$(B$,1)="/"THEN
22990C$=FNxb(B$)
23000CASELEFT$(B$,2)OF
23010WHEN"na","id":f%=FNRg(C$)
23020ENDCASE
23030ELSE
23040IFf%>-1ANDf%<m`%THEN
23050IF(p`%(f%)AND2)=0THENPROCrb(FNQ_("Enowrite")):=0
23060BPUT#n`%(f%),B$
23070ENDIF
23080ENDIF
23090UNTILA$=""
23100=r%
23120DEFFNFd(A$)
23130LOCALf%,r%,s%,B$,C$
23140f%=-1:s%=-1
23150REPEATB$=FNwb(A$)
23160IFLEFT$(B$,1)="/"THEN
23170C$=FNxb(B$)
23180CASELEFT$(B$,2)OF
23190WHEN"na","id":f%=FNRg(C$)
23200WHEN"se":IFFNrc(C$)="eof"THENs%=-2:ELSEs%=VALC$
23210ENDCASE
23220ENDIF
23230UNTILA$=""
23240r%=0
23250IFf%>-1ANDn`%(f%)<>0THEN
23260IFs%=-2THENPTR#n`%(f%)=EXT#n`%(f%):ELSEIFs%>=0THENPTR#n`%(f%)=s%
23270r%=PTR#n`%(f%)
23280ENDIF
23290=r%
23310DEFPROCrf
23320PROCtf("Identifier","Filename")
23330LOCALf%:FORf%=0TOm`%
23340IFn`%(f%)>0THENPROCtf(o`$(f%),q`$(f%))
23350NEXT
23360ENDPROC
23380DEFFNRg(A$)
23390LOCALf%:f%=0:WHILEo`$(f%)<>C$ANDf%<m`%:f%+=1:ENDWHILE
23400IFf%=m`%THENPROCrb(FNQ_("Efileid")):=0
23410=f%
23430DEFPROCfe(A$)
23440LOCALn%,l%,m$,n$,a$,b$,B$,C$:n%=-1:m$="":n$=""
23450REPEATB$=FNwb(A$)
23460IFLEFT$(B$,1)="/"THEN
23470C$=FNxb(B$)
23480CASELEFT$(B$,2)OF
23490WHEN"co":n%=-2
23500WHEN"ic":n%=0:REPEATn%+=1:UNTILR`$(n%)=C$ORP`%(n%)=0ORn%=N`%
23510IFn%=N`%ORC$=""THENPROCZb(FNQ_("Eicon1")):n%=-5
23520ENDCASE
23530ELSE
23540l%=INSTR(B$,":")
23550IFl%>0THEN
23560a$=LEFT$(B$,l%-1):b$=MID$(B$,l%+1)
23570ELSE
23580a$=B$:b$=""
23590ENDIF
23600IFa$=""ORb$=""THENPROCrb(FNab("Emenu",B$)):A$=""
23610IFLENm$+LENa$<252ANDLENn$+LENb$<252THEN
23620m$+=a$+CHR$0:n$+=b$+CHR$0
23630ELSE
23640PROCrb(FNQ_("Ebigmenu")):A$=""
23650ENDIF
23660ENDIF
23670UNTILA$=""
23680IFRIGHT$(m$,1)=" "THENm$=LEFT$(m$,LENm$-1)
23690CASEn%OF
23700WHEN-1:`_$(0)=m$:`_$(1)=n$
23710WHEN-2:A`$(0)=m$:A`$(1)=n$
23720OTHERWISE:IFn%>=0ANDn%<=N`%THENQ`$(n%,0)=m$:Q`$(n%,1)=n$
23730ENDCASE
23740ENDPROC
23760DEFFNnb(A$,B$)
23770LOCALu$,a$,b$:__%=0:u$=""
23780REPEAT
23790__%+=1
23800a$=FNSg(A$,CHR$0):b$=FNSg(B$,CHR$0)
23810u$+=","+a$:__$(__%,0)=a$:__$(__%,1)=b$
23820UNTILA$=""OR__%=z_%:u$=MID$(u$,2)
23830=u$
23850DEFPROCSc
23860LOCALC$
23870IF`_$(0)>""THENC$=FNnb(`_$(0),`_$(1)):PROCTg("user")
23880IFA`$(0)>""THENC$=FNnb(A`$(0),A`$(1)):PROCTg("debug")
23890FORZ%=0TON`%
23900IFQ`$(Z%,0)>""THENC$=FNnb(Q`$(Z%,0),Q`$(Z%,1)):PROCTg("icon: "+R`$(Z%))
23910NEXT
23920ENDPROC
23940DEFPROCTg(t$)
23950LOCALl%
23960PROCP_("Label         Action ("+t$+")")
23970FORl%=1TO__%
23980PROCtf(__$(l%,0),__$(l%,1))
23990NEXT
24000ENDPROC
24020DEFPROCie(A$)
24030LOCALB$,C$
24040REPEATB$=FNwb(A$)
24050CASELEFT$(B$,1)OF
24060WHEN"/":C$=FNxb(B$):PROCZb("Qualifier /"+B$+" value="+C$)
24070OTHERWISE:PROCZb("Parameter "+B$)
24080ENDCASE
24090UNTILA$=""
24100ENDPROC
24120DEFFNud(RETURNUb$)
24130LOCALB$,A%,B%,F%,Ug%,Vg%,Wg%,Xg%,l%
24140B$="":B%=0:Ug%=0:Vg%=0:Wg%=0:Xg%=0:F%=0:l%=LENUb$
24150IFUb$=""THEN=""
24160REPEAT:B%+=1:A%=ASCMID$(Ub$,B%,1)
24170IFXg%=92THEN
24180B$+=CHR$A%:Xg%=0
24190ELSE
24200IFA%=34ANDVg%=0THENUg%+=1
24210IFUg%MOD2=0THEN
24220IFA%=40THENVg%+=1
24230IFA%=41THENVg%-=1
24240IFA%=123THENWg%+=1
24250IFA%=125THENWg%-=1
24260IFVg%=0AND(Ug%MOD2)=0THEN
24270IFA%=59ANDB%>1THENF%=TRUE
24280ENDIF
24290ENDIF
24300Xg%=A%:IFF%=0ANDA%<>92THENB$+=CHR$A%
24310ENDIF
24320UNTILF%<>0ORB%=l%:IFB%=l%THENB%+=1
24330Ub$=FNYg(MID$(Ub$,B%+1))
24340B$=FNSf(B$)
24350=FNYg(B$)
24370DEFFNSf(A$)
24380LOCALl%,f%,c%,a$,l$,B$:l$=""
24390c%=INSTR(A$,"%"):IFc%=0THEN:=A$
24400c%=c%-2:IFc%<0THENc%=0
24410B$=LEFT$(A$,c%)
24420REPEATc%+=1:a$=MID$(A$,c%,1)
24430IFl$="\"THEN
24440B$+=a$:l$=""
24450ELSE
24460IFa$="%"THEN
24470FORl%=0TOE`%
24480IFF`$(l%,0)>""ANDF`$(l%,0)=MID$(A$,c%+1,LENF`$(l%,0))THENB$+=F`$(l%,1):c%+=LENF`$(l%,0):l%=E`%+1
24490NEXT
24500IFl%=E`%THENB$+="%"
24510ELSE
24520B$+=a$:l$=a$
24530ENDIF
24540ENDIF
24550UNTILc%>=LENA$
24560=B$
24580DEFFNwb(RETURNUb$)
24590LOCALB$,A%,B%,F%,Ug%,Vg%,Wg%,Xg%,l%
24600B$="":B%=0:Ug%=0:Vg%=0:Wg%=0:Xg%=0:F%=0:l%=LENUb$
24610IFUb$=""THEN=""
24620REPEAT:B%+=1:A%=ASCMID$(Ub$,B%,1)
24630IFXg%=92THEN
24640B$+=CHR$A%:Xg%=0
24650ELSE
24660IFA%=34ANDVg%=0THENUg%+=1
24670IFUg%MOD2=0THEN
24680IFA%=40THENVg%+=1
24690IFA%=41THENVg%-=1
24700IFA%=123THENWg%+=1
24710IFA%=125THENWg%-=1
24720IFVg%=0ANDWg%=0THEN
24730IF(A%=32ORA%=47)ANDB%>1THENF%=TRUE
24740ENDIF
24750ENDIF
24760Xg%=A%:IFF%=0ANDA%<>92THENB$+=CHR$A%
24770ENDIF
24780UNTILF%<>0ORB%=l%:IFB%=l%THENB%+=1
24790B$=FNYg(B$)
24800Ub$=FNZg(FNYg(MID$(Ub$,B%)))
24810=FNag(B$)
24830DEFFNag(B$)
24840LOCALl%,r%
24850l%=ASCB$:r%=ASCRIGHT$(B$,1)
24860IFl%=34ANDr%=34THENB$=MID$(B$,2,LENB$-2)
24870IFl%=123ANDr%=125THEN
24880r%=FNV_(MID$(B$,2,LENB$-2)):B$=FNse("$status")
24890ENDIF
24900=B$
24920DEFFNFg(A$)
24930LOCALB$,l%,c%:B$=""
24940FORl%=1TOLENA$:c%=ASCMID$(A$,l%,1):IFc%>96ANDc%<123THENc%-=32
24950B$+=CHR$c%:NEXT:=B$
24970DEFFNZg(A$)
24980IFA$="-"THENA$=FNSf(FNT_(O_%)):PROCZb("Continuation line:"+A$):O_%+=1
24990=A$
25010DEFFNxb(RETURNA$)
25020LOCALB$,A%,B%:WHILELEFT$(A$,1)="/":A$=MID$(A$,2):ENDWHILE
25030A%=INSTR(A$,"="):IFA%=0THENA$=FNrc(A$):=""
25040B$=MID$(A$,A%+1):A$=FNrc(LEFT$(A$,A%-1))
25050=FNag(B$)
25070DEFPROCme
25080PROCY_("",FNQ_("Exit"),"")
25090X_%=FALSE:ENDPROC
25110DEFFNn_(A$)
25120IFA$=""THEN=1
25130=VAL(A$)
25150DEFFNd(A%,B%,C%,D%)
25160=USR(b_)
25180DEFPROCD_
25190LOCALA$,B$
25200SYS16TOA$
25210A$=MID$(A$,INSTR(FNrc(A$),"!runi")):Id%=0:L_$="":bg$=""
25220A$=MID$(A$,INSTR(A$," ")+1)
25230REPEAT
25240B$=FNwb(A$)
25250CASELEFT$(B$,2)OF
25260WHEN"-f":L_$=FNwb(A$)
25270WHEN"-a":L_$="SLIPdial:default"
25280WHEN"-q":Id%=TRUE
25290WHEN"-s":d_%=VALFNwb(A$):IFd_%<&1B00THENd_%=&1B00
25300OTHERWISE:bg$=bg$+B$+" "
25310ENDCASE
25320UNTILB$=""
25330ENDPROC
25350DEFFNcg(RETURNA$)
25360LOCALB$,a%:a%=INSTR(A$," ")
25370IFa%>0THEN
25380B$=FNYg(LEFT$(A$,a%-1)):A$=FNYg(MID$(A$,a%+1))
25390ELSE
25400B$=A$:A$=""
25410ENDIF
25420=B$
25440DEFPROCBe(N$)
25450PROCZa("$caller",dg$):X_%=0:PROCM_(N$)
25460ENDPROC
25480DEFPROCM_(N$)
25500IFX_%<>0THENPROCZb(FNQ_("Eload1")):ENDPROC
25510PROCeg
25520p%=0:IFbg$>""THEN
25530REPEAT:p%+=1:B$=FNwb(bg$):PROCZa("p"+STR$p%,B$):UNTILbg$=""
25540ENDIF
25550IFN$>""ANDFNfg(N$,0)THEN
25560PROCY_(FNQ_("Sload2")," "," "):dg$=N$:PROCZa("$script",N$)
25570X_%=TRUE:O_%=0:PROCob
25580ENDIF
25590ENDPROC
25610DEFPROCeg
25620pd%=0:ua%=0:sd%=19200:PROCmd
25630pe%=1:qe%=30:n_%=FALSE:W_%=0:i_$="":tb$=""
25640sb%=0:Eg%=0:`_$()="":A`$()="":__%=0:K`$()=""
25650FORn%=0TOE`%:IFLEFT$(F`$(n%,0),1)<>"$"THENF`$(n%,0)=""
25660NEXT
25670FORn%=0TON`%:IFP`%(n%)>0THEN!Oa%=-2:Oa%!4=P`%(n%):SYS393412,,Oa%TO;F%
25680NEXT:R`$()="":P`%()=0:Q`$()="":K`$()="":L`%()=0
25690a`%()=0:Y`$()="":X`$()="":V`%()=0:U`$()=""
25700T`$()="":k`$()="":__$()=""
25710y_$()="":y_%()=0
25720ENDPROC
25740DEFFNfg(N$,gg%)
25750LOCALA$,r%,p_%
25760SYS131080,23,N$TOr%:IFr%<>1THEN=0
25770r%=0:p_%=FNLa(N$)
25780IFp_%=0THENPROCZb("File not found: "+N$):=0
25790IFgg%=0THENW_%=0:D`%=1
25800A$=GET$#p_%
25810IFINSTR(A$,"slipdial")>0THEN
25820REPEATA$=GET$#p_%
25830IFLEFT$(A$,1)<>"#"ANDA$>""THEN
25840PROChg(A$,W_%)
25850IFLEFT$(A$,1)=":"THEN
25860A$=MID$(A$,2):B$=FNwb(A$)
25870IFB$="autoexec"THENC`%(0)=W_%:C`$(0)=B$ELSEC`%(D`%)=W_%:C`$(D`%)=B$:D`%+=1
25880ENDIF
25890W_%+=1
25900ENDIF
25910UNTILEOF#p_%
25920IFW_%>2000THEN
25930PROCMa(p_%):PROCrb(FNQ_("Elong")):=0
25940ELSE
25950r%=1
25960ENDIF
25970ELSE
25980PROCrb(FNQ_("Eload2")):=0
25990ENDIF
26000PROCMa(p_%)
26010=r%
26030DEFPROChg(A$,n%)
26040IFn%>k_%THEN
26050CASEn%OF
26060WHEN0:DIMig$(199)
26070WHEN200:DIMjg$(199)
26080WHEN400:DIMkg$(199)
26090WHEN600:DIMlg$(199)
26100WHEN800:DIMmg$(199)
26110WHEN1000:DIMng$(199)
26120WHEN1200:DIMog$(199)
26130WHEN1400:DIMpg$(199)
26140WHEN1600:DIMqg$(199)
26150WHEN1800:DIMrg$(199)
26160WHEN2000:DIMsg$(199)
26170ENDCASE
26180k_%=n%
26190ENDIF
26200CASE(n%DIV200)OF
26210WHEN0:ig$(n%)=A$
26220WHEN1:jg$(n%-200)=A$
26230WHEN2:kg$(n%-400)=A$
26240WHEN3:lg$(n%-600)=A$
26250WHEN4:mg$(n%-800)=A$
26260WHEN5:ng$(n%-1000)=A$
26270WHEN6:og$(n%-1200)=A$
26280WHEN7:pg$(n%-1400)=A$
26290WHEN8:qg$(n%-1600)=A$
26300WHEN9:rg$(n%-1800)=A$
26310WHEN10:sg$(n%-2000)=A$
26320ENDCASE
26330ENDPROC
26350DEFFNT_(n%)
26360IFn%>k_%THEN=""
26370LOCALA$:CASE(n%DIV200)OF
26380WHEN0:A$=ig$(n%)
26390WHEN1:A$=jg$(n%-200)
26400WHEN2:A$=kg$(n%-400)
26410WHEN3:A$=lg$(n%-600)
26420WHEN4:A$=mg$(n%-800)
26430WHEN5:A$=ng$(n%-1000)
26440WHEN6:A$=og$(n%-1200)
26450WHEN7:A$=pg$(n%-1400)
26460WHEN8:A$=qg$(n%-1600)
26470WHEN9:A$=rg$(n%-1800)
26480WHEN10:A$=sg$(n%-2000)
26490OTHERWISE:A$=""
26500ENDCASE
26510=A$
26530DEFFNAe(tg$)
26540LOCALr%,ug%,B$
26550B$=FNwb(tg$):PROCZb(FNab("Slib",B$))
26560ug%=C`%(0)
26570r%=FNfg(B$,1)
26580IFug%<>C`%(0)ANDr%<>0THENPROCRb("call auto "+tg$,0)
26590=r%
26610DEFPROCVc(A$)
26620LOCALtc%,vg%
26630PROCP_(FNQ_("Slist"))
26640tc%=VALFNwb(A$):vg%=VALA$
26650IFtc%<0THENtc%=0
26660IFvg%=0ORvg%>W_%THENvg%=W_%
26670FORc%=tc%TOvg%
26680A$=STR$c%:IFc%=O_%THENA$="*"+A$
26690A$=RIGHT$("   "+A$,4)+" "
26700PROCP_(A$+FNT_(c%))
26710NEXT
26720ENDPROC
26740DEFPROCsf
26750PROCtf("Label","Line")
26760LOCALn%:FORn%=0TOD`%-1:PROCtf(C`$(n%),STR$C`%(n%)):NEXT
26770ENDPROC
26790DEFFNN_(A$)
26800LOCALr%:r%=0
26810PROCZa("$init","ATZQ0V1")
26820PROCZa("$busy","BUSY")
26830PROCZa("$conn","CONNECT")
26840PROCZa("$nocarr","NO CARRIER")
26850PROCZa("$nodial","NO DIALTONE")
26860IFA$>""THEN
26870IFINSTR(A$,".")=0THENA$="SlipDialDrv:"+A$
26880r%=FN`d(A$)
26890ENDIF
26900=r%
26920DEFFN`d(L_$)
26930LOCALr%,p_%,B$,C$
26940r%=0
26950REPEATB$=FNwb(L_$)
26960p_%=FNLa(B$)
26970IFp_%=0THEN
26980PROCZb(FNab("Fsource",B$)):=0
26990ELSE
27000REPEATC$=GET$#p_%
27010IFLEFT$(C$,1)<>"#"ANDC$>""THEN
27020r%=FNV_(C$)
27030ENDIF
27040UNTILEOF#p_%
27050PROCMa(p_%)
27060ENDIF
27070UNTILL_$=""
27080=r%
27100DEFPROCje(A$)
27110LOCALp_%,n%,r%,B$,C$:v`%=FALSE:yb$()=""
27120IFA$=""THEN
27130PROCOb(FNQ_("Hannounce"))
27140n%=0:C$=""
27150REPEATB$=""
27160REPEAT
27170SYS131084,9,_`$+".help",a_%,1,n%,255,"*"TO,,,r%,n%
27180C$=FNUb(a_%):B$+=C$+STRING$(15-LENC$," ")
27190UNTILn%=-1ORLENB$>60
27200PROCOb(B$)
27210UNTILn%=-1:PROCOb("")
27220ELSE
27230p_%=FNLa(_`$+".Help."+A$+"*")
27240IFp_%>0THEN
27250PROCOb("Help on "+A$+":")
27260n%=0
27270REPEAT
27280B$=GET$#p_%:IFB$>""THENn%+=1:PROCOb(B$)
27290UNTILEOF#p_%ORn%>r`%
27300PROCOb(""):PROCMa(p_%)
27310ELSE
27320PROCje("")
27330ENDIF
27340ENDIF
27350ENDPROC
27370DEFPROCle(Va$)
27380PROCY_(FNQ_("Quit2"),Va$,"")
27390PROCTb
27400END
27410ENDPROC
27430DEFPROCG_
27440p_%=FNLa(z`$+".!Config"):IFp_%=0THENERROR0,"No config!":ENDPROC
27450PROCdc(Ua%,1,BGET#p_%)
27460PROCdc(Ua%,2,BGET#p_%)
27470PROCdc(Ua%,3,BGET#p_%)
27480PROC_a(Ua%,4,GET$#p_%)
27490IFNOTEOF#p_%THENPROC_a(Ua%,7,GET$#p_%)
27500IFNOTEOF#p_%THENPROC_a(Ua%,8,GET$#p_%)
27510IFNOTEOF#p_%THENPROC_a(Ua%,12,GET$#p_%)
27520IFNOTEOF#p_%THENPROCdc(Ua%,13,BGET#p_%)
27530IFNOTEOF#p_%THENPROCdc(Ua%,14,BGET#p_%)
27540PROCMa(p_%)
27550J_%=VALFNQb(Ua%,7):IFJ_%<24THENJ_%=24
27560I_%=VALFNQb(Ua%,8)
27570Aa%=FNec(Ua%,13)
27580IFI_%<40THENI_%=40ELSEIFI_%>240THENI_%=240
27590i`%=VALFNQb(Ua%,12)
27600IFi`%<10THENi`%=10ELSEIFi`%>100THENi`%=100
27610SYS6,121,(2EOR&80)TO,A%
27620IFL_$=""ANDFNec(Ua%,3)=0ANDA%<>&FFTHENL_$=FNQb(Ua%,4)
27630IFId%=0ANDFNec(Ua%,1)=0THENPROC_b(Sa%,0,-200)
27640ENDPROC
27660DEFPROCpb
27670p_%=FNVf(z`$+".!Config"):IFp_%=0THENENDPROC
27680BPUT#p_%,FNec(Ua%,1)
27690BPUT#p_%,FNec(Ua%,2)
27700BPUT#p_%,FNec(Ua%,3)
27710BPUT#p_%,FNQb(Ua%,4)
27720BPUT#p_%,FNQb(Ua%,7)
27730BPUT#p_%,FNQb(Ua%,8)
27740BPUT#p_%,FNQb(Ua%,12)
27750BPUT#p_%,FNec(Ua%,13):Aa%=FNec(Ua%,13)
27760BPUT#p_%,FNec(Ua%,14)
27770PROCMa(p_%)
27780IFFNec(Ua%,14)=0THEN
27790p_%=FNVf(z`$+".!windows"):IFp_%=0THENENDPROC
27800!q%=Sa%:SYS262347,,q%
27810BPUT#p_%,STR$(q%!4)
27820BPUT#p_%,STR$(q%!8)
27830PROCMa(p_%)
27840ENDIF
27850ENDPROC
27870DEFFNH_(A%)
27880IFHIMEM-END<(A%+&2000)THEN=TRUE
27890=FALSE
27910DEFFNce(A$)
27920LOCALf$,wg,xg%:xg%=0
27930f$=FNwb(A$):IFf$>""THEN
27940wg=FNyg("<Mail$Dir>.folder."+f$+"News")-FNyg("<Mail$Dir>.folder."+f$+"NG"):PROCZb("Time "+STR$wg)
27950IFwg>0THENxg%=100*FNzg("<Mail$Dir>.folder."+f$+"News")/wg
27960ENDIF
27970=xg%
27990DEFFNyg(f$)
28000LOCAL_g%,`g%,Ah%
28010SYS131080,17,f$TO_g%,,`g%,Ah%;F%
28020IF_g%=0OR(F%AND1)<>0THENPROCZb(FNab("Enofile",f$)):=0
28030=(`g%AND&FF)*2^32+Ah%
28050DEFFNzg(f$)
28060LOCALOd%,_g%
28070SYS131080,17,f$TO_g%,,,,Od%;F%
28080IF_g%=0OR(F%AND1)<>0THENPROCZb(FNab("Enofile",f$)):=0
28090=Od%
28110DEFFNYg(A$)
28130LOCALB$:IFA$>""THENCALLBh%,A$,B$
28140=B$
28160DEFFNrc(A$)
28170IFA$>""THENCALLCh%,A$
28180=A$
28200DEFFNUb(a%)
28210LOCALDh%,B$
28220CALLEh%,Dh%,a%,B$
28230=B$
28250DEFPROCB_
28260LOCALo%,l%,F%
28270SYS131080,17,z`$+".code"TOo%,,,,l%;F%
28280IFo%=1ANDl%>0AND(F%AND1)=0THEN
28290DIMFh% l%
28300Gh%=Fh%+4:Hh%=Fh%+8:Eh%=Fh%+12
28310Ih%=Fh%+16:Jh%=Fh%+20:Ch%=Fh%+24
28320Bh%=Fh%+28:Kh%=Fh%+32:Lh%=Fh%+36
28330Mh%=Fh%+40
28340SYS131080,16,z`$+".code",Fh%,0TO;F%
28350IF(F%AND1)THENERROR0,"Help! I can't find my Code file!"
28360ELSE
28370ERROR0,"Help! I can't find my Code file!"
28380ENDIF
28390ENDPROC
28410DEFFNma(RETURNF`%,Od%,A$)
28420LOCALF%,Nh%
28430IFc_%<&A5THEN
28440SYS131102,6,,,Od%TO,,F`%;F%
28450IF(F%AND1)THENF`%=0
28460Nh%=F`%
28470ELSE
28480SYS&20066,0,-1,Od%,-1,0,-1,0,0,Fa$+"_"+A$TO,Nh%,,F`%;F%
28490IF(F%AND1)THENF`%=0:Nh%=0
28500ENDIF
28510=Nh%
28530DEFPROCpa(RETURNF`%)
28540LOCALF%
28550IFF`%>0THEN
28560IFc_%<&A5THEN
28570SYS131102,7,,F`%TO;F%:F`%=0
28580SYS131114,1,(-16*1024*1024)
28590ELSE
28600SYS&20066,1,F`%TO;F%:F`%=0
28610ENDIF
28620ENDIF
28630ENDPROC
28650DEFPROCOh
28660LOCALA%,N%,P%
28670IFc_%>&A4THEN
28680SYS&66,3,-1TO,A%
28690WHILEA%<>-1
28700SYS&66,2,A%TO,,,,,,,,P%
28710SYS&66,3,A%TO,N%
28720IFLEFT$(FNUb(P%),1+LENFa$)=Fa$+"_"THENSYS&66,1,A%
28730A%=N%
28740ENDWHILE
28750ENDIF
28760ENDPROC
28780DEFFNSg(RETURNA$,s$)
28790LOCALB$,l%
28800l%=INSTR(A$,s$)
28810IFl%>0THEN
28820B$=LEFT$(A$,l%-1):A$=MID$(A$,l%+1)
28830ELSE
28840B$=A$:A$=""
28850ENDIF
28860=B$
28880DEFPROCC_
28890SYS398592,,_`$+".messages"TO,,id%;F%
28900IF(F%AND1)THENERROR0,"Couldn't load Messages file!"
28910DIMPh%16,Qh% id%
28920SYS267521,Ph%,_`$+".messages",Qh%
28930ENDPROC
28950DEFPROCgb
28960IFPh%>0THENSYS267524,Ph%
28970ENDPROC
28990DEFFNQ_(t$)
29000LOCALs%
29010SYS267522,Ph%,t$TO,,s%
29020=FNUb(s%)
29030DEFFNab(t$,a$)
29040LOCALs%
29050SYS267522,Ph%,t$,a_%,255,a$TO,,s%
29060=FNUb(s%)
29070DEFFNvb(t$,a$,b$)
29080LOCALs%
29090SYS267522,Ph%,t$,a_%,255,a$,b$TO,,s%
29100=FNUb(s%)
29110DEFFNRh(t$,a$,b$,c$)
29120LOCALs%
29130SYS267522,Ph%,t$,a_%,255,a$,b$,c$TO,,s%
29140=FNUb(s%)
�:�" at ";�:�

�=�+&2000
(�A_
2�B_
<�C_
F�D_
P�E_
Z��F_:�
d�G_
n ȕ�H_(I_%�2*J_%):�=�+&2000:�
x�K_
�ș131080,17,L_$�A%,,,,S%
�ȕ�H_(S%):�=�+&2000:�
��M_(L_$)
�A%=�N_("")
��
�	O_%=0
��
�)�H_(0)��P_(�Q_("MoreMem")):�=�+&2000
�"�R_�A$=�S_�A$=�T_(O_%):O_%+=1
�U_%=�V_(A$)
��O_%>=W_%�X_%=�
�*X_%=�:�O_%>=W_%��Y_("",�Q_("Idle"),"")
��Z_
�0
�
,��A_
6�a_% 256,b_ 4096
@ș6,129,0,&FF�,c_%
J
d_%=&1B00
T	e_%=�
^.f_%=1:g_%=0:h_%=�:i_%=�:X_%=�:j_%=0:k_%=-1
h4l_%=�:m_%=0:n_%=�:o_%=0:p_%=0:q_%=0:r_$="":O_%=0
rs_%=20:�t_%(s_%),u_%(s_%)
|*v_%=10:�w_$(v_%),x_% v_%,y_$(3),y_%(3)
�$z_%=30:�__$(z_%,1),`_$(1),A`$(1)
�*B`%=50:�C`%(B`%),C`$(B`%):D`%=0:U_$=""
�3E`%=150:�F`$(E`%,1),G`$(3),H`$(3),I`$(10):I`%=0
�(J`%=10:�K`$(J`%,1),L`%(J`%),M`$(J`%)
�'N`%=8:�O`$(N`%),P`$(N`%),Q`$(N`%,1)
��R`$(N`%),P`%(N`%)
�%S`%=8:�T`$(S`%),U`$(S`%),V`%(S`%)
�%W`%=8:�X`$(W`%),Y`$(W`%),Z`$(W`%)
�(�a`%(W`%),b`%(W`%),c`$(W`%),d`%(W`%)
�(�e`%(W`%),f`%(W`%),g`%(W`%),h`%(W`%)
�/H`%=-1:d`%()=0:f`%()=0:i`%=29:I_%=80:J_%=24
�.j`%=10:�k`$(j`%),k`%(j`%),l`%(j`%):k`%()=�
�/m`%=10:�n`%(m`%),o`$(m`%),p`%(m`%),q`$(m`%)
0r`%=25:s`$="":t`$="":u`%=0:s`%=0:v`%=�:w`%=0
x`$=�y`("Slipdial$dir")
!z`$=�y`("Slipdial$resources")
&)_`$=z`$+".UK":``$="":Aa%=1:Ba$="none"
0�
N��E_
X�Ca% d_%:!Ca%=d_%:Ca%!8=0
bș46,&109,Ca%
l5�Da(z`$+".Sprites")=0��0,"Couldn't load sprites"
v$�Ea%4:$Ea%="TASK":Fa$="SLIPdial"
��Ga%4:!Ga%=0
�%ș262336,310,!Ea%,Fa$,Ga%�Ha%,Ia%
�(�Ha%<310��1,"Window Manager too old"
�Ja%=0:Ka%=0
�p_%=�La(z`$+".!windows")
��p_%>0�
�Ja%=��#p_%:Ka%=��#p_%
��
��Ma(p_%)
�#�q%&400,Na%&200,Oa%&100,Pa%&100
�ș262361,,_`$+".Templates"
�Qa%=�Ra("Info")
�Sa%=�Ra("Status")
Ta%=�Ra("txtwin")
Ua%=�Ra("config")
Va%=�Ra("message")
 Wa%=�Ra("input")
*Xa%=�Ra("yesno")
4ș262362
>4�Ya(Qa%,4,"0.33 (17-Feb-1995)"):�Za("$ver","33")
Haa$="nodev":ba%=�ca(aa$,-1)
R$�ba%=0��0,"Couldn't create icon"
\$M%=%10000001100000110000:da%=-20
fș66�ea%:fa%=ea%
pga%=fa%:ha%=fa%:�ia:�ja("")
z�
�ݤRa(A$)
��b%,i%,s%,ka%,la%,h%
�#ș262363,,-1,0,0,-1,A$,0�,b%,i%
�!s%=�ma(ka%,b%,"TBUF"):�la% i%
�$ș262363,,ka%,la%,la%+i%,-1,A$,0
��A$="message"�na%=ka%!72
�!�A$="Status"��oa(ka%,Ja%,Ka%)
�'ka%!64=Ca%:ș262337,,ka%�h%:�pa(s%)
�=h%
���oa(q%,x%,y%)
�
�w%,h%

�x%>0�
w%=q%!8-!q%:h%=q%!12-q%!4
!q%=x%:q%!8=x%+w%
$q%!4=y%:q%!12=y%+h%
.�
8�
VݤDa(A$)
`�s%,f%,n%,r%:r%=0
jș131080,17,A$�A%,,,,S%
t!ș131118,&108,Ca%�,,s%,n%,,f%
~�A%=1�S%<=(s%-f%)�
�#ș131118,&10B+(n%=0),Ca%,A$�;F%
��(F%�1)=0�r%=s%-f%-S%
��
�=r%
�ݤqa
�&�s%,f%:ș131118,&108,Ca%�,,s%,,,f%
�
=s%-f%
�ݤca(A$,n%)
��Z%,ra%,w%,h%
1ș46,&100+40,Ca%,A$�,,,w%,h%:�w%>200�h%>70�=0


�n%<0�
!Oa%=-1:ra%=0
(�sa%12:$sa%=A$:Oa%!24=sa%
2�
<ra%=ba%
F#�Z%=0�n%:�P`%(Z%)>0�ra%=P`%(Z%)
P
�:!Oa%=-3
d�Oa%!24 12:$(Oa%!24)=A$
n�
x7Oa%!4=0:Oa%!8=0:Oa%!12=w%*2:Oa%!16=100:Oa%!20=&3102
�Oa%!28=Ca%:Oa%!32=11
�ș262338,ra%,Oa%�ca%
�=ca%
���ia
��ta$
��l_%=��
�ta$="nodev"
��
��(�d(9,ua%,0,0)�8)=0�
�
ta$="dev"
��
.�aa$="online1"�ta$="online2"�ta$="online1"
�
�
"ha%=fa%
,�sa%>0�ta$<>aa$�
6�va(aa$,ta$)
@aa$=ta$
J"ș131118,&118,Ca%,ta$�,,wa%;F%
T�(F%�1)=0�
^+$sa%=ta$:!q%=-1:q%!4=ba%:q%!8=0:q%!12=0
hș262349,,q%
r�
|�
��
���va(A$,B$)
�	ȎB$�
�O�"nodev":�A$="online1"�A$="online2"�A$="dev"��xa(�$+": offline after "+r_$)
�E�"online1":�A$<>"online2"��xa(�$+": online to "+Ba$):ya%=fa%:��za
��"online2":�za
��
��
���za
�T%
T%=�(fa%-ya%)�100
r_$=�"0"+�(T%�3600),2)+":"
&"r_$+=�"0"+�((T%�60)�60),2)+":"
0r_$+=�"0"+�(T%�60),2)
:�_a(Sa%,8,r_$)
D�
b��xa(A$)
lp_%=�`a(x`$+".logfile")
v)�p_%<>0��#p_%=�#p_%:�#p_%,A$:�Ma(p_%)
��
�
��Ab(Bb%)
�ș66�fa%
��Bb%>=0�ea%-fa%<Bb%�
�ea%=fa%
��
�ș262369,M%,q%,fa%+Bb%�R%
��l_%�J%=�d(19,ua%,0,0)
�	ȎR%�
��1:�Cb(!q%)
�7�2:�Db(!q%,q%!4,q%!8,q%!12,q%!16,q%!20,q%!24,q%!28)
�3:�Eb(!q%)
%�6:�Fb(!q%,q%!4,q%!8,q%!12,q%!16)
�8:�Gb(!q%,q%!4,q%!24)
 �9:�Hb:�Ib(q%)
*�17,18:�Jb(q%)
4�
>	�R%=0
H�fa%>ha%+100��ia:�Kb:�Lb
R�fa%>ga%+500��Mb:�Nb
\�s`%>0�fa%>w`%+500��Ob("")
f�
p�
���Gb(w%,i%,k%)
��l%
��w%=Ta%�i%=Pb%�
�	Ȏk%�
�'�13:�l%=10�1�-1:I`$(l%)=I`$(l%-1):�
�*I`$(0)=�Qb(w%,i%):�Rb(I`$(0),0):I`%=-1
�'�_a(w%,i%,""):ș262354,w%,i%,,,-1,0
� �&18F:�I`%<10�I`$(I`%+1)>""�
�I`%+=1:�_a(w%,i%,I`$(I`%))
�!ș262354,w%,i%,,,-1,�I`$(I`%)
��
��&18E:�I`%>0�
�I`%-=1:�_a(w%,i%,I`$(I`%))
	!ș262354,w%,i%,,,-1,�I`$(I`%)
	�
	.I`%=-1:�_a(w%,i%,""):ș262354,w%,i%,,,-1,0
	$�
	.:ș262364,q%!24
	8�
	B�
	L�w%=Wa%�i%=1�k%=13�
	V"Wa$=�Qb(w%,i%):�Wa$=""�Wa$=" "
	`�
	jș262364,q%!24
	t�
	~�
	��
	���Jb(q%)
	��Z%,h%,i%,t%,f$,Sb%,a%,A$
	�Ȏq%!16�
	��0:�Tb:�
	�2�1:q%!16=2:q%!36=-1:$(q%+44)="<Wimp$Scrap>"+�0
	�"q%!12=q%!8:ș262375,17,q%,q%!4
	�/�3:i%=q%!24:h%=q%!20:t%=q%!40:f$=�Ub(q%+44)
	�q%!16=4:ș262375,17,q%,q%!4
	�	Ȏh%�
	��Ua%:�t%=&FFF�
�i%=4�_a(Ua%,4,f$)

�
�M_(f$)
�
(�Sa%:�t%=&FFF��M_(f$)
2�-1,-2:�t%=&FFF�i%=ba%�
<�M_(f$)
F�
P
�Z%=0�N`%
Z(�i%=P`%(Z%)�O`$(Z%)>""��O`(Z%,f$,t%)
d�
n�
x�
�Z%=�Vb("<Wimp$Scrap>")
��11:�l_%�q%!4<>Ia%��Wb
��12:�q%!4<>Ia%�
�,�Y_("Device claim failed",�Ub(q%+28),"")
��Xb(Sa%):l_%=�
��
��&502:A$=�Yb(q%!32,q%!36)
��A$>""�
�;q%!16=&503:q%!12=q%!8:$(q%+20)=A$:q%?(20+�A$)=0:!q%=256
�ș262375,17,q%,q%!4
��
��&400C2:�j_%<>0�
��V`%(j_%)=0�
1V`%(j_%)=q%!4:�Zb(�ab("TaskStart2",U`$(j_%)))
�
	j_%=0
"�
,�&400C3
6
�l%=0�S`%
@�V`%(l%)=q%!4�
J(V`%(l%)=0:�T`$(l%)>""��Rb(T`$(l%),3)
T�
^�
h�bb
r�&808C1
|Sb%=0:cb%=q%!20-1
�%ȕa`%(Sb%)<>q%!4�Sb%<W`%:Sb%+=1:�
��b`%(Sb%)=0�
�#�Z%=0�cb%�4:a_%!Z%=q%!(24+Z%):�
��db(Sb%,a_%,cb%)
��
�%�Z%=0�cb%:�#b`%(Sb%),q%!(24+Z%):�
��
��&808C2
�!�q%!20>=Ia%�q%!20<=(Ia%+W`%)�
�<a`%(q%!20-Ia%)=q%!4:�Zb("Task started: "+Y`$(q%!20-Ia%))
��
��&808C3
�+Sb%=0:ȕq%!4<>a`%(Sb%)�Sb%<W`%:Sb%+=1:�
�q%!4=a`%(Sb%)�
 �Zb(�ab("TaskEnd",Y`$(Sb%)))
�g`%(Sb%)=0�
&a`%(Sb%)=0:�Eb(d`%(Sb%))
0�
:1a`%(Sb%)=-1:$h`%(Sb%)=Y`$(Sb%)+�Q_("TaskFin")
D�eb(d`%(Sb%))
N�
X(Y`$(Sb%)="":�Ma(b`%(Sb%)):b`%(Sb%)=0
b �X`$(Sb%)>""��Rb(X`$(Sb%),4)
l�
v�
��
�ݤYb(w%,i%)
�
�A$,l%
�A$="Hgeneric":Ȏw%�
��Ta%:A$="Htext"
��Sa%:A$="Hstatus":Ȏi%�
��1,2:A$="Haction"
��3:A$="Hip"
��4:A$="Hstop"
��5:A$="Hpause"
��6,7:A$="Hmenus"
��8:A$="Htime"

�10:A$="Hmodem"

�

$�Va%:A$="Hmess":�h_%�A$="Hmess2"

 �Wa%:A$="Henter"

*�Xa%:A$="Hyesno"

4�Qa%:A$="Hinfo"

>�Ua%:A$="Hconfig"

H&:�l%=0�W`%:�w%=d`%(l%)�A$="Htask"

R�

\�

f=�Q_(A$)

z��Tb

��l%

��l_%<>0�

�J%=�d(8,ua%,0,0)

�J%=�d(18,ua%,0,0)

��

��fb("")

��Ma(p_%):�Ma(q_%)

��l%=0�W`%:�Ma(b`%(l%)):�

��l%=0�m`%:�Ma(n`%(l%)):�

��gb

��

�
��Ma(�C%)
�C%<>0�ș131085,0,C%:C%=0
�
$��Hb
.ș262351,,Pa%
8*hb%=!Pa%:ib%=Pa%!4:b%=Pa%!8:jb%=Pa%!12
Bla%=Pa%!16:kb%=Pa%!20
L�
`��Fb(hb%,ib%,b%,w%,i%)
j�Z%
t	Ȏb%�
~�2
�	Ȏw%�
��-2:�i%=ba%�
�
�lb(�)
��
�
�Z%=0�N`%
�H�i%=P`%(Z%)�Q`$(Z%,0)>""��mb(102,�nb(Q`$(Z%,0),Q`$(Z%,1)),R`$(Z%),�)
��
��
��Ta%:ș6,121,(1�&80)�,Z%
�
�Z%=0�
�T�mb(101,"Alarm list,Menu list,Var list,Task list,|Script list,Quit","Control",0)
��
<�mb(101,"DbgLev 0,DbgLev 1,DbgLev 2,DbgLev 3","Debug",0)

�
�Sa%
	Ȏi%�
(;�7:�`_$(0)>""��mb(102,�nb(`_$(0),`_$(1)),"User menu",�)
2:�lb(0)
<�
F:�lb(0)
P�
Z�1,4
d	Ȏw%�
n�Sa%
x	Ȏi%�
��5
�
�h_%�
��Y_("",�Q_("PauseP"),"")
�h_%=�:�Rb("pause",0)
��
��ob
��
��4
�%i_%=�:�Y_("",�Q_("StopP"),""):�i_
�;�6:�`_$(0)>""��mb(102,�nb(`_$(0),`_$(1)),"User menu",�)
�=�11:�Qb(Sa%,i%)="Redial"�e_%=�:�Y_("",�Q_("RedialP"),"")
��
��Ua%
�i%=6��pb:�Eb(Ua%)
�Xa%
�i%=0�qb%=2
"�i%=1�qb%=1
,�Ta%
6%ș262354,w%,Pb%,,,-1,��Qb(w%,Pb%)
@�-2
J�i%=ba%�
T�b%=4��Xb(Sa%)��Xb(Ta%)
^�
h
�Z%=0�N`%
r)�i%=P`%(Z%)�P`$(Z%)>""��Rb(P`$(Z%),6)
|�
��
��
��
��
���lb(i%)
�>�mb(101,">Info,Choices...,|Control...,Quit","SLIPdial",i%)
��
�
��rb(Va$)
�"sb%=0:u_%()=0:k`$()="":k`%()=�
��tb$>""��Rb(tb$,0):tb$="":�
�-�ub(""""+�vb("Escript",�O_%,Va$)+""""):�7
�Y_("",�Q_("StopE"),"")
O_%=0:X_%=�:�Z_
�
0��Wa(A$)
:�v$,p$:p$="Input:"
D�B$=�wb(A$):Wa$=""
N�B$,1)="/"�
XC$=�xb(B$):Ȏ�B$,2)�
b�"pr":p$=�C$,40)
l�
v�
�%v$=B$:�_a(Wa%,1,""):�_a(Wa%,0,p$)
�"�Xb(Wa%):ș262354,Wa%,1,,,-1,0
� ��Ab(50):�Wa$>"":p$="Input:"
��Wa$=" "�Wa$=""
��Za(v$,Wa$)
��
�
�A$=""
��Eb(Wa%)
��
���ub(A$)
�
�w%,n%,t$
�t$=�Q_("Message"):v`%=�

w%=0:n%=0
�B$=�wb(A$)
�B$,1)="/"�
 C$=�xb(B$):Ȏ�B$,2)�
*�"cl":�Eb(Va%)
4�"wa":w%=�
>�"ti":t$=C$
H�"ca":s`$=C$:t`$=""
R(u`%=r`%:s`%=1:w`%=fa%:�n%=0�yb$()=""
\�"ce":v`%=�
f�"en":t`$=C$
p�"ma":u`%=�C$
z�"ad":n%+=1
��"na","id"
��
��
��B$>""�n%=0�yb$()=""
��B$>""��Ob(B$):n%+=1
��
��B$=""�n%>r`%
�$na%=t$:�eb(Va%)
�
�n%>0�
��Ob("")
��
��w%��Rb("pause",0)
��
��Ob(A$)
�l%,w%,t$:l%=-1:w%=0
$$�l%+=1:t$=yb$(l%):�t$>w%�w%=�t$
.�t$=""�l%=r`%:w`%=fa%
8�A$>""�
B)�l%=r`%��l%=1�r`%:yb$(l%-1)=yb$(l%):�
Lyb$(l%)=A$
V�
`�l%>0��zb(l%,w%)
j�
t�
���zb(y%,x%)
��o%
�2!a_%=0:a_%!4=-y%*32-32:a_%!8=x%*16+10:a_%!12=0
�ș262359,Va%,a_%
�+!q%=Va%:ș262347,,q%:o%=(q%!32)�(1<<16)
�+q%!12=q%!4+x%*16+10:q%!16=q%!8+y%*32+32
�)q%!20=0:q%!24=0:q%!28=-1:ș262341,,q%
�!�o%=0��_b(Va%,0,150)��Xb(Va%)
�'!q%=Va%:ș262347,,q%:`b%=q%!12-q%!4
��Ac(0,-y%*32-32,`b%,0)
��
��Bc(A$)

�s`%=1��A$,s`$)>0�s`%=2
�s`%=2�
u`%-=1:�Ob(A$)
(,�u`%<1�(t`$>""��A$,t`$)>0)�s`%=0:�Ob("")
2�
<�
P��Z_
Z"h_%=�:�_a(Sa%,5,�Q_("Resume"))
d�Y_("",�Q_("Paused"),"")
n��Ab(30):�h_%=�
x�
���ob
�-h_%=�:i_%=�:X_%=�:�_a(Sa%,5,�Q_("Pause"))
��Y_(""," ","")
��
���i_
�(sb%=0:u_%()=0:k`$()="":k`%()=�:s`%=0
�>�O_%>0�i_$<>""��Rb(i_$,0):i_$="":��Rb("pause",0):O_%=0:�Cc
��
���mb(jb%,Dc$,Ec$,I%)
��i%,Fc$,Gc%,Hc%

�Dc$=""��
	Gc%=0
Ic%=jb%
"Hc%=Na%
,i%=0
6
Hc%!20=44
@$Hc%=Ec$
J(Hc%?12=7:Hc%?13=2:Hc%?14=&7:Hc%?15=0
THc%!16=230-24:Hc%!24=0
^Hc%+=28
h�
r'Fc$=�Jc(Dc$,",",i%):�Kc(Fc$):Gc%+=1
|�Fc$=""
�Hc%!-24=(Hc%!-24)�&80
�#�I%<>0�Y%=120+(Gc%-1)*44�Y%=ib%
�ș262356,,Na%,hb%-64,Y%
��
�
��Kc(Lc$)
��Mc$
��Lc$>""�
�
!Hc%=0
�#�Lc$,1)="|"�Lc$=�Lc$,2):!Hc%=2
�Mc$=�Lc$,1):Hc%!4=-1
��Mc$=">"�Hc%!4=Qa%
�Hc%!8=&07000021
4�Mc$=">"�Mc$="<"�$(Hc%+12)=�Lc$,2)�$(Hc%+12)=Lc$
Hc%+=24
�
&�
:ݤJc(Dc$,Nc$,�i%)
D�Oc%
N!Oc%=i%+1:i%=�Dc$+Nc$,Nc$,Oc%)
X=�Dc$,Oc%,i%-Oc%)
l
��Ib(Qc%)
v�A$
�(�l%:ș262357,,Na%,Qc%,�20," ")�,,,A$
�	ȎA$�
��"Choices...":�Xb(Ua%)
��"Control...":�Xb(Ta%)
��"Quit":�Tb:�
��"Alarm list":�Rc
��"Menu list":�Sc
��"Task list":�Tc
��"Var list":�Uc
��"Script list":�Vc("")
��"DbgLev 0":n_%=0
��"DbgLev 1":n_%=1
��"DbgLev 2":n_%=2
�"DbgLev 3":n_%=3

:�__%>0�

�l%=1�__%
 �A$=__$(l%,0)�
*�_a(Sa%,7,__$(l%,0))
4�Rb(__$(l%,1),8)
>�
H�
R�
\�
f�
z��F_
�4!Pa%=�:$(Pa%+4)=�$+" (internal code "+Þ+")."+�0
�ș262367,Pa%,1,Fa$:�Tb
��
���Xb(h%)
�!q%=h%:ș262347,,q%
�q%!28=-1:ș262341,,q%
�-�h%=Ta%�ș262354,h%,Pb%,,,-1,��Qb(h%,Pb%)
��
���_b(h%,Wc%,Xc%)
��x%,y%,Yc%,Zc%,ac%,bc%
��Aa%=0�h%=Sa%�
�Xb(h%)
�
#ș53,-1,4�,,ac%:ș53,-1,11�,,x%
$#ș53,-1,5�,,bc%:ș53,-1,12�,,y%
.!q%=h%:ș262347,,q%
87x%=x%<<ac%:y%=y%<<bc%:Yc%=q%!12-q%!4:Zc%=q%!16-q%!8
BIq%!4=(x%-Yc%)�2-Wc%:q%!12=q%!4+Yc%:q%!8=(y%-Zc%)�2-Xc%:q%!16=q%!8+Zc%
L)q%!20=0:q%!24=0:q%!28=-1:ș262341,,q%
V�
`�
t��eb(h%)
~!q%=h%:ș262368,,q%
�)ș262353,-1,q%!4,q%!16-44,q%!12,q%!16
��
�ݤQb(H%,I%)
�!q%=H%:q%!4=I%:ș262350,,q%
�=�Ub(q%!28)
���Ya(H%,I%,A$)
�#!q%=H%:q%!4=I%:ș393422,,q%�;F%
�'�cc(F%)�q%!28>&8800�$(q%!28)=A$+�0
��
��_a(H%,I%,A$)

/�Ya(H%,I%,A$):!q%=H%:q%!4=I%:q%!8=0:q%!12=0
ș262349,,q%
�
2��dc(H%,I%,S%)
<=S%=�(S%=0):!q%=H%:q%!4=I%:q%!8=((1)<<21)*S%:q%!12=(1<<21)
Fș262349,,q%
P�
dݤec(H%,I%)
n!q%=H%:q%!4=I%:ș262350,,q%
x$=�(((q%!24)�(1<<21))�2097152<>0)
���fc(H%,I%,S%)
�3!q%=H%:q%!4=I%:q%!8=((1)<<22)*�S%:q%!12=(1<<22)
�ș262349,,q%
��
���Y_(a$,b$,c$)
�7�a$>""��_a(Sa%,1,�a$,34)):�a$>1��Zb("Action: "+a$)
�7�b$>""��_a(Sa%,2,�b$,34)):�b$>1��Zb("Status: "+b$)
�7�c$>""��_a(Sa%,3,�c$,34)):�c$>1��Zb("IP add: "+c$)
��
�)��Db(jb%,gc%,hc%,ic%,jc%,kc%,lc%,mc%)
�jb%>-1�
q%!0=jb%:q%!28=mc%
)q%!4=gc%:q%!8=hc%:q%!12=ic%:q%!16=jc%
"q%!20=kc%:q%!24=lc%
,ș262341,,q%
6�
@�
T��Eb(h%)
^�L%
h	Ȏh%�
r�Va%:�h_%��ob
|�Wa%:Wa$=" "
�
�
�L%=0�W`%
��h%=d`%(L%)�a`%(L%)>0�
�!�7:�Xa(�Q_("TaskKill"),3)=2�
��nc(Y`$(L%),&808C4)
��
�h%=0
��
�
L%=W`%
��
��
��
��h%>0�!q%=h%:ș262342,,q%
�
ݤoc(A$)
&�d%,r%,qc%:d%=60:r%=0:qc%=1
0�B$=�wb(A$)
:�B$,1)="/"�
DC$=�xb(B$):Ȏ�B$,3)�
N�"del":d%=�C$:�d%<5�d%=5
X'�"def":C$=�rc(C$):�C$,1)="y"�qc%=2
b�
l�
vr%=�Xa(B$,d%)
��
�
�A$=""
��r%=0�r%=qc%
�=-(r%=2)
�ݤXa(A$,sc%)
�/�tc%:tc%=fa%:sc%=sc%*100:�_a(Xa%,2,�A$,57))
�!�_b(Xa%,0,0):�sc%=0�sc%=60000
�&qb%=0:�:�Ab(50):�qb%>0�fa%-tc%>sc%
��Eb(Xa%)
=qb%
ݤy`(A$)
 
�L%,F%
*#ș131107,A$,a_%,256,0,3�,,L%;F%
4�(F%�1)�L%>256�:=""
>a_%?L%=13:=$a_%
R��Qa(q%)
\;gc%=!q%:hc%=q%!4:ic%=q%!8:jc%=q%!12:kc%=q%!16:lc%=q%!20
f/uc%=gc%-kc%:vc%=jc%-lc%:wc%=q%!28:xc%=q%!36
p�
���Cb(h%)
��Sb%:!q%=h%:Ȏh%�
��Ta%
�ș262344,,q%�yc%
��zc(yc%)
��Va%
�ș262344,,q%�yc%
��_c(yc%)
�
��Sb%=0�W`%:�h%=d`%(Sb%)�
�ș262344,,q%�yc%
��`c(Sb%,yc%)
��
�
�
�
.��K_
8	Ad%=0
B*Bd%=1:�Cd$(J_%),Dd% J_%,yb$(r`%):`b%=0
LCd$()=�I_%�2," "):Ed%=40
V4!a_%=0:a_%!4=-J_%*32-Ed%-8:a_%!8=I_%*16:a_%!12=0
`ș262359,Ta%,a_%
j+�i%=0�1:!a_%=Ta%:a_%!4=i%:ș262350,,a_%
t7a_%!12=a_%!12-J_%*32:a_%!20=a_%!20-J_%*32:a_%!4=Ta%
~ !q%=Ta%:q%!4=i%:ș262340,,q%
�ș262338,,a_%+4�Pb%:�
�Fd%=0:Gd%=0:Hd$="":c`$=""
�'�Y_("Starting SLIPdial","Idle"," ")
� �Id%=0��ec(Ua%,2)=0��Xb(Ta%)
��
���Jd(Sb%,Kd%,T$)
��Ld%:Ld%=(Sb%�4)*40
��d`%(Sb%)=0�
�ș262361,,_`$+".Templates"
�.ș262363,,q%,Md%,Nd%+Od%,-1,"task",0�,,Md%
� h`%(Sb%)=q%!72:q%!44=-i`%*32
;!q%=!q%+Ld%:q%!8=q%!8+Ld%:q%!4=q%!4-Ld%:q%!12=q%!12-Ld%

ș262337,,q%�d`%(Sb%)
ș262362

ȎSb%�
(�0:�Pd$(i`%)
2�1:�Qd$(i`%)
<�2:�Rd$(i`%)
F�3:�Sd$(i`%)
P�4:�Td$(i`%)
Z�5:�Ud$(i`%)
d�6:�Vd$(i`%)
n:�rb(�Q_("Etask1")):�
x�
��
�
ȎSb%�
��0:Pd$()=""
��1:Qd$()=""
��2:Rd$()=""
��3:Sd$()=""
��4:Td$()=""
��5:Ud$()=""
��6:Vd$()=""
��
��
�A$h`%(Sb%)=�ab("TaskRun",T$):c`$(Sb%)="":e`%(Sb%)=0:f`%(Sb%)=0
��Kd%��Xb(d`%(Sb%))
�
��Wd(Xd%,Yd%,Zd%,ad%)
"1!q%=Ta%:q%!4=Xd%:q%!8=Yd%:q%!12=Zd%:q%!16=ad%
,ș262345,,q%�yc%
6�zc(yc%)
@�
T��Ac(Xd%,Yd%,Zd%,ad%)
^1!q%=Va%:q%!4=Xd%:q%!8=Yd%:q%!12=Zd%:q%!16=ad%
hș262345,,q%�yc%
r�_c(yc%)
|�
���bd(Sb%,Xd%,Yd%,Zd%,ad%)
�6!q%=d`%(Sb%):q%!4=Xd%:q%!8=Yd%:q%!12=Zd%:q%!16=ad%
�ș262345,,q%�yc%
��`c(Sb%,yc%)
��
�
��_c(yc%)
�	ȕyc%
��Qa(q%+4):�
�-cd%=�(xc%-vc%+16)�32:dd%=�(wc%-vc%+16)�32
�%�dd%>r`%�dd%=r`%:�cd%>dd%�cd%=dd%
�ș262374,7:�L%=cd%�dd%
 .�uc%+4-v`%*(`b%�2-�yb$(L%)*8),vc%-L%*32-16
 �yb$(L%):�
 ș262346,,q%�yc%
 &�
 0�
 D��`c(Sb%,yc%)
 N�L%,y%,cd%,dd%:ȕyc%
 X�Qa(q%+4):�
 b'cd%=�(xc%-vc%)�32:dd%=�(wc%-vc%)�32
 l%�dd%>i`%�dd%=i`%:�cd%>dd%�cd%=dd%
 vș262374,7:�L%=cd%�dd%
 �y%=(L%+f`%(Sb%))�i`%
 ��uc%+4,vc%-L%*32-4
 �
ȎSb%�
 ��0:�Pd$(y%)
 ��1:�Qd$(y%)
 ��2:�Rd$(y%)
 ��3:�Sd$(y%)
 ��4:�Td$(y%)
 ��5:�Ud$(y%)
 ��6:�Vd$(y%)
 ��
 ��
 �ș262346,,q%�yc%
!�
!�
! 
��zc(yc%)
!*�L%,y%,cd%,dd%:ȕyc%
!4�Qa(q%+4):�
!>'cd%=�(xc%-vc%)�32:dd%=�(wc%-vc%)�32
!H%�dd%>J_%�dd%=J_%:�cd%>dd%�cd%=dd%
!R�L%=cd%�dd%:y%=(L%+Ad%)�J_%
!\-�uc%,vc%-L%*32:ș262374,Dd%?y%:�Cd$(y%):�
!fș262346,,q%�yc%
!p�
!z�
!���ed(A$)
!��Hd$>""��fd
!�
�gd(A$,7)
!��
!���P_(A$)
!��gd(A$,11)
!��
!���fd
!��Hd$>""�
!� �(n_%�2)<>0�o_%<>0��#o_%,Hd$
"�s`%>0��Bc(Hd$)
"�gd(Hd$,5):Hd$=""
"�
"$�
"8ݤhd:�l_%=0�=-1
"BZ%=�d(1,ua%,0,0)
"L�Z%>0�(n_%�2)>0�s`%>0�
"V�Z%>31�Z%<128�Hd$+=�Z%
"`�Z%=13�Z%=10��Hd$>=I_%��fd
"j�
"t=Z%
"���db(Sb%,id%,jd%)
"��l%
"��l%=0�jd%:C%=id%?l%
"��C%>31�C%<128�c`$(Sb%)+=�C%
"��C%=13�C%=10��c`$(Sb%)>78�
"��kd(Sb%,c`$(Sb%))
"�$�H`%=Sb%�H`$(0)>""��H`(c`$(Sb%))
"�c`$(Sb%)=""
"��
"��
"�$�H`%=Sb%�H`$(0)>""��H`(c`$(Sb%))
"��
#
��kd(Sb%,A$)
#
�t%,B$
#-�(n_%�4)<>0�o_%<>0��#o_%,"TW"+�Sb%+">"+A$
#(ȕA$>""
#2t%=(e`%(Sb%)+f`%(Sb%))�i`%
#<B$=�A$,79):A$=�A$,79)
#F
ȎSb%�
#P�0:Pd$(t%)=B$
#Z�1:Qd$(t%)=B$
#d�2:Rd$(t%)=B$
#n�3:Sd$(t%)=B$
#x�4:Td$(t%)=B$
#��5:Ud$(t%)=B$
#��6:Vd$(t%)=B$
#��
#��e`%(Sb%)<i`%�
#�0!q%=d`%(Sb%):ș262347,,q%:f%=(q%!32)�(1<<16)
#�R�e`%(Sb%)>=�(q%!8-q%!16)�32�q%!24=-(e`%(Sb%)*32-�(q%!8-q%!16))-32:ș262341,,q%
#�2�bd(Sb%,0,-e`%(Sb%)*32-32,1280,-e`%(Sb%)*32+4)
#�e`%(Sb%)+=1
#��
#�f`%(Sb%)=(f`%(Sb%)+1)�i`%
#�4ș262379,d`%(Sb%),0,-32*i`%,1280,0,0,-32*(i`%-1)
#�)�bd(Sb%,0,-32*i`%,1280,-32*(i`%-1)+4)
#��
$�
$�
$"��gd(A$,ld%)
$,�t%:�Ab(da%)
$6ȕA$>""
$@t%=(Bd%+Ad%)�J_%
$J Cd$(t%)=�A$,I_%):A$=�A$,I_%)
$TDd%?t%=ld%:�Bd%<J_%�
$^+!q%=Ta%:ș262347,,q%:f%=(q%!32)�(1<<16)
$hN�f%<>0�Bd%>=�(q%!8-q%!16)�32�q%!24=-(Bd%*32-�(q%!8-q%!16))-32:ș262341,,q%
$r$�Wd(0,-Bd%*32-32,1280,-Bd%*32+4)
$|
Bd%+=1
$��
$�Ad%=(Ad%+1)�J_%
$�/ș262379,Ta%,0,-32*J_%,1280,0,0,-32*(J_%-1)
$�%�Wd(0,-32*J_%,1280,-32*(J_%-1)+4)
$��
$��
$��
$���md
$�Cd$()="":Bd%=0:Ad%=0:Hd$=""
$�!�Wd(0,-J_%*32-Ed%-8,16*I_%,0)
$��
%��Zb(m$)
%
�(n_%�1)�
%�ed(m$)
%&�o_%<>0��#o_%,m$
%0�
%:�
%N��fb(A$)
%XB$=�wb(A$)
%b�B$=""�
%l�fd:�Ma(o_%)
%v�
%�B$=�nd(B$)
%�ș131085,&CF,B$�o_%;F%
%�"�(F%�1)�ș131085,&8F,B$�o_%;F%
%�&�(F%�1)�o_%=0:�rb(�Q_("Etrace")):�
%�ș131080,18,B$,&FFF
%��o_%<>0��#o_%=�#o_%
%��
%��
%���od
%��pd%>-1�
%�2!q%=256:q%!12=0:q%!16=11:q%!20=2:q%!24=pd%+ua%
%�$(q%+28)="SLIPdial"+�0
&ș262375,18,q%,0
&l_%=�:�L%=1�5:�Ab(0):�
&�
& �
&4��Wb
&>�pd%>-1�
&H�q%!20=2�q%!24=pd%+ua%�
&R!q%=256:q%!12=q%!8:q%!16=12
&\$(q%+28)=�Q_("DevMine")+�0
&fș262375,17,q%,q%!4
&p�
&z�
&��
&�ݤqd(A$)
&�A%=�A$," "):�A%>=0�
&�b_$=�A$,A%-1)
&�ua%=�(�A$,A%+1))
&��
&�b_$="internal"
&�	ua%=0
&��
&��Za("port",b_$+" "+�ua%)
&�"�Y_(�ab("DevLoad",b_$)," ","")
';ș131080,16,"SerialDev:modules."+b_$+".driver",b_,0�;F%
'#�(F%�1)��rb(�ab("Edev",b_$)):=0
'�Y_("",�Q_("DevOK"),"")
'$pd%=b_!&C8
'.=ua%
'B��rd(B$)
'Lsd%=�B$:�sd%=0�sd%=19200
'V�Za("speed",�sd%)
'`�
't��Rb(A$,t%)
'��Zb(�ab("Qadd",A$))
'�L%=0:ȕk`$(L%)>""�L%<j`%
'�L%+=1:�
'�k`$(L%)=A$:l`%(L%)=t%:�
'�ݤS_
'� �t%,l%,A$,n%:l%=0:A$="":n%=0
'�0��k`$(l%)>""�k`%(l`%(l%))=��A$=k`$(l%):n%=l%
'�"l%+=1:�A$>""�k`$(l%)=""�l%=j`%
'��A$>""�
(6�l%=n%�j`%-1:k`$(l%)=k`$(l%+1):l`%(l%)=l`%(l%+1):�
(
k`$(j`%)=""
(�
(=A$
(2ݤR_
(<�t%,l%,r%:l%=0:r%=0
(F$��k`$(l%)>""�k`%(l`%(l%))=��r%=�
(P"l%+=1:�r%<>0�k`$(l%)=""�l%=j`%
(Z=r%
(n
ݤV_(td$)
(xȕtd$>""�i_%=0:A$=�ud(td$)
(��Ab(da%)
(��Zb(�O_%+": "+A$)
(� B$=�wb(A$):B$=�rc(B$):vd$=B$
(��B$,1)<>":"�
(�	ȎB$�
(��"if":U_%=�wd(A$,td$)
(��"ask":U_%=�oc(A$)
(��"case":U_%=�w_(A$)
(��"when":U_%=�xd(A$,td$)
(��"otherwise":�yd(td$)
(��"endcase":U_%=�zd
(��"claim":U_%=�_d(A$)
(��"debug":n_%=�n_(A$)
)�"driver":U_%=�N_(A$)
)�"source":U_%=�`d(A$)
)�"library":U_%=�Ae(A$)
)"�"chain":�Be(A$)
),�"port":ua%=�qd(A$)
)6�"speed":�rd(A$)
)@�"release":�Cc
)J�"init":U_%=�Ce(A$)
)T�"reinit":�De
)^�"dial":U_%=�Ee(A$)
)h�"wait":U_%=�sc(A$)
)r�"trace":�fb(A$)
)|�"send":�Fe(A$)
)��"ipget":U_%=�Ge(A$)
)��"make":�He(A$)
)��"task":U_%=�Ia(A$)
)��"taskwindow":U_%=�Ie(A$)
)��"sleep","pause":�h_(�(A$))
)��"alarm":�K`(A$)
)��"set":�Je(A$)
)��"unset":�Ke(A$)
)�7�"?eq","?ne","?lt","?le","?gt","?ge":U_%=�Le(B$,A$)
)��"string":U_%=�Me(A$)
)��"eval":U_%=�Ne(A$)
)��"label"
)��"goto":�Oe(A$,O_%)
*�"call":�Pe(A$,O_%)
*�"return":U_%=�U_(A$,O_%)
*�"echo":�Qe(A$)
*&�"?file":U_%=�L_(A$)
*0�"?line":U_%=�Re(A$)
*:�"?free":U_%=�Se(A$)
*D�"retry":�Te(A$)
*N�"open":U_%=�Ue(A$)
*X�"close":U_%=�Ve(A$)
*b�"read":U_%=�We(A$)
*l�"write":U_%=�Xe(A$)
*v�"ptr":U_%=�Fd(A$)
*��"move":U_%=�Ye(A$)
*��"copy":U_%=�Ze(A$)
*��"append":U_%=�ae(A$)
*��"delete":U_%=�be(A$)
*��"newsrate":U_%=�ce(A$)
*��"?task":U_%=�de(A$)
*�#�"dopen","dataopen":U_%=�ee(A$)
*�&�"stamp":�Zb("("+�(��100)+") "+A$)
*��"error":�rb(A$)
*��"message":�ub(A$)
*��"menu":�fe(A$)
*��"list":�ge(A$)
*��"icon":U_%=�he(A$)
+ �"analyse","analyze":�ie(A$)
+�"help":�je(A$)
+�"event":�ke(A$)
+ �"stop":�i_
+*�"quit":�le(�Q_("Quit"))
+4�"exit":�me
+>�"input":�Wa(A$)
+H�"oscli":U_%=�ne(A$)
+R:�Zb(�Q_("BadCom"))
+\�
+f�
+p1�U_%<0��Za("$status",U_$)��Za("$status",�U_%)
+z�
+�=U_%
+���Qe(A$)
+��B$,s%:s%=0
+��
+�B$=�wb(A$)
+��B$,1)="/"�
+�
Ȏ�B$,3)�
+��"/st":s%=�
+��"/lo":s%=0
+��"/da":A$=""""+�$+""" "+A$
+��
+��
,�s%�
,�Y_("",B$,"")
,�
,$�ed(B$)
,.�(n_%�3)<>0�o_%<>0��#o_%,B$
,8�
,B�
,L
�A$=""
,V�
,jݤ_d(A$)
,t�J%,t%,d%,oe%
,~�Y_(�Q_("DevClaim")," ","")
,�t%=��wb(A$):�t%<0�t%=pe%
,�d%=��wb(A$):�d%<2�d%=qe%
,�	oe%=1
,��
,��od
,��l_%<>0�
,�J%=�d(17,ua%,0,0)
,�'J%=�d(13,ua%,sd%,0):�J%<>sd%�sd%=J%
,�'J%=�d(14,ua%,sd%,0):�J%<>sd%�sd%=J%
,�J%=�d(15,ua%,0,0)
,�J%=�d(16,ua%,1,0)
,�J%=�d(6,ua%,0,0)
-J%=�d(7,ua%,0,0)
-
�
-�h_(d%):�t%>0�oe%+=1
-�
-(�l_%<>0�oe%>t%�i_%<>0
-2=l_%
-F��Cc
-P�J%
-Z	�l_%�
-d(�Y_(�Q_("DevRel"),�Q_("DevDrop"),"")
-nJ%=�d(8,ua%,0,0)
-xJ%=�d(18,ua%,0,0)
-�	l_%=�
-��
-��
-�ݤCe(A$)
-��B$,h%:h%=0
-��re<>0�
-��Y_(�Q_("DevInit"),"","")
-��A$=""�A$=�se("$init")
-��
-�B$=�wb(A$)
-� �Y_("",�ab("Sending",B$),"")
-�#�Fe(B$):h%=�te("OK","","","",5)
.�A$=""�h%=0
.�
.=h%
.,��De
.6�J%
.@'J%=�d(13,ua%,sd%,0):�J%<>sd%�sd%=J%
.J'J%=�d(14,ua%,sd%,0):�J%<>sd%�sd%=J%
.TJ%=�d(15,ua%,0,0)
.^J%=�d(16,ua%,1,0)
.hJ%=�d(8,ua%,3,0)
.r�
.���Te(A$)
.��B$
.�B$=�wb(A$)
.��B$>0�pe%=�B$
.��A$>2�qe%=�A$
.��
.���ja(A$)
.��_a(Sa%,11,A$)
.��fc(Sa%,11,(A$=""))
.��
.�
ݤEe(ue$)
/$�ve%,r%,d%,we%,xe%,ye%,ze$,B$,C$
/ve%=0:ze$="ATDT"
/&r%=pe%:d%=qe%:we%=d%:xe%=d%:ye%=d%
/&�ja(�Q_("Redial"))
/0�
/:B$=�wb(ue$)
/D�B$,1)="/"�
/NC$=�xb(B$):Ȏ�B$,3)�
/X�"ret":r%=�C$:�r%<1�r%=1
/b�"del":d%=�C$:�d%<2�d%=2
/lwe%=d%:xe%=d%:ye%=d%
/v�"noc":xe%=�C$
/��"nod":we%=�C$
/��"not","pul":ze$="ATDP"
/��"ton","nop":ze$="ATDT"
/��"bus":ye%=�C$
/��
/��
/�_e%=1:ve%=0:Ba$=B$
/��
/�8�Y_(�ab("Dialling",Ba$),�vb("Dattempt",�_e%,�r%),"")
/��Fe(ze$+Ba$):_e%+=1
/�HU_%=�te(�se("$conn"),�se("$busy"),�se("$nocarr"),�se("$nodial"),120)
/��i_%=0�
/��e_%=��
0+A%=�re:ȕ�d(5,ua%,0,0)>0:J%=�hd:�:e_%=�
0�
0
ȎU_%�
0 '�1:�Y_("",�Q_("Dconnect"),""):ve%=1
0*'�2:�Y_("",�Q_("Dbusy"),""):�h_(ye%)
04%�3:�Y_("",�Q_("Dnc"),""):�h_(xe%)
0>%�4:�Y_("",�Q_("Dnd"),""):�h_(we%)
0H%�2,3,4:ȕ�d(5,ua%,0,0)>0:J%=�hd:�
0R"�Y_("",�Q_("Dnr"),""):�h_(d%)
0\�
0f�
0p�
0z
A%=�re
0��
0��_e%>r%�i_%<>0�ve%>0�l_%=0
0�0�ve%=0�ue$>""��Y_(�Q_("Dnext"),"",""):�h_(1)
0��
0��ue$=""�i_%<>0�ve%>0�l_%=0
0��ja("")
0�=ve%
0�ݤsc(A$)
0��l%,m%,d%,s%,U_%,B$,C$,`e%
0�d%=600:H`%=-1:U_%=0
0��B$=�wb(A$):`e%=�
0��B$,1)="/"�
1C$=�xb(B$):`e%=�
1
Ȏ�B$,2)�
1�"ev":U_%=�Af
1$�"de","del":d%=�C$
1.2�"na","id":�l%=0�W`%:�C$=Y`$(l%)�H`%=l%:l%=W`%
18$�:�H`%<0��rb(�Q_("Ebadtask")):=0
1B:�rb(�Q_("Ebadwait")):=0
1L�
1V�
1`
�`e%=�
1j�U_%=0�
1t#�d%=0��rb(�ab("Ebaddel",A$)):=0
1~G`$()="":l%=0:C$="":�
1�*G`$(l%)=B$:C$+=B$+"/":l%+=1:B$=�wb(A$)
1��B$=""�l%=4:C$=�C$,�C$-1)
1�-�Y_(�ab("Wait",C$),�ab("Timeout",�d%),"")
1��H`%<0�
1�+U_%=�te(G`$(0),G`$(1),G`$(2),G`$(3),d%)
1��
1�+U_%=�Bf(G`$(0),G`$(1),G`$(2),G`$(3),d%)
1��
1�K�U_%>0��Y_("",�ab("Received",G`$(U_%-1)),"")��Y_("",�Q_("TimedOut"),"")
1��
1�=U_%
2ݤAf
2
�_a(Sa%,7,�Q_("Select"))
2�Y_(�Q_("Waiting")," ","")
2��Ab(50):��R_
2(=1
2<��ke(A$)
2F�a%,B$:a%=�
2P�B$=�wb(A$)
2Z
Ȏ�B$,2)�
2d�"/e":a%=�
2n�"/d":a%=�
2x�"ti":k`%(1)=a%
2��"li":k`%(2)=a%
2��"ta":k`%(3)=a%
2��"tw":k`%(4)=a%
2��"in":k`%(5)=a%
2��"ic":k`%(6)=a%
2��"fi":k`%(7)=a%
2��"me":k`%(8)=a%
2��"eo":k`%(9)=a%
2��"al":k`%()=a%
2��
2��A$="":k`%(0)=�
2��
3)ݤBf(H`$(0),H`$(1),H`$(2),H`$(3),sc%)
3�tc%,r%
3"r%=0:Cf%=0:sc%=sc%*100:tc%=fa%
3"�H`(c`$(H`%))
3,)��Ab(50):�Cf%>0��(fa%-tc%)>sc%�i_%<>0
36�Cf%>0�r%=Cf%
3@=r%
3T��H`(A$)
3^�L%
3h�L%=0�3
3r,�H`$(L%)>""��A$,H`$(L%))>0�Cf%=L%+1:L%=3
3|�
3�
H`%=-1
3��
3�ݤte(Df$,Ef$,Ff$,G`$,sc%)
3��ve%,tc%,J%
3�sc%=sc%*100:tc%=fa%
3�'Gf%=�Df$:Hf%=�Ef$:If%=�Ff$:Jf%=�G`$
3�!Kf%=1:Lf%=1:Mf%=1:Nf%=1:ve%=0
3��
3�
J%=�hd
3��J%>-1�
3�2�J%=Gf%�Kf%+=1:Gf%=�(�Df$,Kf%))�Gf%=�Df$:Kf%=1
3�2�J%=Hf%�Lf%+=1:Hf%=�(�Ef$,Lf%))�Hf%=�Ef$:Lf%=1
42�J%=If%�Mf%+=1:If%=�(�Ff$,Mf%))�If%=�Ff$:Mf%=1
42�J%=Jf%�Nf%+=1:Jf%=�(�G`$,Nf%))�Jf%=�G`$:Nf%=1
4�
4&�Ab(10)
40�
4:�Kf%>�Df$�Df$>"":ve%=1
4D�Lf%>�Ef$�Ef$>"":ve%=2
4N�Mf%>�Ff$�Ff$>"":ve%=3
4X�Nf%>�G`$�G`$>"":ve%=4
4b'�ve%>0��(fa%-tc%)>sc%�i_%<>0�e_%<>0
4l�ve%>0�:=ve%
4v=0
4���Fe(A$)
4�%�A%,J%,R%,t$,Sb%,B$,C$:t$="":R%=0
4��B$=�wb(A$)
4��B$,1)="/"�
4�C$=�xb(B$):Ȏ�B$,2)�
4��"ra":R%=�
4��"no":R%=�
4��"na","id":t$=C$
4��
4��
4��t$=""�
4��l_%=0��rb(�Q_("Enodev")):�
5)�A%=1��B$:J%=�d(0,ua%,��B$,A%,1),0):�
5�R%=0�J%=�d(0,ua%,13,0)
5�
5 )Sb%=0:ȕY`$(Sb%)<>t$�Sb%<W`%:Sb%+=1:�
5*�Sb%<W`%�a`%(Sb%)<>0�
54=!q%=256:q%!12=0:q%!16=&808C0:q%!20=�B$-(R%=0):$(q%+24)=B$
5>ș262375,17,q%,a`%(Sb%)
5H*�Zb(�vb("TaskSend",�B$,100),Y`$(Sb%)))
5R�
5\�
5f�
5p
�A$=""
5z�
5�ݤGe(A$)
5�"�r%,Of$,d%,a%,Pf%,Qf%,B$,C$,J%
5�r%=0:d%=60:a%=0
5��B$=�wb(A$)
5��B$,1)="/"�
5�C$=�xb(B$):Ȏ�B$,2)�
5��"de":d%=�C$:�d%<10�d%=10
5��"au":a%=�
5��
5��
5�
Of$=B$
5��
6
�A$=""
6
�a%=0�
6r%=�te(Of$,"","","",d%)
6$�
6.$Of$="":Pf%=0:r%=0:Qf%=fa%+d%*100
68�
6B
J%=�hd
6L
�J%>0�
6V
ȎPf%�
6`5�0,1,2:�J%>47�J%<57�Of$+=�J%:Pf%+=1:�Of$="":Pf%=0
6j+�3:�J%=46�Of$+=".":Pf%+=1:�Of$="":Pf%=0
6t�
6~�
6��Ab(da%)
6��
6��Pf%=4�fa%>Qf%:�Pf%=4�r%=1
6��
6�
�r%=1�
6�Rf$=Of$
6�
J%=�hd
6�ȕ(J%>32�J%=0)��Rf$<20
6�(�J%>31�Rf$=Rf$+�J%:�Ab(da%):��Ab(10)
6�
J%=�hd
6��
7C%=�(�Rf$,1))
7
ȕ(C%<48�C%>57)��Rf$>5
7Rf$=�Rf$,�(Rf$)-1)
7C%=�(�Rf$,1))
7(�
72�Za("ipaddress",Rf$)
7<*�Za("route",�Sf("%ip1.%ip2.%ip3.254"))
7FU_$=Rf$:r%=-1:A$=""
7P�
7Z=r%
7n��Tf(A$)
7x
�l%,m%
7�$l%=�A$,"."):�Za("ip1",�A$,l%-1))
7�1m%=�A$,".",l%+1):�Za("ip2",�A$,l%+1,m%-l%-1))
7�1l%=�A$,".",m%+1):�Za("ip3",�A$,m%+1,l%-m%-1))
7��Za("ip4",�A$,l%+1))
7��Y_("","",A$)
7��
7�
��He(ta$)
7�A%=�ta$," ")
7�#�A%<=1��le(�ab("Ebadmake",ta$))
7�!`d$=�ta$,A%-1):Uf$=�ta$,A%+1)
7��Y_(�ab("Make",Uf$),"","")
7��`d$="-"�`d$="null:"
8p_%=�La(`d$)
8&�p_%=0��rb(�ab("Enotfound",`d$)):�
8q_%=�Vf(Uf$)
8"%�q_%=0��rb(�ab("Ebadfile",Uf$)):�
8,"ȕ(�#p_%=����T_(O_%+1),1)="+")
86��#p_%�
8@O_%+=1:A$=��T_(O_%),2)
8J�
8TA$=�#p_%
8^�
8hA$=�Sf(A$)
8r�A$,1)<>"#"��#q_%,A$
8|�Ab(da%)
8��
8��Ma(p_%):�Ma(q_%)
8��
8�ݤLa(f$)
8�=�Wf(f$,&4F)
8�ݤVf(f$)
8�=�Wf(f$,&8F):�Xf(f$,&FFF)
8�ݤ`a(f$)
8��h%
8�h%=�Wf(f$,&CF)
9%�h%=0�h%=�Wf(f$,&8F):�Xf(f$,&FFF)
9=h%
9&ݤWf(f$,r%)
90
�h%,F%
9:ș131085,r%,f$�h%;F%
9D�(F%�1)�h%=0
9N=h%
9bݤVb(f$)
9l�F%:ș131080,6,f$�;F%
9v=(F%�1)
9���Xf(f$,t%)
9�ș131080,18,f$,t%
9��
9�
��h_(sc%)
9��Yf%
9��sc%=0�
9��Z_
9��
9��Zb(�ab("Wait",�sc%+"s"))
9��Ab(0):tc%=fa%:sc%=sc%*100
9��
:�Ab(50)
:��(tc%-fa%)>sc%
:�
: �
:4��Lb
:>
�l%,m%
:H?q%=3:ș7,14,q%
:R2ș193,q%,a_%,256,"%24%MI%SE"�l%,m%:Zf$=�Ub(l%)
:\-�Za("$time",Zf$):�Za("$mtime",�(fa%�100))
:f�
:z��Nb
:�
�l%,m%
:�?q%=3:ș7,14,q%
:�2ș193,q%,a_%,256,"%YR%MN%DY"�l%,m%:Zf$=�Ub(l%)
:��Za("$date",Zf$)
:��
:���K`(A$)
:��af%,a$,bf%,cf%,df%,B$,C$
:�bf%=-1:af%=-1:df%=-1:a$=A$
:��B$=�wb(A$)
:��B$,1)="/"�
:�C$=�xb(B$)
:�
Ȏ�B$,2)�
;�"st":i_$=C$
;�"er":tb$=C$
;%�"dt","cts":y_%(0)=�cc(�C$):af%=0
;$�"ds":y_%(1)=�cc(�C$):af%=1
;.�"rn":y_%(2)=�cc(�C$):af%=2
;8�"dc":y_%(3)=�cc(�C$):af%=3
;B�"ti":cf%=�ef(C$)
;L�"ic":df%=�ff(C$)
;V&�"na","id":bf%=�gf(C$):M`$(bf%)=C$
;`�"ca","de":�hf(C$)
;j�
;t�
;~
�A$=""
;��cf%>0�
;��bf%<0�bf%=�gf("~")
;�,K`$(bf%,0)=B$:K`$(bf%,1)=a$:L`%(bf%)=cf%
;��
;��af%>=0�y_$(af%)=B$
;��df%>=0�O`$(df%)=B$
;��
;��
;�ݤgf(A$)
;��a%:a%=0
;�*�a%+=1:�K`$(a%,0)=""�M`$(a%)=A$�a%=J`%
<!�a%=J`%��rb(�Q_("Ealarm")):=0
<
=a%
<ݤcc(A%):=-(A%<>0)
<2��hf(C$)
<<�a%:a%=0
<F�a%+=1:�M`$(a%)=C$�a%=J`%
<P3�M`$(a%)=C$�K`$(a%,0)="":�Zb(�ab("Acancel",C$))
<Z�
<nݤef(C$)
<x5�l%,m%,if%,jf%,kf%,lf%,r%,Zf%,mf%,nf%,of%,sc%,pf%
<�%�C$,1)="+"�lf%=�:C$=�C$,2)�lf%=�
<�l%=�C$,":"):�l%>0�
<�m%=�C$,":",l%+1):�m%>0�
<�if%=��C$,l%-1)
<�jf%=��C$,l%+1,m%-1)
<�kf%=��C$,m%+1,m%+3)
<��
<�	�lf%�
<�,if%=0:jf%=��C$,l%-1):kf%=��C$,l%+1,l%+3)
<��
<�,kf%=0:if%=��C$,l%-1):jf%=��C$,l%+1,l%+3)
<��
<��
=�
=8�lf%�if%=0:jf%=0:kf%=��C$,2)�kf%=0:jf%=0:if%=��C$,2)
=�
="ș66�Zf%
=,	�lf%�
=6&r%=Zf%+100*kf%+6000*jf%+360000*if%
=@�
=J?q%=3:ș7,14,q%
=T2ș193,q%,a_%,256,"%24%MI%SE"�l%,m%:Zf$=�Ub(l%)
=^,mf%=��Zf$,2):nf%=��Zf$,3,2):of%=��Zf$,2)
=hpf%=of%+nf%*60+mf%*3600
=r8sc%=(kf%+jf%*60+if%*3600)-pf%:ȕsc%<0:sc%+=24*3600:�
=|r%=Zf%+sc%*100
=��
=�=r%
=���Mb
=��c%:c%=0
=�
�c%+=1
=��K`$(c%,0)>""�fa%>L`%(c%)�
=�td$=K`$(c%,0):K`$(c%,0)=""
=�+�K`$(c%,1),"/repeat")>0��K`(K`$(c%,1))
=��Rb(td$,1)
=��
=��c%=J`%
=�ga%=fa%
>�
>��Kb
>&�qf%,J%
>0	�l_%�
>:J%=�d(9,ua%,0,0)
>D
�J%<>m_%�
>N m_%=J%:�(J%�1)�t$="�"�t$=" "
>X�(J%�2)�t$+="�"�t$+=" "
>b�(J%�8)�t$+="�"�t$+=" "
>l�_a(Sa%,10,t$)
>v�
>��qf%=0�3
>�C�y_$(qf%)>""�(J%�(1<<qf%))=y_%(qf%)��Rb(y_$(qf%),2):y_$(qf%)=""
>��qf%
>��
>��m_%>0�m_%=0:�_a(Sa%,15,"")
>��
>��
>���ge(A$)
>�
�B$,C$
>�B$=�wb(A$):C$=�xb(B$)
>�
Ȏ�B$,2)�
>�
�"al":�Rc
?
�"me":�Sc
?
�"ta":�Tc
?
�"va":�Uc
? �"sc":�Vc(A$)
?*
�"fi":�rf
?4
�"ju":�sf
?>�
?H�
?\��Rc
?f
�c%,A%,A$
?p.�P_(�Q_("Condition")+"    "+�Q_("Action"))
?z
�c%=0�J`%
?��K`$(c%,0)>""�
?�A%=(L`%(c%)-fa%)�100
?�#A$="t+"+�"00"+�(A%�3600),2)+":"
?�$A$+=�"00"+�((A%�3600)�60),2)+":"
?�A$+=�"00"+�(A%�60),2)
?�&�tf(A$,K`$(c%,1)+" ("+M`$(c%)+")")
?��
?��
?�
�c%=0�N`%
?�;�P`$(c%)>""��tf(�Q_("Iclick"),P`$(c%)+" ("+R`$(c%)+")")
?�:�O`$(c%)>""��tf(�Q_("Ifile"),O`$(c%)+" ("+R`$(c%)+")")
?��
?��tf("stop",i_$)
@1�y_$(0)>""��tf("DTR"+" ("+�y_%(0)+")",y_$(0))
@1�y_$(1)>""��tf("DSR"+" ("+�y_%(1)+")",y_$(1))
@1�y_$(2)>""��tf("RNG"+" ("+�y_%(2)+")",y_$(2))
@$1�y_$(3)>""��tf("DCD"+" ("+�y_%(3)+")",y_$(3))
@.�
@B��tf(A$,B$)
@L&�B$>""��P_(" "+A$+�13-�A$," ")+B$)
@V�
@jݤhe(A$)
@t�r%,uf$,vf$,s$,B$,C$
@~uf$="":vf$="":s$=""
@��
@�B$=�wb(A$)
@��B$,1)="/"�
@�C$=�xb(B$)
@�
Ȏ�B$,2)�
@��"fi":r%=�Da(C$)
@��"id","name":uf$=C$
@��"ac":vf$=C$
@��"ca","de":r%=�wf(C$)
@��"fr":r%=�qa
@��
@��
A	s$=B$
A
�
A
�A$=""
A$�uf$>""�s$>""�r%=�xf(s$,uf$,vf$)
A(=r%
A<ݤff(A$)
AF�a%:a%=0
AP�a%+=1:�R`$(a%)=A$�a%=N`%
AZ(�a%=N`%�A$=""��Zb(�Q_("Eicon1")):=-1
Ad=a%
Axݤyf(A$)
A��a%:a%=0
A�'�a%+=1:�R`$(a%)=A$�P`%(a%)=0�a%=N`%
A�(�a%=N`%�A$=""��Zb(�Q_("Eicon1")):=-1
A�=a%
A�ݤxf(A$,uf$,vf$)
A�
�a%,Z%
A�a%=�yf(uf$)
A��a%<0�=0
A��A$>""�
A��R`$(a%)=uf$�Z%=�wf(uf$)
A��Zb("Adding icon "+A$)
A�"P`%(a%)=�ca(A$,a%):R`$(a%)=uf$
B�
BP`$(a%)=vf$
B=�cc(P`%(a%))
B,ݤwf(A$)
B6�a%
B@a%=�ff(A$)
BJ�a%<0��Zb(�Q_("Eicon1")):=0
BT$�P`%(a%)<1��Zb(�Q_("Eicon2")):=0
B^+!Oa%=-2:Oa%!4=P`%(a%):ș393412,,Oa%�;F%
BhP`%(a%)=0:R`$(a%)=""
Br=�cc(F%)
B���O`(Z%,f$,zf%)
B�'�Za("$type",�~zf%):�Za("$file",+f$)
B��Rb(O`$(Z%),7)
B��
B���Je(A$)
B��l%,m%,B$,C$
B�B$=�wb(A$):C$=�wb(A$)
B��Za(B$,C$)
B��
B���Za(B$,C$)
B��l%,p%:p%=-1:�l%=0�E`%
CG�F`$(l%,0)=B$�F`$(l%,0)=""�F`$(l%,0)=B$:F`$(l%,1)=C$:p%=l%:l%=E`%+1
C�
C�B$="ipaddress"��Tf(C$)
C&�p%=-1��rb(�Q_("Evar"))
C0�
CD��Ke(A$)
CN
�l%,B$
CXB$=�wb(A$)
Cb
�l%=0�E`%
Cl+�F`$(l%,0)=B$�F`$(l%,0)="":F`$(l%,1)=""
Cv�
C�"�B$="ipaddress"��Y_("",""," ")
C��
C�ݤse(A$)
C��l%,t$,B$:t$=""
C�B$=�wb(A$)
C�
�l%=0�E`%
C�%�F`$(l%,0)=B$�t$=F`$(l%,1):l%=E`%
C��
C�=t$
C���Uc
C��c%
D.�P_(�Q_("Variable")+"      "+�Q_("Value"))
D
�c%=0�E`%
D*�F`$(c%,0)>""��tf(F`$(c%,0),F`$(c%,1))
D �
D*�
D>ݤre
DH�J%
DR
�l_%=0�=0
D\�Y_("",�Q_("DevDrop"),"")
DfJ%=�d(8,ua%,0,0)
Dp�Ab(100)
DzJ%=�d(8,ua%,3,0)
D�=1
D���Oe(A$,�O_%)
D��l%,ve%,Uf$
D�l%=0:ve%=-1:Uf$=�wb(A$)
D��
D�#�C`$(l%)=Uf$�ve%=C`%(l%):l%=D`%
D�l%+=1:�l%>=D`%
D�#�ve%<0��rb(�ab("Elabel",Uf$)):�
D�O_%=ve%
D��
D���Pe(A$,�O_%)
E�B$,p%,_f%,`f%
E!�sb%=s_%��rb(�Q_("Elevel")):�
EUf$=�wb(A$)
E$(`f%=�:�Uf$="/lock"�`f%=�:Uf$=�wb(A$)
E.p%=0:�A$>""�
E8,�p%+=1:B$=�wb(A$):�Za("p"+�p%,B$):�A$=""
EB�
EL_f%=O_%:�Oe(Uf$,O_%)
EV	�`f%�
E`8�p%=0�sb%:�u_%(p%)=O_%�O_%=_f%:�P_(�ab("Elock",Uf$))
Ej�
Et�
E~�O_%<>_f%�
E�sb%+=1:t_%(sb%)=_f%
E��`f%�u_%(sb%)=O_%
E��
E��
E�ݤU_(A$,�O_%)
E�!�sb%=0��rb(�Q_("Ereturn")):=0
E�O_%=t_%(sb%):sb%-=1
E�
U_$=A$
E�=-1
E�ݤAg(A$)
F�r%
F
ș131080,17,A$�r%
F=r%
F(ݤL_(A$)
F2�r%,n%,l%,B$,C$
F<r%=0:B$=�wb(A$):C$=�wb(A$)
FF
Ȏ�B$,3)�
FP"�"/si":ș131080,23,C$�n%,,,,r%
FZ#�"/at":ș131080,23,C$�n%,,,,,r%
Fd3�"/ty":ș131080,23,C$�n%,,,,,,r%:U_$=�~r%:r%=-1
Fn)�"/ex":U_$=�nd(C$):�U_$>""�r%=-1:n%=1
Fx�"/le":U_$=�nd(C$):n%=�U_$
F�"ȕn%>0��U_$,n%,1)<>".":n%-=1:�
F��n%>1�U_$=�U_$,n%+1):r%=-1
F��"/pa":U_$=�nd(C$):n%=�U_$
F�"ȕn%>0��U_$,n%,1)<>".":n%-=1:�
F��n%>1�U_$=�U_$,n%-1):r%=-1
F�:ș131080,23,B$�r%:n%=r%
F��
F��n%=0�r%=0
F�=r%
F�ݤnd(A$)
F�
�r$:r$=""
F�'ș131113,37,A$,a_%,,,256�,,,,,r%;F%
G�r%>0�(F%�1)=0�r$=�Ub(a_%)
G=r$
G"ݤRe(A$)
G,�U_%,J%,B$:U_%=0
G6J%=�d(9,ua%,0,0)
G@�B$=�wb(A$)
GJ	ȎB$�
GT�"/cts","/dtr":U_%+=(J%�1)
G^�"/dsr":U_%+=(J%�2)
Gh�"/rng":U_%+=(J%�4)
Gr�"/dcd":U_%+=(J%�8)
G|:�rb(�Q_("Eparam")):=0
G��
G�
�A$=""
G�=U_%
G�ݤSe(A$)
G��n%,f%,r%,B$,C$
G�ș262380,-1,-1�,n%,f%
G��B$=�wb(A$)
G��B$,1)="/"�
G�C$=�xb(B$)
G�
Ȏ�B$,2)�
G��"me":r%=n%+f%
G��"ne":r%=n%
H�"fr":r%=f%
H�"in":r%=�-�
H.�"de":ș131113,49,C$�r%;F%:�cc(F%)=0�r%=0
H&�
H0�
H:�B$>""��Za(B$,�r%)
HD�
HN
�A$=""
HX=r%
Hlݤwd(A$,Bg$)
Hv�Cg$,wd$,Dg%,U_%,l%,m%,n%
H�-l%=�A$,"("):m%=�A$,")",l%):n%=�A$," ",m%)
H�"�l%*m%*n%=0��Zb(�Q_("Eif")):=0
H�-Dg%=�:Cg$=�A$,l%+1,m%-l%-1):wd$=�A$,n%+1)
H�"�Cg$,1)="!"�Dg%=�:Cg$=�Cg$,2)
H�"U_%=�V_(Cg$):�Dg%�U_%=-(U_%=0)
H�%�U_%<>0�i_%=0�U_%=�V_(wd$)�td$=""
H�=U_%
H�ݤw_(A$)
H�(Eg%+=1:�Eg%>v_%��rb(�Q_("Ecase")):=0
H�!w_$(Eg%)=�wb(A$):x_%?Eg%=0:=1
H�ݤxd(A$,Bg$)
I�m%,B$:m%=�
I�Eg%=0��rb(�Q_("Ewhen")):=0
I�B$=�wb(A$)
I �B$=w_$(Eg%)�m%=�:x_%?Eg%=1
I*
�A$=""
I4�m%=��td$=""
I>=0
IR
��yd(Bg$)
I\�Eg%=0��rb(�Q_("Ewhen")):�
If�x_%?Eg%=1�td$=""
Ip�
I�ݤzd
I��Eg%=0��rb(�Q_("Ewhen")):=0
I�
Eg%-=1:=1
I�ݤLe(c$,A$)
I��r%,n%,l%,c%,b$,B$,C$:r%=0
I�B$=�wb(A$):C$=�wb(A$)
I�)b$=B$+C$:n%=�:�l%=1��b$:c%=��b$,l%,1)
I�"�c%<46�c%>57�c%=47�n%=�:l%=�b$
I��
I��
I���:�Zb(�ab("Ecomp",c$)):�
I�	Ȏc$�
J&�"?eq":�n%�r%=(�B$=�C$)�r%=(B$=C$)
J(�"?ne":�n%�r%=(�B$<>�C$)�r%=(B$<>C$)
J&�"?lt":�n%�r%=(�B$<�C$)�r%=(B$<C$)
J$&�"?gt":�n%�r%=(�B$>�C$)�r%=(B$>C$)
J.(�"?le":�n%�r%=(�B$<=�C$)�r%=(B$<=C$)
J8(�"?ge":�n%�r%=(�B$>=�C$)�r%=(B$>=C$)
JB�
JL
=-(r%<>0)
J`ݤNe(A$)
Jj�B$
Jt
U_$=""
J~B$=�wb(A$)
J��
J���:�Zb(�ab("Eeval",B$)):=0
J�U_$=�(�B$)
J�=-1
J�ݤMe(A$)
J�(�a%,s%,l%,s$,b$,B$,C$:a%=0:s%=0:l%=0
J��B$=�wb(A$)
J��B$,1)="/"�
J�C$=�xb(B$):Ȏ�B$,3)�
J��"siz":a%=1
J��"low":a%=2
K�"lef":a%=3:s%=�C$
K
�"rig":a%=4:s%=�C$
K�"sta":a%=5:s%=�C$
K�"len":l%=�C$
K(�"ins":a%=6:b$=C$
K2�"upp":a%=7
K<�
KF�
KP	s$=B$
KZ�
Kd
�A$=""
Kn	Ȏa%�
Kx�1:U_$=és$
K��2:U_$=�rc(s$)
K��3:U_$=�s$,s%)
K��4:U_$=�s$,s%)
K�'�5:�l%<1�U_$=�s$,s%)�U_$=�s$,s%,l%)
K��6:U_$=�(�s$,b$))
K��7:U_$=�Fg(s$)
K�:U_$=s$
K��
K�=-1
K�ݤYe(A$)
K�
�l%,B$
K��Y_(�Q_("Fmove1")," ","")
LB$=�wb(A$)
L$�A$=""��Y_("",�Q_("Fbad"),""):=0
Ll%=�A$,"*")
L"
�l%>0�
L,$�A$=�A$,l%-1)+��(�),4)+�A$,l%+1)
L6�Ab(da%)
L@��Ag(A$)<>1
LJ�
LT�Y_("",�vb("Fto",B$,A$),"")
L^ș131113,25,B$,A$�;F%
Lh�(F%�1)�
Lr#ș131113,26,B$,A$,%10000010�;F%
L|�
L��Za("$dest",A$)
L�=-((F%�1)=0)
L�ݤZe(A$)
L��l%,vf%,s$,d$,n%,B$,C$
L�vf%=0:s$="":d$=""
L��Y_(�Q_("Fcopy")," ","")
L��B$=�wb(A$)
L��B$,1)="/"�
L�C$=�xb(B$):Ȏ�B$,2)�
L�"�"ta":vf%=1:n%=�C$:�n%=0�n%=50
L�"�"he":vf%=2:n%=�C$:�n%=0�n%=50
L��
M�
M�s$=""�s$=B$:�d$=B$
M�
M&
�A$=""
M0$�d$=""��Y_("",�Q_("Fbad"),""):=0
M:l%=�d$,"*"):�l%>0�
MD$�d$=�d$,l%-1)+��(�),4)+�d$,l%+1)
MN��Ag(d$)<>1
MX�
Mb�Y_("",�vb("Fto",B$,A$),"")
Mll%=0:Ȏvf%�
Mv+�0:ș131113,26,s$,d$�;F%:l%=-((F%�1)=0)
M�/�1:�Y_(�Q_("Ftail"),"",""):l%=�Gg(s$,d$,n%)
M�/�2:�Y_(�Q_("Fhead"),"",""):l%=�Hg(s$,d$,n%)
M��
M��Za("$dest",A$)
M�=l%
M�ݤae(A$)
M��S%,r%,Ig%,Jg%,f$,t$,F%
M��Y_(�Q_("Fapp")," ","")
M�f$=�wb(A$):t$=�wb(A$)
M�$�t$=""��Y_("",�Q_("Fbad"),""):=0
M��Y_("",�vb("Fto",f$,t$),"")
M�0Ig%=�La(f$):�Ig%=0��Zb(�ab("Fsource",f$)):=0
N;Jg%=�`a(t$):�Jg%=0�ș131080,11,t$,&FFF,,0,0:Jg%=�Vf(t$)
N�Jg%>0��#Ig%>0�
N5�#Jg%=�#Jg%:S%=0:�ș131084,4,Ig%,a_%,256�,,,r%;F%
N <�r%<>256�(F%�1)=0�ș131084,2,Jg%,a_%,256-r%�;F%:�Ab(da%)
N*S%+=256-r%
N4�S%>=�#Ig%�(F%�1)<>0
N>�
NH�Ma(Ig%):�Ma(Jg%)
NR=1
NfݤGg(s$,d$,l%)
Np
�n%,m%,A$
Nz0Ig%=�La(s$):�Ig%=0��Zb(�ab("Fsource",s$)):=0
N�(ș131080,11,d$,&FFF,,0,0:Jg%=�Vf(d$)
N��Jg%>0��#Ig%>0�
N�
n%=0:�
N�A$=�#Ig%:n%+=1:�Ab(da%*2)
N���#Ig%:�#Ig%=0
N�m%=n%-l%:�m%<0�m%=0
N�
n%=0:�
N�A$=�#Ig%:n%+=1:�Ab(da%*2)
N��n%>=m%
N��
N� A$=�#Ig%:�#Jg%,A$:�Ab(da%*2)
N�
��#Ig%
N��
O�Ma(Ig%):�Ma(Jg%)
O=1
O$ݤHg(s$,d$,l%)
O.
�n%,m%,A$
O80Ig%=�La(s$):�Ig%=0��Zb(�ab("Fsource",s$)):=0
OB(ș131080,11,d$,&FFF,,0,0:Jg%=�Vf(d$)
OL�Jg%>0��#Ig%>0�
OV
n%=0:�
O`&A$=�#Ig%:�#Jg%,A$:n%+=1:�Ab(da%*2)
Oj��#Ig%�n%>=l%
Ot�
O~�Ma(Ig%):�Ma(Jg%)
O�=1
O�ݤbe(A$)
O�
�w%,B$
O�w%=0
O��B$=�wb(A$)
O��B$,3)="/wi"�
O�w%=�
O��
O�1�w%=0�ș131080,6,B$�;F%�ș131113,27,B$,,2�;F%
O��
O�
�A$=""
P=-((F%�1)=0)
Pݤee(A$)
P�l%,h%,Kg%,B$
P(B$=�wb(A$)
P2�A$=""��rb(�Q_("Edata")):=0
P<�Y_(�Q_("DataOpen")," ","")
PFh%=�Lg(B$)
PPș131080,23,A$�l%,,,,,,Kg%
PZ�h%<>0�l%=1�
Pd	U_%=1
Pn-�Y_("",A$+" (type &"+�~Kg%+") to "+B$,"")
Px;q%!12=0:q%!16=5:q%!20=0:q%!24=0:q%!28=0:q%!32=0:q%!36=0
P�,q%!40=Kg%:$(q%+44)=A$+�0:!q%=47+�A$+1��3
P�ș262375,18,q%,h%
P��
P�	U_%=0
P�&�h%=0��Y_("",�ab("Enotask",B$),"")
P�'�l%<>1��Y_("",�ab("Enofile",A$),"")
P��
P�=U_%
P���Tc
P��l%
P��P_(�Q_("TaskList1"))
P�
�l%=0�S`%
Q�V`%(l%)>0�
Q0�tf(�~V`%(l%),�Mg(V`%(l%))+" ("+U`$(l%)+")")
Q)�T`$(l%)>""��tf(""," exit: "+T`$(l%))
Q"�
Q,�
Q6�P_(�Q_("TaskList2"))
Q@
�l%=0�W`%
QJ�a`%(l%)>0�
QT+�tf(�~a`%(l%),Z`$(l%)+" ("+Y`$(l%)+")")
Q^)�X`$(l%)>""��tf(""," exit: "+X`$(l%))
Qh�
Qr�
Q|�
Q�ݤne(A$)
Q��B$
Q��B$=�wb(A$)
Q�ș393438,B$�;F%
Q�
�A$=""
Q�=(F%�1)
Q�ݤIa(A$)
Q��a%,w%,h%,Ng%,B$,C$
Q�sc%=0:a%=0
Q��a%+=1:�V`%(a%)=0�a%=S`%
Q�$�V`%(a%)<>0��rb(�Q_("Etask2")):�
R&U`$(a%)="task"+�a%:T`$(a%)="":h%=0
R�B$=�wb(A$)
R�B$,1)="/"�
R&C$=�xb(B$)
R0
Ȏ�B$,2)�
R:%�"ki","de":h%=�Og(C$):B$="":A$=""
RD�"na","id":U`$(a%)=C$
RN�"ex":T`$(a%)=C$
RX�"wa":sc%=�
Rb�
Rl�
Rv
�A$=""
R��B$>""�
R�#�Y_(�ab("TaskStart1",B$),"","")
R�ș393438,B$�;F%
R��(F%�1)=0�
R�j_%=a%:Ng%=0
R�&�Ng%+=1:�Ab(0):�j_%=0�Ng%>10:j_%=0
R��
R��V`%(a%)<>0�sc%<>0�
R��:�Ab(50):�V`%(a%)=0
R��
R�h%=-((F%�1)=0)
R��
R�=h%
SݤOg(A$)
S
�l%,h%
S �A$=""�
S*#l%=S`%:ȕV`%(l%)=0�l%>0:l%-=1:�
S4�V`%(l%)>0�h%=V`%(l%)
S>�
SH
�l%=0�S`%
SR�V`%(l%)>0�
S\*�Mg(V`%(l%))=A$�U`$(l%)=A$�h%=V`%(l%)
Sf�
Sp�
Sz�
S��h%<>0�
S��Zb("Killing task: "+A$)
S�4!q%=256:q%!12=0:q%!16=0:ș262375,17,q%,h%:�Ab(0)
S��
S�
=-(h%<>0)
S�ݤde(A$)
S�=�Lg(A$)
S�ݤMg(h%)
S�
�f$,n%
S�f$="":ș403072,h%�h%;F%
S��(F%�1)=0�
T(n%=0:ȕh%?n%>31:f$+=�(h%?n%):n%+=1:�
T�
T=f$
T.ݤLg(A$)
T8�A%,r%,l%,h%,B$
TBr%=0:A%=0:A$=�rc(A$)
TL�
TVș272001,A%,Pa%,&100�A%,l%
T`	Fd%=0
Tj ȕ(A%>=0�r%=0�(Fd%+Pa%)<=l%)
Tt*h%=Pa%!Fd%:B$=�Ub(Pa%!(Fd%+4)):Fd%+=16
T~�A$=�rc(B$)�r%=h%
T��
T��A%<0�r%<>0
T�=r%
T���bb
T��l%
T��l%=0�S`%-1
T��V`%(l%)=0�V`%(l%+1)<>0�
T�ȔV`%(l%),V`%(l%+1)
T�ȔU`$(l%),U`$(l%+1)
T�ȔT`$(l%),T`$(l%+1)
T��
U�
U
�
UݤIe(A$)
U("�Sb%,w%,Ng%,n%,F%,Kd%,B$,C$,S$
U2Sb%=0:sc%=0:F%=0:Kd%=�
U<"ȕa`%(Sb%)<>0�Sb%<W`%:Sb%+=1:�
UF"�Sb%=W`%��rb(�Q_("Etask2")):=0
UP!ș262380,-1,-1�,n%:n%=n%�1024
UZ<S$=�n%+"k":Y`$(Sb%)="SDtask"+�Sb%:X`$(Sb%)="":g`%(Sb%)=0
Ud�B$=�wb(A$)
Un�B$,1)="/"�
UxC$=�xb(B$)
U�
Ȏ�B$,2)�
U��"si":S$=C$
U��"na","id":Y`$(Sb%)=C$
U��"ex":X`$(Sb%)=C$
U�(�"ou":�Ma(b`%(Sb%)):b`%(Sb%)=�Vf(C$)
U��"wa":sc%=�
U��"ke":g`%(Sb%)=�
U��"ki":�nc(C$,&808C4)
U��"su":�nc(C$,&808C6)
U��"re":�nc(C$,&808C7)
U��"no":Kd%=�
U��
U�	B$=""
V�
V
�A$=""
V�B$>""�
V"5�Y_(�ab("TaskStart1",Y`$(Sb%)),"",""):Z`$(Sb%)=B$
V,%�b`%(Sb%)=0��Jd(Sb%,Kd%,Y`$(Sb%))
V6zș393438,"TaskWindow """+B$+""" -quit -wimpslot "+S$+" -name """+Y`$(Sb%)+""" -task &"+�~Ia%+" -txt &"+�~(Ia%+Sb%)�;F%
V@,Ng%=0:�Ng%+=1:�Ab(0):�a`%(Sb%)<>0�Ng%>10
VJ7�a`%(Sb%)=0��Ma(b`%(Sb%)):Y`$(Sb%)="":�Eb(d`%(Sb%))
VT�sc%<>0�a`%(Sb%)<>0�
V^�:�Ab(50):�a`%(Sb%)=0
Vh�
Vr�
V|=�((F%�1)=0)
V���nc(A$,m%)
V�A$=�rc(A$)
V��Sb%:�Sb%=0�W`%
V�!�A$=�rc(Y`$(Sb%))�a`%(Sb%)>0�
V�)!q%=20:q%!4=0:q%!8=0:q%!12=0:q%!16=m%
V�ș262375,17,q%,a`%(Sb%)
V�	Ȏm%�
V�<�&808C6:$h`%(Sb%)=�ab("TaskSusp",Y`$(Sb%)):�eb(d`%(Sb%))
V�;�&808C7:$h`%(Sb%)=�ab("TaskRun",Y`$(Sb%)):�eb(d`%(Sb%))
V��
V�Sb%=W`%
V��
W�
W�
W&ݤUe(A$)
W0�f%,r%,Pg$,B$,C$
W:+Pg$="":f%=0:ȕn`%(f%)<>0�f%<m`%:f%+=1:�
WD$�f%=m`%��rb(�Q_("Efullfile")):=0
WNo`$(f%)="":p`%(f%)=1:r%=&4F
WX�B$=�wb(A$)
Wb�B$,1)="/"�
WlC$=�xb(B$)
Wv
Ȏ�B$,2)�
W��"na","id":o`$(f%)=C$
W��"re":p`%(f%)=1:r%=&4F
W��"wr":p`%(f%)=2:r%=&8F
W��"rw":p`%(f%)=3:r%=&CF
W��"er":Pg$=C$
W��
W��
W�q`$(f%)=B$
W��
W�
�A$=""
W�.�o`$(f%)>""�ș131085,r%,q`$(f%)�n`%(f%);F%
W��(F%�1)<>0�
W�n`%(f%)=0:o`$(f%)=""
X-�Pg$=""��rb(�Q_("Efilefail")):��Rb(Pg$,9)
X�
X'�p`%(f%)=2�ș131080,18,q`$(f%),&FFF
X �
X*=n`%(f%)
X>ݤVe(A$)
XH�n%,r%,B$,C$
XRr%=0
X\�B$=�wb(A$)
Xf�B$,1)="/"�
XpC$=�xb(B$)
Xz
Ȏ�B$,2)�
X��"na","id":�n%=0�m`%
X�3�o`$(n%)=C$��Ma(n`%(n%)):o`$(n%)="":n%=m`%:r%=1
X��
X��
X��
X�
�A$=""
X�=r%
X�ݤWe(A$)
X��f%,r%,Qg$,B$,C$
X�f%=-1:r%=0:Qg$=""
X��B$=�wb(A$)
X��B$,1)="/"�
YC$=�xb(B$)
Y
Ȏ�B$,2)�
Y�"na","id":f%=�Rg(C$)
Y$�"eof":Qg$=C$
Y.�
Y8�
YB�f%>-1�f%<m`%�
YL)�(p`%(f%)�1)=0��rb(�Q_("Enoread")):=0
YV&��#n`%(f%)��Za(B$,�#n`%(f%)):r%=1
Y` ��#n`%(f%)�Qg$>""��Rb(Qg$,9)
Yj�
Yt�
Y~
�A$=""
Y�=r%
Y�ݤXe(A$)
Y��f%,r%,B$,C$
Y�f%=-1:r%=0
Y��B$=�wb(A$)
Y��B$,1)="/"�
Y�C$=�xb(B$)
Y�
Ȏ�B$,2)�
Y��"na","id":f%=�Rg(C$)
Y��
Y��
Z�f%>-1�f%<m`%�
Z
*�(p`%(f%)�2)=0��rb(�Q_("Enowrite")):=0
Z�#n`%(f%),B$
Z�
Z(�
Z2
�A$=""
Z<=r%
ZPݤFd(A$)
ZZ�f%,r%,s%,B$,C$
Zdf%=-1:s%=-1
Zn�B$=�wb(A$)
Zx�B$,1)="/"�
Z�C$=�xb(B$)
Z�
Ȏ�B$,2)�
Z��"na","id":f%=�Rg(C$)
Z�&�"se":�rc(C$)="eof"�s%=-2:�s%=�C$
Z��
Z��
Z�
�A$=""
Z�r%=0
Z��f%>-1�n`%(f%)<>0�
Z�3�s%=-2��#n`%(f%)=�#n`%(f%):��s%>=0��#n`%(f%)=s%
Z�r%=�#n`%(f%)
Z��
Z�=r%
[��rf
[ �tf("Identifier","Filename")
["�f%:�f%=0�m`%
[,#�n`%(f%)>0��tf(o`$(f%),q`$(f%))
[6�
[@�
[TݤRg(A$)
[^)�f%:f%=0:ȕo`$(f%)<>C$�f%<m`%:f%+=1:�
[h"�f%=m`%��rb(�Q_("Efileid")):=0
[r=f%
[���fe(A$)
[�.�n%,l%,m$,n$,a$,b$,B$,C$:n%=-1:m$="":n$=""
[��B$=�wb(A$)
[��B$,1)="/"�
[�C$=�xb(B$)
[�
Ȏ�B$,2)�
[��"co":n%=-2
[�2�"ic":n%=0:�n%+=1:�R`$(n%)=C$�P`%(n%)=0�n%=N`%
[�*�n%=N`%�C$=""��Zb(�Q_("Eicon1")):n%=-5
[��
[��
[�l%=�B$,":")
[�
�l%>0�
\a$=�B$,l%-1):b$=�B$,l%+1)
\�
\a$=B$:b$=""
\&�
\0+�a$=""�b$=""��rb(�ab("Emenu",B$)):A$=""
\:�m$+�a$<252��n$+�b$<252�
\Dm$+=a$+�0:n$+=b$+�0
\N�
\X�rb(�Q_("Ebigmenu")):A$=""
\b�
\l�
\v
�A$=""
\���m$,1)=" "�m$=�m$,�m$-1)
\�	Ȏn%�
\��-1:`_$(0)=m$:`_$(1)=n$
\��-2:A`$(0)=m$:A`$(1)=n$
\�.:�n%>=0�n%<=N`%�Q`$(n%,0)=m$:Q`$(n%,1)=n$
\��
\��
\�ݤnb(A$,B$)
\��u$,a$,b$:__%=0:u$=""
\��
\�
__%+=1
\�a$=�Sg(A$,�0):b$=�Sg(B$,�0)
]*u$+=","+a$:__$(__%,0)=a$:__$(__%,1)=b$
]�A$=""�__%=z_%:u$=�u$,2)
]=u$
]*��Sc
]4�C$
]>0�`_$(0)>""�C$=�nb(`_$(0),`_$(1)):�Tg("user")
]H1�A`$(0)>""�C$=�nb(A`$(0),A`$(1)):�Tg("debug")
]R
�Z%=0�N`%
]\C�Q`$(Z%,0)>""�C$=�nb(Q`$(Z%,0),Q`$(Z%,1)):�Tg("icon: "+R`$(Z%))
]f�
]p�
]���Tg(t$)
]��l%
]�(�P_("Label         Action ("+t$+")")
]�
�l%=1�__%
]��tf(__$(l%,0),__$(l%,1))
]��
]��
]���ie(A$)
]�
�B$,C$
]��B$=�wb(A$)
]�
Ȏ�B$,1)�
]�6�"/":C$=�xb(B$):�Zb("Qualifier /"+B$+" value="+C$)
^:�Zb("Parameter "+B$)
^�
^
�A$=""
^$�
^8ݤud(�Ub$)
^B#�B$,A%,B%,F%,Ug%,Vg%,Wg%,Xg%,l%
^L3B$="":B%=0:Ug%=0:Vg%=0:Wg%=0:Xg%=0:F%=0:l%=�Ub$
^V�Ub$=""�=""
^`�:B%+=1:A%=��Ub$,B%,1)
^j�Xg%=92�
^tB$+=�A%:Xg%=0
^~�
^��A%=34�Vg%=0�Ug%+=1
^�
�Ug%�2=0�
^��A%=40�Vg%+=1
^��A%=41�Vg%-=1
^��A%=123�Wg%+=1
^��A%=125�Wg%-=1
^��Vg%=0�(Ug%�2)=0�
^��A%=59�B%>1�F%=�
^��
^��
^�Xg%=A%:�F%=0�A%<>92�B$+=�A%
^��
_�F%<>0�B%=l%:�B%=l%�B%+=1
_
Ub$=�Yg(�Ub$,B%+1))
_B$=�Sf(B$)
_=�Yg(B$)
_2ݤSf(A$)
_<�l%,f%,c%,a$,l$,B$:l$=""
_Fc%=�A$,"%"):�c%=0�:=A$
_Pc%=c%-2:�c%<0�c%=0
_ZB$=�A$,c%)
_d�c%+=1:a$=�A$,c%,1)
_n�l$="\"�
_xB$+=a$:l$=""
_��
_��a$="%"�
_�
�l%=0�E`%
_�V�F`$(l%,0)>""�F`$(l%,0)=�A$,c%+1,�F`$(l%,0))�B$+=F`$(l%,1):c%+=�F`$(l%,0):l%=E`%+1
_��
_��l%=E`%�B$+="%"
_��
_�B$+=a$:l$=a$
_��
_��
_��c%>=�A$
_�=B$
`ݤwb(�Ub$)
`#�B$,A%,B%,F%,Ug%,Vg%,Wg%,Xg%,l%
`3B$="":B%=0:Ug%=0:Vg%=0:Wg%=0:Xg%=0:F%=0:l%=�Ub$
`"�Ub$=""�=""
`,�:B%+=1:A%=��Ub$,B%,1)
`6�Xg%=92�
`@B$+=�A%:Xg%=0
`J�
`T�A%=34�Vg%=0�Ug%+=1
`^
�Ug%�2=0�
`h�A%=40�Vg%+=1
`r�A%=41�Vg%-=1
`|�A%=123�Wg%+=1
`��A%=125�Wg%-=1
`��Vg%=0�Wg%=0�
`��(A%=32�A%=47)�B%>1�F%=�
`��
`��
`�Xg%=A%:�F%=0�A%<>92�B$+=�A%
`��
`��F%<>0�B%=l%:�B%=l%�B%+=1
`�B$=�Yg(B$)
`�Ub$=�Zg(�Yg(�Ub$,B%)))
`�=�ag(B$)
`�ݤag(B$)
a
�l%,r%
al%=�B$:r%=��B$,1)
a �l%=34�r%=34�B$=�B$,2,�B$-2)
a&�l%=123�r%=125�
a0*r%=�V_(�B$,2,�B$-2)):B$=�se("$status")
a:�
aD=B$
aXݤFg(A$)
ab�B$,l%,c%:B$=""
al0�l%=1��A$:c%=��A$,l%,1):�c%>96�c%<123�c%-=32
avB$+=�c%:�:=B$
a�ݤZg(A$)
a�@�A$="-"�A$=�Sf(�T_(O_%)):�Zb("Continuation line:"+A$):O_%+=1
a�=A$
a�
ݤxb(�A$)
a�&�B$,A%,B%:ȕ�A$,1)="/":A$=�A$,2):�
a�$A%=�A$,"="):�A%=0�A$=�rc(A$):=""
a�"B$=�A$,A%+1):A$=�rc(�A$,A%-1))
a�=�ag(B$)
a���me
a��Y_("",�Q_("Exit"),"")
bX_%=�:�
bݤn_(A$)
b 
�A$=""�=1
b*
=�(A$)
b>ݤd(A%,B%,C%,D%)
bH
=�(b_)
b\��D_
bf
�A$,B$
bpș16�A$
bz1A$=�A$,��rc(A$),"!runi")):Id%=0:L_$="":bg$=""
b�A$=�A$,�A$," ")+1)
b��
b�B$=�wb(A$)
b�
Ȏ�B$,2)�
b��"-f":L_$=�wb(A$)
b� �"-a":L_$="SLIPdial:default"
b��"-q":Id%=�
b�+�"-s":d_%=��wb(A$):�d_%<&1B00�d_%=&1B00
b�:bg$=bg$+B$+" "
b��
b�
�B$=""
b��
c
ݤcg(�A$)
c�B$,a%:a%=�A$," ")
c
�a%>0�
c$'B$=�Yg(�A$,a%-1)):A$=�Yg(�A$,a%+1))
c.�
c8B$=A$:A$=""
cB�
cL=B$
c`��Be(N$)
cj$�Za("$caller",dg$):X_%=0:�M_(N$)
ct�
c���M_(N$)
c� �X_%<>0��Zb(�Q_("Eload1")):�
c��eg
c�p%=0:�bg$>""�
c�/�:p%+=1:B$=�wb(bg$):�Za("p"+�p%,B$):�bg$=""
c��
c��N$>""��fg(N$,0)�
c�7�Y_(�Q_("Sload2")," "," "):dg$=N$:�Za("$script",N$)
c�X_%=�:O_%=0:�ob
c��
c��
d
��eg
dpd%=0:ua%=0:sd%=19200:�md
d*pe%=1:qe%=30:n_%=�:W_%=0:i_$="":tb$=""
d(0sb%=0:Eg%=0:`_$()="":A`$()="":__%=0:K`$()=""
d2.�n%=0�E`%:�F`$(n%,0),1)<>"$"�F`$(n%,0)=""
d<�
dF@�n%=0�N`%:�P`%(n%)>0�!Oa%=-2:Oa%!4=P`%(n%):ș393412,,Oa%�;F%
dP0�:R`$()="":P`%()=0:Q`$()="":K`$()="":L`%()=0
dZ.a`%()=0:Y`$()="":X`$()="":V`%()=0:U`$()=""
ddT`$()="":k`$()="":__$()=""
dny_$()="":y_%()=0
dx�
d�ݤfg(N$,gg%)
d��A$,r%,p_%
d�ș131080,23,N$�r%:�r%<>1�=0
d�r%=0:p_%=�La(N$)
d�(�p_%=0��Zb("File not found: "+N$):=0
d��gg%=0�W_%=0:D`%=1
d�A$=�#p_%
d��A$,"slipdial")>0�
d�
�A$=�#p_%
d��A$,1)<>"#"�A$>""�
d��hg(A$,W_%)
d��A$,1)=":"�
eA$=�A$,2):B$=�wb(A$)
eG�B$="autoexec"�C`%(0)=W_%:C`$(0)=B$�C`%(D`%)=W_%:C`$(D`%)=B$:D`%+=1
e�
e"
W_%+=1
e,�
e6
��#p_%
e@�W_%>2000�
eJ!�Ma(p_%):�rb(�Q_("Elong")):=0
eT�
e^r%=1
eh�
er�
e|�rb(�Q_("Eload2")):=0
e��
e��Ma(p_%)
e�=r%
e���hg(A$,n%)
e��n%>k_%�
e�	Ȏn%�
e��0:�ig$(199)
e��200:�jg$(199)
e��400:�kg$(199)
e��600:�lg$(199)
e��800:�mg$(199)
e��1000:�ng$(199)
f�1200:�og$(199)
f�1400:�pg$(199)
f�1600:�qg$(199)
f&�1800:�rg$(199)
f0�2000:�sg$(199)
f:�
fD
k_%=n%
fN�
fXȎ(n%�200)�
fb�0:ig$(n%)=A$
fl�1:jg$(n%-200)=A$
fv�2:kg$(n%-400)=A$
f��3:lg$(n%-600)=A$
f��4:mg$(n%-800)=A$
f��5:ng$(n%-1000)=A$
f��6:og$(n%-1200)=A$
f��7:pg$(n%-1400)=A$
f��8:qg$(n%-1600)=A$
f��9:rg$(n%-1800)=A$
f��10:sg$(n%-2000)=A$
f��
f��
f�ݤT_(n%)
f��n%>k_%�=""
g�A$:Ȏ(n%�200)�
g�0:A$=ig$(n%)
g�1:A$=jg$(n%-200)
g �2:A$=kg$(n%-400)
g*�3:A$=lg$(n%-600)
g4�4:A$=mg$(n%-800)
g>�5:A$=ng$(n%-1000)
gH�6:A$=og$(n%-1200)
gR�7:A$=pg$(n%-1400)
g\�8:A$=qg$(n%-1600)
gf�9:A$=rg$(n%-1800)
gp�10:A$=sg$(n%-2000)
gz:A$=""
g��
g�=A$
g�
ݤAe(tg$)
g��r%,ug%,B$
g�#B$=�wb(tg$):�Zb(�ab("Slib",B$))
g�ug%=C`%(0)
g�r%=�fg(B$,1)
g�.�ug%<>C`%(0)�r%<>0��Rb("call auto "+tg$,0)
g�=r%
g���Vc(A$)
g��tc%,vg%
h�P_(�Q_("Slist"))
htc%=��wb(A$):vg%=�A$
h�tc%<0�tc%=0
h$�vg%=0�vg%>W_%�vg%=W_%
h.�c%=tc%�vg%
h8A$=�c%:�c%=O_%�A$="*"+A$
hBA$=�"   "+A$,4)+" "
hL�P_(A$+�T_(c%))
hV�
h`�
ht��sf
h~�tf("Label","Line")
h�+�n%:�n%=0�D`%-1:�tf(C`$(n%),�C`%(n%)):�
h��
h�ݤN_(A$)
h��r%:r%=0
h��Za("$init","ATZQ0V1")
h��Za("$busy","BUSY")
h��Za("$conn","CONNECT")
h��Za("$nocarr","NO CARRIER")
h� �Za("$nodial","NO DIALTONE")
h��A$>""�
h�$�A$,".")=0�A$="SlipDialDrv:"+A$
ir%=�`d(A$)
i
�
i=r%
i(
ݤ`d(L_$)
i2�r%,p_%,B$,C$
i<r%=0
iF�B$=�wb(L_$)
iPp_%=�La(B$)
iZ�p_%=0�
id�Zb(�ab("Fsource",B$)):=0
in�
ix
�C$=�#p_%
i��C$,1)<>"#"�C$>""�
i�r%=�V_(C$)
i��
i�
��#p_%
i��Ma(p_%)
i��
i��L_$=""
i�=r%
i���je(A$)
i�#�p_%,n%,r%,B$,C$:v`%=�:yb$()=""
i��A$=""�
i��Ob(�Q_("Hannounce"))
jn%=0:C$=""
j
�B$=""
j�
j"4ș131084,9,_`$+".help",a_%,1,n%,255,"*"�,,,r%,n%
j,#C$=�Ub(a_%):B$+=C$+�15-�C$," ")
j6�n%=-1��B$>60
j@�Ob(B$)
jJ�n%=-1:�Ob("")
jT�
j^ p_%=�La(_`$+".Help."+A$+"*")
jh�p_%>0�
jr�Ob("Help on "+A$+":")
j|n%=0
j��
j�!B$=�#p_%:�B$>""�n%+=1:�Ob(B$)
j���#p_%�n%>r`%
j��Ob(""):�Ma(p_%)
j��
j��je("")
j��
j��
j��
j�
��le(Va$)
j��Y_(�Q_("Quit2"),Va$,"")
j��Tb
k�
k�
k&��G_
k04p_%=�La(z`$+".!Config"):�p_%=0��0,"No config!":�
k:�dc(Ua%,1,�#p_%)
kD�dc(Ua%,2,�#p_%)
kN�dc(Ua%,3,�#p_%)
kX�_a(Ua%,4,�#p_%)
kb��#p_%��_a(Ua%,7,�#p_%)
kl��#p_%��_a(Ua%,8,�#p_%)
kv��#p_%��_a(Ua%,12,�#p_%)
k���#p_%��dc(Ua%,13,�#p_%)
k���#p_%��dc(Ua%,14,�#p_%)
k��Ma(p_%)
k�"J_%=��Qb(Ua%,7):�J_%<24�J_%=24
k�I_%=��Qb(Ua%,8)
k�Aa%=�ec(Ua%,13)
k�#�I_%<40�I_%=40��I_%>240�I_%=240
k�i`%=��Qb(Ua%,12)
k�#�i`%<10�i`%=10��i`%>100�i`%=100
k�ș6,121,(2�&80)�,A%
k�/�L_$=""��ec(Ua%,3)=0�A%<>&FF�L_$=�Qb(Ua%,4)
k�'�Id%=0��ec(Ua%,1)=0��_b(Sa%,0,-200)
k��
l��pb
l$p_%=�Vf(z`$+".!Config"):�p_%=0��
l �#p_%,�ec(Ua%,1)
l*�#p_%,�ec(Ua%,2)
l4�#p_%,�ec(Ua%,3)
l>�#p_%,�Qb(Ua%,4)
lH�#p_%,�Qb(Ua%,7)
lR�#p_%,�Qb(Ua%,8)
l\�#p_%,�Qb(Ua%,12)
lf%�#p_%,�ec(Ua%,13):Aa%=�ec(Ua%,13)
lp�#p_%,�ec(Ua%,14)
lz�Ma(p_%)
l��ec(Ua%,14)=0�
l�%p_%=�Vf(z`$+".!windows"):�p_%=0��
l�!q%=Sa%:ș262347,,q%
l��#p_%,�(q%!4)
l��#p_%,�(q%!8)
l��Ma(p_%)
l��
l��
l�ݤH_(A%)
l��-�<(A%+&2000)�=�
l�=�
mݤce(A$)
m�f$,wg,xg%:xg%=0
mf$=�wb(A$):�f$>""�
m$]wg=�yg("<Mail$Dir>.folder."+f$+"News")-�yg("<Mail$Dir>.folder."+f$+"NG"):�Zb("Time "+�wg)
m.8�wg>0�xg%=100*�zg("<Mail$Dir>.folder."+f$+"News")/wg
m8�
mB=xg%
mVݤyg(f$)
m`�_g%,`g%,Ah%
mj"ș131080,17,f$�_g%,,`g%,Ah%;F%
mt.�_g%=0�(F%�1)<>0��Zb(�ab("Enofile",f$)):=0
m~=(`g%�&FF)*2^32+Ah%
m�ݤzg(f$)
m��Od%,_g%
m� ș131080,17,f$�_g%,,,,Od%;F%
m�.�_g%=0�(F%�1)<>0��Zb(�ab("Enofile",f$)):=0
m�=Od%
m�ݤYg(A$)
m��B$:�A$>""��Bh%,A$,B$
m�=B$
nݤrc(A$)
n
�A$>""��Ch%,A$
n=A$
n(ݤUb(a%)
n2�Dh%,B$
n<�Eh%,Dh%,a%,B$
nF=B$
nZ��B_
nd
�o%,l%,F%
nn'ș131080,17,z`$+".code"�o%,,,,l%;F%
nx�o%=1�l%>0�(F%�1)=0�
n��Fh% l%
n�"Gh%=Fh%+4:Hh%=Fh%+8:Eh%=Fh%+12
n�$Ih%=Fh%+16:Jh%=Fh%+20:Ch%=Fh%+24
n�$Bh%=Fh%+28:Kh%=Fh%+32:Lh%=Fh%+36
n�Mh%=Fh%+40
n�%ș131080,16,z`$+".code",Fh%,0�;F%
n�1�(F%�1)��0,"Help! I can't find my Code file!"
n��
n�)�0,"Help! I can't find my Code file!"
n��
n��
n�ݤma(�F`%,Od%,A$)
o�F%,Nh%
o
�c_%<&A5�
oș131102,6,,,Od%�,,F`%;F%
o"�(F%�1)�F`%=0
o,Nh%=F`%
o6�
o@9ș&20066,0,-1,Od%,-1,0,-1,0,0,Fa$+"_"+A$�,Nh%,,F`%;F%
oJ�(F%�1)�F`%=0:Nh%=0
oT�
o^=Nh%
or��pa(�F`%)
o|�F%
o��F`%>0�
o�
�c_%<&A5�
o�ș131102,7,,F`%�;F%:F`%=0
o�ș131114,1,(-16*1024*1024)
o��
o�ș&20066,1,F`%�;F%:F`%=0
o��
o��
o��
o���Oh
o�
�A%,N%,P%
o�
�c_%>&A4�
pș&66,3,-1�,A%
pȕA%<>-1
pș&66,2,A%�,,,,,,,,P%
p&ș&66,3,A%�,N%
p0(�Ub(P%),1+�Fa$)=Fa$+"_"�ș&66,1,A%
p:	A%=N%
pD�
pN�
pX�
plݤSg(�A$,s$)
pv
�B$,l%
p�l%=�A$,s$)
p�
�l%>0�
p�B$=�A$,l%-1):A$=�A$,l%+1)
p��
p�B$=A$:A$=""
p��
p�=B$
p���C_
p�&ș398592,,_`$+".messages"�,,id%;F%
p�-�(F%�1)��0,"Couldn't load Messages file!"
p��Ph%16,Qh% id%
p�$ș267521,Ph%,_`$+".messages",Qh%
q�
q��gb
q �Ph%>0�ș267524,Ph%
q*�
q>ݤQ_(t$)
qH�s%
qRș267522,Ph%,t$�,,s%
q\=�Ub(s%)
qfݤab(t$,a$)
qp�s%
qz#ș267522,Ph%,t$,a_%,255,a$�,,s%
q�=�Ub(s%)
q�ݤvb(t$,a$,b$)
q��s%
q�&ș267522,Ph%,t$,a_%,255,a$,b$�,,s%
q�=�Ub(s%)
q�ݤRh(t$,a$,b$,c$)
q��s%
q�)ș267522,Ph%,t$,a_%,255,a$,b$,c$�,,s%
q�=�Ub(s%)
�
00000000  0d 00 14 13 ee 85 f6 3a  f1 22 20 61 74 20 22 3b  |.......:." at ";|
00000010  9e 3a e0 0d 00 1e 0d e0  3d 93 2b 26 32 30 30 30  |.:......=.+&2000|
00000020  0d 00 28 07 f2 41 5f 0d  00 32 07 f2 42 5f 0d 00  |..(..A_..2..B_..|
00000030  3c 07 f2 43 5f 0d 00 46  07 f2 44 5f 0d 00 50 07  |<..C_..F..D_..P.|
00000040  f2 45 5f 0d 00 5a 0b ee  85 f2 46 5f 3a e0 0d 00  |.E_..Z....F_:...|
00000050  64 07 f2 47 5f 0d 00 6e  20 c8 95 a4 48 5f 28 49  |d..G_..n ...H_(I|
00000060  5f 25 81 32 2a 4a 5f 25  29 3a e0 3d 93 2b 26 32  |_%.2*J_%):.=.+&2|
00000070  30 30 30 3a ce 0d 00 78  07 f2 4b 5f 0d 00 82 1c  |000:...x..K_....|
00000080  c8 99 31 33 31 30 38 30  2c 31 37 2c 4c 5f 24 b8  |..131080,17,L_$.|
00000090  41 25 2c 2c 2c 2c 53 25  0d 00 8c 19 c8 95 a4 48  |A%,,,,S%.......H|
000000a0  5f 28 53 25 29 3a e0 3d  93 2b 26 32 30 30 30 3a  |_(S%):.=.+&2000:|
000000b0  ce 0d 00 96 0c f2 4d 5f  28 4c 5f 24 29 0d 00 a0  |......M_(L_$)...|
000000c0  0e 41 25 3d a4 4e 5f 28  22 22 29 0d 00 aa 05 f5  |.A%=.N_("").....|
000000d0  0d 00 b4 09 4f 5f 25 3d  30 0d 00 be 05 f5 0d 00  |....O_%=0.......|
000000e0  c8 29 e7 a4 48 5f 28 30  29 8c f2 50 5f 28 a4 51  |.)..H_(0)..P_(.Q|
000000f0  5f 28 22 4d 6f 72 65 4d  65 6d 22 29 29 3a e0 3d  |_("MoreMem")):.=|
00000100  93 2b 26 32 30 30 30 0d  00 d2 22 e7 a4 52 5f 8c  |.+&2000..."..R_.|
00000110  41 24 3d a4 53 5f 8b 41  24 3d a4 54 5f 28 4f 5f  |A$=.S_.A$=.T_(O_|
00000120  25 29 3a 4f 5f 25 2b 3d  31 0d 00 dc 0f 55 5f 25  |%):O_%+=1....U_%|
00000130  3d a4 56 5f 28 41 24 29  0d 00 e6 13 fd 4f 5f 25  |=.V_(A$).....O_%|
00000140  3e 3d 57 5f 25 84 58 5f  25 3d a3 0d 00 f0 2a 58  |>=W_%.X_%=....*X|
00000150  5f 25 3d a3 3a e7 4f 5f  25 3e 3d 57 5f 25 8c f2  |_%=.:.O_%>=W_%..|
00000160  59 5f 28 22 22 2c a4 51  5f 28 22 49 64 6c 65 22  |Y_("",.Q_("Idle"|
00000170  29 2c 22 22 29 0d 00 fa  07 f2 5a 5f 0d 01 04 06  |),"").....Z_....|
00000180  fd 30 0d 01 0e 05 e0 0d  01 2c 08 dd f2 41 5f 0d  |.0.......,...A_.|
00000190  01 36 14 de 61 5f 25 20  32 35 36 2c 62 5f 20 34  |.6..a_% 256,b_ 4|
000001a0  30 39 36 0d 01 40 16 c8  99 36 2c 31 32 39 2c 30  |096..@...6,129,0|
000001b0  2c 26 46 46 b8 2c 63 5f  25 0d 01 4a 0d 64 5f 25  |,&FF.,c_%..J.d_%|
000001c0  3d 26 31 42 30 30 0d 01  54 09 65 5f 25 3d a3 0d  |=&1B00..T.e_%=..|
000001d0  01 5e 2e 66 5f 25 3d 31  3a 67 5f 25 3d 30 3a 68  |.^.f_%=1:g_%=0:h|
000001e0  5f 25 3d a3 3a 69 5f 25  3d a3 3a 58 5f 25 3d a3  |_%=.:i_%=.:X_%=.|
000001f0  3a 6a 5f 25 3d 30 3a 6b  5f 25 3d 2d 31 0d 01 68  |:j_%=0:k_%=-1..h|
00000200  34 6c 5f 25 3d a3 3a 6d  5f 25 3d 30 3a 6e 5f 25  |4l_%=.:m_%=0:n_%|
00000210  3d a3 3a 6f 5f 25 3d 30  3a 70 5f 25 3d 30 3a 71  |=.:o_%=0:p_%=0:q|
00000220  5f 25 3d 30 3a 72 5f 24  3d 22 22 3a 4f 5f 25 3d  |_%=0:r_$="":O_%=|
00000230  30 0d 01 72 1d 73 5f 25  3d 32 30 3a de 74 5f 25  |0..r.s_%=20:.t_%|
00000240  28 73 5f 25 29 2c 75 5f  25 28 73 5f 25 29 0d 01  |(s_%),u_%(s_%)..|
00000250  7c 2a 76 5f 25 3d 31 30  3a de 77 5f 24 28 76 5f  ||*v_%=10:.w_$(v_|
00000260  25 29 2c 78 5f 25 20 76  5f 25 2c 79 5f 24 28 33  |%),x_% v_%,y_$(3|
00000270  29 2c 79 5f 25 28 33 29  0d 01 86 24 7a 5f 25 3d  |),y_%(3)...$z_%=|
00000280  33 30 3a de 5f 5f 24 28  7a 5f 25 2c 31 29 2c 60  |30:.__$(z_%,1),`|
00000290  5f 24 28 31 29 2c 41 60  24 28 31 29 0d 01 90 2a  |_$(1),A`$(1)...*|
000002a0  42 60 25 3d 35 30 3a de  43 60 25 28 42 60 25 29  |B`%=50:.C`%(B`%)|
000002b0  2c 43 60 24 28 42 60 25  29 3a 44 60 25 3d 30 3a  |,C`$(B`%):D`%=0:|
000002c0  55 5f 24 3d 22 22 0d 01  9a 33 45 60 25 3d 31 35  |U_$=""...3E`%=15|
000002d0  30 3a de 46 60 24 28 45  60 25 2c 31 29 2c 47 60  |0:.F`$(E`%,1),G`|
000002e0  24 28 33 29 2c 48 60 24  28 33 29 2c 49 60 24 28  |$(3),H`$(3),I`$(|
000002f0  31 30 29 3a 49 60 25 3d  30 0d 01 a4 28 4a 60 25  |10):I`%=0...(J`%|
00000300  3d 31 30 3a de 4b 60 24  28 4a 60 25 2c 31 29 2c  |=10:.K`$(J`%,1),|
00000310  4c 60 25 28 4a 60 25 29  2c 4d 60 24 28 4a 60 25  |L`%(J`%),M`$(J`%|
00000320  29 0d 01 ae 27 4e 60 25  3d 38 3a de 4f 60 24 28  |)...'N`%=8:.O`$(|
00000330  4e 60 25 29 2c 50 60 24  28 4e 60 25 29 2c 51 60  |N`%),P`$(N`%),Q`|
00000340  24 28 4e 60 25 2c 31 29  0d 01 b8 16 de 52 60 24  |$(N`%,1).....R`$|
00000350  28 4e 60 25 29 2c 50 60  25 28 4e 60 25 29 0d 01  |(N`%),P`%(N`%)..|
00000360  c2 25 53 60 25 3d 38 3a  de 54 60 24 28 53 60 25  |.%S`%=8:.T`$(S`%|
00000370  29 2c 55 60 24 28 53 60  25 29 2c 56 60 25 28 53  |),U`$(S`%),V`%(S|
00000380  60 25 29 0d 01 cc 25 57  60 25 3d 38 3a de 58 60  |`%)...%W`%=8:.X`|
00000390  24 28 57 60 25 29 2c 59  60 24 28 57 60 25 29 2c  |$(W`%),Y`$(W`%),|
000003a0  5a 60 24 28 57 60 25 29  0d 01 d6 28 de 61 60 25  |Z`$(W`%)...(.a`%|
000003b0  28 57 60 25 29 2c 62 60  25 28 57 60 25 29 2c 63  |(W`%),b`%(W`%),c|
000003c0  60 24 28 57 60 25 29 2c  64 60 25 28 57 60 25 29  |`$(W`%),d`%(W`%)|
000003d0  0d 01 e0 28 de 65 60 25  28 57 60 25 29 2c 66 60  |...(.e`%(W`%),f`|
000003e0  25 28 57 60 25 29 2c 67  60 25 28 57 60 25 29 2c  |%(W`%),g`%(W`%),|
000003f0  68 60 25 28 57 60 25 29  0d 01 ea 2f 48 60 25 3d  |h`%(W`%).../H`%=|
00000400  2d 31 3a 64 60 25 28 29  3d 30 3a 66 60 25 28 29  |-1:d`%()=0:f`%()|
00000410  3d 30 3a 69 60 25 3d 32  39 3a 49 5f 25 3d 38 30  |=0:i`%=29:I_%=80|
00000420  3a 4a 5f 25 3d 32 34 0d  01 f4 2e 6a 60 25 3d 31  |:J_%=24....j`%=1|
00000430  30 3a de 6b 60 24 28 6a  60 25 29 2c 6b 60 25 28  |0:.k`$(j`%),k`%(|
00000440  6a 60 25 29 2c 6c 60 25  28 6a 60 25 29 3a 6b 60  |j`%),l`%(j`%):k`|
00000450  25 28 29 3d b9 0d 01 fe  2f 6d 60 25 3d 31 30 3a  |%()=..../m`%=10:|
00000460  de 6e 60 25 28 6d 60 25  29 2c 6f 60 24 28 6d 60  |.n`%(m`%),o`$(m`|
00000470  25 29 2c 70 60 25 28 6d  60 25 29 2c 71 60 24 28  |%),p`%(m`%),q`$(|
00000480  6d 60 25 29 0d 02 08 30  72 60 25 3d 32 35 3a 73  |m`%)...0r`%=25:s|
00000490  60 24 3d 22 22 3a 74 60  24 3d 22 22 3a 75 60 25  |`$="":t`$="":u`%|
000004a0  3d 30 3a 73 60 25 3d 30  3a 76 60 25 3d b9 3a 77  |=0:s`%=0:v`%=.:w|
000004b0  60 25 3d 30 0d 02 12 1b  78 60 24 3d a4 79 60 28  |`%=0....x`$=.y`(|
000004c0  22 53 6c 69 70 64 69 61  6c 24 64 69 72 22 29 0d  |"Slipdial$dir").|
000004d0  02 1c 21 7a 60 24 3d a4  79 60 28 22 53 6c 69 70  |..!z`$=.y`("Slip|
000004e0  64 69 61 6c 24 72 65 73  6f 75 72 63 65 73 22 29  |dial$resources")|
000004f0  0d 02 26 29 5f 60 24 3d  7a 60 24 2b 22 2e 55 4b  |..&)_`$=z`$+".UK|
00000500  22 3a 60 60 24 3d 22 22  3a 41 61 25 3d 31 3a 42  |":``$="":Aa%=1:B|
00000510  61 24 3d 22 6e 6f 6e 65  22 0d 02 30 05 e1 0d 02  |a$="none"..0....|
00000520  4e 08 dd f2 45 5f 0d 02  58 1d de 43 61 25 20 64  |N...E_..X..Ca% d|
00000530  5f 25 3a 21 43 61 25 3d  64 5f 25 3a 43 61 25 21  |_%:!Ca%=d_%:Ca%!|
00000540  38 3d 30 0d 02 62 11 c8  99 34 36 2c 26 31 30 39  |8=0..b...46,&109|
00000550  2c 43 61 25 0d 02 6c 35  e7 a4 44 61 28 7a 60 24  |,Ca%..l5..Da(z`$|
00000560  2b 22 2e 53 70 72 69 74  65 73 22 29 3d 30 8c 85  |+".Sprites")=0..|
00000570  30 2c 22 43 6f 75 6c 64  6e 27 74 20 6c 6f 61 64  |0,"Couldn't load|
00000580  20 73 70 72 69 74 65 73  22 0d 02 76 24 de 45 61  | sprites"..v$.Ea|
00000590  25 34 3a 24 45 61 25 3d  22 54 41 53 4b 22 3a 46  |%4:$Ea%="TASK":F|
000005a0  61 24 3d 22 53 4c 49 50  64 69 61 6c 22 0d 02 80  |a$="SLIPdial"...|
000005b0  10 de 47 61 25 34 3a 21  47 61 25 3d 30 0d 02 8a  |..Ga%4:!Ga%=0...|
000005c0  25 c8 99 32 36 32 33 33  36 2c 33 31 30 2c 21 45  |%..262336,310,!E|
000005d0  61 25 2c 46 61 24 2c 47  61 25 b8 48 61 25 2c 49  |a%,Fa$,Ga%.Ha%,I|
000005e0  61 25 0d 02 94 28 e7 48  61 25 3c 33 31 30 8c 85  |a%...(.Ha%<310..|
000005f0  31 2c 22 57 69 6e 64 6f  77 20 4d 61 6e 61 67 65  |1,"Window Manage|
00000600  72 20 74 6f 6f 20 6f 6c  64 22 0d 02 9e 0f 4a 61  |r too old"....Ja|
00000610  25 3d 30 3a 4b 61 25 3d  30 0d 02 a8 1c 70 5f 25  |%=0:Ka%=0....p_%|
00000620  3d a4 4c 61 28 7a 60 24  2b 22 2e 21 77 69 6e 64  |=.La(z`$+".!wind|
00000630  6f 77 73 22 29 0d 02 b2  0b e7 70 5f 25 3e 30 8c  |ows").....p_%>0.|
00000640  0d 02 bc 19 4a 61 25 3d  bb be 23 70 5f 25 3a 4b  |....Ja%=..#p_%:K|
00000650  61 25 3d bb be 23 70 5f  25 0d 02 c6 05 cd 0d 02  |a%=..#p_%.......|
00000660  d0 0c f2 4d 61 28 70 5f  25 29 0d 02 da 23 de 71  |...Ma(p_%)...#.q|
00000670  25 26 34 30 30 2c 4e 61  25 26 32 30 30 2c 4f 61  |%&400,Na%&200,Oa|
00000680  25 26 31 30 30 2c 50 61  25 26 31 30 30 0d 02 e4  |%&100,Pa%&100...|
00000690  1e c8 99 32 36 32 33 36  31 2c 2c 5f 60 24 2b 22  |...262361,,_`$+"|
000006a0  2e 54 65 6d 70 6c 61 74  65 73 22 0d 02 ee 13 51  |.Templates"....Q|
000006b0  61 25 3d a4 52 61 28 22  49 6e 66 6f 22 29 0d 02  |a%=.Ra("Info")..|
000006c0  f8 15 53 61 25 3d a4 52  61 28 22 53 74 61 74 75  |..Sa%=.Ra("Statu|
000006d0  73 22 29 0d 03 02 15 54  61 25 3d a4 52 61 28 22  |s")....Ta%=.Ra("|
000006e0  74 78 74 77 69 6e 22 29  0d 03 0c 15 55 61 25 3d  |txtwin")....Ua%=|
000006f0  a4 52 61 28 22 63 6f 6e  66 69 67 22 29 0d 03 16  |.Ra("config")...|
00000700  16 56 61 25 3d a4 52 61  28 22 6d 65 73 73 61 67  |.Va%=.Ra("messag|
00000710  65 22 29 0d 03 20 14 57  61 25 3d a4 52 61 28 22  |e").. .Wa%=.Ra("|
00000720  69 6e 70 75 74 22 29 0d  03 2a 14 58 61 25 3d a4  |input")..*.Xa%=.|
00000730  52 61 28 22 79 65 73 6e  6f 22 29 0d 03 34 0c c8  |Ra("yesno")..4..|
00000740  99 32 36 32 33 36 32 0d  03 3e 34 f2 59 61 28 51  |.262362..>4.Ya(Q|
00000750  61 25 2c 34 2c 22 30 2e  33 33 20 28 31 37 2d 46  |a%,4,"0.33 (17-F|
00000760  65 62 2d 31 39 39 35 29  22 29 3a f2 5a 61 28 22  |eb-1995)"):.Za("|
00000770  24 76 65 72 22 2c 22 33  33 22 29 0d 03 48 1f 61  |$ver","33")..H.a|
00000780  61 24 3d 22 6e 6f 64 65  76 22 3a 62 61 25 3d a4  |a$="nodev":ba%=.|
00000790  63 61 28 61 61 24 2c 2d  31 29 0d 03 52 24 e7 62  |ca(aa$,-1)..R$.b|
000007a0  61 25 3d 30 8c 85 30 2c  22 43 6f 75 6c 64 6e 27  |a%=0..0,"Couldn'|
000007b0  74 20 63 72 65 61 74 65  20 69 63 6f 6e 22 0d 03  |t create icon"..|
000007c0  5c 24 4d 25 3d 25 31 30  30 30 30 30 30 31 31 30  |\$M%=%1000000110|
000007d0  30 30 30 30 31 31 30 30  30 30 3a 64 61 25 3d 2d  |0000110000:da%=-|
000007e0  32 30 0d 03 66 14 c8 99  36 36 b8 65 61 25 3a 66  |20..f...66.ea%:f|
000007f0  61 25 3d 65 61 25 0d 03  70 1f 67 61 25 3d 66 61  |a%=ea%..p.ga%=fa|
00000800  25 3a 68 61 25 3d 66 61  25 3a f2 69 61 3a f2 6a  |%:ha%=fa%:.ia:.j|
00000810  61 28 22 22 29 0d 03 7a  05 e1 0d 03 8e 0c dd a4  |a("")..z........|
00000820  52 61 28 41 24 29 0d 03  98 18 ea 62 25 2c 69 25  |Ra(A$).....b%,i%|
00000830  2c 73 25 2c 6b 61 25 2c  6c 61 25 2c 68 25 0d 03  |,s%,ka%,la%,h%..|
00000840  a2 23 c8 99 32 36 32 33  36 33 2c 2c 2d 31 2c 30  |.#..262363,,-1,0|
00000850  2c 30 2c 2d 31 2c 41 24  2c 30 b8 2c 62 25 2c 69  |,0,-1,A$,0.,b%,i|
00000860  25 0d 03 ac 21 73 25 3d  a4 6d 61 28 6b 61 25 2c  |%...!s%=.ma(ka%,|
00000870  62 25 2c 22 54 42 55 46  22 29 3a de 6c 61 25 20  |b%,"TBUF"):.la% |
00000880  69 25 0d 03 b6 24 c8 99  32 36 32 33 36 33 2c 2c  |i%...$..262363,,|
00000890  6b 61 25 2c 6c 61 25 2c  6c 61 25 2b 69 25 2c 2d  |ka%,la%,la%+i%,-|
000008a0  31 2c 41 24 2c 30 0d 03  c0 1c e7 41 24 3d 22 6d  |1,A$,0.....A$="m|
000008b0  65 73 73 61 67 65 22 8c  6e 61 25 3d 6b 61 25 21  |essage".na%=ka%!|
000008c0  37 32 0d 03 ca 21 e7 41  24 3d 22 53 74 61 74 75  |72...!.A$="Statu|
000008d0  73 22 8c f2 6f 61 28 6b  61 25 2c 4a 61 25 2c 4b  |s"..oa(ka%,Ja%,K|
000008e0  61 25 29 0d 03 d4 27 6b  61 25 21 36 34 3d 43 61  |a%)...'ka%!64=Ca|
000008f0  25 3a c8 99 32 36 32 33  33 37 2c 2c 6b 61 25 b8  |%:..262337,,ka%.|
00000900  68 25 3a f2 70 61 28 73  25 29 0d 03 de 07 3d 68  |h%:.pa(s%)....=h|
00000910  25 0d 03 f2 12 dd f2 6f  61 28 71 25 2c 78 25 2c  |%......oa(q%,x%,|
00000920  79 25 29 0d 03 fc 0a ea  77 25 2c 68 25 0d 04 06  |y%).....w%,h%...|
00000930  0a e7 78 25 3e 30 8c 0d  04 10 1d 77 25 3d 71 25  |..x%>0.....w%=q%|
00000940  21 38 2d 21 71 25 3a 68  25 3d 71 25 21 31 32 2d  |!8-!q%:h%=q%!12-|
00000950  71 25 21 34 0d 04 1a 15  21 71 25 3d 78 25 3a 71  |q%!4....!q%=x%:q|
00000960  25 21 38 3d 78 25 2b 77  25 0d 04 24 17 71 25 21  |%!8=x%+w%..$.q%!|
00000970  34 3d 79 25 3a 71 25 21  31 32 3d 79 25 2b 68 25  |4=y%:q%!12=y%+h%|
00000980  0d 04 2e 05 cd 0d 04 38  05 e1 0d 04 56 0c dd a4  |.......8....V...|
00000990  44 61 28 41 24 29 0d 04  60 15 ea 73 25 2c 66 25  |Da(A$)..`..s%,f%|
000009a0  2c 6e 25 2c 72 25 3a 72  25 3d 30 0d 04 6a 1b c8  |,n%,r%:r%=0..j..|
000009b0  99 31 33 31 30 38 30 2c  31 37 2c 41 24 b8 41 25  |.131080,17,A$.A%|
000009c0  2c 2c 2c 2c 53 25 0d 04  74 21 c8 99 31 33 31 31  |,,,,S%..t!..1311|
000009d0  31 38 2c 26 31 30 38 2c  43 61 25 b8 2c 2c 73 25  |18,&108,Ca%.,,s%|
000009e0  2c 6e 25 2c 2c 66 25 0d  04 7e 16 e7 41 25 3d 31  |,n%,,f%..~..A%=1|
000009f0  80 53 25 3c 3d 28 73 25  2d 66 25 29 8c 0d 04 88  |.S%<=(s%-f%)....|
00000a00  23 c8 99 31 33 31 31 31  38 2c 26 31 30 42 2b 28  |#..131118,&10B+(|
00000a10  6e 25 3d 30 29 2c 43 61  25 2c 41 24 b8 3b 46 25  |n%=0),Ca%,A$.;F%|
00000a20  0d 04 92 19 e7 28 46 25  80 31 29 3d 30 8c 72 25  |.....(F%.1)=0.r%|
00000a30  3d 73 25 2d 66 25 2d 53  25 0d 04 9c 05 cd 0d 04  |=s%-f%-S%.......|
00000a40  a6 07 3d 72 25 0d 04 ba  08 dd a4 71 61 0d 04 c4  |..=r%......qa...|
00000a50  26 ea 73 25 2c 66 25 3a  c8 99 31 33 31 31 31 38  |&.s%,f%:..131118|
00000a60  2c 26 31 30 38 2c 43 61  25 b8 2c 2c 73 25 2c 2c  |,&108,Ca%.,,s%,,|
00000a70  2c 66 25 0d 04 ce 0a 3d  73 25 2d 66 25 0d 04 ec  |,f%....=s%-f%...|
00000a80  0f dd a4 63 61 28 41 24  2c 6e 25 29 0d 04 f6 11  |...ca(A$,n%)....|
00000a90  ea 5a 25 2c 72 61 25 2c  77 25 2c 68 25 0d 05 00  |.Z%,ra%,w%,h%...|
00000aa0  31 c8 99 34 36 2c 26 31  30 30 2b 34 30 2c 43 61  |1..46,&100+40,Ca|
00000ab0  25 2c 41 24 b8 2c 2c 2c  77 25 2c 68 25 3a e7 77  |%,A$.,,,w%,h%:.w|
00000ac0  25 3e 32 30 30 84 68 25  3e 37 30 8c 3d 30 0d 05  |%>200.h%>70.=0..|
00000ad0  0a 0a e7 6e 25 3c 30 8c  0d 05 14 11 21 4f 61 25  |...n%<0.....!Oa%|
00000ae0  3d 2d 31 3a 72 61 25 3d  30 0d 05 28 1d de 73 61  |=-1:ra%=0..(..sa|
00000af0  25 31 32 3a 24 73 61 25  3d 41 24 3a 4f 61 25 21  |%12:$sa%=A$:Oa%!|
00000b00  32 34 3d 73 61 25 0d 05  32 05 cc 0d 05 3c 0b 72  |24=sa%..2....<.r|
00000b10  61 25 3d 62 61 25 0d 05  46 23 e3 5a 25 3d 30 b8  |a%=ba%..F#.Z%=0.|
00000b20  6e 25 3a e7 50 60 25 28  5a 25 29 3e 30 8c 72 61  |n%:.P`%(Z%)>0.ra|
00000b30  25 3d 50 60 25 28 5a 25  29 0d 05 50 0d ed 3a 21  |%=P`%(Z%)..P..:!|
00000b40  4f 61 25 3d 2d 33 0d 05  64 1b de 4f 61 25 21 32  |Oa%=-3..d..Oa%!2|
00000b50  34 20 31 32 3a 24 28 4f  61 25 21 32 34 29 3d 41  |4 12:$(Oa%!24)=A|
00000b60  24 0d 05 6e 05 cd 0d 05  78 37 4f 61 25 21 34 3d  |$..n....x7Oa%!4=|
00000b70  30 3a 4f 61 25 21 38 3d  30 3a 4f 61 25 21 31 32  |0:Oa%!8=0:Oa%!12|
00000b80  3d 77 25 2a 32 3a 4f 61  25 21 31 36 3d 31 30 30  |=w%*2:Oa%!16=100|
00000b90  3a 4f 61 25 21 32 30 3d  26 33 31 30 32 0d 05 82  |:Oa%!20=&3102...|
00000ba0  18 4f 61 25 21 32 38 3d  43 61 25 3a 4f 61 25 21  |.Oa%!28=Ca%:Oa%!|
00000bb0  33 32 3d 31 31 0d 05 8c  18 c8 99 32 36 32 33 33  |32=11......26233|
00000bc0  38 2c 72 61 25 2c 4f 61  25 b8 63 61 25 0d 05 96  |8,ra%,Oa%.ca%...|
00000bd0  08 3d 63 61 25 0d 05 b4  08 dd f2 69 61 0d 05 be  |.=ca%......ia...|
00000be0  08 ea 74 61 24 0d 05 c8  0b e7 6c 5f 25 3d a3 8c  |..ta$.....l_%=..|
00000bf0  0d 05 d2 0f 74 61 24 3d  22 6e 6f 64 65 76 22 0d  |....ta$="nodev".|
00000c00  05 dc 05 cc 0d 05 e6 19  e7 28 a4 64 28 39 2c 75  |.........(.d(9,u|
00000c10  61 25 2c 30 2c 30 29 80  38 29 3d 30 8c 0d 05 f0  |a%,0,0).8)=0....|
00000c20  0d 74 61 24 3d 22 64 65  76 22 0d 05 fa 05 cc 0d  |.ta$="dev"......|
00000c30  06 04 2e e7 61 61 24 3d  22 6f 6e 6c 69 6e 65 31  |....aa$="online1|
00000c40  22 8c 74 61 24 3d 22 6f  6e 6c 69 6e 65 32 22 8b  |".ta$="online2".|
00000c50  74 61 24 3d 22 6f 6e 6c  69 6e 65 31 22 0d 06 0e  |ta$="online1"...|
00000c60  05 cd 0d 06 18 05 cd 0d  06 22 0b 68 61 25 3d 66  |.........".ha%=f|
00000c70  61 25 0d 06 2c 14 e7 73  61 25 3e 30 80 74 61 24  |a%..,..sa%>0.ta$|
00000c80  3c 3e 61 61 24 8c 0d 06  36 10 f2 76 61 28 61 61  |<>aa$...6..va(aa|
00000c90  24 2c 74 61 24 29 0d 06  40 0b 61 61 24 3d 74 61  |$,ta$)..@.aa$=ta|
00000ca0  24 0d 06 4a 22 c8 99 31  33 31 31 31 38 2c 26 31  |$..J"..131118,&1|
00000cb0  31 38 2c 43 61 25 2c 74  61 24 b8 2c 2c 77 61 25  |18,Ca%,ta$.,,wa%|
00000cc0  3b 46 25 0d 06 54 0e e7  28 46 25 80 31 29 3d 30  |;F%..T..(F%.1)=0|
00000cd0  8c 0d 06 5e 2b 24 73 61  25 3d 74 61 24 3a 21 71  |...^+$sa%=ta$:!q|
00000ce0  25 3d 2d 31 3a 71 25 21  34 3d 62 61 25 3a 71 25  |%=-1:q%!4=ba%:q%|
00000cf0  21 38 3d 30 3a 71 25 21  31 32 3d 30 0d 06 68 10  |!8=0:q%!12=0..h.|
00000d00  c8 99 32 36 32 33 34 39  2c 2c 71 25 0d 06 72 05  |..262349,,q%..r.|
00000d10  cd 0d 06 7c 05 cd 0d 06  86 05 e1 0d 06 a4 0f dd  |...|............|
00000d20  f2 76 61 28 41 24 2c 42  24 29 0d 06 ae 09 c8 8e  |.va(A$,B$)......|
00000d30  42 24 ca 0d 06 b8 4f c9  22 6e 6f 64 65 76 22 3a  |B$....O."nodev":|
00000d40  e7 41 24 3d 22 6f 6e 6c  69 6e 65 31 22 84 41 24  |.A$="online1".A$|
00000d50  3d 22 6f 6e 6c 69 6e 65  32 22 84 41 24 3d 22 64  |="online2".A$="d|
00000d60  65 76 22 8c f2 78 61 28  91 24 2b 22 3a 20 6f 66  |ev"..xa(.$+": of|
00000d70  66 6c 69 6e 65 20 61 66  74 65 72 20 22 2b 72 5f  |fline after "+r_|
00000d80  24 29 0d 06 c2 45 c9 22  6f 6e 6c 69 6e 65 31 22  |$)...E."online1"|
00000d90  3a e7 41 24 3c 3e 22 6f  6e 6c 69 6e 65 32 22 8c  |:.A$<>"online2".|
00000da0  f2 78 61 28 91 24 2b 22  3a 20 6f 6e 6c 69 6e 65  |.xa(.$+": online|
00000db0  20 74 6f 20 22 2b 42 61  24 29 3a 79 61 25 3d 66  | to "+Ba$):ya%=f|
00000dc0  61 25 3a 8b f2 7a 61 0d  06 cc 12 c9 22 6f 6e 6c  |a%:..za....."onl|
00000dd0  69 6e 65 32 22 3a f2 7a  61 0d 06 d6 05 cb 0d 06  |ine2":.za.......|
00000de0  e0 05 e1 0d 06 fe 08 dd  f2 7a 61 0d 07 08 07 ea  |.........za.....|
00000df0  54 25 0d 07 12 15 54 25  3d 94 28 66 61 25 2d 79  |T%....T%=.(fa%-y|
00000e00  61 25 29 81 31 30 30 0d  07 1c 1e 72 5f 24 3d c2  |a%).100....r_$=.|
00000e10  22 30 22 2b c3 28 54 25  81 33 36 30 30 29 2c 32  |"0"+.(T%.3600),2|
00000e20  29 2b 22 3a 22 0d 07 26  22 72 5f 24 2b 3d c2 22  |)+":"..&"r_$+=."|
00000e30  30 22 2b c3 28 28 54 25  81 36 30 29 83 36 30 29  |0"+.((T%.60).60)|
00000e40  2c 32 29 2b 22 3a 22 0d  07 30 19 72 5f 24 2b 3d  |,2)+":"..0.r_$+=|
00000e50  c2 22 30 22 2b c3 28 54  25 83 36 30 29 2c 32 29  |."0"+.(T%.60),2)|
00000e60  0d 07 3a 12 f2 5f 61 28  53 61 25 2c 38 2c 72 5f  |..:.._a(Sa%,8,r_|
00000e70  24 29 0d 07 44 05 e1 0d  07 62 0c dd f2 78 61 28  |$)..D....b...xa(|
00000e80  41 24 29 0d 07 6c 1b 70  5f 25 3d a4 60 61 28 78  |A$)..l.p_%=.`a(x|
00000e90  60 24 2b 22 2e 6c 6f 67  66 69 6c 65 22 29 0d 07  |`$+".logfile")..|
00000ea0  76 29 e7 70 5f 25 3c 3e  30 8c cf 23 70 5f 25 3d  |v).p_%<>0..#p_%=|
00000eb0  a2 23 70 5f 25 3a d5 23  70 5f 25 2c 41 24 3a f2  |.#p_%:.#p_%,A$:.|
00000ec0  4d 61 28 70 5f 25 29 0d  07 80 05 e1 0d 07 94 0d  |Ma(p_%).........|
00000ed0  dd f2 41 62 28 42 62 25  29 0d 07 a8 0c c8 99 36  |..Ab(Bb%)......6|
00000ee0  36 b8 66 61 25 0d 07 b2  18 e7 42 62 25 3e 3d 30  |6.fa%.....Bb%>=0|
00000ef0  84 65 61 25 2d 66 61 25  3c 42 62 25 8c 0d 07 bc  |.ea%-fa%<Bb%....|
00000f00  0b 65 61 25 3d 66 61 25  0d 07 c6 05 f5 0d 07 d0  |.ea%=fa%........|
00000f10  1d c8 99 32 36 32 33 36  39 2c 4d 25 2c 71 25 2c  |...262369,M%,q%,|
00000f20  66 61 25 2b 42 62 25 b8  52 25 0d 07 da 1a e7 6c  |fa%+Bb%.R%.....l|
00000f30  5f 25 8c 4a 25 3d a4 64  28 31 39 2c 75 61 25 2c  |_%.J%=.d(19,ua%,|
00000f40  30 2c 30 29 0d 07 e4 09  c8 8e 52 25 ca 0d 07 ee  |0,0)......R%....|
00000f50  0f c9 31 3a f2 43 62 28  21 71 25 29 0d 07 f8 37  |..1:.Cb(!q%)...7|
00000f60  c9 32 3a f2 44 62 28 21  71 25 2c 71 25 21 34 2c  |.2:.Db(!q%,q%!4,|
00000f70  71 25 21 38 2c 71 25 21  31 32 2c 71 25 21 31 36  |q%!8,q%!12,q%!16|
00000f80  2c 71 25 21 32 30 2c 71  25 21 32 34 2c 71 25 21  |,q%!20,q%!24,q%!|
00000f90  32 38 29 0d 08 02 0f c9  33 3a f2 45 62 28 21 71  |28).....3:.Eb(!q|
00000fa0  25 29 0d 08 0c 25 c9 36  3a f2 46 62 28 21 71 25  |%)...%.6:.Fb(!q%|
00000fb0  2c 71 25 21 34 2c 71 25  21 38 2c 71 25 21 31 32  |,q%!4,q%!8,q%!12|
00000fc0  2c 71 25 21 31 36 29 0d  08 16 1a c9 38 3a f2 47  |,q%!16).....8:.G|
00000fd0  62 28 21 71 25 2c 71 25  21 34 2c 71 25 21 32 34  |b(!q%,q%!4,q%!24|
00000fe0  29 0d 08 20 12 c9 39 3a  f2 48 62 3a f2 49 62 28  |).. ..9:.Hb:.Ib(|
00000ff0  71 25 29 0d 08 2a 12 c9  31 37 2c 31 38 3a f2 4a  |q%)..*..17,18:.J|
00001000  62 28 71 25 29 0d 08 34  05 cb 0d 08 3e 09 fd 52  |b(q%)..4....>..R|
00001010  25 3d 30 0d 08 48 1c e7  66 61 25 3e 68 61 25 2b  |%=0..H..fa%>ha%+|
00001020  31 30 30 8c f2 69 61 3a  f2 4b 62 3a f2 4c 62 0d  |100..ia:.Kb:.Lb.|
00001030  08 52 18 e7 66 61 25 3e  67 61 25 2b 35 30 30 8c  |.R..fa%>ga%+500.|
00001040  f2 4d 62 3a f2 4e 62 0d  08 5c 1e e7 73 60 25 3e  |.Mb:.Nb..\..s`%>|
00001050  30 80 66 61 25 3e 77 60  25 2b 35 30 30 8c f2 4f  |0.fa%>w`%+500..O|
00001060  62 28 22 22 29 0d 08 66  05 cd 0d 08 70 05 e1 0d  |b("")..f....p...|
00001070  08 84 12 dd f2 47 62 28  77 25 2c 69 25 2c 6b 25  |.....Gb(w%,i%,k%|
00001080  29 0d 08 8e 07 ea 6c 25  0d 08 98 13 e7 77 25 3d  |).....l%.....w%=|
00001090  54 61 25 80 69 25 3d 50  62 25 8c 0d 08 a2 09 c8  |Ta%.i%=Pb%......|
000010a0  8e 6b 25 ca 0d 08 ac 27  c9 31 33 3a e3 6c 25 3d  |.k%....'.13:.l%=|
000010b0  31 30 b8 31 88 2d 31 3a  49 60 24 28 6c 25 29 3d  |10.1.-1:I`$(l%)=|
000010c0  49 60 24 28 6c 25 2d 31  29 3a ed 0d 08 b6 2a 49  |I`$(l%-1):....*I|
000010d0  60 24 28 30 29 3d a4 51  62 28 77 25 2c 69 25 29  |`$(0)=.Qb(w%,i%)|
000010e0  3a f2 52 62 28 49 60 24  28 30 29 2c 30 29 3a 49  |:.Rb(I`$(0),0):I|
000010f0  60 25 3d 2d 31 0d 08 c0  27 f2 5f 61 28 77 25 2c  |`%=-1...'._a(w%,|
00001100  69 25 2c 22 22 29 3a c8  99 32 36 32 33 35 34 2c  |i%,""):..262354,|
00001110  77 25 2c 69 25 2c 2c 2c  2d 31 2c 30 0d 08 ca 20  |w%,i%,,,-1,0... |
00001120  c9 26 31 38 46 3a e7 49  60 25 3c 31 30 80 49 60  |.&18F:.I`%<10.I`|
00001130  24 28 49 60 25 2b 31 29  3e 22 22 8c 0d 08 d4 1e  |$(I`%+1)>"".....|
00001140  49 60 25 2b 3d 31 3a f2  5f 61 28 77 25 2c 69 25  |I`%+=1:._a(w%,i%|
00001150  2c 49 60 24 28 49 60 25  29 29 0d 08 de 21 c8 99  |,I`$(I`%))...!..|
00001160  32 36 32 33 35 34 2c 77  25 2c 69 25 2c 2c 2c 2d  |262354,w%,i%,,,-|
00001170  31 2c a9 49 60 24 28 49  60 25 29 0d 08 e8 05 cd  |1,.I`$(I`%).....|
00001180  0d 08 f2 11 c9 26 31 38  45 3a e7 49 60 25 3e 30  |.....&18E:.I`%>0|
00001190  8c 0d 08 fc 1e 49 60 25  2d 3d 31 3a f2 5f 61 28  |.....I`%-=1:._a(|
000011a0  77 25 2c 69 25 2c 49 60  24 28 49 60 25 29 29 0d  |w%,i%,I`$(I`%)).|
000011b0  09 06 21 c8 99 32 36 32  33 35 34 2c 77 25 2c 69  |..!..262354,w%,i|
000011c0  25 2c 2c 2c 2d 31 2c a9  49 60 24 28 49 60 25 29  |%,,,-1,.I`$(I`%)|
000011d0  0d 09 10 05 cc 0d 09 1a  2e 49 60 25 3d 2d 31 3a  |.........I`%=-1:|
000011e0  f2 5f 61 28 77 25 2c 69  25 2c 22 22 29 3a c8 99  |._a(w%,i%,""):..|
000011f0  32 36 32 33 35 34 2c 77  25 2c 69 25 2c 2c 2c 2d  |262354,w%,i%,,,-|
00001200  31 2c 30 0d 09 24 05 cd  0d 09 2e 14 7f 3a c8 99  |1,0..$.......:..|
00001210  32 36 32 33 36 34 2c 71  25 21 32 34 0d 09 38 05  |262364,q%!24..8.|
00001220  cb 0d 09 42 05 cc 0d 09  4c 17 e7 77 25 3d 57 61  |...B....L..w%=Wa|
00001230  25 80 69 25 3d 31 80 6b  25 3d 31 33 8c 0d 09 56  |%.i%=1.k%=13...V|
00001240  22 57 61 24 3d a4 51 62  28 77 25 2c 69 25 29 3a  |"Wa$=.Qb(w%,i%):|
00001250  e7 57 61 24 3d 22 22 8c  57 61 24 3d 22 20 22 0d  |.Wa$="".Wa$=" ".|
00001260  09 60 05 cc 0d 09 6a 12  c8 99 32 36 32 33 36 34  |.`....j...262364|
00001270  2c 71 25 21 32 34 0d 09  74 05 cd 0d 09 7e 05 cd  |,q%!24..t....~..|
00001280  0d 09 88 05 e1 0d 09 9c  0c dd f2 4a 62 28 71 25  |...........Jb(q%|
00001290  29 0d 09 a6 1d ea 5a 25  2c 68 25 2c 69 25 2c 74  |).....Z%,h%,i%,t|
000012a0  25 2c 66 24 2c 53 62 25  2c 61 25 2c 41 24 0d 09  |%,f$,Sb%,a%,A$..|
000012b0  b0 0c c8 8e 71 25 21 31  36 ca 0d 09 ba 0c c9 30  |....q%!16......0|
000012c0  3a f2 54 62 3a e0 0d 09  c4 32 c9 31 3a 71 25 21  |:.Tb:....2.1:q%!|
000012d0  31 36 3d 32 3a 71 25 21  33 36 3d 2d 31 3a 24 28  |16=2:q%!36=-1:$(|
000012e0  71 25 2b 34 34 29 3d 22  3c 57 69 6d 70 24 53 63  |q%+44)="<Wimp$Sc|
000012f0  72 61 70 3e 22 2b bd 30  0d 09 ce 22 71 25 21 31  |rap>"+.0..."q%!1|
00001300  32 3d 71 25 21 38 3a c8  99 32 36 32 33 37 35 2c  |2=q%!8:..262375,|
00001310  31 37 2c 71 25 2c 71 25  21 34 0d 09 d8 2f c9 33  |17,q%,q%!4.../.3|
00001320  3a 69 25 3d 71 25 21 32  34 3a 68 25 3d 71 25 21  |:i%=q%!24:h%=q%!|
00001330  32 30 3a 74 25 3d 71 25  21 34 30 3a 66 24 3d a4  |20:t%=q%!40:f$=.|
00001340  55 62 28 71 25 2b 34 34  29 0d 09 e2 1f 71 25 21  |Ub(q%+44)....q%!|
00001350  31 36 3d 34 3a c8 99 32  36 32 33 37 35 2c 31 37  |16=4:..262375,17|
00001360  2c 71 25 2c 71 25 21 34  0d 09 ec 09 c8 8e 68 25  |,q%,q%!4......h%|
00001370  ca 0d 09 f6 12 c9 55 61  25 3a e7 74 25 3d 26 46  |......Ua%:.t%=&F|
00001380  46 46 8c 0d 0a 00 16 e7  69 25 3d 34 f2 5f 61 28  |FF......i%=4._a(|
00001390  55 61 25 2c 34 2c 66 24  29 0d 0a 0a 05 cc 0d 0a  |Ua%,4,f$).......|
000013a0  14 0b f2 4d 5f 28 66 24  29 0d 0a 1e 05 cd 0d 0a  |...M_(f$).......|
000013b0  28 19 c9 53 61 25 3a e7  74 25 3d 26 46 46 46 8c  |(..Sa%:.t%=&FFF.|
000013c0  f2 4d 5f 28 66 24 29 0d  0a 32 1b c9 2d 31 2c 2d  |.M_(f$)..2..-1,-|
000013d0  32 3a e7 74 25 3d 26 46  46 46 80 69 25 3d 62 61  |2:.t%=&FFF.i%=ba|
000013e0  25 8c 0d 0a 3c 0b f2 4d  5f 28 66 24 29 0d 0a 46  |%...<..M_(f$)..F|
000013f0  05 cc 0d 0a 50 0d e3 5a  25 3d 30 b8 4e 60 25 0d  |....P..Z%=0.N`%.|
00001400  0a 5a 28 e7 69 25 3d 50  60 25 28 5a 25 29 80 4f  |.Z(.i%=P`%(Z%).O|
00001410  60 24 28 5a 25 29 3e 22  22 8c f2 4f 60 28 5a 25  |`$(Z%)>""..O`(Z%|
00001420  2c 66 24 2c 74 25 29 0d  0a 64 05 ed 0d 0a 6e 05  |,f$,t%)..d....n.|
00001430  cd 0d 0a 78 05 cb 0d 0a  82 1a 5a 25 3d a4 56 62  |...x......Z%=.Vb|
00001440  28 22 3c 57 69 6d 70 24  53 63 72 61 70 3e 22 29  |("<Wimp$Scrap>")|
00001450  0d 0a 8c 1a c9 31 31 3a  e7 6c 5f 25 80 71 25 21  |.....11:.l_%.q%!|
00001460  34 3c 3e 49 61 25 8c f2  57 62 0d 0a 96 13 c9 31  |4<>Ia%..Wb.....1|
00001470  32 3a e7 71 25 21 34 3c  3e 49 61 25 8c 0d 0a a0  |2:.q%!4<>Ia%....|
00001480  2c f2 59 5f 28 22 44 65  76 69 63 65 20 63 6c 61  |,.Y_("Device cla|
00001490  69 6d 20 66 61 69 6c 65  64 22 2c a4 55 62 28 71  |im failed",.Ub(q|
000014a0  25 2b 32 38 29 2c 22 22  29 0d 0a aa 12 f2 58 62  |%+28),"").....Xb|
000014b0  28 53 61 25 29 3a 6c 5f  25 3d a3 0d 0a b4 05 cd  |(Sa%):l_%=......|
000014c0  0d 0a be 1d c9 26 35 30  32 3a 41 24 3d a4 59 62  |.....&502:A$=.Yb|
000014d0  28 71 25 21 33 32 2c 71  25 21 33 36 29 0d 0a c8  |(q%!32,q%!36)...|
000014e0  0b e7 41 24 3e 22 22 8c  0d 0a d2 3b 71 25 21 31  |..A$>""....;q%!1|
000014f0  36 3d 26 35 30 33 3a 71  25 21 31 32 3d 71 25 21  |6=&503:q%!12=q%!|
00001500  38 3a 24 28 71 25 2b 32  30 29 3d 41 24 3a 71 25  |8:$(q%+20)=A$:q%|
00001510  3f 28 32 30 2b a9 41 24  29 3d 30 3a 21 71 25 3d  |?(20+.A$)=0:!q%=|
00001520  32 35 36 0d 0a dc 17 c8  99 32 36 32 33 37 35 2c  |256......262375,|
00001530  31 37 2c 71 25 2c 71 25  21 34 0d 0a e6 05 cd 0d  |17,q%,q%!4......|
00001540  0a f0 14 c9 26 34 30 30  43 32 3a e7 6a 5f 25 3c  |....&400C2:.j_%<|
00001550  3e 30 8c 0d 0a fa 10 e7  56 60 25 28 6a 5f 25 29  |>0......V`%(j_%)|
00001560  3d 30 8c 0d 0b 04 31 56  60 25 28 6a 5f 25 29 3d  |=0....1V`%(j_%)=|
00001570  71 25 21 34 3a f2 5a 62  28 a4 61 62 28 22 54 61  |q%!4:.Zb(.ab("Ta|
00001580  73 6b 53 74 61 72 74 32  22 2c 55 60 24 28 6a 5f  |skStart2",U`$(j_|
00001590  25 29 29 29 0d 0b 0e 05  cd 0d 0b 18 09 6a 5f 25  |%))).........j_%|
000015a0  3d 30 0d 0b 22 05 cd 0d  0b 2c 0b c9 26 34 30 30  |=0.."....,..&400|
000015b0  43 33 0d 0b 36 0d e3 6c  25 3d 30 b8 53 60 25 0d  |C3..6..l%=0.S`%.|
000015c0  0b 40 12 e7 56 60 25 28  6c 25 29 3d 71 25 21 34  |.@..V`%(l%)=q%!4|
000015d0  8c 0d 0b 4a 28 56 60 25  28 6c 25 29 3d 30 3a e7  |...J(V`%(l%)=0:.|
000015e0  54 60 24 28 6c 25 29 3e  22 22 8c f2 52 62 28 54  |T`$(l%)>""..Rb(T|
000015f0  60 24 28 6c 25 29 2c 33  29 0d 0b 54 05 cd 0d 0b  |`$(l%),3)..T....|
00001600  5e 05 ed 0d 0b 68 07 f2  62 62 0d 0b 72 0b c9 26  |^....h..bb..r..&|
00001610  38 30 38 43 31 0d 0b 7c  15 53 62 25 3d 30 3a 63  |808C1..|.Sb%=0:c|
00001620  62 25 3d 71 25 21 32 30  2d 31 0d 0b 86 25 c8 95  |b%=q%!20-1...%..|
00001630  61 60 25 28 53 62 25 29  3c 3e 71 25 21 34 80 53  |a`%(Sb%)<>q%!4.S|
00001640  62 25 3c 57 60 25 3a 53  62 25 2b 3d 31 3a ce 0d  |b%<W`%:Sb%+=1:..|
00001650  0b 90 10 e7 62 60 25 28  53 62 25 29 3d 30 8c 0d  |....b`%(Sb%)=0..|
00001660  0b 9a 23 e3 5a 25 3d 30  b8 63 62 25 88 34 3a 61  |..#.Z%=0.cb%.4:a|
00001670  5f 25 21 5a 25 3d 71 25  21 28 32 34 2b 5a 25 29  |_%!Z%=q%!(24+Z%)|
00001680  3a ed 0d 0b a4 14 f2 64  62 28 53 62 25 2c 61 5f  |:......db(Sb%,a_|
00001690  25 2c 63 62 25 29 0d 0b  ae 05 cc 0d 0b b8 25 e3  |%,cb%)........%.|
000016a0  5a 25 3d 30 b8 63 62 25  3a d5 23 62 60 25 28 53  |Z%=0.cb%:.#b`%(S|
000016b0  62 25 29 2c 71 25 21 28  32 34 2b 5a 25 29 3a ed  |b%),q%!(24+Z%):.|
000016c0  0d 0b c2 05 cd 0d 0b cc  0b c9 26 38 30 38 43 32  |..........&808C2|
000016d0  0d 0b d6 21 e7 71 25 21  32 30 3e 3d 49 61 25 80  |...!.q%!20>=Ia%.|
000016e0  71 25 21 32 30 3c 3d 28  49 61 25 2b 57 60 25 29  |q%!20<=(Ia%+W`%)|
000016f0  8c 0d 0b e0 3c 61 60 25  28 71 25 21 32 30 2d 49  |....<a`%(q%!20-I|
00001700  61 25 29 3d 71 25 21 34  3a f2 5a 62 28 22 54 61  |a%)=q%!4:.Zb("Ta|
00001710  73 6b 20 73 74 61 72 74  65 64 3a 20 22 2b 59 60  |sk started: "+Y`|
00001720  24 28 71 25 21 32 30 2d  49 61 25 29 29 0d 0b ea  |$(q%!20-Ia%))...|
00001730  05 cd 0d 0b f4 0b c9 26  38 30 38 43 33 0d 0b fe  |.......&808C3...|
00001740  2b 53 62 25 3d 30 3a c8  95 71 25 21 34 3c 3e 61  |+Sb%=0:..q%!4<>a|
00001750  60 25 28 53 62 25 29 80  53 62 25 3c 57 60 25 3a  |`%(Sb%).Sb%<W`%:|
00001760  53 62 25 2b 3d 31 3a ce  0d 0c 08 13 e7 71 25 21  |Sb%+=1:......q%!|
00001770  34 3d 61 60 25 28 53 62  25 29 8c 0d 0c 12 20 f2  |4=a`%(Sb%).... .|
00001780  5a 62 28 a4 61 62 28 22  54 61 73 6b 45 6e 64 22  |Zb(.ab("TaskEnd"|
00001790  2c 59 60 24 28 53 62 25  29 29 29 0d 0c 1c 10 e7  |,Y`$(Sb%))).....|
000017a0  67 60 25 28 53 62 25 29  3d 30 8c 0d 0c 26 1c 61  |g`%(Sb%)=0...&.a|
000017b0  60 25 28 53 62 25 29 3d  30 3a f2 45 62 28 64 60  |`%(Sb%)=0:.Eb(d`|
000017c0  25 28 53 62 25 29 29 0d  0c 30 05 cc 0d 0c 3a 31  |%(Sb%))..0....:1|
000017d0  61 60 25 28 53 62 25 29  3d 2d 31 3a 24 68 60 25  |a`%(Sb%)=-1:$h`%|
000017e0  28 53 62 25 29 3d 59 60  24 28 53 62 25 29 2b a4  |(Sb%)=Y`$(Sb%)+.|
000017f0  51 5f 28 22 54 61 73 6b  46 69 6e 22 29 0d 0c 44  |Q_("TaskFin")..D|
00001800  11 f2 65 62 28 64 60 25  28 53 62 25 29 29 0d 0c  |..eb(d`%(Sb%))..|
00001810  4e 05 cd 0d 0c 58 28 59  60 24 28 53 62 25 29 3d  |N....X(Y`$(Sb%)=|
00001820  22 22 3a f2 4d 61 28 62  60 25 28 53 62 25 29 29  |"":.Ma(b`%(Sb%))|
00001830  3a 62 60 25 28 53 62 25  29 3d 30 0d 0c 62 20 e7  |:b`%(Sb%)=0..b .|
00001840  58 60 24 28 53 62 25 29  3e 22 22 8c f2 52 62 28  |X`$(Sb%)>""..Rb(|
00001850  58 60 24 28 53 62 25 29  2c 34 29 0d 0c 6c 05 cd  |X`$(Sb%),4)..l..|
00001860  0d 0c 76 05 cb 0d 0c 80  05 e1 0d 0c 94 0f dd a4  |..v.............|
00001870  59 62 28 77 25 2c 69 25  29 0d 0c 9e 0a ea 41 24  |Yb(w%,i%).....A$|
00001880  2c 6c 25 0d 0c a8 17 41  24 3d 22 48 67 65 6e 65  |,l%....A$="Hgene|
00001890  72 69 63 22 3a c8 8e 77  25 ca 0d 0c b2 13 c9 54  |ric":..w%......T|
000018a0  61 25 3a 41 24 3d 22 48  74 65 78 74 22 0d 0c bc  |a%:A$="Htext"...|
000018b0  1b c9 53 61 25 3a 41 24  3d 22 48 73 74 61 74 75  |..Sa%:A$="Hstatu|
000018c0  73 22 3a c8 8e 69 25 ca  0d 0c c6 15 c9 31 2c 32  |s":..i%......1,2|
000018d0  3a 41 24 3d 22 48 61 63  74 69 6f 6e 22 0d 0c d0  |:A$="Haction"...|
000018e0  0f c9 33 3a 41 24 3d 22  48 69 70 22 0d 0c da 11  |..3:A$="Hip"....|
000018f0  c9 34 3a 41 24 3d 22 48  73 74 6f 70 22 0d 0c e4  |.4:A$="Hstop"...|
00001900  12 c9 35 3a 41 24 3d 22  48 70 61 75 73 65 22 0d  |..5:A$="Hpause".|
00001910  0c ee 14 c9 36 2c 37 3a  41 24 3d 22 48 6d 65 6e  |....6,7:A$="Hmen|
00001920  75 73 22 0d 0c f8 11 c9  38 3a 41 24 3d 22 48 74  |us".....8:A$="Ht|
00001930  69 6d 65 22 0d 0d 02 13  c9 31 30 3a 41 24 3d 22  |ime".....10:A$="|
00001940  48 6d 6f 64 65 6d 22 0d  0d 0c 05 cb 0d 0d 16 24  |Hmodem"........$|
00001950  c9 56 61 25 3a 41 24 3d  22 48 6d 65 73 73 22 3a  |.Va%:A$="Hmess":|
00001960  e7 68 5f 25 8c 41 24 3d  22 48 6d 65 73 73 32 22  |.h_%.A$="Hmess2"|
00001970  0d 0d 20 14 c9 57 61 25  3a 41 24 3d 22 48 65 6e  |.. ..Wa%:A$="Hen|
00001980  74 65 72 22 0d 0d 2a 14  c9 58 61 25 3a 41 24 3d  |ter"..*..Xa%:A$=|
00001990  22 48 79 65 73 6e 6f 22  0d 0d 34 13 c9 51 61 25  |"Hyesno"..4..Qa%|
000019a0  3a 41 24 3d 22 48 69 6e  66 6f 22 0d 0d 3e 15 c9  |:A$="Hinfo"..>..|
000019b0  55 61 25 3a 41 24 3d 22  48 63 6f 6e 66 69 67 22  |Ua%:A$="Hconfig"|
000019c0  0d 0d 48 26 7f 3a e3 6c  25 3d 30 b8 57 60 25 3a  |..H&.:.l%=0.W`%:|
000019d0  e7 77 25 3d 64 60 25 28  6c 25 29 8c 41 24 3d 22  |.w%=d`%(l%).A$="|
000019e0  48 74 61 73 6b 22 0d 0d  52 05 ed 0d 0d 5c 05 cb  |Htask"..R....\..|
000019f0  0d 0d 66 0c 3d a4 51 5f  28 41 24 29 0d 0d 7a 08  |..f.=.Q_(A$)..z.|
00001a00  dd f2 54 62 0d 0d 84 07  ea 6c 25 0d 0d 8e 0c e7  |..Tb.....l%.....|
00001a10  6c 5f 25 3c 3e 30 8c 0d  0d 98 14 4a 25 3d a4 64  |l_%<>0.....J%=.d|
00001a20  28 38 2c 75 61 25 2c 30  2c 30 29 0d 0d a2 15 4a  |(8,ua%,0,0)....J|
00001a30  25 3d a4 64 28 31 38 2c  75 61 25 2c 30 2c 30 29  |%=.d(18,ua%,0,0)|
00001a40  0d 0d ac 05 cd 0d 0d b6  0b f2 66 62 28 22 22 29  |..........fb("")|
00001a50  0d 0d c0 15 f2 4d 61 28  70 5f 25 29 3a f2 4d 61  |.....Ma(p_%):.Ma|
00001a60  28 71 5f 25 29 0d 0d ca  1c e3 6c 25 3d 30 b8 57  |(q_%).....l%=0.W|
00001a70  60 25 3a f2 4d 61 28 62  60 25 28 6c 25 29 29 3a  |`%:.Ma(b`%(l%)):|
00001a80  ed 0d 0d d4 1c e3 6c 25  3d 30 b8 6d 60 25 3a f2  |......l%=0.m`%:.|
00001a90  4d 61 28 6e 60 25 28 6c  25 29 29 3a ed 0d 0d de  |Ma(n`%(l%)):....|
00001aa0  07 f2 67 62 0d 0d e8 05  e1 0d 0d fc 0d dd f2 4d  |..gb...........M|
00001ab0  61 28 f8 43 25 29 0d 0e  06 1d e7 43 25 3c 3e 30  |a(.C%).....C%<>0|
00001ac0  8c c8 99 31 33 31 30 38  35 2c 30 2c 43 25 3a 43  |...131085,0,C%:C|
00001ad0  25 3d 30 0d 0e 10 05 e1  0d 0e 24 08 dd f2 48 62  |%=0.......$...Hb|
00001ae0  0d 0e 2e 11 c8 99 32 36  32 33 35 31 2c 2c 50 61  |......262351,,Pa|
00001af0  25 0d 0e 38 2a 68 62 25  3d 21 50 61 25 3a 69 62  |%..8*hb%=!Pa%:ib|
00001b00  25 3d 50 61 25 21 34 3a  62 25 3d 50 61 25 21 38  |%=Pa%!4:b%=Pa%!8|
00001b10  3a 6a 62 25 3d 50 61 25  21 31 32 0d 0e 42 19 6c  |:jb%=Pa%!12..B.l|
00001b20  61 25 3d 50 61 25 21 31  36 3a 6b 62 25 3d 50 61  |a%=Pa%!16:kb%=Pa|
00001b30  25 21 32 30 0d 0e 4c 05  e1 0d 0e 60 1a dd f2 46  |%!20..L....`...F|
00001b40  62 28 68 62 25 2c 69 62  25 2c 62 25 2c 77 25 2c  |b(hb%,ib%,b%,w%,|
00001b50  69 25 29 0d 0e 6a 07 ea  5a 25 0d 0e 74 09 c8 8e  |i%)..j..Z%..t...|
00001b60  62 25 ca 0d 0e 7e 06 c9  32 0d 0e 88 09 c8 8e 77  |b%...~..2......w|
00001b70  25 ca 0d 0e 92 10 c9 2d  32 3a e7 69 25 3d 62 61  |%......-2:.i%=ba|
00001b80  25 8c 0d 0e 9c 0a f2 6c  62 28 b9 29 0d 0e a6 05  |%......lb(.)....|
00001b90  cc 0d 0e b0 0d e3 5a 25  3d 30 b8 4e 60 25 0d 0e  |......Z%=0.N`%..|
00001ba0  ba 48 e7 69 25 3d 50 60  25 28 5a 25 29 80 51 60  |.H.i%=P`%(Z%).Q`|
00001bb0  24 28 5a 25 2c 30 29 3e  22 22 8c f2 6d 62 28 31  |$(Z%,0)>""..mb(1|
00001bc0  30 32 2c a4 6e 62 28 51  60 24 28 5a 25 2c 30 29  |02,.nb(Q`$(Z%,0)|
00001bd0  2c 51 60 24 28 5a 25 2c  31 29 29 2c 52 60 24 28  |,Q`$(Z%,1)),R`$(|
00001be0  5a 25 29 2c b9 29 0d 0e  c4 05 ed 0d 0e ce 05 cd  |Z%),.)..........|
00001bf0  0d 0e d8 1c c9 54 61 25  3a c8 99 36 2c 31 32 31  |.....Ta%:..6,121|
00001c00  2c 28 31 82 26 38 30 29  b8 2c 5a 25 0d 0e e2 0a  |,(1.&80).,Z%....|
00001c10  e7 5a 25 3d 30 8c 0d 0e  ec 54 f2 6d 62 28 31 30  |.Z%=0....T.mb(10|
00001c20  31 2c 22 41 6c 61 72 6d  20 6c 69 73 74 2c 4d 65  |1,"Alarm list,Me|
00001c30  6e 75 20 6c 69 73 74 2c  56 61 72 20 6c 69 73 74  |nu list,Var list|
00001c40  2c 54 61 73 6b 20 6c 69  73 74 2c 7c 53 63 72 69  |,Task list,|Scri|
00001c50  70 74 20 6c 69 73 74 2c  51 75 69 74 22 2c 22 43  |pt list,Quit","C|
00001c60  6f 6e 74 72 6f 6c 22 2c  30 29 0d 0e f6 05 cc 0d  |ontrol",0)......|
00001c70  0f 00 3c f2 6d 62 28 31  30 31 2c 22 44 62 67 4c  |..<.mb(101,"DbgL|
00001c80  65 76 20 30 2c 44 62 67  4c 65 76 20 31 2c 44 62  |ev 0,DbgLev 1,Db|
00001c90  67 4c 65 76 20 32 2c 44  62 67 4c 65 76 20 33 22  |gLev 2,DbgLev 3"|
00001ca0  2c 22 44 65 62 75 67 22  2c 30 29 0d 0f 0a 05 cd  |,"Debug",0).....|
00001cb0  0d 0f 14 08 c9 53 61 25  0d 0f 1e 09 c8 8e 69 25  |.....Sa%......i%|
00001cc0  ca 0d 0f 28 3b c9 37 3a  e7 60 5f 24 28 30 29 3e  |...(;.7:.`_$(0)>|
00001cd0  22 22 8c f2 6d 62 28 31  30 32 2c a4 6e 62 28 60  |""..mb(102,.nb(`|
00001ce0  5f 24 28 30 29 2c 60 5f  24 28 31 29 29 2c 22 55  |_$(0),`_$(1)),"U|
00001cf0  73 65 72 20 6d 65 6e 75  22 2c a3 29 0d 0f 32 0c  |ser menu",.)..2.|
00001d00  7f 3a f2 6c 62 28 30 29  0d 0f 3c 05 cb 0d 0f 46  |.:.lb(0)..<....F|
00001d10  0c 7f 3a f2 6c 62 28 30  29 0d 0f 50 05 cb 0d 0f  |..:.lb(0)..P....|
00001d20  5a 08 c9 31 2c 34 0d 0f  64 09 c8 8e 77 25 ca 0d  |Z..1,4..d...w%..|
00001d30  0f 6e 08 c9 53 61 25 0d  0f 78 09 c8 8e 69 25 ca  |.n..Sa%..x...i%.|
00001d40  0d 0f 82 06 c9 35 0d 0f  8c 0a e7 ac 68 5f 25 8c  |.....5......h_%.|
00001d50  0d 0f 96 1c f2 59 5f 28  22 22 2c a4 51 5f 28 22  |.....Y_("",.Q_("|
00001d60  50 61 75 73 65 50 22 29  2c 22 22 29 0d 0f a0 18  |PauseP"),"")....|
00001d70  68 5f 25 3d b9 3a f2 52  62 28 22 70 61 75 73 65  |h_%=.:.Rb("pause|
00001d80  22 2c 30 29 0d 0f aa 05  cc 0d 0f b4 07 f2 6f 62  |",0)..........ob|
00001d90  0d 0f be 05 cd 0d 0f c8  06 c9 34 0d 0f d2 25 69  |..........4...%i|
00001da0  5f 25 3d b9 3a f2 59 5f  28 22 22 2c a4 51 5f 28  |_%=.:.Y_("",.Q_(|
00001db0  22 53 74 6f 70 50 22 29  2c 22 22 29 3a f2 69 5f  |"StopP"),""):.i_|
00001dc0  0d 0f dc 3b c9 36 3a e7  60 5f 24 28 30 29 3e 22  |...;.6:.`_$(0)>"|
00001dd0  22 8c f2 6d 62 28 31 30  32 2c a4 6e 62 28 60 5f  |"..mb(102,.nb(`_|
00001de0  24 28 30 29 2c 60 5f 24  28 31 29 29 2c 22 55 73  |$(0),`_$(1)),"Us|
00001df0  65 72 20 6d 65 6e 75 22  2c a3 29 0d 0f e6 3d c9  |er menu",.)...=.|
00001e00  31 31 3a e7 a4 51 62 28  53 61 25 2c 69 25 29 3d  |11:..Qb(Sa%,i%)=|
00001e10  22 52 65 64 69 61 6c 22  8c 65 5f 25 3d b9 3a f2  |"Redial".e_%=.:.|
00001e20  59 5f 28 22 22 2c a4 51  5f 28 22 52 65 64 69 61  |Y_("",.Q_("Redia|
00001e30  6c 50 22 29 2c 22 22 29  0d 0f f0 05 cb 0d 0f fa  |lP"),"")........|
00001e40  08 c9 55 61 25 0d 10 04  16 e7 69 25 3d 36 8c f2  |..Ua%.....i%=6..|
00001e50  70 62 3a f2 45 62 28 55  61 25 29 0d 10 0e 08 c9  |pb:.Eb(Ua%).....|
00001e60  58 61 25 0d 10 18 0f e7  69 25 3d 30 8c 71 62 25  |Xa%.....i%=0.qb%|
00001e70  3d 32 0d 10 22 0f e7 69  25 3d 31 8c 71 62 25 3d  |=2.."..i%=1.qb%=|
00001e80  31 0d 10 2c 08 c9 54 61  25 0d 10 36 25 c8 99 32  |1..,..Ta%..6%..2|
00001e90  36 32 33 35 34 2c 77 25  2c 50 62 25 2c 2c 2c 2d  |62354,w%,Pb%,,,-|
00001ea0  31 2c a9 a4 51 62 28 77  25 2c 50 62 25 29 0d 10  |1,..Qb(w%,Pb%)..|
00001eb0  40 07 c9 2d 32 0d 10 4a  0c e7 69 25 3d 62 61 25  |@..-2..J..i%=ba%|
00001ec0  8c 0d 10 54 1b e7 62 25  3d 34 8c f2 58 62 28 53  |...T..b%=4..Xb(S|
00001ed0  61 25 29 8b f2 58 62 28  54 61 25 29 0d 10 5e 05  |a%)..Xb(Ta%)..^.|
00001ee0  cc 0d 10 68 0d e3 5a 25  3d 30 b8 4e 60 25 0d 10  |...h..Z%=0.N`%..|
00001ef0  72 29 e7 69 25 3d 50 60  25 28 5a 25 29 80 50 60  |r).i%=P`%(Z%).P`|
00001f00  24 28 5a 25 29 3e 22 22  8c f2 52 62 28 50 60 24  |$(Z%)>""..Rb(P`$|
00001f10  28 5a 25 29 2c 36 29 0d  10 7c 05 ed 0d 10 86 05  |(Z%),6)..|......|
00001f20  cd 0d 10 90 05 cb 0d 10  9a 05 cb 0d 10 a4 05 e1  |................|
00001f30  0d 10 b8 0c dd f2 6c 62  28 69 25 29 0d 10 c2 3e  |......lb(i%)...>|
00001f40  f2 6d 62 28 31 30 31 2c  22 3e 49 6e 66 6f 2c 43  |.mb(101,">Info,C|
00001f50  68 6f 69 63 65 73 2e 2e  2e 2c 7c 43 6f 6e 74 72  |hoices...,|Contr|
00001f60  6f 6c 2e 2e 2e 2c 51 75  69 74 22 2c 22 53 4c 49  |ol...,Quit","SLI|
00001f70  50 64 69 61 6c 22 2c 69  25 29 0d 10 cc 05 e1 0d  |Pdial",i%)......|
00001f80  10 e0 0d dd f2 72 62 28  56 61 24 29 0d 10 ea 22  |.....rb(Va$)..."|
00001f90  73 62 25 3d 30 3a 75 5f  25 28 29 3d 30 3a 6b 60  |sb%=0:u_%()=0:k`|
00001fa0  24 28 29 3d 22 22 3a 6b  60 25 28 29 3d b9 0d 10  |$()="":k`%()=...|
00001fb0  f4 1f e7 74 62 24 3e 22  22 8c f2 52 62 28 74 62  |...tb$>""..Rb(tb|
00001fc0  24 2c 30 29 3a 74 62 24  3d 22 22 3a e1 0d 10 fe  |$,0):tb$="":....|
00001fd0  2d f2 75 62 28 22 22 22  22 2b a4 76 62 28 22 45  |-.ub(""""+.vb("E|
00001fe0  73 63 72 69 70 74 22 2c  c3 4f 5f 25 2c 56 61 24  |script",.O_%,Va$|
00001ff0  29 2b 22 22 22 22 29 3a  ef 37 0d 11 08 1b f2 59  |)+""""):.7.....Y|
00002000  5f 28 22 22 2c a4 51 5f  28 22 53 74 6f 70 45 22  |_("",.Q_("StopE"|
00002010  29 2c 22 22 29 0d 11 12  13 4f 5f 25 3d 30 3a 58  |),"")....O_%=0:X|
00002020  5f 25 3d a3 3a f2 5a 5f  0d 11 1c 05 e1 0d 11 30  |_%=.:.Z_.......0|
00002030  0c dd f2 57 61 28 41 24  29 0d 11 3a 16 ea 76 24  |...Wa(A$)..:..v$|
00002040  2c 70 24 3a 70 24 3d 22  49 6e 70 75 74 3a 22 0d  |,p$:p$="Input:".|
00002050  11 44 16 f5 42 24 3d a4  77 62 28 41 24 29 3a 57  |.D..B$=.wb(A$):W|
00002060  61 24 3d 22 22 0d 11 4e  10 e7 c0 42 24 2c 31 29  |a$=""..N...B$,1)|
00002070  3d 22 2f 22 8c 0d 11 58  18 43 24 3d a4 78 62 28  |="/"...X.C$=.xb(|
00002080  42 24 29 3a c8 8e c0 42  24 2c 32 29 ca 0d 11 62  |B$):...B$,2)...b|
00002090  14 c9 22 70 72 22 3a 70  24 3d c0 43 24 2c 34 30  |.."pr":p$=.C$,40|
000020a0  29 0d 11 6c 05 cb 0d 11  76 05 cc 0d 11 80 25 76  |)..l....v.....%v|
000020b0  24 3d 42 24 3a f2 5f 61  28 57 61 25 2c 31 2c 22  |$=B$:._a(Wa%,1,"|
000020c0  22 29 3a f2 5f 61 28 57  61 25 2c 30 2c 70 24 29  |"):._a(Wa%,0,p$)|
000020d0  0d 11 8a 22 f2 58 62 28  57 61 25 29 3a c8 99 32  |...".Xb(Wa%):..2|
000020e0  36 32 33 35 34 2c 57 61  25 2c 31 2c 2c 2c 2d 31  |62354,Wa%,1,,,-1|
000020f0  2c 30 0d 11 94 20 f5 f2  41 62 28 35 30 29 3a fd  |,0... ..Ab(50):.|
00002100  57 61 24 3e 22 22 3a 70  24 3d 22 49 6e 70 75 74  |Wa$>"":p$="Input|
00002110  3a 22 0d 11 9e 13 e7 57  61 24 3d 22 20 22 8c 57  |:".....Wa$=" ".W|
00002120  61 24 3d 22 22 0d 11 a8  0f f2 5a 61 28 76 24 2c  |a$="".....Za(v$,|
00002130  57 61 24 29 0d 11 b2 05  cd 0d 11 bc 0a fd 41 24  |Wa$)..........A$|
00002140  3d 22 22 0d 11 c6 0c f2  45 62 28 57 61 25 29 0d  |="".....Eb(Wa%).|
00002150  11 d0 05 e1 0d 11 e4 0c  dd f2 75 62 28 41 24 29  |..........ub(A$)|
00002160  0d 11 ee 0d ea 77 25 2c  6e 25 2c 74 24 0d 11 f8  |.....w%,n%,t$...|
00002170  1b 74 24 3d a4 51 5f 28  22 4d 65 73 73 61 67 65  |.t$=.Q_("Message|
00002180  22 29 3a 76 60 25 3d a3  0d 12 02 0d 77 25 3d 30  |"):v`%=.....w%=0|
00002190  3a 6e 25 3d 30 0d 12 0c  0f f5 42 24 3d a4 77 62  |:n%=0.....B$=.wb|
000021a0  28 41 24 29 0d 12 16 10  e7 c0 42 24 2c 31 29 3d  |(A$)......B$,1)=|
000021b0  22 2f 22 8c 0d 12 20 18  43 24 3d a4 78 62 28 42  |"/"... .C$=.xb(B|
000021c0  24 29 3a c8 8e c0 42 24  2c 32 29 ca 0d 12 2a 12  |$):...B$,2)...*.|
000021d0  c9 22 63 6c 22 3a f2 45  62 28 56 61 25 29 0d 12  |."cl":.Eb(Va%)..|
000021e0  34 0e c9 22 77 61 22 3a  77 25 3d b9 0d 12 3e 0f  |4.."wa":w%=...>.|
000021f0  c9 22 74 69 22 3a 74 24  3d 43 24 0d 12 48 17 c9  |."ti":t$=C$..H..|
00002200  22 63 61 22 3a 73 60 24  3d 43 24 3a 74 60 24 3d  |"ca":s`$=C$:t`$=|
00002210  22 22 0d 12 52 28 75 60  25 3d 72 60 25 3a 73 60  |""..R(u`%=r`%:s`|
00002220  25 3d 31 3a 77 60 25 3d  66 61 25 3a e7 6e 25 3d  |%=1:w`%=fa%:.n%=|
00002230  30 8c 79 62 24 28 29 3d  22 22 0d 12 5c 0f c9 22  |0.yb$()=""..\.."|
00002240  63 65 22 3a 76 60 25 3d  b9 0d 12 66 10 c9 22 65  |ce":v`%=...f.."e|
00002250  6e 22 3a 74 60 24 3d 43  24 0d 12 70 11 c9 22 6d  |n":t`$=C$..p.."m|
00002260  61 22 3a 75 60 25 3d bb  43 24 0d 12 7a 0f c9 22  |a":u`%=.C$..z.."|
00002270  61 64 22 3a 6e 25 2b 3d  31 0d 12 84 0e c9 22 6e  |ad":n%+=1....."n|
00002280  61 22 2c 22 69 64 22 0d  12 8e 05 cb 0d 12 98 05  |a","id".........|
00002290  cc 0d 12 a2 18 e7 42 24  3e 22 22 80 6e 25 3d 30  |......B$>"".n%=0|
000022a0  8c 79 62 24 28 29 3d 22  22 0d 12 ac 18 e7 42 24  |.yb$()="".....B$|
000022b0  3e 22 22 8c f2 4f 62 28  42 24 29 3a 6e 25 2b 3d  |>""..Ob(B$):n%+=|
000022c0  31 0d 12 b6 05 cd 0d 12  c0 11 fd 42 24 3d 22 22  |1..........B$=""|
000022d0  84 6e 25 3e 72 60 25 0d  12 ca 14 24 6e 61 25 3d  |.n%>r`%....$na%=|
000022e0  74 24 3a f2 65 62 28 56  61 25 29 0d 12 d4 0a e7  |t$:.eb(Va%).....|
000022f0  6e 25 3e 30 8c 0d 12 de  0b f2 4f 62 28 22 22 29  |n%>0......Ob("")|
00002300  0d 12 e8 05 cd 0d 12 f2  16 e7 77 25 8c f2 52 62  |..........w%..Rb|
00002310  28 22 70 61 75 73 65 22  2c 30 29 0d 12 fc 05 e1  |("pause",0).....|
00002320  0d 13 10 0c dd f2 4f 62  28 41 24 29 0d 13 1a 18  |......Ob(A$)....|
00002330  ea 6c 25 2c 77 25 2c 74  24 3a 6c 25 3d 2d 31 3a  |.l%,w%,t$:l%=-1:|
00002340  77 25 3d 30 0d 13 24 24  f5 6c 25 2b 3d 31 3a 74  |w%=0..$$.l%+=1:t|
00002350  24 3d 79 62 24 28 6c 25  29 3a e7 a9 74 24 3e 77  |$=yb$(l%):..t$>w|
00002360  25 8c 77 25 3d a9 74 24  0d 13 2e 19 fd 74 24 3d  |%.w%=.t$.....t$=|
00002370  22 22 84 6c 25 3d 72 60  25 3a 77 60 25 3d 66 61  |"".l%=r`%:w`%=fa|
00002380  25 0d 13 38 0b e7 41 24  3e 22 22 8c 0d 13 42 29  |%..8..A$>""...B)|
00002390  e7 6c 25 3d 72 60 25 8c  e3 6c 25 3d 31 b8 72 60  |.l%=r`%..l%=1.r`|
000023a0  25 3a 79 62 24 28 6c 25  2d 31 29 3d 79 62 24 28  |%:yb$(l%-1)=yb$(|
000023b0  6c 25 29 3a ed 0d 13 4c  0e 79 62 24 28 6c 25 29  |l%):...L.yb$(l%)|
000023c0  3d 41 24 0d 13 56 05 cc  0d 13 60 14 e7 6c 25 3e  |=A$..V....`..l%>|
000023d0  30 8c f2 7a 62 28 6c 25  2c 77 25 29 0d 13 6a 05  |0..zb(l%,w%)..j.|
000023e0  cd 0d 13 74 05 e1 0d 13  88 0f dd f2 7a 62 28 79  |...t........zb(y|
000023f0  25 2c 78 25 29 0d 13 92  07 ea 6f 25 0d 13 9c 32  |%,x%).....o%...2|
00002400  21 61 5f 25 3d 30 3a 61  5f 25 21 34 3d 2d 79 25  |!a_%=0:a_%!4=-y%|
00002410  2a 33 32 2d 33 32 3a 61  5f 25 21 38 3d 78 25 2a  |*32-32:a_%!8=x%*|
00002420  31 36 2b 31 30 3a 61 5f  25 21 31 32 3d 30 0d 13  |16+10:a_%!12=0..|
00002430  a6 14 c8 99 32 36 32 33  35 39 2c 56 61 25 2c 61  |....262359,Va%,a|
00002440  5f 25 0d 13 b0 2b 21 71  25 3d 56 61 25 3a c8 99  |_%...+!q%=Va%:..|
00002450  32 36 32 33 34 37 2c 2c  71 25 3a 6f 25 3d 28 71  |262347,,q%:o%=(q|
00002460  25 21 33 32 29 80 28 31  3c 3c 31 36 29 0d 13 ba  |%!32).(1<<16)...|
00002470  2b 71 25 21 31 32 3d 71  25 21 34 2b 78 25 2a 31  |+q%!12=q%!4+x%*1|
00002480  36 2b 31 30 3a 71 25 21  31 36 3d 71 25 21 38 2b  |6+10:q%!16=q%!8+|
00002490  79 25 2a 33 32 2b 33 32  0d 13 c4 29 71 25 21 32  |y%*32+32...)q%!2|
000024a0  30 3d 30 3a 71 25 21 32  34 3d 30 3a 71 25 21 32  |0=0:q%!24=0:q%!2|
000024b0  38 3d 2d 31 3a c8 99 32  36 32 33 34 31 2c 2c 71  |8=-1:..262341,,q|
000024c0  25 0d 13 ce 21 e7 6f 25  3d 30 8c f2 5f 62 28 56  |%...!.o%=0.._b(V|
000024d0  61 25 2c 30 2c 31 35 30  29 8b f2 58 62 28 56 61  |a%,0,150)..Xb(Va|
000024e0  25 29 0d 13 d8 27 21 71  25 3d 56 61 25 3a c8 99  |%)...'!q%=Va%:..|
000024f0  32 36 32 33 34 37 2c 2c  71 25 3a 60 62 25 3d 71  |262347,,q%:`b%=q|
00002500  25 21 31 32 2d 71 25 21  34 0d 13 e2 1a f2 41 63  |%!12-q%!4.....Ac|
00002510  28 30 2c 2d 79 25 2a 33  32 2d 33 32 2c 60 62 25  |(0,-y%*32-32,`b%|
00002520  2c 30 29 0d 13 ec 05 e1  0d 14 00 0c dd f2 42 63  |,0)...........Bc|
00002530  28 41 24 29 0d 14 0a 1b  e7 73 60 25 3d 31 80 a7  |(A$).....s`%=1..|
00002540  41 24 2c 73 60 24 29 3e  30 8c 73 60 25 3d 32 0d  |A$,s`$)>0.s`%=2.|
00002550  14 14 0b e7 73 60 25 3d  32 8c 0d 14 1e 12 75 60  |....s`%=2.....u`|
00002560  25 2d 3d 31 3a f2 4f 62  28 41 24 29 0d 14 28 2c  |%-=1:.Ob(A$)..(,|
00002570  e7 75 60 25 3c 31 84 28  74 60 24 3e 22 22 80 a7  |.u`%<1.(t`$>""..|
00002580  41 24 2c 74 60 24 29 3e  30 29 8c 73 60 25 3d 30  |A$,t`$)>0).s`%=0|
00002590  3a f2 4f 62 28 22 22 29  0d 14 32 05 cd 0d 14 3c  |:.Ob("")..2....<|
000025a0  05 e1 0d 14 50 08 dd f2  5a 5f 0d 14 5a 22 68 5f  |....P...Z_..Z"h_|
000025b0  25 3d b9 3a f2 5f 61 28  53 61 25 2c 35 2c a4 51  |%=.:._a(Sa%,5,.Q|
000025c0  5f 28 22 52 65 73 75 6d  65 22 29 29 0d 14 64 1c  |_("Resume"))..d.|
000025d0  f2 59 5f 28 22 22 2c a4  51 5f 28 22 50 61 75 73  |.Y_("",.Q_("Paus|
000025e0  65 64 22 29 2c 22 22 29  0d 14 6e 13 f5 f2 41 62  |ed"),"")..n...Ab|
000025f0  28 33 30 29 3a fd 68 5f  25 3d a3 0d 14 78 05 e1  |(30):.h_%=...x..|
00002600  0d 14 8c 08 dd f2 6f 62  0d 14 96 2d 68 5f 25 3d  |......ob...-h_%=|
00002610  a3 3a 69 5f 25 3d a3 3a  58 5f 25 3d b9 3a f2 5f  |.:i_%=.:X_%=.:._|
00002620  61 28 53 61 25 2c 35 2c  a4 51 5f 28 22 50 61 75  |a(Sa%,5,.Q_("Pau|
00002630  73 65 22 29 29 0d 14 a0  12 f2 59 5f 28 22 22 2c  |se")).....Y_("",|
00002640  22 20 22 2c 22 22 29 0d  14 aa 05 e1 0d 14 be 08  |" ","").........|
00002650  dd f2 69 5f 0d 14 c8 28  73 62 25 3d 30 3a 75 5f  |..i_...(sb%=0:u_|
00002660  25 28 29 3d 30 3a 6b 60  24 28 29 3d 22 22 3a 6b  |%()=0:k`$()="":k|
00002670  60 25 28 29 3d b9 3a 73  60 25 3d 30 0d 14 d2 3e  |`%()=.:s`%=0...>|
00002680  e7 4f 5f 25 3e 30 80 69  5f 24 3c 3e 22 22 8c f2  |.O_%>0.i_$<>""..|
00002690  52 62 28 69 5f 24 2c 30  29 3a 69 5f 24 3d 22 22  |Rb(i_$,0):i_$=""|
000026a0  3a 8b f2 52 62 28 22 70  61 75 73 65 22 2c 30 29  |:..Rb("pause",0)|
000026b0  3a 4f 5f 25 3d 30 3a f2  43 63 0d 14 dc 05 e1 0d  |:O_%=0:.Cc......|
000026c0  14 f0 18 dd f2 6d 62 28  6a 62 25 2c 44 63 24 2c  |.....mb(jb%,Dc$,|
000026d0  45 63 24 2c 49 25 29 0d  14 fa 13 ea 69 25 2c 46  |Ec$,I%).....i%,F|
000026e0  63 24 2c 47 63 25 2c 48  63 25 0d 15 04 0d e7 44  |c$,Gc%,Hc%.....D|
000026f0  63 24 3d 22 22 8c e1 0d  15 0e 09 47 63 25 3d 30  |c$=""......Gc%=0|
00002700  0d 15 18 0b 49 63 25 3d  6a 62 25 0d 15 22 0b 48  |....Ic%=jb%..".H|
00002710  63 25 3d 4e 61 25 0d 15  2c 08 69 25 3d 30 0d 15  |c%=Na%..,.i%=0..|
00002720  36 0d 48 63 25 21 32 30  3d 34 34 0d 15 40 0c 24  |6.Hc%!20=44..@.$|
00002730  48 63 25 3d 45 63 24 0d  15 4a 28 48 63 25 3f 31  |Hc%=Ec$..J(Hc%?1|
00002740  32 3d 37 3a 48 63 25 3f  31 33 3d 32 3a 48 63 25  |2=7:Hc%?13=2:Hc%|
00002750  3f 31 34 3d 26 37 3a 48  63 25 3f 31 35 3d 30 0d  |?14=&7:Hc%?15=0.|
00002760  15 54 1a 48 63 25 21 31  36 3d 32 33 30 2d 32 34  |.T.Hc%!16=230-24|
00002770  3a 48 63 25 21 32 34 3d  30 0d 15 5e 0b 48 63 25  |:Hc%!24=0..^.Hc%|
00002780  2b 3d 32 38 0d 15 68 05  f5 0d 15 72 27 46 63 24  |+=28..h....r'Fc$|
00002790  3d a4 4a 63 28 44 63 24  2c 22 2c 22 2c 69 25 29  |=.Jc(Dc$,",",i%)|
000027a0  3a f2 4b 63 28 46 63 24  29 3a 47 63 25 2b 3d 31  |:.Kc(Fc$):Gc%+=1|
000027b0  0d 15 7c 0b fd 46 63 24  3d 22 22 0d 15 86 19 48  |..|..Fc$=""....H|
000027c0  63 25 21 2d 32 34 3d 28  48 63 25 21 2d 32 34 29  |c%!-24=(Hc%!-24)|
000027d0  84 26 38 30 0d 15 90 23  e7 49 25 3c 3e 30 8c 59  |.&80...#.I%<>0.Y|
000027e0  25 3d 31 32 30 2b 28 47  63 25 2d 31 29 2a 34 34  |%=120+(Gc%-1)*44|
000027f0  8b 59 25 3d 69 62 25 0d  15 9a 1b c8 99 32 36 32  |.Y%=ib%......262|
00002800  33 35 36 2c 2c 4e 61 25  2c 68 62 25 2d 36 34 2c  |356,,Na%,hb%-64,|
00002810  59 25 0d 15 a4 05 e1 0d  15 b8 0d dd f2 4b 63 28  |Y%...........Kc(|
00002820  4c 63 24 29 0d 15 c2 08  ea 4d 63 24 0d 15 cc 0c  |Lc$).....Mc$....|
00002830  e7 4c 63 24 3e 22 22 8c  0d 15 d6 0a 21 48 63 25  |.Lc$>"".....!Hc%|
00002840  3d 30 0d 15 e0 23 e7 c0  4c 63 24 2c 31 29 3d 22  |=0...#..Lc$,1)="|
00002850  7c 22 8c 4c 63 24 3d c1  4c 63 24 2c 32 29 3a 21  ||".Lc$=.Lc$,2):!|
00002860  48 63 25 3d 32 0d 15 ea  18 4d 63 24 3d c0 4c 63  |Hc%=2....Mc$=.Lc|
00002870  24 2c 31 29 3a 48 63 25  21 34 3d 2d 31 0d 15 f4  |$,1):Hc%!4=-1...|
00002880  16 e7 4d 63 24 3d 22 3e  22 8c 48 63 25 21 34 3d  |..Mc$=">".Hc%!4=|
00002890  51 61 25 0d 15 fe 13 48  63 25 21 38 3d 26 30 37  |Qa%....Hc%!8=&07|
000028a0  30 30 30 30 32 31 0d 16  08 34 e7 4d 63 24 3d 22  |000021...4.Mc$="|
000028b0  3e 22 84 4d 63 24 3d 22  3c 22 8c 24 28 48 63 25  |>".Mc$="<".$(Hc%|
000028c0  2b 31 32 29 3d c1 4c 63  24 2c 32 29 8b 24 28 48  |+12)=.Lc$,2).$(H|
000028d0  63 25 2b 31 32 29 3d 4c  63 24 0d 16 12 0b 48 63  |c%+12)=Lc$....Hc|
000028e0  25 2b 3d 32 34 0d 16 1c  05 cd 0d 16 26 05 e1 0d  |%+=24.......&...|
000028f0  16 3a 15 dd a4 4a 63 28  44 63 24 2c 4e 63 24 2c  |.:...Jc(Dc$,Nc$,|
00002900  f8 69 25 29 0d 16 44 08  ea 4f 63 25 0d 16 4e 21  |.i%)..D..Oc%..N!|
00002910  4f 63 25 3d 69 25 2b 31  3a 69 25 3d a7 44 63 24  |Oc%=i%+1:i%=.Dc$|
00002920  2b 4e 63 24 2c 4e 63 24  2c 4f 63 25 29 0d 16 58  |+Nc$,Nc$,Oc%)..X|
00002930  15 3d c1 44 63 24 2c 4f  63 25 2c 69 25 2d 4f 63  |.=.Dc$,Oc%,i%-Oc|
00002940  25 29 0d 16 6c 0d dd f2  49 62 28 51 63 25 29 0d  |%)..l...Ib(Qc%).|
00002950  16 76 07 ea 41 24 0d 16  80 28 ea 6c 25 3a c8 99  |.v..A$...(.l%:..|
00002960  32 36 32 33 35 37 2c 2c  4e 61 25 2c 51 63 25 2c  |262357,,Na%,Qc%,|
00002970  c4 32 30 2c 22 20 22 29  b8 2c 2c 2c 41 24 0d 16  |.20," ").,,,A$..|
00002980  8a 09 c8 8e 41 24 ca 0d  16 94 1a c9 22 43 68 6f  |....A$......"Cho|
00002990  69 63 65 73 2e 2e 2e 22  3a f2 58 62 28 55 61 25  |ices...":.Xb(Ua%|
000029a0  29 0d 16 9e 1a c9 22 43  6f 6e 74 72 6f 6c 2e 2e  |)....."Control..|
000029b0  2e 22 3a f2 58 62 28 54  61 25 29 0d 16 a8 11 c9  |.":.Xb(Ta%).....|
000029c0  22 51 75 69 74 22 3a f2  54 62 3a e0 0d 16 b2 15  |"Quit":.Tb:.....|
000029d0  c9 22 41 6c 61 72 6d 20  6c 69 73 74 22 3a f2 52  |."Alarm list":.R|
000029e0  63 0d 16 bc 14 c9 22 4d  65 6e 75 20 6c 69 73 74  |c....."Menu list|
000029f0  22 3a f2 53 63 0d 16 c6  14 c9 22 54 61 73 6b 20  |":.Sc....."Task |
00002a00  6c 69 73 74 22 3a f2 54  63 0d 16 d0 13 c9 22 56  |list":.Tc....."V|
00002a10  61 72 20 6c 69 73 74 22  3a f2 55 63 0d 16 da 1a  |ar list":.Uc....|
00002a20  c9 22 53 63 72 69 70 74  20 6c 69 73 74 22 3a f2  |."Script list":.|
00002a30  56 63 28 22 22 29 0d 16  e4 15 c9 22 44 62 67 4c  |Vc("")....."DbgL|
00002a40  65 76 20 30 22 3a 6e 5f  25 3d 30 0d 16 ee 15 c9  |ev 0":n_%=0.....|
00002a50  22 44 62 67 4c 65 76 20  31 22 3a 6e 5f 25 3d 31  |"DbgLev 1":n_%=1|
00002a60  0d 16 f8 15 c9 22 44 62  67 4c 65 76 20 32 22 3a  |....."DbgLev 2":|
00002a70  6e 5f 25 3d 32 0d 17 02  15 c9 22 44 62 67 4c 65  |n_%=2....."DbgLe|
00002a80  76 20 33 22 3a 6e 5f 25  3d 33 0d 17 0c 0d 7f 3a  |v 3":n_%=3.....:|
00002a90  e7 5f 5f 25 3e 30 8c 0d  17 16 0d e3 6c 25 3d 31  |.__%>0......l%=1|
00002aa0  b8 5f 5f 25 0d 17 20 12  e7 41 24 3d 5f 5f 24 28  |.__%.. ..A$=__$(|
00002ab0  6c 25 2c 30 29 8c 0d 17  2a 18 f2 5f 61 28 53 61  |l%,0)...*.._a(Sa|
00002ac0  25 2c 37 2c 5f 5f 24 28  6c 25 2c 30 29 29 0d 17  |%,7,__$(l%,0))..|
00002ad0  34 14 f2 52 62 28 5f 5f  24 28 6c 25 2c 31 29 2c  |4..Rb(__$(l%,1),|
00002ae0  38 29 0d 17 3e 05 cd 0d  17 48 05 ed 0d 17 52 05  |8)..>....H....R.|
00002af0  cd 0d 17 5c 05 cb 0d 17  66 05 e1 0d 17 7a 08 dd  |...\....f....z..|
00002b00  f2 46 5f 0d 17 84 34 21  50 61 25 3d 9f 3a 24 28  |.F_...4!Pa%=.:$(|
00002b10  50 61 25 2b 34 29 3d f6  24 2b 22 20 28 69 6e 74  |Pa%+4)=.$+" (int|
00002b20  65 72 6e 61 6c 20 63 6f  64 65 20 22 2b c3 9e 2b  |ernal code "+..+|
00002b30  22 29 2e 22 2b bd 30 0d  17 8e 1a c8 99 32 36 32  |")."+.0......262|
00002b40  33 36 37 2c 50 61 25 2c  31 2c 46 61 24 3a f2 54  |367,Pa%,1,Fa$:.T|
00002b50  62 0d 17 98 05 e1 0d 17  ac 0c dd f2 58 62 28 68  |b...........Xb(h|
00002b60  25 29 0d 17 b6 17 21 71  25 3d 68 25 3a c8 99 32  |%)....!q%=h%:..2|
00002b70  36 32 33 34 37 2c 2c 71  25 0d 17 c0 19 71 25 21  |62347,,q%....q%!|
00002b80  32 38 3d 2d 31 3a c8 99  32 36 32 33 34 31 2c 2c  |28=-1:..262341,,|
00002b90  71 25 0d 17 ca 2d e7 68  25 3d 54 61 25 8c c8 99  |q%...-.h%=Ta%...|
00002ba0  32 36 32 33 35 34 2c 68  25 2c 50 62 25 2c 2c 2c  |262354,h%,Pb%,,,|
00002bb0  2d 31 2c a9 a4 51 62 28  68 25 2c 50 62 25 29 0d  |-1,..Qb(h%,Pb%).|
00002bc0  17 d4 05 e1 0d 17 e8 14  dd f2 5f 62 28 68 25 2c  |.........._b(h%,|
00002bd0  57 63 25 2c 58 63 25 29  0d 17 f2 1a ea 78 25 2c  |Wc%,Xc%).....x%,|
00002be0  79 25 2c 59 63 25 2c 5a  63 25 2c 61 63 25 2c 62  |y%,Yc%,Zc%,ac%,b|
00002bf0  63 25 0d 17 fc 12 e7 41  61 25 3d 30 80 68 25 3d  |c%.....Aa%=0.h%=|
00002c00  53 61 25 8c 0d 18 06 0b  f2 58 62 28 68 25 29 0d  |Sa%......Xb(h%).|
00002c10  18 10 05 cc 0d 18 1a 23  c8 99 35 33 2c 2d 31 2c  |.......#..53,-1,|
00002c20  34 b8 2c 2c 61 63 25 3a  c8 99 35 33 2c 2d 31 2c  |4.,,ac%:..53,-1,|
00002c30  31 31 b8 2c 2c 78 25 0d  18 24 23 c8 99 35 33 2c  |11.,,x%..$#..53,|
00002c40  2d 31 2c 35 b8 2c 2c 62  63 25 3a c8 99 35 33 2c  |-1,5.,,bc%:..53,|
00002c50  2d 31 2c 31 32 b8 2c 2c  79 25 0d 18 2e 17 21 71  |-1,12.,,y%....!q|
00002c60  25 3d 68 25 3a c8 99 32  36 32 33 34 37 2c 2c 71  |%=h%:..262347,,q|
00002c70  25 0d 18 38 37 78 25 3d  78 25 3c 3c 61 63 25 3a  |%..87x%=x%<<ac%:|
00002c80  79 25 3d 79 25 3c 3c 62  63 25 3a 59 63 25 3d 71  |y%=y%<<bc%:Yc%=q|
00002c90  25 21 31 32 2d 71 25 21  34 3a 5a 63 25 3d 71 25  |%!12-q%!4:Zc%=q%|
00002ca0  21 31 36 2d 71 25 21 38  0d 18 42 49 71 25 21 34  |!16-q%!8..BIq%!4|
00002cb0  3d 28 78 25 2d 59 63 25  29 81 32 2d 57 63 25 3a  |=(x%-Yc%).2-Wc%:|
00002cc0  71 25 21 31 32 3d 71 25  21 34 2b 59 63 25 3a 71  |q%!12=q%!4+Yc%:q|
00002cd0  25 21 38 3d 28 79 25 2d  5a 63 25 29 81 32 2d 58  |%!8=(y%-Zc%).2-X|
00002ce0  63 25 3a 71 25 21 31 36  3d 71 25 21 38 2b 5a 63  |c%:q%!16=q%!8+Zc|
00002cf0  25 0d 18 4c 29 71 25 21  32 30 3d 30 3a 71 25 21  |%..L)q%!20=0:q%!|
00002d00  32 34 3d 30 3a 71 25 21  32 38 3d 2d 31 3a c8 99  |24=0:q%!28=-1:..|
00002d10  32 36 32 33 34 31 2c 2c  71 25 0d 18 56 05 cd 0d  |262341,,q%..V...|
00002d20  18 60 05 e1 0d 18 74 0c  dd f2 65 62 28 68 25 29  |.`....t...eb(h%)|
00002d30  0d 18 7e 17 21 71 25 3d  68 25 3a c8 99 32 36 32  |..~.!q%=h%:..262|
00002d40  33 36 38 2c 2c 71 25 0d  18 88 29 c8 99 32 36 32  |368,,q%...)..262|
00002d50  33 35 33 2c 2d 31 2c 71  25 21 34 2c 71 25 21 31  |353,-1,q%!4,q%!1|
00002d60  36 2d 34 34 2c 71 25 21  31 32 2c 71 25 21 31 36  |6-44,q%!12,q%!16|
00002d70  0d 18 92 05 e1 0d 18 a6  0f dd a4 51 62 28 48 25  |...........Qb(H%|
00002d80  2c 49 25 29 0d 18 b0 1f  21 71 25 3d 48 25 3a 71  |,I%)....!q%=H%:q|
00002d90  25 21 34 3d 49 25 3a c8  99 32 36 32 33 35 30 2c  |%!4=I%:..262350,|
00002da0  2c 71 25 0d 18 ba 0f 3d  a4 55 62 28 71 25 21 32  |,q%....=.Ub(q%!2|
00002db0  38 29 0d 18 ce 12 dd f2  59 61 28 48 25 2c 49 25  |8)......Ya(H%,I%|
00002dc0  2c 41 24 29 0d 18 d8 23  21 71 25 3d 48 25 3a 71  |,A$)...#!q%=H%:q|
00002dd0  25 21 34 3d 49 25 3a c8  99 33 39 33 34 32 32 2c  |%!4=I%:..393422,|
00002de0  2c 71 25 b8 3b 46 25 0d  18 e2 27 e7 a4 63 63 28  |,q%.;F%...'..cc(|
00002df0  46 25 29 80 71 25 21 32  38 3e 26 38 38 30 30 8c  |F%).q%!28>&8800.|
00002e00  24 28 71 25 21 32 38 29  3d 41 24 2b bd 30 0d 18  |$(q%!28)=A$+.0..|
00002e10  ec 05 e1 0d 19 00 12 dd  f2 5f 61 28 48 25 2c 49  |........._a(H%,I|
00002e20  25 2c 41 24 29 0d 19 0a  2f f2 59 61 28 48 25 2c  |%,A$).../.Ya(H%,|
00002e30  49 25 2c 41 24 29 3a 21  71 25 3d 48 25 3a 71 25  |I%,A$):!q%=H%:q%|
00002e40  21 34 3d 49 25 3a 71 25  21 38 3d 30 3a 71 25 21  |!4=I%:q%!8=0:q%!|
00002e50  31 32 3d 30 0d 19 14 10  c8 99 32 36 32 33 34 39  |12=0......262349|
00002e60  2c 2c 71 25 0d 19 1e 05  e1 0d 19 32 12 dd f2 64  |,,q%.......2...d|
00002e70  63 28 48 25 2c 49 25 2c  53 25 29 0d 19 3c 3d 53  |c(H%,I%,S%)..<=S|
00002e80  25 3d 94 28 53 25 3d 30  29 3a 21 71 25 3d 48 25  |%=.(S%=0):!q%=H%|
00002e90  3a 71 25 21 34 3d 49 25  3a 71 25 21 38 3d 28 28  |:q%!4=I%:q%!8=((|
00002ea0  31 29 3c 3c 32 31 29 2a  53 25 3a 71 25 21 31 32  |1)<<21)*S%:q%!12|
00002eb0  3d 28 31 3c 3c 32 31 29  0d 19 46 10 c8 99 32 36  |=(1<<21)..F...26|
00002ec0  32 33 34 39 2c 2c 71 25  0d 19 50 05 e1 0d 19 64  |2349,,q%..P....d|
00002ed0  0f dd a4 65 63 28 48 25  2c 49 25 29 0d 19 6e 1f  |...ec(H%,I%)..n.|
00002ee0  21 71 25 3d 48 25 3a 71  25 21 34 3d 49 25 3a c8  |!q%=H%:q%!4=I%:.|
00002ef0  99 32 36 32 33 35 30 2c  2c 71 25 0d 19 78 24 3d  |.262350,,q%..x$=|
00002f00  ac 28 28 28 71 25 21 32  34 29 80 28 31 3c 3c 32  |.(((q%!24).(1<<2|
00002f10  31 29 29 81 32 30 39 37  31 35 32 3c 3e 30 29 0d  |1)).2097152<>0).|
00002f20  19 8c 12 dd f2 66 63 28  48 25 2c 49 25 2c 53 25  |.....fc(H%,I%,S%|
00002f30  29 0d 19 96 33 21 71 25  3d 48 25 3a 71 25 21 34  |)...3!q%=H%:q%!4|
00002f40  3d 49 25 3a 71 25 21 38  3d 28 28 31 29 3c 3c 32  |=I%:q%!8=((1)<<2|
00002f50  32 29 2a 94 53 25 3a 71  25 21 31 32 3d 28 31 3c  |2)*.S%:q%!12=(1<|
00002f60  3c 32 32 29 0d 19 a0 10  c8 99 32 36 32 33 34 39  |<22)......262349|
00002f70  2c 2c 71 25 0d 19 aa 05  e1 0d 19 be 12 dd f2 59  |,,q%...........Y|
00002f80  5f 28 61 24 2c 62 24 2c  63 24 29 0d 19 c8 37 e7  |_(a$,b$,c$)...7.|
00002f90  61 24 3e 22 22 8c f2 5f  61 28 53 61 25 2c 31 2c  |a$>"".._a(Sa%,1,|
00002fa0  c2 61 24 2c 33 34 29 29  3a e7 a9 61 24 3e 31 8c  |.a$,34)):..a$>1.|
00002fb0  f2 5a 62 28 22 41 63 74  69 6f 6e 3a 20 22 2b 61  |.Zb("Action: "+a|
00002fc0  24 29 0d 19 d2 37 e7 62  24 3e 22 22 8c f2 5f 61  |$)...7.b$>"".._a|
00002fd0  28 53 61 25 2c 32 2c c2  62 24 2c 33 34 29 29 3a  |(Sa%,2,.b$,34)):|
00002fe0  e7 a9 62 24 3e 31 8c f2  5a 62 28 22 53 74 61 74  |..b$>1..Zb("Stat|
00002ff0  75 73 3a 20 22 2b 62 24  29 0d 19 dc 37 e7 63 24  |us: "+b$)...7.c$|
00003000  3e 22 22 8c f2 5f 61 28  53 61 25 2c 33 2c c2 63  |>"".._a(Sa%,3,.c|
00003010  24 2c 33 34 29 29 3a e7  a9 63 24 3e 31 8c f2 5a  |$,34)):..c$>1..Z|
00003020  62 28 22 49 50 20 61 64  64 3a 20 22 2b 63 24 29  |b("IP add: "+c$)|
00003030  0d 19 e6 05 e1 0d 19 fa  29 dd f2 44 62 28 6a 62  |........)..Db(jb|
00003040  25 2c 67 63 25 2c 68 63  25 2c 69 63 25 2c 6a 63  |%,gc%,hc%,ic%,jc|
00003050  25 2c 6b 63 25 2c 6c 63  25 2c 6d 63 25 29 0d 1a  |%,kc%,lc%,mc%)..|
00003060  04 0c e7 6a 62 25 3e 2d  31 8c 0d 1a 0e 16 71 25  |...jb%>-1.....q%|
00003070  21 30 3d 6a 62 25 3a 71  25 21 32 38 3d 6d 63 25  |!0=jb%:q%!28=mc%|
00003080  0d 1a 18 29 71 25 21 34  3d 67 63 25 3a 71 25 21  |...)q%!4=gc%:q%!|
00003090  38 3d 68 63 25 3a 71 25  21 31 32 3d 69 63 25 3a  |8=hc%:q%!12=ic%:|
000030a0  71 25 21 31 36 3d 6a 63  25 0d 1a 22 17 71 25 21  |q%!16=jc%..".q%!|
000030b0  32 30 3d 6b 63 25 3a 71  25 21 32 34 3d 6c 63 25  |20=kc%:q%!24=lc%|
000030c0  0d 1a 2c 10 c8 99 32 36  32 33 34 31 2c 2c 71 25  |..,...262341,,q%|
000030d0  0d 1a 36 05 cd 0d 1a 40  05 e1 0d 1a 54 0c dd f2  |..6....@....T...|
000030e0  45 62 28 68 25 29 0d 1a  5e 07 ea 4c 25 0d 1a 68  |Eb(h%)..^..L%..h|
000030f0  09 c8 8e 68 25 ca 0d 1a  72 11 c9 56 61 25 3a e7  |...h%...r..Va%:.|
00003100  68 5f 25 8c f2 6f 62 0d  1a 7c 10 c9 57 61 25 3a  |h_%..ob..|..Wa%:|
00003110  57 61 24 3d 22 20 22 0d  1a 86 05 7f 0d 1a 90 0d  |Wa$=" ".........|
00003120  e3 4c 25 3d 30 b8 57 60  25 0d 1a 9a 1a e7 68 25  |.L%=0.W`%.....h%|
00003130  3d 64 60 25 28 4c 25 29  80 61 60 25 28 4c 25 29  |=d`%(L%).a`%(L%)|
00003140  3e 30 8c 0d 1a a4 21 ef  37 3a e7 a4 58 61 28 a4  |>0....!.7:..Xa(.|
00003150  51 5f 28 22 54 61 73 6b  4b 69 6c 6c 22 29 2c 33  |Q_("TaskKill"),3|
00003160  29 3d 32 8c 0d 1a ae 17  f2 6e 63 28 59 60 24 28  |)=2......nc(Y`$(|
00003170  4c 25 29 2c 26 38 30 38  43 34 29 0d 1a b8 05 cc  |L%),&808C4).....|
00003180  0d 1a c2 08 68 25 3d 30  0d 1a cc 05 cd 0d 1a d6  |....h%=0........|
00003190  0a 4c 25 3d 57 60 25 0d  1a e0 05 cd 0d 1a ea 05  |.L%=W`%.........|
000031a0  ed 0d 1a f4 05 cb 0d 1a  fe 1d e7 68 25 3e 30 8c  |...........h%>0.|
000031b0  21 71 25 3d 68 25 3a c8  99 32 36 32 33 34 32 2c  |!q%=h%:..262342,|
000031c0  2c 71 25 0d 1b 08 05 e1  0d 1b 1c 0c dd a4 6f 63  |,q%...........oc|
000031d0  28 41 24 29 0d 1b 26 1f  ea 64 25 2c 72 25 2c 71  |(A$)..&..d%,r%,q|
000031e0  63 25 3a 64 25 3d 36 30  3a 72 25 3d 30 3a 71 63  |c%:d%=60:r%=0:qc|
000031f0  25 3d 31 0d 1b 30 0f f5  42 24 3d a4 77 62 28 41  |%=1..0..B$=.wb(A|
00003200  24 29 0d 1b 3a 10 e7 c0  42 24 2c 31 29 3d 22 2f  |$)..:...B$,1)="/|
00003210  22 8c 0d 1b 44 18 43 24  3d a4 78 62 28 42 24 29  |"...D.C$=.xb(B$)|
00003220  3a c8 8e c0 42 24 2c 33  29 ca 0d 1b 4e 1c c9 22  |:...B$,3)...N.."|
00003230  64 65 6c 22 3a 64 25 3d  bb 43 24 3a e7 64 25 3c  |del":d%=.C$:.d%<|
00003240  35 8c 64 25 3d 35 0d 1b  58 27 c9 22 64 65 66 22  |5.d%=5..X'."def"|
00003250  3a 43 24 3d a4 72 63 28  43 24 29 3a e7 c0 43 24  |:C$=.rc(C$):..C$|
00003260  2c 31 29 3d 22 79 22 8c  71 63 25 3d 32 0d 1b 62  |,1)="y".qc%=2..b|
00003270  05 cb 0d 1b 6c 05 cc 0d  1b 76 11 72 25 3d a4 58  |....l....v.r%=.X|
00003280  61 28 42 24 2c 64 25 29  0d 1b 80 05 cd 0d 1b 8a  |a(B$,d%)........|
00003290  0a fd 41 24 3d 22 22 0d  1b 94 10 e7 72 25 3d 30  |..A$="".....r%=0|
000032a0  8c 72 25 3d 71 63 25 0d  1b 9e 0c 3d 2d 28 72 25  |.r%=qc%....=-(r%|
000032b0  3d 32 29 0d 1b c6 10 dd  a4 58 61 28 41 24 2c 73  |=2)......Xa(A$,s|
000032c0  63 25 29 0d 1b da 2f ea  74 63 25 3a 74 63 25 3d  |c%).../.tc%:tc%=|
000032d0  66 61 25 3a 73 63 25 3d  73 63 25 2a 31 30 30 3a  |fa%:sc%=sc%*100:|
000032e0  f2 5f 61 28 58 61 25 2c  32 2c c0 41 24 2c 35 37  |._a(Xa%,2,.A$,57|
000032f0  29 29 0d 1b e4 21 f2 5f  62 28 58 61 25 2c 30 2c  |))...!._b(Xa%,0,|
00003300  30 29 3a e7 73 63 25 3d  30 8c 73 63 25 3d 36 30  |0):.sc%=0.sc%=60|
00003310  30 30 30 0d 1b ee 26 71  62 25 3d 30 3a f5 3a f2  |000...&qb%=0:.:.|
00003320  41 62 28 35 30 29 3a fd  71 62 25 3e 30 84 66 61  |Ab(50):.qb%>0.fa|
00003330  25 2d 74 63 25 3e 73 63  25 0d 1b f8 0c f2 45 62  |%-tc%>sc%.....Eb|
00003340  28 58 61 25 29 0d 1c 02  08 3d 71 62 25 0d 1c 16  |(Xa%)....=qb%...|
00003350  0c dd a4 79 60 28 41 24  29 0d 1c 20 0a ea 4c 25  |...y`(A$).. ..L%|
00003360  2c 46 25 0d 1c 2a 23 c8  99 31 33 31 31 30 37 2c  |,F%..*#..131107,|
00003370  41 24 2c 61 5f 25 2c 32  35 36 2c 30 2c 33 b8 2c  |A$,a_%,256,0,3.,|
00003380  2c 4c 25 3b 46 25 0d 1c  34 17 e7 28 46 25 80 31  |,L%;F%..4..(F%.1|
00003390  29 84 4c 25 3e 32 35 36  8c 3a 3d 22 22 0d 1c 3e  |).L%>256.:=""..>|
000033a0  13 61 5f 25 3f 4c 25 3d  31 33 3a 3d 24 61 5f 25  |.a_%?L%=13:=$a_%|
000033b0  0d 1c 52 0c dd f2 51 61  28 71 25 29 0d 1c 5c 3b  |..R...Qa(q%)..\;|
000033c0  67 63 25 3d 21 71 25 3a  68 63 25 3d 71 25 21 34  |gc%=!q%:hc%=q%!4|
000033d0  3a 69 63 25 3d 71 25 21  38 3a 6a 63 25 3d 71 25  |:ic%=q%!8:jc%=q%|
000033e0  21 31 32 3a 6b 63 25 3d  71 25 21 31 36 3a 6c 63  |!12:kc%=q%!16:lc|
000033f0  25 3d 71 25 21 32 30 0d  1c 66 2f 75 63 25 3d 67  |%=q%!20..f/uc%=g|
00003400  63 25 2d 6b 63 25 3a 76  63 25 3d 6a 63 25 2d 6c  |c%-kc%:vc%=jc%-l|
00003410  63 25 3a 77 63 25 3d 71  25 21 32 38 3a 78 63 25  |c%:wc%=q%!28:xc%|
00003420  3d 71 25 21 33 36 0d 1c  70 05 e1 0d 1c 84 0c dd  |=q%!36..p.......|
00003430  f2 43 62 28 68 25 29 0d  1c 8e 15 ea 53 62 25 3a  |.Cb(h%).....Sb%:|
00003440  21 71 25 3d 68 25 3a c8  8e 68 25 ca 0d 1c 98 08  |!q%=h%:..h%.....|
00003450  c9 54 61 25 0d 1c a2 14  c8 99 32 36 32 33 34 34  |.Ta%......262344|
00003460  2c 2c 71 25 b8 79 63 25  0d 1c ac 0c f2 7a 63 28  |,,q%.yc%.....zc(|
00003470  79 63 25 29 0d 1c b6 08  c9 56 61 25 0d 1c c0 14  |yc%).....Va%....|
00003480  c8 99 32 36 32 33 34 34  2c 2c 71 25 b8 79 63 25  |..262344,,q%.yc%|
00003490  0d 1c ca 0c f2 5f 63 28  79 63 25 29 0d 1c d4 05  |....._c(yc%)....|
000034a0  7f 0d 1c de 1c e3 53 62  25 3d 30 b8 57 60 25 3a  |......Sb%=0.W`%:|
000034b0  e7 68 25 3d 64 60 25 28  53 62 25 29 8c 0d 1c e8  |.h%=d`%(Sb%)....|
000034c0  14 c8 99 32 36 32 33 34  34 2c 2c 71 25 b8 79 63  |...262344,,q%.yc|
000034d0  25 0d 1c f2 10 f2 60 63  28 53 62 25 2c 79 63 25  |%.....`c(Sb%,yc%|
000034e0  29 0d 1c fc 05 cd 0d 1d  06 05 ed 0d 1d 10 05 cb  |)...............|
000034f0  0d 1d 1a 05 e1 0d 1d 2e  08 dd f2 4b 5f 0d 1d 38  |...........K_..8|
00003500  09 41 64 25 3d 30 0d 1d  42 2a 42 64 25 3d 31 3a  |.Ad%=0..B*Bd%=1:|
00003510  de 43 64 24 28 4a 5f 25  29 2c 44 64 25 20 4a 5f  |.Cd$(J_%),Dd% J_|
00003520  25 2c 79 62 24 28 72 60  25 29 3a 60 62 25 3d 30  |%,yb$(r`%):`b%=0|
00003530  0d 1d 4c 1c 43 64 24 28  29 3d c4 49 5f 25 81 32  |..L.Cd$()=.I_%.2|
00003540  2c 22 20 22 29 3a 45 64  25 3d 34 30 0d 1d 56 34  |," "):Ed%=40..V4|
00003550  21 61 5f 25 3d 30 3a 61  5f 25 21 34 3d 2d 4a 5f  |!a_%=0:a_%!4=-J_|
00003560  25 2a 33 32 2d 45 64 25  2d 38 3a 61 5f 25 21 38  |%*32-Ed%-8:a_%!8|
00003570  3d 49 5f 25 2a 31 36 3a  61 5f 25 21 31 32 3d 30  |=I_%*16:a_%!12=0|
00003580  0d 1d 60 14 c8 99 32 36  32 33 35 39 2c 54 61 25  |..`...262359,Ta%|
00003590  2c 61 5f 25 0d 1d 6a 2b  e3 69 25 3d 30 b8 31 3a  |,a_%..j+.i%=0.1:|
000035a0  21 61 5f 25 3d 54 61 25  3a 61 5f 25 21 34 3d 69  |!a_%=Ta%:a_%!4=i|
000035b0  25 3a c8 99 32 36 32 33  35 30 2c 2c 61 5f 25 0d  |%:..262350,,a_%.|
000035c0  1d 74 37 61 5f 25 21 31  32 3d 61 5f 25 21 31 32  |.t7a_%!12=a_%!12|
000035d0  2d 4a 5f 25 2a 33 32 3a  61 5f 25 21 32 30 3d 61  |-J_%*32:a_%!20=a|
000035e0  5f 25 21 32 30 2d 4a 5f  25 2a 33 32 3a 61 5f 25  |_%!20-J_%*32:a_%|
000035f0  21 34 3d 54 61 25 0d 1d  7e 20 21 71 25 3d 54 61  |!4=Ta%..~ !q%=Ta|
00003600  25 3a 71 25 21 34 3d 69  25 3a c8 99 32 36 32 33  |%:q%!4=i%:..2623|
00003610  34 30 2c 2c 71 25 0d 1d  88 19 c8 99 32 36 32 33  |40,,q%......2623|
00003620  33 38 2c 2c 61 5f 25 2b  34 b8 50 62 25 3a ed 0d  |38,,a_%+4.Pb%:..|
00003630  1d 92 1d 46 64 25 3d 30  3a 47 64 25 3d 30 3a 48  |...Fd%=0:Gd%=0:H|
00003640  64 24 3d 22 22 3a 63 60  24 3d 22 22 0d 1d 9c 27  |d$="":c`$=""...'|
00003650  f2 59 5f 28 22 53 74 61  72 74 69 6e 67 20 53 4c  |.Y_("Starting SL|
00003660  49 50 64 69 61 6c 22 2c  22 49 64 6c 65 22 2c 22  |IPdial","Idle","|
00003670  20 22 29 0d 1d a6 20 e7  49 64 25 3d 30 80 a4 65  | ")... .Id%=0..e|
00003680  63 28 55 61 25 2c 32 29  3d 30 8c f2 58 62 28 54  |c(Ua%,2)=0..Xb(T|
00003690  61 25 29 0d 1d b0 05 e1  0d 1d c4 14 dd f2 4a 64  |a%)...........Jd|
000036a0  28 53 62 25 2c 4b 64 25  2c 54 24 29 0d 1d ce 17  |(Sb%,Kd%,T$)....|
000036b0  ea 4c 64 25 3a 4c 64 25  3d 28 53 62 25 83 34 29  |.Ld%:Ld%=(Sb%.4)|
000036c0  2a 34 30 0d 1d d8 10 e7  64 60 25 28 53 62 25 29  |*40.....d`%(Sb%)|
000036d0  3d 30 8c 0d 1d e2 1e c8  99 32 36 32 33 36 31 2c  |=0.......262361,|
000036e0  2c 5f 60 24 2b 22 2e 54  65 6d 70 6c 61 74 65 73  |,_`$+".Templates|
000036f0  22 0d 1d ec 2e c8 99 32  36 32 33 36 33 2c 2c 71  |"......262363,,q|
00003700  25 2c 4d 64 25 2c 4e 64  25 2b 4f 64 25 2c 2d 31  |%,Md%,Nd%+Od%,-1|
00003710  2c 22 74 61 73 6b 22 2c  30 b8 2c 2c 4d 64 25 0d  |,"task",0.,,Md%.|
00003720  1d f6 20 68 60 25 28 53  62 25 29 3d 71 25 21 37  |.. h`%(Sb%)=q%!7|
00003730  32 3a 71 25 21 34 34 3d  2d 69 60 25 2a 33 32 0d  |2:q%!44=-i`%*32.|
00003740  1e 00 3b 21 71 25 3d 21  71 25 2b 4c 64 25 3a 71  |..;!q%=!q%+Ld%:q|
00003750  25 21 38 3d 71 25 21 38  2b 4c 64 25 3a 71 25 21  |%!8=q%!8+Ld%:q%!|
00003760  34 3d 71 25 21 34 2d 4c  64 25 3a 71 25 21 31 32  |4=q%!4-Ld%:q%!12|
00003770  3d 71 25 21 31 32 2d 4c  64 25 0d 1e 0a 19 c8 99  |=q%!12-Ld%......|
00003780  32 36 32 33 33 37 2c 2c  71 25 b8 64 60 25 28 53  |262337,,q%.d`%(S|
00003790  62 25 29 0d 1e 14 0c c8  99 32 36 32 33 36 32 0d  |b%)......262362.|
000037a0  1e 1e 0a c8 8e 53 62 25  ca 0d 1e 28 10 c9 30 3a  |.....Sb%...(..0:|
000037b0  de 50 64 24 28 69 60 25  29 0d 1e 32 10 c9 31 3a  |.Pd$(i`%)..2..1:|
000037c0  de 51 64 24 28 69 60 25  29 0d 1e 3c 10 c9 32 3a  |.Qd$(i`%)..<..2:|
000037d0  de 52 64 24 28 69 60 25  29 0d 1e 46 10 c9 33 3a  |.Rd$(i`%)..F..3:|
000037e0  de 53 64 24 28 69 60 25  29 0d 1e 50 10 c9 34 3a  |.Sd$(i`%)..P..4:|
000037f0  de 54 64 24 28 69 60 25  29 0d 1e 5a 10 c9 35 3a  |.Td$(i`%)..Z..5:|
00003800  de 55 64 24 28 69 60 25  29 0d 1e 64 10 c9 36 3a  |.Ud$(i`%)..d..6:|
00003810  de 56 64 24 28 69 60 25  29 0d 1e 6e 1a 7f 3a f2  |.Vd$(i`%)..n..:.|
00003820  72 62 28 a4 51 5f 28 22  45 74 61 73 6b 31 22 29  |rb(.Q_("Etask1")|
00003830  29 3a e1 0d 1e 78 05 cb  0d 1e 82 05 cc 0d 1e 8c  |):...x..........|
00003840  0a c8 8e 53 62 25 ca 0d  1e 96 0f c9 30 3a 50 64  |...Sb%......0:Pd|
00003850  24 28 29 3d 22 22 0d 1e  a0 0f c9 31 3a 51 64 24  |$()="".....1:Qd$|
00003860  28 29 3d 22 22 0d 1e aa  0f c9 32 3a 52 64 24 28  |()="".....2:Rd$(|
00003870  29 3d 22 22 0d 1e b4 0f  c9 33 3a 53 64 24 28 29  |)="".....3:Sd$()|
00003880  3d 22 22 0d 1e be 0f c9  34 3a 54 64 24 28 29 3d  |="".....4:Td$()=|
00003890  22 22 0d 1e c8 0f c9 35  3a 55 64 24 28 29 3d 22  |"".....5:Ud$()="|
000038a0  22 0d 1e d2 0f c9 36 3a  56 64 24 28 29 3d 22 22  |".....6:Vd$()=""|
000038b0  0d 1e dc 05 cb 0d 1e e6  05 cd 0d 1e f0 41 24 68  |.............A$h|
000038c0  60 25 28 53 62 25 29 3d  a4 61 62 28 22 54 61 73  |`%(Sb%)=.ab("Tas|
000038d0  6b 52 75 6e 22 2c 54 24  29 3a 63 60 24 28 53 62  |kRun",T$):c`$(Sb|
000038e0  25 29 3d 22 22 3a 65 60  25 28 53 62 25 29 3d 30  |%)="":e`%(Sb%)=0|
000038f0  3a 66 60 25 28 53 62 25  29 3d 30 0d 1e fa 16 e7  |:f`%(Sb%)=0.....|
00003900  4b 64 25 8c f2 58 62 28  64 60 25 28 53 62 25 29  |Kd%..Xb(d`%(Sb%)|
00003910  29 0d 1f 04 05 e1 0d 1f  18 19 dd f2 57 64 28 58  |)...........Wd(X|
00003920  64 25 2c 59 64 25 2c 5a  64 25 2c 61 64 25 29 0d  |d%,Yd%,Zd%,ad%).|
00003930  1f 22 31 21 71 25 3d 54  61 25 3a 71 25 21 34 3d  |."1!q%=Ta%:q%!4=|
00003940  58 64 25 3a 71 25 21 38  3d 59 64 25 3a 71 25 21  |Xd%:q%!8=Yd%:q%!|
00003950  31 32 3d 5a 64 25 3a 71  25 21 31 36 3d 61 64 25  |12=Zd%:q%!16=ad%|
00003960  0d 1f 2c 14 c8 99 32 36  32 33 34 35 2c 2c 71 25  |..,...262345,,q%|
00003970  b8 79 63 25 0d 1f 36 0c  f2 7a 63 28 79 63 25 29  |.yc%..6..zc(yc%)|
00003980  0d 1f 40 05 e1 0d 1f 54  19 dd f2 41 63 28 58 64  |..@....T...Ac(Xd|
00003990  25 2c 59 64 25 2c 5a 64  25 2c 61 64 25 29 0d 1f  |%,Yd%,Zd%,ad%)..|
000039a0  5e 31 21 71 25 3d 56 61  25 3a 71 25 21 34 3d 58  |^1!q%=Va%:q%!4=X|
000039b0  64 25 3a 71 25 21 38 3d  59 64 25 3a 71 25 21 31  |d%:q%!8=Yd%:q%!1|
000039c0  32 3d 5a 64 25 3a 71 25  21 31 36 3d 61 64 25 0d  |2=Zd%:q%!16=ad%.|
000039d0  1f 68 14 c8 99 32 36 32  33 34 35 2c 2c 71 25 b8  |.h...262345,,q%.|
000039e0  79 63 25 0d 1f 72 0c f2  5f 63 28 79 63 25 29 0d  |yc%..r.._c(yc%).|
000039f0  1f 7c 05 e1 0d 1f 90 1d  dd f2 62 64 28 53 62 25  |.|........bd(Sb%|
00003a00  2c 58 64 25 2c 59 64 25  2c 5a 64 25 2c 61 64 25  |,Xd%,Yd%,Zd%,ad%|
00003a10  29 0d 1f 9a 36 21 71 25  3d 64 60 25 28 53 62 25  |)...6!q%=d`%(Sb%|
00003a20  29 3a 71 25 21 34 3d 58  64 25 3a 71 25 21 38 3d  |):q%!4=Xd%:q%!8=|
00003a30  59 64 25 3a 71 25 21 31  32 3d 5a 64 25 3a 71 25  |Yd%:q%!12=Zd%:q%|
00003a40  21 31 36 3d 61 64 25 0d  1f a4 14 c8 99 32 36 32  |!16=ad%......262|
00003a50  33 34 35 2c 2c 71 25 b8  79 63 25 0d 1f ae 10 f2  |345,,q%.yc%.....|
00003a60  60 63 28 53 62 25 2c 79  63 25 29 0d 1f b8 05 e1  |`c(Sb%,yc%).....|
00003a70  0d 1f cc 0d dd f2 5f 63  28 79 63 25 29 0d 1f d6  |......_c(yc%)...|
00003a80  09 c8 95 79 63 25 0d 1f  e0 0f f2 51 61 28 71 25  |...yc%.....Qa(q%|
00003a90  2b 34 29 3a da 0d 1f ea  2d 63 64 25 3d 94 28 78  |+4):....-cd%=.(x|
00003aa0  63 25 2d 76 63 25 2b 31  36 29 81 33 32 3a 64 64  |c%-vc%+16).32:dd|
00003ab0  25 3d 94 28 77 63 25 2d  76 63 25 2b 31 36 29 81  |%=.(wc%-vc%+16).|
00003ac0  33 32 0d 1f f4 25 e7 64  64 25 3e 72 60 25 8c 64  |32...%.dd%>r`%.d|
00003ad0  64 25 3d 72 60 25 3a e7  63 64 25 3e 64 64 25 8c  |d%=r`%:.cd%>dd%.|
00003ae0  63 64 25 3d 64 64 25 0d  1f fe 1a c8 99 32 36 32  |cd%=dd%......262|
00003af0  33 37 34 2c 37 3a e3 4c  25 3d 63 64 25 b8 64 64  |374,7:.L%=cd%.dd|
00003b00  25 0d 20 08 2e ec 75 63  25 2b 34 2d 76 60 25 2a  |%. ...uc%+4-v`%*|
00003b10  28 60 62 25 81 32 2d a9  79 62 24 28 4c 25 29 2a  |(`b%.2-.yb$(L%)*|
00003b20  38 29 2c 76 63 25 2d 4c  25 2a 33 32 2d 31 36 0d  |8),vc%-L%*32-16.|
00003b30  20 12 0e f1 79 62 24 28  4c 25 29 3a ed 0d 20 1c  | ...yb$(L%):.. .|
00003b40  14 c8 99 32 36 32 33 34  36 2c 2c 71 25 b8 79 63  |...262346,,q%.yc|
00003b50  25 0d 20 26 05 ce 0d 20  30 05 e1 0d 20 44 11 dd  |%. &... 0... D..|
00003b60  f2 60 63 28 53 62 25 2c  79 63 25 29 0d 20 4e 18  |.`c(Sb%,yc%). N.|
00003b70  ea 4c 25 2c 79 25 2c 63  64 25 2c 64 64 25 3a c8  |.L%,y%,cd%,dd%:.|
00003b80  95 79 63 25 0d 20 58 0f  f2 51 61 28 71 25 2b 34  |.yc%. X..Qa(q%+4|
00003b90  29 3a da 0d 20 62 27 63  64 25 3d 94 28 78 63 25  |):.. b'cd%=.(xc%|
00003ba0  2d 76 63 25 29 81 33 32  3a 64 64 25 3d 94 28 77  |-vc%).32:dd%=.(w|
00003bb0  63 25 2d 76 63 25 29 81  33 32 0d 20 6c 25 e7 64  |c%-vc%).32. l%.d|
00003bc0  64 25 3e 69 60 25 8c 64  64 25 3d 69 60 25 3a e7  |d%>i`%.dd%=i`%:.|
00003bd0  63 64 25 3e 64 64 25 8c  63 64 25 3d 64 64 25 0d  |cd%>dd%.cd%=dd%.|
00003be0  20 76 1a c8 99 32 36 32  33 37 34 2c 37 3a e3 4c  | v...262374,7:.L|
00003bf0  25 3d 63 64 25 b8 64 64  25 0d 20 80 18 79 25 3d  |%=cd%.dd%. ..y%=|
00003c00  28 4c 25 2b 66 60 25 28  53 62 25 29 29 83 69 60  |(L%+f`%(Sb%)).i`|
00003c10  25 0d 20 8a 16 ec 75 63  25 2b 34 2c 76 63 25 2d  |%. ...uc%+4,vc%-|
00003c20  4c 25 2a 33 32 2d 34 0d  20 94 0a c8 8e 53 62 25  |L%*32-4. ....Sb%|
00003c30  ca 0d 20 9e 0f c9 30 3a  f1 50 64 24 28 79 25 29  |.. ...0:.Pd$(y%)|
00003c40  0d 20 a8 0f c9 31 3a f1  51 64 24 28 79 25 29 0d  |. ...1:.Qd$(y%).|
00003c50  20 b2 0f c9 32 3a f1 52  64 24 28 79 25 29 0d 20  | ...2:.Rd$(y%). |
00003c60  bc 0f c9 33 3a f1 53 64  24 28 79 25 29 0d 20 c6  |...3:.Sd$(y%). .|
00003c70  0f c9 34 3a f1 54 64 24  28 79 25 29 0d 20 d0 0f  |..4:.Td$(y%). ..|
00003c80  c9 35 3a f1 55 64 24 28  79 25 29 0d 20 da 0f c9  |.5:.Ud$(y%). ...|
00003c90  36 3a f1 56 64 24 28 79  25 29 0d 20 e4 05 cb 0d  |6:.Vd$(y%). ....|
00003ca0  20 ee 05 ed 0d 20 f8 14  c8 99 32 36 32 33 34 36  | .... ....262346|
00003cb0  2c 2c 71 25 b8 79 63 25  0d 21 02 05 ce 0d 21 0c  |,,q%.yc%.!....!.|
00003cc0  05 e1 0d 21 20 0d dd f2  7a 63 28 79 63 25 29 0d  |...! ...zc(yc%).|
00003cd0  21 2a 18 ea 4c 25 2c 79  25 2c 63 64 25 2c 64 64  |!*..L%,y%,cd%,dd|
00003ce0  25 3a c8 95 79 63 25 0d  21 34 0f f2 51 61 28 71  |%:..yc%.!4..Qa(q|
00003cf0  25 2b 34 29 3a da 0d 21  3e 27 63 64 25 3d 94 28  |%+4):..!>'cd%=.(|
00003d00  78 63 25 2d 76 63 25 29  81 33 32 3a 64 64 25 3d  |xc%-vc%).32:dd%=|
00003d10  94 28 77 63 25 2d 76 63  25 29 81 33 32 0d 21 48  |.(wc%-vc%).32.!H|
00003d20  25 e7 64 64 25 3e 4a 5f  25 8c 64 64 25 3d 4a 5f  |%.dd%>J_%.dd%=J_|
00003d30  25 3a e7 63 64 25 3e 64  64 25 8c 63 64 25 3d 64  |%:.cd%>dd%.cd%=d|
00003d40  64 25 0d 21 52 1f e3 4c  25 3d 63 64 25 b8 64 64  |d%.!R..L%=cd%.dd|
00003d50  25 3a 79 25 3d 28 4c 25  2b 41 64 25 29 83 4a 5f  |%:y%=(L%+Ad%).J_|
00003d60  25 0d 21 5c 2d ec 75 63  25 2c 76 63 25 2d 4c 25  |%.!\-.uc%,vc%-L%|
00003d70  2a 33 32 3a c8 99 32 36  32 33 37 34 2c 44 64 25  |*32:..262374,Dd%|
00003d80  3f 79 25 3a f1 43 64 24  28 79 25 29 3a ed 0d 21  |?y%:.Cd$(y%):..!|
00003d90  66 14 c8 99 32 36 32 33  34 36 2c 2c 71 25 b8 79  |f...262346,,q%.y|
00003da0  63 25 0d 21 70 05 ce 0d  21 7a 05 e1 0d 21 8e 0c  |c%.!p...!z...!..|
00003db0  dd f2 65 64 28 41 24 29  0d 21 98 0f e7 48 64 24  |..ed(A$).!...Hd$|
00003dc0  3e 22 22 8c f2 66 64 0d  21 a2 0d f2 67 64 28 41  |>""..fd.!...gd(A|
00003dd0  24 2c 37 29 0d 21 ac 05  e1 0d 21 c0 0c dd f2 50  |$,7).!....!....P|
00003de0  5f 28 41 24 29 0d 21 ca  0e f2 67 64 28 41 24 2c  |_(A$).!...gd(A$,|
00003df0  31 31 29 0d 21 d4 05 e1  0d 21 e8 08 dd f2 66 64  |11).!....!....fd|
00003e00  0d 21 f2 0c e7 48 64 24  3e 22 22 8c 0d 21 fc 20  |.!...Hd$>""..!. |
00003e10  e7 28 6e 5f 25 80 32 29  3c 3e 30 80 6f 5f 25 3c  |.(n_%.2)<>0.o_%<|
00003e20  3e 30 8c d5 23 6f 5f 25  2c 48 64 24 0d 22 06 13  |>0..#o_%,Hd$."..|
00003e30  e7 73 60 25 3e 30 8c f2  42 63 28 48 64 24 29 0d  |.s`%>0..Bc(Hd$).|
00003e40  22 10 15 f2 67 64 28 48  64 24 2c 35 29 3a 48 64  |"...gd(Hd$,5):Hd|
00003e50  24 3d 22 22 0d 22 1a 05  cd 0d 22 24 05 e1 0d 22  |$=""."...."$..."|
00003e60  38 13 dd a4 68 64 3a e7  6c 5f 25 3d 30 8c 3d 2d  |8...hd:.l_%=0.=-|
00003e70  31 0d 22 42 14 5a 25 3d  a4 64 28 31 2c 75 61 25  |1."B.Z%=.d(1,ua%|
00003e80  2c 30 2c 30 29 0d 22 4c  1a e7 5a 25 3e 30 80 28  |,0,0)."L..Z%>0.(|
00003e90  6e 5f 25 80 32 29 3e 30  84 73 60 25 3e 30 8c 0d  |n_%.2)>0.s`%>0..|
00003ea0  22 56 1a e7 5a 25 3e 33  31 80 5a 25 3c 31 32 38  |"V..Z%>31.Z%<128|
00003eb0  8c 48 64 24 2b 3d bd 5a  25 0d 22 60 1e e7 5a 25  |.Hd$+=.Z%."`..Z%|
00003ec0  3d 31 33 84 5a 25 3d 31  30 84 a9 48 64 24 3e 3d  |=13.Z%=10..Hd$>=|
00003ed0  49 5f 25 8c f2 66 64 0d  22 6a 05 cd 0d 22 74 07  |I_%..fd."j..."t.|
00003ee0  3d 5a 25 0d 22 88 15 dd  f2 64 62 28 53 62 25 2c  |=Z%."....db(Sb%,|
00003ef0  69 64 25 2c 6a 64 25 29  0d 22 92 07 ea 6c 25 0d  |id%,jd%)."...l%.|
00003f00  22 9c 17 e3 6c 25 3d 30  b8 6a 64 25 3a 43 25 3d  |"...l%=0.jd%:C%=|
00003f10  69 64 25 3f 6c 25 0d 22  a6 1f e7 43 25 3e 33 31  |id%?l%."...C%>31|
00003f20  80 43 25 3c 31 32 38 8c  63 60 24 28 53 62 25 29  |.C%<128.c`$(Sb%)|
00003f30  2b 3d bd 43 25 0d 22 b0  1e e7 43 25 3d 31 33 84  |+=.C%."...C%=13.|
00003f40  43 25 3d 31 30 84 a9 63  60 24 28 53 62 25 29 3e  |C%=10..c`$(Sb%)>|
00003f50  37 38 8c 0d 22 ba 15 f2  6b 64 28 53 62 25 2c 63  |78.."...kd(Sb%,c|
00003f60  60 24 28 53 62 25 29 29  0d 22 c4 24 e7 48 60 25  |`$(Sb%)).".$.H`%|
00003f70  3d 53 62 25 80 48 60 24  28 30 29 3e 22 22 8c f2  |=Sb%.H`$(0)>""..|
00003f80  48 60 28 63 60 24 28 53  62 25 29 29 0d 22 ce 0f  |H`(c`$(Sb%))."..|
00003f90  63 60 24 28 53 62 25 29  3d 22 22 0d 22 d8 05 cd  |c`$(Sb%)=""."...|
00003fa0  0d 22 e2 05 ed 0d 22 ec  24 e7 48 60 25 3d 53 62  |."....".$.H`%=Sb|
00003fb0  25 80 48 60 24 28 30 29  3e 22 22 8c f2 48 60 28  |%.H`$(0)>""..H`(|
00003fc0  63 60 24 28 53 62 25 29  29 0d 22 f6 05 e1 0d 23  |c`$(Sb%))."....#|
00003fd0  0a 10 dd f2 6b 64 28 53  62 25 2c 41 24 29 0d 23  |....kd(Sb%,A$).#|
00003fe0  14 0a ea 74 25 2c 42 24  0d 23 1e 2d e7 28 6e 5f  |...t%,B$.#.-.(n_|
00003ff0  25 80 34 29 3c 3e 30 80  6f 5f 25 3c 3e 30 8c d5  |%.4)<>0.o_%<>0..|
00004000  23 6f 5f 25 2c 22 54 57  22 2b c3 53 62 25 2b 22  |#o_%,"TW"+.Sb%+"|
00004010  3e 22 2b 41 24 0d 23 28  0b c8 95 41 24 3e 22 22  |>"+A$.#(...A$>""|
00004020  0d 23 32 1e 74 25 3d 28  65 60 25 28 53 62 25 29  |.#2.t%=(e`%(Sb%)|
00004030  2b 66 60 25 28 53 62 25  29 29 83 69 60 25 0d 23  |+f`%(Sb%)).i`%.#|
00004040  3c 19 42 24 3d c0 41 24  2c 37 39 29 3a 41 24 3d  |<.B$=.A$,79):A$=|
00004050  c1 41 24 2c 37 39 29 0d  23 46 0a c8 8e 53 62 25  |.A$,79).#F...Sb%|
00004060  ca 0d 23 50 11 c9 30 3a  50 64 24 28 74 25 29 3d  |..#P..0:Pd$(t%)=|
00004070  42 24 0d 23 5a 11 c9 31  3a 51 64 24 28 74 25 29  |B$.#Z..1:Qd$(t%)|
00004080  3d 42 24 0d 23 64 11 c9  32 3a 52 64 24 28 74 25  |=B$.#d..2:Rd$(t%|
00004090  29 3d 42 24 0d 23 6e 11  c9 33 3a 53 64 24 28 74  |)=B$.#n..3:Sd$(t|
000040a0  25 29 3d 42 24 0d 23 78  11 c9 34 3a 54 64 24 28  |%)=B$.#x..4:Td$(|
000040b0  74 25 29 3d 42 24 0d 23  82 11 c9 35 3a 55 64 24  |t%)=B$.#...5:Ud$|
000040c0  28 74 25 29 3d 42 24 0d  23 8c 11 c9 36 3a 56 64  |(t%)=B$.#...6:Vd|
000040d0  24 28 74 25 29 3d 42 24  0d 23 96 05 cb 0d 23 a0  |$(t%)=B$.#....#.|
000040e0  12 e7 65 60 25 28 53 62  25 29 3c 69 60 25 8c 0d  |..e`%(Sb%)<i`%..|
000040f0  23 aa 30 21 71 25 3d 64  60 25 28 53 62 25 29 3a  |#.0!q%=d`%(Sb%):|
00004100  c8 99 32 36 32 33 34 37  2c 2c 71 25 3a 66 25 3d  |..262347,,q%:f%=|
00004110  28 71 25 21 33 32 29 80  28 31 3c 3c 31 36 29 0d  |(q%!32).(1<<16).|
00004120  23 b4 52 e7 65 60 25 28  53 62 25 29 3e 3d 94 28  |#.R.e`%(Sb%)>=.(|
00004130  71 25 21 38 2d 71 25 21  31 36 29 81 33 32 8c 71  |q%!8-q%!16).32.q|
00004140  25 21 32 34 3d 2d 28 65  60 25 28 53 62 25 29 2a  |%!24=-(e`%(Sb%)*|
00004150  33 32 2d 94 28 71 25 21  38 2d 71 25 21 31 36 29  |32-.(q%!8-q%!16)|
00004160  29 2d 33 32 3a c8 99 32  36 32 33 34 31 2c 2c 71  |)-32:..262341,,q|
00004170  25 0d 23 be 32 f2 62 64  28 53 62 25 2c 30 2c 2d  |%.#.2.bd(Sb%,0,-|
00004180  65 60 25 28 53 62 25 29  2a 33 32 2d 33 32 2c 31  |e`%(Sb%)*32-32,1|
00004190  32 38 30 2c 2d 65 60 25  28 53 62 25 29 2a 33 32  |280,-e`%(Sb%)*32|
000041a0  2b 34 29 0d 23 c8 0f 65  60 25 28 53 62 25 29 2b  |+4).#..e`%(Sb%)+|
000041b0  3d 31 0d 23 d2 05 cc 0d  23 dc 1d 66 60 25 28 53  |=1.#....#..f`%(S|
000041c0  62 25 29 3d 28 66 60 25  28 53 62 25 29 2b 31 29  |b%)=(f`%(Sb%)+1)|
000041d0  83 69 60 25 0d 23 e6 34  c8 99 32 36 32 33 37 39  |.i`%.#.4..262379|
000041e0  2c 64 60 25 28 53 62 25  29 2c 30 2c 2d 33 32 2a  |,d`%(Sb%),0,-32*|
000041f0  69 60 25 2c 31 32 38 30  2c 30 2c 30 2c 2d 33 32  |i`%,1280,0,0,-32|
00004200  2a 28 69 60 25 2d 31 29  0d 23 f0 29 f2 62 64 28  |*(i`%-1).#.).bd(|
00004210  53 62 25 2c 30 2c 2d 33  32 2a 69 60 25 2c 31 32  |Sb%,0,-32*i`%,12|
00004220  38 30 2c 2d 33 32 2a 28  69 60 25 2d 31 29 2b 34  |80,-32*(i`%-1)+4|
00004230  29 0d 23 fa 05 cd 0d 24  04 05 ce 0d 24 0e 05 e1  |).#....$....$...|
00004240  0d 24 22 10 dd f2 67 64  28 41 24 2c 6c 64 25 29  |.$"...gd(A$,ld%)|
00004250  0d 24 2c 10 ea 74 25 3a  f2 41 62 28 64 61 25 29  |.$,..t%:.Ab(da%)|
00004260  0d 24 36 0b c8 95 41 24  3e 22 22 0d 24 40 14 74  |.$6...A$>"".$@.t|
00004270  25 3d 28 42 64 25 2b 41  64 25 29 83 4a 5f 25 0d  |%=(Bd%+Ad%).J_%.|
00004280  24 4a 20 43 64 24 28 74  25 29 3d c0 41 24 2c 49  |$J Cd$(t%)=.A$,I|
00004290  5f 25 29 3a 41 24 3d c1  41 24 2c 49 5f 25 29 0d  |_%):A$=.A$,I_%).|
000042a0  24 54 18 44 64 25 3f 74  25 3d 6c 64 25 3a e7 42  |$T.Dd%?t%=ld%:.B|
000042b0  64 25 3c 4a 5f 25 8c 0d  24 5e 2b 21 71 25 3d 54  |d%<J_%..$^+!q%=T|
000042c0  61 25 3a c8 99 32 36 32  33 34 37 2c 2c 71 25 3a  |a%:..262347,,q%:|
000042d0  66 25 3d 28 71 25 21 33  32 29 80 28 31 3c 3c 31  |f%=(q%!32).(1<<1|
000042e0  36 29 0d 24 68 4e e7 66  25 3c 3e 30 80 42 64 25  |6).$hN.f%<>0.Bd%|
000042f0  3e 3d 94 28 71 25 21 38  2d 71 25 21 31 36 29 81  |>=.(q%!8-q%!16).|
00004300  33 32 8c 71 25 21 32 34  3d 2d 28 42 64 25 2a 33  |32.q%!24=-(Bd%*3|
00004310  32 2d 94 28 71 25 21 38  2d 71 25 21 31 36 29 29  |2-.(q%!8-q%!16))|
00004320  2d 33 32 3a c8 99 32 36  32 33 34 31 2c 2c 71 25  |-32:..262341,,q%|
00004330  0d 24 72 24 f2 57 64 28  30 2c 2d 42 64 25 2a 33  |.$r$.Wd(0,-Bd%*3|
00004340  32 2d 33 32 2c 31 32 38  30 2c 2d 42 64 25 2a 33  |2-32,1280,-Bd%*3|
00004350  32 2b 34 29 0d 24 7c 0a  42 64 25 2b 3d 31 0d 24  |2+4).$|.Bd%+=1.$|
00004360  86 05 cc 0d 24 90 13 41  64 25 3d 28 41 64 25 2b  |....$..Ad%=(Ad%+|
00004370  31 29 83 4a 5f 25 0d 24  9a 2f c8 99 32 36 32 33  |1).J_%.$./..2623|
00004380  37 39 2c 54 61 25 2c 30  2c 2d 33 32 2a 4a 5f 25  |79,Ta%,0,-32*J_%|
00004390  2c 31 32 38 30 2c 30 2c  30 2c 2d 33 32 2a 28 4a  |,1280,0,0,-32*(J|
000043a0  5f 25 2d 31 29 0d 24 a4  25 f2 57 64 28 30 2c 2d  |_%-1).$.%.Wd(0,-|
000043b0  33 32 2a 4a 5f 25 2c 31  32 38 30 2c 2d 33 32 2a  |32*J_%,1280,-32*|
000043c0  28 4a 5f 25 2d 31 29 2b  34 29 0d 24 ae 05 cd 0d  |(J_%-1)+4).$....|
000043d0  24 b8 05 ce 0d 24 c2 05  e1 0d 24 d6 08 dd f2 6d  |$....$....$....m|
000043e0  64 0d 24 e0 1f 43 64 24  28 29 3d 22 22 3a 42 64  |d.$..Cd$()="":Bd|
000043f0  25 3d 30 3a 41 64 25 3d  30 3a 48 64 24 3d 22 22  |%=0:Ad%=0:Hd$=""|
00004400  0d 24 ea 21 f2 57 64 28  30 2c 2d 4a 5f 25 2a 33  |.$.!.Wd(0,-J_%*3|
00004410  32 2d 45 64 25 2d 38 2c  31 36 2a 49 5f 25 2c 30  |2-Ed%-8,16*I_%,0|
00004420  29 0d 24 f4 05 e1 0d 25  08 0c dd f2 5a 62 28 6d  |).$....%....Zb(m|
00004430  24 29 0d 25 12 0d e7 28  6e 5f 25 80 31 29 8c 0d  |$).%...(n_%.1)..|
00004440  25 1c 0b f2 65 64 28 6d  24 29 0d 25 26 14 e7 6f  |%...ed(m$).%&..o|
00004450  5f 25 3c 3e 30 8c d5 23  6f 5f 25 2c 6d 24 0d 25  |_%<>0..#o_%,m$.%|
00004460  30 05 cd 0d 25 3a 05 e1  0d 25 4e 0c dd f2 66 62  |0...%:...%N...fb|
00004470  28 41 24 29 0d 25 58 0e  42 24 3d a4 77 62 28 41  |(A$).%X.B$=.wb(A|
00004480  24 29 0d 25 62 0b e7 42  24 3d 22 22 8c 0d 25 6c  |$).%b..B$=""..%l|
00004490  10 f2 66 64 3a f2 4d 61  28 6f 5f 25 29 0d 25 76  |..fd:.Ma(o_%).%v|
000044a0  05 cc 0d 25 80 0e 42 24  3d a4 6e 64 28 42 24 29  |...%..B$=.nd(B$)|
000044b0  0d 25 8a 1a c8 99 31 33  31 30 38 35 2c 26 43 46  |.%....131085,&CF|
000044c0  2c 42 24 b8 6f 5f 25 3b  46 25 0d 25 94 22 e7 28  |,B$.o_%;F%.%.".(|
000044d0  46 25 80 31 29 8c c8 99  31 33 31 30 38 35 2c 26  |F%.1)...131085,&|
000044e0  38 46 2c 42 24 b8 6f 5f  25 3b 46 25 0d 25 9e 26  |8F,B$.o_%;F%.%.&|
000044f0  e7 28 46 25 80 31 29 8c  6f 5f 25 3d 30 3a f2 72  |.(F%.1).o_%=0:.r|
00004500  62 28 a4 51 5f 28 22 45  74 72 61 63 65 22 29 29  |b(.Q_("Etrace"))|
00004510  3a e1 0d 25 a8 17 c8 99  31 33 31 30 38 30 2c 31  |:..%....131080,1|
00004520  38 2c 42 24 2c 26 46 46  46 0d 25 b2 17 e7 6f 5f  |8,B$,&FFF.%...o_|
00004530  25 3c 3e 30 8c cf 23 6f  5f 25 3d a2 23 6f 5f 25  |%<>0..#o_%=.#o_%|
00004540  0d 25 bc 05 cd 0d 25 c6  05 e1 0d 25 da 08 dd f2  |.%....%....%....|
00004550  6f 64 0d 25 e4 0c e7 70  64 25 3e 2d 31 8c 0d 25  |od.%...pd%>-1..%|
00004560  ee 32 21 71 25 3d 32 35  36 3a 71 25 21 31 32 3d  |.2!q%=256:q%!12=|
00004570  30 3a 71 25 21 31 36 3d  31 31 3a 71 25 21 32 30  |0:q%!16=11:q%!20|
00004580  3d 32 3a 71 25 21 32 34  3d 70 64 25 2b 75 61 25  |=2:q%!24=pd%+ua%|
00004590  0d 25 f8 1a 24 28 71 25  2b 32 38 29 3d 22 53 4c  |.%..$(q%+28)="SL|
000045a0  49 50 64 69 61 6c 22 2b  bd 30 0d 26 02 14 c8 99  |IPdial"+.0.&....|
000045b0  32 36 32 33 37 35 2c 31  38 2c 71 25 2c 30 0d 26  |262375,18,q%,0.&|
000045c0  0c 1a 6c 5f 25 3d b9 3a  e3 4c 25 3d 31 b8 35 3a  |..l_%=.:.L%=1.5:|
000045d0  f2 41 62 28 30 29 3a ed  0d 26 16 05 cd 0d 26 20  |.Ab(0):..&....& |
000045e0  05 e1 0d 26 34 08 dd f2  57 62 0d 26 3e 0c e7 70  |...&4...Wb.&>..p|
000045f0  64 25 3e 2d 31 8c 0d 26  48 1b e7 71 25 21 32 30  |d%>-1..&H..q%!20|
00004600  3d 32 80 71 25 21 32 34  3d 70 64 25 2b 75 61 25  |=2.q%!24=pd%+ua%|
00004610  8c 0d 26 52 1f 21 71 25  3d 32 35 36 3a 71 25 21  |..&R.!q%=256:q%!|
00004620  31 32 3d 71 25 21 38 3a  71 25 21 31 36 3d 31 32  |12=q%!8:q%!16=12|
00004630  0d 26 5c 1e 24 28 71 25  2b 32 38 29 3d a4 51 5f  |.&\.$(q%+28)=.Q_|
00004640  28 22 44 65 76 4d 69 6e  65 22 29 2b bd 30 0d 26  |("DevMine")+.0.&|
00004650  66 17 c8 99 32 36 32 33  37 35 2c 31 37 2c 71 25  |f...262375,17,q%|
00004660  2c 71 25 21 34 0d 26 70  05 cd 0d 26 7a 05 cd 0d  |,q%!4.&p...&z...|
00004670  26 84 05 e1 0d 26 98 0c  dd a4 71 64 28 41 24 29  |&....&....qd(A$)|
00004680  0d 26 a2 17 41 25 3d a7  41 24 2c 22 20 22 29 3a  |.&..A%=.A$," "):|
00004690  e7 41 25 3e 3d 30 8c 0d  26 ac 11 62 5f 24 3d c0  |.A%>=0..&..b_$=.|
000046a0  41 24 2c 41 25 2d 31 29  0d 26 b6 14 75 61 25 3d  |A$,A%-1).&..ua%=|
000046b0  bb 28 c1 41 24 2c 41 25  2b 31 29 29 0d 26 c0 05  |.(.A$,A%+1)).&..|
000046c0  cc 0d 26 ca 12 62 5f 24  3d 22 69 6e 74 65 72 6e  |..&..b_$="intern|
000046d0  61 6c 22 0d 26 d4 09 75  61 25 3d 30 0d 26 de 05  |al".&..ua%=0.&..|
000046e0  cd 0d 26 f2 1c f2 5a 61  28 22 70 6f 72 74 22 2c  |..&...Za("port",|
000046f0  62 5f 24 2b 22 20 22 2b  c3 75 61 25 29 0d 26 fc  |b_$+" "+.ua%).&.|
00004700  22 f2 59 5f 28 a4 61 62  28 22 44 65 76 4c 6f 61  |".Y_(.ab("DevLoa|
00004710  64 22 2c 62 5f 24 29 2c  22 20 22 2c 22 22 29 0d  |d",b_$)," ","").|
00004720  27 06 3b c8 99 31 33 31  30 38 30 2c 31 36 2c 22  |'.;..131080,16,"|
00004730  53 65 72 69 61 6c 44 65  76 3a 6d 6f 64 75 6c 65  |SerialDev:module|
00004740  73 2e 22 2b 62 5f 24 2b  22 2e 64 72 69 76 65 72  |s."+b_$+".driver|
00004750  22 2c 62 5f 2c 30 b8 3b  46 25 0d 27 10 23 e7 28  |",b_,0.;F%.'.#.(|
00004760  46 25 80 31 29 8c f2 72  62 28 a4 61 62 28 22 45  |F%.1)..rb(.ab("E|
00004770  64 65 76 22 2c 62 5f 24  29 29 3a 3d 30 0d 27 1a  |dev",b_$)):=0.'.|
00004780  1b f2 59 5f 28 22 22 2c  a4 51 5f 28 22 44 65 76  |..Y_("",.Q_("Dev|
00004790  4f 4b 22 29 2c 22 22 29  0d 27 24 0e 70 64 25 3d  |OK"),"").'$.pd%=|
000047a0  62 5f 21 26 43 38 0d 27  2e 08 3d 75 61 25 0d 27  |b_!&C8.'..=ua%.'|
000047b0  42 0c dd f2 72 64 28 42  24 29 0d 27 4c 1c 73 64  |B...rd(B$).'L.sd|
000047c0  25 3d bb 42 24 3a e7 73  64 25 3d 30 8c 73 64 25  |%=.B$:.sd%=0.sd%|
000047d0  3d 31 39 32 30 30 0d 27  56 15 f2 5a 61 28 22 73  |=19200.'V..Za("s|
000047e0  70 65 65 64 22 2c c3 73  64 25 29 0d 27 60 05 e1  |peed",.sd%).'`..|
000047f0  0d 27 74 0f dd f2 52 62  28 41 24 2c 74 25 29 0d  |.'t...Rb(A$,t%).|
00004800  27 9c 17 f2 5a 62 28 a4  61 62 28 22 51 61 64 64  |'...Zb(.ab("Qadd|
00004810  22 2c 41 24 29 29 0d 27  a6 1c 4c 25 3d 30 3a c8  |",A$)).'..L%=0:.|
00004820  95 6b 60 24 28 4c 25 29  3e 22 22 80 4c 25 3c 6a  |.k`$(L%)>"".L%<j|
00004830  60 25 0d 27 b0 0b 4c 25  2b 3d 31 3a ce 0d 27 ba  |`%.'..L%+=1:..'.|
00004840  1b 6b 60 24 28 4c 25 29  3d 41 24 3a 6c 60 25 28  |.k`$(L%)=A$:l`%(|
00004850  4c 25 29 3d 74 25 3a e1  0d 27 ce 08 dd a4 53 5f  |L%)=t%:..'....S_|
00004860  0d 27 d8 20 ea 74 25 2c  6c 25 2c 41 24 2c 6e 25  |.'. .t%,l%,A$,n%|
00004870  3a 6c 25 3d 30 3a 41 24  3d 22 22 3a 6e 25 3d 30  |:l%=0:A$="":n%=0|
00004880  0d 27 e2 30 f5 e7 6b 60  24 28 6c 25 29 3e 22 22  |.'.0..k`$(l%)>""|
00004890  80 6b 60 25 28 6c 60 25  28 6c 25 29 29 3d b9 8c  |.k`%(l`%(l%))=..|
000048a0  41 24 3d 6b 60 24 28 6c  25 29 3a 6e 25 3d 6c 25  |A$=k`$(l%):n%=l%|
000048b0  0d 27 ec 22 6c 25 2b 3d  31 3a fd 41 24 3e 22 22  |.'."l%+=1:.A$>""|
000048c0  84 6b 60 24 28 6c 25 29  3d 22 22 84 6c 25 3d 6a  |.k`$(l%)="".l%=j|
000048d0  60 25 0d 27 f6 0b e7 41  24 3e 22 22 8c 0d 28 00  |`%.'...A$>""..(.|
000048e0  36 e3 6c 25 3d 6e 25 b8  6a 60 25 2d 31 3a 6b 60  |6.l%=n%.j`%-1:k`|
000048f0  24 28 6c 25 29 3d 6b 60  24 28 6c 25 2b 31 29 3a  |$(l%)=k`$(l%+1):|
00004900  6c 60 25 28 6c 25 29 3d  6c 60 25 28 6c 25 2b 31  |l`%(l%)=l`%(l%+1|
00004910  29 3a ed 0d 28 0a 0f 6b  60 24 28 6a 60 25 29 3d  |):..(..k`$(j`%)=|
00004920  22 22 0d 28 14 05 cd 0d  28 1e 07 3d 41 24 0d 28  |"".(....(..=A$.(|
00004930  32 08 dd a4 52 5f 0d 28  3c 17 ea 74 25 2c 6c 25  |2...R_.(<..t%,l%|
00004940  2c 72 25 3a 6c 25 3d 30  3a 72 25 3d 30 0d 28 46  |,r%:l%=0:r%=0.(F|
00004950  24 f5 e7 6b 60 24 28 6c  25 29 3e 22 22 80 6b 60  |$..k`$(l%)>"".k`|
00004960  25 28 6c 60 25 28 6c 25  29 29 3d b9 8c 72 25 3d  |%(l`%(l%))=..r%=|
00004970  b9 0d 28 50 22 6c 25 2b  3d 31 3a fd 72 25 3c 3e  |..(P"l%+=1:.r%<>|
00004980  30 84 6b 60 24 28 6c 25  29 3d 22 22 84 6c 25 3d  |0.k`$(l%)="".l%=|
00004990  6a 60 25 0d 28 5a 07 3d  72 25 0d 28 6e 0d dd a4  |j`%.(Z.=r%.(n...|
000049a0  56 5f 28 74 64 24 29 0d  28 78 1e c8 95 74 64 24  |V_(td$).(x...td$|
000049b0  3e 22 22 80 69 5f 25 3d  30 3a 41 24 3d a4 75 64  |>"".i_%=0:A$=.ud|
000049c0  28 74 64 24 29 0d 28 82  0c f2 41 62 28 64 61 25  |(td$).(...Ab(da%|
000049d0  29 0d 28 8c 15 f2 5a 62  28 c3 4f 5f 25 2b 22 3a  |).(...Zb(.O_%+":|
000049e0  20 22 2b 41 24 29 0d 28  96 20 42 24 3d a4 77 62  | "+A$).(. B$=.wb|
000049f0  28 41 24 29 3a 42 24 3d  a4 72 63 28 42 24 29 3a  |(A$):B$=.rc(B$):|
00004a00  76 64 24 3d 42 24 0d 28  a0 11 e7 c0 42 24 2c 31  |vd$=B$.(....B$,1|
00004a10  29 3c 3e 22 3a 22 8c 0d  28 aa 09 c8 8e 42 24 ca  |)<>":"..(....B$.|
00004a20  0d 28 b4 19 c9 22 69 66  22 3a 55 5f 25 3d a4 77  |.(..."if":U_%=.w|
00004a30  64 28 41 24 2c 74 64 24  29 0d 28 be 16 c9 22 61  |d(A$,td$).(..."a|
00004a40  73 6b 22 3a 55 5f 25 3d  a4 6f 63 28 41 24 29 0d  |sk":U_%=.oc(A$).|
00004a50  28 c8 17 c9 22 63 61 73  65 22 3a 55 5f 25 3d a4  |(..."case":U_%=.|
00004a60  77 5f 28 41 24 29 0d 28  d2 1b c9 22 77 68 65 6e  |w_(A$).(..."when|
00004a70  22 3a 55 5f 25 3d a4 78  64 28 41 24 2c 74 64 24  |":U_%=.xd(A$,td$|
00004a80  29 0d 28 dc 19 c9 22 6f  74 68 65 72 77 69 73 65  |).(..."otherwise|
00004a90  22 3a f2 79 64 28 74 64  24 29 0d 28 e6 16 c9 22  |":.yd(td$).(..."|
00004aa0  65 6e 64 63 61 73 65 22  3a 55 5f 25 3d a4 7a 64  |endcase":U_%=.zd|
00004ab0  0d 28 f0 18 c9 22 63 6c  61 69 6d 22 3a 55 5f 25  |.(..."claim":U_%|
00004ac0  3d a4 5f 64 28 41 24 29  0d 28 fa 18 c9 22 64 65  |=._d(A$).(..."de|
00004ad0  62 75 67 22 3a 6e 5f 25  3d a4 6e 5f 28 41 24 29  |bug":n_%=.n_(A$)|
00004ae0  0d 29 04 19 c9 22 64 72  69 76 65 72 22 3a 55 5f  |.)..."driver":U_|
00004af0  25 3d a4 4e 5f 28 41 24  29 0d 29 0e 19 c9 22 73  |%=.N_(A$).)..."s|
00004b00  6f 75 72 63 65 22 3a 55  5f 25 3d a4 60 64 28 41  |ource":U_%=.`d(A|
00004b10  24 29 0d 29 18 1a c9 22  6c 69 62 72 61 72 79 22  |$).)..."library"|
00004b20  3a 55 5f 25 3d a4 41 65  28 41 24 29 0d 29 22 14  |:U_%=.Ae(A$).)".|
00004b30  c9 22 63 68 61 69 6e 22  3a f2 42 65 28 41 24 29  |."chain":.Be(A$)|
00004b40  0d 29 2c 17 c9 22 70 6f  72 74 22 3a 75 61 25 3d  |.),.."port":ua%=|
00004b50  a4 71 64 28 41 24 29 0d  29 36 14 c9 22 73 70 65  |.qd(A$).)6.."spe|
00004b60  65 64 22 3a f2 72 64 28  41 24 29 0d 29 40 12 c9  |ed":.rd(A$).)@..|
00004b70  22 72 65 6c 65 61 73 65  22 3a f2 43 63 0d 29 4a  |"release":.Cc.)J|
00004b80  17 c9 22 69 6e 69 74 22  3a 55 5f 25 3d a4 43 65  |.."init":U_%=.Ce|
00004b90  28 41 24 29 0d 29 54 11  c9 22 72 65 69 6e 69 74  |(A$).)T.."reinit|
00004ba0  22 3a f2 44 65 0d 29 5e  17 c9 22 64 69 61 6c 22  |":.De.)^.."dial"|
00004bb0  3a 55 5f 25 3d a4 45 65  28 41 24 29 0d 29 68 17  |:U_%=.Ee(A$).)h.|
00004bc0  c9 22 77 61 69 74 22 3a  55 5f 25 3d a4 73 63 28  |."wait":U_%=.sc(|
00004bd0  41 24 29 0d 29 72 14 c9  22 74 72 61 63 65 22 3a  |A$).)r.."trace":|
00004be0  f2 66 62 28 41 24 29 0d  29 7c 13 c9 22 73 65 6e  |.fb(A$).)|.."sen|
00004bf0  64 22 3a f2 46 65 28 41  24 29 0d 29 86 18 c9 22  |d":.Fe(A$).)..."|
00004c00  69 70 67 65 74 22 3a 55  5f 25 3d a4 47 65 28 41  |ipget":U_%=.Ge(A|
00004c10  24 29 0d 29 90 13 c9 22  6d 61 6b 65 22 3a f2 48  |$).)..."make":.H|
00004c20  65 28 41 24 29 0d 29 9a  17 c9 22 74 61 73 6b 22  |e(A$).)..."task"|
00004c30  3a 55 5f 25 3d a4 49 61  28 41 24 29 0d 29 a4 1d  |:U_%=.Ia(A$).)..|
00004c40  c9 22 74 61 73 6b 77 69  6e 64 6f 77 22 3a 55 5f  |."taskwindow":U_|
00004c50  25 3d a4 49 65 28 41 24  29 0d 29 ae 1f c9 22 73  |%=.Ie(A$).)..."s|
00004c60  6c 65 65 70 22 2c 22 70  61 75 73 65 22 3a f2 68  |leep","pause":.h|
00004c70  5f 28 bb 28 41 24 29 29  0d 29 b8 14 c9 22 61 6c  |_(.(A$)).)..."al|
00004c80  61 72 6d 22 3a f2 4b 60  28 41 24 29 0d 29 c2 12  |arm":.K`(A$).)..|
00004c90  c9 22 73 65 74 22 3a f2  4a 65 28 41 24 29 0d 29  |."set":.Je(A$).)|
00004ca0  cc 14 c9 22 75 6e 73 65  74 22 3a f2 4b 65 28 41  |..."unset":.Ke(A|
00004cb0  24 29 0d 29 d6 37 c9 22  3f 65 71 22 2c 22 3f 6e  |$).).7."?eq","?n|
00004cc0  65 22 2c 22 3f 6c 74 22  2c 22 3f 6c 65 22 2c 22  |e","?lt","?le","|
00004cd0  3f 67 74 22 2c 22 3f 67  65 22 3a 55 5f 25 3d a4  |?gt","?ge":U_%=.|
00004ce0  4c 65 28 42 24 2c 41 24  29 0d 29 e0 19 c9 22 73  |Le(B$,A$).)..."s|
00004cf0  74 72 69 6e 67 22 3a 55  5f 25 3d a4 4d 65 28 41  |tring":U_%=.Me(A|
00004d00  24 29 0d 29 ea 17 c9 22  65 76 61 6c 22 3a 55 5f  |$).)..."eval":U_|
00004d10  25 3d a4 4e 65 28 41 24  29 0d 29 f4 0c c9 22 6c  |%=.Ne(A$).)..."l|
00004d20  61 62 65 6c 22 0d 29 fe  17 c9 22 67 6f 74 6f 22  |abel".)..."goto"|
00004d30  3a f2 4f 65 28 41 24 2c  4f 5f 25 29 0d 2a 08 17  |:.Oe(A$,O_%).*..|
00004d40  c9 22 63 61 6c 6c 22 3a  f2 50 65 28 41 24 2c 4f  |."call":.Pe(A$,O|
00004d50  5f 25 29 0d 2a 12 1d c9  22 72 65 74 75 72 6e 22  |_%).*..."return"|
00004d60  3a 55 5f 25 3d a4 55 5f  28 41 24 2c 4f 5f 25 29  |:U_%=.U_(A$,O_%)|
00004d70  0d 2a 1c 13 c9 22 65 63  68 6f 22 3a f2 51 65 28  |.*..."echo":.Qe(|
00004d80  41 24 29 0d 2a 26 18 c9  22 3f 66 69 6c 65 22 3a  |A$).*&.."?file":|
00004d90  55 5f 25 3d a4 4c 5f 28  41 24 29 0d 2a 30 18 c9  |U_%=.L_(A$).*0..|
00004da0  22 3f 6c 69 6e 65 22 3a  55 5f 25 3d a4 52 65 28  |"?line":U_%=.Re(|
00004db0  41 24 29 0d 2a 3a 18 c9  22 3f 66 72 65 65 22 3a  |A$).*:.."?free":|
00004dc0  55 5f 25 3d a4 53 65 28  41 24 29 0d 2a 44 14 c9  |U_%=.Se(A$).*D..|
00004dd0  22 72 65 74 72 79 22 3a  f2 54 65 28 41 24 29 0d  |"retry":.Te(A$).|
00004de0  2a 4e 17 c9 22 6f 70 65  6e 22 3a 55 5f 25 3d a4  |*N.."open":U_%=.|
00004df0  55 65 28 41 24 29 0d 2a  58 18 c9 22 63 6c 6f 73  |Ue(A$).*X.."clos|
00004e00  65 22 3a 55 5f 25 3d a4  56 65 28 41 24 29 0d 2a  |e":U_%=.Ve(A$).*|
00004e10  62 17 c9 22 72 65 61 64  22 3a 55 5f 25 3d a4 57  |b.."read":U_%=.W|
00004e20  65 28 41 24 29 0d 2a 6c  18 c9 22 77 72 69 74 65  |e(A$).*l.."write|
00004e30  22 3a 55 5f 25 3d a4 58  65 28 41 24 29 0d 2a 76  |":U_%=.Xe(A$).*v|
00004e40  16 c9 22 70 74 72 22 3a  55 5f 25 3d a4 46 64 28  |.."ptr":U_%=.Fd(|
00004e50  41 24 29 0d 2a 80 17 c9  22 6d 6f 76 65 22 3a 55  |A$).*..."move":U|
00004e60  5f 25 3d a4 59 65 28 41  24 29 0d 2a 8a 17 c9 22  |_%=.Ye(A$).*..."|
00004e70  63 6f 70 79 22 3a 55 5f  25 3d a4 5a 65 28 41 24  |copy":U_%=.Ze(A$|
00004e80  29 0d 2a 94 19 c9 22 61  70 70 65 6e 64 22 3a 55  |).*..."append":U|
00004e90  5f 25 3d a4 61 65 28 41  24 29 0d 2a 9e 19 c9 22  |_%=.ae(A$).*..."|
00004ea0  64 65 6c 65 74 65 22 3a  55 5f 25 3d a4 62 65 28  |delete":U_%=.be(|
00004eb0  41 24 29 0d 2a a8 1b c9  22 6e 65 77 73 72 61 74  |A$).*..."newsrat|
00004ec0  65 22 3a 55 5f 25 3d a4  63 65 28 41 24 29 0d 2a  |e":U_%=.ce(A$).*|
00004ed0  b2 18 c9 22 3f 74 61 73  6b 22 3a 55 5f 25 3d a4  |..."?task":U_%=.|
00004ee0  64 65 28 41 24 29 0d 2a  bc 23 c9 22 64 6f 70 65  |de(A$).*.#."dope|
00004ef0  6e 22 2c 22 64 61 74 61  6f 70 65 6e 22 3a 55 5f  |n","dataopen":U_|
00004f00  25 3d a4 65 65 28 41 24  29 0d 2a c6 26 c9 22 73  |%=.ee(A$).*.&."s|
00004f10  74 61 6d 70 22 3a f2 5a  62 28 22 28 22 2b c3 28  |tamp":.Zb("("+.(|
00004f20  91 81 31 30 30 29 2b 22  29 20 22 2b 41 24 29 0d  |..100)+") "+A$).|
00004f30  2a d0 14 c9 22 65 72 72  6f 72 22 3a f2 72 62 28  |*..."error":.rb(|
00004f40  41 24 29 0d 2a da 16 c9  22 6d 65 73 73 61 67 65  |A$).*..."message|
00004f50  22 3a f2 75 62 28 41 24  29 0d 2a e4 13 c9 22 6d  |":.ub(A$).*..."m|
00004f60  65 6e 75 22 3a f2 66 65  28 41 24 29 0d 2a ee 13  |enu":.fe(A$).*..|
00004f70  c9 22 6c 69 73 74 22 3a  f2 67 65 28 41 24 29 0d  |."list":.ge(A$).|
00004f80  2a f8 17 c9 22 69 63 6f  6e 22 3a 55 5f 25 3d a4  |*..."icon":U_%=.|
00004f90  68 65 28 41 24 29 0d 2b  02 20 c9 22 61 6e 61 6c  |he(A$).+. ."anal|
00004fa0  79 73 65 22 2c 22 61 6e  61 6c 79 7a 65 22 3a f2  |yse","analyze":.|
00004fb0  69 65 28 41 24 29 0d 2b  0c 13 c9 22 68 65 6c 70  |ie(A$).+..."help|
00004fc0  22 3a f2 6a 65 28 41 24  29 0d 2b 16 14 c9 22 65  |":.je(A$).+..."e|
00004fd0  76 65 6e 74 22 3a f2 6b  65 28 41 24 29 0d 2b 20  |vent":.ke(A$).+ |
00004fe0  0f c9 22 73 74 6f 70 22  3a f2 69 5f 0d 2b 2a 1c  |.."stop":.i_.+*.|
00004ff0  c9 22 71 75 69 74 22 3a  f2 6c 65 28 a4 51 5f 28  |."quit":.le(.Q_(|
00005000  22 51 75 69 74 22 29 29  0d 2b 34 0f c9 22 65 78  |"Quit")).+4.."ex|
00005010  69 74 22 3a f2 6d 65 0d  2b 3e 14 c9 22 69 6e 70  |it":.me.+>.."inp|
00005020  75 74 22 3a f2 57 61 28  41 24 29 0d 2b 48 18 c9  |ut":.Wa(A$).+H..|
00005030  22 6f 73 63 6c 69 22 3a  55 5f 25 3d a4 6e 65 28  |"oscli":U_%=.ne(|
00005040  41 24 29 0d 2b 52 18 7f  3a f2 5a 62 28 a4 51 5f  |A$).+R..:.Zb(.Q_|
00005050  28 22 42 61 64 43 6f 6d  22 29 29 0d 2b 5c 05 cb  |("BadCom")).+\..|
00005060  0d 2b 66 05 cd 0d 2b 70  31 e7 55 5f 25 3c 30 8c  |.+f...+p1.U_%<0.|
00005070  f2 5a 61 28 22 24 73 74  61 74 75 73 22 2c 55 5f  |.Za("$status",U_|
00005080  24 29 8b f2 5a 61 28 22  24 73 74 61 74 75 73 22  |$)..Za("$status"|
00005090  2c c3 55 5f 25 29 0d 2b  7a 05 ce 0d 2b 84 08 3d  |,.U_%).+z...+..=|
000050a0  55 5f 25 0d 2b 98 0c dd  f2 51 65 28 41 24 29 0d  |U_%.+....Qe(A$).|
000050b0  2b a2 0f ea 42 24 2c 73  25 3a 73 25 3d 30 0d 2b  |+...B$,s%:s%=0.+|
000050c0  ac 05 f5 0d 2b b6 0e 42  24 3d a4 77 62 28 41 24  |....+..B$=.wb(A$|
000050d0  29 0d 2b c0 10 e7 c0 42  24 2c 31 29 3d 22 2f 22  |).+....B$,1)="/"|
000050e0  8c 0d 2b ca 0d c8 8e c0  42 24 2c 33 29 ca 0d 2b  |..+.....B$,3)..+|
000050f0  d4 0f c9 22 2f 73 74 22  3a 73 25 3d b9 0d 2b de  |..."/st":s%=..+.|
00005100  0f c9 22 2f 6c 6f 22 3a  73 25 3d 30 0d 2b e8 1e  |.."/lo":s%=0.+..|
00005110  c9 22 2f 64 61 22 3a 41  24 3d 22 22 22 22 2b 91  |."/da":A$=""""+.|
00005120  24 2b 22 22 22 20 22 2b  41 24 0d 2b f2 05 cb 0d  |$+""" "+A$.+....|
00005130  2b fc 05 cc 0d 2c 06 08  e7 73 25 8c 0d 2c 10 11  |+....,...s%..,..|
00005140  f2 59 5f 28 22 22 2c 42  24 2c 22 22 29 0d 2c 1a  |.Y_("",B$,"").,.|
00005150  05 cc 0d 2c 24 0b f2 65  64 28 42 24 29 0d 2c 2e  |...,$..ed(B$).,.|
00005160  1f e7 28 6e 5f 25 80 33  29 3c 3e 30 80 6f 5f 25  |..(n_%.3)<>0.o_%|
00005170  3c 3e 30 8c d5 23 6f 5f  25 2c 42 24 0d 2c 38 05  |<>0..#o_%,B$.,8.|
00005180  cd 0d 2c 42 05 cd 0d 2c  4c 0a fd 41 24 3d 22 22  |..,B...,L..A$=""|
00005190  0d 2c 56 05 e1 0d 2c 6a  0c dd a4 5f 64 28 41 24  |.,V...,j..._d(A$|
000051a0  29 0d 2c 74 11 ea 4a 25  2c 74 25 2c 64 25 2c 6f  |).,t..J%,t%,d%,o|
000051b0  65 25 0d 2c 7e 1f f2 59  5f 28 a4 51 5f 28 22 44  |e%.,~..Y_(.Q_("D|
000051c0  65 76 43 6c 61 69 6d 22  29 2c 22 20 22 2c 22 22  |evClaim")," ",""|
000051d0  29 0d 2c 88 1c 74 25 3d  bb a4 77 62 28 41 24 29  |).,..t%=..wb(A$)|
000051e0  3a e7 74 25 3c 30 8c 74  25 3d 70 65 25 0d 2c 92  |:.t%<0.t%=pe%.,.|
000051f0  1c 64 25 3d bb a4 77 62  28 41 24 29 3a e7 64 25  |.d%=..wb(A$):.d%|
00005200  3c 32 8c 64 25 3d 71 65  25 0d 2c 9c 09 6f 65 25  |<2.d%=qe%.,..oe%|
00005210  3d 31 0d 2c a6 05 f5 0d  2c b0 07 f2 6f 64 0d 2c  |=1.,....,...od.,|
00005220  ba 0c e7 6c 5f 25 3c 3e  30 8c 0d 2c c4 15 4a 25  |...l_%<>0..,..J%|
00005230  3d a4 64 28 31 37 2c 75  61 25 2c 30 2c 30 29 0d  |=.d(17,ua%,0,0).|
00005240  2c ce 27 4a 25 3d a4 64  28 31 33 2c 75 61 25 2c  |,.'J%=.d(13,ua%,|
00005250  73 64 25 2c 30 29 3a e7  4a 25 3c 3e 73 64 25 8c  |sd%,0):.J%<>sd%.|
00005260  73 64 25 3d 4a 25 0d 2c  d8 27 4a 25 3d a4 64 28  |sd%=J%.,.'J%=.d(|
00005270  31 34 2c 75 61 25 2c 73  64 25 2c 30 29 3a e7 4a  |14,ua%,sd%,0):.J|
00005280  25 3c 3e 73 64 25 8c 73  64 25 3d 4a 25 0d 2c e2  |%<>sd%.sd%=J%.,.|
00005290  15 4a 25 3d a4 64 28 31  35 2c 75 61 25 2c 30 2c  |.J%=.d(15,ua%,0,|
000052a0  30 29 0d 2c ec 15 4a 25  3d a4 64 28 31 36 2c 75  |0).,..J%=.d(16,u|
000052b0  61 25 2c 31 2c 30 29 0d  2c f6 14 4a 25 3d a4 64  |a%,1,0).,..J%=.d|
000052c0  28 36 2c 75 61 25 2c 30  2c 30 29 0d 2d 00 14 4a  |(6,ua%,0,0).-..J|
000052d0  25 3d a4 64 28 37 2c 75  61 25 2c 30 2c 30 29 0d  |%=.d(7,ua%,0,0).|
000052e0  2d 0a 05 cc 0d 2d 14 18  f2 68 5f 28 64 25 29 3a  |-....-...h_(d%):|
000052f0  e7 74 25 3e 30 8c 6f 65  25 2b 3d 31 0d 2d 1e 05  |.t%>0.oe%+=1.-..|
00005300  cd 0d 2d 28 19 fd 6c 5f  25 3c 3e 30 84 6f 65 25  |..-(..l_%<>0.oe%|
00005310  3e 74 25 84 69 5f 25 3c  3e 30 0d 2d 32 08 3d 6c  |>t%.i_%<>0.-2.=l|
00005320  5f 25 0d 2d 46 08 dd f2  43 63 0d 2d 50 07 ea 4a  |_%.-F...Cc.-P..J|
00005330  25 0d 2d 5a 09 e7 6c 5f  25 8c 0d 2d 64 28 f2 59  |%.-Z..l_%..-d(.Y|
00005340  5f 28 a4 51 5f 28 22 44  65 76 52 65 6c 22 29 2c  |_(.Q_("DevRel"),|
00005350  a4 51 5f 28 22 44 65 76  44 72 6f 70 22 29 2c 22  |.Q_("DevDrop"),"|
00005360  22 29 0d 2d 6e 14 4a 25  3d a4 64 28 38 2c 75 61  |").-n.J%=.d(8,ua|
00005370  25 2c 30 2c 30 29 0d 2d  78 15 4a 25 3d a4 64 28  |%,0,0).-x.J%=.d(|
00005380  31 38 2c 75 61 25 2c 30  2c 30 29 0d 2d 82 09 6c  |18,ua%,0,0).-..l|
00005390  5f 25 3d a3 0d 2d 8c 05  cd 0d 2d 96 05 e1 0d 2d  |_%=..-....-....-|
000053a0  aa 0c dd a4 43 65 28 41  24 29 0d 2d b4 0f ea 42  |....Ce(A$).-...B|
000053b0  24 2c 68 25 3a 68 25 3d  30 0d 2d be 0c e7 a4 72  |$,h%:h%=0.-....r|
000053c0  65 3c 3e 30 8c 0d 2d c8  1d f2 59 5f 28 a4 51 5f  |e<>0..-...Y_(.Q_|
000053d0  28 22 44 65 76 49 6e 69  74 22 29 2c 22 22 2c 22  |("DevInit"),"","|
000053e0  22 29 0d 2d d2 1a e7 41  24 3d 22 22 8c 41 24 3d  |").-...A$="".A$=|
000053f0  a4 73 65 28 22 24 69 6e  69 74 22 29 0d 2d dc 05  |.se("$init").-..|
00005400  f5 0d 2d e6 0e 42 24 3d  a4 77 62 28 41 24 29 0d  |..-..B$=.wb(A$).|
00005410  2d f0 20 f2 59 5f 28 22  22 2c a4 61 62 28 22 53  |-. .Y_("",.ab("S|
00005420  65 6e 64 69 6e 67 22 2c  42 24 29 2c 22 22 29 0d  |ending",B$),"").|
00005430  2d fa 23 f2 46 65 28 42  24 29 3a 68 25 3d a4 74  |-.#.Fe(B$):h%=.t|
00005440  65 28 22 4f 4b 22 2c 22  22 2c 22 22 2c 22 22 2c  |e("OK","","","",|
00005450  35 29 0d 2e 04 0f fd 41  24 3d 22 22 84 68 25 3d  |5).....A$="".h%=|
00005460  30 0d 2e 0e 05 cd 0d 2e  18 07 3d 68 25 0d 2e 2c  |0.........=h%..,|
00005470  08 dd f2 44 65 0d 2e 36  07 ea 4a 25 0d 2e 40 27  |...De..6..J%..@'|
00005480  4a 25 3d a4 64 28 31 33  2c 75 61 25 2c 73 64 25  |J%=.d(13,ua%,sd%|
00005490  2c 30 29 3a e7 4a 25 3c  3e 73 64 25 8c 73 64 25  |,0):.J%<>sd%.sd%|
000054a0  3d 4a 25 0d 2e 4a 27 4a  25 3d a4 64 28 31 34 2c  |=J%..J'J%=.d(14,|
000054b0  75 61 25 2c 73 64 25 2c  30 29 3a e7 4a 25 3c 3e  |ua%,sd%,0):.J%<>|
000054c0  73 64 25 8c 73 64 25 3d  4a 25 0d 2e 54 15 4a 25  |sd%.sd%=J%..T.J%|
000054d0  3d a4 64 28 31 35 2c 75  61 25 2c 30 2c 30 29 0d  |=.d(15,ua%,0,0).|
000054e0  2e 5e 15 4a 25 3d a4 64  28 31 36 2c 75 61 25 2c  |.^.J%=.d(16,ua%,|
000054f0  31 2c 30 29 0d 2e 68 14  4a 25 3d a4 64 28 38 2c  |1,0)..h.J%=.d(8,|
00005500  75 61 25 2c 33 2c 30 29  0d 2e 72 05 e1 0d 2e 86  |ua%,3,0)..r.....|
00005510  0c dd f2 54 65 28 41 24  29 0d 2e 90 07 ea 42 24  |...Te(A$).....B$|
00005520  0d 2e 9a 0e 42 24 3d a4  77 62 28 41 24 29 0d 2e  |....B$=.wb(A$)..|
00005530  a4 12 e7 bb 42 24 3e 30  8c 70 65 25 3d bb 42 24  |....B$>0.pe%=.B$|
00005540  0d 2e ae 12 e7 bb 41 24  3e 32 8c 71 65 25 3d bb  |......A$>2.qe%=.|
00005550  41 24 0d 2e b8 05 e1 0d  2e cc 0c dd f2 6a 61 28  |A$...........ja(|
00005560  41 24 29 0d 2e d6 12 f2  5f 61 28 53 61 25 2c 31  |A$)....._a(Sa%,1|
00005570  31 2c 41 24 29 0d 2e e0  17 f2 66 63 28 53 61 25  |1,A$).....fc(Sa%|
00005580  2c 31 31 2c 28 41 24 3d  22 22 29 29 0d 2e ea 05  |,11,(A$=""))....|
00005590  e1 0d 2e fe 0d dd a4 45  65 28 75 65 24 29 0d 2f  |.......Ee(ue$)./|
000055a0  08 24 ea 76 65 25 2c 72  25 2c 64 25 2c 77 65 25  |.$.ve%,r%,d%,we%|
000055b0  2c 78 65 25 2c 79 65 25  2c 7a 65 24 2c 42 24 2c  |,xe%,ye%,ze$,B$,|
000055c0  43 24 0d 2f 12 14 76 65  25 3d 30 3a 7a 65 24 3d  |C$./..ve%=0:ze$=|
000055d0  22 41 54 44 54 22 0d 2f  1c 26 72 25 3d 70 65 25  |"ATDT"./.&r%=pe%|
000055e0  3a 64 25 3d 71 65 25 3a  77 65 25 3d 64 25 3a 78  |:d%=qe%:we%=d%:x|
000055f0  65 25 3d 64 25 3a 79 65  25 3d 64 25 0d 2f 26 16  |e%=d%:ye%=d%./&.|
00005600  f2 6a 61 28 a4 51 5f 28  22 52 65 64 69 61 6c 22  |.ja(.Q_("Redial"|
00005610  29 29 0d 2f 30 05 f5 0d  2f 3a 0f 42 24 3d a4 77  |))./0.../:.B$=.w|
00005620  62 28 75 65 24 29 0d 2f  44 10 e7 c0 42 24 2c 31  |b(ue$)./D...B$,1|
00005630  29 3d 22 2f 22 8c 0d 2f  4e 18 43 24 3d a4 78 62  |)="/"../N.C$=.xb|
00005640  28 42 24 29 3a c8 8e c0  42 24 2c 33 29 ca 0d 2f  |(B$):...B$,3)../|
00005650  58 1c c9 22 72 65 74 22  3a 72 25 3d bb 43 24 3a  |X.."ret":r%=.C$:|
00005660  e7 72 25 3c 31 8c 72 25  3d 31 0d 2f 62 1c c9 22  |.r%<1.r%=1./b.."|
00005670  64 65 6c 22 3a 64 25 3d  bb 43 24 3a e7 64 25 3c  |del":d%=.C$:.d%<|
00005680  32 8c 64 25 3d 32 0d 2f  6c 18 77 65 25 3d 64 25  |2.d%=2./l.we%=d%|
00005690  3a 78 65 25 3d 64 25 3a  79 65 25 3d 64 25 0d 2f  |:xe%=d%:ye%=d%./|
000056a0  76 12 c9 22 6e 6f 63 22  3a 78 65 25 3d bb 43 24  |v.."noc":xe%=.C$|
000056b0  0d 2f 80 12 c9 22 6e 6f  64 22 3a 77 65 25 3d bb  |./..."nod":we%=.|
000056c0  43 24 0d 2f 8a 1b c9 22  6e 6f 74 22 2c 22 70 75  |C$./..."not","pu|
000056d0  6c 22 3a 7a 65 24 3d 22  41 54 44 50 22 0d 2f 94  |l":ze$="ATDP"./.|
000056e0  1b c9 22 74 6f 6e 22 2c  22 6e 6f 70 22 3a 7a 65  |.."ton","nop":ze|
000056f0  24 3d 22 41 54 44 54 22  0d 2f 9e 12 c9 22 62 75  |$="ATDT"./..."bu|
00005700  73 22 3a 79 65 25 3d bb  43 24 0d 2f a8 05 cb 0d  |s":ye%=.C$./....|
00005710  2f b2 05 cc 0d 2f bc 16  5f 65 25 3d 31 3a 76 65  |/..../.._e%=1:ve|
00005720  25 3d 30 3a 42 61 24 3d  42 24 0d 2f c6 05 f5 0d  |%=0:Ba$=B$./....|
00005730  2f d0 38 f2 59 5f 28 a4  61 62 28 22 44 69 61 6c  |/.8.Y_(.ab("Dial|
00005740  6c 69 6e 67 22 2c 42 61  24 29 2c a4 76 62 28 22  |ling",Ba$),.vb("|
00005750  44 61 74 74 65 6d 70 74  22 2c c3 5f 65 25 2c c3  |Dattempt",._e%,.|
00005760  72 25 29 2c 22 22 29 0d  2f da 17 f2 46 65 28 7a  |r%),"")./...Fe(z|
00005770  65 24 2b 42 61 24 29 3a  5f 65 25 2b 3d 31 0d 2f  |e$+Ba$):_e%+=1./|
00005780  e4 48 55 5f 25 3d a4 74  65 28 a4 73 65 28 22 24  |.HU_%=.te(.se("$|
00005790  63 6f 6e 6e 22 29 2c a4  73 65 28 22 24 62 75 73  |conn"),.se("$bus|
000057a0  79 22 29 2c a4 73 65 28  22 24 6e 6f 63 61 72 72  |y"),.se("$nocarr|
000057b0  22 29 2c a4 73 65 28 22  24 6e 6f 64 69 61 6c 22  |"),.se("$nodial"|
000057c0  29 2c 31 32 30 29 0d 2f  ee 0b e7 69 5f 25 3d 30  |),120)./...i_%=0|
000057d0  8c 0d 2f f8 0b e7 65 5f  25 3d b9 8c 0d 30 02 2b  |../...e_%=...0.+|
000057e0  41 25 3d a4 72 65 3a c8  95 a4 64 28 35 2c 75 61  |A%=.re:...d(5,ua|
000057f0  25 2c 30 2c 30 29 3e 30  3a 4a 25 3d a4 68 64 3a  |%,0,0)>0:J%=.hd:|
00005800  ce 3a 65 5f 25 3d a3 0d  30 0c 05 cc 0d 30 16 0a  |.:e_%=..0....0..|
00005810  c8 8e 55 5f 25 ca 0d 30  20 27 c9 31 3a f2 59 5f  |..U_%..0 '.1:.Y_|
00005820  28 22 22 2c a4 51 5f 28  22 44 63 6f 6e 6e 65 63  |("",.Q_("Dconnec|
00005830  74 22 29 2c 22 22 29 3a  76 65 25 3d 31 0d 30 2a  |t"),""):ve%=1.0*|
00005840  27 c9 32 3a f2 59 5f 28  22 22 2c a4 51 5f 28 22  |'.2:.Y_("",.Q_("|
00005850  44 62 75 73 79 22 29 2c  22 22 29 3a f2 68 5f 28  |Dbusy"),""):.h_(|
00005860  79 65 25 29 0d 30 34 25  c9 33 3a f2 59 5f 28 22  |ye%).04%.3:.Y_("|
00005870  22 2c a4 51 5f 28 22 44  6e 63 22 29 2c 22 22 29  |",.Q_("Dnc"),"")|
00005880  3a f2 68 5f 28 78 65 25  29 0d 30 3e 25 c9 34 3a  |:.h_(xe%).0>%.4:|
00005890  f2 59 5f 28 22 22 2c a4  51 5f 28 22 44 6e 64 22  |.Y_("",.Q_("Dnd"|
000058a0  29 2c 22 22 29 3a f2 68  5f 28 77 65 25 29 0d 30  |),""):.h_(we%).0|
000058b0  48 25 c9 32 2c 33 2c 34  3a c8 95 a4 64 28 35 2c  |H%.2,3,4:...d(5,|
000058c0  75 61 25 2c 30 2c 30 29  3e 30 3a 4a 25 3d a4 68  |ua%,0,0)>0:J%=.h|
000058d0  64 3a ce 0d 30 52 22 7f  f2 59 5f 28 22 22 2c a4  |d:..0R"..Y_("",.|
000058e0  51 5f 28 22 44 6e 72 22  29 2c 22 22 29 3a f2 68  |Q_("Dnr"),""):.h|
000058f0  5f 28 64 25 29 0d 30 5c  05 cb 0d 30 66 05 cd 0d  |_(d%).0\...0f...|
00005900  30 70 05 cc 0d 30 7a 0a  41 25 3d a4 72 65 0d 30  |0p...0z.A%=.re.0|
00005910  84 05 cd 0d 30 8e 1e fd  5f 65 25 3e 72 25 84 69  |....0..._e%>r%.i|
00005920  5f 25 3c 3e 30 84 76 65  25 3e 30 84 6c 5f 25 3d  |_%<>0.ve%>0.l_%=|
00005930  30 0d 30 98 30 e7 76 65  25 3d 30 80 75 65 24 3e  |0.0.0.ve%=0.ue$>|
00005940  22 22 8c f2 59 5f 28 a4  51 5f 28 22 44 6e 65 78  |""..Y_(.Q_("Dnex|
00005950  74 22 29 2c 22 22 2c 22  22 29 3a f2 68 5f 28 31  |t"),"",""):.h_(1|
00005960  29 0d 30 a2 05 cd 0d 30  ac 1e fd 75 65 24 3d 22  |).0....0...ue$="|
00005970  22 84 69 5f 25 3c 3e 30  84 76 65 25 3e 30 84 6c  |".i_%<>0.ve%>0.l|
00005980  5f 25 3d 30 0d 30 b6 0b  f2 6a 61 28 22 22 29 0d  |_%=0.0...ja("").|
00005990  30 c0 08 3d 76 65 25 0d  30 d4 0c dd a4 73 63 28  |0..=ve%.0....sc(|
000059a0  41 24 29 0d 30 de 1e ea  6c 25 2c 6d 25 2c 64 25  |A$).0...l%,m%,d%|
000059b0  2c 73 25 2c 55 5f 25 2c  42 24 2c 43 24 2c 60 65  |,s%,U_%,B$,C$,`e|
000059c0  25 0d 30 e8 17 64 25 3d  36 30 30 3a 48 60 25 3d  |%.0..d%=600:H`%=|
000059d0  2d 31 3a 55 5f 25 3d 30  0d 30 f2 15 f5 42 24 3d  |-1:U_%=0.0...B$=|
000059e0  a4 77 62 28 41 24 29 3a  60 65 25 3d a3 0d 30 fc  |.wb(A$):`e%=..0.|
000059f0  10 e7 c0 42 24 2c 31 29  3d 22 2f 22 8c 0d 31 06  |...B$,1)="/"..1.|
00005a00  14 43 24 3d a4 78 62 28  42 24 29 3a 60 65 25 3d  |.C$=.xb(B$):`e%=|
00005a10  b9 0d 31 10 0d c8 8e c0  42 24 2c 32 29 ca 0d 31  |..1.....B$,2)..1|
00005a20  1a 11 c9 22 65 76 22 3a  55 5f 25 3d a4 41 66 0d  |..."ev":U_%=.Af.|
00005a30  31 24 16 c9 22 64 65 22  2c 22 64 65 6c 22 3a 64  |1$.."de","del":d|
00005a40  25 3d bb 43 24 0d 31 2e  32 c9 22 6e 61 22 2c 22  |%=.C$.1.2."na","|
00005a50  69 64 22 3a e3 6c 25 3d  30 b8 57 60 25 3a e7 43  |id":.l%=0.W`%:.C|
00005a60  24 3d 59 60 24 28 6c 25  29 8c 48 60 25 3d 6c 25  |$=Y`$(l%).H`%=l%|
00005a70  3a 6c 25 3d 57 60 25 0d  31 38 24 ed 3a e7 48 60  |:l%=W`%.18$.:.H`|
00005a80  25 3c 30 8c f2 72 62 28  a4 51 5f 28 22 45 62 61  |%<0..rb(.Q_("Eba|
00005a90  64 74 61 73 6b 22 29 29  3a 3d 30 0d 31 42 1d 7f  |dtask")):=0.1B..|
00005aa0  3a f2 72 62 28 a4 51 5f  28 22 45 62 61 64 77 61  |:.rb(.Q_("Ebadwa|
00005ab0  69 74 22 29 29 3a 3d 30  0d 31 4c 05 cb 0d 31 56  |it")):=0.1L...1V|
00005ac0  05 cd 0d 31 60 0a fd 60  65 25 3d a3 0d 31 6a 0b  |...1`..`e%=..1j.|
00005ad0  e7 55 5f 25 3d 30 8c 0d  31 74 23 e7 64 25 3d 30  |.U_%=0..1t#.d%=0|
00005ae0  8c f2 72 62 28 a4 61 62  28 22 45 62 61 64 64 65  |..rb(.ab("Ebadde|
00005af0  6c 22 2c 41 24 29 29 3a  3d 30 0d 31 7e 19 47 60  |l",A$)):=0.1~.G`|
00005b00  24 28 29 3d 22 22 3a 6c  25 3d 30 3a 43 24 3d 22  |$()="":l%=0:C$="|
00005b10  22 3a f5 0d 31 88 2a 47  60 24 28 6c 25 29 3d 42  |":..1.*G`$(l%)=B|
00005b20  24 3a 43 24 2b 3d 42 24  2b 22 2f 22 3a 6c 25 2b  |$:C$+=B$+"/":l%+|
00005b30  3d 31 3a 42 24 3d a4 77  62 28 41 24 29 0d 31 92  |=1:B$=.wb(A$).1.|
00005b40  1d fd 42 24 3d 22 22 84  6c 25 3d 34 3a 43 24 3d  |..B$="".l%=4:C$=|
00005b50  c0 43 24 2c a9 43 24 2d  31 29 0d 31 9c 2d f2 59  |.C$,.C$-1).1.-.Y|
00005b60  5f 28 a4 61 62 28 22 57  61 69 74 22 2c 43 24 29  |_(.ab("Wait",C$)|
00005b70  2c a4 61 62 28 22 54 69  6d 65 6f 75 74 22 2c c3  |,.ab("Timeout",.|
00005b80  64 25 29 2c 22 22 29 0d  31 a6 0b e7 48 60 25 3c  |d%),"").1...H`%<|
00005b90  30 8c 0d 31 b0 2b 55 5f  25 3d a4 74 65 28 47 60  |0..1.+U_%=.te(G`|
00005ba0  24 28 30 29 2c 47 60 24  28 31 29 2c 47 60 24 28  |$(0),G`$(1),G`$(|
00005bb0  32 29 2c 47 60 24 28 33  29 2c 64 25 29 0d 31 ba  |2),G`$(3),d%).1.|
00005bc0  05 cc 0d 31 c4 2b 55 5f  25 3d a4 42 66 28 47 60  |...1.+U_%=.Bf(G`|
00005bd0  24 28 30 29 2c 47 60 24  28 31 29 2c 47 60 24 28  |$(0),G`$(1),G`$(|
00005be0  32 29 2c 47 60 24 28 33  29 2c 64 25 29 0d 31 ce  |2),G`$(3),d%).1.|
00005bf0  05 cd 0d 31 d8 4b e7 55  5f 25 3e 30 8c f2 59 5f  |...1.K.U_%>0..Y_|
00005c00  28 22 22 2c a4 61 62 28  22 52 65 63 65 69 76 65  |("",.ab("Receive|
00005c10  64 22 2c 47 60 24 28 55  5f 25 2d 31 29 29 2c 22  |d",G`$(U_%-1)),"|
00005c20  22 29 8b f2 59 5f 28 22  22 2c a4 51 5f 28 22 54  |")..Y_("",.Q_("T|
00005c30  69 6d 65 64 4f 75 74 22  29 2c 22 22 29 0d 31 e2  |imedOut"),"").1.|
00005c40  05 cd 0d 31 ec 08 3d 55  5f 25 0d 32 00 08 dd a4  |...1..=U_%.2....|
00005c50  41 66 0d 32 0a 1c f2 5f  61 28 53 61 25 2c 37 2c  |Af.2..._a(Sa%,7,|
00005c60  a4 51 5f 28 22 53 65 6c  65 63 74 22 29 29 0d 32  |.Q_("Select")).2|
00005c70  14 1e f2 59 5f 28 a4 51  5f 28 22 57 61 69 74 69  |...Y_(.Q_("Waiti|
00005c80  6e 67 22 29 2c 22 20 22  2c 22 22 29 0d 32 1e 11  |ng")," ","").2..|
00005c90  f5 f2 41 62 28 35 30 29  3a fd a4 52 5f 0d 32 28  |..Ab(50):..R_.2(|
00005ca0  06 3d 31 0d 32 3c 0c dd  f2 6b 65 28 41 24 29 0d  |.=1.2<...ke(A$).|
00005cb0  32 46 0f ea 61 25 2c 42  24 3a 61 25 3d b9 0d 32  |2F..a%,B$:a%=..2|
00005cc0  50 0f f5 42 24 3d a4 77  62 28 41 24 29 0d 32 5a  |P..B$=.wb(A$).2Z|
00005cd0  0d c8 8e c0 42 24 2c 32  29 ca 0d 32 64 0e c9 22  |....B$,2)..2d.."|
00005ce0  2f 65 22 3a 61 25 3d b9  0d 32 6e 0e c9 22 2f 64  |/e":a%=..2n.."/d|
00005cf0  22 3a 61 25 3d a3 0d 32  78 13 c9 22 74 69 22 3a  |":a%=..2x.."ti":|
00005d00  6b 60 25 28 31 29 3d 61  25 0d 32 82 13 c9 22 6c  |k`%(1)=a%.2..."l|
00005d10  69 22 3a 6b 60 25 28 32  29 3d 61 25 0d 32 8c 13  |i":k`%(2)=a%.2..|
00005d20  c9 22 74 61 22 3a 6b 60  25 28 33 29 3d 61 25 0d  |."ta":k`%(3)=a%.|
00005d30  32 96 13 c9 22 74 77 22  3a 6b 60 25 28 34 29 3d  |2..."tw":k`%(4)=|
00005d40  61 25 0d 32 a0 13 c9 22  69 6e 22 3a 6b 60 25 28  |a%.2..."in":k`%(|
00005d50  35 29 3d 61 25 0d 32 aa  13 c9 22 69 63 22 3a 6b  |5)=a%.2..."ic":k|
00005d60  60 25 28 36 29 3d 61 25  0d 32 b4 13 c9 22 66 69  |`%(6)=a%.2..."fi|
00005d70  22 3a 6b 60 25 28 37 29  3d 61 25 0d 32 be 13 c9  |":k`%(7)=a%.2...|
00005d80  22 6d 65 22 3a 6b 60 25  28 38 29 3d 61 25 0d 32  |"me":k`%(8)=a%.2|
00005d90  c8 13 c9 22 65 6f 22 3a  6b 60 25 28 39 29 3d 61  |..."eo":k`%(9)=a|
00005da0  25 0d 32 d2 12 c9 22 61  6c 22 3a 6b 60 25 28 29  |%.2..."al":k`%()|
00005db0  3d 61 25 0d 32 dc 05 cb  0d 32 e6 13 fd 41 24 3d  |=a%.2....2...A$=|
00005dc0  22 22 3a 6b 60 25 28 30  29 3d b9 0d 32 f0 05 e1  |"":k`%(0)=..2...|
00005dd0  0d 33 04 29 dd a4 42 66  28 48 60 24 28 30 29 2c  |.3.)..Bf(H`$(0),|
00005de0  48 60 24 28 31 29 2c 48  60 24 28 32 29 2c 48 60  |H`$(1),H`$(2),H`|
00005df0  24 28 33 29 2c 73 63 25  29 0d 33 0e 0b ea 74 63  |$(3),sc%).3...tc|
00005e00  25 2c 72 25 0d 33 18 22  72 25 3d 30 3a 43 66 25  |%,r%.3."r%=0:Cf%|
00005e10  3d 30 3a 73 63 25 3d 73  63 25 2a 31 30 30 3a 74  |=0:sc%=sc%*100:t|
00005e20  63 25 3d 66 61 25 0d 33  22 11 f2 48 60 28 63 60  |c%=fa%.3"..H`(c`|
00005e30  24 28 48 60 25 29 29 0d  33 2c 29 f5 f2 41 62 28  |$(H`%)).3,)..Ab(|
00005e40  35 30 29 3a fd 43 66 25  3e 30 84 94 28 66 61 25  |50):.Cf%>0..(fa%|
00005e50  2d 74 63 25 29 3e 73 63  25 84 69 5f 25 3c 3e 30  |-tc%)>sc%.i_%<>0|
00005e60  0d 33 36 11 e7 43 66 25  3e 30 8c 72 25 3d 43 66  |.36..Cf%>0.r%=Cf|
00005e70  25 0d 33 40 07 3d 72 25  0d 33 54 0c dd f2 48 60  |%.3@.=r%.3T...H`|
00005e80  28 41 24 29 0d 33 5e 07  ea 4c 25 0d 33 68 0b e3  |(A$).3^..L%.3h..|
00005e90  4c 25 3d 30 b8 33 0d 33  72 2c e7 48 60 24 28 4c  |L%=0.3.3r,.H`$(L|
00005ea0  25 29 3e 22 22 80 a7 41  24 2c 48 60 24 28 4c 25  |%)>""..A$,H`$(L%|
00005eb0  29 29 3e 30 8c 43 66 25  3d 4c 25 2b 31 3a 4c 25  |))>0.Cf%=L%+1:L%|
00005ec0  3d 33 0d 33 7c 05 ed 0d  33 86 0a 48 60 25 3d 2d  |=3.3|...3..H`%=-|
00005ed0  31 0d 33 90 05 e1 0d 33  a4 1d dd a4 74 65 28 44  |1.3....3....te(D|
00005ee0  66 24 2c 45 66 24 2c 46  66 24 2c 47 60 24 2c 73  |f$,Ef$,Ff$,G`$,s|
00005ef0  63 25 29 0d 33 ae 0f ea  76 65 25 2c 74 63 25 2c  |c%).3...ve%,tc%,|
00005f00  4a 25 0d 33 b8 17 73 63  25 3d 73 63 25 2a 31 30  |J%.3..sc%=sc%*10|
00005f10  30 3a 74 63 25 3d 66 61  25 0d 33 c2 27 47 66 25  |0:tc%=fa%.3.'Gf%|
00005f20  3d 97 44 66 24 3a 48 66  25 3d 97 45 66 24 3a 49  |=.Df$:Hf%=.Ef$:I|
00005f30  66 25 3d 97 46 66 24 3a  4a 66 25 3d 97 47 60 24  |f%=.Ff$:Jf%=.G`$|
00005f40  0d 33 cc 21 4b 66 25 3d  31 3a 4c 66 25 3d 31 3a  |.3.!Kf%=1:Lf%=1:|
00005f50  4d 66 25 3d 31 3a 4e 66  25 3d 31 3a 76 65 25 3d  |Mf%=1:Nf%=1:ve%=|
00005f60  30 0d 33 d6 05 f5 0d 33  e0 0a 4a 25 3d a4 68 64  |0.3....3..J%=.hd|
00005f70  0d 33 ea 0b e7 4a 25 3e  2d 31 8c 0d 33 f4 32 e7  |.3...J%>-1..3.2.|
00005f80  4a 25 3d 47 66 25 8c 4b  66 25 2b 3d 31 3a 47 66  |J%=Gf%.Kf%+=1:Gf|
00005f90  25 3d 97 28 c1 44 66 24  2c 4b 66 25 29 29 8b 47  |%=.(.Df$,Kf%)).G|
00005fa0  66 25 3d 97 44 66 24 3a  4b 66 25 3d 31 0d 33 fe  |f%=.Df$:Kf%=1.3.|
00005fb0  32 e7 4a 25 3d 48 66 25  8c 4c 66 25 2b 3d 31 3a  |2.J%=Hf%.Lf%+=1:|
00005fc0  48 66 25 3d 97 28 c1 45  66 24 2c 4c 66 25 29 29  |Hf%=.(.Ef$,Lf%))|
00005fd0  8b 48 66 25 3d 97 45 66  24 3a 4c 66 25 3d 31 0d  |.Hf%=.Ef$:Lf%=1.|
00005fe0  34 08 32 e7 4a 25 3d 49  66 25 8c 4d 66 25 2b 3d  |4.2.J%=If%.Mf%+=|
00005ff0  31 3a 49 66 25 3d 97 28  c1 46 66 24 2c 4d 66 25  |1:If%=.(.Ff$,Mf%|
00006000  29 29 8b 49 66 25 3d 97  46 66 24 3a 4d 66 25 3d  |)).If%=.Ff$:Mf%=|
00006010  31 0d 34 12 32 e7 4a 25  3d 4a 66 25 8c 4e 66 25  |1.4.2.J%=Jf%.Nf%|
00006020  2b 3d 31 3a 4a 66 25 3d  97 28 c1 47 60 24 2c 4e  |+=1:Jf%=.(.G`$,N|
00006030  66 25 29 29 8b 4a 66 25  3d 97 47 60 24 3a 4e 66  |f%)).Jf%=.G`$:Nf|
00006040  25 3d 31 0d 34 1c 05 cc  0d 34 26 0b f2 41 62 28  |%=1.4....4&..Ab(|
00006050  31 30 29 0d 34 30 05 cd  0d 34 3a 1a e7 4b 66 25  |10).40...4:..Kf%|
00006060  3e a9 44 66 24 80 44 66  24 3e 22 22 3a 76 65 25  |>.Df$.Df$>"":ve%|
00006070  3d 31 0d 34 44 1a e7 4c  66 25 3e a9 45 66 24 80  |=1.4D..Lf%>.Ef$.|
00006080  45 66 24 3e 22 22 3a 76  65 25 3d 32 0d 34 4e 1a  |Ef$>"":ve%=2.4N.|
00006090  e7 4d 66 25 3e a9 46 66  24 80 46 66 24 3e 22 22  |.Mf%>.Ff$.Ff$>""|
000060a0  3a 76 65 25 3d 33 0d 34  58 1a e7 4e 66 25 3e a9  |:ve%=3.4X..Nf%>.|
000060b0  47 60 24 80 47 60 24 3e  22 22 3a 76 65 25 3d 34  |G`$.G`$>"":ve%=4|
000060c0  0d 34 62 27 fd 76 65 25  3e 30 84 94 28 66 61 25  |.4b'.ve%>0..(fa%|
000060d0  2d 74 63 25 29 3e 73 63  25 84 69 5f 25 3c 3e 30  |-tc%)>sc%.i_%<>0|
000060e0  84 65 5f 25 3c 3e 30 0d  34 6c 10 e7 76 65 25 3e  |.e_%<>0.4l..ve%>|
000060f0  30 8c 3a 3d 76 65 25 0d  34 76 06 3d 30 0d 34 8a  |0.:=ve%.4v.=0.4.|
00006100  0c dd f2 46 65 28 41 24  29 0d 34 94 25 ea 41 25  |...Fe(A$).4.%.A%|
00006110  2c 4a 25 2c 52 25 2c 74  24 2c 53 62 25 2c 42 24  |,J%,R%,t$,Sb%,B$|
00006120  2c 43 24 3a 74 24 3d 22  22 3a 52 25 3d 30 0d 34  |,C$:t$="":R%=0.4|
00006130  9e 0f f5 42 24 3d a4 77  62 28 41 24 29 0d 34 a8  |...B$=.wb(A$).4.|
00006140  10 e7 c0 42 24 2c 31 29  3d 22 2f 22 8c 0d 34 b2  |...B$,1)="/"..4.|
00006150  18 43 24 3d a4 78 62 28  42 24 29 3a c8 8e c0 42  |.C$=.xb(B$):...B|
00006160  24 2c 32 29 ca 0d 34 bc  0e c9 22 72 61 22 3a 52  |$,2)..4..."ra":R|
00006170  25 3d b9 0d 34 c6 0e c9  22 6e 6f 22 3a 52 25 3d  |%=..4..."no":R%=|
00006180  a3 0d 34 d0 14 c9 22 6e  61 22 2c 22 69 64 22 3a  |..4..."na","id":|
00006190  74 24 3d 43 24 0d 34 da  05 cb 0d 34 e4 05 cc 0d  |t$=C$.4....4....|
000061a0  34 ee 0b e7 74 24 3d 22  22 8c 0d 34 f8 1f e7 6c  |4...t$=""..4...l|
000061b0  5f 25 3d 30 8c f2 72 62  28 a4 51 5f 28 22 45 6e  |_%=0..rb(.Q_("En|
000061c0  6f 64 65 76 22 29 29 3a  e1 0d 35 02 29 e3 41 25  |odev")):..5.).A%|
000061d0  3d 31 b8 a9 42 24 3a 4a  25 3d a4 64 28 30 2c 75  |=1..B$:J%=.d(0,u|
000061e0  61 25 2c 97 c1 42 24 2c  41 25 2c 31 29 2c 30 29  |a%,..B$,A%,1),0)|
000061f0  3a ed 0d 35 0c 1b e7 52  25 3d 30 8c 4a 25 3d a4  |:..5...R%=0.J%=.|
00006200  64 28 30 2c 75 61 25 2c  31 33 2c 30 29 0d 35 16  |d(0,ua%,13,0).5.|
00006210  05 cc 0d 35 20 29 53 62  25 3d 30 3a c8 95 59 60  |...5 )Sb%=0:..Y`|
00006220  24 28 53 62 25 29 3c 3e  74 24 80 53 62 25 3c 57  |$(Sb%)<>t$.Sb%<W|
00006230  60 25 3a 53 62 25 2b 3d  31 3a ce 0d 35 2a 19 e7  |`%:Sb%+=1:..5*..|
00006240  53 62 25 3c 57 60 25 80  61 60 25 28 53 62 25 29  |Sb%<W`%.a`%(Sb%)|
00006250  3c 3e 30 8c 0d 35 34 3d  21 71 25 3d 32 35 36 3a  |<>0..54=!q%=256:|
00006260  71 25 21 31 32 3d 30 3a  71 25 21 31 36 3d 26 38  |q%!12=0:q%!16=&8|
00006270  30 38 43 30 3a 71 25 21  32 30 3d a9 42 24 2d 28  |08C0:q%!20=.B$-(|
00006280  52 25 3d 30 29 3a 24 28  71 25 2b 32 34 29 3d 42  |R%=0):$(q%+24)=B|
00006290  24 0d 35 3e 1b c8 99 32  36 32 33 37 35 2c 31 37  |$.5>...262375,17|
000062a0  2c 71 25 2c 61 60 25 28  53 62 25 29 0d 35 48 2a  |,q%,a`%(Sb%).5H*|
000062b0  f2 5a 62 28 a4 76 62 28  22 54 61 73 6b 53 65 6e  |.Zb(.vb("TaskSen|
000062c0  64 22 2c c0 42 24 2c 31  30 30 29 2c 59 60 24 28  |d",.B$,100),Y`$(|
000062d0  53 62 25 29 29 29 0d 35  52 05 cd 0d 35 5c 05 cd  |Sb%))).5R...5\..|
000062e0  0d 35 66 05 cd 0d 35 70  0a fd 41 24 3d 22 22 0d  |.5f...5p..A$="".|
000062f0  35 7a 05 e1 0d 35 8e 0c  dd a4 47 65 28 41 24 29  |5z...5....Ge(A$)|
00006300  0d 35 98 22 ea 72 25 2c  4f 66 24 2c 64 25 2c 61  |.5.".r%,Of$,d%,a|
00006310  25 2c 50 66 25 2c 51 66  25 2c 42 24 2c 43 24 2c  |%,Pf%,Qf%,B$,C$,|
00006320  4a 25 0d 35 a2 13 72 25  3d 30 3a 64 25 3d 36 30  |J%.5..r%=0:d%=60|
00006330  3a 61 25 3d 30 0d 35 ac  0f f5 42 24 3d a4 77 62  |:a%=0.5...B$=.wb|
00006340  28 41 24 29 0d 35 b6 10  e7 c0 42 24 2c 31 29 3d  |(A$).5....B$,1)=|
00006350  22 2f 22 8c 0d 35 c0 18  43 24 3d a4 78 62 28 42  |"/"..5..C$=.xb(B|
00006360  24 29 3a c8 8e c0 42 24  2c 32 29 ca 0d 35 ca 1d  |$):...B$,2)..5..|
00006370  c9 22 64 65 22 3a 64 25  3d bb 43 24 3a e7 64 25  |."de":d%=.C$:.d%|
00006380  3c 31 30 8c 64 25 3d 31  30 0d 35 d4 0e c9 22 61  |<10.d%=10.5..."a|
00006390  75 22 3a 61 25 3d b9 0d  35 de 05 cb 0d 35 e8 05  |u":a%=..5....5..|
000063a0  cc 0d 35 f2 0a 4f 66 24  3d 42 24 0d 35 fc 05 cd  |..5..Of$=B$.5...|
000063b0  0d 36 06 0a fd 41 24 3d  22 22 0d 36 10 0a e7 61  |.6...A$="".6...a|
000063c0  25 3d 30 8c 0d 36 1a 1b  72 25 3d a4 74 65 28 4f  |%=0..6..r%=.te(O|
000063d0  66 24 2c 22 22 2c 22 22  2c 22 22 2c 64 25 29 0d  |f$,"","","",d%).|
000063e0  36 24 05 cc 0d 36 2e 24  4f 66 24 3d 22 22 3a 50  |6$...6.$Of$="":P|
000063f0  66 25 3d 30 3a 72 25 3d  30 3a 51 66 25 3d 66 61  |f%=0:r%=0:Qf%=fa|
00006400  25 2b 64 25 2a 31 30 30  0d 36 38 05 f5 0d 36 42  |%+d%*100.68...6B|
00006410  0a 4a 25 3d a4 68 64 0d  36 4c 0a e7 4a 25 3e 30  |.J%=.hd.6L..J%>0|
00006420  8c 0d 36 56 0a c8 8e 50  66 25 ca 0d 36 60 35 c9  |..6V...Pf%..6`5.|
00006430  30 2c 31 2c 32 3a e7 4a  25 3e 34 37 80 4a 25 3c  |0,1,2:.J%>47.J%<|
00006440  35 37 8c 4f 66 24 2b 3d  bd 4a 25 3a 50 66 25 2b  |57.Of$+=.J%:Pf%+|
00006450  3d 31 3a 8b 4f 66 24 3d  22 22 3a 50 66 25 3d 30  |=1:.Of$="":Pf%=0|
00006460  0d 36 6a 2b c9 33 3a e7  4a 25 3d 34 36 8c 4f 66  |.6j+.3:.J%=46.Of|
00006470  24 2b 3d 22 2e 22 3a 50  66 25 2b 3d 31 3a 8b 4f  |$+=".":Pf%+=1:.O|
00006480  66 24 3d 22 22 3a 50 66  25 3d 30 0d 36 74 05 cb  |f$="":Pf%=0.6t..|
00006490  0d 36 7e 05 cc 0d 36 88  0c f2 41 62 28 64 61 25  |.6~...6...Ab(da%|
000064a0  29 0d 36 92 05 cd 0d 36  9c 1e fd 50 66 25 3d 34  |).6....6...Pf%=4|
000064b0  84 66 61 25 3e 51 66 25  3a e7 50 66 25 3d 34 8c  |.fa%>Qf%:.Pf%=4.|
000064c0  72 25 3d 31 0d 36 a6 05  cd 0d 36 b0 0a e7 72 25  |r%=1.6....6...r%|
000064d0  3d 31 8c 0d 36 ba 0b 52  66 24 3d 4f 66 24 0d 36  |=1..6..Rf$=Of$.6|
000064e0  c4 0a 4a 25 3d a4 68 64  0d 36 d8 1a c8 95 28 4a  |..J%=.hd.6....(J|
000064f0  25 3e 33 32 84 4a 25 3d  30 29 80 a9 52 66 24 3c  |%>32.J%=0)..Rf$<|
00006500  32 30 0d 36 e2 28 e7 4a  25 3e 33 31 8c 52 66 24  |20.6.(.J%>31.Rf$|
00006510  3d 52 66 24 2b bd 4a 25  3a f2 41 62 28 64 61 25  |=Rf$+.J%:.Ab(da%|
00006520  29 3a 8b f2 41 62 28 31  30 29 0d 36 ec 0a 4a 25  |):..Ab(10).6..J%|
00006530  3d a4 68 64 0d 36 f6 05  ce 0d 37 00 11 43 25 3d  |=.hd.6....7..C%=|
00006540  97 28 c2 52 66 24 2c 31  29 29 0d 37 0a 1a c8 95  |.(.Rf$,1)).7....|
00006550  28 43 25 3c 34 38 84 43  25 3e 35 37 29 80 a9 52  |(C%<48.C%>57)..R|
00006560  66 24 3e 35 0d 37 14 16  52 66 24 3d c0 52 66 24  |f$>5.7..Rf$=.Rf$|
00006570  2c a9 28 52 66 24 29 2d  31 29 0d 37 1e 11 43 25  |,.(Rf$)-1).7..C%|
00006580  3d 97 28 c2 52 66 24 2c  31 29 29 0d 37 28 05 ce  |=.(.Rf$,1)).7(..|
00006590  0d 37 32 18 f2 5a 61 28  22 69 70 61 64 64 72 65  |.72..Za("ipaddre|
000065a0  73 73 22 2c 52 66 24 29  0d 37 3c 2a f2 5a 61 28  |ss",Rf$).7<*.Za(|
000065b0  22 72 6f 75 74 65 22 2c  a4 53 66 28 22 25 69 70  |"route",.Sf("%ip|
000065c0  31 2e 25 69 70 32 2e 25  69 70 33 2e 32 35 34 22  |1.%ip2.%ip3.254"|
000065d0  29 29 0d 37 46 17 55 5f  24 3d 52 66 24 3a 72 25  |)).7F.U_$=Rf$:r%|
000065e0  3d 2d 31 3a 41 24 3d 22  22 0d 37 50 05 cd 0d 37  |=-1:A$="".7P...7|
000065f0  5a 07 3d 72 25 0d 37 6e  0c dd f2 54 66 28 41 24  |Z.=r%.7n...Tf(A$|
00006600  29 0d 37 78 0a ea 6c 25  2c 6d 25 0d 37 82 24 6c  |).7x..l%,m%.7.$l|
00006610  25 3d a7 41 24 2c 22 2e  22 29 3a f2 5a 61 28 22  |%=.A$,"."):.Za("|
00006620  69 70 31 22 2c c0 41 24  2c 6c 25 2d 31 29 29 0d  |ip1",.A$,l%-1)).|
00006630  37 8c 31 6d 25 3d a7 41  24 2c 22 2e 22 2c 6c 25  |7.1m%=.A$,".",l%|
00006640  2b 31 29 3a f2 5a 61 28  22 69 70 32 22 2c c1 41  |+1):.Za("ip2",.A|
00006650  24 2c 6c 25 2b 31 2c 6d  25 2d 6c 25 2d 31 29 29  |$,l%+1,m%-l%-1))|
00006660  0d 37 96 31 6c 25 3d a7  41 24 2c 22 2e 22 2c 6d  |.7.1l%=.A$,".",m|
00006670  25 2b 31 29 3a f2 5a 61  28 22 69 70 33 22 2c c1  |%+1):.Za("ip3",.|
00006680  41 24 2c 6d 25 2b 31 2c  6c 25 2d 6d 25 2d 31 29  |A$,m%+1,l%-m%-1)|
00006690  29 0d 37 a0 18 f2 5a 61  28 22 69 70 34 22 2c c1  |).7...Za("ip4",.|
000066a0  41 24 2c 6c 25 2b 31 29  29 0d 37 aa 11 f2 59 5f  |A$,l%+1)).7...Y_|
000066b0  28 22 22 2c 22 22 2c 41  24 29 0d 37 b4 05 e1 0d  |("","",A$).7....|
000066c0  37 c8 0d dd f2 48 65 28  74 61 24 29 0d 37 d2 10  |7....He(ta$).7..|
000066d0  41 25 3d a7 74 61 24 2c  22 20 22 29 0d 37 dc 23  |A%=.ta$," ").7.#|
000066e0  e7 41 25 3c 3d 31 8c f2  6c 65 28 a4 61 62 28 22  |.A%<=1..le(.ab("|
000066f0  45 62 61 64 6d 61 6b 65  22 2c 74 61 24 29 29 0d  |Ebadmake",ta$)).|
00006700  37 e6 21 60 64 24 3d c0  74 61 24 2c 41 25 2d 31  |7.!`d$=.ta$,A%-1|
00006710  29 3a 55 66 24 3d c1 74  61 24 2c 41 25 2b 31 29  |):Uf$=.ta$,A%+1)|
00006720  0d 37 f0 1e f2 59 5f 28  a4 61 62 28 22 4d 61 6b  |.7...Y_(.ab("Mak|
00006730  65 22 2c 55 66 24 29 2c  22 22 2c 22 22 29 0d 37  |e",Uf$),"","").7|
00006740  fa 18 e7 60 64 24 3d 22  2d 22 8c 60 64 24 3d 22  |...`d$="-".`d$="|
00006750  6e 75 6c 6c 3a 22 0d 38  04 10 70 5f 25 3d a4 4c  |null:".8..p_%=.L|
00006760  61 28 60 64 24 29 0d 38  0e 26 e7 70 5f 25 3d 30  |a(`d$).8.&.p_%=0|
00006770  8c f2 72 62 28 a4 61 62  28 22 45 6e 6f 74 66 6f  |..rb(.ab("Enotfo|
00006780  75 6e 64 22 2c 60 64 24  29 29 3a e1 0d 38 18 10  |und",`d$)):..8..|
00006790  71 5f 25 3d a4 56 66 28  55 66 24 29 0d 38 22 25  |q_%=.Vf(Uf$).8"%|
000067a0  e7 71 5f 25 3d 30 8c f2  72 62 28 a4 61 62 28 22  |.q_%=0..rb(.ab("|
000067b0  45 62 61 64 66 69 6c 65  22 2c 55 66 24 29 29 3a  |Ebadfile",Uf$)):|
000067c0  e1 0d 38 2c 22 c8 95 28  c5 23 70 5f 25 3d a3 84  |..8,"..(.#p_%=..|
000067d0  c0 a4 54 5f 28 4f 5f 25  2b 31 29 2c 31 29 3d 22  |..T_(O_%+1),1)="|
000067e0  2b 22 29 0d 38 36 0b e7  c5 23 70 5f 25 8c 0d 38  |+").86...#p_%..8|
000067f0  40 1a 4f 5f 25 2b 3d 31  3a 41 24 3d c1 a4 54 5f  |@.O_%+=1:A$=..T_|
00006800  28 4f 5f 25 29 2c 32 29  0d 38 4a 05 cc 0d 38 54  |(O_%),2).8J...8T|
00006810  0c 41 24 3d be 23 70 5f  25 0d 38 5e 05 cd 0d 38  |.A$=.#p_%.8^...8|
00006820  68 0e 41 24 3d a4 53 66  28 41 24 29 0d 38 72 19  |h.A$=.Sf(A$).8r.|
00006830  e7 c0 41 24 2c 31 29 3c  3e 22 23 22 8c d5 23 71  |..A$,1)<>"#"..#q|
00006840  5f 25 2c 41 24 0d 38 7c  0c f2 41 62 28 64 61 25  |_%,A$.8|..Ab(da%|
00006850  29 0d 38 86 05 ce 0d 38  90 15 f2 4d 61 28 70 5f  |).8....8...Ma(p_|
00006860  25 29 3a f2 4d 61 28 71  5f 25 29 0d 38 9a 05 e1  |%):.Ma(q_%).8...|
00006870  0d 38 ae 0c dd a4 4c 61  28 66 24 29 0d 38 b8 10  |.8....La(f$).8..|
00006880  3d a4 57 66 28 66 24 2c  26 34 46 29 0d 38 cc 0c  |=.Wf(f$,&4F).8..|
00006890  dd a4 56 66 28 66 24 29  0d 38 d6 1d 3d a4 57 66  |..Vf(f$).8..=.Wf|
000068a0  28 66 24 2c 26 38 46 29  3a f2 58 66 28 66 24 2c  |(f$,&8F):.Xf(f$,|
000068b0  26 46 46 46 29 0d 38 ea  0c dd a4 60 61 28 66 24  |&FFF).8....`a(f$|
000068c0  29 0d 38 f4 07 ea 68 25  0d 38 fe 12 68 25 3d a4  |).8...h%.8..h%=.|
000068d0  57 66 28 66 24 2c 26 43  46 29 0d 39 08 25 e7 68  |Wf(f$,&CF).9.%.h|
000068e0  25 3d 30 8c 68 25 3d a4  57 66 28 66 24 2c 26 38  |%=0.h%=.Wf(f$,&8|
000068f0  46 29 3a f2 58 66 28 66  24 2c 26 46 46 46 29 0d  |F):.Xf(f$,&FFF).|
00006900  39 12 07 3d 68 25 0d 39  26 0f dd a4 57 66 28 66  |9..=h%.9&...Wf(f|
00006910  24 2c 72 25 29 0d 39 30  0a ea 68 25 2c 46 25 0d  |$,r%).90..h%,F%.|
00006920  39 3a 18 c8 99 31 33 31  30 38 35 2c 72 25 2c 66  |9:...131085,r%,f|
00006930  24 b8 68 25 3b 46 25 0d  39 44 10 e7 28 46 25 80  |$.h%;F%.9D..(F%.|
00006940  31 29 8c 68 25 3d 30 0d  39 4e 07 3d 68 25 0d 39  |1).h%=0.9N.=h%.9|
00006950  62 0c dd a4 56 62 28 66  24 29 0d 39 6c 19 ea 46  |b...Vb(f$).9l..F|
00006960  25 3a c8 99 31 33 31 30  38 30 2c 36 2c 66 24 b8  |%:..131080,6,f$.|
00006970  3b 46 25 0d 39 76 0b 3d  28 46 25 80 31 29 0d 39  |;F%.9v.=(F%.1).9|
00006980  8a 0f dd f2 58 66 28 66  24 2c 74 25 29 0d 39 94  |....Xf(f$,t%).9.|
00006990  15 c8 99 31 33 31 30 38  30 2c 31 38 2c 66 24 2c  |...131080,18,f$,|
000069a0  74 25 0d 39 9e 05 e1 0d  39 b2 0d dd f2 68 5f 28  |t%.9....9....h_(|
000069b0  73 63 25 29 0d 39 bc 08  ea 59 66 25 0d 39 c6 0b  |sc%).9...Yf%.9..|
000069c0  e7 73 63 25 3d 30 8c 0d  39 d0 07 f2 5a 5f 0d 39  |.sc%=0..9...Z_.9|
000069d0  da 05 cc 0d 39 e4 1d f2  5a 62 28 a4 61 62 28 22  |....9...Zb(.ab("|
000069e0  57 61 69 74 22 2c c3 73  63 25 2b 22 73 22 29 29  |Wait",.sc%+"s"))|
000069f0  0d 39 ee 1e f2 41 62 28  30 29 3a 74 63 25 3d 66  |.9...Ab(0):tc%=f|
00006a00  61 25 3a 73 63 25 3d 73  63 25 2a 31 30 30 0d 39  |a%:sc%=sc%*100.9|
00006a10  f8 05 f5 0d 3a 02 0b f2  41 62 28 35 30 29 0d 3a  |....:...Ab(50).:|
00006a20  0c 13 fd 94 28 74 63 25  2d 66 61 25 29 3e 73 63  |....(tc%-fa%)>sc|
00006a30  25 0d 3a 16 05 cd 0d 3a  20 05 e1 0d 3a 34 08 dd  |%.:....: ...:4..|
00006a40  f2 4c 62 0d 3a 3e 0a ea  6c 25 2c 6d 25 0d 3a 48  |.Lb.:>..l%,m%.:H|
00006a50  13 3f 71 25 3d 33 3a c8  99 37 2c 31 34 2c 71 25  |.?q%=3:..7,14,q%|
00006a60  0d 3a 52 32 c8 99 31 39  33 2c 71 25 2c 61 5f 25  |.:R2..193,q%,a_%|
00006a70  2c 32 35 36 2c 22 25 32  34 25 4d 49 25 53 45 22  |,256,"%24%MI%SE"|
00006a80  b8 6c 25 2c 6d 25 3a 5a  66 24 3d a4 55 62 28 6c  |.l%,m%:Zf$=.Ub(l|
00006a90  25 29 0d 3a 5c 2d f2 5a  61 28 22 24 74 69 6d 65  |%).:\-.Za("$time|
00006aa0  22 2c 5a 66 24 29 3a f2  5a 61 28 22 24 6d 74 69  |",Zf$):.Za("$mti|
00006ab0  6d 65 22 2c c3 28 66 61  25 81 31 30 30 29 29 0d  |me",.(fa%.100)).|
00006ac0  3a 66 05 e1 0d 3a 7a 08  dd f2 4e 62 0d 3a 84 0a  |:f...:z...Nb.:..|
00006ad0  ea 6c 25 2c 6d 25 0d 3a  8e 13 3f 71 25 3d 33 3a  |.l%,m%.:..?q%=3:|
00006ae0  c8 99 37 2c 31 34 2c 71  25 0d 3a 98 32 c8 99 31  |..7,14,q%.:.2..1|
00006af0  39 33 2c 71 25 2c 61 5f  25 2c 32 35 36 2c 22 25  |93,q%,a_%,256,"%|
00006b00  59 52 25 4d 4e 25 44 59  22 b8 6c 25 2c 6d 25 3a  |YR%MN%DY".l%,m%:|
00006b10  5a 66 24 3d a4 55 62 28  6c 25 29 0d 3a a2 14 f2  |Zf$=.Ub(l%).:...|
00006b20  5a 61 28 22 24 64 61 74  65 22 2c 5a 66 24 29 0d  |Za("$date",Zf$).|
00006b30  3a ac 05 e1 0d 3a c0 0c  dd f2 4b 60 28 41 24 29  |:....:....K`(A$)|
00006b40  0d 3a ca 1d ea 61 66 25  2c 61 24 2c 62 66 25 2c  |.:...af%,a$,bf%,|
00006b50  63 66 25 2c 64 66 25 2c  42 24 2c 43 24 0d 3a d4  |cf%,df%,B$,C$.:.|
00006b60  1e 62 66 25 3d 2d 31 3a  61 66 25 3d 2d 31 3a 64  |.bf%=-1:af%=-1:d|
00006b70  66 25 3d 2d 31 3a 61 24  3d 41 24 0d 3a de 0f f5  |f%=-1:a$=A$.:...|
00006b80  42 24 3d a4 77 62 28 41  24 29 0d 3a e8 10 e7 c0  |B$=.wb(A$).:....|
00006b90  42 24 2c 31 29 3d 22 2f  22 8c 0d 3a f2 0e 43 24  |B$,1)="/"..:..C$|
00006ba0  3d a4 78 62 28 42 24 29  0d 3a fc 0d c8 8e c0 42  |=.xb(B$).:.....B|
00006bb0  24 2c 32 29 ca 0d 3b 06  10 c9 22 73 74 22 3a 69  |$,2)..;..."st":i|
00006bc0  5f 24 3d 43 24 0d 3b 10  10 c9 22 65 72 22 3a 74  |_$=C$.;..."er":t|
00006bd0  62 24 3d 43 24 0d 3b 1a  25 c9 22 64 74 22 2c 22  |b$=C$.;.%."dt","|
00006be0  63 74 73 22 3a 79 5f 25  28 30 29 3d a4 63 63 28  |cts":y_%(0)=.cc(|
00006bf0  bb 43 24 29 3a 61 66 25  3d 30 0d 3b 24 1f c9 22  |.C$):af%=0.;$.."|
00006c00  64 73 22 3a 79 5f 25 28  31 29 3d a4 63 63 28 bb  |ds":y_%(1)=.cc(.|
00006c10  43 24 29 3a 61 66 25 3d  31 0d 3b 2e 1f c9 22 72  |C$):af%=1.;..."r|
00006c20  6e 22 3a 79 5f 25 28 32  29 3d a4 63 63 28 bb 43  |n":y_%(2)=.cc(.C|
00006c30  24 29 3a 61 66 25 3d 32  0d 3b 38 1f c9 22 64 63  |$):af%=2.;8.."dc|
00006c40  22 3a 79 5f 25 28 33 29  3d a4 63 63 28 bb 43 24  |":y_%(3)=.cc(.C$|
00006c50  29 3a 61 66 25 3d 33 0d  3b 42 15 c9 22 74 69 22  |):af%=3.;B.."ti"|
00006c60  3a 63 66 25 3d a4 65 66  28 43 24 29 0d 3b 4c 15  |:cf%=.ef(C$).;L.|
00006c70  c9 22 69 63 22 3a 64 66  25 3d a4 66 66 28 43 24  |."ic":df%=.ff(C$|
00006c80  29 0d 3b 56 26 c9 22 6e  61 22 2c 22 69 64 22 3a  |).;V&."na","id":|
00006c90  62 66 25 3d a4 67 66 28  43 24 29 3a 4d 60 24 28  |bf%=.gf(C$):M`$(|
00006ca0  62 66 25 29 3d 43 24 0d  3b 60 16 c9 22 63 61 22  |bf%)=C$.;`.."ca"|
00006cb0  2c 22 64 65 22 3a f2 68  66 28 43 24 29 0d 3b 6a  |,"de":.hf(C$).;j|
00006cc0  05 cb 0d 3b 74 05 cd 0d  3b 7e 0a fd 41 24 3d 22  |...;t...;~..A$="|
00006cd0  22 0d 3b 88 0b e7 63 66  25 3e 30 8c 0d 3b 92 17  |".;...cf%>0..;..|
00006ce0  e7 62 66 25 3c 30 8c 62  66 25 3d a4 67 66 28 22  |.bf%<0.bf%=.gf("|
00006cf0  7e 22 29 0d 3b 9c 2c 4b  60 24 28 62 66 25 2c 30  |~").;.,K`$(bf%,0|
00006d00  29 3d 42 24 3a 4b 60 24  28 62 66 25 2c 31 29 3d  |)=B$:K`$(bf%,1)=|
00006d10  61 24 3a 4c 60 25 28 62  66 25 29 3d 63 66 25 0d  |a$:L`%(bf%)=cf%.|
00006d20  3b a6 05 cc 0d 3b b0 17  e7 61 66 25 3e 3d 30 8c  |;....;...af%>=0.|
00006d30  79 5f 24 28 61 66 25 29  3d 42 24 0d 3b ba 17 e7  |y_$(af%)=B$.;...|
00006d40  64 66 25 3e 3d 30 8c 4f  60 24 28 64 66 25 29 3d  |df%>=0.O`$(df%)=|
00006d50  42 24 0d 3b c4 05 cd 0d  3b ce 05 e1 0d 3b e2 0c  |B$.;....;....;..|
00006d60  dd a4 67 66 28 41 24 29  0d 3b ec 0c ea 61 25 3a  |..gf(A$).;...a%:|
00006d70  61 25 3d 30 0d 3b f6 2a  f5 61 25 2b 3d 31 3a fd  |a%=0.;.*.a%+=1:.|
00006d80  4b 60 24 28 61 25 2c 30  29 3d 22 22 84 4d 60 24  |K`$(a%,0)="".M`$|
00006d90  28 61 25 29 3d 41 24 84  61 25 3d 4a 60 25 0d 3c  |(a%)=A$.a%=J`%.<|
00006da0  00 21 e7 61 25 3d 4a 60  25 8c f2 72 62 28 a4 51  |.!.a%=J`%..rb(.Q|
00006db0  5f 28 22 45 61 6c 61 72  6d 22 29 29 3a 3d 30 0d  |_("Ealarm")):=0.|
00006dc0  3c 0a 07 3d 61 25 0d 3c  1e 16 dd a4 63 63 28 41  |<..=a%.<....cc(A|
00006dd0  25 29 3a 3d 2d 28 41 25  3c 3e 30 29 0d 3c 32 0c  |%):=-(A%<>0).<2.|
00006de0  dd f2 68 66 28 43 24 29  0d 3c 3c 0c ea 61 25 3a  |..hf(C$).<<..a%:|
00006df0  61 25 3d 30 0d 3c 46 1d  f5 61 25 2b 3d 31 3a fd  |a%=0.<F..a%+=1:.|
00006e00  4d 60 24 28 61 25 29 3d  43 24 84 61 25 3d 4a 60  |M`$(a%)=C$.a%=J`|
00006e10  25 0d 3c 50 33 e7 4d 60  24 28 61 25 29 3d 43 24  |%.<P3.M`$(a%)=C$|
00006e20  8c 4b 60 24 28 61 25 2c  30 29 3d 22 22 3a f2 5a  |.K`$(a%,0)="":.Z|
00006e30  62 28 a4 61 62 28 22 41  63 61 6e 63 65 6c 22 2c  |b(.ab("Acancel",|
00006e40  43 24 29 29 0d 3c 5a 05  e1 0d 3c 6e 0c dd a4 65  |C$)).<Z...<n...e|
00006e50  66 28 43 24 29 0d 3c 78  35 ea 6c 25 2c 6d 25 2c  |f(C$).<x5.l%,m%,|
00006e60  69 66 25 2c 6a 66 25 2c  6b 66 25 2c 6c 66 25 2c  |if%,jf%,kf%,lf%,|
00006e70  72 25 2c 5a 66 25 2c 6d  66 25 2c 6e 66 25 2c 6f  |r%,Zf%,mf%,nf%,o|
00006e80  66 25 2c 73 63 25 2c 70  66 25 0d 3c 82 25 e7 c0  |f%,sc%,pf%.<.%..|
00006e90  43 24 2c 31 29 3d 22 2b  22 8c 6c 66 25 3d b9 3a  |C$,1)="+".lf%=.:|
00006ea0  43 24 3d c1 43 24 2c 32  29 8b 6c 66 25 3d a3 0d  |C$=.C$,2).lf%=..|
00006eb0  3c 8c 16 6c 25 3d a7 43  24 2c 22 3a 22 29 3a e7  |<..l%=.C$,":"):.|
00006ec0  6c 25 3e 30 8c 0d 3c 96  1b 6d 25 3d a7 43 24 2c  |l%>0..<..m%=.C$,|
00006ed0  22 3a 22 2c 6c 25 2b 31  29 3a e7 6d 25 3e 30 8c  |":",l%+1):.m%>0.|
00006ee0  0d 3c a0 12 69 66 25 3d  bb c0 43 24 2c 6c 25 2d  |.<..if%=..C$,l%-|
00006ef0  31 29 0d 3c aa 17 6a 66  25 3d bb c1 43 24 2c 6c  |1).<..jf%=..C$,l|
00006f00  25 2b 31 2c 6d 25 2d 31  29 0d 3c b4 17 6b 66 25  |%+1,m%-1).<..kf%|
00006f10  3d bb c1 43 24 2c 6d 25  2b 31 2c 6d 25 2b 33 29  |=..C$,m%+1,m%+3)|
00006f20  0d 3c be 05 cc 0d 3c c8  09 e7 6c 66 25 8c 0d 3c  |.<....<...lf%..<|
00006f30  d2 2c 69 66 25 3d 30 3a  6a 66 25 3d bb c0 43 24  |.,if%=0:jf%=..C$|
00006f40  2c 6c 25 2d 31 29 3a 6b  66 25 3d bb c1 43 24 2c  |,l%-1):kf%=..C$,|
00006f50  6c 25 2b 31 2c 6c 25 2b  33 29 0d 3c dc 05 cc 0d  |l%+1,l%+3).<....|
00006f60  3c e6 2c 6b 66 25 3d 30  3a 69 66 25 3d bb c0 43  |<.,kf%=0:if%=..C|
00006f70  24 2c 6c 25 2d 31 29 3a  6a 66 25 3d bb c1 43 24  |$,l%-1):jf%=..C$|
00006f80  2c 6c 25 2b 31 2c 6c 25  2b 33 29 0d 3c f0 05 cd  |,l%+1,l%+3).<...|
00006f90  0d 3c fa 05 cd 0d 3d 04  05 cc 0d 3d 0e 38 e7 6c  |.<....=....=.8.l|
00006fa0  66 25 8c 69 66 25 3d 30  3a 6a 66 25 3d 30 3a 6b  |f%.if%=0:jf%=0:k|
00006fb0  66 25 3d bb c0 43 24 2c  32 29 8b 6b 66 25 3d 30  |f%=..C$,2).kf%=0|
00006fc0  3a 6a 66 25 3d 30 3a 69  66 25 3d bb c0 43 24 2c  |:jf%=0:if%=..C$,|
00006fd0  32 29 0d 3d 18 05 cd 0d  3d 22 0c c8 99 36 36 b8  |2).=....="...66.|
00006fe0  5a 66 25 0d 3d 2c 09 e7  6c 66 25 8c 0d 3d 36 26  |Zf%.=,..lf%..=6&|
00006ff0  72 25 3d 5a 66 25 2b 31  30 30 2a 6b 66 25 2b 36  |r%=Zf%+100*kf%+6|
00007000  30 30 30 2a 6a 66 25 2b  33 36 30 30 30 30 2a 69  |000*jf%+360000*i|
00007010  66 25 0d 3d 40 05 cc 0d  3d 4a 13 3f 71 25 3d 33  |f%.=@...=J.?q%=3|
00007020  3a c8 99 37 2c 31 34 2c  71 25 0d 3d 54 32 c8 99  |:..7,14,q%.=T2..|
00007030  31 39 33 2c 71 25 2c 61  5f 25 2c 32 35 36 2c 22  |193,q%,a_%,256,"|
00007040  25 32 34 25 4d 49 25 53  45 22 b8 6c 25 2c 6d 25  |%24%MI%SE".l%,m%|
00007050  3a 5a 66 24 3d a4 55 62  28 6c 25 29 0d 3d 5e 2c  |:Zf$=.Ub(l%).=^,|
00007060  6d 66 25 3d bb c0 5a 66  24 2c 32 29 3a 6e 66 25  |mf%=..Zf$,2):nf%|
00007070  3d bb c1 5a 66 24 2c 33  2c 32 29 3a 6f 66 25 3d  |=..Zf$,3,2):of%=|
00007080  bb c2 5a 66 24 2c 32 29  0d 3d 68 1b 70 66 25 3d  |..Zf$,2).=h.pf%=|
00007090  6f 66 25 2b 6e 66 25 2a  36 30 2b 6d 66 25 2a 33  |of%+nf%*60+mf%*3|
000070a0  36 30 30 0d 3d 72 38 73  63 25 3d 28 6b 66 25 2b  |600.=r8sc%=(kf%+|
000070b0  6a 66 25 2a 36 30 2b 69  66 25 2a 33 36 30 30 29  |jf%*60+if%*3600)|
000070c0  2d 70 66 25 3a c8 95 73  63 25 3c 30 3a 73 63 25  |-pf%:..sc%<0:sc%|
000070d0  2b 3d 32 34 2a 33 36 30  30 3a ce 0d 3d 7c 12 72  |+=24*3600:..=|.r|
000070e0  25 3d 5a 66 25 2b 73 63  25 2a 31 30 30 0d 3d 86  |%=Zf%+sc%*100.=.|
000070f0  05 cd 0d 3d 90 07 3d 72  25 0d 3d a4 08 dd f2 4d  |...=..=r%.=....M|
00007100  62 0d 3d ae 0c ea 63 25  3a 63 25 3d 30 0d 3d b8  |b.=...c%:c%=0.=.|
00007110  0a f5 63 25 2b 3d 31 0d  3d c2 1e e7 4b 60 24 28  |..c%+=1.=...K`$(|
00007120  63 25 2c 30 29 3e 22 22  80 66 61 25 3e 4c 60 25  |c%,0)>"".fa%>L`%|
00007130  28 63 25 29 8c 0d 3d cc  1e 74 64 24 3d 4b 60 24  |(c%)..=..td$=K`$|
00007140  28 63 25 2c 30 29 3a 4b  60 24 28 63 25 2c 30 29  |(c%,0):K`$(c%,0)|
00007150  3d 22 22 0d 3d d6 2b e7  a7 4b 60 24 28 63 25 2c  |="".=.+..K`$(c%,|
00007160  31 29 2c 22 2f 72 65 70  65 61 74 22 29 3e 30 8c  |1),"/repeat")>0.|
00007170  f2 4b 60 28 4b 60 24 28  63 25 2c 31 29 29 0d 3d  |.K`(K`$(c%,1)).=|
00007180  e0 0e f2 52 62 28 74 64  24 2c 31 29 0d 3d ea 05  |...Rb(td$,1).=..|
00007190  cd 0d 3d f4 0b fd 63 25  3d 4a 60 25 0d 3d fe 0b  |..=...c%=J`%.=..|
000071a0  67 61 25 3d 66 61 25 0d  3e 08 05 e1 0d 3e 1c 08  |ga%=fa%.>....>..|
000071b0  dd f2 4b 62 0d 3e 26 0b  ea 71 66 25 2c 4a 25 0d  |..Kb.>&..qf%,J%.|
000071c0  3e 30 09 e7 6c 5f 25 8c  0d 3e 3a 14 4a 25 3d a4  |>0..l_%..>:.J%=.|
000071d0  64 28 39 2c 75 61 25 2c  30 2c 30 29 0d 3e 44 0d  |d(9,ua%,0,0).>D.|
000071e0  e7 4a 25 3c 3e 6d 5f 25  8c 0d 3e 4e 20 6d 5f 25  |.J%<>m_%..>N m_%|
000071f0  3d 4a 25 3a e7 28 4a 25  80 31 29 8c 74 24 3d 22  |=J%:.(J%.1).t$="|
00007200  8f 22 8b 74 24 3d 22 20  22 0d 3e 58 1b e7 28 4a  |.".t$=" ".>X..(J|
00007210  25 80 32 29 8c 74 24 2b  3d 22 8f 22 8b 74 24 2b  |%.2).t$+=".".t$+|
00007220  3d 22 20 22 0d 3e 62 1b  e7 28 4a 25 80 38 29 8c  |=" ".>b..(J%.8).|
00007230  74 24 2b 3d 22 8f 22 8b  74 24 2b 3d 22 20 22 0d  |t$+=".".t$+=" ".|
00007240  3e 6c 12 f2 5f 61 28 53  61 25 2c 31 30 2c 74 24  |>l.._a(Sa%,10,t$|
00007250  29 0d 3e 76 05 cd 0d 3e  80 0c e3 71 66 25 3d 30  |).>v...>...qf%=0|
00007260  b8 33 0d 3e 8a 43 e7 79  5f 24 28 71 66 25 29 3e  |.3.>.C.y_$(qf%)>|
00007270  22 22 80 28 4a 25 80 28  31 3c 3c 71 66 25 29 29  |"".(J%.(1<<qf%))|
00007280  3d 79 5f 25 28 71 66 25  29 8c f2 52 62 28 79 5f  |=y_%(qf%)..Rb(y_|
00007290  24 28 71 66 25 29 2c 32  29 3a 79 5f 24 28 71 66  |$(qf%),2):y_$(qf|
000072a0  25 29 3d 22 22 0d 3e 94  08 ed 71 66 25 0d 3e 9e  |%)="".>...qf%.>.|
000072b0  05 cc 0d 3e a8 1f e7 6d  5f 25 3e 30 8c 6d 5f 25  |...>...m_%>0.m_%|
000072c0  3d 30 3a f2 5f 61 28 53  61 25 2c 31 35 2c 22 22  |=0:._a(Sa%,15,""|
000072d0  29 0d 3e b2 05 cd 0d 3e  bc 05 e1 0d 3e d0 0c dd  |).>....>....>...|
000072e0  f2 67 65 28 41 24 29 0d  3e da 0a ea 42 24 2c 43  |.ge(A$).>...B$,C|
000072f0  24 0d 3e e4 19 42 24 3d  a4 77 62 28 41 24 29 3a  |$.>..B$=.wb(A$):|
00007300  43 24 3d a4 78 62 28 42  24 29 0d 3e ee 0d c8 8e  |C$=.xb(B$).>....|
00007310  c0 42 24 2c 32 29 ca 0d  3e f8 0d c9 22 61 6c 22  |.B$,2)..>..."al"|
00007320  3a f2 52 63 0d 3f 02 0d  c9 22 6d 65 22 3a f2 53  |:.Rc.?..."me":.S|
00007330  63 0d 3f 0c 0d c9 22 74  61 22 3a f2 54 63 0d 3f  |c.?..."ta":.Tc.?|
00007340  16 0d c9 22 76 61 22 3a  f2 55 63 0d 3f 20 11 c9  |..."va":.Uc.? ..|
00007350  22 73 63 22 3a f2 56 63  28 41 24 29 0d 3f 2a 0d  |"sc":.Vc(A$).?*.|
00007360  c9 22 66 69 22 3a f2 72  66 0d 3f 34 0d c9 22 6a  |."fi":.rf.?4.."j|
00007370  75 22 3a f2 73 66 0d 3f  3e 05 cb 0d 3f 48 05 e1  |u":.sf.?>...?H..|
00007380  0d 3f 5c 08 dd f2 52 63  0d 3f 66 0d ea 63 25 2c  |.?\...Rc.?f..c%,|
00007390  41 25 2c 41 24 0d 3f 70  2e f2 50 5f 28 a4 51 5f  |A%,A$.?p..P_(.Q_|
000073a0  28 22 43 6f 6e 64 69 74  69 6f 6e 22 29 2b 22 20  |("Condition")+" |
000073b0  20 20 20 22 2b a4 51 5f  28 22 41 63 74 69 6f 6e  |   "+.Q_("Action|
000073c0  22 29 29 0d 3f 7a 0d e3  63 25 3d 30 b8 4a 60 25  |")).?z..c%=0.J`%|
000073d0  0d 3f 84 12 e7 4b 60 24  28 63 25 2c 30 29 3e 22  |.?...K`$(c%,0)>"|
000073e0  22 8c 0d 3f 8e 18 41 25  3d 28 4c 60 25 28 63 25  |"..?..A%=(L`%(c%|
000073f0  29 2d 66 61 25 29 81 31  30 30 0d 3f 98 23 41 24  |)-fa%).100.?.#A$|
00007400  3d 22 74 2b 22 2b c2 22  30 30 22 2b c3 28 41 25  |="t+"+."00"+.(A%|
00007410  81 33 36 30 30 29 2c 32  29 2b 22 3a 22 0d 3f a2  |.3600),2)+":".?.|
00007420  24 41 24 2b 3d c2 22 30  30 22 2b c3 28 28 41 25  |$A$+=."00"+.((A%|
00007430  83 33 36 30 30 29 81 36  30 29 2c 32 29 2b 22 3a  |.3600).60),2)+":|
00007440  22 0d 3f ac 19 41 24 2b  3d c2 22 30 30 22 2b c3  |".?..A$+=."00"+.|
00007450  28 41 25 83 36 30 29 2c  32 29 0d 3f b6 26 f2 74  |(A%.60),2).?.&.t|
00007460  66 28 41 24 2c 4b 60 24  28 63 25 2c 31 29 2b 22  |f(A$,K`$(c%,1)+"|
00007470  20 28 22 2b 4d 60 24 28  63 25 29 2b 22 29 22 29  | ("+M`$(c%)+")")|
00007480  0d 3f c0 05 cd 0d 3f ca  05 ed 0d 3f d4 0d e3 63  |.?....?....?...c|
00007490  25 3d 30 b8 4e 60 25 0d  3f de 3b e7 50 60 24 28  |%=0.N`%.?.;.P`$(|
000074a0  63 25 29 3e 22 22 8c f2  74 66 28 a4 51 5f 28 22  |c%)>""..tf(.Q_("|
000074b0  49 63 6c 69 63 6b 22 29  2c 50 60 24 28 63 25 29  |Iclick"),P`$(c%)|
000074c0  2b 22 20 28 22 2b 52 60  24 28 63 25 29 2b 22 29  |+" ("+R`$(c%)+")|
000074d0  22 29 0d 3f e8 3a e7 4f  60 24 28 63 25 29 3e 22  |").?.:.O`$(c%)>"|
000074e0  22 8c f2 74 66 28 a4 51  5f 28 22 49 66 69 6c 65  |"..tf(.Q_("Ifile|
000074f0  22 29 2c 4f 60 24 28 63  25 29 2b 22 20 28 22 2b  |"),O`$(c%)+" ("+|
00007500  52 60 24 28 63 25 29 2b  22 29 22 29 0d 3f f2 05  |R`$(c%)+")").?..|
00007510  ed 0d 3f fc 13 f2 74 66  28 22 73 74 6f 70 22 2c  |..?...tf("stop",|
00007520  69 5f 24 29 0d 40 06 31  e7 79 5f 24 28 30 29 3e  |i_$).@.1.y_$(0)>|
00007530  22 22 8c f2 74 66 28 22  44 54 52 22 2b 22 20 28  |""..tf("DTR"+" (|
00007540  22 2b c3 79 5f 25 28 30  29 2b 22 29 22 2c 79 5f  |"+.y_%(0)+")",y_|
00007550  24 28 30 29 29 0d 40 10  31 e7 79 5f 24 28 31 29  |$(0)).@.1.y_$(1)|
00007560  3e 22 22 8c f2 74 66 28  22 44 53 52 22 2b 22 20  |>""..tf("DSR"+" |
00007570  28 22 2b c3 79 5f 25 28  31 29 2b 22 29 22 2c 79  |("+.y_%(1)+")",y|
00007580  5f 24 28 31 29 29 0d 40  1a 31 e7 79 5f 24 28 32  |_$(1)).@.1.y_$(2|
00007590  29 3e 22 22 8c f2 74 66  28 22 52 4e 47 22 2b 22  |)>""..tf("RNG"+"|
000075a0  20 28 22 2b c3 79 5f 25  28 32 29 2b 22 29 22 2c  | ("+.y_%(2)+")",|
000075b0  79 5f 24 28 32 29 29 0d  40 24 31 e7 79 5f 24 28  |y_$(2)).@$1.y_$(|
000075c0  33 29 3e 22 22 8c f2 74  66 28 22 44 43 44 22 2b  |3)>""..tf("DCD"+|
000075d0  22 20 28 22 2b c3 79 5f  25 28 33 29 2b 22 29 22  |" ("+.y_%(3)+")"|
000075e0  2c 79 5f 24 28 33 29 29  0d 40 2e 05 e1 0d 40 42  |,y_$(3)).@....@B|
000075f0  0f dd f2 74 66 28 41 24  2c 42 24 29 0d 40 4c 26  |...tf(A$,B$).@L&|
00007600  e7 42 24 3e 22 22 8c f2  50 5f 28 22 20 22 2b 41  |.B$>""..P_(" "+A|
00007610  24 2b c4 31 33 2d a9 41  24 2c 22 20 22 29 2b 42  |$+.13-.A$," ")+B|
00007620  24 29 0d 40 56 05 e1 0d  40 6a 0c dd a4 68 65 28  |$).@V...@j...he(|
00007630  41 24 29 0d 40 74 18 ea  72 25 2c 75 66 24 2c 76  |A$).@t..r%,uf$,v|
00007640  66 24 2c 73 24 2c 42 24  2c 43 24 0d 40 7e 17 75  |f$,s$,B$,C$.@~.u|
00007650  66 24 3d 22 22 3a 76 66  24 3d 22 22 3a 73 24 3d  |f$="":vf$="":s$=|
00007660  22 22 0d 40 88 05 f5 0d  40 92 0e 42 24 3d a4 77  |"".@....@..B$=.w|
00007670  62 28 41 24 29 0d 40 9c  10 e7 c0 42 24 2c 31 29  |b(A$).@....B$,1)|
00007680  3d 22 2f 22 8c 0d 40 a6  0e 43 24 3d a4 78 62 28  |="/"..@..C$=.xb(|
00007690  42 24 29 0d 40 b0 0d c8  8e c0 42 24 2c 32 29 ca  |B$).@.....B$,2).|
000076a0  0d 40 ba 14 c9 22 66 69  22 3a 72 25 3d a4 44 61  |.@..."fi":r%=.Da|
000076b0  28 43 24 29 0d 40 c4 17  c9 22 69 64 22 2c 22 6e  |(C$).@..."id","n|
000076c0  61 6d 65 22 3a 75 66 24  3d 43 24 0d 40 ce 10 c9  |ame":uf$=C$.@...|
000076d0  22 61 63 22 3a 76 66 24  3d 43 24 0d 40 d8 19 c9  |"ac":vf$=C$.@...|
000076e0  22 63 61 22 2c 22 64 65  22 3a 72 25 3d a4 77 66  |"ca","de":r%=.wf|
000076f0  28 43 24 29 0d 40 e2 10  c9 22 66 72 22 3a 72 25  |(C$).@..."fr":r%|
00007700  3d a4 71 61 0d 40 ec 05  cb 0d 40 f6 05 cc 0d 41  |=.qa.@....@....A|
00007710  00 09 73 24 3d 42 24 0d  41 0a 05 cd 0d 41 14 0a  |..s$=B$.A....A..|
00007720  fd 41 24 3d 22 22 0d 41  1e 24 e7 75 66 24 3e 22  |.A$="".A.$.uf$>"|
00007730  22 80 73 24 3e 22 22 8c  72 25 3d a4 78 66 28 73  |".s$>"".r%=.xf(s|
00007740  24 2c 75 66 24 2c 76 66  24 29 0d 41 28 07 3d 72  |$,uf$,vf$).A(.=r|
00007750  25 0d 41 3c 0c dd a4 66  66 28 41 24 29 0d 41 46  |%.A<...ff(A$).AF|
00007760  0c ea 61 25 3a 61 25 3d  30 0d 41 50 1d f5 61 25  |..a%:a%=0.AP..a%|
00007770  2b 3d 31 3a fd 52 60 24  28 61 25 29 3d 41 24 84  |+=1:.R`$(a%)=A$.|
00007780  61 25 3d 4e 60 25 0d 41  5a 28 e7 61 25 3d 4e 60  |a%=N`%.AZ(.a%=N`|
00007790  25 84 41 24 3d 22 22 8c  f2 5a 62 28 a4 51 5f 28  |%.A$=""..Zb(.Q_(|
000077a0  22 45 69 63 6f 6e 31 22  29 29 3a 3d 2d 31 0d 41  |"Eicon1")):=-1.A|
000077b0  64 07 3d 61 25 0d 41 78  0c dd a4 79 66 28 41 24  |d.=a%.Ax...yf(A$|
000077c0  29 0d 41 82 0c ea 61 25  3a 61 25 3d 30 0d 41 8c  |).A...a%:a%=0.A.|
000077d0  27 f5 61 25 2b 3d 31 3a  fd 52 60 24 28 61 25 29  |'.a%+=1:.R`$(a%)|
000077e0  3d 41 24 84 50 60 25 28  61 25 29 3d 30 84 61 25  |=A$.P`%(a%)=0.a%|
000077f0  3d 4e 60 25 0d 41 96 28  e7 61 25 3d 4e 60 25 84  |=N`%.A.(.a%=N`%.|
00007800  41 24 3d 22 22 8c f2 5a  62 28 a4 51 5f 28 22 45  |A$=""..Zb(.Q_("E|
00007810  69 63 6f 6e 31 22 29 29  3a 3d 2d 31 0d 41 a0 07  |icon1")):=-1.A..|
00007820  3d 61 25 0d 41 b4 14 dd  a4 78 66 28 41 24 2c 75  |=a%.A....xf(A$,u|
00007830  66 24 2c 76 66 24 29 0d  41 be 0a ea 61 25 2c 5a  |f$,vf$).A...a%,Z|
00007840  25 0d 41 c8 0f 61 25 3d  a4 79 66 28 75 66 24 29  |%.A..a%=.yf(uf$)|
00007850  0d 41 d2 0c e7 61 25 3c  30 8c 3d 30 0d 41 dc 0b  |.A...a%<0.=0.A..|
00007860  e7 41 24 3e 22 22 8c 0d  41 e6 1c e7 52 60 24 28  |.A$>""..A...R`$(|
00007870  61 25 29 3d 75 66 24 8c  5a 25 3d a4 77 66 28 75  |a%)=uf$.Z%=.wf(u|
00007880  66 24 29 0d 41 f0 1a f2  5a 62 28 22 41 64 64 69  |f$).A...Zb("Addi|
00007890  6e 67 20 69 63 6f 6e 20  22 2b 41 24 29 0d 41 fa  |ng icon "+A$).A.|
000078a0  22 50 60 25 28 61 25 29  3d a4 63 61 28 41 24 2c  |"P`%(a%)=.ca(A$,|
000078b0  61 25 29 3a 52 60 24 28  61 25 29 3d 75 66 24 0d  |a%):R`$(a%)=uf$.|
000078c0  42 04 05 cd 0d 42 0e 0f  50 60 24 28 61 25 29 3d  |B....B..P`$(a%)=|
000078d0  76 66 24 0d 42 18 11 3d  a4 63 63 28 50 60 25 28  |vf$.B..=.cc(P`%(|
000078e0  61 25 29 29 0d 42 2c 0c  dd a4 77 66 28 41 24 29  |a%)).B,...wf(A$)|
000078f0  0d 42 36 07 ea 61 25 0d  42 40 0e 61 25 3d a4 66  |.B6..a%.B@.a%=.f|
00007900  66 28 41 24 29 0d 42 4a  1f e7 61 25 3c 30 8c f2  |f(A$).BJ..a%<0..|
00007910  5a 62 28 a4 51 5f 28 22  45 69 63 6f 6e 31 22 29  |Zb(.Q_("Eicon1")|
00007920  29 3a 3d 30 0d 42 54 24  e7 50 60 25 28 61 25 29  |):=0.BT$.P`%(a%)|
00007930  3c 31 8c f2 5a 62 28 a4  51 5f 28 22 45 69 63 6f  |<1..Zb(.Q_("Eico|
00007940  6e 32 22 29 29 3a 3d 30  0d 42 5e 2b 21 4f 61 25  |n2")):=0.B^+!Oa%|
00007950  3d 2d 32 3a 4f 61 25 21  34 3d 50 60 25 28 61 25  |=-2:Oa%!4=P`%(a%|
00007960  29 3a c8 99 33 39 33 34  31 32 2c 2c 4f 61 25 b8  |):..393412,,Oa%.|
00007970  3b 46 25 0d 42 68 18 50  60 25 28 61 25 29 3d 30  |;F%.Bh.P`%(a%)=0|
00007980  3a 52 60 24 28 61 25 29  3d 22 22 0d 42 72 0c 3d  |:R`$(a%)="".Br.=|
00007990  a4 63 63 28 46 25 29 0d  42 86 13 dd f2 4f 60 28  |.cc(F%).B....O`(|
000079a0  5a 25 2c 66 24 2c 7a 66  25 29 0d 42 90 27 f2 5a  |Z%,f$,zf%).B.'.Z|
000079b0  61 28 22 24 74 79 70 65  22 2c c3 7e 7a 66 25 29  |a("$type",.~zf%)|
000079c0  3a f2 5a 61 28 22 24 66  69 6c 65 22 2c 2b 66 24  |:.Za("$file",+f$|
000079d0  29 0d 42 9a 12 f2 52 62  28 4f 60 24 28 5a 25 29  |).B...Rb(O`$(Z%)|
000079e0  2c 37 29 0d 42 a4 05 e1  0d 42 b8 0c dd f2 4a 65  |,7).B....B....Je|
000079f0  28 41 24 29 0d 42 c2 10  ea 6c 25 2c 6d 25 2c 42  |(A$).B...l%,m%,B|
00007a00  24 2c 43 24 0d 42 cc 19  42 24 3d a4 77 62 28 41  |$,C$.B..B$=.wb(A|
00007a10  24 29 3a 43 24 3d a4 77  62 28 41 24 29 0d 42 d6  |$):C$=.wb(A$).B.|
00007a20  0e f2 5a 61 28 42 24 2c  43 24 29 0d 42 e0 05 e1  |..Za(B$,C$).B...|
00007a30  0d 42 f4 0f dd f2 5a 61  28 42 24 2c 43 24 29 0d  |.B....Za(B$,C$).|
00007a40  42 fe 1a ea 6c 25 2c 70  25 3a 70 25 3d 2d 31 3a  |B...l%,p%:p%=-1:|
00007a50  e3 6c 25 3d 30 b8 45 60  25 0d 43 08 47 e7 46 60  |.l%=0.E`%.C.G.F`|
00007a60  24 28 6c 25 2c 30 29 3d  42 24 84 46 60 24 28 6c  |$(l%,0)=B$.F`$(l|
00007a70  25 2c 30 29 3d 22 22 8c  46 60 24 28 6c 25 2c 30  |%,0)="".F`$(l%,0|
00007a80  29 3d 42 24 3a 46 60 24  28 6c 25 2c 31 29 3d 43  |)=B$:F`$(l%,1)=C|
00007a90  24 3a 70 25 3d 6c 25 3a  6c 25 3d 45 60 25 2b 31  |$:p%=l%:l%=E`%+1|
00007aa0  0d 43 12 05 ed 0d 43 1c  1b e7 42 24 3d 22 69 70  |.C....C...B$="ip|
00007ab0  61 64 64 72 65 73 73 22  8c f2 54 66 28 43 24 29  |address"..Tf(C$)|
00007ac0  0d 43 26 1b e7 70 25 3d  2d 31 8c f2 72 62 28 a4  |.C&..p%=-1..rb(.|
00007ad0  51 5f 28 22 45 76 61 72  22 29 29 0d 43 30 05 e1  |Q_("Evar")).C0..|
00007ae0  0d 43 44 0c dd f2 4b 65  28 41 24 29 0d 43 4e 0a  |.CD...Ke(A$).CN.|
00007af0  ea 6c 25 2c 42 24 0d 43  58 0e 42 24 3d a4 77 62  |.l%,B$.CX.B$=.wb|
00007b00  28 41 24 29 0d 43 62 0d  e3 6c 25 3d 30 b8 45 60  |(A$).Cb..l%=0.E`|
00007b10  25 0d 43 6c 2b e7 46 60  24 28 6c 25 2c 30 29 3d  |%.Cl+.F`$(l%,0)=|
00007b20  42 24 8c 46 60 24 28 6c  25 2c 30 29 3d 22 22 3a  |B$.F`$(l%,0)="":|
00007b30  46 60 24 28 6c 25 2c 31  29 3d 22 22 0d 43 76 05  |F`$(l%,1)="".Cv.|
00007b40  ed 0d 43 80 22 e7 42 24  3d 22 69 70 61 64 64 72  |..C.".B$="ipaddr|
00007b50  65 73 73 22 8c f2 59 5f  28 22 22 2c 22 22 2c 22  |ess"..Y_("","","|
00007b60  20 22 29 0d 43 8a 05 e1  0d 43 9e 0c dd a4 73 65  | ").C....C....se|
00007b70  28 41 24 29 0d 43 a8 13  ea 6c 25 2c 74 24 2c 42  |(A$).C...l%,t$,B|
00007b80  24 3a 74 24 3d 22 22 0d  43 b2 0e 42 24 3d a4 77  |$:t$="".C..B$=.w|
00007b90  62 28 41 24 29 0d 43 bc  0d e3 6c 25 3d 30 b8 45  |b(A$).C...l%=0.E|
00007ba0  60 25 0d 43 c6 25 e7 46  60 24 28 6c 25 2c 30 29  |`%.C.%.F`$(l%,0)|
00007bb0  3d 42 24 8c 74 24 3d 46  60 24 28 6c 25 2c 31 29  |=B$.t$=F`$(l%,1)|
00007bc0  3a 6c 25 3d 45 60 25 0d  43 d0 05 ed 0d 43 da 07  |:l%=E`%.C....C..|
00007bd0  3d 74 24 0d 43 ee 08 dd  f2 55 63 0d 43 f8 07 ea  |=t$.C....Uc.C...|
00007be0  63 25 0d 44 02 2e f2 50  5f 28 a4 51 5f 28 22 56  |c%.D...P_(.Q_("V|
00007bf0  61 72 69 61 62 6c 65 22  29 2b 22 20 20 20 20 20  |ariable")+"     |
00007c00  20 22 2b a4 51 5f 28 22  56 61 6c 75 65 22 29 29  | "+.Q_("Value"))|
00007c10  0d 44 0c 0d e3 63 25 3d  30 b8 45 60 25 0d 44 16  |.D...c%=0.E`%.D.|
00007c20  2a e7 46 60 24 28 63 25  2c 30 29 3e 22 22 8c f2  |*.F`$(c%,0)>""..|
00007c30  74 66 28 46 60 24 28 63  25 2c 30 29 2c 46 60 24  |tf(F`$(c%,0),F`$|
00007c40  28 63 25 2c 31 29 29 0d  44 20 05 ed 0d 44 2a 05  |(c%,1)).D ...D*.|
00007c50  e1 0d 44 3e 08 dd a4 72  65 0d 44 48 07 ea 4a 25  |..D>...re.DH..J%|
00007c60  0d 44 52 0d e7 6c 5f 25  3d 30 8c 3d 30 0d 44 5c  |.DR..l_%=0.=0.D\|
00007c70  1d f2 59 5f 28 22 22 2c  a4 51 5f 28 22 44 65 76  |..Y_("",.Q_("Dev|
00007c80  44 72 6f 70 22 29 2c 22  22 29 0d 44 66 14 4a 25  |Drop"),"").Df.J%|
00007c90  3d a4 64 28 38 2c 75 61  25 2c 30 2c 30 29 0d 44  |=.d(8,ua%,0,0).D|
00007ca0  70 0c f2 41 62 28 31 30  30 29 0d 44 7a 14 4a 25  |p..Ab(100).Dz.J%|
00007cb0  3d a4 64 28 38 2c 75 61  25 2c 33 2c 30 29 0d 44  |=.d(8,ua%,3,0).D|
00007cc0  84 06 3d 31 0d 44 98 11  dd f2 4f 65 28 41 24 2c  |..=1.D....Oe(A$,|
00007cd0  f8 4f 5f 25 29 0d 44 a2  0f ea 6c 25 2c 76 65 25  |.O_%).D...l%,ve%|
00007ce0  2c 55 66 24 0d 44 ac 1b  6c 25 3d 30 3a 76 65 25  |,Uf$.D..l%=0:ve%|
00007cf0  3d 2d 31 3a 55 66 24 3d  a4 77 62 28 41 24 29 0d  |=-1:Uf$=.wb(A$).|
00007d00  44 b6 05 f5 0d 44 c0 23  e7 43 60 24 28 6c 25 29  |D....D.#.C`$(l%)|
00007d10  3d 55 66 24 8c 76 65 25  3d 43 60 25 28 6c 25 29  |=Uf$.ve%=C`%(l%)|
00007d20  3a 6c 25 3d 44 60 25 0d  44 ca 12 6c 25 2b 3d 31  |:l%=D`%.D..l%+=1|
00007d30  3a fd 6c 25 3e 3d 44 60  25 0d 44 d4 23 e7 76 65  |:.l%>=D`%.D.#.ve|
00007d40  25 3c 30 8c f2 72 62 28  a4 61 62 28 22 45 6c 61  |%<0..rb(.ab("Ela|
00007d50  62 65 6c 22 2c 55 66 24  29 29 3a e1 0d 44 de 0b  |bel",Uf$)):..D..|
00007d60  4f 5f 25 3d 76 65 25 0d  44 e8 05 e1 0d 44 fc 11  |O_%=ve%.D....D..|
00007d70  dd f2 50 65 28 41 24 2c  f8 4f 5f 25 29 0d 45 06  |..Pe(A$,.O_%).E.|
00007d80  12 ea 42 24 2c 70 25 2c  5f 66 25 2c 60 66 25 0d  |..B$,p%,_f%,`f%.|
00007d90  45 10 21 e7 73 62 25 3d  73 5f 25 8c f2 72 62 28  |E.!.sb%=s_%..rb(|
00007da0  a4 51 5f 28 22 45 6c 65  76 65 6c 22 29 29 3a e1  |.Q_("Elevel")):.|
00007db0  0d 45 1a 0f 55 66 24 3d  a4 77 62 28 41 24 29 0d  |.E..Uf$=.wb(A$).|
00007dc0  45 24 28 60 66 25 3d a3  3a e7 55 66 24 3d 22 2f  |E$(`f%=.:.Uf$="/|
00007dd0  6c 6f 63 6b 22 8c 60 66  25 3d b9 3a 55 66 24 3d  |lock".`f%=.:Uf$=|
00007de0  a4 77 62 28 41 24 29 0d  45 2e 10 70 25 3d 30 3a  |.wb(A$).E..p%=0:|
00007df0  e7 41 24 3e 22 22 8c 0d  45 38 2c f5 70 25 2b 3d  |.A$>""..E8,.p%+=|
00007e00  31 3a 42 24 3d a4 77 62  28 41 24 29 3a f2 5a 61  |1:B$=.wb(A$):.Za|
00007e10  28 22 70 22 2b c3 70 25  2c 42 24 29 3a fd 41 24  |("p"+.p%,B$):.A$|
00007e20  3d 22 22 0d 45 42 05 cd  0d 45 4c 18 5f 66 25 3d  |="".EB...EL._f%=|
00007e30  4f 5f 25 3a f2 4f 65 28  55 66 24 2c 4f 5f 25 29  |O_%:.Oe(Uf$,O_%)|
00007e40  0d 45 56 09 e7 60 66 25  8c 0d 45 60 38 e3 70 25  |.EV..`f%..E`8.p%|
00007e50  3d 30 b8 73 62 25 3a e7  75 5f 25 28 70 25 29 3d  |=0.sb%:.u_%(p%)=|
00007e60  4f 5f 25 8c 4f 5f 25 3d  5f 66 25 3a f2 50 5f 28  |O_%.O_%=_f%:.P_(|
00007e70  a4 61 62 28 22 45 6c 6f  63 6b 22 2c 55 66 24 29  |.ab("Elock",Uf$)|
00007e80  29 0d 45 6a 05 ed 0d 45  74 05 cd 0d 45 7e 0e e7  |).Ej...Et...E~..|
00007e90  4f 5f 25 3c 3e 5f 66 25  8c 0d 45 88 17 73 62 25  |O_%<>_f%..E..sb%|
00007ea0  2b 3d 31 3a 74 5f 25 28  73 62 25 29 3d 5f 66 25  |+=1:t_%(sb%)=_f%|
00007eb0  0d 45 92 15 e7 60 66 25  8c 75 5f 25 28 73 62 25  |.E...`f%.u_%(sb%|
00007ec0  29 3d 4f 5f 25 0d 45 9c  05 cd 0d 45 a6 05 e1 0d  |)=O_%.E....E....|
00007ed0  45 ba 11 dd a4 55 5f 28  41 24 2c f8 4f 5f 25 29  |E....U_(A$,.O_%)|
00007ee0  0d 45 c4 21 e7 73 62 25  3d 30 8c f2 72 62 28 a4  |.E.!.sb%=0..rb(.|
00007ef0  51 5f 28 22 45 72 65 74  75 72 6e 22 29 29 3a 3d  |Q_("Ereturn")):=|
00007f00  30 0d 45 ce 17 4f 5f 25  3d 74 5f 25 28 73 62 25  |0.E..O_%=t_%(sb%|
00007f10  29 3a 73 62 25 2d 3d 31  0d 45 d8 0a 55 5f 24 3d  |):sb%-=1.E..U_$=|
00007f20  41 24 0d 45 e2 07 3d 2d  31 0d 45 f6 0c dd a4 41  |A$.E..=-1.E....A|
00007f30  67 28 41 24 29 0d 46 00  07 ea 72 25 0d 46 0a 15  |g(A$).F...r%.F..|
00007f40  c8 99 31 33 31 30 38 30  2c 31 37 2c 41 24 b8 72  |..131080,17,A$.r|
00007f50  25 0d 46 14 07 3d 72 25  0d 46 28 0c dd a4 4c 5f  |%.F..=r%.F(...L_|
00007f60  28 41 24 29 0d 46 32 13  ea 72 25 2c 6e 25 2c 6c  |(A$).F2..r%,n%,l|
00007f70  25 2c 42 24 2c 43 24 0d  46 3c 1e 72 25 3d 30 3a  |%,B$,C$.F<.r%=0:|
00007f80  42 24 3d a4 77 62 28 41  24 29 3a 43 24 3d a4 77  |B$=.wb(A$):C$=.w|
00007f90  62 28 41 24 29 0d 46 46  0d c8 8e c0 42 24 2c 33  |b(A$).FF....B$,3|
00007fa0  29 ca 0d 46 50 22 c9 22  2f 73 69 22 3a c8 99 31  |)..FP"."/si":..1|
00007fb0  33 31 30 38 30 2c 32 33  2c 43 24 b8 6e 25 2c 2c  |31080,23,C$.n%,,|
00007fc0  2c 2c 72 25 0d 46 5a 23  c9 22 2f 61 74 22 3a c8  |,,r%.FZ#."/at":.|
00007fd0  99 31 33 31 30 38 30 2c  32 33 2c 43 24 b8 6e 25  |.131080,23,C$.n%|
00007fe0  2c 2c 2c 2c 2c 72 25 0d  46 64 33 c9 22 2f 74 79  |,,,,,r%.Fd3."/ty|
00007ff0  22 3a c8 99 31 33 31 30  38 30 2c 32 33 2c 43 24  |":..131080,23,C$|
00008000  b8 6e 25 2c 2c 2c 2c 2c  2c 72 25 3a 55 5f 24 3d  |.n%,,,,,,r%:U_$=|
00008010  c3 7e 72 25 3a 72 25 3d  2d 31 0d 46 6e 29 c9 22  |.~r%:r%=-1.Fn)."|
00008020  2f 65 78 22 3a 55 5f 24  3d a4 6e 64 28 43 24 29  |/ex":U_$=.nd(C$)|
00008030  3a e7 55 5f 24 3e 22 22  8c 72 25 3d 2d 31 3a 6e  |:.U_$>"".r%=-1:n|
00008040  25 3d 31 0d 46 78 1e c9  22 2f 6c 65 22 3a 55 5f  |%=1.Fx.."/le":U_|
00008050  24 3d a4 6e 64 28 43 24  29 3a 6e 25 3d a9 55 5f  |$=.nd(C$):n%=.U_|
00008060  24 0d 46 82 22 c8 95 6e  25 3e 30 80 c1 55 5f 24  |$.F."..n%>0..U_$|
00008070  2c 6e 25 2c 31 29 3c 3e  22 2e 22 3a 6e 25 2d 3d  |,n%,1)<>".":n%-=|
00008080  31 3a ce 0d 46 8c 1e e7  6e 25 3e 31 8c 55 5f 24  |1:..F...n%>1.U_$|
00008090  3d c1 55 5f 24 2c 6e 25  2b 31 29 3a 72 25 3d 2d  |=.U_$,n%+1):r%=-|
000080a0  31 0d 46 96 1e c9 22 2f  70 61 22 3a 55 5f 24 3d  |1.F..."/pa":U_$=|
000080b0  a4 6e 64 28 43 24 29 3a  6e 25 3d a9 55 5f 24 0d  |.nd(C$):n%=.U_$.|
000080c0  46 a0 22 c8 95 6e 25 3e  30 80 c1 55 5f 24 2c 6e  |F."..n%>0..U_$,n|
000080d0  25 2c 31 29 3c 3e 22 2e  22 3a 6e 25 2d 3d 31 3a  |%,1)<>".":n%-=1:|
000080e0  ce 0d 46 aa 1e e7 6e 25  3e 31 8c 55 5f 24 3d c0  |..F...n%>1.U_$=.|
000080f0  55 5f 24 2c 6e 25 2d 31  29 3a 72 25 3d 2d 31 0d  |U_$,n%-1):r%=-1.|
00008100  46 b4 1d 7f 3a c8 99 31  33 31 30 38 30 2c 32 33  |F...:..131080,23|
00008110  2c 42 24 b8 72 25 3a 6e  25 3d 72 25 0d 46 be 05  |,B$.r%:n%=r%.F..|
00008120  cb 0d 46 c8 0e e7 6e 25  3d 30 8c 72 25 3d 30 0d  |..F...n%=0.r%=0.|
00008130  46 d2 07 3d 72 25 0d 46  e6 0c dd a4 6e 64 28 41  |F..=r%.F....nd(A|
00008140  24 29 0d 46 f0 0d ea 72  24 3a 72 24 3d 22 22 0d  |$).F...r$:r$="".|
00008150  46 fa 27 c8 99 31 33 31  31 31 33 2c 33 37 2c 41  |F.'..131113,37,A|
00008160  24 2c 61 5f 25 2c 2c 2c  32 35 36 b8 2c 2c 2c 2c  |$,a_%,,,256.,,,,|
00008170  2c 72 25 3b 46 25 0d 47  04 1e e7 72 25 3e 30 80  |,r%;F%.G...r%>0.|
00008180  28 46 25 80 31 29 3d 30  8c 72 24 3d a4 55 62 28  |(F%.1)=0.r$=.Ub(|
00008190  61 5f 25 29 0d 47 0e 07  3d 72 24 0d 47 22 0c dd  |a_%).G..=r$.G"..|
000081a0  a4 52 65 28 41 24 29 0d  47 2c 14 ea 55 5f 25 2c  |.Re(A$).G,..U_%,|
000081b0  4a 25 2c 42 24 3a 55 5f  25 3d 30 0d 47 36 14 4a  |J%,B$:U_%=0.G6.J|
000081c0  25 3d a4 64 28 39 2c 75  61 25 2c 30 2c 30 29 0d  |%=.d(9,ua%,0,0).|
000081d0  47 40 0f f5 42 24 3d a4  77 62 28 41 24 29 0d 47  |G@..B$=.wb(A$).G|
000081e0  4a 09 c8 8e 42 24 ca 0d  47 54 1e c9 22 2f 63 74  |J...B$..GT.."/ct|
000081f0  73 22 2c 22 2f 64 74 72  22 3a 55 5f 25 2b 3d 28  |s","/dtr":U_%+=(|
00008200  4a 25 80 31 29 0d 47 5e  17 c9 22 2f 64 73 72 22  |J%.1).G^.."/dsr"|
00008210  3a 55 5f 25 2b 3d 28 4a  25 80 32 29 0d 47 68 17  |:U_%+=(J%.2).Gh.|
00008220  c9 22 2f 72 6e 67 22 3a  55 5f 25 2b 3d 28 4a 25  |."/rng":U_%+=(J%|
00008230  80 34 29 0d 47 72 17 c9  22 2f 64 63 64 22 3a 55  |.4).Gr.."/dcd":U|
00008240  5f 25 2b 3d 28 4a 25 80  38 29 0d 47 7c 1b 7f 3a  |_%+=(J%.8).G|..:|
00008250  f2 72 62 28 a4 51 5f 28  22 45 70 61 72 61 6d 22  |.rb(.Q_("Eparam"|
00008260  29 29 3a 3d 30 0d 47 86  05 cb 0d 47 90 0a fd 41  |)):=0.G....G...A|
00008270  24 3d 22 22 0d 47 9a 08  3d 55 5f 25 0d 47 ae 0c  |$="".G..=U_%.G..|
00008280  dd a4 53 65 28 41 24 29  0d 47 b8 13 ea 6e 25 2c  |..Se(A$).G...n%,|
00008290  66 25 2c 72 25 2c 42 24  2c 43 24 0d 47 c2 19 c8  |f%,r%,B$,C$.G...|
000082a0  99 32 36 32 33 38 30 2c  2d 31 2c 2d 31 b8 2c 6e  |.262380,-1,-1.,n|
000082b0  25 2c 66 25 0d 47 cc 0f  f5 42 24 3d a4 77 62 28  |%,f%.G...B$=.wb(|
000082c0  41 24 29 0d 47 d6 10 e7  c0 42 24 2c 31 29 3d 22  |A$).G....B$,1)="|
000082d0  2f 22 8c 0d 47 e0 0e 43  24 3d a4 78 62 28 42 24  |/"..G..C$=.xb(B$|
000082e0  29 0d 47 ea 0d c8 8e c0  42 24 2c 32 29 ca 0d 47  |).G.....B$,2)..G|
000082f0  f4 12 c9 22 6d 65 22 3a  72 25 3d 6e 25 2b 66 25  |..."me":r%=n%+f%|
00008300  0d 47 fe 0f c9 22 6e 65  22 3a 72 25 3d 6e 25 0d  |.G..."ne":r%=n%.|
00008310  48 08 0f c9 22 66 72 22  3a 72 25 3d 66 25 0d 48  |H..."fr":r%=f%.H|
00008320  12 10 c9 22 69 6e 22 3a  72 25 3d 93 2d e0 0d 48  |..."in":r%=.-..H|
00008330  1c 2e c9 22 64 65 22 3a  c8 99 31 33 31 31 31 33  |..."de":..131113|
00008340  2c 34 39 2c 43 24 b8 72  25 3b 46 25 3a e7 a4 63  |,49,C$.r%;F%:..c|
00008350  63 28 46 25 29 3d 30 8c  72 25 3d 30 0d 48 26 05  |c(F%)=0.r%=0.H&.|
00008360  cb 0d 48 30 05 cc 0d 48  3a 16 e7 42 24 3e 22 22  |..H0...H:..B$>""|
00008370  8c f2 5a 61 28 42 24 2c  c3 72 25 29 0d 48 44 05  |..Za(B$,.r%).HD.|
00008380  cd 0d 48 4e 0a fd 41 24  3d 22 22 0d 48 58 07 3d  |..HN..A$="".HX.=|
00008390  72 25 0d 48 6c 10 dd a4  77 64 28 41 24 2c 42 67  |r%.Hl...wd(A$,Bg|
000083a0  24 29 0d 48 76 1d ea 43  67 24 2c 77 64 24 2c 44  |$).Hv..Cg$,wd$,D|
000083b0  67 25 2c 55 5f 25 2c 6c  25 2c 6d 25 2c 6e 25 0d  |g%,U_%,l%,m%,n%.|
000083c0  48 80 2d 6c 25 3d a7 41  24 2c 22 28 22 29 3a 6d  |H.-l%=.A$,"("):m|
000083d0  25 3d a7 41 24 2c 22 29  22 2c 6c 25 29 3a 6e 25  |%=.A$,")",l%):n%|
000083e0  3d a7 41 24 2c 22 20 22  2c 6d 25 29 0d 48 8a 22  |=.A$," ",m%).H."|
000083f0  e7 6c 25 2a 6d 25 2a 6e  25 3d 30 8c f2 5a 62 28  |.l%*m%*n%=0..Zb(|
00008400  a4 51 5f 28 22 45 69 66  22 29 29 3a 3d 30 0d 48  |.Q_("Eif")):=0.H|
00008410  94 2d 44 67 25 3d a3 3a  43 67 24 3d c1 41 24 2c  |.-Dg%=.:Cg$=.A$,|
00008420  6c 25 2b 31 2c 6d 25 2d  6c 25 2d 31 29 3a 77 64  |l%+1,m%-l%-1):wd|
00008430  24 3d c1 41 24 2c 6e 25  2b 31 29 0d 48 9e 22 e7  |$=.A$,n%+1).H.".|
00008440  c0 43 67 24 2c 31 29 3d  22 21 22 8c 44 67 25 3d  |.Cg$,1)="!".Dg%=|
00008450  b9 3a 43 67 24 3d c1 43  67 24 2c 32 29 0d 48 a8  |.:Cg$=.Cg$,2).H.|
00008460  22 55 5f 25 3d a4 56 5f  28 43 67 24 29 3a e7 44  |"U_%=.V_(Cg$):.D|
00008470  67 25 8c 55 5f 25 3d 2d  28 55 5f 25 3d 30 29 0d  |g%.U_%=-(U_%=0).|
00008480  48 b2 25 e7 55 5f 25 3c  3e 30 80 69 5f 25 3d 30  |H.%.U_%<>0.i_%=0|
00008490  8c 55 5f 25 3d a4 56 5f  28 77 64 24 29 8b 74 64  |.U_%=.V_(wd$).td|
000084a0  24 3d 22 22 0d 48 bc 08  3d 55 5f 25 0d 48 d0 0c  |$="".H..=U_%.H..|
000084b0  dd a4 77 5f 28 41 24 29  0d 48 da 28 45 67 25 2b  |..w_(A$).H.(Eg%+|
000084c0  3d 31 3a e7 45 67 25 3e  76 5f 25 8c f2 72 62 28  |=1:.Eg%>v_%..rb(|
000084d0  a4 51 5f 28 22 45 63 61  73 65 22 29 29 3a 3d 30  |.Q_("Ecase")):=0|
000084e0  0d 48 e4 21 77 5f 24 28  45 67 25 29 3d a4 77 62  |.H.!w_$(Eg%)=.wb|
000084f0  28 41 24 29 3a 78 5f 25  3f 45 67 25 3d 30 3a 3d  |(A$):x_%?Eg%=0:=|
00008500  31 0d 48 f8 10 dd a4 78  64 28 41 24 2c 42 67 24  |1.H....xd(A$,Bg$|
00008510  29 0d 49 02 0f ea 6d 25  2c 42 24 3a 6d 25 3d a3  |).I...m%,B$:m%=.|
00008520  0d 49 0c 1f e7 45 67 25  3d 30 8c f2 72 62 28 a4  |.I...Eg%=0..rb(.|
00008530  51 5f 28 22 45 77 68 65  6e 22 29 29 3a 3d 30 0d  |Q_("Ewhen")):=0.|
00008540  49 16 0f f5 42 24 3d a4  77 62 28 41 24 29 0d 49  |I...B$=.wb(A$).I|
00008550  20 1f e7 42 24 3d 77 5f  24 28 45 67 25 29 8c 6d  | ..B$=w_$(Eg%).m|
00008560  25 3d b9 3a 78 5f 25 3f  45 67 25 3d 31 0d 49 2a  |%=.:x_%?Eg%=1.I*|
00008570  0a fd 41 24 3d 22 22 0d  49 34 10 e7 6d 25 3d a3  |..A$="".I4..m%=.|
00008580  8c 74 64 24 3d 22 22 0d  49 3e 06 3d 30 0d 49 52  |.td$="".I>.=0.IR|
00008590  0d dd f2 79 64 28 42 67  24 29 0d 49 5c 1e e7 45  |...yd(Bg$).I\..E|
000085a0  67 25 3d 30 8c f2 72 62  28 a4 51 5f 28 22 45 77  |g%=0..rb(.Q_("Ew|
000085b0  68 65 6e 22 29 29 3a e1  0d 49 66 15 e7 78 5f 25  |hen")):..If..x_%|
000085c0  3f 45 67 25 3d 31 8c 74  64 24 3d 22 22 0d 49 70  |?Eg%=1.td$="".Ip|
000085d0  05 e1 0d 49 84 08 dd a4  7a 64 0d 49 8e 1f e7 45  |...I....zd.I...E|
000085e0  67 25 3d 30 8c f2 72 62  28 a4 51 5f 28 22 45 77  |g%=0..rb(.Q_("Ew|
000085f0  68 65 6e 22 29 29 3a 3d  30 0d 49 98 0d 45 67 25  |hen")):=0.I..Eg%|
00008600  2d 3d 31 3a 3d 31 0d 49  ac 0f dd a4 4c 65 28 63  |-=1:=1.I....Le(c|
00008610  24 2c 41 24 29 0d 49 b6  1e ea 72 25 2c 6e 25 2c  |$,A$).I...r%,n%,|
00008620  6c 25 2c 63 25 2c 62 24  2c 42 24 2c 43 24 3a 72  |l%,c%,b$,B$,C$:r|
00008630  25 3d 30 0d 49 c0 19 42  24 3d a4 77 62 28 41 24  |%=0.I..B$=.wb(A$|
00008640  29 3a 43 24 3d a4 77 62  28 41 24 29 0d 49 ca 29  |):C$=.wb(A$).I.)|
00008650  62 24 3d 42 24 2b 43 24  3a 6e 25 3d b9 3a e3 6c  |b$=B$+C$:n%=.:.l|
00008660  25 3d 31 b8 a9 62 24 3a  63 25 3d 97 c1 62 24 2c  |%=1..b$:c%=..b$,|
00008670  6c 25 2c 31 29 0d 49 d4  22 e7 63 25 3c 34 36 84  |l%,1).I.".c%<46.|
00008680  63 25 3e 35 37 84 63 25  3d 34 37 8c 6e 25 3d a3  |c%>57.c%=47.n%=.|
00008690  3a 6c 25 3d a9 62 24 0d  49 de 05 ed 0d 49 e8 06  |:l%=.b$.I....I..|
000086a0  ea 85 0d 49 f2 1e ee 85  ea 3a f2 5a 62 28 a4 61  |...I.....:.Zb(.a|
000086b0  62 28 22 45 63 6f 6d 70  22 2c 63 24 29 29 3a e1  |b("Ecomp",c$)):.|
000086c0  0d 49 fc 09 c8 8e 63 24  ca 0d 4a 06 26 c9 22 3f  |.I....c$..J.&."?|
000086d0  65 71 22 3a e7 6e 25 8c  72 25 3d 28 bb 42 24 3d  |eq":.n%.r%=(.B$=|
000086e0  bb 43 24 29 8b 72 25 3d  28 42 24 3d 43 24 29 0d  |.C$).r%=(B$=C$).|
000086f0  4a 10 28 c9 22 3f 6e 65  22 3a e7 6e 25 8c 72 25  |J.(."?ne":.n%.r%|
00008700  3d 28 bb 42 24 3c 3e bb  43 24 29 8b 72 25 3d 28  |=(.B$<>.C$).r%=(|
00008710  42 24 3c 3e 43 24 29 0d  4a 1a 26 c9 22 3f 6c 74  |B$<>C$).J.&."?lt|
00008720  22 3a e7 6e 25 8c 72 25  3d 28 bb 42 24 3c bb 43  |":.n%.r%=(.B$<.C|
00008730  24 29 8b 72 25 3d 28 42  24 3c 43 24 29 0d 4a 24  |$).r%=(B$<C$).J$|
00008740  26 c9 22 3f 67 74 22 3a  e7 6e 25 8c 72 25 3d 28  |&."?gt":.n%.r%=(|
00008750  bb 42 24 3e bb 43 24 29  8b 72 25 3d 28 42 24 3e  |.B$>.C$).r%=(B$>|
00008760  43 24 29 0d 4a 2e 28 c9  22 3f 6c 65 22 3a e7 6e  |C$).J.(."?le":.n|
00008770  25 8c 72 25 3d 28 bb 42  24 3c 3d bb 43 24 29 8b  |%.r%=(.B$<=.C$).|
00008780  72 25 3d 28 42 24 3c 3d  43 24 29 0d 4a 38 28 c9  |r%=(B$<=C$).J8(.|
00008790  22 3f 67 65 22 3a e7 6e  25 8c 72 25 3d 28 bb 42  |"?ge":.n%.r%=(.B|
000087a0  24 3e 3d bb 43 24 29 8b  72 25 3d 28 42 24 3e 3d  |$>=.C$).r%=(B$>=|
000087b0  43 24 29 0d 4a 42 05 cb  0d 4a 4c 0d 3d 2d 28 72  |C$).JB...JL.=-(r|
000087c0  25 3c 3e 30 29 0d 4a 60  0c dd a4 4e 65 28 41 24  |%<>0).J`...Ne(A$|
000087d0  29 0d 4a 6a 07 ea 42 24  0d 4a 74 0a 55 5f 24 3d  |).Jj..B$.Jt.U_$=|
000087e0  22 22 0d 4a 7e 0e 42 24  3d a4 77 62 28 41 24 29  |"".J~.B$=.wb(A$)|
000087f0  0d 4a 88 06 ea 85 0d 4a  92 1f ee 85 ea 3a f2 5a  |.J.....J.....:.Z|
00008800  62 28 a4 61 62 28 22 45  65 76 61 6c 22 2c 42 24  |b(.ab("Eeval",B$|
00008810  29 29 3a 3d 30 0d 4a 9c  0e 55 5f 24 3d c3 28 a0  |)):=0.J..U_$=.(.|
00008820  42 24 29 0d 4a a6 07 3d  2d 31 0d 4a ba 0c dd a4  |B$).J..=-1.J....|
00008830  4d 65 28 41 24 29 0d 4a  c4 28 ea 61 25 2c 73 25  |Me(A$).J.(.a%,s%|
00008840  2c 6c 25 2c 73 24 2c 62  24 2c 42 24 2c 43 24 3a  |,l%,s$,b$,B$,C$:|
00008850  61 25 3d 30 3a 73 25 3d  30 3a 6c 25 3d 30 0d 4a  |a%=0:s%=0:l%=0.J|
00008860  ce 0f f5 42 24 3d a4 77  62 28 41 24 29 0d 4a d8  |...B$=.wb(A$).J.|
00008870  10 e7 c0 42 24 2c 31 29  3d 22 2f 22 8c 0d 4a e2  |...B$,1)="/"..J.|
00008880  18 43 24 3d a4 78 62 28  42 24 29 3a c8 8e c0 42  |.C$=.xb(B$):...B|
00008890  24 2c 33 29 ca 0d 4a ec  0f c9 22 73 69 7a 22 3a  |$,3)..J..."siz":|
000088a0  61 25 3d 31 0d 4a f6 0f  c9 22 6c 6f 77 22 3a 61  |a%=1.J..."low":a|
000088b0  25 3d 32 0d 4b 00 16 c9  22 6c 65 66 22 3a 61 25  |%=2.K..."lef":a%|
000088c0  3d 33 3a 73 25 3d bb 43  24 0d 4b 0a 16 c9 22 72  |=3:s%=.C$.K..."r|
000088d0  69 67 22 3a 61 25 3d 34  3a 73 25 3d bb 43 24 0d  |ig":a%=4:s%=.C$.|
000088e0  4b 14 16 c9 22 73 74 61  22 3a 61 25 3d 35 3a 73  |K..."sta":a%=5:s|
000088f0  25 3d bb 43 24 0d 4b 1e  11 c9 22 6c 65 6e 22 3a  |%=.C$.K..."len":|
00008900  6c 25 3d bb 43 24 0d 4b  28 15 c9 22 69 6e 73 22  |l%=.C$.K(.."ins"|
00008910  3a 61 25 3d 36 3a 62 24  3d 43 24 0d 4b 32 0f c9  |:a%=6:b$=C$.K2..|
00008920  22 75 70 70 22 3a 61 25  3d 37 0d 4b 3c 05 cb 0d  |"upp":a%=7.K<...|
00008930  4b 46 05 cc 0d 4b 50 09  73 24 3d 42 24 0d 4b 5a  |KF...KP.s$=B$.KZ|
00008940  05 cd 0d 4b 64 0a fd 41  24 3d 22 22 0d 4b 6e 09  |...Kd..A$="".Kn.|
00008950  c8 8e 61 25 ca 0d 4b 78  0f c9 31 3a 55 5f 24 3d  |..a%..Kx..1:U_$=|
00008960  c3 a9 73 24 0d 4b 82 12  c9 32 3a 55 5f 24 3d a4  |..s$.K...2:U_$=.|
00008970  72 63 28 73 24 29 0d 4b  8c 12 c9 33 3a 55 5f 24  |rc(s$).K...3:U_$|
00008980  3d c0 73 24 2c 73 25 29  0d 4b 96 12 c9 34 3a 55  |=.s$,s%).K...4:U|
00008990  5f 24 3d c2 73 24 2c 73  25 29 0d 4b a0 27 c9 35  |_$=.s$,s%).K.'.5|
000089a0  3a e7 6c 25 3c 31 8c 55  5f 24 3d c1 73 24 2c 73  |:.l%<1.U_$=.s$,s|
000089b0  25 29 8b 55 5f 24 3d c1  73 24 2c 73 25 2c 6c 25  |%).U_$=.s$,s%,l%|
000089c0  29 0d 4b aa 15 c9 36 3a  55 5f 24 3d c3 28 a7 73  |).K...6:U_$=.(.s|
000089d0  24 2c 62 24 29 29 0d 4b  b4 12 c9 37 3a 55 5f 24  |$,b$)).K...7:U_$|
000089e0  3d a4 46 67 28 73 24 29  0d 4b be 0c 7f 3a 55 5f  |=.Fg(s$).K...:U_|
000089f0  24 3d 73 24 0d 4b c8 05  cb 0d 4b d2 07 3d 2d 31  |$=s$.K....K..=-1|
00008a00  0d 4b e6 0c dd a4 59 65  28 41 24 29 0d 4b f0 0a  |.K....Ye(A$).K..|
00008a10  ea 6c 25 2c 42 24 0d 4b  fa 1d f2 59 5f 28 a4 51  |.l%,B$.K...Y_(.Q|
00008a20  5f 28 22 46 6d 6f 76 65  31 22 29 2c 22 20 22 2c  |_("Fmove1")," ",|
00008a30  22 22 29 0d 4c 04 0e 42  24 3d a4 77 62 28 41 24  |"").L..B$=.wb(A$|
00008a40  29 0d 4c 0e 24 e7 41 24  3d 22 22 8c f2 59 5f 28  |).L.$.A$=""..Y_(|
00008a50  22 22 2c a4 51 5f 28 22  46 62 61 64 22 29 2c 22  |"",.Q_("Fbad"),"|
00008a60  22 29 3a 3d 30 0d 4c 18  0f 6c 25 3d a7 41 24 2c  |"):=0.L..l%=.A$,|
00008a70  22 2a 22 29 0d 4c 22 0a  e7 6c 25 3e 30 8c 0d 4c  |"*").L"..l%>0..L|
00008a80  2c 24 f5 41 24 3d c0 41  24 2c 6c 25 2d 31 29 2b  |,$.A$=.A$,l%-1)+|
00008a90  c2 c3 28 91 29 2c 34 29  2b c1 41 24 2c 6c 25 2b  |..(.),4)+.A$,l%+|
00008aa0  31 29 0d 4c 36 0c f2 41  62 28 64 61 25 29 0d 4c  |1).L6..Ab(da%).L|
00008ab0  40 0f fd a4 41 67 28 41  24 29 3c 3e 31 0d 4c 4a  |@...Ag(A$)<>1.LJ|
00008ac0  05 cd 0d 4c 54 1f f2 59  5f 28 22 22 2c a4 76 62  |...LT..Y_("",.vb|
00008ad0  28 22 46 74 6f 22 2c 42  24 2c 41 24 29 2c 22 22  |("Fto",B$,A$),""|
00008ae0  29 0d 4c 5e 19 c8 99 31  33 31 31 31 33 2c 32 35  |).L^...131113,25|
00008af0  2c 42 24 2c 41 24 b8 3b  46 25 0d 4c 68 0c e7 28  |,B$,A$.;F%.Lh..(|
00008b00  46 25 80 31 29 8c 0d 4c  72 23 c8 99 31 33 31 31  |F%.1)..Lr#..1311|
00008b10  31 33 2c 32 36 2c 42 24  2c 41 24 2c 25 31 30 30  |13,26,B$,A$,%100|
00008b20  30 30 30 31 30 b8 3b 46  25 0d 4c 7c 05 cd 0d 4c  |00010.;F%.L|...L|
00008b30  86 13 f2 5a 61 28 22 24  64 65 73 74 22 2c 41 24  |...Za("$dest",A$|
00008b40  29 0d 4c 90 10 3d 2d 28  28 46 25 80 31 29 3d 30  |).L..=-((F%.1)=0|
00008b50  29 0d 4c a4 0c dd a4 5a  65 28 41 24 29 0d 4c ae  |).L....Ze(A$).L.|
00008b60  1a ea 6c 25 2c 76 66 25  2c 73 24 2c 64 24 2c 6e  |..l%,vf%,s$,d$,n|
00008b70  25 2c 42 24 2c 43 24 0d  4c b8 15 76 66 25 3d 30  |%,B$,C$.L..vf%=0|
00008b80  3a 73 24 3d 22 22 3a 64  24 3d 22 22 0d 4c c2 1c  |:s$="":d$="".L..|
00008b90  f2 59 5f 28 a4 51 5f 28  22 46 63 6f 70 79 22 29  |.Y_(.Q_("Fcopy")|
00008ba0  2c 22 20 22 2c 22 22 29  0d 4c cc 0f f5 42 24 3d  |," ","").L...B$=|
00008bb0  a4 77 62 28 41 24 29 0d  4c d6 10 e7 c0 42 24 2c  |.wb(A$).L....B$,|
00008bc0  31 29 3d 22 2f 22 8c 0d  4c e0 18 43 24 3d a4 78  |1)="/"..L..C$=.x|
00008bd0  62 28 42 24 29 3a c8 8e  c0 42 24 2c 32 29 ca 0d  |b(B$):...B$,2)..|
00008be0  4c ea 22 c9 22 74 61 22  3a 76 66 25 3d 31 3a 6e  |L."."ta":vf%=1:n|
00008bf0  25 3d bb 43 24 3a e7 6e  25 3d 30 8c 6e 25 3d 35  |%=.C$:.n%=0.n%=5|
00008c00  30 0d 4c f4 22 c9 22 68  65 22 3a 76 66 25 3d 32  |0.L."."he":vf%=2|
00008c10  3a 6e 25 3d bb 43 24 3a  e7 6e 25 3d 30 8c 6e 25  |:n%=.C$:.n%=0.n%|
00008c20  3d 35 30 0d 4c fe 05 cb  0d 4d 08 05 cc 0d 4d 12  |=50.L....M....M.|
00008c30  17 e7 73 24 3d 22 22 8c  73 24 3d 42 24 3a 8b 64  |..s$="".s$=B$:.d|
00008c40  24 3d 42 24 0d 4d 1c 05  cd 0d 4d 26 0a fd 41 24  |$=B$.M....M&..A$|
00008c50  3d 22 22 0d 4d 30 24 e7  64 24 3d 22 22 8c f2 59  |="".M0$.d$=""..Y|
00008c60  5f 28 22 22 2c a4 51 5f  28 22 46 62 61 64 22 29  |_("",.Q_("Fbad")|
00008c70  2c 22 22 29 3a 3d 30 0d  4d 3a 16 6c 25 3d a7 64  |,""):=0.M:.l%=.d|
00008c80  24 2c 22 2a 22 29 3a e7  6c 25 3e 30 8c 0d 4d 44  |$,"*"):.l%>0..MD|
00008c90  24 f5 64 24 3d c0 64 24  2c 6c 25 2d 31 29 2b c2  |$.d$=.d$,l%-1)+.|
00008ca0  c3 28 91 29 2c 34 29 2b  c1 64 24 2c 6c 25 2b 31  |.(.),4)+.d$,l%+1|
00008cb0  29 0d 4d 4e 0f fd a4 41  67 28 64 24 29 3c 3e 31  |).MN...Ag(d$)<>1|
00008cc0  0d 4d 58 05 cd 0d 4d 62  1f f2 59 5f 28 22 22 2c  |.MX...Mb..Y_("",|
00008cd0  a4 76 62 28 22 46 74 6f  22 2c 42 24 2c 41 24 29  |.vb("Fto",B$,A$)|
00008ce0  2c 22 22 29 0d 4d 6c 0f  6c 25 3d 30 3a c8 8e 76  |,"").Ml.l%=0:..v|
00008cf0  66 25 ca 0d 4d 76 2b c9  30 3a c8 99 31 33 31 31  |f%..Mv+.0:..1311|
00008d00  31 33 2c 32 36 2c 73 24  2c 64 24 b8 3b 46 25 3a  |13,26,s$,d$.;F%:|
00008d10  6c 25 3d 2d 28 28 46 25  80 31 29 3d 30 29 0d 4d  |l%=-((F%.1)=0).M|
00008d20  80 2f c9 31 3a f2 59 5f  28 a4 51 5f 28 22 46 74  |./.1:.Y_(.Q_("Ft|
00008d30  61 69 6c 22 29 2c 22 22  2c 22 22 29 3a 6c 25 3d  |ail"),"",""):l%=|
00008d40  a4 47 67 28 73 24 2c 64  24 2c 6e 25 29 0d 4d 8a  |.Gg(s$,d$,n%).M.|
00008d50  2f c9 32 3a f2 59 5f 28  a4 51 5f 28 22 46 68 65  |/.2:.Y_(.Q_("Fhe|
00008d60  61 64 22 29 2c 22 22 2c  22 22 29 3a 6c 25 3d a4  |ad"),"",""):l%=.|
00008d70  48 67 28 73 24 2c 64 24  2c 6e 25 29 0d 4d 94 05  |Hg(s$,d$,n%).M..|
00008d80  cb 0d 4d 9e 13 f2 5a 61  28 22 24 64 65 73 74 22  |..M...Za("$dest"|
00008d90  2c 41 24 29 0d 4d a8 07  3d 6c 25 0d 4d bc 0c dd  |,A$).M..=l%.M...|
00008da0  a4 61 65 28 41 24 29 0d  4d c6 1b ea 53 25 2c 72  |.ae(A$).M...S%,r|
00008db0  25 2c 49 67 25 2c 4a 67  25 2c 66 24 2c 74 24 2c  |%,Ig%,Jg%,f$,t$,|
00008dc0  46 25 0d 4d d0 1b f2 59  5f 28 a4 51 5f 28 22 46  |F%.M...Y_(.Q_("F|
00008dd0  61 70 70 22 29 2c 22 20  22 2c 22 22 29 0d 4d da  |app")," ","").M.|
00008de0  19 66 24 3d a4 77 62 28  41 24 29 3a 74 24 3d a4  |.f$=.wb(A$):t$=.|
00008df0  77 62 28 41 24 29 0d 4d  e4 24 e7 74 24 3d 22 22  |wb(A$).M.$.t$=""|
00008e00  8c f2 59 5f 28 22 22 2c  a4 51 5f 28 22 46 62 61  |..Y_("",.Q_("Fba|
00008e10  64 22 29 2c 22 22 29 3a  3d 30 0d 4d ee 1f f2 59  |d"),""):=0.M...Y|
00008e20  5f 28 22 22 2c a4 76 62  28 22 46 74 6f 22 2c 66  |_("",.vb("Fto",f|
00008e30  24 2c 74 24 29 2c 22 22  29 0d 4d f8 30 49 67 25  |$,t$),"").M.0Ig%|
00008e40  3d a4 4c 61 28 66 24 29  3a e7 49 67 25 3d 30 8c  |=.La(f$):.Ig%=0.|
00008e50  f2 5a 62 28 a4 61 62 28  22 46 73 6f 75 72 63 65  |.Zb(.ab("Fsource|
00008e60  22 2c 66 24 29 29 3a 3d  30 0d 4e 02 3b 4a 67 25  |",f$)):=0.N.;Jg%|
00008e70  3d a4 60 61 28 74 24 29  3a e7 4a 67 25 3d 30 8c  |=.`a(t$):.Jg%=0.|
00008e80  c8 99 31 33 31 30 38 30  2c 31 31 2c 74 24 2c 26  |..131080,11,t$,&|
00008e90  46 46 46 2c 2c 30 2c 30  3a 4a 67 25 3d a4 56 66  |FFF,,0,0:Jg%=.Vf|
00008ea0  28 74 24 29 0d 4e 0c 13  e7 4a 67 25 3e 30 80 a2  |(t$).N...Jg%>0..|
00008eb0  23 49 67 25 3e 30 8c 0d  4e 16 35 cf 23 4a 67 25  |#Ig%>0..N.5.#Jg%|
00008ec0  3d a2 23 4a 67 25 3a 53  25 3d 30 3a f5 c8 99 31  |=.#Jg%:S%=0:...1|
00008ed0  33 31 30 38 34 2c 34 2c  49 67 25 2c 61 5f 25 2c  |31084,4,Ig%,a_%,|
00008ee0  32 35 36 b8 2c 2c 2c 72  25 3b 46 25 0d 4e 20 3c  |256.,,,r%;F%.N <|
00008ef0  e7 72 25 3c 3e 32 35 36  80 28 46 25 80 31 29 3d  |.r%<>256.(F%.1)=|
00008f00  30 8c c8 99 31 33 31 30  38 34 2c 32 2c 4a 67 25  |0...131084,2,Jg%|
00008f10  2c 61 5f 25 2c 32 35 36  2d 72 25 b8 3b 46 25 3a  |,a_%,256-r%.;F%:|
00008f20  f2 41 62 28 64 61 25 29  0d 4e 2a 0e 53 25 2b 3d  |.Ab(da%).N*.S%+=|
00008f30  32 35 36 2d 72 25 0d 4e  34 18 fd 53 25 3e 3d a2  |256-r%.N4..S%>=.|
00008f40  23 49 67 25 84 28 46 25  80 31 29 3c 3e 30 0d 4e  |#Ig%.(F%.1)<>0.N|
00008f50  3e 05 cd 0d 4e 48 15 f2  4d 61 28 49 67 25 29 3a  |>...NH..Ma(Ig%):|
00008f60  f2 4d 61 28 4a 67 25 29  0d 4e 52 06 3d 31 0d 4e  |.Ma(Jg%).NR.=1.N|
00008f70  66 12 dd a4 47 67 28 73  24 2c 64 24 2c 6c 25 29  |f...Gg(s$,d$,l%)|
00008f80  0d 4e 70 0d ea 6e 25 2c  6d 25 2c 41 24 0d 4e 7a  |.Np..n%,m%,A$.Nz|
00008f90  30 49 67 25 3d a4 4c 61  28 73 24 29 3a e7 49 67  |0Ig%=.La(s$):.Ig|
00008fa0  25 3d 30 8c f2 5a 62 28  a4 61 62 28 22 46 73 6f  |%=0..Zb(.ab("Fso|
00008fb0  75 72 63 65 22 2c 73 24  29 29 3a 3d 30 0d 4e 84  |urce",s$)):=0.N.|
00008fc0  28 c8 99 31 33 31 30 38  30 2c 31 31 2c 64 24 2c  |(..131080,11,d$,|
00008fd0  26 46 46 46 2c 2c 30 2c  30 3a 4a 67 25 3d a4 56  |&FFF,,0,0:Jg%=.V|
00008fe0  66 28 64 24 29 0d 4e 8e  13 e7 4a 67 25 3e 30 80  |f(d$).N...Jg%>0.|
00008ff0  a2 23 49 67 25 3e 30 8c  0d 4e 98 0a 6e 25 3d 30  |.#Ig%>0..N..n%=0|
00009000  3a f5 0d 4e a2 1d 41 24  3d be 23 49 67 25 3a 6e  |:..N..A$=.#Ig%:n|
00009010  25 2b 3d 31 3a f2 41 62  28 64 61 25 2a 32 29 0d  |%+=1:.Ab(da%*2).|
00009020  4e ac 12 fd c5 23 49 67  25 3a cf 23 49 67 25 3d  |N....#Ig%:.#Ig%=|
00009030  30 0d 4e b6 17 6d 25 3d  6e 25 2d 6c 25 3a e7 6d  |0.N..m%=n%-l%:.m|
00009040  25 3c 30 8c 6d 25 3d 30  0d 4e c0 0a 6e 25 3d 30  |%<0.m%=0.N..n%=0|
00009050  3a f5 0d 4e ca 1d 41 24  3d be 23 49 67 25 3a 6e  |:..N..A$=.#Ig%:n|
00009060  25 2b 3d 31 3a f2 41 62  28 64 61 25 2a 32 29 0d  |%+=1:.Ab(da%*2).|
00009070  4e d4 0b fd 6e 25 3e 3d  6d 25 0d 4e de 05 f5 0d  |N...n%>=m%.N....|
00009080  4e e8 20 41 24 3d be 23  49 67 25 3a d5 23 4a 67  |N. A$=.#Ig%:.#Jg|
00009090  25 2c 41 24 3a f2 41 62  28 64 61 25 2a 32 29 0d  |%,A$:.Ab(da%*2).|
000090a0  4e f2 0a fd c5 23 49 67  25 0d 4e fc 05 cd 0d 4f  |N....#Ig%.N....O|
000090b0  06 15 f2 4d 61 28 49 67  25 29 3a f2 4d 61 28 4a  |...Ma(Ig%):.Ma(J|
000090c0  67 25 29 0d 4f 10 06 3d  31 0d 4f 24 12 dd a4 48  |g%).O..=1.O$...H|
000090d0  67 28 73 24 2c 64 24 2c  6c 25 29 0d 4f 2e 0d ea  |g(s$,d$,l%).O...|
000090e0  6e 25 2c 6d 25 2c 41 24  0d 4f 38 30 49 67 25 3d  |n%,m%,A$.O80Ig%=|
000090f0  a4 4c 61 28 73 24 29 3a  e7 49 67 25 3d 30 8c f2  |.La(s$):.Ig%=0..|
00009100  5a 62 28 a4 61 62 28 22  46 73 6f 75 72 63 65 22  |Zb(.ab("Fsource"|
00009110  2c 73 24 29 29 3a 3d 30  0d 4f 42 28 c8 99 31 33  |,s$)):=0.OB(..13|
00009120  31 30 38 30 2c 31 31 2c  64 24 2c 26 46 46 46 2c  |1080,11,d$,&FFF,|
00009130  2c 30 2c 30 3a 4a 67 25  3d a4 56 66 28 64 24 29  |,0,0:Jg%=.Vf(d$)|
00009140  0d 4f 4c 13 e7 4a 67 25  3e 30 80 a2 23 49 67 25  |.OL..Jg%>0..#Ig%|
00009150  3e 30 8c 0d 4f 56 0a 6e  25 3d 30 3a f5 0d 4f 60  |>0..OV.n%=0:..O`|
00009160  26 41 24 3d be 23 49 67  25 3a d5 23 4a 67 25 2c  |&A$=.#Ig%:.#Jg%,|
00009170  41 24 3a 6e 25 2b 3d 31  3a f2 41 62 28 64 61 25  |A$:n%+=1:.Ab(da%|
00009180  2a 32 29 0d 4f 6a 11 fd  c5 23 49 67 25 84 6e 25  |*2).Oj...#Ig%.n%|
00009190  3e 3d 6c 25 0d 4f 74 05  cd 0d 4f 7e 15 f2 4d 61  |>=l%.Ot...O~..Ma|
000091a0  28 49 67 25 29 3a f2 4d  61 28 4a 67 25 29 0d 4f  |(Ig%):.Ma(Jg%).O|
000091b0  88 06 3d 31 0d 4f 9c 0c  dd a4 62 65 28 41 24 29  |..=1.O....be(A$)|
000091c0  0d 4f a6 0a ea 77 25 2c  42 24 0d 4f b0 08 77 25  |.O...w%,B$.O..w%|
000091d0  3d 30 0d 4f ba 0f f5 42  24 3d a4 77 62 28 41 24  |=0.O...B$=.wb(A$|
000091e0  29 0d 4f c4 12 e7 c0 42  24 2c 33 29 3d 22 2f 77  |).O....B$,3)="/w|
000091f0  69 22 8c 0d 4f ce 08 77  25 3d b9 0d 4f d8 05 cc  |i"..O..w%=..O...|
00009200  0d 4f e2 31 e7 77 25 3d  30 8c c8 99 31 33 31 30  |.O.1.w%=0...1310|
00009210  38 30 2c 36 2c 42 24 b8  3b 46 25 8b c8 99 31 33  |80,6,B$.;F%...13|
00009220  31 31 31 33 2c 32 37 2c  42 24 2c 2c 32 b8 3b 46  |1113,27,B$,,2.;F|
00009230  25 0d 4f ec 05 cd 0d 4f  f6 0a fd 41 24 3d 22 22  |%.O....O...A$=""|
00009240  0d 50 00 10 3d 2d 28 28  46 25 80 31 29 3d 30 29  |.P..=-((F%.1)=0)|
00009250  0d 50 14 0c dd a4 65 65  28 41 24 29 0d 50 1e 11  |.P....ee(A$).P..|
00009260  ea 6c 25 2c 68 25 2c 4b  67 25 2c 42 24 0d 50 28  |.l%,h%,Kg%,B$.P(|
00009270  0e 42 24 3d a4 77 62 28  41 24 29 0d 50 32 1f e7  |.B$=.wb(A$).P2..|
00009280  41 24 3d 22 22 8c f2 72  62 28 a4 51 5f 28 22 45  |A$=""..rb(.Q_("E|
00009290  64 61 74 61 22 29 29 3a  3d 30 0d 50 3c 1f f2 59  |data")):=0.P<..Y|
000092a0  5f 28 a4 51 5f 28 22 44  61 74 61 4f 70 65 6e 22  |_(.Q_("DataOpen"|
000092b0  29 2c 22 20 22 2c 22 22  29 0d 50 46 0e 68 25 3d  |)," ","").PF.h%=|
000092c0  a4 4c 67 28 42 24 29 0d  50 50 1e c8 99 31 33 31  |.Lg(B$).PP...131|
000092d0  30 38 30 2c 32 33 2c 41  24 b8 6c 25 2c 2c 2c 2c  |080,23,A$.l%,,,,|
000092e0  2c 2c 4b 67 25 0d 50 5a  10 e7 68 25 3c 3e 30 80  |,,Kg%.PZ..h%<>0.|
000092f0  6c 25 3d 31 8c 0d 50 64  09 55 5f 25 3d 31 0d 50  |l%=1..Pd.U_%=1.P|
00009300  6e 2d f2 59 5f 28 22 22  2c 41 24 2b 22 20 28 74  |n-.Y_("",A$+" (t|
00009310  79 70 65 20 26 22 2b c3  7e 4b 67 25 2b 22 29 20  |ype &"+.~Kg%+") |
00009320  74 6f 20 22 2b 42 24 2c  22 22 29 0d 50 78 3b 71  |to "+B$,"").Px;q|
00009330  25 21 31 32 3d 30 3a 71  25 21 31 36 3d 35 3a 71  |%!12=0:q%!16=5:q|
00009340  25 21 32 30 3d 30 3a 71  25 21 32 34 3d 30 3a 71  |%!20=0:q%!24=0:q|
00009350  25 21 32 38 3d 30 3a 71  25 21 33 32 3d 30 3a 71  |%!28=0:q%!32=0:q|
00009360  25 21 33 36 3d 30 0d 50  82 2c 71 25 21 34 30 3d  |%!36=0.P.,q%!40=|
00009370  4b 67 25 3a 24 28 71 25  2b 34 34 29 3d 41 24 2b  |Kg%:$(q%+44)=A$+|
00009380  bd 30 3a 21 71 25 3d 34  37 2b a9 41 24 2b 31 80  |.0:!q%=47+.A$+1.|
00009390  ac 33 0d 50 8c 15 c8 99  32 36 32 33 37 35 2c 31  |.3.P....262375,1|
000093a0  38 2c 71 25 2c 68 25 0d  50 96 05 cc 0d 50 a0 09  |8,q%,h%.P....P..|
000093b0  55 5f 25 3d 30 0d 50 aa  26 e7 68 25 3d 30 8c f2  |U_%=0.P.&.h%=0..|
000093c0  59 5f 28 22 22 2c a4 61  62 28 22 45 6e 6f 74 61  |Y_("",.ab("Enota|
000093d0  73 6b 22 2c 42 24 29 2c  22 22 29 0d 50 b4 27 e7  |sk",B$),"").P.'.|
000093e0  6c 25 3c 3e 31 8c f2 59  5f 28 22 22 2c a4 61 62  |l%<>1..Y_("",.ab|
000093f0  28 22 45 6e 6f 66 69 6c  65 22 2c 41 24 29 2c 22  |("Enofile",A$),"|
00009400  22 29 0d 50 be 05 cd 0d  50 c8 08 3d 55 5f 25 0d  |").P....P..=U_%.|
00009410  50 dc 08 dd f2 54 63 0d  50 e6 07 ea 6c 25 0d 50  |P....Tc.P...l%.P|
00009420  f0 19 f2 50 5f 28 a4 51  5f 28 22 54 61 73 6b 4c  |...P_(.Q_("TaskL|
00009430  69 73 74 31 22 29 29 0d  50 fa 0d e3 6c 25 3d 30  |ist1")).P...l%=0|
00009440  b8 53 60 25 0d 51 04 0f  e7 56 60 25 28 6c 25 29  |.S`%.Q...V`%(l%)|
00009450  3e 30 8c 0d 51 0e 30 f2  74 66 28 c3 7e 56 60 25  |>0..Q.0.tf(.~V`%|
00009460  28 6c 25 29 2c a4 4d 67  28 56 60 25 28 6c 25 29  |(l%),.Mg(V`%(l%)|
00009470  29 2b 22 20 28 22 2b 55  60 24 28 6c 25 29 2b 22  |)+" ("+U`$(l%)+"|
00009480  29 22 29 0d 51 18 29 e7  54 60 24 28 6c 25 29 3e  |)").Q.).T`$(l%)>|
00009490  22 22 8c f2 74 66 28 22  22 2c 22 20 65 78 69 74  |""..tf(""," exit|
000094a0  3a 20 22 2b 54 60 24 28  6c 25 29 29 0d 51 22 05  |: "+T`$(l%)).Q".|
000094b0  cd 0d 51 2c 05 ed 0d 51  36 19 f2 50 5f 28 a4 51  |..Q,...Q6..P_(.Q|
000094c0  5f 28 22 54 61 73 6b 4c  69 73 74 32 22 29 29 0d  |_("TaskList2")).|
000094d0  51 40 0d e3 6c 25 3d 30  b8 57 60 25 0d 51 4a 0f  |Q@..l%=0.W`%.QJ.|
000094e0  e7 61 60 25 28 6c 25 29  3e 30 8c 0d 51 54 2b f2  |.a`%(l%)>0..QT+.|
000094f0  74 66 28 c3 7e 61 60 25  28 6c 25 29 2c 5a 60 24  |tf(.~a`%(l%),Z`$|
00009500  28 6c 25 29 2b 22 20 28  22 2b 59 60 24 28 6c 25  |(l%)+" ("+Y`$(l%|
00009510  29 2b 22 29 22 29 0d 51  5e 29 e7 58 60 24 28 6c  |)+")").Q^).X`$(l|
00009520  25 29 3e 22 22 8c f2 74  66 28 22 22 2c 22 20 65  |%)>""..tf(""," e|
00009530  78 69 74 3a 20 22 2b 58  60 24 28 6c 25 29 29 0d  |xit: "+X`$(l%)).|
00009540  51 68 05 cd 0d 51 72 05  ed 0d 51 7c 05 e1 0d 51  |Qh...Qr...Q|...Q|
00009550  90 0c dd a4 6e 65 28 41  24 29 0d 51 9a 07 ea 42  |....ne(A$).Q...B|
00009560  24 0d 51 a4 0f f5 42 24  3d a4 77 62 28 41 24 29  |$.Q...B$=.wb(A$)|
00009570  0d 51 ae 13 c8 99 33 39  33 34 33 38 2c 42 24 b8  |.Q....393438,B$.|
00009580  3b 46 25 0d 51 b8 0a fd  41 24 3d 22 22 0d 51 c2  |;F%.Q...A$="".Q.|
00009590  0b 3d 28 46 25 80 31 29  0d 51 d6 0c dd a4 49 61  |.=(F%.1).Q....Ia|
000095a0  28 41 24 29 0d 51 e0 17  ea 61 25 2c 77 25 2c 68  |(A$).Q...a%,w%,h|
000095b0  25 2c 4e 67 25 2c 42 24  2c 43 24 0d 51 ea 0e 73  |%,Ng%,B$,C$.Q..s|
000095c0  63 25 3d 30 3a 61 25 3d  30 0d 51 f4 1c f5 61 25  |c%=0:a%=0.Q...a%|
000095d0  2b 3d 31 3a fd 56 60 25  28 61 25 29 3d 30 84 61  |+=1:.V`%(a%)=0.a|
000095e0  25 3d 53 60 25 0d 51 fe  24 e7 56 60 25 28 61 25  |%=S`%.Q.$.V`%(a%|
000095f0  29 3c 3e 30 8c f2 72 62  28 a4 51 5f 28 22 45 74  |)<>0..rb(.Q_("Et|
00009600  61 73 6b 32 22 29 29 3a  e1 0d 52 08 26 55 60 24  |ask2")):..R.&U`$|
00009610  28 61 25 29 3d 22 74 61  73 6b 22 2b c3 61 25 3a  |(a%)="task"+.a%:|
00009620  54 60 24 28 61 25 29 3d  22 22 3a 68 25 3d 30 0d  |T`$(a%)="":h%=0.|
00009630  52 12 0f f5 42 24 3d a4  77 62 28 41 24 29 0d 52  |R...B$=.wb(A$).R|
00009640  1c 10 e7 c0 42 24 2c 31  29 3d 22 2f 22 8c 0d 52  |....B$,1)="/"..R|
00009650  26 0e 43 24 3d a4 78 62  28 42 24 29 0d 52 30 0d  |&.C$=.xb(B$).R0.|
00009660  c8 8e c0 42 24 2c 32 29  ca 0d 52 3a 25 c9 22 6b  |...B$,2)..R:%."k|
00009670  69 22 2c 22 64 65 22 3a  68 25 3d a4 4f 67 28 43  |i","de":h%=.Og(C|
00009680  24 29 3a 42 24 3d 22 22  3a 41 24 3d 22 22 0d 52  |$):B$="":A$="".R|
00009690  44 19 c9 22 6e 61 22 2c  22 69 64 22 3a 55 60 24  |D.."na","id":U`$|
000096a0  28 61 25 29 3d 43 24 0d  52 4e 14 c9 22 65 78 22  |(a%)=C$.RN.."ex"|
000096b0  3a 54 60 24 28 61 25 29  3d 43 24 0d 52 58 0f c9  |:T`$(a%)=C$.RX..|
000096c0  22 77 61 22 3a 73 63 25  3d b9 0d 52 62 05 cb 0d  |"wa":sc%=..Rb...|
000096d0  52 6c 05 cd 0d 52 76 0a  fd 41 24 3d 22 22 0d 52  |Rl...Rv..A$="".R|
000096e0  80 0b e7 42 24 3e 22 22  8c 0d 52 8a 23 f2 59 5f  |...B$>""..R.#.Y_|
000096f0  28 a4 61 62 28 22 54 61  73 6b 53 74 61 72 74 31  |(.ab("TaskStart1|
00009700  22 2c 42 24 29 2c 22 22  2c 22 22 29 0d 52 94 13  |",B$),"","").R..|
00009710  c8 99 33 39 33 34 33 38  2c 42 24 b8 3b 46 25 0d  |..393438,B$.;F%.|
00009720  52 9e 0e e7 28 46 25 80  31 29 3d 30 8c 0d 52 a8  |R...(F%.1)=0..R.|
00009730  10 6a 5f 25 3d 61 25 3a  4e 67 25 3d 30 0d 52 b2  |.j_%=a%:Ng%=0.R.|
00009740  26 f5 4e 67 25 2b 3d 31  3a f2 41 62 28 30 29 3a  |&.Ng%+=1:.Ab(0):|
00009750  fd 6a 5f 25 3d 30 84 4e  67 25 3e 31 30 3a 6a 5f  |.j_%=0.Ng%>10:j_|
00009760  25 3d 30 0d 52 bc 05 cd  0d 52 c6 17 e7 56 60 25  |%=0.R....R...V`%|
00009770  28 61 25 29 3c 3e 30 80  73 63 25 3c 3e 30 8c 0d  |(a%)<>0.sc%<>0..|
00009780  52 d0 18 f5 3a f2 41 62  28 35 30 29 3a fd 56 60  |R...:.Ab(50):.V`|
00009790  25 28 61 25 29 3d 30 0d  52 da 05 cd 0d 52 e4 12  |%(a%)=0.R....R..|
000097a0  68 25 3d 2d 28 28 46 25  80 31 29 3d 30 29 0d 52  |h%=-((F%.1)=0).R|
000097b0  ee 05 cd 0d 52 f8 07 3d  68 25 0d 53 0c 0c dd a4  |....R..=h%.S....|
000097c0  4f 67 28 41 24 29 0d 53  16 0a ea 6c 25 2c 68 25  |Og(A$).S...l%,h%|
000097d0  0d 53 20 0b e7 41 24 3d  22 22 8c 0d 53 2a 23 6c  |.S ..A$=""..S*#l|
000097e0  25 3d 53 60 25 3a c8 95  56 60 25 28 6c 25 29 3d  |%=S`%:..V`%(l%)=|
000097f0  30 80 6c 25 3e 30 3a 6c  25 2d 3d 31 3a ce 0d 53  |0.l%>0:l%-=1:..S|
00009800  34 19 e7 56 60 25 28 6c  25 29 3e 30 8c 68 25 3d  |4..V`%(l%)>0.h%=|
00009810  56 60 25 28 6c 25 29 0d  53 3e 05 cc 0d 53 48 0d  |V`%(l%).S>...SH.|
00009820  e3 6c 25 3d 30 b8 53 60  25 0d 53 52 0f e7 56 60  |.l%=0.S`%.SR..V`|
00009830  25 28 6c 25 29 3e 30 8c  0d 53 5c 2a e7 a4 4d 67  |%(l%)>0..S\*..Mg|
00009840  28 56 60 25 28 6c 25 29  29 3d 41 24 84 55 60 24  |(V`%(l%))=A$.U`$|
00009850  28 6c 25 29 3d 41 24 8c  68 25 3d 56 60 25 28 6c  |(l%)=A$.h%=V`%(l|
00009860  25 29 0d 53 66 05 cd 0d  53 70 05 ed 0d 53 7a 05  |%).Sf...Sp...Sz.|
00009870  cd 0d 53 84 0b e7 68 25  3c 3e 30 8c 0d 53 8e 1c  |..S...h%<>0..S..|
00009880  f2 5a 62 28 22 4b 69 6c  6c 69 6e 67 20 74 61 73  |.Zb("Killing tas|
00009890  6b 3a 20 22 2b 41 24 29  0d 53 98 34 21 71 25 3d  |k: "+A$).S.4!q%=|
000098a0  32 35 36 3a 71 25 21 31  32 3d 30 3a 71 25 21 31  |256:q%!12=0:q%!1|
000098b0  36 3d 30 3a c8 99 32 36  32 33 37 35 2c 31 37 2c  |6=0:..262375,17,|
000098c0  71 25 2c 68 25 3a f2 41  62 28 30 29 0d 53 a2 05  |q%,h%:.Ab(0).S..|
000098d0  cd 0d 53 ac 0d 3d 2d 28  68 25 3c 3e 30 29 0d 53  |..S..=-(h%<>0).S|
000098e0  c0 0c dd a4 64 65 28 41  24 29 0d 53 ca 0c 3d a4  |....de(A$).S..=.|
000098f0  4c 67 28 41 24 29 0d 53  de 0c dd a4 4d 67 28 68  |Lg(A$).S....Mg(h|
00009900  25 29 0d 53 e8 0a ea 66  24 2c 6e 25 0d 53 f2 1b  |%).S...f$,n%.S..|
00009910  66 24 3d 22 22 3a c8 99  34 30 33 30 37 32 2c 68  |f$="":..403072,h|
00009920  25 b8 68 25 3b 46 25 0d  53 fc 0e e7 28 46 25 80  |%.h%;F%.S...(F%.|
00009930  31 29 3d 30 8c 0d 54 06  28 6e 25 3d 30 3a c8 95  |1)=0..T.(n%=0:..|
00009940  68 25 3f 6e 25 3e 33 31  3a 66 24 2b 3d bd 28 68  |h%?n%>31:f$+=.(h|
00009950  25 3f 6e 25 29 3a 6e 25  2b 3d 31 3a ce 0d 54 10  |%?n%):n%+=1:..T.|
00009960  05 cd 0d 54 1a 07 3d 66  24 0d 54 2e 0c dd a4 4c  |...T..=f$.T....L|
00009970  67 28 41 24 29 0d 54 38  13 ea 41 25 2c 72 25 2c  |g(A$).T8..A%,r%,|
00009980  6c 25 2c 68 25 2c 42 24  0d 54 42 18 72 25 3d 30  |l%,h%,B$.TB.r%=0|
00009990  3a 41 25 3d 30 3a 41 24  3d a4 72 63 28 41 24 29  |:A%=0:A$=.rc(A$)|
000099a0  0d 54 4c 05 f5 0d 54 56  1e c8 99 32 37 32 30 30  |.TL...TV...27200|
000099b0  31 2c 41 25 2c 50 61 25  2c 26 31 30 30 b8 41 25  |1,A%,Pa%,&100.A%|
000099c0  2c 6c 25 0d 54 60 09 46  64 25 3d 30 0d 54 6a 20  |,l%.T`.Fd%=0.Tj |
000099d0  c8 95 28 41 25 3e 3d 30  80 72 25 3d 30 80 28 46  |..(A%>=0.r%=0.(F|
000099e0  64 25 2b 50 61 25 29 3c  3d 6c 25 29 0d 54 74 2a  |d%+Pa%)<=l%).Tt*|
000099f0  68 25 3d 50 61 25 21 46  64 25 3a 42 24 3d a4 55  |h%=Pa%!Fd%:B$=.U|
00009a00  62 28 50 61 25 21 28 46  64 25 2b 34 29 29 3a 46  |b(Pa%!(Fd%+4)):F|
00009a10  64 25 2b 3d 31 36 0d 54  7e 15 e7 41 24 3d a4 72  |d%+=16.T~..A$=.r|
00009a20  63 28 42 24 29 8c 72 25  3d 68 25 0d 54 88 05 ce  |c(B$).r%=h%.T...|
00009a30  0d 54 92 0f fd 41 25 3c  30 84 72 25 3c 3e 30 0d  |.T...A%<0.r%<>0.|
00009a40  54 9c 07 3d 72 25 0d 54  b0 08 dd f2 62 62 0d 54  |T..=r%.T....bb.T|
00009a50  ba 07 ea 6c 25 0d 54 c4  0f e3 6c 25 3d 30 b8 53  |...l%.T...l%=0.S|
00009a60  60 25 2d 31 0d 54 ce 1c  e7 56 60 25 28 6c 25 29  |`%-1.T...V`%(l%)|
00009a70  3d 30 80 56 60 25 28 6c  25 2b 31 29 3c 3e 30 8c  |=0.V`%(l%+1)<>0.|
00009a80  0d 54 d8 17 c8 94 56 60  25 28 6c 25 29 2c 56 60  |.T....V`%(l%),V`|
00009a90  25 28 6c 25 2b 31 29 0d  54 e2 17 c8 94 55 60 24  |%(l%+1).T....U`$|
00009aa0  28 6c 25 29 2c 55 60 24  28 6c 25 2b 31 29 0d 54  |(l%),U`$(l%+1).T|
00009ab0  ec 17 c8 94 54 60 24 28  6c 25 29 2c 54 60 24 28  |....T`$(l%),T`$(|
00009ac0  6c 25 2b 31 29 0d 54 f6  05 cd 0d 55 00 05 ed 0d  |l%+1).T....U....|
00009ad0  55 0a 05 e1 0d 55 1e 0c  dd a4 49 65 28 41 24 29  |U....U....Ie(A$)|
00009ae0  0d 55 28 22 ea 53 62 25  2c 77 25 2c 4e 67 25 2c  |.U(".Sb%,w%,Ng%,|
00009af0  6e 25 2c 46 25 2c 4b 64  25 2c 42 24 2c 43 24 2c  |n%,F%,Kd%,B$,C$,|
00009b00  53 24 0d 55 32 1a 53 62  25 3d 30 3a 73 63 25 3d  |S$.U2.Sb%=0:sc%=|
00009b10  30 3a 46 25 3d 30 3a 4b  64 25 3d b9 0d 55 3c 22  |0:F%=0:Kd%=..U<"|
00009b20  c8 95 61 60 25 28 53 62  25 29 3c 3e 30 80 53 62  |..a`%(Sb%)<>0.Sb|
00009b30  25 3c 57 60 25 3a 53 62  25 2b 3d 31 3a ce 0d 55  |%<W`%:Sb%+=1:..U|
00009b40  46 22 e7 53 62 25 3d 57  60 25 8c f2 72 62 28 a4  |F".Sb%=W`%..rb(.|
00009b50  51 5f 28 22 45 74 61 73  6b 32 22 29 29 3a 3d 30  |Q_("Etask2")):=0|
00009b60  0d 55 50 21 c8 99 32 36  32 33 38 30 2c 2d 31 2c  |.UP!..262380,-1,|
00009b70  2d 31 b8 2c 6e 25 3a 6e  25 3d 6e 25 81 31 30 32  |-1.,n%:n%=n%.102|
00009b80  34 0d 55 5a 3c 53 24 3d  c3 6e 25 2b 22 6b 22 3a  |4.UZ<S$=.n%+"k":|
00009b90  59 60 24 28 53 62 25 29  3d 22 53 44 74 61 73 6b  |Y`$(Sb%)="SDtask|
00009ba0  22 2b c3 53 62 25 3a 58  60 24 28 53 62 25 29 3d  |"+.Sb%:X`$(Sb%)=|
00009bb0  22 22 3a 67 60 25 28 53  62 25 29 3d 30 0d 55 64  |"":g`%(Sb%)=0.Ud|
00009bc0  0f f5 42 24 3d a4 77 62  28 41 24 29 0d 55 6e 10  |..B$=.wb(A$).Un.|
00009bd0  e7 c0 42 24 2c 31 29 3d  22 2f 22 8c 0d 55 78 0e  |..B$,1)="/"..Ux.|
00009be0  43 24 3d a4 78 62 28 42  24 29 0d 55 82 0d c8 8e  |C$=.xb(B$).U....|
00009bf0  c0 42 24 2c 32 29 ca 0d  55 8c 0f c9 22 73 69 22  |.B$,2)..U..."si"|
00009c00  3a 53 24 3d 43 24 0d 55  96 1a c9 22 6e 61 22 2c  |:S$=C$.U..."na",|
00009c10  22 69 64 22 3a 59 60 24  28 53 62 25 29 3d 43 24  |"id":Y`$(Sb%)=C$|
00009c20  0d 55 a0 15 c9 22 65 78  22 3a 58 60 24 28 53 62  |.U..."ex":X`$(Sb|
00009c30  25 29 3d 43 24 0d 55 aa  28 c9 22 6f 75 22 3a f2  |%)=C$.U.(."ou":.|
00009c40  4d 61 28 62 60 25 28 53  62 25 29 29 3a 62 60 25  |Ma(b`%(Sb%)):b`%|
00009c50  28 53 62 25 29 3d a4 56  66 28 43 24 29 0d 55 b4  |(Sb%)=.Vf(C$).U.|
00009c60  0f c9 22 77 61 22 3a 73  63 25 3d b9 0d 55 be 14  |.."wa":sc%=..U..|
00009c70  c9 22 6b 65 22 3a 67 60  25 28 53 62 25 29 3d b9  |."ke":g`%(Sb%)=.|
00009c80  0d 55 c8 18 c9 22 6b 69  22 3a f2 6e 63 28 43 24  |.U..."ki":.nc(C$|
00009c90  2c 26 38 30 38 43 34 29  0d 55 d2 18 c9 22 73 75  |,&808C4).U..."su|
00009ca0  22 3a f2 6e 63 28 43 24  2c 26 38 30 38 43 36 29  |":.nc(C$,&808C6)|
00009cb0  0d 55 dc 18 c9 22 72 65  22 3a f2 6e 63 28 43 24  |.U..."re":.nc(C$|
00009cc0  2c 26 38 30 38 43 37 29  0d 55 e6 0f c9 22 6e 6f  |,&808C7).U..."no|
00009cd0  22 3a 4b 64 25 3d a3 0d  55 f0 05 cb 0d 55 fa 09  |":Kd%=..U....U..|
00009ce0  42 24 3d 22 22 0d 56 04  05 cd 0d 56 0e 0a fd 41  |B$="".V....V...A|
00009cf0  24 3d 22 22 0d 56 18 0b  e7 42 24 3e 22 22 8c 0d  |$="".V...B$>""..|
00009d00  56 22 35 f2 59 5f 28 a4  61 62 28 22 54 61 73 6b  |V"5.Y_(.ab("Task|
00009d10  53 74 61 72 74 31 22 2c  59 60 24 28 53 62 25 29  |Start1",Y`$(Sb%)|
00009d20  29 2c 22 22 2c 22 22 29  3a 5a 60 24 28 53 62 25  |),"",""):Z`$(Sb%|
00009d30  29 3d 42 24 0d 56 2c 25  e7 62 60 25 28 53 62 25  |)=B$.V,%.b`%(Sb%|
00009d40  29 3d 30 8c f2 4a 64 28  53 62 25 2c 4b 64 25 2c  |)=0..Jd(Sb%,Kd%,|
00009d50  59 60 24 28 53 62 25 29  29 0d 56 36 7a c8 99 33  |Y`$(Sb%)).V6z..3|
00009d60  39 33 34 33 38 2c 22 54  61 73 6b 57 69 6e 64 6f  |93438,"TaskWindo|
00009d70  77 20 22 22 22 2b 42 24  2b 22 22 22 20 2d 71 75  |w """+B$+""" -qu|
00009d80  69 74 20 2d 77 69 6d 70  73 6c 6f 74 20 22 2b 53  |it -wimpslot "+S|
00009d90  24 2b 22 20 2d 6e 61 6d  65 20 22 22 22 2b 59 60  |$+" -name """+Y`|
00009da0  24 28 53 62 25 29 2b 22  22 22 20 2d 74 61 73 6b  |$(Sb%)+""" -task|
00009db0  20 26 22 2b c3 7e 49 61  25 2b 22 20 2d 74 78 74  | &"+.~Ia%+" -txt|
00009dc0  20 26 22 2b c3 7e 28 49  61 25 2b 53 62 25 29 b8  | &"+.~(Ia%+Sb%).|
00009dd0  3b 46 25 0d 56 40 2c 4e  67 25 3d 30 3a f5 4e 67  |;F%.V@,Ng%=0:.Ng|
00009de0  25 2b 3d 31 3a f2 41 62  28 30 29 3a fd 61 60 25  |%+=1:.Ab(0):.a`%|
00009df0  28 53 62 25 29 3c 3e 30  84 4e 67 25 3e 31 30 0d  |(Sb%)<>0.Ng%>10.|
00009e00  56 4a 37 e7 61 60 25 28  53 62 25 29 3d 30 8c f2  |VJ7.a`%(Sb%)=0..|
00009e10  4d 61 28 62 60 25 28 53  62 25 29 29 3a 59 60 24  |Ma(b`%(Sb%)):Y`$|
00009e20  28 53 62 25 29 3d 22 22  3a f2 45 62 28 64 60 25  |(Sb%)="":.Eb(d`%|
00009e30  28 53 62 25 29 29 0d 56  54 18 e7 73 63 25 3c 3e  |(Sb%)).VT..sc%<>|
00009e40  30 80 61 60 25 28 53 62  25 29 3c 3e 30 8c 0d 56  |0.a`%(Sb%)<>0..V|
00009e50  5e 19 f5 3a f2 41 62 28  35 30 29 3a fd 61 60 25  |^..:.Ab(50):.a`%|
00009e60  28 53 62 25 29 3d 30 0d  56 68 05 cd 0d 56 72 05  |(Sb%)=0.Vh...Vr.|
00009e70  cd 0d 56 7c 10 3d 94 28  28 46 25 80 31 29 3d 30  |..V|.=.((F%.1)=0|
00009e80  29 0d 56 90 0f dd f2 6e  63 28 41 24 2c 6d 25 29  |).V....nc(A$,m%)|
00009e90  0d 56 9a 0e 41 24 3d a4  72 63 28 41 24 29 0d 56  |.V..A$=.rc(A$).V|
00009ea0  a4 13 ea 53 62 25 3a e3  53 62 25 3d 30 b8 57 60  |...Sb%:.Sb%=0.W`|
00009eb0  25 0d 56 ae 21 e7 41 24  3d a4 72 63 28 59 60 24  |%.V.!.A$=.rc(Y`$|
00009ec0  28 53 62 25 29 29 80 61  60 25 28 53 62 25 29 3e  |(Sb%)).a`%(Sb%)>|
00009ed0  30 8c 0d 56 b8 29 21 71  25 3d 32 30 3a 71 25 21  |0..V.)!q%=20:q%!|
00009ee0  34 3d 30 3a 71 25 21 38  3d 30 3a 71 25 21 31 32  |4=0:q%!8=0:q%!12|
00009ef0  3d 30 3a 71 25 21 31 36  3d 6d 25 0d 56 c2 1b c8  |=0:q%!16=m%.V...|
00009f00  99 32 36 32 33 37 35 2c  31 37 2c 71 25 2c 61 60  |.262375,17,q%,a`|
00009f10  25 28 53 62 25 29 0d 56  cc 09 c8 8e 6d 25 ca 0d  |%(Sb%).V....m%..|
00009f20  56 d6 3c c9 26 38 30 38  43 36 3a 24 68 60 25 28  |V.<.&808C6:$h`%(|
00009f30  53 62 25 29 3d a4 61 62  28 22 54 61 73 6b 53 75  |Sb%)=.ab("TaskSu|
00009f40  73 70 22 2c 59 60 24 28  53 62 25 29 29 3a f2 65  |sp",Y`$(Sb%)):.e|
00009f50  62 28 64 60 25 28 53 62  25 29 29 0d 56 e0 3b c9  |b(d`%(Sb%)).V.;.|
00009f60  26 38 30 38 43 37 3a 24  68 60 25 28 53 62 25 29  |&808C7:$h`%(Sb%)|
00009f70  3d a4 61 62 28 22 54 61  73 6b 52 75 6e 22 2c 59  |=.ab("TaskRun",Y|
00009f80  60 24 28 53 62 25 29 29  3a f2 65 62 28 64 60 25  |`$(Sb%)):.eb(d`%|
00009f90  28 53 62 25 29 29 0d 56  ea 05 cb 0d 56 f4 0b 53  |(Sb%)).V....V..S|
00009fa0  62 25 3d 57 60 25 0d 56  fe 05 cd 0d 57 08 05 ed  |b%=W`%.V....W...|
00009fb0  0d 57 12 05 e1 0d 57 26  0c dd a4 55 65 28 41 24  |.W....W&...Ue(A$|
00009fc0  29 0d 57 30 14 ea 66 25  2c 72 25 2c 50 67 24 2c  |).W0..f%,r%,Pg$,|
00009fd0  42 24 2c 43 24 0d 57 3a  2b 50 67 24 3d 22 22 3a  |B$,C$.W:+Pg$="":|
00009fe0  66 25 3d 30 3a c8 95 6e  60 25 28 66 25 29 3c 3e  |f%=0:..n`%(f%)<>|
00009ff0  30 80 66 25 3c 6d 60 25  3a 66 25 2b 3d 31 3a ce  |0.f%<m`%:f%+=1:.|
0000a000  0d 57 44 24 e7 66 25 3d  6d 60 25 8c f2 72 62 28  |.WD$.f%=m`%..rb(|
0000a010  a4 51 5f 28 22 45 66 75  6c 6c 66 69 6c 65 22 29  |.Q_("Efullfile")|
0000a020  29 3a 3d 30 0d 57 4e 1f  6f 60 24 28 66 25 29 3d  |):=0.WN.o`$(f%)=|
0000a030  22 22 3a 70 60 25 28 66  25 29 3d 31 3a 72 25 3d  |"":p`%(f%)=1:r%=|
0000a040  26 34 46 0d 57 58 0f f5  42 24 3d a4 77 62 28 41  |&4F.WX..B$=.wb(A|
0000a050  24 29 0d 57 62 10 e7 c0  42 24 2c 31 29 3d 22 2f  |$).Wb...B$,1)="/|
0000a060  22 8c 0d 57 6c 0e 43 24  3d a4 78 62 28 42 24 29  |"..Wl.C$=.xb(B$)|
0000a070  0d 57 76 0d c8 8e c0 42  24 2c 32 29 ca 0d 57 80  |.Wv....B$,2)..W.|
0000a080  19 c9 22 6e 61 22 2c 22  69 64 22 3a 6f 60 24 28  |.."na","id":o`$(|
0000a090  66 25 29 3d 43 24 0d 57  8a 1a c9 22 72 65 22 3a  |f%)=C$.W..."re":|
0000a0a0  70 60 25 28 66 25 29 3d  31 3a 72 25 3d 26 34 46  |p`%(f%)=1:r%=&4F|
0000a0b0  0d 57 94 1a c9 22 77 72  22 3a 70 60 25 28 66 25  |.W..."wr":p`%(f%|
0000a0c0  29 3d 32 3a 72 25 3d 26  38 46 0d 57 9e 1a c9 22  |)=2:r%=&8F.W..."|
0000a0d0  72 77 22 3a 70 60 25 28  66 25 29 3d 33 3a 72 25  |rw":p`%(f%)=3:r%|
0000a0e0  3d 26 43 46 0d 57 a8 10  c9 22 65 72 22 3a 50 67  |=&CF.W..."er":Pg|
0000a0f0  24 3d 43 24 0d 57 b2 05  cb 0d 57 bc 05 cc 0d 57  |$=C$.W....W....W|
0000a100  c6 0e 71 60 24 28 66 25  29 3d 42 24 0d 57 d0 05  |..q`$(f%)=B$.W..|
0000a110  cd 0d 57 da 0a fd 41 24  3d 22 22 0d 57 e4 2e e7  |..W...A$="".W...|
0000a120  6f 60 24 28 66 25 29 3e  22 22 8c c8 99 31 33 31  |o`$(f%)>""...131|
0000a130  30 38 35 2c 72 25 2c 71  60 24 28 66 25 29 b8 6e  |085,r%,q`$(f%).n|
0000a140  60 25 28 66 25 29 3b 46  25 0d 57 ee 0f e7 28 46  |`%(f%);F%.W...(F|
0000a150  25 80 31 29 3c 3e 30 8c  0d 57 f8 18 6e 60 25 28  |%.1)<>0..W..n`%(|
0000a160  66 25 29 3d 30 3a 6f 60  24 28 66 25 29 3d 22 22  |f%)=0:o`$(f%)=""|
0000a170  0d 58 02 2d e7 50 67 24  3d 22 22 8c f2 72 62 28  |.X.-.Pg$=""..rb(|
0000a180  a4 51 5f 28 22 45 66 69  6c 65 66 61 69 6c 22 29  |.Q_("Efilefail")|
0000a190  29 3a 8b f2 52 62 28 50  67 24 2c 39 29 0d 58 0c  |):..Rb(Pg$,9).X.|
0000a1a0  05 cc 0d 58 16 27 e7 70  60 25 28 66 25 29 3d 32  |...X.'.p`%(f%)=2|
0000a1b0  8c c8 99 31 33 31 30 38  30 2c 31 38 2c 71 60 24  |...131080,18,q`$|
0000a1c0  28 66 25 29 2c 26 46 46  46 0d 58 20 05 cd 0d 58  |(f%),&FFF.X ...X|
0000a1d0  2a 0c 3d 6e 60 25 28 66  25 29 0d 58 3e 0c dd a4  |*.=n`%(f%).X>...|
0000a1e0  56 65 28 41 24 29 0d 58  48 10 ea 6e 25 2c 72 25  |Ve(A$).XH..n%,r%|
0000a1f0  2c 42 24 2c 43 24 0d 58  52 08 72 25 3d 30 0d 58  |,B$,C$.XR.r%=0.X|
0000a200  5c 0f f5 42 24 3d a4 77  62 28 41 24 29 0d 58 66  |\..B$=.wb(A$).Xf|
0000a210  10 e7 c0 42 24 2c 31 29  3d 22 2f 22 8c 0d 58 70  |...B$,1)="/"..Xp|
0000a220  0e 43 24 3d a4 78 62 28  42 24 29 0d 58 7a 0d c8  |.C$=.xb(B$).Xz..|
0000a230  8e c0 42 24 2c 32 29 ca  0d 58 84 18 c9 22 6e 61  |..B$,2)..X..."na|
0000a240  22 2c 22 69 64 22 3a e3  6e 25 3d 30 b8 6d 60 25  |","id":.n%=0.m`%|
0000a250  0d 58 8e 33 e7 6f 60 24  28 6e 25 29 3d 43 24 8c  |.X.3.o`$(n%)=C$.|
0000a260  f2 4d 61 28 6e 60 25 28  6e 25 29 29 3a 6f 60 24  |.Ma(n`%(n%)):o`$|
0000a270  28 6e 25 29 3d 22 22 3a  6e 25 3d 6d 60 25 3a 72  |(n%)="":n%=m`%:r|
0000a280  25 3d 31 0d 58 98 05 ed  0d 58 a2 05 cb 0d 58 ac  |%=1.X....X....X.|
0000a290  05 cd 0d 58 b6 0a fd 41  24 3d 22 22 0d 58 c0 07  |...X...A$="".X..|
0000a2a0  3d 72 25 0d 58 d4 0c dd  a4 57 65 28 41 24 29 0d  |=r%.X....We(A$).|
0000a2b0  58 de 14 ea 66 25 2c 72  25 2c 51 67 24 2c 42 24  |X...f%,r%,Qg$,B$|
0000a2c0  2c 43 24 0d 58 e8 15 66  25 3d 2d 31 3a 72 25 3d  |,C$.X..f%=-1:r%=|
0000a2d0  30 3a 51 67 24 3d 22 22  0d 58 f2 0f f5 42 24 3d  |0:Qg$="".X...B$=|
0000a2e0  a4 77 62 28 41 24 29 0d  58 fc 10 e7 c0 42 24 2c  |.wb(A$).X....B$,|
0000a2f0  31 29 3d 22 2f 22 8c 0d  59 06 0e 43 24 3d a4 78  |1)="/"..Y..C$=.x|
0000a300  62 28 42 24 29 0d 59 10  0d c8 8e c0 42 24 2c 32  |b(B$).Y.....B$,2|
0000a310  29 ca 0d 59 1a 19 c9 22  6e 61 22 2c 22 69 64 22  |)..Y..."na","id"|
0000a320  3a 66 25 3d a4 52 67 28  43 24 29 0d 59 24 11 c9  |:f%=.Rg(C$).Y$..|
0000a330  22 65 6f 66 22 3a 51 67  24 3d 43 24 0d 59 2e 05  |"eof":Qg$=C$.Y..|
0000a340  cb 0d 59 38 05 cc 0d 59  42 12 e7 66 25 3e 2d 31  |..Y8...YB..f%>-1|
0000a350  80 66 25 3c 6d 60 25 8c  0d 59 4c 29 e7 28 70 60  |.f%<m`%..YL).(p`|
0000a360  25 28 66 25 29 80 31 29  3d 30 8c f2 72 62 28 a4  |%(f%).1)=0..rb(.|
0000a370  51 5f 28 22 45 6e 6f 72  65 61 64 22 29 29 3a 3d  |Q_("Enoread")):=|
0000a380  30 0d 59 56 26 e7 ac c5  23 6e 60 25 28 66 25 29  |0.YV&...#n`%(f%)|
0000a390  8c f2 5a 61 28 42 24 2c  be 23 6e 60 25 28 66 25  |..Za(B$,.#n`%(f%|
0000a3a0  29 29 3a 72 25 3d 31 0d  59 60 20 e7 c5 23 6e 60  |)):r%=1.Y` ..#n`|
0000a3b0  25 28 66 25 29 80 51 67  24 3e 22 22 8c f2 52 62  |%(f%).Qg$>""..Rb|
0000a3c0  28 51 67 24 2c 39 29 0d  59 6a 05 cd 0d 59 74 05  |(Qg$,9).Yj...Yt.|
0000a3d0  cd 0d 59 7e 0a fd 41 24  3d 22 22 0d 59 88 07 3d  |..Y~..A$="".Y..=|
0000a3e0  72 25 0d 59 9c 0c dd a4  58 65 28 41 24 29 0d 59  |r%.Y....Xe(A$).Y|
0000a3f0  a6 10 ea 66 25 2c 72 25  2c 42 24 2c 43 24 0d 59  |...f%,r%,B$,C$.Y|
0000a400  b0 0e 66 25 3d 2d 31 3a  72 25 3d 30 0d 59 ba 0f  |..f%=-1:r%=0.Y..|
0000a410  f5 42 24 3d a4 77 62 28  41 24 29 0d 59 c4 10 e7  |.B$=.wb(A$).Y...|
0000a420  c0 42 24 2c 31 29 3d 22  2f 22 8c 0d 59 ce 0e 43  |.B$,1)="/"..Y..C|
0000a430  24 3d a4 78 62 28 42 24  29 0d 59 d8 0d c8 8e c0  |$=.xb(B$).Y.....|
0000a440  42 24 2c 32 29 ca 0d 59  e2 19 c9 22 6e 61 22 2c  |B$,2)..Y..."na",|
0000a450  22 69 64 22 3a 66 25 3d  a4 52 67 28 43 24 29 0d  |"id":f%=.Rg(C$).|
0000a460  59 ec 05 cb 0d 59 f6 05  cc 0d 5a 00 12 e7 66 25  |Y....Y....Z...f%|
0000a470  3e 2d 31 80 66 25 3c 6d  60 25 8c 0d 5a 0a 2a e7  |>-1.f%<m`%..Z.*.|
0000a480  28 70 60 25 28 66 25 29  80 32 29 3d 30 8c f2 72  |(p`%(f%).2)=0..r|
0000a490  62 28 a4 51 5f 28 22 45  6e 6f 77 72 69 74 65 22  |b(.Q_("Enowrite"|
0000a4a0  29 29 3a 3d 30 0d 5a 14  10 d5 23 6e 60 25 28 66  |)):=0.Z...#n`%(f|
0000a4b0  25 29 2c 42 24 0d 5a 1e  05 cd 0d 5a 28 05 cd 0d  |%),B$.Z....Z(...|
0000a4c0  5a 32 0a fd 41 24 3d 22  22 0d 5a 3c 07 3d 72 25  |Z2..A$="".Z<.=r%|
0000a4d0  0d 5a 50 0c dd a4 46 64  28 41 24 29 0d 5a 5a 13  |.ZP...Fd(A$).ZZ.|
0000a4e0  ea 66 25 2c 72 25 2c 73  25 2c 42 24 2c 43 24 0d  |.f%,r%,s%,B$,C$.|
0000a4f0  5a 64 0f 66 25 3d 2d 31  3a 73 25 3d 2d 31 0d 5a  |Zd.f%=-1:s%=-1.Z|
0000a500  6e 0f f5 42 24 3d a4 77  62 28 41 24 29 0d 5a 78  |n..B$=.wb(A$).Zx|
0000a510  10 e7 c0 42 24 2c 31 29  3d 22 2f 22 8c 0d 5a 82  |...B$,1)="/"..Z.|
0000a520  0e 43 24 3d a4 78 62 28  42 24 29 0d 5a 8c 0d c8  |.C$=.xb(B$).Z...|
0000a530  8e c0 42 24 2c 32 29 ca  0d 5a 96 19 c9 22 6e 61  |..B$,2)..Z..."na|
0000a540  22 2c 22 69 64 22 3a 66  25 3d a4 52 67 28 43 24  |","id":f%=.Rg(C$|
0000a550  29 0d 5a a0 26 c9 22 73  65 22 3a e7 a4 72 63 28  |).Z.&."se":..rc(|
0000a560  43 24 29 3d 22 65 6f 66  22 8c 73 25 3d 2d 32 3a  |C$)="eof".s%=-2:|
0000a570  8b 73 25 3d bb 43 24 0d  5a aa 05 cb 0d 5a b4 05  |.s%=.C$.Z....Z..|
0000a580  cd 0d 5a be 0a fd 41 24  3d 22 22 0d 5a c8 08 72  |..Z...A$="".Z..r|
0000a590  25 3d 30 0d 5a d2 16 e7  66 25 3e 2d 31 80 6e 60  |%=0.Z...f%>-1.n`|
0000a5a0  25 28 66 25 29 3c 3e 30  8c 0d 5a dc 33 e7 73 25  |%(f%)<>0..Z.3.s%|
0000a5b0  3d 2d 32 8c cf 23 6e 60  25 28 66 25 29 3d a2 23  |=-2..#n`%(f%)=.#|
0000a5c0  6e 60 25 28 66 25 29 3a  8b e7 73 25 3e 3d 30 8c  |n`%(f%):..s%>=0.|
0000a5d0  cf 23 6e 60 25 28 66 25  29 3d 73 25 0d 5a e6 10  |.#n`%(f%)=s%.Z..|
0000a5e0  72 25 3d 8f 23 6e 60 25  28 66 25 29 0d 5a f0 05  |r%=.#n`%(f%).Z..|
0000a5f0  cd 0d 5a fa 07 3d 72 25  0d 5b 0e 08 dd f2 72 66  |..Z..=r%.[....rf|
0000a600  0d 5b 18 20 f2 74 66 28  22 49 64 65 6e 74 69 66  |.[. .tf("Identif|
0000a610  69 65 72 22 2c 22 46 69  6c 65 6e 61 6d 65 22 29  |ier","Filename")|
0000a620  0d 5b 22 11 ea 66 25 3a  e3 66 25 3d 30 b8 6d 60  |.["..f%:.f%=0.m`|
0000a630  25 0d 5b 2c 23 e7 6e 60  25 28 66 25 29 3e 30 8c  |%.[,#.n`%(f%)>0.|
0000a640  f2 74 66 28 6f 60 24 28  66 25 29 2c 71 60 24 28  |.tf(o`$(f%),q`$(|
0000a650  66 25 29 29 0d 5b 36 05  ed 0d 5b 40 05 e1 0d 5b  |f%)).[6...[@...[|
0000a660  54 0c dd a4 52 67 28 41  24 29 0d 5b 5e 29 ea 66  |T...Rg(A$).[^).f|
0000a670  25 3a 66 25 3d 30 3a c8  95 6f 60 24 28 66 25 29  |%:f%=0:..o`$(f%)|
0000a680  3c 3e 43 24 80 66 25 3c  6d 60 25 3a 66 25 2b 3d  |<>C$.f%<m`%:f%+=|
0000a690  31 3a ce 0d 5b 68 22 e7  66 25 3d 6d 60 25 8c f2  |1:..[h".f%=m`%..|
0000a6a0  72 62 28 a4 51 5f 28 22  45 66 69 6c 65 69 64 22  |rb(.Q_("Efileid"|
0000a6b0  29 29 3a 3d 30 0d 5b 72  07 3d 66 25 0d 5b 86 0c  |)):=0.[r.=f%.[..|
0000a6c0  dd f2 66 65 28 41 24 29  0d 5b 90 2e ea 6e 25 2c  |..fe(A$).[...n%,|
0000a6d0  6c 25 2c 6d 24 2c 6e 24  2c 61 24 2c 62 24 2c 42  |l%,m$,n$,a$,b$,B|
0000a6e0  24 2c 43 24 3a 6e 25 3d  2d 31 3a 6d 24 3d 22 22  |$,C$:n%=-1:m$=""|
0000a6f0  3a 6e 24 3d 22 22 0d 5b  9a 0f f5 42 24 3d a4 77  |:n$="".[...B$=.w|
0000a700  62 28 41 24 29 0d 5b a4  10 e7 c0 42 24 2c 31 29  |b(A$).[....B$,1)|
0000a710  3d 22 2f 22 8c 0d 5b ae  0e 43 24 3d a4 78 62 28  |="/"..[..C$=.xb(|
0000a720  42 24 29 0d 5b b8 0d c8  8e c0 42 24 2c 32 29 ca  |B$).[.....B$,2).|
0000a730  0d 5b c2 0f c9 22 63 6f  22 3a 6e 25 3d 2d 32 0d  |.[..."co":n%=-2.|
0000a740  5b cc 32 c9 22 69 63 22  3a 6e 25 3d 30 3a f5 6e  |[.2."ic":n%=0:.n|
0000a750  25 2b 3d 31 3a fd 52 60  24 28 6e 25 29 3d 43 24  |%+=1:.R`$(n%)=C$|
0000a760  84 50 60 25 28 6e 25 29  3d 30 84 6e 25 3d 4e 60  |.P`%(n%)=0.n%=N`|
0000a770  25 0d 5b d6 2a e7 6e 25  3d 4e 60 25 84 43 24 3d  |%.[.*.n%=N`%.C$=|
0000a780  22 22 8c f2 5a 62 28 a4  51 5f 28 22 45 69 63 6f  |""..Zb(.Q_("Eico|
0000a790  6e 31 22 29 29 3a 6e 25  3d 2d 35 0d 5b e0 05 cb  |n1")):n%=-5.[...|
0000a7a0  0d 5b ea 05 cc 0d 5b f4  0f 6c 25 3d a7 42 24 2c  |.[....[..l%=.B$,|
0000a7b0  22 3a 22 29 0d 5b fe 0a  e7 6c 25 3e 30 8c 0d 5c  |":").[...l%>0..\|
0000a7c0  08 1d 61 24 3d c0 42 24  2c 6c 25 2d 31 29 3a 62  |..a$=.B$,l%-1):b|
0000a7d0  24 3d c1 42 24 2c 6c 25  2b 31 29 0d 5c 12 05 cc  |$=.B$,l%+1).\...|
0000a7e0  0d 5c 1c 0f 61 24 3d 42  24 3a 62 24 3d 22 22 0d  |.\..a$=B$:b$="".|
0000a7f0  5c 26 05 cd 0d 5c 30 2b  e7 61 24 3d 22 22 84 62  |\&...\0+.a$="".b|
0000a800  24 3d 22 22 8c f2 72 62  28 a4 61 62 28 22 45 6d  |$=""..rb(.ab("Em|
0000a810  65 6e 75 22 2c 42 24 29  29 3a 41 24 3d 22 22 0d  |enu",B$)):A$="".|
0000a820  5c 3a 1d e7 a9 6d 24 2b  a9 61 24 3c 32 35 32 80  |\:...m$+.a$<252.|
0000a830  a9 6e 24 2b a9 62 24 3c  32 35 32 8c 0d 5c 44 17  |.n$+.b$<252..\D.|
0000a840  6d 24 2b 3d 61 24 2b bd  30 3a 6e 24 2b 3d 62 24  |m$+=a$+.0:n$+=b$|
0000a850  2b bd 30 0d 5c 4e 05 cc  0d 5c 58 1e f2 72 62 28  |+.0.\N...\X..rb(|
0000a860  a4 51 5f 28 22 45 62 69  67 6d 65 6e 75 22 29 29  |.Q_("Ebigmenu"))|
0000a870  3a 41 24 3d 22 22 0d 5c  62 05 cd 0d 5c 6c 05 cd  |:A$="".\b...\l..|
0000a880  0d 5c 76 0a fd 41 24 3d  22 22 0d 5c 80 1d e7 c2  |.\v..A$="".\....|
0000a890  6d 24 2c 31 29 3d 22 20  22 8c 6d 24 3d c0 6d 24  |m$,1)=" ".m$=.m$|
0000a8a0  2c a9 6d 24 2d 31 29 0d  5c 8a 09 c8 8e 6e 25 ca  |,.m$-1).\....n%.|
0000a8b0  0d 5c 94 1b c9 2d 31 3a  60 5f 24 28 30 29 3d 6d  |.\...-1:`_$(0)=m|
0000a8c0  24 3a 60 5f 24 28 31 29  3d 6e 24 0d 5c 9e 1b c9  |$:`_$(1)=n$.\...|
0000a8d0  2d 32 3a 41 60 24 28 30  29 3d 6d 24 3a 41 60 24  |-2:A`$(0)=m$:A`$|
0000a8e0  28 31 29 3d 6e 24 0d 5c  a8 2e 7f 3a e7 6e 25 3e  |(1)=n$.\...:.n%>|
0000a8f0  3d 30 80 6e 25 3c 3d 4e  60 25 8c 51 60 24 28 6e  |=0.n%<=N`%.Q`$(n|
0000a900  25 2c 30 29 3d 6d 24 3a  51 60 24 28 6e 25 2c 31  |%,0)=m$:Q`$(n%,1|
0000a910  29 3d 6e 24 0d 5c b2 05  cb 0d 5c bc 05 e1 0d 5c  |)=n$.\....\....\|
0000a920  d0 0f dd a4 6e 62 28 41  24 2c 42 24 29 0d 5c da  |....nb(A$,B$).\.|
0000a930  19 ea 75 24 2c 61 24 2c  62 24 3a 5f 5f 25 3d 30  |..u$,a$,b$:__%=0|
0000a940  3a 75 24 3d 22 22 0d 5c  e4 05 f5 0d 5c ee 0a 5f  |:u$="".\....\.._|
0000a950  5f 25 2b 3d 31 0d 5c f8  1f 61 24 3d a4 53 67 28  |_%+=1.\..a$=.Sg(|
0000a960  41 24 2c bd 30 29 3a 62  24 3d a4 53 67 28 42 24  |A$,.0):b$=.Sg(B$|
0000a970  2c bd 30 29 0d 5d 02 2a  75 24 2b 3d 22 2c 22 2b  |,.0).].*u$+=","+|
0000a980  61 24 3a 5f 5f 24 28 5f  5f 25 2c 30 29 3d 61 24  |a$:__$(__%,0)=a$|
0000a990  3a 5f 5f 24 28 5f 5f 25  2c 31 29 3d 62 24 0d 5d  |:__$(__%,1)=b$.]|
0000a9a0  0c 1c fd 41 24 3d 22 22  84 5f 5f 25 3d 7a 5f 25  |...A$="".__%=z_%|
0000a9b0  3a 75 24 3d c1 75 24 2c  32 29 0d 5d 16 07 3d 75  |:u$=.u$,2).]..=u|
0000a9c0  24 0d 5d 2a 08 dd f2 53  63 0d 5d 34 07 ea 43 24  |$.]*...Sc.]4..C$|
0000a9d0  0d 5d 3e 30 e7 60 5f 24  28 30 29 3e 22 22 8c 43  |.]>0.`_$(0)>"".C|
0000a9e0  24 3d a4 6e 62 28 60 5f  24 28 30 29 2c 60 5f 24  |$=.nb(`_$(0),`_$|
0000a9f0  28 31 29 29 3a f2 54 67  28 22 75 73 65 72 22 29  |(1)):.Tg("user")|
0000aa00  0d 5d 48 31 e7 41 60 24  28 30 29 3e 22 22 8c 43  |.]H1.A`$(0)>"".C|
0000aa10  24 3d a4 6e 62 28 41 60  24 28 30 29 2c 41 60 24  |$=.nb(A`$(0),A`$|
0000aa20  28 31 29 29 3a f2 54 67  28 22 64 65 62 75 67 22  |(1)):.Tg("debug"|
0000aa30  29 0d 5d 52 0d e3 5a 25  3d 30 b8 4e 60 25 0d 5d  |).]R..Z%=0.N`%.]|
0000aa40  5c 43 e7 51 60 24 28 5a  25 2c 30 29 3e 22 22 8c  |\C.Q`$(Z%,0)>"".|
0000aa50  43 24 3d a4 6e 62 28 51  60 24 28 5a 25 2c 30 29  |C$=.nb(Q`$(Z%,0)|
0000aa60  2c 51 60 24 28 5a 25 2c  31 29 29 3a f2 54 67 28  |,Q`$(Z%,1)):.Tg(|
0000aa70  22 69 63 6f 6e 3a 20 22  2b 52 60 24 28 5a 25 29  |"icon: "+R`$(Z%)|
0000aa80  29 0d 5d 66 05 ed 0d 5d  70 05 e1 0d 5d 84 0c dd  |).]f...]p...]...|
0000aa90  f2 54 67 28 74 24 29 0d  5d 8e 07 ea 6c 25 0d 5d  |.Tg(t$).]...l%.]|
0000aaa0  98 28 f2 50 5f 28 22 4c  61 62 65 6c 20 20 20 20  |.(.P_("Label    |
0000aab0  20 20 20 20 20 41 63 74  69 6f 6e 20 28 22 2b 74  |     Action ("+t|
0000aac0  24 2b 22 29 22 29 0d 5d  a2 0d e3 6c 25 3d 31 b8  |$+")").]...l%=1.|
0000aad0  5f 5f 25 0d 5d ac 1c f2  74 66 28 5f 5f 24 28 6c  |__%.]...tf(__$(l|
0000aae0  25 2c 30 29 2c 5f 5f 24  28 6c 25 2c 31 29 29 0d  |%,0),__$(l%,1)).|
0000aaf0  5d b6 05 ed 0d 5d c0 05  e1 0d 5d d4 0c dd f2 69  |]....]....]....i|
0000ab00  65 28 41 24 29 0d 5d de  0a ea 42 24 2c 43 24 0d  |e(A$).]...B$,C$.|
0000ab10  5d e8 0f f5 42 24 3d a4  77 62 28 41 24 29 0d 5d  |]...B$=.wb(A$).]|
0000ab20  f2 0d c8 8e c0 42 24 2c  31 29 ca 0d 5d fc 36 c9  |.....B$,1)..].6.|
0000ab30  22 2f 22 3a 43 24 3d a4  78 62 28 42 24 29 3a f2  |"/":C$=.xb(B$):.|
0000ab40  5a 62 28 22 51 75 61 6c  69 66 69 65 72 20 2f 22  |Zb("Qualifier /"|
0000ab50  2b 42 24 2b 22 20 76 61  6c 75 65 3d 22 2b 43 24  |+B$+" value="+C$|
0000ab60  29 0d 5e 06 1a 7f 3a f2  5a 62 28 22 50 61 72 61  |).^...:.Zb("Para|
0000ab70  6d 65 74 65 72 20 22 2b  42 24 29 0d 5e 10 05 cb  |meter "+B$).^...|
0000ab80  0d 5e 1a 0a fd 41 24 3d  22 22 0d 5e 24 05 e1 0d  |.^...A$="".^$...|
0000ab90  5e 38 0e dd a4 75 64 28  f8 55 62 24 29 0d 5e 42  |^8...ud(.Ub$).^B|
0000aba0  23 ea 42 24 2c 41 25 2c  42 25 2c 46 25 2c 55 67  |#.B$,A%,B%,F%,Ug|
0000abb0  25 2c 56 67 25 2c 57 67  25 2c 58 67 25 2c 6c 25  |%,Vg%,Wg%,Xg%,l%|
0000abc0  0d 5e 4c 33 42 24 3d 22  22 3a 42 25 3d 30 3a 55  |.^L3B$="":B%=0:U|
0000abd0  67 25 3d 30 3a 56 67 25  3d 30 3a 57 67 25 3d 30  |g%=0:Vg%=0:Wg%=0|
0000abe0  3a 58 67 25 3d 30 3a 46  25 3d 30 3a 6c 25 3d a9  |:Xg%=0:F%=0:l%=.|
0000abf0  55 62 24 0d 5e 56 0f e7  55 62 24 3d 22 22 8c 3d  |Ub$.^V..Ub$="".=|
0000ac00  22 22 0d 5e 60 1a f5 3a  42 25 2b 3d 31 3a 41 25  |"".^`..:B%+=1:A%|
0000ac10  3d 97 c1 55 62 24 2c 42  25 2c 31 29 0d 5e 6a 0c  |=..Ub$,B%,1).^j.|
0000ac20  e7 58 67 25 3d 39 32 8c  0d 5e 74 11 42 24 2b 3d  |.Xg%=92..^t.B$+=|
0000ac30  bd 41 25 3a 58 67 25 3d  30 0d 5e 7e 05 cc 0d 5e  |.A%:Xg%=0.^~...^|
0000ac40  88 17 e7 41 25 3d 33 34  80 56 67 25 3d 30 8c 55  |...A%=34.Vg%=0.U|
0000ac50  67 25 2b 3d 31 0d 5e 92  0d e7 55 67 25 83 32 3d  |g%+=1.^...Ug%.2=|
0000ac60  30 8c 0d 5e 9c 11 e7 41  25 3d 34 30 8c 56 67 25  |0..^...A%=40.Vg%|
0000ac70  2b 3d 31 0d 5e a6 11 e7  41 25 3d 34 31 8c 56 67  |+=1.^...A%=41.Vg|
0000ac80  25 2d 3d 31 0d 5e b0 12  e7 41 25 3d 31 32 33 8c  |%-=1.^...A%=123.|
0000ac90  57 67 25 2b 3d 31 0d 5e  ba 12 e7 41 25 3d 31 32  |Wg%+=1.^...A%=12|
0000aca0  35 8c 57 67 25 2d 3d 31  0d 5e c4 15 e7 56 67 25  |5.Wg%-=1.^...Vg%|
0000acb0  3d 30 80 28 55 67 25 83  32 29 3d 30 8c 0d 5e ce  |=0.(Ug%.2)=0..^.|
0000acc0  14 e7 41 25 3d 35 39 80  42 25 3e 31 8c 46 25 3d  |..A%=59.B%>1.F%=|
0000acd0  b9 0d 5e d8 05 cd 0d 5e  e2 05 cd 0d 5e ec 1f 58  |..^....^....^..X|
0000ace0  67 25 3d 41 25 3a e7 46  25 3d 30 80 41 25 3c 3e  |g%=A%:.F%=0.A%<>|
0000acf0  39 32 8c 42 24 2b 3d bd  41 25 0d 5e f6 05 cd 0d  |92.B$+=.A%.^....|
0000ad00  5f 00 1d fd 46 25 3c 3e  30 84 42 25 3d 6c 25 3a  |_...F%<>0.B%=l%:|
0000ad10  e7 42 25 3d 6c 25 8c 42  25 2b 3d 31 0d 5f 0a 17  |.B%=l%.B%+=1._..|
0000ad20  55 62 24 3d a4 59 67 28  c1 55 62 24 2c 42 25 2b  |Ub$=.Yg(.Ub$,B%+|
0000ad30  31 29 29 0d 5f 14 0e 42  24 3d a4 53 66 28 42 24  |1))._..B$=.Sf(B$|
0000ad40  29 0d 5f 1e 0c 3d a4 59  67 28 42 24 29 0d 5f 32  |)._..=.Yg(B$)._2|
0000ad50  0c dd a4 53 66 28 41 24  29 0d 5f 3c 1c ea 6c 25  |...Sf(A$)._<..l%|
0000ad60  2c 66 25 2c 63 25 2c 61  24 2c 6c 24 2c 42 24 3a  |,f%,c%,a$,l$,B$:|
0000ad70  6c 24 3d 22 22 0d 5f 46  1a 63 25 3d a7 41 24 2c  |l$=""._F.c%=.A$,|
0000ad80  22 25 22 29 3a e7 63 25  3d 30 8c 3a 3d 41 24 0d  |"%"):.c%=0.:=A$.|
0000ad90  5f 50 16 63 25 3d 63 25  2d 32 3a e7 63 25 3c 30  |_P.c%=c%-2:.c%<0|
0000ada0  8c 63 25 3d 30 0d 5f 5a  0e 42 24 3d c0 41 24 2c  |.c%=0._Z.B$=.A$,|
0000adb0  63 25 29 0d 5f 64 17 f5  63 25 2b 3d 31 3a 61 24  |c%)._d..c%+=1:a$|
0000adc0  3d c1 41 24 2c 63 25 2c  31 29 0d 5f 6e 0c e7 6c  |=.A$,c%,1)._n..l|
0000add0  24 3d 22 5c 22 8c 0d 5f  78 10 42 24 2b 3d 61 24  |$="\".._x.B$+=a$|
0000ade0  3a 6c 24 3d 22 22 0d 5f  82 05 cc 0d 5f 8c 0c e7  |:l$=""._...._...|
0000adf0  61 24 3d 22 25 22 8c 0d  5f 96 0d e3 6c 25 3d 30  |a$="%".._...l%=0|
0000ae00  b8 45 60 25 0d 5f a0 56  e7 46 60 24 28 6c 25 2c  |.E`%._.V.F`$(l%,|
0000ae10  30 29 3e 22 22 80 46 60  24 28 6c 25 2c 30 29 3d  |0)>"".F`$(l%,0)=|
0000ae20  c1 41 24 2c 63 25 2b 31  2c a9 46 60 24 28 6c 25  |.A$,c%+1,.F`$(l%|
0000ae30  2c 30 29 29 8c 42 24 2b  3d 46 60 24 28 6c 25 2c  |,0)).B$+=F`$(l%,|
0000ae40  31 29 3a 63 25 2b 3d a9  46 60 24 28 6c 25 2c 30  |1):c%+=.F`$(l%,0|
0000ae50  29 3a 6c 25 3d 45 60 25  2b 31 0d 5f aa 05 ed 0d  |):l%=E`%+1._....|
0000ae60  5f b4 13 e7 6c 25 3d 45  60 25 8c 42 24 2b 3d 22  |_...l%=E`%.B$+="|
0000ae70  25 22 0d 5f be 05 cc 0d  5f c8 10 42 24 2b 3d 61  |%"._...._..B$+=a|
0000ae80  24 3a 6c 24 3d 61 24 0d  5f d2 05 cd 0d 5f dc 05  |$:l$=a$._...._..|
0000ae90  cd 0d 5f e6 0c fd 63 25  3e 3d a9 41 24 0d 5f f0  |.._...c%>=.A$._.|
0000aea0  07 3d 42 24 0d 60 04 0e  dd a4 77 62 28 f8 55 62  |.=B$.`....wb(.Ub|
0000aeb0  24 29 0d 60 0e 23 ea 42  24 2c 41 25 2c 42 25 2c  |$).`.#.B$,A%,B%,|
0000aec0  46 25 2c 55 67 25 2c 56  67 25 2c 57 67 25 2c 58  |F%,Ug%,Vg%,Wg%,X|
0000aed0  67 25 2c 6c 25 0d 60 18  33 42 24 3d 22 22 3a 42  |g%,l%.`.3B$="":B|
0000aee0  25 3d 30 3a 55 67 25 3d  30 3a 56 67 25 3d 30 3a  |%=0:Ug%=0:Vg%=0:|
0000aef0  57 67 25 3d 30 3a 58 67  25 3d 30 3a 46 25 3d 30  |Wg%=0:Xg%=0:F%=0|
0000af00  3a 6c 25 3d a9 55 62 24  0d 60 22 0f e7 55 62 24  |:l%=.Ub$.`"..Ub$|
0000af10  3d 22 22 8c 3d 22 22 0d  60 2c 1a f5 3a 42 25 2b  |="".="".`,..:B%+|
0000af20  3d 31 3a 41 25 3d 97 c1  55 62 24 2c 42 25 2c 31  |=1:A%=..Ub$,B%,1|
0000af30  29 0d 60 36 0c e7 58 67  25 3d 39 32 8c 0d 60 40  |).`6..Xg%=92..`@|
0000af40  11 42 24 2b 3d bd 41 25  3a 58 67 25 3d 30 0d 60  |.B$+=.A%:Xg%=0.`|
0000af50  4a 05 cc 0d 60 54 17 e7  41 25 3d 33 34 80 56 67  |J...`T..A%=34.Vg|
0000af60  25 3d 30 8c 55 67 25 2b  3d 31 0d 60 5e 0d e7 55  |%=0.Ug%+=1.`^..U|
0000af70  67 25 83 32 3d 30 8c 0d  60 68 11 e7 41 25 3d 34  |g%.2=0..`h..A%=4|
0000af80  30 8c 56 67 25 2b 3d 31  0d 60 72 11 e7 41 25 3d  |0.Vg%+=1.`r..A%=|
0000af90  34 31 8c 56 67 25 2d 3d  31 0d 60 7c 12 e7 41 25  |41.Vg%-=1.`|..A%|
0000afa0  3d 31 32 33 8c 57 67 25  2b 3d 31 0d 60 86 12 e7  |=123.Wg%+=1.`...|
0000afb0  41 25 3d 31 32 35 8c 57  67 25 2d 3d 31 0d 60 90  |A%=125.Wg%-=1.`.|
0000afc0  11 e7 56 67 25 3d 30 80  57 67 25 3d 30 8c 0d 60  |..Vg%=0.Wg%=0..`|
0000afd0  9a 1c e7 28 41 25 3d 33  32 84 41 25 3d 34 37 29  |...(A%=32.A%=47)|
0000afe0  80 42 25 3e 31 8c 46 25  3d b9 0d 60 a4 05 cd 0d  |.B%>1.F%=..`....|
0000aff0  60 ae 05 cd 0d 60 b8 1f  58 67 25 3d 41 25 3a e7  |`....`..Xg%=A%:.|
0000b000  46 25 3d 30 80 41 25 3c  3e 39 32 8c 42 24 2b 3d  |F%=0.A%<>92.B$+=|
0000b010  bd 41 25 0d 60 c2 05 cd  0d 60 cc 1d fd 46 25 3c  |.A%.`....`...F%<|
0000b020  3e 30 84 42 25 3d 6c 25  3a e7 42 25 3d 6c 25 8c  |>0.B%=l%:.B%=l%.|
0000b030  42 25 2b 3d 31 0d 60 d6  0e 42 24 3d a4 59 67 28  |B%+=1.`..B$=.Yg(|
0000b040  42 24 29 0d 60 e0 1a 55  62 24 3d a4 5a 67 28 a4  |B$).`..Ub$=.Zg(.|
0000b050  59 67 28 c1 55 62 24 2c  42 25 29 29 29 0d 60 ea  |Yg(.Ub$,B%))).`.|
0000b060  0c 3d a4 61 67 28 42 24  29 0d 60 fe 0c dd a4 61  |.=.ag(B$).`....a|
0000b070  67 28 42 24 29 0d 61 08  0a ea 6c 25 2c 72 25 0d  |g(B$).a...l%,r%.|
0000b080  61 12 15 6c 25 3d 97 42  24 3a 72 25 3d 97 c2 42  |a..l%=.B$:r%=..B|
0000b090  24 2c 31 29 0d 61 1c 20  e7 6c 25 3d 33 34 80 72  |$,1).a. .l%=34.r|
0000b0a0  25 3d 33 34 8c 42 24 3d  c1 42 24 2c 32 2c a9 42  |%=34.B$=.B$,2,.B|
0000b0b0  24 2d 32 29 0d 61 26 13  e7 6c 25 3d 31 32 33 80  |$-2).a&..l%=123.|
0000b0c0  72 25 3d 31 32 35 8c 0d  61 30 2a 72 25 3d a4 56  |r%=125..a0*r%=.V|
0000b0d0  5f 28 c1 42 24 2c 32 2c  a9 42 24 2d 32 29 29 3a  |_(.B$,2,.B$-2)):|
0000b0e0  42 24 3d a4 73 65 28 22  24 73 74 61 74 75 73 22  |B$=.se("$status"|
0000b0f0  29 0d 61 3a 05 cd 0d 61  44 07 3d 42 24 0d 61 58  |).a:...aD.=B$.aX|
0000b100  0c dd a4 46 67 28 41 24  29 0d 61 62 13 ea 42 24  |...Fg(A$).ab..B$|
0000b110  2c 6c 25 2c 63 25 3a 42  24 3d 22 22 0d 61 6c 30  |,l%,c%:B$="".al0|
0000b120  e3 6c 25 3d 31 b8 a9 41  24 3a 63 25 3d 97 c1 41  |.l%=1..A$:c%=..A|
0000b130  24 2c 6c 25 2c 31 29 3a  e7 63 25 3e 39 36 80 63  |$,l%,1):.c%>96.c|
0000b140  25 3c 31 32 33 8c 63 25  2d 3d 33 32 0d 61 76 11  |%<123.c%-=32.av.|
0000b150  42 24 2b 3d bd 63 25 3a  ed 3a 3d 42 24 0d 61 8a  |B$+=.c%:.:=B$.a.|
0000b160  0c dd a4 5a 67 28 41 24  29 0d 61 94 40 e7 41 24  |...Zg(A$).a.@.A$|
0000b170  3d 22 2d 22 8c 41 24 3d  a4 53 66 28 a4 54 5f 28  |="-".A$=.Sf(.T_(|
0000b180  4f 5f 25 29 29 3a f2 5a  62 28 22 43 6f 6e 74 69  |O_%)):.Zb("Conti|
0000b190  6e 75 61 74 69 6f 6e 20  6c 69 6e 65 3a 22 2b 41  |nuation line:"+A|
0000b1a0  24 29 3a 4f 5f 25 2b 3d  31 0d 61 9e 07 3d 41 24  |$):O_%+=1.a..=A$|
0000b1b0  0d 61 b2 0d dd a4 78 62  28 f8 41 24 29 0d 61 bc  |.a....xb(.A$).a.|
0000b1c0  26 ea 42 24 2c 41 25 2c  42 25 3a c8 95 c0 41 24  |&.B$,A%,B%:...A$|
0000b1d0  2c 31 29 3d 22 2f 22 3a  41 24 3d c1 41 24 2c 32  |,1)="/":A$=.A$,2|
0000b1e0  29 3a ce 0d 61 c6 24 41  25 3d a7 41 24 2c 22 3d  |):..a.$A%=.A$,"=|
0000b1f0  22 29 3a e7 41 25 3d 30  8c 41 24 3d a4 72 63 28  |"):.A%=0.A$=.rc(|
0000b200  41 24 29 3a 3d 22 22 0d  61 d0 22 42 24 3d c1 41  |A$):="".a."B$=.A|
0000b210  24 2c 41 25 2b 31 29 3a  41 24 3d a4 72 63 28 c0  |$,A%+1):A$=.rc(.|
0000b220  41 24 2c 41 25 2d 31 29  29 0d 61 da 0c 3d a4 61  |A$,A%-1)).a..=.a|
0000b230  67 28 42 24 29 0d 61 ee  08 dd f2 6d 65 0d 61 f8  |g(B$).a....me.a.|
0000b240  1a f2 59 5f 28 22 22 2c  a4 51 5f 28 22 45 78 69  |..Y_("",.Q_("Exi|
0000b250  74 22 29 2c 22 22 29 0d  62 02 0b 58 5f 25 3d a3  |t"),"").b..X_%=.|
0000b260  3a e1 0d 62 16 0c dd a4  6e 5f 28 41 24 29 0d 62  |:..b....n_(A$).b|
0000b270  20 0d e7 41 24 3d 22 22  8c 3d 31 0d 62 2a 0a 3d  | ..A$="".=1.b*.=|
0000b280  bb 28 41 24 29 0d 62 3e  14 dd a4 64 28 41 25 2c  |.(A$).b>...d(A%,|
0000b290  42 25 2c 43 25 2c 44 25  29 0d 62 48 0a 3d ba 28  |B%,C%,D%).bH.=.(|
0000b2a0  62 5f 29 0d 62 5c 08 dd  f2 44 5f 0d 62 66 0a ea  |b_).b\...D_.bf..|
0000b2b0  41 24 2c 42 24 0d 62 70  0b c8 99 31 36 b8 41 24  |A$,B$.bp...16.A$|
0000b2c0  0d 62 7a 31 41 24 3d c1  41 24 2c a7 a4 72 63 28  |.bz1A$=.A$,..rc(|
0000b2d0  41 24 29 2c 22 21 72 75  6e 69 22 29 29 3a 49 64  |A$),"!runi")):Id|
0000b2e0  25 3d 30 3a 4c 5f 24 3d  22 22 3a 62 67 24 3d 22  |%=0:L_$="":bg$="|
0000b2f0  22 0d 62 84 16 41 24 3d  c1 41 24 2c a7 41 24 2c  |".b..A$=.A$,.A$,|
0000b300  22 20 22 29 2b 31 29 0d  62 8e 05 f5 0d 62 98 0e  |" ")+1).b....b..|
0000b310  42 24 3d a4 77 62 28 41  24 29 0d 62 a2 0d c8 8e  |B$=.wb(A$).b....|
0000b320  c0 42 24 2c 32 29 ca 0d  62 ac 15 c9 22 2d 66 22  |.B$,2)..b..."-f"|
0000b330  3a 4c 5f 24 3d a4 77 62  28 41 24 29 0d 62 b6 20  |:L_$=.wb(A$).b. |
0000b340  c9 22 2d 61 22 3a 4c 5f  24 3d 22 53 4c 49 50 64  |."-a":L_$="SLIPd|
0000b350  69 61 6c 3a 64 65 66 61  75 6c 74 22 0d 62 c0 0f  |ial:default".b..|
0000b360  c9 22 2d 71 22 3a 49 64  25 3d b9 0d 62 ca 2b c9  |."-q":Id%=..b.+.|
0000b370  22 2d 73 22 3a 64 5f 25  3d bb a4 77 62 28 41 24  |"-s":d_%=..wb(A$|
0000b380  29 3a e7 64 5f 25 3c 26  31 42 30 30 8c 64 5f 25  |):.d_%<&1B00.d_%|
0000b390  3d 26 31 42 30 30 0d 62  d4 14 7f 3a 62 67 24 3d  |=&1B00.b...:bg$=|
0000b3a0  62 67 24 2b 42 24 2b 22  20 22 0d 62 de 05 cb 0d  |bg$+B$+" ".b....|
0000b3b0  62 e8 0a fd 42 24 3d 22  22 0d 62 f2 05 e1 0d 63  |b...B$="".b....c|
0000b3c0  06 0d dd a4 63 67 28 f8  41 24 29 0d 63 10 16 ea  |....cg(.A$).c...|
0000b3d0  42 24 2c 61 25 3a 61 25  3d a7 41 24 2c 22 20 22  |B$,a%:a%=.A$," "|
0000b3e0  29 0d 63 1a 0a e7 61 25  3e 30 8c 0d 63 24 27 42  |).c...a%>0..c$'B|
0000b3f0  24 3d a4 59 67 28 c0 41  24 2c 61 25 2d 31 29 29  |$=.Yg(.A$,a%-1))|
0000b400  3a 41 24 3d a4 59 67 28  c1 41 24 2c 61 25 2b 31  |:A$=.Yg(.A$,a%+1|
0000b410  29 29 0d 63 2e 05 cc 0d  63 38 0f 42 24 3d 41 24  |)).c....c8.B$=A$|
0000b420  3a 41 24 3d 22 22 0d 63  42 05 cd 0d 63 4c 07 3d  |:A$="".cB...cL.=|
0000b430  42 24 0d 63 60 0c dd f2  42 65 28 4e 24 29 0d 63  |B$.c`...Be(N$).c|
0000b440  6a 24 f2 5a 61 28 22 24  63 61 6c 6c 65 72 22 2c  |j$.Za("$caller",|
0000b450  64 67 24 29 3a 58 5f 25  3d 30 3a f2 4d 5f 28 4e  |dg$):X_%=0:.M_(N|
0000b460  24 29 0d 63 74 05 e1 0d  63 88 0c dd f2 4d 5f 28  |$).ct...c....M_(|
0000b470  4e 24 29 0d 63 9c 20 e7  58 5f 25 3c 3e 30 8c f2  |N$).c. .X_%<>0..|
0000b480  5a 62 28 a4 51 5f 28 22  45 6c 6f 61 64 31 22 29  |Zb(.Q_("Eload1")|
0000b490  29 3a e1 0d 63 a6 07 f2  65 67 0d 63 b0 11 70 25  |):..c...eg.c..p%|
0000b4a0  3d 30 3a e7 62 67 24 3e  22 22 8c 0d 63 ba 2f f5  |=0:.bg$>""..c./.|
0000b4b0  3a 70 25 2b 3d 31 3a 42  24 3d a4 77 62 28 62 67  |:p%+=1:B$=.wb(bg|
0000b4c0  24 29 3a f2 5a 61 28 22  70 22 2b c3 70 25 2c 42  |$):.Za("p"+.p%,B|
0000b4d0  24 29 3a fd 62 67 24 3d  22 22 0d 63 c4 05 cd 0d  |$):.bg$="".c....|
0000b4e0  63 ce 15 e7 4e 24 3e 22  22 80 a4 66 67 28 4e 24  |c...N$>""..fg(N$|
0000b4f0  2c 30 29 8c 0d 63 d8 37  f2 59 5f 28 a4 51 5f 28  |,0)..c.7.Y_(.Q_(|
0000b500  22 53 6c 6f 61 64 32 22  29 2c 22 20 22 2c 22 20  |"Sload2")," "," |
0000b510  22 29 3a 64 67 24 3d 4e  24 3a f2 5a 61 28 22 24  |"):dg$=N$:.Za("$|
0000b520  73 63 72 69 70 74 22 2c  4e 24 29 0d 63 e2 13 58  |script",N$).c..X|
0000b530  5f 25 3d b9 3a 4f 5f 25  3d 30 3a f2 6f 62 0d 63  |_%=.:O_%=0:.ob.c|
0000b540  ec 05 cd 0d 63 f6 05 e1  0d 64 0a 08 dd f2 65 67  |....c....d....eg|
0000b550  0d 64 14 1d 70 64 25 3d  30 3a 75 61 25 3d 30 3a  |.d..pd%=0:ua%=0:|
0000b560  73 64 25 3d 31 39 32 30  30 3a f2 6d 64 0d 64 1e  |sd%=19200:.md.d.|
0000b570  2a 70 65 25 3d 31 3a 71  65 25 3d 33 30 3a 6e 5f  |*pe%=1:qe%=30:n_|
0000b580  25 3d a3 3a 57 5f 25 3d  30 3a 69 5f 24 3d 22 22  |%=.:W_%=0:i_$=""|
0000b590  3a 74 62 24 3d 22 22 0d  64 28 30 73 62 25 3d 30  |:tb$="".d(0sb%=0|
0000b5a0  3a 45 67 25 3d 30 3a 60  5f 24 28 29 3d 22 22 3a  |:Eg%=0:`_$()="":|
0000b5b0  41 60 24 28 29 3d 22 22  3a 5f 5f 25 3d 30 3a 4b  |A`$()="":__%=0:K|
0000b5c0  60 24 28 29 3d 22 22 0d  64 32 2e e3 6e 25 3d 30  |`$()="".d2..n%=0|
0000b5d0  b8 45 60 25 3a e7 c0 46  60 24 28 6e 25 2c 30 29  |.E`%:..F`$(n%,0)|
0000b5e0  2c 31 29 3c 3e 22 24 22  8c 46 60 24 28 6e 25 2c  |,1)<>"$".F`$(n%,|
0000b5f0  30 29 3d 22 22 0d 64 3c  05 ed 0d 64 46 40 e3 6e  |0)="".d<...dF@.n|
0000b600  25 3d 30 b8 4e 60 25 3a  e7 50 60 25 28 6e 25 29  |%=0.N`%:.P`%(n%)|
0000b610  3e 30 8c 21 4f 61 25 3d  2d 32 3a 4f 61 25 21 34  |>0.!Oa%=-2:Oa%!4|
0000b620  3d 50 60 25 28 6e 25 29  3a c8 99 33 39 33 34 31  |=P`%(n%):..39341|
0000b630  32 2c 2c 4f 61 25 b8 3b  46 25 0d 64 50 30 ed 3a  |2,,Oa%.;F%.dP0.:|
0000b640  52 60 24 28 29 3d 22 22  3a 50 60 25 28 29 3d 30  |R`$()="":P`%()=0|
0000b650  3a 51 60 24 28 29 3d 22  22 3a 4b 60 24 28 29 3d  |:Q`$()="":K`$()=|
0000b660  22 22 3a 4c 60 25 28 29  3d 30 0d 64 5a 2e 61 60  |"":L`%()=0.dZ.a`|
0000b670  25 28 29 3d 30 3a 59 60  24 28 29 3d 22 22 3a 58  |%()=0:Y`$()="":X|
0000b680  60 24 28 29 3d 22 22 3a  56 60 25 28 29 3d 30 3a  |`$()="":V`%()=0:|
0000b690  55 60 24 28 29 3d 22 22  0d 64 64 1e 54 60 24 28  |U`$()="".dd.T`$(|
0000b6a0  29 3d 22 22 3a 6b 60 24  28 29 3d 22 22 3a 5f 5f  |)="":k`$()="":__|
0000b6b0  24 28 29 3d 22 22 0d 64  6e 14 79 5f 24 28 29 3d  |$()="".dn.y_$()=|
0000b6c0  22 22 3a 79 5f 25 28 29  3d 30 0d 64 78 05 e1 0d  |"":y_%()=0.dx...|
0000b6d0  64 8c 10 dd a4 66 67 28  4e 24 2c 67 67 25 29 0d  |d....fg(N$,gg%).|
0000b6e0  64 96 0e ea 41 24 2c 72  25 2c 70 5f 25 0d 64 a0  |d...A$,r%,p_%.d.|
0000b6f0  1f c8 99 31 33 31 30 38  30 2c 32 33 2c 4e 24 b8  |...131080,23,N$.|
0000b700  72 25 3a e7 72 25 3c 3e  31 8c 3d 30 0d 64 aa 14  |r%:.r%<>1.=0.d..|
0000b710  72 25 3d 30 3a 70 5f 25  3d a4 4c 61 28 4e 24 29  |r%=0:p_%=.La(N$)|
0000b720  0d 64 b4 28 e7 70 5f 25  3d 30 8c f2 5a 62 28 22  |.d.(.p_%=0..Zb("|
0000b730  46 69 6c 65 20 6e 6f 74  20 66 6f 75 6e 64 3a 20  |File not found: |
0000b740  22 2b 4e 24 29 3a 3d 30  0d 64 be 16 e7 67 67 25  |"+N$):=0.d...gg%|
0000b750  3d 30 8c 57 5f 25 3d 30  3a 44 60 25 3d 31 0d 64  |=0.W_%=0:D`%=1.d|
0000b760  c8 0c 41 24 3d be 23 70  5f 25 0d 64 d2 17 e7 a7  |..A$=.#p_%.d....|
0000b770  41 24 2c 22 73 6c 69 70  64 69 61 6c 22 29 3e 30  |A$,"slipdial")>0|
0000b780  8c 0d 64 dc 0d f5 41 24  3d be 23 70 5f 25 0d 64  |..d...A$=.#p_%.d|
0000b790  e6 17 e7 c0 41 24 2c 31  29 3c 3e 22 23 22 80 41  |....A$,1)<>"#".A|
0000b7a0  24 3e 22 22 8c 0d 64 f0  0f f2 68 67 28 41 24 2c  |$>""..d...hg(A$,|
0000b7b0  57 5f 25 29 0d 64 fa 10  e7 c0 41 24 2c 31 29 3d  |W_%).d....A$,1)=|
0000b7c0  22 3a 22 8c 0d 65 04 18  41 24 3d c1 41 24 2c 32  |":"..e..A$=.A$,2|
0000b7d0  29 3a 42 24 3d a4 77 62  28 41 24 29 0d 65 0e 47  |):B$=.wb(A$).e.G|
0000b7e0  e7 42 24 3d 22 61 75 74  6f 65 78 65 63 22 8c 43  |.B$="autoexec".C|
0000b7f0  60 25 28 30 29 3d 57 5f  25 3a 43 60 24 28 30 29  |`%(0)=W_%:C`$(0)|
0000b800  3d 42 24 8b 43 60 25 28  44 60 25 29 3d 57 5f 25  |=B$.C`%(D`%)=W_%|
0000b810  3a 43 60 24 28 44 60 25  29 3d 42 24 3a 44 60 25  |:C`$(D`%)=B$:D`%|
0000b820  2b 3d 31 0d 65 18 05 cd  0d 65 22 0a 57 5f 25 2b  |+=1.e....e".W_%+|
0000b830  3d 31 0d 65 2c 05 cd 0d  65 36 0a fd c5 23 70 5f  |=1.e,...e6...#p_|
0000b840  25 0d 65 40 0e e7 57 5f  25 3e 32 30 30 30 8c 0d  |%.e@..W_%>2000..|
0000b850  65 4a 21 f2 4d 61 28 70  5f 25 29 3a f2 72 62 28  |eJ!.Ma(p_%):.rb(|
0000b860  a4 51 5f 28 22 45 6c 6f  6e 67 22 29 29 3a 3d 30  |.Q_("Elong")):=0|
0000b870  0d 65 54 05 cc 0d 65 5e  08 72 25 3d 31 0d 65 68  |.eT...e^.r%=1.eh|
0000b880  05 cd 0d 65 72 05 cc 0d  65 7c 19 f2 72 62 28 a4  |...er...e|..rb(.|
0000b890  51 5f 28 22 45 6c 6f 61  64 32 22 29 29 3a 3d 30  |Q_("Eload2")):=0|
0000b8a0  0d 65 86 05 cd 0d 65 90  0c f2 4d 61 28 70 5f 25  |.e....e...Ma(p_%|
0000b8b0  29 0d 65 9a 07 3d 72 25  0d 65 ae 0f dd f2 68 67  |).e..=r%.e....hg|
0000b8c0  28 41 24 2c 6e 25 29 0d  65 b8 0c e7 6e 25 3e 6b  |(A$,n%).e...n%>k|
0000b8d0  5f 25 8c 0d 65 c2 09 c8  8e 6e 25 ca 0d 65 cc 10  |_%..e....n%..e..|
0000b8e0  c9 30 3a de 69 67 24 28  31 39 39 29 0d 65 d6 12  |.0:.ig$(199).e..|
0000b8f0  c9 32 30 30 3a de 6a 67  24 28 31 39 39 29 0d 65  |.200:.jg$(199).e|
0000b900  e0 12 c9 34 30 30 3a de  6b 67 24 28 31 39 39 29  |...400:.kg$(199)|
0000b910  0d 65 ea 12 c9 36 30 30  3a de 6c 67 24 28 31 39  |.e...600:.lg$(19|
0000b920  39 29 0d 65 f4 12 c9 38  30 30 3a de 6d 67 24 28  |9).e...800:.mg$(|
0000b930  31 39 39 29 0d 65 fe 13  c9 31 30 30 30 3a de 6e  |199).e...1000:.n|
0000b940  67 24 28 31 39 39 29 0d  66 08 13 c9 31 32 30 30  |g$(199).f...1200|
0000b950  3a de 6f 67 24 28 31 39  39 29 0d 66 12 13 c9 31  |:.og$(199).f...1|
0000b960  34 30 30 3a de 70 67 24  28 31 39 39 29 0d 66 1c  |400:.pg$(199).f.|
0000b970  13 c9 31 36 30 30 3a de  71 67 24 28 31 39 39 29  |..1600:.qg$(199)|
0000b980  0d 66 26 13 c9 31 38 30  30 3a de 72 67 24 28 31  |.f&..1800:.rg$(1|
0000b990  39 39 29 0d 66 30 13 c9  32 30 30 30 3a de 73 67  |99).f0..2000:.sg|
0000b9a0  24 28 31 39 39 29 0d 66  3a 05 cb 0d 66 44 0a 6b  |$(199).f:...fD.k|
0000b9b0  5f 25 3d 6e 25 0d 66 4e  05 cd 0d 66 58 0f c8 8e  |_%=n%.fN...fX...|
0000b9c0  28 6e 25 81 32 30 30 29  ca 0d 66 62 11 c9 30 3a  |(n%.200)..fb..0:|
0000b9d0  69 67 24 28 6e 25 29 3d  41 24 0d 66 6c 15 c9 31  |ig$(n%)=A$.fl..1|
0000b9e0  3a 6a 67 24 28 6e 25 2d  32 30 30 29 3d 41 24 0d  |:jg$(n%-200)=A$.|
0000b9f0  66 76 15 c9 32 3a 6b 67  24 28 6e 25 2d 34 30 30  |fv..2:kg$(n%-400|
0000ba00  29 3d 41 24 0d 66 80 15  c9 33 3a 6c 67 24 28 6e  |)=A$.f...3:lg$(n|
0000ba10  25 2d 36 30 30 29 3d 41  24 0d 66 8a 15 c9 34 3a  |%-600)=A$.f...4:|
0000ba20  6d 67 24 28 6e 25 2d 38  30 30 29 3d 41 24 0d 66  |mg$(n%-800)=A$.f|
0000ba30  94 16 c9 35 3a 6e 67 24  28 6e 25 2d 31 30 30 30  |...5:ng$(n%-1000|
0000ba40  29 3d 41 24 0d 66 9e 16  c9 36 3a 6f 67 24 28 6e  |)=A$.f...6:og$(n|
0000ba50  25 2d 31 32 30 30 29 3d  41 24 0d 66 a8 16 c9 37  |%-1200)=A$.f...7|
0000ba60  3a 70 67 24 28 6e 25 2d  31 34 30 30 29 3d 41 24  |:pg$(n%-1400)=A$|
0000ba70  0d 66 b2 16 c9 38 3a 71  67 24 28 6e 25 2d 31 36  |.f...8:qg$(n%-16|
0000ba80  30 30 29 3d 41 24 0d 66  bc 16 c9 39 3a 72 67 24  |00)=A$.f...9:rg$|
0000ba90  28 6e 25 2d 31 38 30 30  29 3d 41 24 0d 66 c6 17  |(n%-1800)=A$.f..|
0000baa0  c9 31 30 3a 73 67 24 28  6e 25 2d 32 30 30 30 29  |.10:sg$(n%-2000)|
0000bab0  3d 41 24 0d 66 d0 05 cb  0d 66 da 05 e1 0d 66 ee  |=A$.f....f....f.|
0000bac0  0c dd a4 54 5f 28 6e 25  29 0d 66 f8 0f e7 6e 25  |...T_(n%).f...n%|
0000bad0  3e 6b 5f 25 8c 3d 22 22  0d 67 02 13 ea 41 24 3a  |>k_%.="".g...A$:|
0000bae0  c8 8e 28 6e 25 81 32 30  30 29 ca 0d 67 0c 11 c9  |..(n%.200)..g...|
0000baf0  30 3a 41 24 3d 69 67 24  28 6e 25 29 0d 67 16 15  |0:A$=ig$(n%).g..|
0000bb00  c9 31 3a 41 24 3d 6a 67  24 28 6e 25 2d 32 30 30  |.1:A$=jg$(n%-200|
0000bb10  29 0d 67 20 15 c9 32 3a  41 24 3d 6b 67 24 28 6e  |).g ..2:A$=kg$(n|
0000bb20  25 2d 34 30 30 29 0d 67  2a 15 c9 33 3a 41 24 3d  |%-400).g*..3:A$=|
0000bb30  6c 67 24 28 6e 25 2d 36  30 30 29 0d 67 34 15 c9  |lg$(n%-600).g4..|
0000bb40  34 3a 41 24 3d 6d 67 24  28 6e 25 2d 38 30 30 29  |4:A$=mg$(n%-800)|
0000bb50  0d 67 3e 16 c9 35 3a 41  24 3d 6e 67 24 28 6e 25  |.g>..5:A$=ng$(n%|
0000bb60  2d 31 30 30 30 29 0d 67  48 16 c9 36 3a 41 24 3d  |-1000).gH..6:A$=|
0000bb70  6f 67 24 28 6e 25 2d 31  32 30 30 29 0d 67 52 16  |og$(n%-1200).gR.|
0000bb80  c9 37 3a 41 24 3d 70 67  24 28 6e 25 2d 31 34 30  |.7:A$=pg$(n%-140|
0000bb90  30 29 0d 67 5c 16 c9 38  3a 41 24 3d 71 67 24 28  |0).g\..8:A$=qg$(|
0000bba0  6e 25 2d 31 36 30 30 29  0d 67 66 16 c9 39 3a 41  |n%-1600).gf..9:A|
0000bbb0  24 3d 72 67 24 28 6e 25  2d 31 38 30 30 29 0d 67  |$=rg$(n%-1800).g|
0000bbc0  70 17 c9 31 30 3a 41 24  3d 73 67 24 28 6e 25 2d  |p..10:A$=sg$(n%-|
0000bbd0  32 30 30 30 29 0d 67 7a  0b 7f 3a 41 24 3d 22 22  |2000).gz..:A$=""|
0000bbe0  0d 67 84 05 cb 0d 67 8e  07 3d 41 24 0d 67 a2 0d  |.g....g..=A$.g..|
0000bbf0  dd a4 41 65 28 74 67 24  29 0d 67 ac 0e ea 72 25  |..Ae(tg$).g...r%|
0000bc00  2c 75 67 25 2c 42 24 0d  67 b6 23 42 24 3d a4 77  |,ug%,B$.g.#B$=.w|
0000bc10  62 28 74 67 24 29 3a f2  5a 62 28 a4 61 62 28 22  |b(tg$):.Zb(.ab("|
0000bc20  53 6c 69 62 22 2c 42 24  29 29 0d 67 c0 0e 75 67  |Slib",B$)).g..ug|
0000bc30  25 3d 43 60 25 28 30 29  0d 67 ca 10 72 25 3d a4  |%=C`%(0).g..r%=.|
0000bc40  66 67 28 42 24 2c 31 29  0d 67 d4 2e e7 75 67 25  |fg(B$,1).g...ug%|
0000bc50  3c 3e 43 60 25 28 30 29  80 72 25 3c 3e 30 8c f2  |<>C`%(0).r%<>0..|
0000bc60  52 62 28 22 63 61 6c 6c  20 61 75 74 6f 20 22 2b  |Rb("call auto "+|
0000bc70  74 67 24 2c 30 29 0d 67  de 07 3d 72 25 0d 67 f2  |tg$,0).g..=r%.g.|
0000bc80  0c dd f2 56 63 28 41 24  29 0d 67 fc 0c ea 74 63  |...Vc(A$).g...tc|
0000bc90  25 2c 76 67 25 0d 68 06  15 f2 50 5f 28 a4 51 5f  |%,vg%.h...P_(.Q_|
0000bca0  28 22 53 6c 69 73 74 22  29 29 0d 68 10 18 74 63  |("Slist")).h..tc|
0000bcb0  25 3d bb a4 77 62 28 41  24 29 3a 76 67 25 3d bb  |%=..wb(A$):vg%=.|
0000bcc0  41 24 0d 68 1a 10 e7 74  63 25 3c 30 8c 74 63 25  |A$.h...tc%<0.tc%|
0000bcd0  3d 30 0d 68 24 1a e7 76  67 25 3d 30 84 76 67 25  |=0.h$..vg%=0.vg%|
0000bce0  3e 57 5f 25 8c 76 67 25  3d 57 5f 25 0d 68 2e 0f  |>W_%.vg%=W_%.h..|
0000bcf0  e3 63 25 3d 74 63 25 b8  76 67 25 0d 68 38 1c 41  |.c%=tc%.vg%.h8.A|
0000bd00  24 3d c3 63 25 3a e7 63  25 3d 4f 5f 25 8c 41 24  |$=.c%:.c%=O_%.A$|
0000bd10  3d 22 2a 22 2b 41 24 0d  68 42 17 41 24 3d c2 22  |="*"+A$.hB.A$=."|
0000bd20  20 20 20 22 2b 41 24 2c  34 29 2b 22 20 22 0d 68  |   "+A$,4)+" ".h|
0000bd30  4c 13 f2 50 5f 28 41 24  2b a4 54 5f 28 63 25 29  |L..P_(A$+.T_(c%)|
0000bd40  29 0d 68 56 05 ed 0d 68  60 05 e1 0d 68 74 08 dd  |).hV...h`...ht..|
0000bd50  f2 73 66 0d 68 7e 17 f2  74 66 28 22 4c 61 62 65  |.sf.h~..tf("Labe|
0000bd60  6c 22 2c 22 4c 69 6e 65  22 29 0d 68 88 2b ea 6e  |l","Line").h.+.n|
0000bd70  25 3a e3 6e 25 3d 30 b8  44 60 25 2d 31 3a f2 74  |%:.n%=0.D`%-1:.t|
0000bd80  66 28 43 60 24 28 6e 25  29 2c c3 43 60 25 28 6e  |f(C`$(n%),.C`%(n|
0000bd90  25 29 29 3a ed 0d 68 92  05 e1 0d 68 a6 0c dd a4  |%)):..h....h....|
0000bda0  4e 5f 28 41 24 29 0d 68  b0 0c ea 72 25 3a 72 25  |N_(A$).h...r%:r%|
0000bdb0  3d 30 0d 68 ba 1a f2 5a  61 28 22 24 69 6e 69 74  |=0.h...Za("$init|
0000bdc0  22 2c 22 41 54 5a 51 30  56 31 22 29 0d 68 c4 17  |","ATZQ0V1").h..|
0000bdd0  f2 5a 61 28 22 24 62 75  73 79 22 2c 22 42 55 53  |.Za("$busy","BUS|
0000bde0  59 22 29 0d 68 ce 1a f2  5a 61 28 22 24 63 6f 6e  |Y").h...Za("$con|
0000bdf0  6e 22 2c 22 43 4f 4e 4e  45 43 54 22 29 0d 68 d8  |n","CONNECT").h.|
0000be00  1f f2 5a 61 28 22 24 6e  6f 63 61 72 72 22 2c 22  |..Za("$nocarr","|
0000be10  4e 4f 20 43 41 52 52 49  45 52 22 29 0d 68 e2 20  |NO CARRIER").h. |
0000be20  f2 5a 61 28 22 24 6e 6f  64 69 61 6c 22 2c 22 4e  |.Za("$nodial","N|
0000be30  4f 20 44 49 41 4c 54 4f  4e 45 22 29 0d 68 ec 0b  |O DIALTONE").h..|
0000be40  e7 41 24 3e 22 22 8c 0d  68 f6 24 e7 a7 41 24 2c  |.A$>""..h.$..A$,|
0000be50  22 2e 22 29 3d 30 8c 41  24 3d 22 53 6c 69 70 44  |".")=0.A$="SlipD|
0000be60  69 61 6c 44 72 76 3a 22  2b 41 24 0d 69 00 0e 72  |ialDrv:"+A$.i..r|
0000be70  25 3d a4 60 64 28 41 24  29 0d 69 0a 05 cd 0d 69  |%=.`d(A$).i....i|
0000be80  14 07 3d 72 25 0d 69 28  0d dd a4 60 64 28 4c 5f  |..=r%.i(...`d(L_|
0000be90  24 29 0d 69 32 11 ea 72  25 2c 70 5f 25 2c 42 24  |$).i2..r%,p_%,B$|
0000bea0  2c 43 24 0d 69 3c 08 72  25 3d 30 0d 69 46 10 f5  |,C$.i<.r%=0.iF..|
0000beb0  42 24 3d a4 77 62 28 4c  5f 24 29 0d 69 50 0f 70  |B$=.wb(L_$).iP.p|
0000bec0  5f 25 3d a4 4c 61 28 42  24 29 0d 69 5a 0b e7 70  |_%=.La(B$).iZ..p|
0000bed0  5f 25 3d 30 8c 0d 69 64  1d f2 5a 62 28 a4 61 62  |_%=0..id..Zb(.ab|
0000bee0  28 22 46 73 6f 75 72 63  65 22 2c 42 24 29 29 3a  |("Fsource",B$)):|
0000bef0  3d 30 0d 69 6e 05 cc 0d  69 78 0d f5 43 24 3d be  |=0.in...ix..C$=.|
0000bf00  23 70 5f 25 0d 69 82 17  e7 c0 43 24 2c 31 29 3c  |#p_%.i....C$,1)<|
0000bf10  3e 22 23 22 80 43 24 3e  22 22 8c 0d 69 8c 0e 72  |>"#".C$>""..i..r|
0000bf20  25 3d a4 56 5f 28 43 24  29 0d 69 96 05 cd 0d 69  |%=.V_(C$).i....i|
0000bf30  a0 0a fd c5 23 70 5f 25  0d 69 aa 0c f2 4d 61 28  |....#p_%.i...Ma(|
0000bf40  70 5f 25 29 0d 69 b4 05  cd 0d 69 be 0b fd 4c 5f  |p_%).i....i...L_|
0000bf50  24 3d 22 22 0d 69 c8 07  3d 72 25 0d 69 dc 0c dd  |$="".i..=r%.i...|
0000bf60  f2 6a 65 28 41 24 29 0d  69 e6 23 ea 70 5f 25 2c  |.je(A$).i.#.p_%,|
0000bf70  6e 25 2c 72 25 2c 42 24  2c 43 24 3a 76 60 25 3d  |n%,r%,B$,C$:v`%=|
0000bf80  a3 3a 79 62 24 28 29 3d  22 22 0d 69 f0 0b e7 41  |.:yb$()="".i...A|
0000bf90  24 3d 22 22 8c 0d 69 fa  19 f2 4f 62 28 a4 51 5f  |$=""..i...Ob(.Q_|
0000bfa0  28 22 48 61 6e 6e 6f 75  6e 63 65 22 29 29 0d 6a  |("Hannounce")).j|
0000bfb0  04 0e 6e 25 3d 30 3a 43  24 3d 22 22 0d 6a 0e 0a  |..n%=0:C$="".j..|
0000bfc0  f5 42 24 3d 22 22 0d 6a  18 05 f5 0d 6a 22 34 c8  |.B$="".j....j"4.|
0000bfd0  99 31 33 31 30 38 34 2c  39 2c 5f 60 24 2b 22 2e  |.131084,9,_`$+".|
0000bfe0  68 65 6c 70 22 2c 61 5f  25 2c 31 2c 6e 25 2c 32  |help",a_%,1,n%,2|
0000bff0  35 35 2c 22 2a 22 b8 2c  2c 2c 72 25 2c 6e 25 0d  |55,"*".,,,r%,n%.|
0000c000  6a 2c 23 43 24 3d a4 55  62 28 61 5f 25 29 3a 42  |j,#C$=.Ub(a_%):B|
0000c010  24 2b 3d 43 24 2b c4 31  35 2d a9 43 24 2c 22 20  |$+=C$+.15-.C$," |
0000c020  22 29 0d 6a 36 11 fd 6e  25 3d 2d 31 84 a9 42 24  |").j6..n%=-1..B$|
0000c030  3e 36 30 0d 6a 40 0b f2  4f 62 28 42 24 29 0d 6a  |>60.j@..Ob(B$).j|
0000c040  4a 12 fd 6e 25 3d 2d 31  3a f2 4f 62 28 22 22 29  |J..n%=-1:.Ob("")|
0000c050  0d 6a 54 05 cc 0d 6a 5e  20 70 5f 25 3d a4 4c 61  |.jT...j^ p_%=.La|
0000c060  28 5f 60 24 2b 22 2e 48  65 6c 70 2e 22 2b 41 24  |(_`$+".Help."+A$|
0000c070  2b 22 2a 22 29 0d 6a 68  0b e7 70 5f 25 3e 30 8c  |+"*").jh..p_%>0.|
0000c080  0d 6a 72 1a f2 4f 62 28  22 48 65 6c 70 20 6f 6e  |.jr..Ob("Help on|
0000c090  20 22 2b 41 24 2b 22 3a  22 29 0d 6a 7c 08 6e 25  | "+A$+":").j|.n%|
0000c0a0  3d 30 0d 6a 86 05 f5 0d  6a 90 21 42 24 3d be 23  |=0.j....j.!B$=.#|
0000c0b0  70 5f 25 3a e7 42 24 3e  22 22 8c 6e 25 2b 3d 31  |p_%:.B$>"".n%+=1|
0000c0c0  3a f2 4f 62 28 42 24 29  0d 6a 9a 11 fd c5 23 70  |:.Ob(B$).j....#p|
0000c0d0  5f 25 84 6e 25 3e 72 60  25 0d 6a a4 14 f2 4f 62  |_%.n%>r`%.j...Ob|
0000c0e0  28 22 22 29 3a f2 4d 61  28 70 5f 25 29 0d 6a ae  |(""):.Ma(p_%).j.|
0000c0f0  05 cc 0d 6a b8 0b f2 6a  65 28 22 22 29 0d 6a c2  |...j...je("").j.|
0000c100  05 cd 0d 6a cc 05 cd 0d  6a d6 05 e1 0d 6a ea 0d  |...j....j....j..|
0000c110  dd f2 6c 65 28 56 61 24  29 0d 6a f4 1c f2 59 5f  |..le(Va$).j...Y_|
0000c120  28 a4 51 5f 28 22 51 75  69 74 32 22 29 2c 56 61  |(.Q_("Quit2"),Va|
0000c130  24 2c 22 22 29 0d 6a fe  07 f2 54 62 0d 6b 08 05  |$,"").j...Tb.k..|
0000c140  e0 0d 6b 12 05 e1 0d 6b  26 08 dd f2 47 5f 0d 6b  |..k....k&...G_.k|
0000c150  30 34 70 5f 25 3d a4 4c  61 28 7a 60 24 2b 22 2e  |04p_%=.La(z`$+".|
0000c160  21 43 6f 6e 66 69 67 22  29 3a e7 70 5f 25 3d 30  |!Config"):.p_%=0|
0000c170  8c 85 30 2c 22 4e 6f 20  63 6f 6e 66 69 67 21 22  |..0,"No config!"|
0000c180  3a e1 0d 6b 3a 14 f2 64  63 28 55 61 25 2c 31 2c  |:..k:..dc(Ua%,1,|
0000c190  9a 23 70 5f 25 29 0d 6b  44 14 f2 64 63 28 55 61  |.#p_%).kD..dc(Ua|
0000c1a0  25 2c 32 2c 9a 23 70 5f  25 29 0d 6b 4e 14 f2 64  |%,2,.#p_%).kN..d|
0000c1b0  63 28 55 61 25 2c 33 2c  9a 23 70 5f 25 29 0d 6b  |c(Ua%,3,.#p_%).k|
0000c1c0  58 14 f2 5f 61 28 55 61  25 2c 34 2c be 23 70 5f  |X.._a(Ua%,4,.#p_|
0000c1d0  25 29 0d 6b 62 1c e7 ac  c5 23 70 5f 25 8c f2 5f  |%).kb....#p_%.._|
0000c1e0  61 28 55 61 25 2c 37 2c  be 23 70 5f 25 29 0d 6b  |a(Ua%,7,.#p_%).k|
0000c1f0  6c 1c e7 ac c5 23 70 5f  25 8c f2 5f 61 28 55 61  |l....#p_%.._a(Ua|
0000c200  25 2c 38 2c be 23 70 5f  25 29 0d 6b 76 1d e7 ac  |%,8,.#p_%).kv...|
0000c210  c5 23 70 5f 25 8c f2 5f  61 28 55 61 25 2c 31 32  |.#p_%.._a(Ua%,12|
0000c220  2c be 23 70 5f 25 29 0d  6b 80 1d e7 ac c5 23 70  |,.#p_%).k.....#p|
0000c230  5f 25 8c f2 64 63 28 55  61 25 2c 31 33 2c 9a 23  |_%..dc(Ua%,13,.#|
0000c240  70 5f 25 29 0d 6b 8a 1d  e7 ac c5 23 70 5f 25 8c  |p_%).k.....#p_%.|
0000c250  f2 64 63 28 55 61 25 2c  31 34 2c 9a 23 70 5f 25  |.dc(Ua%,14,.#p_%|
0000c260  29 0d 6b 94 0c f2 4d 61  28 70 5f 25 29 0d 6b 9e  |).k...Ma(p_%).k.|
0000c270  22 4a 5f 25 3d bb a4 51  62 28 55 61 25 2c 37 29  |"J_%=..Qb(Ua%,7)|
0000c280  3a e7 4a 5f 25 3c 32 34  8c 4a 5f 25 3d 32 34 0d  |:.J_%<24.J_%=24.|
0000c290  6b a8 13 49 5f 25 3d bb  a4 51 62 28 55 61 25 2c  |k..I_%=..Qb(Ua%,|
0000c2a0  38 29 0d 6b b2 13 41 61  25 3d a4 65 63 28 55 61  |8).k..Aa%=.ec(Ua|
0000c2b0  25 2c 31 33 29 0d 6b bc  23 e7 49 5f 25 3c 34 30  |%,13).k.#.I_%<40|
0000c2c0  8c 49 5f 25 3d 34 30 8b  e7 49 5f 25 3e 32 34 30  |.I_%=40..I_%>240|
0000c2d0  8c 49 5f 25 3d 32 34 30  0d 6b c6 14 69 60 25 3d  |.I_%=240.k..i`%=|
0000c2e0  bb a4 51 62 28 55 61 25  2c 31 32 29 0d 6b d0 23  |..Qb(Ua%,12).k.#|
0000c2f0  e7 69 60 25 3c 31 30 8c  69 60 25 3d 31 30 8b e7  |.i`%<10.i`%=10..|
0000c300  69 60 25 3e 31 30 30 8c  69 60 25 3d 31 30 30 0d  |i`%>100.i`%=100.|
0000c310  6b da 17 c8 99 36 2c 31  32 31 2c 28 32 82 26 38  |k....6,121,(2.&8|
0000c320  30 29 b8 2c 41 25 0d 6b  e4 2f e7 4c 5f 24 3d 22  |0).,A%.k./.L_$="|
0000c330  22 80 a4 65 63 28 55 61  25 2c 33 29 3d 30 80 41  |"..ec(Ua%,3)=0.A|
0000c340  25 3c 3e 26 46 46 8c 4c  5f 24 3d a4 51 62 28 55  |%<>&FF.L_$=.Qb(U|
0000c350  61 25 2c 34 29 0d 6b ee  27 e7 49 64 25 3d 30 80  |a%,4).k.'.Id%=0.|
0000c360  a4 65 63 28 55 61 25 2c  31 29 3d 30 8c f2 5f 62  |.ec(Ua%,1)=0.._b|
0000c370  28 53 61 25 2c 30 2c 2d  32 30 30 29 0d 6b f8 05  |(Sa%,0,-200).k..|
0000c380  e1 0d 6c 0c 08 dd f2 70  62 0d 6c 16 24 70 5f 25  |..l....pb.l.$p_%|
0000c390  3d a4 56 66 28 7a 60 24  2b 22 2e 21 43 6f 6e 66  |=.Vf(z`$+".!Conf|
0000c3a0  69 67 22 29 3a e7 70 5f  25 3d 30 8c e1 0d 6c 20  |ig"):.p_%=0...l |
0000c3b0  14 d5 23 70 5f 25 2c a4  65 63 28 55 61 25 2c 31  |..#p_%,.ec(Ua%,1|
0000c3c0  29 0d 6c 2a 14 d5 23 70  5f 25 2c a4 65 63 28 55  |).l*..#p_%,.ec(U|
0000c3d0  61 25 2c 32 29 0d 6c 34  14 d5 23 70 5f 25 2c a4  |a%,2).l4..#p_%,.|
0000c3e0  65 63 28 55 61 25 2c 33  29 0d 6c 3e 14 d5 23 70  |ec(Ua%,3).l>..#p|
0000c3f0  5f 25 2c a4 51 62 28 55  61 25 2c 34 29 0d 6c 48  |_%,.Qb(Ua%,4).lH|
0000c400  14 d5 23 70 5f 25 2c a4  51 62 28 55 61 25 2c 37  |..#p_%,.Qb(Ua%,7|
0000c410  29 0d 6c 52 14 d5 23 70  5f 25 2c a4 51 62 28 55  |).lR..#p_%,.Qb(U|
0000c420  61 25 2c 38 29 0d 6c 5c  15 d5 23 70 5f 25 2c a4  |a%,8).l\..#p_%,.|
0000c430  51 62 28 55 61 25 2c 31  32 29 0d 6c 66 25 d5 23  |Qb(Ua%,12).lf%.#|
0000c440  70 5f 25 2c a4 65 63 28  55 61 25 2c 31 33 29 3a  |p_%,.ec(Ua%,13):|
0000c450  41 61 25 3d a4 65 63 28  55 61 25 2c 31 33 29 0d  |Aa%=.ec(Ua%,13).|
0000c460  6c 70 15 d5 23 70 5f 25  2c a4 65 63 28 55 61 25  |lp..#p_%,.ec(Ua%|
0000c470  2c 31 34 29 0d 6c 7a 0c  f2 4d 61 28 70 5f 25 29  |,14).lz..Ma(p_%)|
0000c480  0d 6c 84 13 e7 a4 65 63  28 55 61 25 2c 31 34 29  |.l....ec(Ua%,14)|
0000c490  3d 30 8c 0d 6c 8e 25 70  5f 25 3d a4 56 66 28 7a  |=0..l.%p_%=.Vf(z|
0000c4a0  60 24 2b 22 2e 21 77 69  6e 64 6f 77 73 22 29 3a  |`$+".!windows"):|
0000c4b0  e7 70 5f 25 3d 30 8c e1  0d 6c 98 18 21 71 25 3d  |.p_%=0...l..!q%=|
0000c4c0  53 61 25 3a c8 99 32 36  32 33 34 37 2c 2c 71 25  |Sa%:..262347,,q%|
0000c4d0  0d 6c a2 11 d5 23 70 5f  25 2c c3 28 71 25 21 34  |.l...#p_%,.(q%!4|
0000c4e0  29 0d 6c ac 11 d5 23 70  5f 25 2c c3 28 71 25 21  |).l...#p_%,.(q%!|
0000c4f0  38 29 0d 6c b6 0c f2 4d  61 28 70 5f 25 29 0d 6c  |8).l...Ma(p_%).l|
0000c500  c0 05 cd 0d 6c ca 05 e1  0d 6c de 0c dd a4 48 5f  |....l....l....H_|
0000c510  28 41 25 29 0d 6c e8 16  e7 93 2d e0 3c 28 41 25  |(A%).l....-.<(A%|
0000c520  2b 26 32 30 30 30 29 8c  3d b9 0d 6c f2 06 3d a3  |+&2000).=..l..=.|
0000c530  0d 6d 06 0c dd a4 63 65  28 41 24 29 0d 6d 10 14  |.m....ce(A$).m..|
0000c540  ea 66 24 2c 77 67 2c 78  67 25 3a 78 67 25 3d 30  |.f$,wg,xg%:xg%=0|
0000c550  0d 6d 1a 16 66 24 3d a4  77 62 28 41 24 29 3a e7  |.m..f$=.wb(A$):.|
0000c560  66 24 3e 22 22 8c 0d 6d  24 5d 77 67 3d a4 79 67  |f$>""..m$]wg=.yg|
0000c570  28 22 3c 4d 61 69 6c 24  44 69 72 3e 2e 66 6f 6c  |("<Mail$Dir>.fol|
0000c580  64 65 72 2e 22 2b 66 24  2b 22 4e 65 77 73 22 29  |der."+f$+"News")|
0000c590  2d a4 79 67 28 22 3c 4d  61 69 6c 24 44 69 72 3e  |-.yg("<Mail$Dir>|
0000c5a0  2e 66 6f 6c 64 65 72 2e  22 2b 66 24 2b 22 4e 47  |.folder."+f$+"NG|
0000c5b0  22 29 3a f2 5a 62 28 22  54 69 6d 65 20 22 2b c3  |"):.Zb("Time "+.|
0000c5c0  77 67 29 0d 6d 2e 38 e7  77 67 3e 30 8c 78 67 25  |wg).m.8.wg>0.xg%|
0000c5d0  3d 31 30 30 2a a4 7a 67  28 22 3c 4d 61 69 6c 24  |=100*.zg("<Mail$|
0000c5e0  44 69 72 3e 2e 66 6f 6c  64 65 72 2e 22 2b 66 24  |Dir>.folder."+f$|
0000c5f0  2b 22 4e 65 77 73 22 29  2f 77 67 0d 6d 38 05 cd  |+"News")/wg.m8..|
0000c600  0d 6d 42 08 3d 78 67 25  0d 6d 56 0c dd a4 79 67  |.mB.=xg%.mV...yg|
0000c610  28 66 24 29 0d 6d 60 10  ea 5f 67 25 2c 60 67 25  |(f$).m`.._g%,`g%|
0000c620  2c 41 68 25 0d 6d 6a 22  c8 99 31 33 31 30 38 30  |,Ah%.mj"..131080|
0000c630  2c 31 37 2c 66 24 b8 5f  67 25 2c 2c 60 67 25 2c  |,17,f$._g%,,`g%,|
0000c640  41 68 25 3b 46 25 0d 6d  74 2e e7 5f 67 25 3d 30  |Ah%;F%.mt.._g%=0|
0000c650  84 28 46 25 80 31 29 3c  3e 30 8c f2 5a 62 28 a4  |.(F%.1)<>0..Zb(.|
0000c660  61 62 28 22 45 6e 6f 66  69 6c 65 22 2c 66 24 29  |ab("Enofile",f$)|
0000c670  29 3a 3d 30 0d 6d 7e 17  3d 28 60 67 25 80 26 46  |):=0.m~.=(`g%.&F|
0000c680  46 29 2a 32 5e 33 32 2b  41 68 25 0d 6d 92 0c dd  |F)*2^32+Ah%.m...|
0000c690  a4 7a 67 28 66 24 29 0d  6d 9c 0c ea 4f 64 25 2c  |.zg(f$).m...Od%,|
0000c6a0  5f 67 25 0d 6d a6 20 c8  99 31 33 31 30 38 30 2c  |_g%.m. ..131080,|
0000c6b0  31 37 2c 66 24 b8 5f 67  25 2c 2c 2c 2c 4f 64 25  |17,f$._g%,,,,Od%|
0000c6c0  3b 46 25 0d 6d b0 2e e7  5f 67 25 3d 30 84 28 46  |;F%.m..._g%=0.(F|
0000c6d0  25 80 31 29 3c 3e 30 8c  f2 5a 62 28 a4 61 62 28  |%.1)<>0..Zb(.ab(|
0000c6e0  22 45 6e 6f 66 69 6c 65  22 2c 66 24 29 29 3a 3d  |"Enofile",f$)):=|
0000c6f0  30 0d 6d ba 08 3d 4f 64  25 0d 6d ce 0c dd a4 59  |0.m..=Od%.m....Y|
0000c700  67 28 41 24 29 0d 6d e2  19 ea 42 24 3a e7 41 24  |g(A$).m...B$:.A$|
0000c710  3e 22 22 8c d6 42 68 25  2c 41 24 2c 42 24 0d 6d  |>""..Bh%,A$,B$.m|
0000c720  ec 07 3d 42 24 0d 6e 00  0c dd a4 72 63 28 41 24  |..=B$.n....rc(A$|
0000c730  29 0d 6e 0a 12 e7 41 24  3e 22 22 8c d6 43 68 25  |).n...A$>""..Ch%|
0000c740  2c 41 24 0d 6e 14 07 3d  41 24 0d 6e 28 0c dd a4  |,A$.n..=A$.n(...|
0000c750  55 62 28 61 25 29 0d 6e  32 0b ea 44 68 25 2c 42  |Ub(a%).n2..Dh%,B|
0000c760  24 0d 6e 3c 12 d6 45 68  25 2c 44 68 25 2c 61 25  |$.n<..Eh%,Dh%,a%|
0000c770  2c 42 24 0d 6e 46 07 3d  42 24 0d 6e 5a 08 dd f2  |,B$.nF.=B$.nZ...|
0000c780  42 5f 0d 6e 64 0d ea 6f  25 2c 6c 25 2c 46 25 0d  |B_.nd..o%,l%,F%.|
0000c790  6e 6e 27 c8 99 31 33 31  30 38 30 2c 31 37 2c 7a  |nn'..131080,17,z|
0000c7a0  60 24 2b 22 2e 63 6f 64  65 22 b8 6f 25 2c 2c 2c  |`$+".code".o%,,,|
0000c7b0  2c 6c 25 3b 46 25 0d 6e  78 18 e7 6f 25 3d 31 80  |,l%;F%.nx..o%=1.|
0000c7c0  6c 25 3e 30 80 28 46 25  80 31 29 3d 30 8c 0d 6e  |l%>0.(F%.1)=0..n|
0000c7d0  82 0b de 46 68 25 20 6c  25 0d 6e 8c 22 47 68 25  |...Fh% l%.n."Gh%|
0000c7e0  3d 46 68 25 2b 34 3a 48  68 25 3d 46 68 25 2b 38  |=Fh%+4:Hh%=Fh%+8|
0000c7f0  3a 45 68 25 3d 46 68 25  2b 31 32 0d 6e 96 24 49  |:Eh%=Fh%+12.n.$I|
0000c800  68 25 3d 46 68 25 2b 31  36 3a 4a 68 25 3d 46 68  |h%=Fh%+16:Jh%=Fh|
0000c810  25 2b 32 30 3a 43 68 25  3d 46 68 25 2b 32 34 0d  |%+20:Ch%=Fh%+24.|
0000c820  6e a0 24 42 68 25 3d 46  68 25 2b 32 38 3a 4b 68  |n.$Bh%=Fh%+28:Kh|
0000c830  25 3d 46 68 25 2b 33 32  3a 4c 68 25 3d 46 68 25  |%=Fh%+32:Lh%=Fh%|
0000c840  2b 33 36 0d 6e aa 0e 4d  68 25 3d 46 68 25 2b 34  |+36.n..Mh%=Fh%+4|
0000c850  30 0d 6e b4 25 c8 99 31  33 31 30 38 30 2c 31 36  |0.n.%..131080,16|
0000c860  2c 7a 60 24 2b 22 2e 63  6f 64 65 22 2c 46 68 25  |,z`$+".code",Fh%|
0000c870  2c 30 b8 3b 46 25 0d 6e  be 31 e7 28 46 25 80 31  |,0.;F%.n.1.(F%.1|
0000c880  29 8c 85 30 2c 22 48 65  6c 70 21 20 49 20 63 61  |)..0,"Help! I ca|
0000c890  6e 27 74 20 66 69 6e 64  20 6d 79 20 43 6f 64 65  |n't find my Code|
0000c8a0  20 66 69 6c 65 21 22 0d  6e c8 05 cc 0d 6e d2 29  | file!".n....n.)|
0000c8b0  85 30 2c 22 48 65 6c 70  21 20 49 20 63 61 6e 27  |.0,"Help! I can'|
0000c8c0  74 20 66 69 6e 64 20 6d  79 20 43 6f 64 65 20 66  |t find my Code f|
0000c8d0  69 6c 65 21 22 0d 6e dc  05 cd 0d 6e e6 05 e1 0d  |ile!".n....n....|
0000c8e0  6e fa 15 dd a4 6d 61 28  f8 46 60 25 2c 4f 64 25  |n....ma(.F`%,Od%|
0000c8f0  2c 41 24 29 0d 6f 04 0b  ea 46 25 2c 4e 68 25 0d  |,A$).o...F%,Nh%.|
0000c900  6f 0e 0d e7 63 5f 25 3c  26 41 35 8c 0d 6f 18 1d  |o...c_%<&A5..o..|
0000c910  c8 99 31 33 31 31 30 32  2c 36 2c 2c 2c 4f 64 25  |..131102,6,,,Od%|
0000c920  b8 2c 2c 46 60 25 3b 46  25 0d 6f 22 11 e7 28 46  |.,,F`%;F%.o"..(F|
0000c930  25 80 31 29 8c 46 60 25  3d 30 0d 6f 2c 0b 4e 68  |%.1).F`%=0.o,.Nh|
0000c940  25 3d 46 60 25 0d 6f 36  05 cc 0d 6f 40 39 c8 99  |%=F`%.o6...o@9..|
0000c950  26 32 30 30 36 36 2c 30  2c 2d 31 2c 4f 64 25 2c  |&20066,0,-1,Od%,|
0000c960  2d 31 2c 30 2c 2d 31 2c  30 2c 30 2c 46 61 24 2b  |-1,0,-1,0,0,Fa$+|
0000c970  22 5f 22 2b 41 24 b8 2c  4e 68 25 2c 2c 46 60 25  |"_"+A$.,Nh%,,F`%|
0000c980  3b 46 25 0d 6f 4a 17 e7  28 46 25 80 31 29 8c 46  |;F%.oJ..(F%.1).F|
0000c990  60 25 3d 30 3a 4e 68 25  3d 30 0d 6f 54 05 cd 0d  |`%=0:Nh%=0.oT...|
0000c9a0  6f 5e 08 3d 4e 68 25 0d  6f 72 0e dd f2 70 61 28  |o^.=Nh%.or...pa(|
0000c9b0  f8 46 60 25 29 0d 6f 7c  07 ea 46 25 0d 6f 86 0b  |.F`%).o|..F%.o..|
0000c9c0  e7 46 60 25 3e 30 8c 0d  6f 90 0d e7 63 5f 25 3c  |.F`%>0..o...c_%<|
0000c9d0  26 41 35 8c 0d 6f 9a 1d  c8 99 31 33 31 31 30 32  |&A5..o....131102|
0000c9e0  2c 37 2c 2c 46 60 25 b8  3b 46 25 3a 46 60 25 3d  |,7,,F`%.;F%:F`%=|
0000c9f0  30 0d 6f a4 1e c8 99 31  33 31 31 31 34 2c 31 2c  |0.o....131114,1,|
0000ca00  28 2d 31 36 2a 31 30 32  34 2a 31 30 32 34 29 0d  |(-16*1024*1024).|
0000ca10  6f ae 05 cc 0d 6f b8 1c  c8 99 26 32 30 30 36 36  |o....o....&20066|
0000ca20  2c 31 2c 46 60 25 b8 3b  46 25 3a 46 60 25 3d 30  |,1,F`%.;F%:F`%=0|
0000ca30  0d 6f c2 05 cd 0d 6f cc  05 cd 0d 6f d6 05 e1 0d  |.o....o....o....|
0000ca40  6f ea 08 dd f2 4f 68 0d  6f f4 0d ea 41 25 2c 4e  |o....Oh.o...A%,N|
0000ca50  25 2c 50 25 0d 6f fe 0d  e7 63 5f 25 3e 26 41 34  |%,P%.o...c_%>&A4|
0000ca60  8c 0d 70 08 12 c8 99 26  36 36 2c 33 2c 2d 31 b8  |..p....&66,3,-1.|
0000ca70  2c 41 25 0d 70 12 0c c8  95 41 25 3c 3e 2d 31 0d  |,A%.p....A%<>-1.|
0000ca80  70 1c 19 c8 99 26 36 36  2c 32 2c 41 25 b8 2c 2c  |p....&66,2,A%.,,|
0000ca90  2c 2c 2c 2c 2c 2c 50 25  0d 70 26 12 c8 99 26 36  |,,,,,,P%.p&...&6|
0000caa0  36 2c 33 2c 41 25 b8 2c  4e 25 0d 70 30 28 e7 c0  |6,3,A%.,N%.p0(..|
0000cab0  a4 55 62 28 50 25 29 2c  31 2b a9 46 61 24 29 3d  |.Ub(P%),1+.Fa$)=|
0000cac0  46 61 24 2b 22 5f 22 8c  c8 99 26 36 36 2c 31 2c  |Fa$+"_"...&66,1,|
0000cad0  41 25 0d 70 3a 09 41 25  3d 4e 25 0d 70 44 05 ce  |A%.p:.A%=N%.pD..|
0000cae0  0d 70 4e 05 cd 0d 70 58  05 e1 0d 70 6c 10 dd a4  |.pN...pX...pl...|
0000caf0  53 67 28 f8 41 24 2c 73  24 29 0d 70 76 0a ea 42  |Sg(.A$,s$).pv..B|
0000cb00  24 2c 6c 25 0d 70 80 0e  6c 25 3d a7 41 24 2c 73  |$,l%.p..l%=.A$,s|
0000cb10  24 29 0d 70 8a 0a e7 6c  25 3e 30 8c 0d 70 94 1d  |$).p...l%>0..p..|
0000cb20  42 24 3d c0 41 24 2c 6c  25 2d 31 29 3a 41 24 3d  |B$=.A$,l%-1):A$=|
0000cb30  c1 41 24 2c 6c 25 2b 31  29 0d 70 9e 05 cc 0d 70  |.A$,l%+1).p....p|
0000cb40  a8 0f 42 24 3d 41 24 3a  41 24 3d 22 22 0d 70 b2  |..B$=A$:A$="".p.|
0000cb50  05 cd 0d 70 bc 07 3d 42  24 0d 70 d0 08 dd f2 43  |...p..=B$.p....C|
0000cb60  5f 0d 70 da 26 c8 99 33  39 38 35 39 32 2c 2c 5f  |_.p.&..398592,,_|
0000cb70  60 24 2b 22 2e 6d 65 73  73 61 67 65 73 22 b8 2c  |`$+".messages".,|
0000cb80  2c 69 64 25 3b 46 25 0d  70 e4 2d e7 28 46 25 80  |,id%;F%.p.-.(F%.|
0000cb90  31 29 8c 85 30 2c 22 43  6f 75 6c 64 6e 27 74 20  |1)..0,"Couldn't |
0000cba0  6c 6f 61 64 20 4d 65 73  73 61 67 65 73 20 66 69  |load Messages fi|
0000cbb0  6c 65 21 22 0d 70 ee 12  de 50 68 25 31 36 2c 51  |le!".p...Ph%16,Q|
0000cbc0  68 25 20 69 64 25 0d 70  f8 24 c8 99 32 36 37 35  |h% id%.p.$..2675|
0000cbd0  32 31 2c 50 68 25 2c 5f  60 24 2b 22 2e 6d 65 73  |21,Ph%,_`$+".mes|
0000cbe0  73 61 67 65 73 22 2c 51  68 25 0d 71 02 05 e1 0d  |sages",Qh%.q....|
0000cbf0  71 16 08 dd f2 67 62 0d  71 20 17 e7 50 68 25 3e  |q....gb.q ..Ph%>|
0000cc00  30 8c c8 99 32 36 37 35  32 34 2c 50 68 25 0d 71  |0...267524,Ph%.q|
0000cc10  2a 05 e1 0d 71 3e 0c dd  a4 51 5f 28 74 24 29 0d  |*...q>...Q_(t$).|
0000cc20  71 48 07 ea 73 25 0d 71  52 18 c8 99 32 36 37 35  |qH..s%.qR...2675|
0000cc30  32 32 2c 50 68 25 2c 74  24 b8 2c 2c 73 25 0d 71  |22,Ph%,t$.,,s%.q|
0000cc40  5c 0c 3d a4 55 62 28 73  25 29 0d 71 66 0f dd a4  |\.=.Ub(s%).qf...|
0000cc50  61 62 28 74 24 2c 61 24  29 0d 71 70 07 ea 73 25  |ab(t$,a$).qp..s%|
0000cc60  0d 71 7a 23 c8 99 32 36  37 35 32 32 2c 50 68 25  |.qz#..267522,Ph%|
0000cc70  2c 74 24 2c 61 5f 25 2c  32 35 35 2c 61 24 b8 2c  |,t$,a_%,255,a$.,|
0000cc80  2c 73 25 0d 71 84 0c 3d  a4 55 62 28 73 25 29 0d  |,s%.q..=.Ub(s%).|
0000cc90  71 8e 12 dd a4 76 62 28  74 24 2c 61 24 2c 62 24  |q....vb(t$,a$,b$|
0000cca0  29 0d 71 98 07 ea 73 25  0d 71 a2 26 c8 99 32 36  |).q...s%.q.&..26|
0000ccb0  37 35 32 32 2c 50 68 25  2c 74 24 2c 61 5f 25 2c  |7522,Ph%,t$,a_%,|
0000ccc0  32 35 35 2c 61 24 2c 62  24 b8 2c 2c 73 25 0d 71  |255,a$,b$.,,s%.q|
0000ccd0  ac 0c 3d a4 55 62 28 73  25 29 0d 71 b6 15 dd a4  |..=.Ub(s%).q....|
0000cce0  52 68 28 74 24 2c 61 24  2c 62 24 2c 63 24 29 0d  |Rh(t$,a$,b$,c$).|
0000ccf0  71 c0 07 ea 73 25 0d 71  ca 29 c8 99 32 36 37 35  |q...s%.q.)..2675|
0000cd00  32 32 2c 50 68 25 2c 74  24 2c 61 5f 25 2c 32 35  |22,Ph%,t$,a_%,25|
0000cd10  35 2c 61 24 2c 62 24 2c  63 24 b8 2c 2c 73 25 0d  |5,a$,b$,c$.,,s%.|
0000cd20  71 d4 0c 3d a4 55 62 28  73 25 29 0d ff           |q..=.Ub(s%)..|
0000cd2d