Home » Personal collection » Acorn hard disk » risc_os_3_resources » Resources » Help/!RunImage

Help/!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 » Personal collection » Acorn hard disk » risc_os_3_resources » Resources
Filename: Help/!RunImage
Read OK:
File size: 19D9 bytes
Load address: 0000
Exec address: 0000
File contents
    5REM>Datafiles.!RunImage
   10K%=10:ONERROROSCLI("unset Help$Dir"):ERROREXT1,REPORT$+STR$ERL
   15PROCl:ONERRORPROCm
   20SYS66TOB%:M%=B%+K%:REPEAT:IFg%THEN
   25SYS393441,50,a%,M%TOr%;F%:IFF%AND1PROCe
   30ELSE:SYS393415,51,a%TOr%;F%:IFF%AND1PROCe
   35ENDIF
   40CASEr%OF
   45WHEN0:PROCn:SYS66TOB%:M%=B%+K%
   50WHEN2:PROCf
   55WHEN3:PROCg
   60WHEN6:PROCo
   65WHEN8:PROCp
   70WHEN9:PROCq
   75WHEN17,18:PROCr(r%)
   80WHEN19:PROCs
   85ENDCASE
   90UNTILFALSE:END
   95DEFPROCn:LOCALi%:SYS262351,,q%+20:b$="":Q%=q%!32:R%=q%!36:CASER%OF
  100WHEN-2:b$=FNa("HelpI2"):PROCa
  105WHEN-3:b$=FNa("HelpI3"):PROCa
  110WHEN-4:b$=FNa("HelpI4")+FNa("HelpI4a")+FNa("HelpI4b"):PROCa
  115WHEN-5:b$=FNa("HelpI5")+FNa("HelpI5a"):PROCa
  120WHEN-6:b$=FNa("HelpI6"):PROCa
  125WHEN-7:b$=FNa("HelpI7"):PROCa
  130WHEN-8:b$=FNa("HelpI8"):PROCa
  135WHEN-9:b$=FNa("HelpI9"):PROCa
  140WHEN-10:b$=FNa("HelpI10"):PROCa
  145WHEN-11:b$=FNa("HelpI11"):PROCa
  150WHEN-12:b$=FNa("HelpI12"):PROCa
  155WHEN-13:b$=FNa("HelpI13"):PROCa
  160OTHERWISE:!q%=40:q%!12=0:q%!16=1282:SYS262375,18,q%,Q%,R%TO,,S%:IFS%=0THEN
  165d$=""
  170ELSE:SYS272000,S%TOi%:d$=FNd(i%)
  175ENDIF
  180T%=1
  185ENDCASE
  190ENDPROC
  195DEFFNd(p%):LOCALs$:WHILE?p%<>13AND?p%<>0:s$+=CHR$?p%:p%+=1:ENDWHILE:=s$
  200DEFFNc (g$):LOCALU%:SYS262363,,0,,,,g$,0TO,,U%:=U%
  205DEFPROCl:LOCALc%,i%:LOCALs%:C%=1:PROCt:DIMn%256:aa%=n%+256:DIMq%1024:DIMa%256:DIMk%512:DIMI%512:DIMt%40:q%!0=10:q%!4=1282:q%!8=1283:q%!12=262338:q%!16=0:f$=FNa("Tsk"):SYS262336,300,1263747412,f$,q%TON%,ba%:SYS262361,,"Help:Templates":LOCALERROR:s%=FNc ("grab"):DIMV%s%
  210SYS262363,,k%,V%,V%+s%,-1,"grab",0TO,,n%,,,,D%:IFD%=0THENSYS262362:ERROR1,FNb("TNF","grab")
  215SYS262337,,k%TOca%:!a%=ca%:a%!4=-32767:a%!8=-32767:a%!12=-32767:a%!16=-32767:a%!20=0:a%!24=0:a%!28=-1:SYS262341,,a%:s%=FNc ("info"):DIMW%s%:SYS262363,,k%,W%,W%+s%,-1,"info",0TO,,n%,,,,D%:IFD%=0THENSYS262362:ERROR1,FNb("TNF","info")
  220$(k%!(88+96+20))=FNa("HelpID"):SYS262337,,k%TOX%:s%=FNc ("interactive"):DIMZ%s%:SYS262363,,k%,Z%,Z%+s%,-1,"interactive",0TO,,n%,,,,D%:IFD%=0THENSYS262362:ERROR1,FNb("TNF","interactive")
  225SYS262337,,k%TOd%:SYS262362:RESTOREERROR
  230!t%=d%:t%!4=0:SYS262350,,t%:SYS262340,,t%:_%=t%!12:v%=t%!20-_%:t%!4=d%:!a%=-1:a%!4=0:a%!8=0:a%!12=69:a%!16=68:a%!20=12290:$(a%+24)=FNe("SN"):SYS262338,,a%TOda%:`%=FNf:SYS131107,"Help$Options",q%,1024,0,3TO,,l%:q%?l%=13:IFl%=0$q%="I"
  235l%=1:g%=FALSE:u%=0:i%=0:WHILEl%<=LEN$q%:CASEMID$($q%,l%,1)OF
  240WHEN"~":IFu%PROCb(FNa("Error1"))ELSEu%=l%
  245WHEN"I","i":IFu%IFl%<>u%+1PROCb(FNa("Error1"))
  250IFu%=0g%=TRUE
  255u%=0:i%+=1
  260WHEN" ":IFu%PROCb(FNa("Error1"))
  265OTHERWISEPROCb(FNa("Error2")+"'"+MID$($q%,l%,1)+"'")
  270ENDCASE
  275l%+=1:ENDWHILE:IFu%PROCb(FNa("Error1"))
  280IFi%<>1PROCb(FNa("Error3"))
  285d$="":c$="":w%=0:IFg%PROCc(d%)
  290C%=3:ENDPROC
  295DEFPROCt:LOCALN$:N$="Help:Messages":DIMe%256:SYS30,6,,,17+LEN(N$)TO,,o%:$(o%+16)=N$:SYS267521,o%,o%+16,0:ENDPROC
  300DEFFNe(T$):LOCALF%,L%:SYS267522,o%,T$,e%,256,"",""TO,,,L%;F%:IFF%AND1THEN$e%=T$ELSEe%?L%=13
  305=$e%
  310DEFFNa(T$):=FNb(T$,"")
  315DEFFNb(T$,S$):LOCALF%,L%,G%:SYS398594,o%,T$,e%,256,S$,""TOG%,,,L%;F%:IFF%AND1THEN
  320SYS262367,G%,1,f$:$e%=T$
  325ELSE:e%?L%=13
  330ENDIF
  335=$e%
  340DEFFNg(T$,S$,h$):LOCALF%,L%,G%:SYS398594,o%,T$,e%,256,S$,h$TOG%,,,L%;F%:IFF%AND1THEN
  345SYS262367,G%,1,f$:$e%=T$
  350ELSE:e%?L%=13
  355ENDIF
  360=$e%
  365DEFFNf:LOCALb%,i%,c%,f%,O%:O%=0:IFN%>=310THEN
  370DIMi%128:c%=i%
  375ENDIF
  380DIMb%76:IFN%<310ORLEN(FNa("H"))<=12THEN
  385$b%=LEFT$(FNa("H"),12):f%=LEN(LEFT$(FNa("H"),12))
  390ELSE:$c%=FNa("H"):O%=1<<8:b%!0=c%:f%=LEN(FNa("H")):c%+=LEN(FNa("H"))+1
  395ENDIF
  400b%?12=7:b%?13=2:b%?14=7:b%?15=1:b%!16=76:b%!20=44:b%!24=0:b%!28=O%:b%!32=X%:b%!36=117440545:IFLEN(FNa("I"))>12THEN
  405$c%=FNa("I"):b%!40=c%:b%!44=-1:b%!48=LEN(FNa("I")):c%+=LEN(FNa("I"))+1:b%!36=b%!36OR256:IFLEN(FNa("I"))>f%THEN
  410f%=LEN(FNa("I"))
  415ENDIF
  420ELSE:$(b%+40)=LEFT$(FNa("I"),12):IFLEN(LEFT$(FNa("I"),12))>f%THEN
  425f%=LEN(LEFT$(FNa("I"),12))
  430ENDIF
  435ENDIF
  440b%!52=128:b%!56=-1:b%!60=117440545:IFLEN(FNa("Q"))>12THEN
  445$c%=FNa("Q"):b%!64=c%:b%!68=-1:b%!72=LEN(FNa("Q")):c%+=LEN(FNa("Q"))+1:b%!60=b%!60OR256:IFLEN(FNa("Q"))>f%THEN
  450f%=LEN(FNa("Q"))
  455ENDIF
  460ELSE:$(b%+64)=LEFT$(FNa("Q"),12):IFLEN(LEFT$(FNa("Q"),12))>f%THEN
  465f%=LEN(LEFT$(FNa("Q"),12))
  470ENDIF
  475ENDIF
  480b%!16=(f%+1)*16:=b%
  485DEFPROCb(s$):PROCu(s$+" "+FNa("Error4")):ENDPROC
  490DEFPROCf:LOCALx%,y%,l%,m%:IF!a%=d%THEN
  495!q%=d%:SYS262348,,q%:IF(q%!12-q%!4)<>(a%!12-a%!4)OR(q%!16-q%!8)<>(a%!16-a%!8)THEN
  500SYS53,-1,5TO,,m%:x%=(a%!12-a%!4)DIV16:l%=256DIVx%:IF256MODx%<>0l%+=1
  505IFl%<w%l%=w%
  510q%!48=((q%!56-l%*(v%+-8+1))>>m%)<<m%:SYS262359,d%,q%+44:PROCd(d%):c$="":a%!8=((a%!16-l%*(v%+-8+1))>>m%)<<m%
  515ENDIF
  520ENDIF
  525SYS262341,,a%:ENDPROC
  530DEFPROCg:IF!a%=d%PROCd(d%):g%=FALSE
  535SYS262342,,a%:ENDPROC
  540DEFPROCp:IFa%!24=385THEN
  545IFg%THEN
  550!a%=d%:PROCg
  555ELSE:c$="":g%=TRUE:PROCc(d%)
  560ENDIF
  565ELSE:SYS262364,a%!24
  570ENDIF
  575ENDPROC
  580DEFPROCo:LOCALp%:IFa%!8AND5THEN
  585IFa%!12=-2c$="":g%=TRUE:PROCc(d%)
  590ENDIF
  595IFa%!8AND2THEN
  600IFa%!12=-2PROCi(`%,!a%-64,96+88)
  605ENDIF
  610ENDPROC
  615DEFPROCi(h%,x%,y%):ea%=h%:fa%=x%:ga%=y%:SYS262356,,h%,x%,y%:ENDPROC
  620DEFPROCq:LOCALa$:SYS262357,,ea%,a%,STRING$(200," ")TO,,,a$:IFa$=""ENDPROC
  625IFa$=FNa("Q"):PROCj:END
  630SYS262351,,a%:IFa%?8AND1THENPROCi(`%,fa%,ga%)
  635ENDPROC
  640DEFPROCr(r%):LOCALi$,i%:CASEa%!16OF
  645WHEN0:PROCj:END
  650WHEN10:PROCv
  655WHEN1282:PROCw
  660WHEN1283:IFg%=FALSETHENc$="":g%=TRUE:PROCc(d%)
  665PROCk
  670WHEN262338:IFa%!4<>ba%ANDFNd(a%+28)="Help system"THEN
  675a%!12=0:a%!16=0:!a%=20:SYS262375,17,a%,a%!4
  680ENDIF
  685ENDCASE
  690ENDPROC
  695DEFPROCv:LOCALi%:LOCALERROR:ONERRORLOCALa%!12=a%!8:SYS262375,19,a%,a%!4:ENDPROC
  700i%=a%!20:IFNOT(g%)BPUT#i%,"Set Help$Options ~I"
  705SYS131107,"Help$Dir",q%,1024,0,3TO,,l%:q%?l%=13:BPUT#i%,"Run "+$q%:ENDPROC
  710DEFPROCs:IFa%!16=1282T%+=1:IFT%=2PROCa
  715ENDPROC
  720DEFPROCa:IFb$=""ANDd$<>""THEN
  725IFQ%=-2b$=FNb("HelpH3",d$)
  730ENDIF
  735$(a%+20)=b$+CHR$0:PROCk:ENDPROC
  740DEFPROCw:IFa%!36<-1ENDPROC
  745CASEa%!32OF
  750WHENd%:PROCh("HelpH2")
  755WHENX%:PROCh("HelpH4")
  760WHEN-2:PROCh("HelpH1")
  765OTHERWISE:IFN%>=218ANDa%!36<>-1THEN
  770SYS262388,1,q%,a%!32,a%!36:CASE!q%OF
  775WHEN0:IFq%!4=-1PROCh("Mnu01")
  780WHEN1:PROCh("Mnu02")
  785ENDCASE
  790ENDIF
  795ENDCASE
  800ENDPROC
  805DEFPROCh(m$):LOCALc%:m$=FNa(m$):c%=LENm$+1:a%!12=a%!8:a%!16=1283:$(a%+20)=m$+CHR$0:!a%=(24+c%)ANDNOT3:SYS262375,17,a%,a%!4:ENDPROC
  810DEFPROCx(ha%):LOCALb%:b%=t%:J%-=(v%+P%):b%!12=J%:b%!16=16*(1+LEN$ha%):b%!20=J%+v%:b%!28=ha%:SYS262338,,b%+4:SYS262353,d%,b%!8,b%!12,b%!16,b%!20:w%+=1:ENDPROC
  815DEFPROCk:LOCALx%,P%,J%,z%,p%,n%,H%,A%,y%:SYS39,a%+20,k%,512+(1<<31)TOp%,,z%:z%+=k%:?z%=13:t$="":FORx%=a%+20TOp%:t$+=CHR$(?x%):NEXT:IFt$=c$ENDPROC
  820c$=t$:y%=I%:FORx%=k%TOz%:?y%=?x%:IF?x%<>ASC("\")THEN
  825y%+=1
  830ELSE:x%+=1:IF?x%=ASC("\")THEN
  835y%+=1
  840ELSE:$(y%)=FNa("T"+CHR$(?x%)):IF?y%=ASC("T")AND?(y%+1)=?x%ANDLEN($(y%))=2THEN?y%=ASC("\")
  845y%+=LEN($(y%))
  850ENDIF
  855ENDIF
  860IFy%-I%>500THENy%=I%+500
  865NEXTx%:z%=y%-1:w%=0:PROCd(d%):P%=-8:J%=_%+v%+P%:!a%=d%:SYS262347,,a%:x%=(a%!12-a%!4)DIV16:p%=I%:WHILEp%<z%:n%=p%:A%=p%:H%=FALSE:REPEAT:p%+=1:IFp%-n%>=x%THEN
  870H%=TRUE
  875ELSE:IF?p%=13A%=p%:H%=TRUE
  880IF?p%=10A%=p%:H%=TRUE
  885IF?p%=32A%=p%
  890ENDIF
  895UNTILH%:IFA%<>n%p%=A%:?p%=13:PROCx(n%)
  900p%+=1:ENDWHILE:SYS53,-1,4TO,,ia%:SYS53,-1,5TO,,m%:!q%=d%:SYS262348,,q%:x%=(a%!12-a%!4)DIV16:l%=256DIVx%:IF256MODx%<>0l%+=1
  905IFl%<w%l%=w%
  910q%!48=((q%!56-l%*(v%+-8+1))>>m%)<<m%:SYS262359,d%,q%+44:q%!8=((q%!16-l%*(v%+-8+1))>>m%)<<m%:SYS262341,,q%:ENDPROC
  915DEFPROCd(h%):LOCALj%:!q%=h%:SYS262348,,q%:!q%=h%:q%!8=8388736:q%!12=8388736:FORj%=1TOq%!88:q%!4=j%-1:SYS262349,,q%:NEXT:ENDPROC
  920DEFPROCj:IFo%<>0THEN
  925SYS267524,o%:SYS30,7,,o%
  930ENDIF
  935*unset Help$Dir
  940SYS262365:ENDPROC
  945DEFPROCu(e$):C%=1:ERROR1,e$:ENDPROC
  950DEFPROCy(e$):C%=2:ERROR1,e$:ENDPROC
  955DEFPROCm:LOCALr%:LOCALERROR:ONERROROSCLI("unset Help$Dir"):ERROREXT1,REPORT$+" ("+STR$ERL+")"
  960!q%=ERR:IFC%=3THEN
  965$(q%+4)=FNg("FIE",REPORT$,STR$ERL)+CHR$0
  970ELSE:$(q%+4)=REPORT$+CHR$(0)
  975ENDIF
  980SYS262367,q%,C%,FNa("Tsk")TO,r%:IFr%=2THEN
  985*Unset Help$Dir
  990SYS262365:END
  995ENDIF
 1000ENDPROC
 1005DEFPROCc(h%):!a%=h%:SYS262347,,a%:a%!20=0:a%!24=0:a%!28=-1:PROCf:SYS66TOB%:M%=B%+K%:ENDPROC
 1010DEFPROCz(h%,t$):t$=MID$(t$,INSTR(t$,"<")+1):!q%=h%:SYS262348,,q%:$(q%!76)=t$:ENDPROC
 1015DEFPROCe:PROCy(FNa("Fatal2")):ENDPROC
�>Datafiles.!RunImage

)K%=10:�("unset Help$Dir"):��1,�$+Þ
�l:��m
ș66�B%:M%=B%+K%:�:�g%�
#ș393441,50,a%,M%�r%;F%:�F%�1�e
"�:ș393415,51,a%�r%;F%:�F%�1�e
#�
(	Ȏr%�
-�0:�n:ș66�B%:M%=B%+K%
2	�2:�f
7	�3:�g
<	�6:�o
A	�8:�p
F	�9:�q
K�17,18:�r(r%)
P
�19:�s
U�
Z��:�
_9��n:�i%:ș262351,,q%+20:b$="":Q%=q%!32:R%=q%!36:ȎR%�
d�-2:b$=�a("HelpI2"):�a
i�-3:b$=�a("HelpI3"):�a
n6�-4:b$=�a("HelpI4")+�a("HelpI4a")+�a("HelpI4b"):�a
s(�-5:b$=�a("HelpI5")+�a("HelpI5a"):�a
x�-6:b$=�a("HelpI6"):�a
}�-7:b$=�a("HelpI7"):�a
��-8:b$=�a("HelpI8"):�a
��-9:b$=�a("HelpI9"):�a
��-10:b$=�a("HelpI10"):�a
��-11:b$=�a("HelpI11"):�a
��-12:b$=�a("HelpI12"):�a
��-13:b$=�a("HelpI13"):�a
�@:!q%=40:q%!12=0:q%!16=1282:ș262375,18,q%,Q%,R%�,,S%:�S%=0�
�	d$=""
��:ș272000,S%�i%:d$=�d(i%)
��
�T%=1
��
��
�5ݤd(p%):�s$:ȕ?p%<>13�?p%<>0:s$+=�?p%:p%+=1:�:=s$
�-ݤc (g$):�U%:ș262363,,0,,,,g$,0�,,U%:=U%
����l:�c%,i%:�s%:C%=1:�t:�n%256:aa%=n%+256:�q%1024:�a%256:�k%512:�I%512:�t%40:q%!0=10:q%!4=1282:q%!8=1283:q%!12=262338:q%!16=0:f$=�a("Tsk"):ș262336,300,1263747412,f$,q%�N%,ba%:ș262361,,"Help:Templates":�:s%=�c ("grab"):�V%s%
�Sș262363,,k%,V%,V%+s%,-1,"grab",0�,,n%,,,,D%:�D%=0�ș262362:�1,�b("TNF","grab")
��ș262337,,k%�ca%:!a%=ca%:a%!4=-32767:a%!8=-32767:a%!12=-32767:a%!16=-32767:a%!20=0:a%!24=0:a%!28=-1:ș262341,,a%:s%=�c ("info"):�W%s%:ș262363,,k%,W%,W%+s%,-1,"info",0�,,n%,,,,D%:�D%=0�ș262362:�1,�b("TNF","info")
ܫ$(k%!(88+96+20))=�a("HelpID"):ș262337,,k%�X%:s%=�c ("interactive"):�Z%s%:ș262363,,k%,Z%,Z%+s%,-1,"interactive",0�,,n%,,,,D%:�D%=0�ș262362:�1,�b("TNF","interactive")
�ș262337,,k%�d%:ș262362:��
��!t%=d%:t%!4=0:ș262350,,t%:ș262340,,t%:_%=t%!12:v%=t%!20-_%:t%!4=d%:!a%=-1:a%!4=0:a%!8=0:a%!12=69:a%!16=68:a%!20=12290:$(a%+24)=�e("SN"):ș262338,,a%�da%:`%=�f:ș131107,"Help$Options",q%,1024,0,3�,,l%:q%?l%=13:�l%=0$q%="I"
�0l%=1:g%=�:u%=0:i%=0:ȕl%<=�$q%:Ȏ�$q%,l%,1)�
�"�"~":�u%�b(�a("Error1"))�u%=l%
�)�"I","i":�u%�l%<>u%+1�b(�a("Error1"))
�
�u%=0g%=�
�u%=0:i%+=1
�" ":�u%�b(�a("Error1"))
	(�b(�a("Error2")+"'"+�$q%,l%,1)+"'")
�
l%+=1:�:�u%�b(�a("Error1"))
�i%<>1�b(�a("Error3"))
d$="":c$="":w%=0:�g%�c(d%)
"
C%=3:�
'^��t:�N$:N$="Help:Messages":�e%256:ș30,6,,,17+�(N$)�,,o%:$(o%+16)=N$:ș267521,o%,o%+16,0:�
,Mݤe(T$):�F%,L%:ș267522,o%,T$,e%,256,"",""�,,,L%;F%:�F%�1�$e%=T$�e%?L%=13
1=$e%
6ݤa(T$):=�b(T$,"")
;Fݤb(T$,S$):�F%,L%,G%:ș398594,o%,T$,e%,256,S$,""�G%,,,L%;F%:�F%�1�
@ș262367,G%,1,f$:$e%=T$
E�:e%?L%=13
J�
O=$e%
TIݤg(T$,S$,h$):�F%,L%,G%:ș398594,o%,T$,e%,256,S$,h$�G%,,,L%;F%:�F%�1�
Yș262367,G%,1,f$:$e%=T$
^�:e%?L%=13
c�
h=$e%
m&ݤf:�b%,i%,c%,f%,O%:O%=0:�N%>=310�
r�i%128:c%=i%
w�
|!�b%76:�N%<310��(�a("H"))<=12�
�'$b%=��a("H"),12):f%=�(��a("H"),12))
�@�:$c%=�a("H"):O%=1<<8:b%!0=c%:f%=�(�a("H")):c%+=�(�a("H"))+1
��
�ob%?12=7:b%?13=2:b%?14=7:b%?15=1:b%!16=76:b%!20=44:b%!24=0:b%!28=O%:b%!32=X%:b%!36=117440545:�(�a("I"))>12�
�c$c%=�a("I"):b%!40=c%:b%!44=-1:b%!48=�(�a("I")):c%+=�(�a("I"))+1:b%!36=b%!36�256:�(�a("I"))>f%�
�f%=�(�a("I"))
��
�0�:$(b%+40)=��a("I"),12):�(��a("I"),12))>f%�
�f%=�(��a("I"),12))
��
��
�6b%!52=128:b%!56=-1:b%!60=117440545:�(�a("Q"))>12�
�c$c%=�a("Q"):b%!64=c%:b%!68=-1:b%!72=�(�a("Q")):c%+=�(�a("Q"))+1:b%!60=b%!60�256:�(�a("Q"))>f%�
�f%=�(�a("Q"))
��
�0�:$(b%+64)=��a("Q"),12):�(��a("Q"),12))>f%�
�f%=�(��a("Q"),12))
��
��
�b%!16=(f%+1)*16:=b%
�%��b(s$):�u(s$+" "+�a("Error4")):�
���f:�x%,y%,l%,m%:�!a%=d%�
�O!q%=d%:ș262348,,q%:�(q%!12-q%!4)<>(a%!12-a%!4)�(q%!16-q%!8)<>(a%!16-a%!8)�
�?ș53,-1,5�,,m%:x%=(a%!12-a%!4)�16:l%=256�x%:�256�x%<>0l%+=1
��l%<w%l%=w%
�kq%!48=((q%!56-l%*(v%+-8+1))>>m%)<<m%:ș262359,d%,q%+44:�d(d%):c$="":a%!8=((a%!16-l%*(v%+-8+1))>>m%)<<m%
�
�

ș262341,,a%:�
��g:�!a%=d%�d(d%):g%=�
ș262342,,a%:�
��p:�a%!24=385�
!�g%�
&
!a%=d%:�g
+�:c$="":g%=�:�c(d%)
0�
5�:ș262364,a%!24
:�
?�
D��o:�p%:�a%!8�5�
I�a%!12=-2c$="":g%=�:�c(d%)
N�
S�a%!8�2�
X �a%!12=-2�i(`%,!a%-64,96+88)
]�
b�
g;��i(h%,x%,y%):ea%=h%:fa%=x%:ga%=y%:ș262356,,h%,x%,y%:�
l4��q:�a$:ș262357,,ea%,a%,�200," ")�,,,a$:�a$=""�
q�a$=�a("Q"):�j:�
v'ș262351,,a%:�a%?8�1��i(`%,fa%,ga%)
{�
���r(r%):�i$,i%:Ȏa%!16�
��0:�j:�
�
�10:�v
��1282:�w
�!�1283:�g%=��c$="":g%=�:�c(d%)
��k
�/�262338:�a%!4<>ba%��d(a%+28)="Help system"�
�.a%!12=0:a%!16=0:!a%=20:ș262375,17,a%,a%!4
��
��
��
�2��v:�i%:�:��a%!12=a%!8:ș262375,19,a%,a%!4:�
�-i%=a%!20:�(g%)�#i%,"Set Help$Options ~I"
�Cș131107,"Help$Dir",q%,1024,0,3�,,l%:q%?l%=13:�#i%,"Run "+$q%:�
� ��s:�a%!16=1282T%+=1:�T%=2�a
��
���a:�b$=""�d$<>""�
��Q%=-2b$=�b("HelpH3",d$)
��
�$(a%+20)=b$+�0:�k:�
���w:�a%!36<-1�
�Ȏa%!32�
��d%:�h("HelpH2")
��X%:�h("HelpH4")
��-2:�h("HelpH1")
�:�N%>=218�a%!36<>-1�
$ș262388,1,q%,a%!32,a%!36:Ȏ!q%�
�0:�q%!4=-1�h("Mnu01")
�1:�h("Mnu02")
�
�
�
 �
%l��h(m$):�c%:m$=�a(m$):c%=�m$+1:a%!12=a%!8:a%!16=1283:$(a%+20)=m$+�0:!a%=(24+c%)��3:ș262375,17,a%,a%!4:�
*���x(ha%):�b%:b%=t%:J%-=(v%+P%):b%!12=J%:b%!16=16*(1+�$ha%):b%!20=J%+v%:b%!28=ha%:ș262338,,b%+4:ș262353,d%,b%!8,b%!12,b%!16,b%!20:w%+=1:�
/z��k:�x%,P%,J%,z%,p%,n%,H%,A%,y%:ș39,a%+20,k%,512+(1<<31)�p%,,z%:z%+=k%:?z%=13:t$="":�x%=a%+20�p%:t$+=�(?x%):�:�t$=c$�
4/c$=t$:y%=I%:�x%=k%�z%:?y%=?x%:�?x%<>�("\")�
9	y%+=1
>�:x%+=1:�?x%=�("\")�
C	y%+=1
HH�:$(y%)=�a("T"+�(?x%)):�?y%=�("T")�?(y%+1)=?x%��($(y%))=2�?y%=�("\")
My%+=�($(y%))
R�
W�
\�y%-I%>500�y%=I%+500
a��x%:z%=y%-1:w%=0:�d(d%):P%=-8:J%=_%+v%+P%:!a%=d%:ș262347,,a%:x%=(a%!12-a%!4)�16:p%=I%:ȕp%<z%:n%=p%:A%=p%:H%=�:�:p%+=1:�p%-n%>=x%�
fH%=�
k�:�?p%=13A%=p%:H%=�
p�?p%=10A%=p%:H%=�
u�?p%=32A%=p%
z�
"�H%:�A%<>n%p%=A%:?p%=13:�x(n%)
�kp%+=1:�:ș53,-1,4�,,ia%:ș53,-1,5�,,m%:!q%=d%:ș262348,,q%:x%=(a%!12-a%!4)�16:l%=256�x%:�256�x%<>0l%+=1
��l%<w%l%=w%
�mq%!48=((q%!56-l%*(v%+-8+1))>>m%)<<m%:ș262359,d%,q%+44:q%!8=((q%!16-l%*(v%+-8+1))>>m%)<<m%:ș262341,,q%:�
�l��d(h%):�j%:!q%=h%:ș262348,,q%:!q%=h%:q%!8=8388736:q%!12=8388736:�j%=1�q%!88:q%!4=j%-1:ș262349,,q%:�:�
���j:�o%<>0�
�ș267524,o%:ș30,7,,o%
��
�*unset Help$Dir
�ș262365:�
���u(e$):C%=1:�1,e$:�
���y(e$):C%=2:�1,e$:�
�7��m:�r%:�:�("unset Help$Dir"):��1,�$+" ("+Þ+")"
�!q%=�:�C%=3�
�$(q%+4)=�g("FIE",�$,Þ)+�0
��:$(q%+4)=�$+�(0)
��
�'ș262367,q%,C%,�a("Tsk")�,r%:�r%=2�
�*Unset Help$Dir
�ș262365:�
��
��
�N��c(h%):!a%=h%:ș262347,,a%:a%!20=0:a%!24=0:a%!28=-1:�f:ș66�B%:M%=B%+K%:�
�C��z(h%,t$):t$=�t$,�t$,"<")+1):!q%=h%:ș262348,,q%:$(q%!76)=t$:�
���e:�y(�a("Fatal2")):�
�
00000000  0d 00 05 19 f4 3e 44 61  74 61 66 69 6c 65 73 2e  |.....>Datafiles.|
00000010  21 52 75 6e 49 6d 61 67  65 0d 00 0a 29 4b 25 3d  |!RunImage...)K%=|
00000020  31 30 3a ee 85 ff 28 22  75 6e 73 65 74 20 48 65  |10:...("unset He|
00000030  6c 70 24 44 69 72 22 29  3a 85 a2 31 2c f6 24 2b  |lp$Dir"):..1,.$+|
00000040  c3 9e 0d 00 0f 0b f2 6c  3a ee 85 f2 6d 0d 00 14  |.......l:...m...|
00000050  1b c8 99 36 36 b8 42 25  3a 4d 25 3d 42 25 2b 4b  |...66.B%:M%=B%+K|
00000060  25 3a f5 3a e7 67 25 8c  0d 00 19 23 c8 99 33 39  |%:.:.g%....#..39|
00000070  33 34 34 31 2c 35 30 2c  61 25 2c 4d 25 b8 72 25  |3441,50,a%,M%.r%|
00000080  3b 46 25 3a e7 46 25 80  31 f2 65 0d 00 1e 22 cc  |;F%:.F%.1.e...".|
00000090  3a c8 99 33 39 33 34 31  35 2c 35 31 2c 61 25 b8  |:..393415,51,a%.|
000000a0  72 25 3b 46 25 3a e7 46  25 80 31 f2 65 0d 00 23  |r%;F%:.F%.1.e..#|
000000b0  05 cd 0d 00 28 09 c8 8e  72 25 ca 0d 00 2d 1a c9  |....(...r%...-..|
000000c0  30 3a f2 6e 3a c8 99 36  36 b8 42 25 3a 4d 25 3d  |0:.n:..66.B%:M%=|
000000d0  42 25 2b 4b 25 0d 00 32  09 c9 32 3a f2 66 0d 00  |B%+K%..2..2:.f..|
000000e0  37 09 c9 33 3a f2 67 0d  00 3c 09 c9 36 3a f2 6f  |7..3:.g..<..6:.o|
000000f0  0d 00 41 09 c9 38 3a f2  70 0d 00 46 09 c9 39 3a  |..A..8:.p..F..9:|
00000100  f2 71 0d 00 4b 11 c9 31  37 2c 31 38 3a f2 72 28  |.q..K..17,18:.r(|
00000110  72 25 29 0d 00 50 0a c9  31 39 3a f2 73 0d 00 55  |r%)..P..19:.s..U|
00000120  05 cb 0d 00 5a 08 fd a3  3a e0 0d 00 5f 39 dd f2  |....Z...:..._9..|
00000130  6e 3a ea 69 25 3a c8 99  32 36 32 33 35 31 2c 2c  |n:.i%:..262351,,|
00000140  71 25 2b 32 30 3a 62 24  3d 22 22 3a 51 25 3d 71  |q%+20:b$="":Q%=q|
00000150  25 21 33 32 3a 52 25 3d  71 25 21 33 36 3a c8 8e  |%!32:R%=q%!36:..|
00000160  52 25 ca 0d 00 64 1a c9  2d 32 3a 62 24 3d a4 61  |R%...d..-2:b$=.a|
00000170  28 22 48 65 6c 70 49 32  22 29 3a f2 61 0d 00 69  |("HelpI2"):.a..i|
00000180  1a c9 2d 33 3a 62 24 3d  a4 61 28 22 48 65 6c 70  |..-3:b$=.a("Help|
00000190  49 33 22 29 3a f2 61 0d  00 6e 36 c9 2d 34 3a 62  |I3"):.a..n6.-4:b|
000001a0  24 3d a4 61 28 22 48 65  6c 70 49 34 22 29 2b a4  |$=.a("HelpI4")+.|
000001b0  61 28 22 48 65 6c 70 49  34 61 22 29 2b a4 61 28  |a("HelpI4a")+.a(|
000001c0  22 48 65 6c 70 49 34 62  22 29 3a f2 61 0d 00 73  |"HelpI4b"):.a..s|
000001d0  28 c9 2d 35 3a 62 24 3d  a4 61 28 22 48 65 6c 70  |(.-5:b$=.a("Help|
000001e0  49 35 22 29 2b a4 61 28  22 48 65 6c 70 49 35 61  |I5")+.a("HelpI5a|
000001f0  22 29 3a f2 61 0d 00 78  1a c9 2d 36 3a 62 24 3d  |"):.a..x..-6:b$=|
00000200  a4 61 28 22 48 65 6c 70  49 36 22 29 3a f2 61 0d  |.a("HelpI6"):.a.|
00000210  00 7d 1a c9 2d 37 3a 62  24 3d a4 61 28 22 48 65  |.}..-7:b$=.a("He|
00000220  6c 70 49 37 22 29 3a f2  61 0d 00 82 1a c9 2d 38  |lpI7"):.a.....-8|
00000230  3a 62 24 3d a4 61 28 22  48 65 6c 70 49 38 22 29  |:b$=.a("HelpI8")|
00000240  3a f2 61 0d 00 87 1a c9  2d 39 3a 62 24 3d a4 61  |:.a.....-9:b$=.a|
00000250  28 22 48 65 6c 70 49 39  22 29 3a f2 61 0d 00 8c  |("HelpI9"):.a...|
00000260  1c c9 2d 31 30 3a 62 24  3d a4 61 28 22 48 65 6c  |..-10:b$=.a("Hel|
00000270  70 49 31 30 22 29 3a f2  61 0d 00 91 1c c9 2d 31  |pI10"):.a.....-1|
00000280  31 3a 62 24 3d a4 61 28  22 48 65 6c 70 49 31 31  |1:b$=.a("HelpI11|
00000290  22 29 3a f2 61 0d 00 96  1c c9 2d 31 32 3a 62 24  |"):.a.....-12:b$|
000002a0  3d a4 61 28 22 48 65 6c  70 49 31 32 22 29 3a f2  |=.a("HelpI12"):.|
000002b0  61 0d 00 9b 1c c9 2d 31  33 3a 62 24 3d a4 61 28  |a.....-13:b$=.a(|
000002c0  22 48 65 6c 70 49 31 33  22 29 3a f2 61 0d 00 a0  |"HelpI13"):.a...|
000002d0  40 7f 3a 21 71 25 3d 34  30 3a 71 25 21 31 32 3d  |@.:!q%=40:q%!12=|
000002e0  30 3a 71 25 21 31 36 3d  31 32 38 32 3a c8 99 32  |0:q%!16=1282:..2|
000002f0  36 32 33 37 35 2c 31 38  2c 71 25 2c 51 25 2c 52  |62375,18,q%,Q%,R|
00000300  25 b8 2c 2c 53 25 3a e7  53 25 3d 30 8c 0d 00 a5  |%.,,S%:.S%=0....|
00000310  09 64 24 3d 22 22 0d 00  aa 1e cc 3a c8 99 32 37  |.d$="".....:..27|
00000320  32 30 30 30 2c 53 25 b8  69 25 3a 64 24 3d a4 64  |2000,S%.i%:d$=.d|
00000330  28 69 25 29 0d 00 af 05  cd 0d 00 b4 08 54 25 3d  |(i%).........T%=|
00000340  31 0d 00 b9 05 cb 0d 00  be 05 e1 0d 00 c3 35 dd  |1.............5.|
00000350  a4 64 28 70 25 29 3a ea  73 24 3a c8 95 3f 70 25  |.d(p%):.s$:..?p%|
00000360  3c 3e 31 33 80 3f 70 25  3c 3e 30 3a 73 24 2b 3d  |<>13.?p%<>0:s$+=|
00000370  bd 3f 70 25 3a 70 25 2b  3d 31 3a ce 3a 3d 73 24  |.?p%:p%+=1:.:=s$|
00000380  0d 00 c8 2d dd a4 63 20  28 67 24 29 3a ea 55 25  |...-..c (g$):.U%|
00000390  3a c8 99 32 36 32 33 36  33 2c 2c 30 2c 2c 2c 2c  |:..262363,,0,,,,|
000003a0  67 24 2c 30 b8 2c 2c 55  25 3a 3d 55 25 0d 00 cd  |g$,0.,,U%:=U%...|
000003b0  e5 dd f2 6c 3a ea 63 25  2c 69 25 3a ea 73 25 3a  |...l:.c%,i%:.s%:|
000003c0  43 25 3d 31 3a f2 74 3a  de 6e 25 32 35 36 3a 61  |C%=1:.t:.n%256:a|
000003d0  61 25 3d 6e 25 2b 32 35  36 3a de 71 25 31 30 32  |a%=n%+256:.q%102|
000003e0  34 3a de 61 25 32 35 36  3a de 6b 25 35 31 32 3a  |4:.a%256:.k%512:|
000003f0  de 49 25 35 31 32 3a de  74 25 34 30 3a 71 25 21  |.I%512:.t%40:q%!|
00000400  30 3d 31 30 3a 71 25 21  34 3d 31 32 38 32 3a 71  |0=10:q%!4=1282:q|
00000410  25 21 38 3d 31 32 38 33  3a 71 25 21 31 32 3d 32  |%!8=1283:q%!12=2|
00000420  36 32 33 33 38 3a 71 25  21 31 36 3d 30 3a 66 24  |62338:q%!16=0:f$|
00000430  3d a4 61 28 22 54 73 6b  22 29 3a c8 99 32 36 32  |=.a("Tsk"):..262|
00000440  33 33 36 2c 33 30 30 2c  31 32 36 33 37 34 37 34  |336,300,12637474|
00000450  31 32 2c 66 24 2c 71 25  b8 4e 25 2c 62 61 25 3a  |12,f$,q%.N%,ba%:|
00000460  c8 99 32 36 32 33 36 31  2c 2c 22 48 65 6c 70 3a  |..262361,,"Help:|
00000470  54 65 6d 70 6c 61 74 65  73 22 3a ea 85 3a 73 25  |Templates":..:s%|
00000480  3d a4 63 20 28 22 67 72  61 62 22 29 3a de 56 25  |=.c ("grab"):.V%|
00000490  73 25 0d 00 d2 53 c8 99  32 36 32 33 36 33 2c 2c  |s%...S..262363,,|
000004a0  6b 25 2c 56 25 2c 56 25  2b 73 25 2c 2d 31 2c 22  |k%,V%,V%+s%,-1,"|
000004b0  67 72 61 62 22 2c 30 b8  2c 2c 6e 25 2c 2c 2c 2c  |grab",0.,,n%,,,,|
000004c0  44 25 3a e7 44 25 3d 30  8c c8 99 32 36 32 33 36  |D%:.D%=0...26236|
000004d0  32 3a 85 31 2c a4 62 28  22 54 4e 46 22 2c 22 67  |2:.1,.b("TNF","g|
000004e0  72 61 62 22 29 0d 00 d7  d9 c8 99 32 36 32 33 33  |rab")......26233|
000004f0  37 2c 2c 6b 25 b8 63 61  25 3a 21 61 25 3d 63 61  |7,,k%.ca%:!a%=ca|
00000500  25 3a 61 25 21 34 3d 2d  33 32 37 36 37 3a 61 25  |%:a%!4=-32767:a%|
00000510  21 38 3d 2d 33 32 37 36  37 3a 61 25 21 31 32 3d  |!8=-32767:a%!12=|
00000520  2d 33 32 37 36 37 3a 61  25 21 31 36 3d 2d 33 32  |-32767:a%!16=-32|
00000530  37 36 37 3a 61 25 21 32  30 3d 30 3a 61 25 21 32  |767:a%!20=0:a%!2|
00000540  34 3d 30 3a 61 25 21 32  38 3d 2d 31 3a c8 99 32  |4=0:a%!28=-1:..2|
00000550  36 32 33 34 31 2c 2c 61  25 3a 73 25 3d a4 63 20  |62341,,a%:s%=.c |
00000560  28 22 69 6e 66 6f 22 29  3a de 57 25 73 25 3a c8  |("info"):.W%s%:.|
00000570  99 32 36 32 33 36 33 2c  2c 6b 25 2c 57 25 2c 57  |.262363,,k%,W%,W|
00000580  25 2b 73 25 2c 2d 31 2c  22 69 6e 66 6f 22 2c 30  |%+s%,-1,"info",0|
00000590  b8 2c 2c 6e 25 2c 2c 2c  2c 44 25 3a e7 44 25 3d  |.,,n%,,,,D%:.D%=|
000005a0  30 8c c8 99 32 36 32 33  36 32 3a 85 31 2c a4 62  |0...262362:.1,.b|
000005b0  28 22 54 4e 46 22 2c 22  69 6e 66 6f 22 29 0d 00  |("TNF","info")..|
000005c0  dc ab 24 28 6b 25 21 28  38 38 2b 39 36 2b 32 30  |..$(k%!(88+96+20|
000005d0  29 29 3d a4 61 28 22 48  65 6c 70 49 44 22 29 3a  |))=.a("HelpID"):|
000005e0  c8 99 32 36 32 33 33 37  2c 2c 6b 25 b8 58 25 3a  |..262337,,k%.X%:|
000005f0  73 25 3d a4 63 20 28 22  69 6e 74 65 72 61 63 74  |s%=.c ("interact|
00000600  69 76 65 22 29 3a de 5a  25 73 25 3a c8 99 32 36  |ive"):.Z%s%:..26|
00000610  32 33 36 33 2c 2c 6b 25  2c 5a 25 2c 5a 25 2b 73  |2363,,k%,Z%,Z%+s|
00000620  25 2c 2d 31 2c 22 69 6e  74 65 72 61 63 74 69 76  |%,-1,"interactiv|
00000630  65 22 2c 30 b8 2c 2c 6e  25 2c 2c 2c 2c 44 25 3a  |e",0.,,n%,,,,D%:|
00000640  e7 44 25 3d 30 8c c8 99  32 36 32 33 36 32 3a 85  |.D%=0...262362:.|
00000650  31 2c a4 62 28 22 54 4e  46 22 2c 22 69 6e 74 65  |1,.b("TNF","inte|
00000660  72 61 63 74 69 76 65 22  29 0d 00 e1 1f c8 99 32  |ractive")......2|
00000670  36 32 33 33 37 2c 2c 6b  25 b8 64 25 3a c8 99 32  |62337,,k%.d%:..2|
00000680  36 32 33 36 32 3a f7 85  0d 00 e6 e3 21 74 25 3d  |62362:......!t%=|
00000690  64 25 3a 74 25 21 34 3d  30 3a c8 99 32 36 32 33  |d%:t%!4=0:..2623|
000006a0  35 30 2c 2c 74 25 3a c8  99 32 36 32 33 34 30 2c  |50,,t%:..262340,|
000006b0  2c 74 25 3a 5f 25 3d 74  25 21 31 32 3a 76 25 3d  |,t%:_%=t%!12:v%=|
000006c0  74 25 21 32 30 2d 5f 25  3a 74 25 21 34 3d 64 25  |t%!20-_%:t%!4=d%|
000006d0  3a 21 61 25 3d 2d 31 3a  61 25 21 34 3d 30 3a 61  |:!a%=-1:a%!4=0:a|
000006e0  25 21 38 3d 30 3a 61 25  21 31 32 3d 36 39 3a 61  |%!8=0:a%!12=69:a|
000006f0  25 21 31 36 3d 36 38 3a  61 25 21 32 30 3d 31 32  |%!16=68:a%!20=12|
00000700  32 39 30 3a 24 28 61 25  2b 32 34 29 3d a4 65 28  |290:$(a%+24)=.e(|
00000710  22 53 4e 22 29 3a c8 99  32 36 32 33 33 38 2c 2c  |"SN"):..262338,,|
00000720  61 25 b8 64 61 25 3a 60  25 3d a4 66 3a c8 99 31  |a%.da%:`%=.f:..1|
00000730  33 31 31 30 37 2c 22 48  65 6c 70 24 4f 70 74 69  |31107,"Help$Opti|
00000740  6f 6e 73 22 2c 71 25 2c  31 30 32 34 2c 30 2c 33  |ons",q%,1024,0,3|
00000750  b8 2c 2c 6c 25 3a 71 25  3f 6c 25 3d 31 33 3a e7  |.,,l%:q%?l%=13:.|
00000760  6c 25 3d 30 24 71 25 3d  22 49 22 0d 00 eb 30 6c  |l%=0$q%="I"...0l|
00000770  25 3d 31 3a 67 25 3d a3  3a 75 25 3d 30 3a 69 25  |%=1:g%=.:u%=0:i%|
00000780  3d 30 3a c8 95 6c 25 3c  3d a9 24 71 25 3a c8 8e  |=0:..l%<=.$q%:..|
00000790  c1 24 71 25 2c 6c 25 2c  31 29 ca 0d 00 f0 22 c9  |.$q%,l%,1)....".|
000007a0  22 7e 22 3a e7 75 25 f2  62 28 a4 61 28 22 45 72  |"~":.u%.b(.a("Er|
000007b0  72 6f 72 31 22 29 29 8b  75 25 3d 6c 25 0d 00 f5  |ror1")).u%=l%...|
000007c0  29 c9 22 49 22 2c 22 69  22 3a e7 75 25 e7 6c 25  |)."I","i":.u%.l%|
000007d0  3c 3e 75 25 2b 31 f2 62  28 a4 61 28 22 45 72 72  |<>u%+1.b(.a("Err|
000007e0  6f 72 31 22 29 29 0d 00  fa 0d e7 75 25 3d 30 67  |or1")).....u%=0g|
000007f0  25 3d b9 0d 00 ff 0e 75  25 3d 30 3a 69 25 2b 3d  |%=.....u%=0:i%+=|
00000800  31 0d 01 04 1c c9 22 20  22 3a e7 75 25 f2 62 28  |1....." ":.u%.b(|
00000810  a4 61 28 22 45 72 72 6f  72 31 22 29 29 0d 01 09  |.a("Error1"))...|
00000820  28 7f f2 62 28 a4 61 28  22 45 72 72 6f 72 32 22  |(..b(.a("Error2"|
00000830  29 2b 22 27 22 2b c1 24  71 25 2c 6c 25 2c 31 29  |)+"'"+.$q%,l%,1)|
00000840  2b 22 27 22 29 0d 01 0e  05 cb 0d 01 13 1f 6c 25  |+"'").........l%|
00000850  2b 3d 31 3a ce 3a e7 75  25 f2 62 28 a4 61 28 22  |+=1:.:.u%.b(.a("|
00000860  45 72 72 6f 72 31 22 29  29 0d 01 18 1a e7 69 25  |Error1")).....i%|
00000870  3c 3e 31 f2 62 28 a4 61  28 22 45 72 72 6f 72 33  |<>1.b(.a("Error3|
00000880  22 29 29 0d 01 1d 1e 64  24 3d 22 22 3a 63 24 3d  |"))....d$="":c$=|
00000890  22 22 3a 77 25 3d 30 3a  e7 67 25 f2 63 28 64 25  |"":w%=0:.g%.c(d%|
000008a0  29 0d 01 22 0a 43 25 3d  33 3a e1 0d 01 27 5e dd  |)..".C%=3:...'^.|
000008b0  f2 74 3a ea 4e 24 3a 4e  24 3d 22 48 65 6c 70 3a  |.t:.N$:N$="Help:|
000008c0  4d 65 73 73 61 67 65 73  22 3a de 65 25 32 35 36  |Messages":.e%256|
000008d0  3a c8 99 33 30 2c 36 2c  2c 2c 31 37 2b a9 28 4e  |:..30,6,,,17+.(N|
000008e0  24 29 b8 2c 2c 6f 25 3a  24 28 6f 25 2b 31 36 29  |$).,,o%:$(o%+16)|
000008f0  3d 4e 24 3a c8 99 32 36  37 35 32 31 2c 6f 25 2c  |=N$:..267521,o%,|
00000900  6f 25 2b 31 36 2c 30 3a  e1 0d 01 2c 4d dd a4 65  |o%+16,0:...,M..e|
00000910  28 54 24 29 3a ea 46 25  2c 4c 25 3a c8 99 32 36  |(T$):.F%,L%:..26|
00000920  37 35 32 32 2c 6f 25 2c  54 24 2c 65 25 2c 32 35  |7522,o%,T$,e%,25|
00000930  36 2c 22 22 2c 22 22 b8  2c 2c 2c 4c 25 3b 46 25  |6,"","".,,,L%;F%|
00000940  3a e7 46 25 80 31 8c 24  65 25 3d 54 24 8b 65 25  |:.F%.1.$e%=T$.e%|
00000950  3f 4c 25 3d 31 33 0d 01  31 08 3d 24 65 25 0d 01  |?L%=13..1.=$e%..|
00000960  36 16 dd a4 61 28 54 24  29 3a 3d a4 62 28 54 24  |6...a(T$):=.b(T$|
00000970  2c 22 22 29 0d 01 3b 46  dd a4 62 28 54 24 2c 53  |,"")..;F..b(T$,S|
00000980  24 29 3a ea 46 25 2c 4c  25 2c 47 25 3a c8 99 33  |$):.F%,L%,G%:..3|
00000990  39 38 35 39 34 2c 6f 25  2c 54 24 2c 65 25 2c 32  |98594,o%,T$,e%,2|
000009a0  35 36 2c 53 24 2c 22 22  b8 47 25 2c 2c 2c 4c 25  |56,S$,"".G%,,,L%|
000009b0  3b 46 25 3a e7 46 25 80  31 8c 0d 01 40 1b c8 99  |;F%:.F%.1...@...|
000009c0  32 36 32 33 36 37 2c 47  25 2c 31 2c 66 24 3a 24  |262367,G%,1,f$:$|
000009d0  65 25 3d 54 24 0d 01 45  0e cc 3a 65 25 3f 4c 25  |e%=T$..E..:e%?L%|
000009e0  3d 31 33 0d 01 4a 05 cd  0d 01 4f 08 3d 24 65 25  |=13..J....O.=$e%|
000009f0  0d 01 54 49 dd a4 67 28  54 24 2c 53 24 2c 68 24  |..TI..g(T$,S$,h$|
00000a00  29 3a ea 46 25 2c 4c 25  2c 47 25 3a c8 99 33 39  |):.F%,L%,G%:..39|
00000a10  38 35 39 34 2c 6f 25 2c  54 24 2c 65 25 2c 32 35  |8594,o%,T$,e%,25|
00000a20  36 2c 53 24 2c 68 24 b8  47 25 2c 2c 2c 4c 25 3b  |6,S$,h$.G%,,,L%;|
00000a30  46 25 3a e7 46 25 80 31  8c 0d 01 59 1b c8 99 32  |F%:.F%.1...Y...2|
00000a40  36 32 33 36 37 2c 47 25  2c 31 2c 66 24 3a 24 65  |62367,G%,1,f$:$e|
00000a50  25 3d 54 24 0d 01 5e 0e  cc 3a 65 25 3f 4c 25 3d  |%=T$..^..:e%?L%=|
00000a60  31 33 0d 01 63 05 cd 0d  01 68 08 3d 24 65 25 0d  |13..c....h.=$e%.|
00000a70  01 6d 26 dd a4 66 3a ea  62 25 2c 69 25 2c 63 25  |.m&..f:.b%,i%,c%|
00000a80  2c 66 25 2c 4f 25 3a 4f  25 3d 30 3a e7 4e 25 3e  |,f%,O%:O%=0:.N%>|
00000a90  3d 33 31 30 8c 0d 01 72  10 de 69 25 31 32 38 3a  |=310...r..i%128:|
00000aa0  63 25 3d 69 25 0d 01 77  05 cd 0d 01 7c 21 de 62  |c%=i%..w....|!.b|
00000ab0  25 37 36 3a e7 4e 25 3c  33 31 30 84 a9 28 a4 61  |%76:.N%<310..(.a|
00000ac0  28 22 48 22 29 29 3c 3d  31 32 8c 0d 01 81 27 24  |("H"))<=12....'$|
00000ad0  62 25 3d c0 a4 61 28 22  48 22 29 2c 31 32 29 3a  |b%=..a("H"),12):|
00000ae0  66 25 3d a9 28 c0 a4 61  28 22 48 22 29 2c 31 32  |f%=.(..a("H"),12|
00000af0  29 29 0d 01 86 40 cc 3a  24 63 25 3d a4 61 28 22  |))...@.:$c%=.a("|
00000b00  48 22 29 3a 4f 25 3d 31  3c 3c 38 3a 62 25 21 30  |H"):O%=1<<8:b%!0|
00000b10  3d 63 25 3a 66 25 3d a9  28 a4 61 28 22 48 22 29  |=c%:f%=.(.a("H")|
00000b20  29 3a 63 25 2b 3d a9 28  a4 61 28 22 48 22 29 29  |):c%+=.(.a("H"))|
00000b30  2b 31 0d 01 8b 05 cd 0d  01 90 6f 62 25 3f 31 32  |+1........ob%?12|
00000b40  3d 37 3a 62 25 3f 31 33  3d 32 3a 62 25 3f 31 34  |=7:b%?13=2:b%?14|
00000b50  3d 37 3a 62 25 3f 31 35  3d 31 3a 62 25 21 31 36  |=7:b%?15=1:b%!16|
00000b60  3d 37 36 3a 62 25 21 32  30 3d 34 34 3a 62 25 21  |=76:b%!20=44:b%!|
00000b70  32 34 3d 30 3a 62 25 21  32 38 3d 4f 25 3a 62 25  |24=0:b%!28=O%:b%|
00000b80  21 33 32 3d 58 25 3a 62  25 21 33 36 3d 31 31 37  |!32=X%:b%!36=117|
00000b90  34 34 30 35 34 35 3a e7  a9 28 a4 61 28 22 49 22  |440545:..(.a("I"|
00000ba0  29 29 3e 31 32 8c 0d 01  95 63 24 63 25 3d a4 61  |))>12....c$c%=.a|
00000bb0  28 22 49 22 29 3a 62 25  21 34 30 3d 63 25 3a 62  |("I"):b%!40=c%:b|
00000bc0  25 21 34 34 3d 2d 31 3a  62 25 21 34 38 3d a9 28  |%!44=-1:b%!48=.(|
00000bd0  a4 61 28 22 49 22 29 29  3a 63 25 2b 3d a9 28 a4  |.a("I")):c%+=.(.|
00000be0  61 28 22 49 22 29 29 2b  31 3a 62 25 21 33 36 3d  |a("I"))+1:b%!36=|
00000bf0  62 25 21 33 36 84 32 35  36 3a e7 a9 28 a4 61 28  |b%!36.256:..(.a(|
00000c00  22 49 22 29 29 3e 66 25  8c 0d 01 9a 11 66 25 3d  |"I"))>f%.....f%=|
00000c10  a9 28 a4 61 28 22 49 22  29 29 0d 01 9f 05 cd 0d  |.(.a("I"))......|
00000c20  01 a4 30 cc 3a 24 28 62  25 2b 34 30 29 3d c0 a4  |..0.:$(b%+40)=..|
00000c30  61 28 22 49 22 29 2c 31  32 29 3a e7 a9 28 c0 a4  |a("I"),12):..(..|
00000c40  61 28 22 49 22 29 2c 31  32 29 29 3e 66 25 8c 0d  |a("I"),12))>f%..|
00000c50  01 a9 16 66 25 3d a9 28  c0 a4 61 28 22 49 22 29  |...f%=.(..a("I")|
00000c60  2c 31 32 29 29 0d 01 ae  05 cd 0d 01 b3 05 cd 0d  |,12))...........|
00000c70  01 b8 36 62 25 21 35 32  3d 31 32 38 3a 62 25 21  |..6b%!52=128:b%!|
00000c80  35 36 3d 2d 31 3a 62 25  21 36 30 3d 31 31 37 34  |56=-1:b%!60=1174|
00000c90  34 30 35 34 35 3a e7 a9  28 a4 61 28 22 51 22 29  |40545:..(.a("Q")|
00000ca0  29 3e 31 32 8c 0d 01 bd  63 24 63 25 3d a4 61 28  |)>12....c$c%=.a(|
00000cb0  22 51 22 29 3a 62 25 21  36 34 3d 63 25 3a 62 25  |"Q"):b%!64=c%:b%|
00000cc0  21 36 38 3d 2d 31 3a 62  25 21 37 32 3d a9 28 a4  |!68=-1:b%!72=.(.|
00000cd0  61 28 22 51 22 29 29 3a  63 25 2b 3d a9 28 a4 61  |a("Q")):c%+=.(.a|
00000ce0  28 22 51 22 29 29 2b 31  3a 62 25 21 36 30 3d 62  |("Q"))+1:b%!60=b|
00000cf0  25 21 36 30 84 32 35 36  3a e7 a9 28 a4 61 28 22  |%!60.256:..(.a("|
00000d00  51 22 29 29 3e 66 25 8c  0d 01 c2 11 66 25 3d a9  |Q"))>f%.....f%=.|
00000d10  28 a4 61 28 22 51 22 29  29 0d 01 c7 05 cd 0d 01  |(.a("Q")).......|
00000d20  cc 30 cc 3a 24 28 62 25  2b 36 34 29 3d c0 a4 61  |.0.:$(b%+64)=..a|
00000d30  28 22 51 22 29 2c 31 32  29 3a e7 a9 28 c0 a4 61  |("Q"),12):..(..a|
00000d40  28 22 51 22 29 2c 31 32  29 29 3e 66 25 8c 0d 01  |("Q"),12))>f%...|
00000d50  d1 16 66 25 3d a9 28 c0  a4 61 28 22 51 22 29 2c  |..f%=.(..a("Q"),|
00000d60  31 32 29 29 0d 01 d6 05  cd 0d 01 db 05 cd 0d 01  |12))............|
00000d70  e0 17 62 25 21 31 36 3d  28 66 25 2b 31 29 2a 31  |..b%!16=(f%+1)*1|
00000d80  36 3a 3d 62 25 0d 01 e5  25 dd f2 62 28 73 24 29  |6:=b%...%..b(s$)|
00000d90  3a f2 75 28 73 24 2b 22  20 22 2b a4 61 28 22 45  |:.u(s$+" "+.a("E|
00000da0  72 72 6f 72 34 22 29 29  3a e1 0d 01 ea 1d dd f2  |rror4")):.......|
00000db0  66 3a ea 78 25 2c 79 25  2c 6c 25 2c 6d 25 3a e7  |f:.x%,y%,l%,m%:.|
00000dc0  21 61 25 3d 64 25 8c 0d  01 ef 4f 21 71 25 3d 64  |!a%=d%....O!q%=d|
00000dd0  25 3a c8 99 32 36 32 33  34 38 2c 2c 71 25 3a e7  |%:..262348,,q%:.|
00000de0  28 71 25 21 31 32 2d 71  25 21 34 29 3c 3e 28 61  |(q%!12-q%!4)<>(a|
00000df0  25 21 31 32 2d 61 25 21  34 29 84 28 71 25 21 31  |%!12-a%!4).(q%!1|
00000e00  36 2d 71 25 21 38 29 3c  3e 28 61 25 21 31 36 2d  |6-q%!8)<>(a%!16-|
00000e10  61 25 21 38 29 8c 0d 01  f4 3f c8 99 35 33 2c 2d  |a%!8)....?..53,-|
00000e20  31 2c 35 b8 2c 2c 6d 25  3a 78 25 3d 28 61 25 21  |1,5.,,m%:x%=(a%!|
00000e30  31 32 2d 61 25 21 34 29  81 31 36 3a 6c 25 3d 32  |12-a%!4).16:l%=2|
00000e40  35 36 81 78 25 3a e7 32  35 36 83 78 25 3c 3e 30  |56.x%:.256.x%<>0|
00000e50  6c 25 2b 3d 31 0d 01 f9  0f e7 6c 25 3c 77 25 6c  |l%+=1.....l%<w%l|
00000e60  25 3d 77 25 0d 01 fe 6b  71 25 21 34 38 3d 28 28  |%=w%...kq%!48=((|
00000e70  71 25 21 35 36 2d 6c 25  2a 28 76 25 2b 2d 38 2b  |q%!56-l%*(v%+-8+|
00000e80  31 29 29 3e 3e 6d 25 29  3c 3c 6d 25 3a c8 99 32  |1))>>m%)<<m%:..2|
00000e90  36 32 33 35 39 2c 64 25  2c 71 25 2b 34 34 3a f2  |62359,d%,q%+44:.|
00000ea0  64 28 64 25 29 3a 63 24  3d 22 22 3a 61 25 21 38  |d(d%):c$="":a%!8|
00000eb0  3d 28 28 61 25 21 31 36  2d 6c 25 2a 28 76 25 2b  |=((a%!16-l%*(v%+|
00000ec0  2d 38 2b 31 29 29 3e 3e  6d 25 29 3c 3c 6d 25 0d  |-8+1))>>m%)<<m%.|
00000ed0  02 03 05 cd 0d 02 08 05  cd 0d 02 0d 12 c8 99 32  |...............2|
00000ee0  36 32 33 34 31 2c 2c 61  25 3a e1 0d 02 12 1a dd  |62341,,a%:......|
00000ef0  f2 67 3a e7 21 61 25 3d  64 25 f2 64 28 64 25 29  |.g:.!a%=d%.d(d%)|
00000f00  3a 67 25 3d a3 0d 02 17  12 c8 99 32 36 32 33 34  |:g%=.......26234|
00000f10  32 2c 2c 61 25 3a e1 0d  02 1c 13 dd f2 70 3a e7  |2,,a%:.......p:.|
00000f20  61 25 21 32 34 3d 33 38  35 8c 0d 02 21 08 e7 67  |a%!24=385...!..g|
00000f30  25 8c 0d 02 26 0d 21 61  25 3d 64 25 3a f2 67 0d  |%...&.!a%=d%:.g.|
00000f40  02 2b 17 cc 3a 63 24 3d  22 22 3a 67 25 3d b9 3a  |.+..:c$="":g%=.:|
00000f50  f2 63 28 64 25 29 0d 02  30 05 cd 0d 02 35 14 cc  |.c(d%)..0....5..|
00000f60  3a c8 99 32 36 32 33 36  34 2c 61 25 21 32 34 0d  |:..262364,a%!24.|
00000f70  02 3a 05 cd 0d 02 3f 05  e1 0d 02 44 14 dd f2 6f  |.:....?....D...o|
00000f80  3a ea 70 25 3a e7 61 25  21 38 80 35 8c 0d 02 49  |:.p%:.a%!8.5...I|
00000f90  1e e7 61 25 21 31 32 3d  2d 32 63 24 3d 22 22 3a  |..a%!12=-2c$="":|
00000fa0  67 25 3d b9 3a f2 63 28  64 25 29 0d 02 4e 05 cd  |g%=.:.c(d%)..N..|
00000fb0  0d 02 53 0c e7 61 25 21  38 80 32 8c 0d 02 58 20  |..S..a%!8.2...X |
00000fc0  e7 61 25 21 31 32 3d 2d  32 f2 69 28 60 25 2c 21  |.a%!12=-2.i(`%,!|
00000fd0  61 25 2d 36 34 2c 39 36  2b 38 38 29 0d 02 5d 05  |a%-64,96+88)..].|
00000fe0  cd 0d 02 62 05 e1 0d 02  67 3b dd f2 69 28 68 25  |...b....g;..i(h%|
00000ff0  2c 78 25 2c 79 25 29 3a  65 61 25 3d 68 25 3a 66  |,x%,y%):ea%=h%:f|
00001000  61 25 3d 78 25 3a 67 61  25 3d 79 25 3a c8 99 32  |a%=x%:ga%=y%:..2|
00001010  36 32 33 35 36 2c 2c 68  25 2c 78 25 2c 79 25 3a  |62356,,h%,x%,y%:|
00001020  e1 0d 02 6c 34 dd f2 71  3a ea 61 24 3a c8 99 32  |...l4..q:.a$:..2|
00001030  36 32 33 35 37 2c 2c 65  61 25 2c 61 25 2c c4 32  |62357,,ea%,a%,.2|
00001040  30 30 2c 22 20 22 29 b8  2c 2c 2c 61 24 3a e7 61  |00," ").,,,a$:.a|
00001050  24 3d 22 22 e1 0d 02 71  14 e7 61 24 3d a4 61 28  |$=""...q..a$=.a(|
00001060  22 51 22 29 3a f2 6a 3a  e0 0d 02 76 27 c8 99 32  |"Q"):.j:...v'..2|
00001070  36 32 33 35 31 2c 2c 61  25 3a e7 61 25 3f 38 80  |62351,,a%:.a%?8.|
00001080  31 8c f2 69 28 60 25 2c  66 61 25 2c 67 61 25 29  |1..i(`%,fa%,ga%)|
00001090  0d 02 7b 05 e1 0d 02 80  1b dd f2 72 28 72 25 29  |..{........r(r%)|
000010a0  3a ea 69 24 2c 69 25 3a  c8 8e 61 25 21 31 36 ca  |:.i$,i%:..a%!16.|
000010b0  0d 02 85 0b c9 30 3a f2  6a 3a e0 0d 02 8a 0a c9  |.....0:.j:......|
000010c0  31 30 3a f2 76 0d 02 8f  0c c9 31 32 38 32 3a f2  |10:.v.....1282:.|
000010d0  77 0d 02 94 21 c9 31 32  38 33 3a e7 67 25 3d a3  |w...!.1283:.g%=.|
000010e0  8c 63 24 3d 22 22 3a 67  25 3d b9 3a f2 63 28 64  |.c$="":g%=.:.c(d|
000010f0  25 29 0d 02 99 06 f2 6b  0d 02 9e 2f c9 32 36 32  |%).....k.../.262|
00001100  33 33 38 3a e7 61 25 21  34 3c 3e 62 61 25 80 a4  |338:.a%!4<>ba%..|
00001110  64 28 61 25 2b 32 38 29  3d 22 48 65 6c 70 20 73  |d(a%+28)="Help s|
00001120  79 73 74 65 6d 22 8c 0d  02 a3 2e 61 25 21 31 32  |ystem".....a%!12|
00001130  3d 30 3a 61 25 21 31 36  3d 30 3a 21 61 25 3d 32  |=0:a%!16=0:!a%=2|
00001140  30 3a c8 99 32 36 32 33  37 35 2c 31 37 2c 61 25  |0:..262375,17,a%|
00001150  2c 61 25 21 34 0d 02 a8  05 cd 0d 02 ad 05 cb 0d  |,a%!4...........|
00001160  02 b2 05 e1 0d 02 b7 32  dd f2 76 3a ea 69 25 3a  |.......2..v:.i%:|
00001170  ea 85 3a ee 85 ea 61 25  21 31 32 3d 61 25 21 38  |..:...a%!12=a%!8|
00001180  3a c8 99 32 36 32 33 37  35 2c 31 39 2c 61 25 2c  |:..262375,19,a%,|
00001190  61 25 21 34 3a e1 0d 02  bc 2d 69 25 3d 61 25 21  |a%!4:....-i%=a%!|
000011a0  32 30 3a e7 ac 28 67 25  29 d5 23 69 25 2c 22 53  |20:..(g%).#i%,"S|
000011b0  65 74 20 48 65 6c 70 24  4f 70 74 69 6f 6e 73 20  |et Help$Options |
000011c0  7e 49 22 0d 02 c1 43 c8  99 31 33 31 31 30 37 2c  |~I"...C..131107,|
000011d0  22 48 65 6c 70 24 44 69  72 22 2c 71 25 2c 31 30  |"Help$Dir",q%,10|
000011e0  32 34 2c 30 2c 33 b8 2c  2c 6c 25 3a 71 25 3f 6c  |24,0,3.,,l%:q%?l|
000011f0  25 3d 31 33 3a d5 23 69  25 2c 22 52 75 6e 20 22  |%=13:.#i%,"Run "|
00001200  2b 24 71 25 3a e1 0d 02  c6 20 dd f2 73 3a e7 61  |+$q%:.... ..s:.a|
00001210  25 21 31 36 3d 31 32 38  32 54 25 2b 3d 31 3a e7  |%!16=1282T%+=1:.|
00001220  54 25 3d 32 f2 61 0d 02  cb 05 e1 0d 02 d0 16 dd  |T%=2.a..........|
00001230  f2 61 3a e7 62 24 3d 22  22 80 64 24 3c 3e 22 22  |.a:.b$="".d$<>""|
00001240  8c 0d 02 d5 1c e7 51 25  3d 2d 32 62 24 3d a4 62  |......Q%=-2b$=.b|
00001250  28 22 48 65 6c 70 48 33  22 2c 64 24 29 0d 02 da  |("HelpH3",d$)...|
00001260  05 cd 0d 02 df 17 24 28  61 25 2b 32 30 29 3d 62  |......$(a%+20)=b|
00001270  24 2b bd 30 3a f2 6b 3a  e1 0d 02 e4 12 dd f2 77  |$+.0:.k:.......w|
00001280  3a e7 61 25 21 33 36 3c  2d 31 e1 0d 02 e9 0c c8  |:.a%!36<-1......|
00001290  8e 61 25 21 33 32 ca 0d  02 ee 14 c9 64 25 3a f2  |.a%!32......d%:.|
000012a0  68 28 22 48 65 6c 70 48  32 22 29 0d 02 f3 14 c9  |h("HelpH2").....|
000012b0  58 25 3a f2 68 28 22 48  65 6c 70 48 34 22 29 0d  |X%:.h("HelpH4").|
000012c0  02 f8 14 c9 2d 32 3a f2  68 28 22 48 65 6c 70 48  |....-2:.h("HelpH|
000012d0  31 22 29 0d 02 fd 19 7f  3a e7 4e 25 3e 3d 32 31  |1").....:.N%>=21|
000012e0  38 80 61 25 21 33 36 3c  3e 2d 31 8c 0d 03 02 24  |8.a%!36<>-1....$|
000012f0  c8 99 32 36 32 33 38 38  2c 31 2c 71 25 2c 61 25  |..262388,1,q%,a%|
00001300  21 33 32 2c 61 25 21 33  36 3a c8 8e 21 71 25 ca  |!32,a%!36:..!q%.|
00001310  0d 03 07 1a c9 30 3a e7  71 25 21 34 3d 2d 31 f2  |.....0:.q%!4=-1.|
00001320  68 28 22 4d 6e 75 30 31  22 29 0d 03 0c 12 c9 31  |h("Mnu01").....1|
00001330  3a f2 68 28 22 4d 6e 75  30 32 22 29 0d 03 11 05  |:.h("Mnu02")....|
00001340  cb 0d 03 16 05 cd 0d 03  1b 05 cb 0d 03 20 05 e1  |............. ..|
00001350  0d 03 25 6c dd f2 68 28  6d 24 29 3a ea 63 25 3a  |..%l..h(m$):.c%:|
00001360  6d 24 3d a4 61 28 6d 24  29 3a 63 25 3d a9 6d 24  |m$=.a(m$):c%=.m$|
00001370  2b 31 3a 61 25 21 31 32  3d 61 25 21 38 3a 61 25  |+1:a%!12=a%!8:a%|
00001380  21 31 36 3d 31 32 38 33  3a 24 28 61 25 2b 32 30  |!16=1283:$(a%+20|
00001390  29 3d 6d 24 2b bd 30 3a  21 61 25 3d 28 32 34 2b  |)=m$+.0:!a%=(24+|
000013a0  63 25 29 80 ac 33 3a c8  99 32 36 32 33 37 35 2c  |c%)..3:..262375,|
000013b0  31 37 2c 61 25 2c 61 25  21 34 3a e1 0d 03 2a 8e  |17,a%,a%!4:...*.|
000013c0  dd f2 78 28 68 61 25 29  3a ea 62 25 3a 62 25 3d  |..x(ha%):.b%:b%=|
000013d0  74 25 3a 4a 25 2d 3d 28  76 25 2b 50 25 29 3a 62  |t%:J%-=(v%+P%):b|
000013e0  25 21 31 32 3d 4a 25 3a  62 25 21 31 36 3d 31 36  |%!12=J%:b%!16=16|
000013f0  2a 28 31 2b a9 24 68 61  25 29 3a 62 25 21 32 30  |*(1+.$ha%):b%!20|
00001400  3d 4a 25 2b 76 25 3a 62  25 21 32 38 3d 68 61 25  |=J%+v%:b%!28=ha%|
00001410  3a c8 99 32 36 32 33 33  38 2c 2c 62 25 2b 34 3a  |:..262338,,b%+4:|
00001420  c8 99 32 36 32 33 35 33  2c 64 25 2c 62 25 21 38  |..262353,d%,b%!8|
00001430  2c 62 25 21 31 32 2c 62  25 21 31 36 2c 62 25 21  |,b%!12,b%!16,b%!|
00001440  32 30 3a 77 25 2b 3d 31  3a e1 0d 03 2f 7a dd f2  |20:w%+=1:.../z..|
00001450  6b 3a ea 78 25 2c 50 25  2c 4a 25 2c 7a 25 2c 70  |k:.x%,P%,J%,z%,p|
00001460  25 2c 6e 25 2c 48 25 2c  41 25 2c 79 25 3a c8 99  |%,n%,H%,A%,y%:..|
00001470  33 39 2c 61 25 2b 32 30  2c 6b 25 2c 35 31 32 2b  |39,a%+20,k%,512+|
00001480  28 31 3c 3c 33 31 29 b8  70 25 2c 2c 7a 25 3a 7a  |(1<<31).p%,,z%:z|
00001490  25 2b 3d 6b 25 3a 3f 7a  25 3d 31 33 3a 74 24 3d  |%+=k%:?z%=13:t$=|
000014a0  22 22 3a e3 78 25 3d 61  25 2b 32 30 b8 70 25 3a  |"":.x%=a%+20.p%:|
000014b0  74 24 2b 3d bd 28 3f 78  25 29 3a ed 3a e7 74 24  |t$+=.(?x%):.:.t$|
000014c0  3d 63 24 e1 0d 03 34 2f  63 24 3d 74 24 3a 79 25  |=c$...4/c$=t$:y%|
000014d0  3d 49 25 3a e3 78 25 3d  6b 25 b8 7a 25 3a 3f 79  |=I%:.x%=k%.z%:?y|
000014e0  25 3d 3f 78 25 3a e7 3f  78 25 3c 3e 97 28 22 5c  |%=?x%:.?x%<>.("\|
000014f0  22 29 8c 0d 03 39 09 79  25 2b 3d 31 0d 03 3e 18  |")...9.y%+=1..>.|
00001500  cc 3a 78 25 2b 3d 31 3a  e7 3f 78 25 3d 97 28 22  |.:x%+=1:.?x%=.("|
00001510  5c 22 29 8c 0d 03 43 09  79 25 2b 3d 31 0d 03 48  |\")...C.y%+=1..H|
00001520  48 cc 3a 24 28 79 25 29  3d a4 61 28 22 54 22 2b  |H.:$(y%)=.a("T"+|
00001530  bd 28 3f 78 25 29 29 3a  e7 3f 79 25 3d 97 28 22  |.(?x%)):.?y%=.("|
00001540  54 22 29 80 3f 28 79 25  2b 31 29 3d 3f 78 25 80  |T").?(y%+1)=?x%.|
00001550  a9 28 24 28 79 25 29 29  3d 32 8c 3f 79 25 3d 97  |.($(y%))=2.?y%=.|
00001560  28 22 5c 22 29 0d 03 4d  10 79 25 2b 3d a9 28 24  |("\")..M.y%+=.($|
00001570  28 79 25 29 29 0d 03 52  05 cd 0d 03 57 05 cd 0d  |(y%))..R....W...|
00001580  03 5c 18 e7 79 25 2d 49  25 3e 35 30 30 8c 79 25  |.\..y%-I%>500.y%|
00001590  3d 49 25 2b 35 30 30 0d  03 61 87 ed 78 25 3a 7a  |=I%+500..a..x%:z|
000015a0  25 3d 79 25 2d 31 3a 77  25 3d 30 3a f2 64 28 64  |%=y%-1:w%=0:.d(d|
000015b0  25 29 3a 50 25 3d 2d 38  3a 4a 25 3d 5f 25 2b 76  |%):P%=-8:J%=_%+v|
000015c0  25 2b 50 25 3a 21 61 25  3d 64 25 3a c8 99 32 36  |%+P%:!a%=d%:..26|
000015d0  32 33 34 37 2c 2c 61 25  3a 78 25 3d 28 61 25 21  |2347,,a%:x%=(a%!|
000015e0  31 32 2d 61 25 21 34 29  81 31 36 3a 70 25 3d 49  |12-a%!4).16:p%=I|
000015f0  25 3a c8 95 70 25 3c 7a  25 3a 6e 25 3d 70 25 3a  |%:..p%<z%:n%=p%:|
00001600  41 25 3d 70 25 3a 48 25  3d a3 3a f5 3a 70 25 2b  |A%=p%:H%=.:.:p%+|
00001610  3d 31 3a e7 70 25 2d 6e  25 3e 3d 78 25 8c 0d 03  |=1:.p%-n%>=x%...|
00001620  66 08 48 25 3d b9 0d 03  6b 17 cc 3a e7 3f 70 25  |f.H%=...k..:.?p%|
00001630  3d 31 33 41 25 3d 70 25  3a 48 25 3d b9 0d 03 70  |=13A%=p%:H%=...p|
00001640  15 e7 3f 70 25 3d 31 30  41 25 3d 70 25 3a 48 25  |..?p%=10A%=p%:H%|
00001650  3d b9 0d 03 75 10 e7 3f  70 25 3d 33 32 41 25 3d  |=...u..?p%=32A%=|
00001660  70 25 0d 03 7a 05 cd 0d  03 7f 22 fd 48 25 3a e7  |p%..z.....".H%:.|
00001670  41 25 3c 3e 6e 25 70 25  3d 41 25 3a 3f 70 25 3d  |A%<>n%p%=A%:?p%=|
00001680  31 33 3a f2 78 28 6e 25  29 0d 03 84 6b 70 25 2b  |13:.x(n%)...kp%+|
00001690  3d 31 3a ce 3a c8 99 35  33 2c 2d 31 2c 34 b8 2c  |=1:.:..53,-1,4.,|
000016a0  2c 69 61 25 3a c8 99 35  33 2c 2d 31 2c 35 b8 2c  |,ia%:..53,-1,5.,|
000016b0  2c 6d 25 3a 21 71 25 3d  64 25 3a c8 99 32 36 32  |,m%:!q%=d%:..262|
000016c0  33 34 38 2c 2c 71 25 3a  78 25 3d 28 61 25 21 31  |348,,q%:x%=(a%!1|
000016d0  32 2d 61 25 21 34 29 81  31 36 3a 6c 25 3d 32 35  |2-a%!4).16:l%=25|
000016e0  36 81 78 25 3a e7 32 35  36 83 78 25 3c 3e 30 6c  |6.x%:.256.x%<>0l|
000016f0  25 2b 3d 31 0d 03 89 0f  e7 6c 25 3c 77 25 6c 25  |%+=1.....l%<w%l%|
00001700  3d 77 25 0d 03 8e 6d 71  25 21 34 38 3d 28 28 71  |=w%...mq%!48=((q|
00001710  25 21 35 36 2d 6c 25 2a  28 76 25 2b 2d 38 2b 31  |%!56-l%*(v%+-8+1|
00001720  29 29 3e 3e 6d 25 29 3c  3c 6d 25 3a c8 99 32 36  |))>>m%)<<m%:..26|
00001730  32 33 35 39 2c 64 25 2c  71 25 2b 34 34 3a 71 25  |2359,d%,q%+44:q%|
00001740  21 38 3d 28 28 71 25 21  31 36 2d 6c 25 2a 28 76  |!8=((q%!16-l%*(v|
00001750  25 2b 2d 38 2b 31 29 29  3e 3e 6d 25 29 3c 3c 6d  |%+-8+1))>>m%)<<m|
00001760  25 3a c8 99 32 36 32 33  34 31 2c 2c 71 25 3a e1  |%:..262341,,q%:.|
00001770  0d 03 93 6c dd f2 64 28  68 25 29 3a ea 6a 25 3a  |...l..d(h%):.j%:|
00001780  21 71 25 3d 68 25 3a c8  99 32 36 32 33 34 38 2c  |!q%=h%:..262348,|
00001790  2c 71 25 3a 21 71 25 3d  68 25 3a 71 25 21 38 3d  |,q%:!q%=h%:q%!8=|
000017a0  38 33 38 38 37 33 36 3a  71 25 21 31 32 3d 38 33  |8388736:q%!12=83|
000017b0  38 38 37 33 36 3a e3 6a  25 3d 31 b8 71 25 21 38  |88736:.j%=1.q%!8|
000017c0  38 3a 71 25 21 34 3d 6a  25 2d 31 3a c8 99 32 36  |8:q%!4=j%-1:..26|
000017d0  32 33 34 39 2c 2c 71 25  3a ed 3a e1 0d 03 98 0f  |2349,,q%:.:.....|
000017e0  dd f2 6a 3a e7 6f 25 3c  3e 30 8c 0d 03 9d 1a c8  |..j:.o%<>0......|
000017f0  99 32 36 37 35 32 34 2c  6f 25 3a c8 99 33 30 2c  |.267524,o%:..30,|
00001800  37 2c 2c 6f 25 0d 03 a2  05 cd 0d 03 a7 13 2a 75  |7,,o%.........*u|
00001810  6e 73 65 74 20 48 65 6c  70 24 44 69 72 0d 03 ac  |nset Help$Dir...|
00001820  0e c8 99 32 36 32 33 36  35 3a e1 0d 03 b1 18 dd  |...262365:......|
00001830  f2 75 28 65 24 29 3a 43  25 3d 31 3a 85 31 2c 65  |.u(e$):C%=1:.1,e|
00001840  24 3a e1 0d 03 b6 18 dd  f2 79 28 65 24 29 3a 43  |$:.......y(e$):C|
00001850  25 3d 32 3a 85 31 2c 65  24 3a e1 0d 03 bb 37 dd  |%=2:.1,e$:....7.|
00001860  f2 6d 3a ea 72 25 3a ea  85 3a ee 85 ff 28 22 75  |.m:.r%:..:...("u|
00001870  6e 73 65 74 20 48 65 6c  70 24 44 69 72 22 29 3a  |nset Help$Dir"):|
00001880  85 a2 31 2c f6 24 2b 22  20 28 22 2b c3 9e 2b 22  |..1,.$+" ("+..+"|
00001890  29 22 0d 03 c0 10 21 71  25 3d 9f 3a e7 43 25 3d  |)"....!q%=.:.C%=|
000018a0  33 8c 0d 03 c5 1e 24 28  71 25 2b 34 29 3d a4 67  |3.....$(q%+4)=.g|
000018b0  28 22 46 49 45 22 2c f6  24 2c c3 9e 29 2b bd 30  |("FIE",.$,..)+.0|
000018c0  0d 03 ca 15 cc 3a 24 28  71 25 2b 34 29 3d f6 24  |.....:$(q%+4)=.$|
000018d0  2b bd 28 30 29 0d 03 cf  05 cd 0d 03 d4 27 c8 99  |+.(0)........'..|
000018e0  32 36 32 33 36 37 2c 71  25 2c 43 25 2c a4 61 28  |262367,q%,C%,.a(|
000018f0  22 54 73 6b 22 29 b8 2c  72 25 3a e7 72 25 3d 32  |"Tsk").,r%:.r%=2|
00001900  8c 0d 03 d9 13 2a 55 6e  73 65 74 20 48 65 6c 70  |.....*Unset Help|
00001910  24 44 69 72 0d 03 de 0e  c8 99 32 36 32 33 36 35  |$Dir......262365|
00001920  3a e0 0d 03 e3 05 cd 0d  03 e8 05 e1 0d 03 ed 4e  |:..............N|
00001930  dd f2 63 28 68 25 29 3a  21 61 25 3d 68 25 3a c8  |..c(h%):!a%=h%:.|
00001940  99 32 36 32 33 34 37 2c  2c 61 25 3a 61 25 21 32  |.262347,,a%:a%!2|
00001950  30 3d 30 3a 61 25 21 32  34 3d 30 3a 61 25 21 32  |0=0:a%!24=0:a%!2|
00001960  38 3d 2d 31 3a f2 66 3a  c8 99 36 36 b8 42 25 3a  |8=-1:.f:..66.B%:|
00001970  4d 25 3d 42 25 2b 4b 25  3a e1 0d 03 f2 43 dd f2  |M%=B%+K%:....C..|
00001980  7a 28 68 25 2c 74 24 29  3a 74 24 3d c1 74 24 2c  |z(h%,t$):t$=.t$,|
00001990  a7 74 24 2c 22 3c 22 29  2b 31 29 3a 21 71 25 3d  |.t$,"<")+1):!q%=|
000019a0  68 25 3a c8 99 32 36 32  33 34 38 2c 2c 71 25 3a  |h%:..262348,,q%:|
000019b0  24 28 71 25 21 37 36 29  3d 74 24 3a e1 0d 03 f7  |$(q%!76)=t$:....|
000019c0  1a dd f2 65 3a f2 79 28  a4 61 28 22 46 61 74 61  |...e:.y(.a("Fata|
000019d0  6c 32 22 29 29 3a e1 0d  ff                       |l2")):...|
000019d9