Home » Archimedes archive » Zipped Apps » Atelier » !AtelModul/Compactor

!AtelModul/Compactor

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 » Zipped Apps » Atelier
Filename: !AtelModul/Compactor
Read OK: ✔
File size: 2E28 bytes
Load address: 0000
Exec address: 0000
File contents
,6cCompactorCompactor 	1.04 (03 Jul 1989) (c) Simon ClayDefineBufferdRUnDefine.6��ySetPosition�)�PlotFileer
��LBackPlot R1�E�Com_Sprites	�cCom_SaveMP @	?�Com_InfoOV L
kCCom_Stream�p
��Com_UnStream2:�
4�Com_Open0,R�
�[Com_CloseR1�
 �Com_Memory�
�3Com_Rememberad_�
��Com_Check/O*DefineBuffer tells the animator where to place the file data
Syntax: *DefineBuffer <address> <size>*UnDefine cancels the buffer and stops bad memory management
Syntax: *UnDefine*SetPosition sets the position of the top left corner of the
sprite for plotting using *PlotFile
Syntax: *SetPosition <xpos> <ypos>*PlotFile de-compacts a file to the screen at the
position set by *SetPosition.
Syntax: *PlotFile <file name>*BackPlot de-compacts a file to a backscreen so that it can be brought
forward by an effects module (to be released) using various effects
Syntax: *BackPlot <file name>*Com_Sprites divides the picture named into smaller sprites
Syntax: *Com_Sprites <file name> <Address> <xsize> <ysize>*Com_Save compacts a file from the screen
Syntax: *Com_Save <file name> <x1> <y1> <x2> <y2> <mask table>*Com_Info reads information from a file
Syntax: *Com_Info <name> <block address>*Com_Stream compacts the defined area of memory to a file
Syntax: *Com_Stream <file name> <address> <size>*Com_UnStream decompacts a streamed file into memory
Syntax: *Com_UnStream <name> <address>*Com_Open opens an empty file for appending to
Appending to this file is achieved by specifying '$' as a file name
Syntax: *Com_Open <file name>*Com_Close stops further appending to a opened file
Syntax: *Com_Close*Com_Memory sets up in effect a ram disk at any address
The address is taken to be one file and should be named '@'
Syntax: *Com_Memory <address>*Com_Remember sets a flag for buffer corruption checking
Syntax: *Com_Remember*Com_Check checks buffer corruption from the last remember
Syntax: *Com_Check�@-�����!�'������!�'�����@-���t����p�����@-�����!�\'������!�P'�����@-�}� ��&������@-�w� ���%��T'������@-�p�����!�'������!�'������!�'��T����@-�`�����!�y�@������!�z�P������!�o�`������!�p�p������!�&��V�0��`��@��U�0��P��p��PF��@F�LV��PE����
R��@��@��@��0F��EQ��P��(V��,&����R�
0����S�
�P������� ��$���
,�� ������@-������!�%���������@-������!�%������!�%��'�
,�� ������@-������!�X%��=����@-�.����@-�9����@-�����!�<������H����@��P����+���cBuffer has been corruptedod@-�R��R�����@-�R��R�������+����cCompactor: The sprites area must be within the screen" @-�<��P�
P����+����cCompactor: Screens can only be compacted from modes 13 or 15ror@-�(�����q�
���q�
Q����M��+����cCompactor: To save, a buffer needs to be defined using *DefineBuffercCompactor: The buffer must be at least 131072 (&20000) bytes(R@-�P�
-�<�@�P�
��� �����0�����@�����P�P�
���P���"���2��B���R�����@-������������������|��|�����"����R����R�����~�P���z���@-���8����t�L�� ��q�����n����@-� ��p�$����m������?@-���h����$�� ��d�0��b�P���!���1��
R�
@�@��A��J��@D�P�U�P���Q��?���@-��s���������cCompactor: Attempting to get off screencCompactor: Streamed files cannot be plotted�@-�0��V��W��V��W��4�P��0��0�s��0����P��`�Fa�Gq��pg�0��P�
m�m��7#���@-���Z�
Q�
Q�����P������t��l���X��\��1�����������������������������������������������������@-�lO�hO�1����t ����[-���r������*���H�-���`�p������	��P�����r����U�P�U���p嬀�`帐�b����� �r�
� � ��R�����!�
R�Q�Q�`�`��I�Y���pG��H�X������U��u���6����C-���7�����x�P�����P���P�O+�P����l���q儁�a向��J����S���!�A�T��
R�
Q�Q�`�`��Y��pG��X������@-��������e�(�P����P���P����0�L���42�0��8B�@��0��A��p�
Q�0�0��@����\������_-�n���������E��P����P�Z��P�����2�r娂�������b弒�������`V��b�0C���0#�����Y����pW�0��r0������X�������[-�C����3���y������Dc��� ��P����������U�P�U�N�pc�l������X�����U�h�u�������C-�"����x����������s�ȃ�m����X�������U�;��A-�t��x&�� ��l��`��P�����R��`��P�3
@F��<��<v��8F���_��`��R� ��0����S�P0����S�0� �������R����R� ��%��A�� ��R� ��%������&� ����R�R����P�B����R��� ��x%��V���V��F�P��V������V���F�P�X��������P���@-�?�0��#"���0��P�S��������P�U�~@-��$����� B�R��$��~�����y� ��R�
���4��S�0��4�� �����l�0��R�l��ld�� ��-���c� ��P��_�R�P�R����	��� "���Q�[����R�-���L� ��R� �P�
��E� ��P����P�,� ������@��Q�������#��~���3����3��0��S�0��3��~���>@-�|#�� B�R�p#��d��>�����#�0���� � ��6N��R� �����<S����P��U�P�(S��Q����#��>���~@-��7�S��Q�
0����/N��`��P��S�
U�
��`������~���>@-����7�S����Q�>��0����O����P��U��
0S��>���@-�P��p��O������0��`��S�p�����S����`V��P��U���`��W�`��W�`��W�`��W�`��W�`�� W�`��@W�`�ÀW�`�øh���?@-�d ����H���������	Q�������?����Q���@-�I���(�,�P�	��`��P��Q�
`@�e�����������A-�LI�p��`������� ��0����P� ��0����Q�������R��� ��`��V�������z�X�`������t�`��V���������K��P��pW����U�߁����\����\����\����\����\���� \����@\���À\����@��߁����4�� ���� R����$������O������� ����)
8�
B�
L
Vݤpar(t$,s$,� i%):�i1%
`i1%=i%+1:i%=�t$+s$,s$,i1%)
j=�t$,i1%,i%-i1%)
t
~ݤcrmenu(menu$)
�.�menufree%+28>menuend%�99,"Menu area full"
�� m%
�menuptr%=menufree%
�i%=0
�C� �menu$,1)="#"i%=1:menutitle$=�par(menu$,",",i%)�menutitle$=""
�$menuptr%=menutitle$
�;menuptr%?12=7:menuptr%?13=2:menuptr%?14=7:menuptr%?15=0
�3menuptr%!16=196-24:menuptr%!20=40:menuptr%!24=0
�"menuptr%+=28:maxx%=�menutitle$
��item$=�par(menu$,",",i%)
��menuitem(item$)
�� item$=""
$m%=menufree%:m%!16=(maxx%*8+6)*2

menufree%=menuptr%
=m%

(��menuitem(text$)
2.�text$=""menuptr%!-24=(menuptr%!-24)�&80:�
<.�menuptr%+24>menuend%��99,"Menu area full"
F�i%,flg%
Pflg%=&00
Zi%=�text$,">")
d<�i%>0subptr%=��text$,i%+1):text$=�text$,i%-1)�subptr%=-1
ni%=�text$,"}")
x;�i%>0subptr%=��text$,i%+1):text$=�text$,i%-1):flg%+=&08
�)��text$,1)="#"text$=�text$):flg%+=&02
�;menuptr%!0=flg%:menuptr%!4=subptr%:menuptr%!8=&07000021
��text$,1)="$"�
�2!menuptr%+=&04:menuptr%!8+=&100:i%=�text$,"(")
�3�i%>0�L%=��text$,i%+1):text$=�text$,i%-1)�L%=12
�8menuptr%!12=��text$,2):menuptr%!16=-1:menuptr%!20=L%
�text$=�L%," ")
��
��text$<=12�
�$(menuptr%+12)=text$
��
�%I%=�workspace(�text$+1):$I%=text$
�6menuptr%!12=I%:menuptr%!16=-1:menuptr%@-����Q�����@-�0�� ��"�#��0��S���������@-�(���P���2��!��@��0�C��@������	Q�-����@-�������P�������������@-�������P�
	Q�����a�;���������[�2��!��@��0����P�����@-�����N���Q��<�����@-���P��$���5��S����1��P�0������9��Uj�����L��P��P��P	@-��������
�����Q�����@-������
��
�p��p����d��	���X��	����@-����Q�
Q�<�Q0���A�<��@��"��
�P��+���Q��������cCompactor : File not founds������@-�������<��Q�
��,��Q��@-�����
����@-���+����@-�-����������+�������Q��@-���R������@��@��M?��@��@��T�
T
T T���
@��@C�C?��@��
T��@��$T�@T�$T��@�T@�X@��L@��T��@��$T�@�
T�m_��@��@��T�
T
T T���
@��@C�@��@����@-�]?������Q�
Q
Q Q�����8���D�����@-���4��
���\��� ����� ��R���� ����h%<menustart%�mh%>menuend%:�
��
�"!I%=!I%��1:I%!8=I%!8��&400000:
�I%+=24:�I%!-24�&80
��
�
���shade(mh%,I%)
�/mh%!(28+8+24*I%)=mh%!(28+8+24*I%)�&400000:�
�
���tick(mh%,I%)
'mh%!(28+24*I%)=mh%!(28+24*I%)�&01:�


ݤcommand
$
�T%,I%,T$
.ș"OS_GetEnv" � T$
8�strip(T$)
B=T$
L
Vݤparam
`�I%,T$:T$=�command
jI%=�T$," -quit "):�I%=0:=""
tT$=�T$,I%+7):�strip(T$)
~1I%=�T$," "):�I%>0T$=�T$,I%+1):�strip(T$):�=""
�,I%=�T$," "):�I%>0T$=�T$,I%-1):�strip(T$)
�=T$
�
�ݤfiletype(�"�R�" ���e",5,T$ �U%,,T%
�
�T%=0:=-1
�=(T%�&FFF00)>>8
� 
���waitpoint
�� os%<>2 �
�waiter%+=1
�ș"Hourglass_On"
�


��normpoint
� os%<>2 �
(8ȕwaiter%>0:ș"Hourglass_Off":waiter%-=1:�:waiter%=0
2�
<
F
��help
P�
Z
d��dataloadack
nq%!0=20:q%!12=ref%:q%!16=4
x$ș"Wimp_SendMessage",17,q%,task%
��
�
���datasaveack
�<�ArfVar("Wimp$Scrap")="":�99,"<Wimp$Scrap> not defined"
�A!q%=60:q%!12=ref%:q%!16=2:q%!36=-1:$(q%+44)="<Wimp$Scrap>"+�0
�1ș"Wimp_SendMessage",17,q%,task%:ackref%=q%!8
��
�
���savereq(T$,t%,s%,r%)
�savereason%=r%
�+q%!32=my%:q%!28=mx%:q%!24=mi%:q%!20=mh%
�,q%!16=1:q%!12=0:q%!36=s%:q%!40=t%:!q%=60
�9$(q%+44)=T$+�0:ș"Wimp_SendMessage",17,q%,q%!20,q%!24
saveref%=q%!8:�

��loadmess
"$(q%+44)=file$+�0:!q%=60
,7q%!12=ref%:q%!16=3:ș"Wimp_SendMessage",17,q%,task%
6ackpending%=�:�
@ 
Jݤzts(T%):�T$:T$=""
Tȕ?T%<>0:T$+=�?T%:T%+=1:�
^=T$
h
r+��getct:ș"Wimp_GetCaretPosition",,q%:�
|
�>��setct(h%,i%,o%):ș "Wimp_SetCaretPosition",h%,i%,,,-1,o%
��
�
�ݤleaf(T$)
�
�I%,C%
�$�((�T$,".")=0)�(�T$,":")=0))�=T$
�I%=�(T$)
��
�C%=��T$,I%,1)
�	I%-=1
��(I%<=0�C%=�"."�C%=�":")
��I%>0�=�T$,�(T$)-I%-1)
�=T$

��scrsz
H!workbuf%=4:workbuf%!4=5:workbuf%!8=11:workbuf%!12=12:workbuf%!16=-1
&1ș "OS_ReadVduVariables",workbuf%,workbuf%+24
0Iq%!32=(workbuf%!32)<<(workbuf%!24):q%!36=(workbuf%!36)<<(workbuf%!28)
:�
D
N��saveset(f$,T%,r%,s%)
X0savereason%=r%:savef$=f$:savet%=T%:saves%=s%
b>�seti(w_save%,2,f$):$�va(w_save%,3)="sfile_"+�"00"+�~T%,3)
l�
v
���dragicon(h%,i%)
��x%,y%,ys%
�,�getw(h%):ys%=y1%-y0%:x%=bx%:y%=y0%-scy%
�1�geti(h%,i%):q%!8+=x%:q%!12+=y%+ys%:q%!16+=x%
�0q%!20+=y%+ys%:q%!24=0:q%!28=0:!q%=0:�drag5:�
�
���drag5:�readpointer:�scrsz
�Fq%!24-=mx%-q%!8:q%!28-=my%-q%!12:q%!32+=q%!16-mx%:q%!36+=q%!20-my%
�!q%!4=5:ș"Wimp_DragBox",,q%:�
�
���savedata
��q%!12<>saveref%:�
�file$=�zts(q%+44)
�savedata1
�

  ��savedata1:�closew(w_save%)
* �savefile(savereason%,file$)
4savereason%=-
00000000  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00000010  2c 00 00 00 36 00 00 00  63 00 00 00 00 00 00 00  |,...6...c.......|
00000020  00 00 00 00 00 00 00 00  00 00 00 00 43 6f 6d 70  |............Comp|
00000030  61 63 74 6f 72 00 43 6f  6d 70 61 63 74 6f 72 20  |actor.Compactor |
00000040  09 31 2e 30 34 20 28 30  33 20 4a 75 6c 20 31 39  |.1.04 (03 Jul 19|
00000050  38 39 29 20 28 63 29 20  53 69 6d 6f 6e 20 43 6c  |89) (c) Simon Cl|
00000060  61 79 00 44 65 66 69 6e  65 42 75 66 66 65 72 00  |ay.DefineBuffer.|
00000070  64 08 00 00 02 03 02 00  52 02 00 00 14 02 00 00  |d.......R.......|
00000080  55 6e 44 65 66 69 6e 65  00 2e 36 15 8c 08 00 00  |UnDefine..6.....|
00000090  00 00 00 00 b6 02 00 00  79 02 00 00 53 65 74 50  |........y...SetP|
000000a0  6f 73 69 74 69 6f 6e 00  a4 08 00 00 02 03 02 00  |osition.........|
000000b0  29 03 00 00 c8 02 00 00  50 6c 6f 74 46 69 6c 65  |).......PlotFile|
000000c0  00 65 72 0d cc 08 00 00  01 01 01 00 9c 03 00 00  |.er.............|
000000d0  4c 03 00 00 42 61 63 6b  50 6c 6f 74 00 20 52 31  |L...BackPlot. R1|
000000e0  e4 08 00 00 01 01 01 00  45 04 00 00 ba 03 00 00  |........E.......|
000000f0  43 6f 6d 5f 53 70 72 69  74 65 73 00 00 09 00 00  |Com_Sprites.....|
00000100  04 0f 04 00 9f 04 00 00  63 04 00 00 43 6f 6d 5f  |........c...Com_|
00000110  53 61 76 65 00 4d 50 20  40 09 00 00 06 3f 06 00  |Save.MP @....?..|
00000120  04 05 00 00 da 04 00 00  43 6f 6d 5f 49 6e 66 6f  |........Com_Info|
00000130  00 4f 56 20 4c 0a 00 00  02 03 02 00 6b 05 00 00  |.OV L.......k...|
00000140  43 05 00 00 43 6f 6d 5f  53 74 72 65 61 6d 00 a4  |C...Com_Stream..|
00000150  70 0a 00 00 03 07 03 00  ce 05 00 00 94 05 00 00  |p...............|
00000160  43 6f 6d 5f 55 6e 53 74  72 65 61 6d 00 32 3a ec  |Com_UnStream.2:.|
00000170  ac 0a 00 00 02 03 02 00  34 06 00 00 ff 05 00 00  |........4.......|
00000180  43 6f 6d 5f 4f 70 65 6e  00 30 2c 52 cc 0a 00 00  |Com_Open.0,R....|
00000190  01 01 01 00 ce 06 00 00  5b 06 00 00 43 6f 6d 5f  |........[...Com_|
000001a0  43 6c 6f 73 65 00 52 31  d8 0a 00 00 00 00 00 00  |Close.R1........|
000001b0  20 07 00 00 ec 06 00 00  43 6f 6d 5f 4d 65 6d 6f  | .......Com_Memo|
000001c0  72 79 00 16 e4 0a 00 00  01 01 01 00 a7 07 00 00  |ry..............|
000001d0  33 07 00 00 43 6f 6d 5f  52 65 6d 65 6d 62 65 72  |3...Com_Remember|
000001e0  00 61 64 5f fc 0a 00 00  00 00 00 00 fe 07 00 00  |.ad_............|
000001f0  c5 07 00 00 43 6f 6d 5f  43 68 65 63 6b 00 2f 08  |....Com_Check./.|
00000200  08 0b 00 00 00 00 00 00  4f 08 00 00 14 08 00 00  |........O.......|
00000210  00 00 00 00 2a 44 65 66  69 6e 65 42 75 66 66 65  |....*DefineBuffe|
00000220  72 20 74 65 6c 6c 73 20  74 68 65 20 61 6e 69 6d  |r tells the anim|
00000230  61 74 6f 72 20 77 68 65  72 65 20 74 6f 20 70 6c  |ator where to pl|
00000240  61 63 65 20 74 68 65 20  66 69 6c 65 20 64 61 74  |ace the file dat|
00000250  61 0d 53 79 6e 74 61 78  3a 20 2a 44 65 66 69 6e  |a.Syntax: *Defin|
00000260  65 42 75 66 66 65 72 20  3c 61 64 64 72 65 73 73  |eBuffer <address|
00000270  3e 20 3c 73 69 7a 65 3e  00 2a 55 6e 44 65 66 69  |> <size>.*UnDefi|
00000280  6e 65 20 63 61 6e 63 65  6c 73 20 74 68 65 20 62  |ne cancels the b|
00000290  75 66 66 65 72 20 61 6e  64 20 73 74 6f 70 73 20  |uffer and stops |
000002a0  62 61 64 20 6d 65 6d 6f  72 79 20 6d 61 6e 61 67  |bad memory manag|
000002b0  65 6d 65 6e 74 0d 53 79  6e 74 61 78 3a 20 2a 55  |ement.Syntax: *U|
000002c0  6e 44 65 66 69 6e 65 00  2a 53 65 74 50 6f 73 69  |nDefine.*SetPosi|
000002d0  74 69 6f 6e 20 73 65 74  73 20 74 68 65 20 70 6f  |tion sets the po|
000002e0  73 69 74 69 6f 6e 20 6f  66 20 74 68 65 20 74 6f  |sition of the to|
000002f0  70 20 6c 65 66 74 20 63  6f 72 6e 65 72 20 6f 66  |p left corner of|
00000300  20 74 68 65 0d 73 70 72  69 74 65 20 66 6f 72 20  | the.sprite for |
00000310  70 6c 6f 74 74 69 6e 67  20 75 73 69 6e 67 20 2a  |plotting using *|
00000320  50 6c 6f 74 46 69 6c 65  0d 53 79 6e 74 61 78 3a  |PlotFile.Syntax:|
00000330  20 2a 53 65 74 50 6f 73  69 74 69 6f 6e 20 3c 78  | *SetPosition <x|
00000340  70 6f 73 3e 20 3c 79 70  6f 73 3e 00 2a 50 6c 6f  |pos> <ypos>.*Plo|
00000350  74 46 69 6c 65 20 64 65  2d 63 6f 6d 70 61 63 74  |tFile de-compact|
00000360  73 20 61 20 66 69 6c 65  20 74 6f 20 74 68 65 20  |s a file to the |
00000370  73 63 72 65 65 6e 20 61  74 20 74 68 65 0d 70 6f  |screen at the.po|
00000380  73 69 74 69 6f 6e 20 73  65 74 20 62 79 20 2a 53  |sition set by *S|
00000390  65 74 50 6f 73 69 74 69  6f 6e 2e 0d 53 79 6e 74  |etPosition..Synt|
000003a0  61 78 3a 20 2a 50 6c 6f  74 46 69 6c 65 20 3c 66  |ax: *PlotFile <f|
000003b0  69 6c 65 20 6e 61 6d 65  3e 00 2a 42 61 63 6b 50  |ile name>.*BackP|
000003c0  6c 6f 74 20 64 65 2d 63  6f 6d 70 61 63 74 73 20  |lot de-compacts |
000003d0  61 20 66 69 6c 65 20 74  6f 20 61 20 62 61 63 6b  |a file to a back|
000003e0  73 63 72 65 65 6e 20 73  6f 20 74 68 61 74 20 69  |screen so that i|
000003f0  74 20 63 61 6e 20 62 65  20 62 72 6f 75 67 68 74  |t can be brought|
00000400  0d 66 6f 72 77 61 72 64  20 62 79 20 61 6e 20 65  |.forward by an e|
00000410  66 66 65 63 74 73 20 6d  6f 64 75 6c 65 20 28 74  |ffects module (t|
00000420  6f 20 62 65 20 72 65 6c  65 61 73 65 64 29 20 75  |o be released) u|
00000430  73 69 6e 67 20 76 61 72  69 6f 75 73 20 65 66 66  |sing various eff|
00000440  65 63 74 73 0d 53 79 6e  74 61 78 3a 20 2a 42 61  |ects.Syntax: *Ba|
00000450  63 6b 50 6c 6f 74 20 3c  66 69 6c 65 20 6e 61 6d  |ckPlot <file nam|
00000460  65 3e 00 2a 43 6f 6d 5f  53 70 72 69 74 65 73 20  |e>.*Com_Sprites |
00000470  64 69 76 69 64 65 73 20  74 68 65 20 70 69 63 74  |divides the pict|
00000480  75 72 65 20 6e 61 6d 65  64 20 69 6e 74 6f 20 73  |ure named into s|
00000490  6d 61 6c 6c 65 72 20 73  70 72 69 74 65 73 0d 53  |maller sprites.S|
000004a0  79 6e 74 61 78 3a 20 2a  43 6f 6d 5f 53 70 72 69  |yntax: *Com_Spri|
000004b0  74 65 73 20 3c 66 69 6c  65 20 6e 61 6d 65 3e 20  |tes <file name> |
000004c0  3c 41 64 64 72 65 73 73  3e 20 3c 78 73 69 7a 65  |<Address> <xsize|
000004d0  3e 20 3c 79 73 69 7a 65  3e 00 2a 43 6f 6d 5f 53  |> <ysize>.*Com_S|
000004e0  61 76 65 20 63 6f 6d 70  61 63 74 73 20 61 20 66  |ave compacts a f|
000004f0  69 6c 65 20 66 72 6f 6d  20 74 68 65 20 73 63 72  |ile from the scr|
00000500  65 65 6e 0d 53 79 6e 74  61 78 3a 20 2a 43 6f 6d  |een.Syntax: *Com|
00000510  5f 53 61 76 65 20 3c 66  69 6c 65 20 6e 61 6d 65  |_Save <file name|
00000520  3e 20 3c 78 31 3e 20 3c  79 31 3e 20 3c 78 32 3e  |> <x1> <y1> <x2>|
00000530  20 3c 79 32 3e 20 3c 6d  61 73 6b 20 74 61 62 6c  | <y2> <mask tabl|
00000540  65 3e 00 2a 43 6f 6d 5f  49 6e 66 6f 20 72 65 61  |e>.*Com_Info rea|
00000550  64 73 20 69 6e 66 6f 72  6d 61 74 69 6f 6e 20 66  |ds information f|
00000560  72 6f 6d 20 61 20 66 69  6c 65 0d 53 79 6e 74 61  |rom a file.Synta|
00000570  78 3a 20 2a 43 6f 6d 5f  49 6e 66 6f 20 3c 6e 61  |x: *Com_Info <na|
00000580  6d 65 3e 20 3c 62 6c 6f  63 6b 20 61 64 64 72 65  |me> <block addre|
00000590  73 73 3e 00 2a 43 6f 6d  5f 53 74 72 65 61 6d 20  |ss>.*Com_Stream |
000005a0  63 6f 6d 70 61 63 74 73  20 74 68 65 20 64 65 66  |compacts the def|
000005b0  69 6e 65 64 20 61 72 65  61 20 6f 66 20 6d 65 6d  |ined area of mem|
000005c0  6f 72 79 20 74 6f 20 61  20 66 69 6c 65 0d 53 79  |ory to a file.Sy|
000005d0  6e 74 61 78 3a 20 2a 43  6f 6d 5f 53 74 72 65 61  |ntax: *Com_Strea|
000005e0  6d 20 3c 66 69 6c 65 20  6e 61 6d 65 3e 20 3c 61  |m <file name> <a|
000005f0  64 64 72 65 73 73 3e 20  3c 73 69 7a 65 3e 00 2a  |ddress> <size>.*|
00000600  43 6f 6d 5f 55 6e 53 74  72 65 61 6d 20 64 65 63  |Com_UnStream dec|
00000610  6f 6d 70 61 63 74 73 20  61 20 73 74 72 65 61 6d  |ompacts a stream|
00000620  65 64 20 66 69 6c 65 20  69 6e 74 6f 20 6d 65 6d  |ed file into mem|
00000630  6f 72 79 0d 53 79 6e 74  61 78 3a 20 2a 43 6f 6d  |ory.Syntax: *Com|
00000640  5f 55 6e 53 74 72 65 61  6d 20 3c 6e 61 6d 65 3e  |_UnStream <name>|
00000650  20 3c 61 64 64 72 65 73  73 3e 00 2a 43 6f 6d 5f  | <address>.*Com_|
00000660  4f 70 65 6e 20 6f 70 65  6e 73 20 61 6e 20 65 6d  |Open opens an em|
00000670  70 74 79 20 66 69 6c 65  20 66 6f 72 20 61 70 70  |pty file for app|
00000680  65 6e 64 69 6e 67 20 74  6f 0d 41 70 70 65 6e 64  |ending to.Append|
00000690  69 6e 67 20 74 6f 20 74  68 69 73 20 66 69 6c 65  |ing to this file|
000006a0  20 69 73 20 61 63 68 69  65 76 65 64 20 62 79 20  | is achieved by |
000006b0  73 70 65 63 69 66 79 69  6e 67 20 27 24 27 20 61  |specifying '$' a|
000006c0  73 20 61 20 66 69 6c 65  20 6e 61 6d 65 0d 53 79  |s a file name.Sy|
000006d0  6e 74 61 78 3a 20 2a 43  6f 6d 5f 4f 70 65 6e 20  |ntax: *Com_Open |
000006e0  3c 66 69 6c 65 20 6e 61  6d 65 3e 00 2a 43 6f 6d  |<file name>.*Com|
000006f0  5f 43 6c 6f 73 65 20 73  74 6f 70 73 20 66 75 72  |_Close stops fur|
00000700  74 68 65 72 20 61 70 70  65 6e 64 69 6e 67 20 74  |ther appending t|
00000710  6f 20 61 20 6f 70 65 6e  65 64 20 66 69 6c 65 0d  |o a opened file.|
00000720  53 79 6e 74 61 78 3a 20  2a 43 6f 6d 5f 43 6c 6f  |Syntax: *Com_Clo|
00000730  73 65 00 2a 43 6f 6d 5f  4d 65 6d 6f 72 79 20 73  |se.*Com_Memory s|
00000740  65 74 73 20 75 70 20 69  6e 20 65 66 66 65 63 74  |ets up in effect|
00000750  20 61 20 72 61 6d 20 64  69 73 6b 20 61 74 20 61  | a ram disk at a|
00000760  6e 79 20 61 64 64 72 65  73 73 0d 54 68 65 20 61  |ny address.The a|
00000770  64 64 72 65 73 73 20 69  73 20 74 61 6b 65 6e 20  |ddress is taken |
00000780  74 6f 20 62 65 20 6f 6e  65 20 66 69 6c 65 20 61  |to be one file a|
00000790  6e 64 20 73 68 6f 75 6c  64 20 62 65 20 6e 61 6d  |nd should be nam|
000007a0  65 64 20 27 40 27 0d 53  79 6e 74 61 78 3a 20 2a  |ed '@'.Syntax: *|
000007b0  43 6f 6d 5f 4d 65 6d 6f  72 79 20 3c 61 64 64 72  |Com_Memory <addr|
000007c0  65 73 73 3e 00 2a 43 6f  6d 5f 52 65 6d 65 6d 62  |ess>.*Com_Rememb|
000007d0  65 72 20 73 65 74 73 20  61 20 66 6c 61 67 20 66  |er sets a flag f|
000007e0  6f 72 20 62 75 66 66 65  72 20 63 6f 72 72 75 70  |or buffer corrup|
000007f0  74 69 6f 6e 20 63 68 65  63 6b 69 6e 67 0d 53 79  |tion checking.Sy|
00000800  6e 74 61 78 3a 20 2a 43  6f 6d 5f 52 65 6d 65 6d  |ntax: *Com_Remem|
00000810  62 65 72 00 2a 43 6f 6d  5f 43 68 65 63 6b 20 63  |ber.*Com_Check c|
00000820  68 65 63 6b 73 20 62 75  66 66 65 72 20 63 6f 72  |hecks buffer cor|
00000830  72 75 70 74 69 6f 6e 20  66 72 6f 6d 20 74 68 65  |ruption from the|
00000840  20 6c 61 73 74 20 72 65  6d 65 6d 62 65 72 0d 53  | last remember.S|
00000850  79 6e 74 61 78 3a 20 2a  43 6f 6d 5f 43 68 65 63  |yntax: *Com_Chec|
00000860  6b 00 b0 0f 00 40 2d e9  00 10 a0 e1 00 00 a0 e3  |k....@-.........|
00000870  21 00 00 ef 98 27 8f e5  01 10 81 e2 00 00 a0 e3  |!....'..........|
00000880  21 00 00 ef 84 27 8f e5  00 80 bd e8 00 40 2d e9  |!....'.......@-.|
00000890  00 00 e0 e3 74 07 8f e5  00 00 e0 e3 70 07 8f e5  |....t.......p...|
000008a0  00 80 bd e8 00 40 2d e9  00 10 a0 e1 00 00 a0 e3  |.....@-.........|
000008b0  21 00 00 ef 5c 27 8f e5  01 10 81 e2 00 00 a0 e3  |!...\'..........|
000008c0  21 00 00 ef 50 27 8f e5  00 80 bd e8 00 40 2d e9  |!...P'.......@-.|
000008d0  7d 06 00 eb 00 20 a0 e3  04 26 8f e5 1f 02 00 eb  |}.... ...&......|
000008e0  00 80 bd e8 00 40 2d e9  77 06 00 eb 01 20 a0 e3  |.....@-.w.... ..|
000008f0  ec 25 8f e5 54 27 8f e5  18 02 00 eb 00 80 bd e8  |.%..T'..........|
00000900  00 40 2d e9 70 06 00 eb  00 10 80 e2 00 00 a0 e3  |.@-.p...........|
00000910  21 00 00 ef 1c 27 8f e5  01 10 81 e2 00 00 a0 e3  |!....'..........|
00000920  21 00 00 ef 10 27 8f e5  01 10 81 e2 00 00 a0 e3  |!....'..........|
00000930  21 00 00 ef 04 27 8f e5  54 02 00 eb 00 80 bd e8  |!....'..T.......|
00000940  00 40 2d e9 60 06 00 eb  00 10 80 e2 00 00 a0 e3  |.@-.`...........|
00000950  21 00 00 ef 79 00 00 eb  02 40 a0 e1 01 10 81 e2  |!...y....@......|
00000960  00 00 a0 e3 21 00 00 ef  7a 00 00 eb 02 50 a0 e1  |....!...z....P..|
00000970  01 10 81 e2 00 00 a0 e3  21 00 00 ef 6f 00 00 eb  |........!...o...|
00000980  02 60 a0 e1 01 10 81 e2  00 00 a0 e3 21 00 00 ef  |.`..........!...|
00000990  70 00 00 eb 02 70 a0 e1  01 10 81 e2 00 00 a0 e3  |p....p..........|
000009a0  21 00 00 ef 88 26 8f e5  04 00 56 e1 06 30 a0 b1  |!....&....V..0..|
000009b0  04 60 a0 b1 03 40 a0 b1  07 00 55 e1 05 30 a0 b1  |.`...@....U..0..|
000009c0  07 50 a0 b1 03 70 a0 b1  50 46 8f e5 04 40 46 e0  |.P...p..PF...@F.|
000009d0  4c 56 8f e5 07 50 45 e0  87 00 a0 e3 06 00 00 ef  |LV...PE.........|
000009e0  0d 00 52 e3 c4 40 a0 01  c4 40 a0 e1 01 40 84 e2  |..R..@...@...@..|
000009f0  30 46 8f e5 45 51 a0 e1  01 50 85 e2 28 56 8f e5  |0F..EQ...P..(V..|
00000a00  2c 26 9f e5 00 00 e0 e3  00 00 52 e3 06 00 00 0a  |,&........R.....|
00000a10  01 30 d2 e4 01 00 80 e2  00 00 53 e3 02 00 00 0a  |.0........S.....|
00000a20  ff 00 50 e3 f9 ff ff ba  00 00 e0 e3 fc 05 8f e5  |..P.............|
00000a30  00 20 a0 e3 a8 24 8f e5  8d 01 00 eb 0d 2c a0 e3  |. ...$.......,..|
00000a40  7f 20 82 e3 18 06 00 eb  00 80 bd e8 00 40 2d e9  |. ...........@-.|
00000a50  1d 06 00 eb 00 10 80 e2  00 00 a0 e3 21 00 00 ef  |............!...|
00000a60  b8 25 8f e5 e9 01 00 eb  00 80 bd e8 0e f0 a0 e1  |.%..............|
00000a70  00 40 2d e9 14 06 00 eb  00 10 80 e2 00 00 a0 e3  |.@-.............|
00000a80  21 00 00 ef 94 25 8f e5  01 10 81 e2 00 00 a0 e3  |!....%..........|
00000a90  21 00 00 ef 8c 25 8f e5  27 02 00 eb 0d 2c a0 e3  |!....%..'....,..|
00000aa0  7f 20 82 e3 00 06 00 eb  00 80 bd e8 00 40 2d e9  |. ...........@-.|
00000ab0  05 06 00 eb 00 10 80 e2  00 00 a0 e3 21 00 00 ef  |............!...|
00000ac0  58 25 8f e5 3d 02 00 eb  00 80 bd e8 00 40 2d e9  |X%..=........@-.|
00000ad0  2e 06 00 eb 00 80 bd e8  00 40 2d e9 39 06 00 eb  |.........@-.9...|
00000ae0  00 80 bd e8 00 40 2d e9  00 10 a0 e1 00 00 a0 e3  |.....@-.........|
00000af0  21 00 00 ef 3c 06 00 eb  00 80 bd e8 00 00 a0 e3  |!...<...........|
00000b00  48 05 8f e5 0e f0 a0 e1  40 05 9f e5 00 00 50 e3  |H.......@.....P.|
00000b10  0e f0 a0 01 04 00 8f e2  2b 00 00 ef 0e f0 a0 e1  |........+.......|
00000b20  63 00 00 00 42 75 66 66  65 72 20 68 61 73 20 62  |c...Buffer has b|
00000b30  65 65 6e 20 63 6f 72 72  75 70 74 65 64 00 6f 64  |een corrupted.od|
00000b40  00 40 2d e9 00 00 52 e3  08 00 00 ba 05 0c 52 e3  |.@-...R.......R.|
00000b50  06 00 00 aa 00 80 bd e8  00 40 2d e9 00 00 52 e3  |.........@-...R.|
00000b60  02 00 00 ba 01 0b 52 e3  00 00 00 aa 00 80 bd e8  |......R.........|
00000b70  04 00 8f e2 2b 00 00 ef  00 80 bd e8 63 00 00 00  |....+.......c...|
00000b80  43 6f 6d 70 61 63 74 6f  72 3a 20 54 68 65 20 73  |Compactor: The s|
00000b90  70 72 69 74 65 73 20 61  72 65 61 20 6d 75 73 74  |prites area must|
00000ba0  20 62 65 20 77 69 74 68  69 6e 20 74 68 65 20 73  | be within the s|
00000bb0  63 72 65 65 6e 00 22 20  00 40 2d e9 3c 04 9f e5  |creen." .@-.<...|
00000bc0  0f 00 50 e3 0d 00 50 13  00 80 bd 08 04 00 8f e2  |..P...P.........|
00000bd0  2b 00 00 ef 00 80 bd e8  63 00 00 00 43 6f 6d 70  |+.......c...Comp|
00000be0  61 63 74 6f 72 3a 20 53  63 72 65 65 6e 73 20 63  |actor: Screens c|
00000bf0  61 6e 20 6f 6e 6c 79 20  62 65 20 63 6f 6d 70 61  |an only be compa|
00000c00  63 74 65 64 20 66 72 6f  6d 20 6d 6f 64 65 73 20  |cted from modes |
00000c10  31 33 20 6f 72 20 31 35  00 72 6f 72 00 40 2d e9  |13 or 15.ror.@-.|
00000c20  28 00 8f e2 e8 13 9f e5  01 00 71 e3 05 00 00 0a  |(.........q.....|
00000c30  d8 13 9f e5 01 00 71 e3  02 00 00 0a 02 08 51 e3  |......q.......Q.|
00000c40  00 80 bd a8 4d 00 8f e2  2b 00 00 ef 00 80 bd e8  |....M...+.......|
00000c50  63 00 00 00 43 6f 6d 70  61 63 74 6f 72 3a 20 54  |c...Compactor: T|
00000c60  6f 20 73 61 76 65 2c 20  61 20 62 75 66 66 65 72  |o save, a buffer|
00000c70  20 6e 65 65 64 73 20 74  6f 20 62 65 20 64 65 66  | needs to be def|
00000c80  69 6e 65 64 20 75 73 69  6e 67 20 2a 44 65 66 69  |ined using *Defi|
00000c90  6e 65 42 75 66 66 65 72  00 63 00 00 00 43 6f 6d  |neBuffer.c...Com|
00000ca0  70 61 63 74 6f 72 3a 20  54 68 65 20 62 75 66 66  |pactor: The buff|
00000cb0  65 72 20 6d 75 73 74 20  62 65 20 61 74 20 6c 65  |er must be at le|
00000cc0  61 73 74 20 31 33 31 30  37 32 20 28 26 32 30 30  |ast 131072 (&200|
00000cd0  30 30 29 20 62 79 74 65  73 00 28 52 1f 40 2d e9  |00) bytes.(R.@-.|
00000ce0  ff 00 50 e3 0a 2d a0 03  01 3c a0 03 0f 40 a0 03  |..P..-...<...@..|
00000cf0  00 50 e0 03 10 00 00 0a  10 10 a0 e3 af 04 00 eb  |.P..............|
00000d00  00 20 a0 e1 10 10 a0 e3  ac 04 00 eb 00 30 a0 e1  |. ...........0..|
00000d10  08 10 a0 e3 a9 04 00 eb  00 40 a0 e1 01 10 a0 e3  |.........@......|
00000d20  a6 04 00 eb 00 00 50 e3  00 50 e0 03 02 00 00 0a  |......P..P......|
00000d30  08 10 a0 e3 a1 04 00 eb  00 50 a0 e1 e4 22 8f e5  |.........P..."..|
00000d40  e4 32 8f e5 b8 42 8f e5  e0 52 8f e5 1f 80 bd e8  |.2...B...R......|
00000d50  07 40 2d e9 fe 00 a0 e3  a8 02 8f e5 08 10 a0 e3  |.@-.............|
00000d60  90 04 00 eb bc 02 9f e5  10 10 a0 e3 8d 04 00 eb  |................|
00000d70  b4 02 9f e5 10 10 a0 e3  8a 04 00 eb 7c 02 9f e5  |............|...|
00000d80  7c 02 8f e5 08 10 a0 e3  86 04 00 eb 9c 22 9f e5  ||............"..|
00000d90  00 00 a0 e3 00 00 52 e3  01 00 a0 a3 ff 00 52 e3  |......R.......R.|
00000da0  00 00 a0 c3 01 10 a0 e3  7e 04 00 eb 01 00 50 e3  |........~.....P.|
00000db0  02 00 a0 01 08 10 a0 03  7a 04 00 0b 07 80 bd e8  |........z.......|
00000dc0  07 40 2d e9 fd 00 a0 e3  38 02 8f e5 08 10 a0 e3  |.@-.....8.......|
00000dd0  74 04 00 eb 4c 02 9f e5  20 10 a0 e3 71 04 00 eb  |t...L... ...q...|
00000de0  08 00 a0 e3 08 10 a0 e3  6e 04 00 eb 07 80 bd e8  |........n.......|
00000df0  07 40 2d e9 20 10 a0 e3  70 04 00 eb 24 02 8f e5  |.@-. ...p...$...|
00000e00  08 10 a0 e3 6d 04 00 eb  1c 02 8f e5 07 80 bd e8  |....m...........|
00000e10  3f 40 2d e9 18 10 a0 e3  68 04 00 eb e4 11 9f e5  |?@-.....h.......|
00000e20  00 24 81 e0 20 10 a0 e3  64 04 00 eb 00 30 a0 e1  |.$.. ...d....0..|
00000e30  62 04 00 eb 00 50 a0 e1  e8 21 8f e5 e8 31 8f e5  |b....P...!...1..|
00000e40  05 0d 52 e3 0d 40 a0 03  0f 40 a0 13 b0 41 8f e5  |..R..@...@...A..|
00000e50  01 4a a0 e3 01 40 44 e2  04 50 05 e0 ff 00 55 e3  |.J...@D..P....U.|
00000e60  00 50 e0 c3 c4 51 8f e5  3f 80 bd e8 00 40 2d e9  |.P...Q..?....@-.|
00000e70  1c 00 00 eb 01 00 73 e3  00 80 bd 18 04 00 8f e2  |......s.........|
00000e80  00 05 00 eb 00 80 bd e8  63 00 00 00 43 6f 6d 70  |........c...Comp|
00000e90  61 63 74 6f 72 3a 20 41  74 74 65 6d 70 74 69 6e  |actor: Attemptin|
00000ea0  67 20 74 6f 20 67 65 74  20 6f 66 66 20 73 63 72  |g to get off scr|
00000eb0  65 65 6e 00 63 00 00 00  43 6f 6d 70 61 63 74 6f  |een.c...Compacto|
00000ec0  72 3a 20 53 74 72 65 61  6d 65 64 20 66 69 6c 65  |r: Streamed file|
00000ed0  73 20 63 61 6e 6e 6f 74  20 62 65 20 70 6c 6f 74  |s cannot be plot|
00000ee0  74 65 64 00 00 00 00 00  c1 40 2d e9 00 30 e0 e3  |ted......@-..0..|
00000ef0  00 00 56 e3 16 00 00 ba  00 00 57 e3 14 00 00 ba  |..V.......W.....|
00000f00  05 0c 56 e3 12 00 00 aa  01 0b 57 e3 10 00 00 aa  |..V.......W.....|
00000f10  34 00 1f e5 01 00 50 e3  f4 30 9f 05 d8 30 9f 15  |4.....P..0...0..|
00000f20  01 00 73 e3 d0 30 9f 05  d0 00 9f e5 0f 00 50 e3  |..s..0........P.|
00000f30  c6 60 a0 01 46 61 a0 11  47 71 a0 e1 ff 70 67 e2  |.`..Fa..Gq...pg.|
00000f40  06 30 83 e0 0f 00 50 e3  0a 6d a0 03 05 6d a0 13  |.0....P..m...m..|
00000f50  96 37 23 e0 c1 80 bd e8  07 40 2d e9 9c 10 9f e5  |.7#......@-.....|
00000f60  01 00 5a e3 02 00 00 0a  0f 00 51 e3 0d 00 51 13  |..Z.......Q...Q.|
00000f70  07 80 bd 08 88 00 9f e5  01 00 50 e1 07 80 bd 08  |..........P.....|
00000f80  16 00 a0 e3 00 00 00 ef  74 00 9f e5 6c 00 8f e5  |........t...l...|
00000f90  00 00 00 ef 58 00 8f e2  5c 10 8f e2 31 00 00 ef  |....X...\...1...|
00000fa0  17 00 a0 e3 00 00 00 ef  01 00 a0 e3 00 00 00 ef  |................|
00000fb0  00 00 a0 e3 00 00 00 ef  00 00 a0 e3 00 00 00 ef  |................|
*
00000ff0  07 80 bd e8 94 00 00 00  ff ff ff ff 00 00 00 00  |................|
00001000  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00001010  ff ff ff ff ff ff ff ff  00 00 00 00 ff 03 00 00  |................|
00001020  00 00 00 00 ff 03 00 00  80 02 00 00 00 01 00 00  |................|
00001030  ff ff ff ff 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00001040  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00001050  00 00 00 00 00 40 2d e9  6c 00 4f e2 68 10 4f e2  |.....@-.l.O.h.O.|
00001060  31 00 00 ef 87 00 a0 e3  06 00 00 ef 74 20 0f e5  |1...........t ..|
00001070  00 80 bd e8 00 5b 2d e9  f5 ff ff eb 72 02 00 eb  |.....[-.....r...|
00001080  cc fe ff eb e4 fe ff eb  2a 04 00 eb 01 00 a0 e3  |........*.......|
00001090  48 00 0f e5 2d ff ff eb  80 60 1f e5 80 70 1f e5  |H...-....`...p..|
000010a0  90 ff ff eb 00 00 d3 e5  dc 09 8f e5 00 50 a0 e3  |.............P..|
000010b0  00 c0 a0 e3 72 02 00 eb  02 a0 a0 e1 01 0c 55 e3  |....r.........U.|
000010c0  00 50 e0 03 00 00 55 e3  fd 01 00 ab b0 70 1f e5  |.P....U......p..|
000010d0  ac 80 1f e5 bc 60 1f e5  b8 90 1f e5 62 ff ff eb  |.....`......b...|
000010e0  00 00 d3 e5 bc 20 1f e5  01 00 72 e3 03 00 00 0a  |..... ....r.....|
000010f0  c4 20 1f e5 00 20 d2 e7  00 00 52 e3 d4 00 1f 05  |. ... ....R.....|
00001100  bf 00 00 eb 08 11 1f e5  10 21 1f e5 0d 00 52 e3  |.........!....R.|
00001110  0f 00 51 03 ba 00 00 0b  0f 00 51 e3 02 60 86 02  |..Q.......Q..`..|
00001120  04 60 86 12 01 90 49 e2  00 00 59 e3 ea ff ff ca  |.`....I...Y.....|
00001130  04 70 47 e2 01 80 48 e2  00 00 58 e3 e4 ff ff ca  |.pG...H...X.....|
00001140  01 0c a0 e3 ae 00 00 eb  00 00 55 e3 00 02 00 ab  |..........U.....|
00001150  01 00 75 e3 d8 ff ff 1a  36 04 00 eb 00 9b bd e8  |..u.....6.......|
00001160  00 43 2d e9 ba ff ff eb  37 02 00 eb 10 04 00 eb  |.C-.....7.......|
00001170  08 10 a0 e3 91 03 00 eb  78 01 0f e5 fe 00 50 e3  |........x.....P.|
00001180  d5 fe ff ab fe 00 50 e3  a6 01 00 ab fd 00 50 e3  |......P.......P.|
00001190  b9 0f 4f 02 2b 00 00 0f  fd 00 50 e3 1b ff ff bb  |..O.+.....P.....|
000011a0  6c ff ff eb 90 71 1f e5  84 81 1f e5 9c 61 1f e5  |l....q.......a..|
000011b0  90 91 1f e5 fb 00 00 eb  4a ff ff eb c0 11 1f e5  |........J.......|
000011c0  00 00 53 e3 07 00 00 ba  d0 21 1f e5 a4 41 1f e5  |..S......!...A..|
000011d0  00 00 54 e1 00 00 c3 15  02 00 00 0a 0f 00 52 e3  |..T...........R.|
000011e0  0d 00 51 03 01 00 c3 05  0f 00 51 e3 02 60 86 02  |..Q.......Q..`..|
000011f0  04 60 86 12 01 90 59 e2  ed ff ff 1a 04 70 47 e2  |.`....Y......pG.|
00001200  01 80 58 e2 e8 ff ff 1a  0e 04 00 eb 00 83 bd e8  |..X.............|
00001210  00 40 2d e9 8e ff ff eb  0b 02 00 eb e4 03 00 eb  |.@-.............|
00001220  08 10 a0 e3 65 03 00 eb  28 02 0f e5 fe 00 50 e3  |....e...(.....P.|
00001230  a9 fe ff ab fd 00 50 e3  ec fe ff 0b fd 00 50 e3  |......P.......P.|
00001240  f2 fe ff bb ff 03 00 eb  30 02 1f e5 4c 12 1f e5  |........0...L...|
00001250  04 10 80 e4 34 32 1f e5  04 30 80 e4 38 42 1f e5  |....42...0..8B..|
00001260  04 40 80 e4 83 30 a0 e1  04 41 a0 e1 70 12 1f e5  |.@...0...A..p...|
00001270  0d 00 51 e3 83 30 a0 01  04 30 80 e4 04 40 80 e4  |..Q..0...0...@..|
00001280  04 10 80 e4 5c 12 1f e5  04 10 80 e4 00 80 bd e8  |....\...........|
00001290  00 5f 2d e9 6e ff ff eb  eb 01 00 eb c4 03 00 eb  |._-.n...........|
000012a0  08 10 a0 e3 45 03 00 eb  a8 02 0f e5 fe 00 50 e3  |....E.........P.|
000012b0  89 fe ff ab fe 00 50 e3  5a 01 00 ab fe 00 50 e3  |......P.Z.....P.|
000012c0  d2 fe ff bb 94 32 1f e5  90 72 1f e5 a8 82 1f e5  |.....2...r......|
000012d0  00 b0 a0 e3 03 c0 a0 e1  a4 62 1f e5 bc 92 1f e5  |.........b......|
000012e0  03 a0 a0 e1 af 00 00 eb  01 00 c3 e4 01 60 56 e2  |.............`V.|
000012f0  03 00 00 1a c0 62 1f e5  06 30 43 e0 c4 02 1f e5  |.....b...0C.....|
00001300  96 30 23 e0 01 b0 8b e2  01 90 59 e2 f4 ff ff 1a  |.0#.......Y.....|
00001310  dc 02 1f e5 01 70 57 e2  00 30 8a 10 e4 72 1f 05  |.....pW..0...r..|
00001320  0b 30 8c 00 00 b0 a0 03  03 c0 a0 01 01 80 58 e2  |.0............X.|
00001330  e8 ff ff 1a c3 03 00 eb  00 9f bd e8 00 5b 2d e9  |.............[-.|
00001340  43 ff ff eb c0 01 00 eb  33 fe ff eb 79 03 00 eb  |C.......3...y...|
00001350  01 00 a0 e3 0c 03 0f e5  98 fe ff eb 44 63 1f e5  |............Dc..|
00001360  00 00 d6 e5 20 07 8f e5  00 50 a0 e3 00 c0 a0 e3  |.... ....P......|
00001370  c3 01 00 eb 02 a0 a0 e1  01 0c 55 e3 00 50 e0 03  |..........U..P..|
00001380  00 00 55 e3 4e 01 00 ab  70 63 1f e5 6c 83 1f e5  |..U.N...pc..l...|
00001390  01 00 d6 e4 1a 00 00 eb  01 80 58 e2 fb ff ff 1a  |..........X.....|
000013a0  01 0c a0 e3 16 00 00 eb  00 00 55 e3 68 01 00 ab  |..........U.h...|
000013b0  01 00 75 e3 ef ff ff 1a  9e 03 00 eb 00 9b bd e8  |..u.............|
000013c0  00 43 2d e9 22 ff ff eb  9f 01 00 eb 78 03 00 eb  |.C-.".......x...|
000013d0  08 10 a0 e3 f9 02 00 eb  d8 03 0f e5 83 fe ff eb  |................|
000013e0  10 01 00 eb cc 73 1f e5  c8 83 1f e5 6d 00 00 eb  |.....s......m...|
000013f0  01 00 c7 e4 01 80 58 e2  fb ff ff 1a 91 03 00 eb  |......X.........|
00001400  00 83 bd e8 00 00 55 e3  3b 01 00 aa ff 41 2d e9  |......U.;....A-.|
00001410  74 16 9f e5 78 26 9f e5  01 20 82 e2 01 6c a0 e3  |t...x&... ...l..|
00001420  10 60 86 e2 01 00 50 e1  00 80 a0 13 01 80 a0 03  |.`....P.........|
00001430  06 00 52 e1 00 10 e0 03  00 60 a0 e3 01 00 50 e1  |..R......`....P.|
00001440  33 00 00 0a 40 46 9f e5  3c 06 8f e5 3c 76 9f e5  |3...@F..<...<v..|
00001450  38 46 8f e5 ca 5f 8f e2  02 60 a0 e1 03 00 52 e3  |8F..._...`....R.|
00001460  02 20 a0 c3 00 30 a0 e3  03 01 95 e7 02 00 53 e3  |. ...0........S.|
00001470  04 00 50 11 01 30 83 12  fa ff ff 1a 02 00 53 e3  |..P..0........S.|
00001480  02 30 a0 01 00 20 a0 03  02 00 a0 e1 02 10 a0 e3  |.0... ..........|
00001490  c4 02 00 eb 00 00 52 e3  02 10 a0 03 03 00 a0 e1  |......R.........|
000014a0  c0 02 00 0b 00 00 52 e3  00 20 a0 13 18 00 00 1a  |......R.. ......|
000014b0  e0 25 9f e5 02 41 85 e7  01 20 82 e2 02 00 52 e3  |.%...A... ....R.|
000014c0  00 20 a0 03 cc 25 8f e5  07 00 a0 e1 04 10 a0 e1  |. ...%..........|
000014d0  26 00 00 eb 00 20 a0 e1  00 00 a0 e3 05 00 52 e3  |&.... ........R.|
000014e0  00 00 52 13 01 00 a0 03  01 10 a0 e3 ad 02 00 eb  |..R.............|
000014f0  00 00 50 e3 01 00 42 02  02 10 a0 03 02 00 a0 11  |..P...B.........|
00001500  a8 02 00 eb 05 00 52 e3  04 00 a0 01 9e 00 00 0b  |......R.........|
00001510  00 20 a0 e3 78 25 8f e5  02 00 56 e3 ff 81 bd b8  |. ..x%....V.....|
00001520  03 00 56 e3 ff 81 bd 08  02 00 46 e2 00 00 50 e3  |..V.......F...P.|
00001530  01 00 a0 03 11 00 56 e3  00 00 a0 c3 04 10 a0 e3  |......V.........|
00001540  98 02 00 eb 11 00 56 e3  ff 81 bd d8 11 00 46 e2  |......V.......F.|
00001550  ff 00 50 e3 00 00 58 03  00 00 a0 03 08 10 a0 e3  |..P...X.........|
00001560  90 02 00 eb ff 81 bd e8  00 80 fd 01 08 00 00 00  |................|
00001570  01 0c 50 e3 05 00 a0 03  0e f0 a0 01 0e 40 2d e9  |..P..........@-.|
00001580  3f 01 00 eb 05 30 a0 e3  90 23 22 e0 00 00 a0 e3  |?....0...#".....|
00001590  01 30 d2 e4 05 00 50 e3  01 00 53 11 01 00 80 12  |.0....P...S.....|
000015a0  fa ff ff 1a 0e 80 bd e8  a8 05 1f e5 fd 00 50 e3  |..............P.|
000015b0  55 00 00 ba 7e 40 2d e9  d4 24 9f e5 c8 04 9f e5  |U...~@-..$......|
000015c0  01 20 42 e2 00 00 52 e3  c4 24 8f c5 7e 80 bd c8  |. B...R..$..~...|
000015d0  02 10 a0 e3 79 02 00 eb  00 20 a0 e1 00 00 52 e3  |....y.... ....R.|
000015e0  07 00 00 0a b4 04 9f e5  b4 34 9f e5 00 00 53 e3  |.........4....S.|
000015f0  00 30 a0 e3 a8 34 8f e5  01 00 20 02 9c 04 8f 05  |.0...4.... .....|
00001600  01 00 00 ea 02 10 a0 e3  6c 02 00 eb 00 30 a0 e1  |........l....0..|
00001610  00 00 52 e3 17 00 00 1a  6c 04 9f e5 6c 64 9f e5  |..R.....l...ld..|
00001620  03 20 a0 e1 0e 00 2d e9  01 10 a0 e3 63 02 00 eb  |. ....-.....c...|
00001630  00 20 a0 e1 01 00 50 e3  02 10 a0 13 5f 02 00 eb  |. ....P....._...|
00001640  01 00 52 e3 01 00 50 03  05 00 a0 03 00 00 52 e3  |..R...P.......R.|
00001650  01 00 80 02 00 10 a0 e1  09 01 00 eb 05 00 a0 e3  |................|
00001660  96 20 22 e0 01 00 d2 e7  05 00 51 e3 5b 00 00 0b  |. ".......Q.[...|
00001670  0e 00 bd e8 08 10 a0 e3  02 00 52 e3 13 00 00 1a  |..........R.....|
00001680  03 00 2d e9 04 10 a0 e3  4c 02 00 eb 02 20 80 e2  |..-.....L.... ..|
00001690  03 00 52 e3 02 20 a0 03  00 00 50 e3 0a 00 00 1a  |..R.. ....P.....|
000016a0  08 10 a0 e3 45 02 00 eb  11 20 80 e2 ff 00 50 e3  |....E.... ....P.|
000016b0  01 00 a0 03 e8 03 8f 05  00 00 50 e3 01 2c a0 03  |..........P..,..|
000016c0  10 20 82 02 00 00 a0 03  d4 03 8f 05 03 00 bd e8  |. ..............|
000016d0  ac 40 8f e2 08 00 51 e3  03 01 94 17 a8 03 8f e5  |.@....Q.........|
000016e0  a8 03 8f e5 a8 23 8f e5  7e 80 bd 18 a4 33 9f e5  |.....#..~....3..|
000016f0  03 01 84 e7 a4 33 8f e5  01 30 83 e2 02 00 53 e3  |.....3...0....S.|
00001700  00 30 a0 03 8c 33 8f e5  7e 80 bd e8 3e 40 2d e9  |.0...3..~...>@-.|
00001710  7c 23 9f e5 01 20 42 e2  00 00 52 e3 70 23 8f c5  ||#... B...R.p#..|
00001720  64 03 9f c5 3e 80 bd c8  04 10 a0 e3 23 02 00 eb  |d...>.......#...|
00001730  00 30 a0 e1 04 10 a0 e3  20 02 00 eb 00 20 a0 e1  |.0...... .... ..|
00001740  36 4e 8f e2 00 00 52 e3  08 00 00 1a 03 20 a0 e1  |6N....R...... ..|
00001750  08 10 a0 e3 19 02 00 eb  3c 53 9f e5 05 01 84 e7  |........<S......|
00001760  01 50 85 e2 0f 00 55 e3  00 50 a0 03 28 53 8f e5  |.P....U..P..(S..|
00001770  08 00 51 e3 03 01 94 17  0c 03 8f e5 10 23 8f e5  |..Q..........#..|
00001780  3e 80 bd e8 00 00 00 00  00 00 00 00 7e 40 2d e9  |>...........~@-.|
00001790  8c 17 1f e5 94 37 1f e5  ff 00 53 e3 08 10 a0 03  |.....7....S.....|
000017a0  08 00 51 e3 0b 00 00 0a  00 30 a0 e1 00 00 a0 e3  |..Q......0......|
000017b0  2f 4e 8f e2 00 60 a0 e3  05 50 d4 e4 06 00 53 e1  |/N...`...P....S.|
000017c0  04 00 00 0a 06 00 55 e1  00 00 00 0a 01 00 80 e2  |......U.........|
000017d0  01 60 86 e2 f7 ff ff ea  f2 01 00 eb 7e 80 bd e8  |.`..........~...|
000017e0  3e 40 2d e9 e0 17 1f e5  e8 37 1f e5 ff 00 53 e3  |>@-......7....S.|
000017f0  08 10 a0 03 f1 01 00 eb  08 00 51 e3 3e 80 bd 08  |..........Q.>...|
00001800  01 30 80 e2 00 00 e0 e3  a6 4f 8f e2 01 00 80 e2  |.0.......O......|
00001810  05 50 d4 e4 00 00 55 e1  fb ff ff 0a 01 30 53 e2  |.P....U......0S.|
00001820  f9 ff ff 1a 3e 80 bd e8  ff 40 2d e9 00 50 a0 e3  |....>....@-..P..|
00001830  00 70 a0 e3 9b 4f 8f e2  01 10 a0 e3 df 01 00 eb  |.p...O..........|
00001840  00 30 a0 e1 05 60 a0 e3  00 00 53 e3 01 70 87 12  |.0...`....S..p..|
00001850  05 00 a0 e1 08 10 a0 e3  00 00 53 e3 d7 01 00 1b  |..........S.....|
00001860  01 00 c4 e4 01 60 56 e2  f8 ff ff 1a 01 50 85 e2  |.....`V......P..|
00001870  01 0c 55 e3 ef ff ff ba  01 60 a0 e3 00 00 57 e3  |..U......`....W.|
00001880  01 60 a0 c3 02 00 57 e3  02 60 a0 c3 04 00 57 e3  |.`....W..`....W.|
00001890  03 60 a0 c3 08 00 57 e3  04 60 a0 c3 10 00 57 e3  |.`....W..`....W.|
000018a0  05 60 a0 c3 20 00 57 e3  06 60 a0 c3 40 00 57 e3  |.`.. .W..`..@.W.|
000018b0  07 60 a0 c3 80 00 57 e3  08 60 a0 c3 b8 68 0f e5  |.`....W..`...h..|
000018c0  ff 80 bd e8 3f 40 2d e9  64 20 a0 e3 95 02 00 e0  |....?@-.d ......|
000018d0  c4 48 1f e5 00 00 a0 e3  00 10 a0 e3 01 01 84 e7  |.H..............|
000018e0  01 10 81 e2 02 09 51 e3  fb ff ff ba 00 00 e0 e3  |......Q.........|
000018f0  00 00 8f e5 3f 80 bd e8  00 00 00 00 0c 10 1f e5  |....?...........|
00001900  00 00 51 e3 14 00 0f b5  0e f0 a0 b1 ff 40 2d e9  |..Q..........@-.|
00001910  04 49 1f e5 00 10 a0 e1  28 00 1f e5 2c 10 0f e5  |.I......(...,...|
00001920  05 00 50 e1 09 00 00 ba  80 60 85 e2 06 00 50 e1  |..P......`....P.|
00001930  06 00 00 aa 00 00 51 e1  04 00 00 0a 05 60 40 e0  |......Q......`@.|
00001940  06 65 84 e0 01 01 96 e7  01 00 80 e2 01 01 86 e7  |.e..............|
00001950  ff 80 bd e8 df 41 2d e9  4c 49 1f e5 80 70 a0 e3  |.....A-.LI...p..|
00001960  00 60 a0 e3 00 80 a0 e3  00 10 a0 e3 05 20 a0 e1  |.`........... ..|
00001970  00 30 a0 e3 01 01 94 e7  03 00 50 e1 01 20 a0 c1  |.0........P.. ..|
00001980  00 30 a0 c1 01 10 81 e2  01 0c 51 e3 f8 ff ff ba  |.0........Q.....|
00001990  00 00 a0 e3 02 01 84 e7  05 00 52 e1 01 80 a0 13  |..........R.....|
000019a0  06 20 ca e7 01 60 86 e2  05 00 56 e3 ed ff ff ba  |. ...`....V.....|
000019b0  01 10 a0 e3 08 00 a0 e1  7a 01 00 eb 01 00 58 e3  |........z.....X.|
000019c0  07 00 00 1a 00 60 a0 e3  06 00 da e7 08 10 a0 e3  |.....`..........|
000019d0  74 01 00 eb 01 60 86 e2  05 00 56 e3 f9 ff ff ba  |t....`....V.....|
000019e0  01 c0 8c e2 05 a0 8a e2  01 4b 84 e2 01 50 85 e2  |.........K...P..|
000019f0  01 70 57 e2 d9 ff ff 1a  80 00 55 e3 df 81 bd 08  |.pW.......U.....|
00001a00  01 b0 a0 e3 00 00 5c e3  01 b0 a0 c3 02 00 5c e3  |......\.......\.|
00001a10  02 b0 a0 c3 04 00 5c e3  03 b0 a0 c3 08 00 5c e3  |......\.......\.|
00001a20  04 b0 a0 c3 10 00 5c e3  05 b0 a0 c3 20 00 5c e3  |......\..... .\.|
00001a30  06 b0 a0 c3 40 00 5c e3  07 b0 a0 c3 80 00 5c e3  |....@.\.......\.|
00001a40  08 b0 a0 c3 40 ba 0f e5  df 81 bd e8 00 00 a0 e3  |....@...........|
00001a50  34 10 8f e2 07 20 a0 e3  04 00 81 e4 01 20 52 e2  |4.... ....... R.|
00001a60  fc ff ff 1a 00 00 e0 e3  24 00 8f e5 00 00 e0 e3  |........$.......|
00001a70  18 00 8f e5 be 1f 4f e2  04 00 81 e4 04 00 81 e4  |......O.........|
00001a80  0e f0 a0 e1 1c 20 8f e2  0e f0 a0 e1 00 00 00 00  |..... ..........|
00001a90  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00001aa0  00 00 00 00 00 00 00 00  29 0d 0e 38 05 cb 0d 0e  |........)..8....|
00001ab0  42 05 e1 0d 0e 4c 04 0d  0e 56 1a dd a4 70 61 72  |B....L...V...par|
00001ac0  28 74 24 2c 73 24 2c f8  20 69 25 29 3a ea 69 31  |(t$,s$,. i%):.i1|
00001ad0  25 0d 0e 60 1e 69 31 25  3d 69 25 2b 31 3a 69 25  |%..`.i1%=i%+1:i%|
00001ae0  3d a7 74 24 2b 73 24 2c  73 24 2c 69 31 25 29 0d  |=.t$+s$,s$,i1%).|
00001af0  0e 6a 14 3d c1 74 24 2c  69 31 25 2c 69 25 2d 69  |.j.=.t$,i1%,i%-i|
00001b00  31 25 29 0d 0e 74 04 0d  0e 7e 13 dd a4 63 72 6d  |1%)..t...~...crm|
00001b10  65 6e 75 28 6d 65 6e 75  24 29 0d 0e 88 2e e7 6d  |enu(menu$).....m|
00001b20  65 6e 75 66 72 65 65 25  2b 32 38 3e 6d 65 6e 75  |enufree%+28>menu|
00001b30  65 6e 64 25 85 39 39 2c  22 4d 65 6e 75 20 61 72  |end%.99,"Menu ar|
00001b40  65 61 20 66 75 6c 6c 22  0d 0e 92 08 ea 20 6d 25  |ea full"..... m%|
00001b50  0d 0e 9c 16 6d 65 6e 75  70 74 72 25 3d 6d 65 6e  |....menuptr%=men|
00001b60  75 66 72 65 65 25 0d 0e  a6 08 69 25 3d 30 0d 0e  |ufree%....i%=0..|
00001b70  b0 43 e7 20 c0 6d 65 6e  75 24 2c 31 29 3d 22 23  |.C. .menu$,1)="#|
00001b80  22 69 25 3d 31 3a 6d 65  6e 75 74 69 74 6c 65 24  |"i%=1:menutitle$|
00001b90  3d a4 70 61 72 28 6d 65  6e 75 24 2c 22 2c 22 2c  |=.par(menu$,",",|
00001ba0  69 25 29 8b 6d 65 6e 75  74 69 74 6c 65 24 3d 22  |i%).menutitle$="|
00001bb0  22 0d 0e ba 18 24 6d 65  6e 75 70 74 72 25 3d 6d  |"....$menuptr%=m|
00001bc0  65 6e 75 74 69 74 6c 65  24 0d 0e c4 3b 6d 65 6e  |enutitle$...;men|
00001bd0  75 70 74 72 25 3f 31 32  3d 37 3a 6d 65 6e 75 70  |uptr%?12=7:menup|
00001be0  74 72 25 3f 31 33 3d 32  3a 6d 65 6e 75 70 74 72  |tr%?13=2:menuptr|
00001bf0  25 3f 31 34 3d 37 3a 6d  65 6e 75 70 74 72 25 3f  |%?14=7:menuptr%?|
00001c00  31 35 3d 30 0d 0e ce 33  6d 65 6e 75 70 74 72 25  |15=0...3menuptr%|
00001c10  21 31 36 3d 31 39 36 2d  32 34 3a 6d 65 6e 75 70  |!16=196-24:menup|
00001c20  74 72 25 21 32 30 3d 34  30 3a 6d 65 6e 75 70 74  |tr%!20=40:menupt|
00001c30  72 25 21 32 34 3d 30 0d  0e d8 22 6d 65 6e 75 70  |r%!24=0..."menup|
00001c40  74 72 25 2b 3d 32 38 3a  6d 61 78 78 25 3d a9 6d  |tr%+=28:maxx%=.m|
00001c50  65 6e 75 74 69 74 6c 65  24 0d 0e e2 1d f5 69 74  |enutitle$.....it|
00001c60  65 6d 24 3d a4 70 61 72  28 6d 65 6e 75 24 2c 22  |em$=.par(menu$,"|
00001c70  2c 22 2c 69 25 29 0d 0e  ec 14 f2 6d 65 6e 75 69  |,",i%).....menui|
00001c80  74 65 6d 28 69 74 65 6d  24 29 0d 0e f6 0e fd 20  |tem(item$)..... |
00001c90  69 74 65 6d 24 3d 22 22  0d 0f 00 24 6d 25 3d 6d  |item$=""...$m%=m|
00001ca0  65 6e 75 66 72 65 65 25  3a 6d 25 21 31 36 3d 28  |enufree%:m%!16=(|
00001cb0  6d 61 78 78 25 2a 38 2b  36 29 2a 32 0d 0f 0a 16  |maxx%*8+6)*2....|
00001cc0  6d 65 6e 75 66 72 65 65  25 3d 6d 65 6e 75 70 74  |menufree%=menupt|
00001cd0  72 25 0d 0f 14 07 3d 6d  25 0d 0f 1e 04 0d 0f 28  |r%....=m%......(|
00001ce0  15 dd f2 6d 65 6e 75 69  74 65 6d 28 74 65 78 74  |...menuitem(text|
00001cf0  24 29 0d 0f 32 2e e7 74  65 78 74 24 3d 22 22 6d  |$)..2..text$=""m|
00001d00  65 6e 75 70 74 72 25 21  2d 32 34 3d 28 6d 65 6e  |enuptr%!-24=(men|
00001d10  75 70 74 72 25 21 2d 32  34 29 84 26 38 30 3a e1  |uptr%!-24).&80:.|
00001d20  0d 0f 3c 2e e7 6d 65 6e  75 70 74 72 25 2b 32 34  |..<..menuptr%+24|
00001d30  3e 6d 65 6e 75 65 6e 64  25 8c 85 39 39 2c 22 4d  |>menuend%..99,"M|
00001d40  65 6e 75 20 61 72 65 61  20 66 75 6c 6c 22 0d 0f  |enu area full"..|
00001d50  46 0c ea 69 25 2c 66 6c  67 25 0d 0f 50 0c 66 6c  |F..i%,flg%..P.fl|
00001d60  67 25 3d 26 30 30 0d 0f  5a 12 69 25 3d a7 74 65  |g%=&00..Z.i%=.te|
00001d70  78 74 24 2c 22 3e 22 29  0d 0f 64 3c e7 69 25 3e  |xt$,">")..d<.i%>|
00001d80  30 73 75 62 70 74 72 25  3d a0 c1 74 65 78 74 24  |0subptr%=..text$|
00001d90  2c 69 25 2b 31 29 3a 74  65 78 74 24 3d c0 74 65  |,i%+1):text$=.te|
00001da0  78 74 24 2c 69 25 2d 31  29 8b 73 75 62 70 74 72  |xt$,i%-1).subptr|
00001db0  25 3d 2d 31 0d 0f 6e 12  69 25 3d a7 74 65 78 74  |%=-1..n.i%=.text|
00001dc0  24 2c 22 7d 22 29 0d 0f  78 3b e7 69 25 3e 30 73  |$,"}")..x;.i%>0s|
00001dd0  75 62 70 74 72 25 3d a0  c1 74 65 78 74 24 2c 69  |ubptr%=..text$,i|
00001de0  25 2b 31 29 3a 74 65 78  74 24 3d c0 74 65 78 74  |%+1):text$=.text|
00001df0  24 2c 69 25 2d 31 29 3a  66 6c 67 25 2b 3d 26 30  |$,i%-1):flg%+=&0|
00001e00  38 0d 0f 82 29 e7 c2 74  65 78 74 24 2c 31 29 3d  |8...)..text$,1)=|
00001e10  22 23 22 74 65 78 74 24  3d c0 74 65 78 74 24 29  |"#"text$=.text$)|
00001e20  3a 66 6c 67 25 2b 3d 26  30 32 0d 0f 8c 3b 6d 65  |:flg%+=&02...;me|
00001e30  6e 75 70 74 72 25 21 30  3d 66 6c 67 25 3a 6d 65  |nuptr%!0=flg%:me|
00001e40  6e 75 70 74 72 25 21 34  3d 73 75 62 70 74 72 25  |nuptr%!4=subptr%|
00001e50  3a 6d 65 6e 75 70 74 72  25 21 38 3d 26 30 37 30  |:menuptr%!8=&070|
00001e60  30 30 30 32 31 0d 0f 96  13 e7 c0 74 65 78 74 24  |00021......text$|
00001e70  2c 31 29 3d 22 24 22 8c  0d 0f a0 32 21 6d 65 6e  |,1)="$"....2!men|
00001e80  75 70 74 72 25 2b 3d 26  30 34 3a 6d 65 6e 75 70  |uptr%+=&04:menup|
00001e90  74 72 25 21 38 2b 3d 26  31 30 30 3a 69 25 3d a7  |tr%!8+=&100:i%=.|
00001ea0  74 65 78 74 24 2c 22 28  22 29 0d 0f aa 33 e7 69  |text$,"(")...3.i|
00001eb0  25 3e 30 8c 4c 25 3d bb  c1 74 65 78 74 24 2c 69  |%>0.L%=..text$,i|
00001ec0  25 2b 31 29 3a 74 65 78  74 24 3d c0 74 65 78 74  |%+1):text$=.text|
00001ed0  24 2c 69 25 2d 31 29 8b  4c 25 3d 31 32 0d 0f b4  |$,i%-1).L%=12...|
00001ee0  38 6d 65 6e 75 70 74 72  25 21 31 32 3d a0 c1 74  |8menuptr%!12=..t|
00001ef0  65 78 74 24 2c 32 29 3a  6d 65 6e 75 70 74 72 25  |ext$,2):menuptr%|
00001f00  21 31 36 3d 2d 31 3a 6d  65 6e 75 70 74 72 25 21  |!16=-1:menuptr%!|
00001f10  32 30 3d 4c 25 0d 0f be  12 74 65 78 74 24 3d c4  |20=L%....text$=.|
00001f20  4c 25 2c 22 20 22 29 0d  0f c8 05 cc 0d 0f d2 10  |L%," ").........|
00001f30  e7 a9 74 65 78 74 24 3c  3d 31 32 8c 0d 0f dc 18  |..text$<=12.....|
00001f40  24 28 6d 65 6e 75 70 74  72 25 2b 31 32 29 3d 74  |$(menuptr%+12)=t|
00001f50  65 78 74 24 0d 0f e6 05  cc 0d 0f f0 25 49 25 3d  |ext$........%I%=|
00001f60  a4 77 6f 72 6b 73 70 61  63 65 28 a9 74 65 78 74  |.workspace(.text|
00001f70  24 2b 31 29 3a 24 49 25  3d 74 65 78 74 24 0d 0f  |$+1):$I%=text$..|
00001f80  fa 36 6d 65 6e 75 70 74  72 25 21 31 32 3d 49 25  |.6menuptr%!12=I%|
00001f90  3a 6d 65 6e 75 70 74 72  25 21 31 36 3d 2d 31 3a  |:menuptr%!16=-1:|
00001fa0  6d 65 6e 75 70 74 72 25  03 40 2d e9 0f 00 00 eb  |menuptr%.@-.....|
00001fb0  a0 00 a0 e1 01 10 51 e2  fb ff ff 1a 03 80 bd e8  |......Q.........|
00001fc0  0e 40 2d e9 00 30 a0 e3  00 20 a0 e3 22 00 00 eb  |.@-..0... .."...|
00001fd0  10 23 82 e1 01 30 83 e2  01 00 53 e1 fa ff ff 1a  |.#...0....S.....|
00001fe0  02 00 a0 e1 00 00 8f e5  0e 80 bd e8 00 00 00 00  |................|
00001ff0  1f 40 2d e9 28 16 9f e5  01 00 00 e2 01 00 50 e3  |.@-.(.........P.|
00002000  06 00 00 1a 81 01 00 eb  a1 32 a0 e1 03 21 82 e0  |.........2...!..|
00002010  00 40 92 e5 1f 30 01 e2  10 43 84 e1 00 40 82 e5  |.@...0...C...@..|
00002020  01 10 81 e2 f8 15 8f e5  01 09 51 e3 2d 00 00 ab  |..........Q.-...|
00002030  1f 80 bd e8 03 40 2d e9  e4 15 9f e5 01 10 81 e2  |.....@-.........|
00002040  07 00 01 e2 00 00 50 e3  03 80 bd 08 07 10 c1 e3  |......P.........|
00002050  07 10 81 e2 c8 15 8f e5  03 80 bd e8 1e 40 2d e9  |.............@-.|
00002060  bc 15 9f e5 01 10 81 e2  1c 03 9f e5 02 00 50 e3  |..............P.|
00002070  07 00 00 0a 01 09 51 e3  05 00 00 1a 04 00 a0 e3  |......Q.........|
00002080  80 13 9f e5 61 01 00 eb  02 3b a0 e3 0c 00 00 ef  |....a....;......|
00002090  00 10 a0 e3 01 00 a0 e3  84 15 8f e5 5b 01 00 eb  |............[...|
000020a0  a1 32 a0 e1 03 21 82 e0  00 40 92 e5 1f 30 01 e2  |.2...!...@...0..|
000020b0  10 03 a0 e1 00 00 04 e0  00 00 50 e3 01 00 a0 13  |..........P.....|
000020c0  1e 80 bd e8 07 40 2d e9  00 00 a0 e3 02 1c a0 e3  |.....@-.........|
000020d0  4e 01 00 eb 04 00 82 e4  01 10 51 e2 fc ff ff 1a  |N.........Q.....|
000020e0  3c 05 8f e5 07 80 bd e8  0f 40 2d e9 98 02 9f e5  |<........@-.....|
000020f0  02 00 50 e3 00 10 a0 03  24 15 8f 05 0f 80 bd 08  |..P.....$.......|
00002100  1c 35 9f e5 00 00 53 e3  0f 80 bd 08 07 00 03 e2  |.5....S.........|
00002110  a3 31 a0 e1 00 00 50 e3  01 30 83 12 02 00 a0 e3  |.1....P..0......|
00002120  e0 12 9f e5 39 01 00 eb  0c 00 02 ef 55 00 00 6a  |....9.......U..j|
00002130  e3 ff ff eb 0f 80 bd e8  4c 02 9f e5 02 00 50 e3  |........L.....P.|
00002140  0e f0 a0 01 00 00 50 e3  bc 02 9f 15 00 00 50 13  |......P.......P.|
00002150  09 00 00 1a 00 40 2d e9  d9 ff ff eb 80 00 a0 e3  |.....@-.........|
00002160  aa 1f 8f e2 0d 00 00 ef  98 02 8f e5 18 12 9f e5  |................|
00002170  00 00 51 e3 90 02 8f 15  00 80 bd e8 00 40 2d e9  |..Q..........@-.|
00002180  cf ff ff eb c0 00 a0 e3  0a 1d 8f e2 0d 00 00 ef  |................|
00002190  70 02 8f e5 70 02 8f e5  02 00 a0 e3 64 12 9f e5  |p...p.......d...|
000021a0  09 00 00 ef 01 00 a0 e3  58 12 9f e5 09 00 00 ef  |........X.......|
000021b0  00 80 bd e8 00 40 2d e9  cc 11 9f e5 02 00 51 e3  |.....@-.......Q.|
000021c0  1a 00 00 0a 00 00 51 e3  3c 12 9f 15 00 00 51 13  |......Q.<.....Q.|
000021d0  30 12 8f 15 15 00 00 1a  01 19 a0 e3 01 10 41 e2  |0.............A.|
000021e0  3c 14 8f e5 40 00 a0 e3  22 1e 8f e2 0d 00 00 ef  |<...@...".......|
000021f0  00 00 50 e3 14 00 8f 02  2b 00 00 0f 88 11 9f e5  |..P.....+.......|
00002200  00 00 51 e3 00 02 8f 15  f8 01 8f e5 00 80 bd e8  |..Q.............|
00002210  63 00 00 00 43 6f 6d 70  61 63 74 6f 72 20 3a 20  |c...Compactor : |
00002220  46 69 6c 65 20 6e 6f 74  20 66 6f 75 6e 64 00 73  |File not found.s|
00002230  7f ff ff eb 00 80 bd e8  00 40 2d e9 a9 ff ff eb  |.........@-.....|
00002240  04 00 00 eb 00 80 bd e8  3c 11 9f e5 00 00 51 e3  |........<.....Q.|
00002250  00 00 00 0a 0e f0 a0 e1  2c 11 9f e5 02 00 51 e3  |........,.....Q.|
00002260  0e f0 a0 01 01 40 2d e9  00 00 a0 e3 94 11 9f e5  |.....@-.........|
00002270  0d 00 00 ef 01 80 bd e8  00 40 2d e9 f5 ff ff eb  |.........@-.....|
00002280  2b 00 00 ef 00 80 bd e8  00 40 2d e9 01 00 2d e9  |+........@-...-.|
00002290  f0 ff ff eb 06 00 a0 e3  17 1e 8f e2 08 00 00 ef  |................|
000022a0  01 00 bd e8 2b 00 00 ef  00 80 bd e8 d8 10 9f e5  |....+...........|
000022b0  02 00 51 e3 0e f0 a0 01  00 40 2d e9 12 00 a0 e3  |..Q......@-.....|
000022c0  52 1f 8f e2 08 00 00 ef  00 80 bd e8 00 40 a0 e3  |R............@..|
000022d0  b4 40 8f e5 4d 3f 8f e2  01 40 d0 e4 01 40 c3 e4  |.@..M?...@...@..|
000022e0  00 00 54 e3 0a 00 54 13  0d 00 54 13 20 00 54 13  |..T...T...T. .T.|
000022f0  f8 ff ff 1a 0d 40 a0 e3  01 40 43 e5 43 3f 8f e2  |.....@...@C.C?..|
00002300  01 40 d3 e5 0d 00 54 e3  0e f0 a0 11 00 40 d3 e5  |.@....T......@..|
00002310  24 00 54 e3 40 00 54 13  0e f0 a0 11 24 00 54 e3  |$.T.@.T.....$.T.|
00002320  dc 40 9f 15 00 00 54 13  02 40 a0 13 58 40 8f 15  |.@....T..@..X@..|
00002330  0e f0 a0 11 4c 40 9f e5  00 00 54 e3 0e f0 a0 01  |....L@....T.....|
00002340  00 40 d3 e5 24 00 54 e3  01 40 d3 05 0d 00 54 03  |.@..$.T..@....T.|
00002350  0e f0 a0 11 6d 5f 8f e2  01 40 d5 e4 01 40 c3 e4  |....m_...@...@..|
00002360  00 00 54 e3 0a 00 54 13  0d 00 54 13 20 00 54 13  |..T...T...T. .T.|
00002370  f8 ff ff 1a 0d 40 a0 e3  01 40 43 e5 01 40 a0 e3  |.....@...@C..@..|
00002380  04 40 8f e5 0e f0 a0 e1  00 00 00 00 00 00 00 00  |.@..............|
00002390  00 40 2d e9 5d 3f 8f e2  01 10 d0 e4 01 10 c3 e4  |.@-.]?..........|
000023a0  00 00 51 e3 0a 00 51 13  0d 00 51 13 20 00 51 13  |..Q...Q...Q. .Q.|
000023b0  f8 ff ff 1a 01 00 a0 e3  38 00 0f e5 00 00 a0 e3  |........8.......|
000023c0  44 00 8f e5 00 80 bd e8  01 40 2d e9 00 00 a0 e3  |D........@-.....|
000023d0  34 10 9f e5 0d 00 00 ef  00 00 a0 e3 5c 00 0f e5  |4...........\...|
000023e0  00 00 a0 e3 20 00 8f e5  01 80 bd e8 10 20 8f e5  |.... ........ ..|
000023f0  00 00 52 e3 0e f0 a0 01  00 10 e0 e3 20 12 8f e5  |..R......... ...|
00002400  0e f0 a0 e1 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00002410  68 25 3c 6d 65 6e 75 73  74 61 72 74 25 84 6d 68  |h%<menustart%.mh|
00002420  25 3e 6d 65 6e 75 65 6e  64 25 3a e1 0d 12 ac 05  |%>menuend%:.....|
00002430  f5 0d 12 b6 22 21 49 25  3d 21 49 25 80 ac 31 3a  |...."!I%=!I%..1:|
00002440  49 25 21 38 3d 49 25 21  38 80 ac 26 34 30 30 30  |I%!8=I%!8..&4000|
00002450  30 30 3a 0d 12 c0 16 49  25 2b 3d 32 34 3a fd 49  |00:....I%+=24:.I|
00002460  25 21 2d 32 34 80 26 38  30 0d 12 ca 05 e1 0d 12  |%!-24.&80.......|
00002470  d4 04 0d 12 de 13 dd f2  73 68 61 64 65 28 6d 68  |........shade(mh|
00002480  25 2c 49 25 29 0d 12 e8  2f 6d 68 25 21 28 32 38  |%,I%).../mh%!(28|
00002490  2b 38 2b 32 34 2a 49 25  29 3d 6d 68 25 21 28 32  |+8+24*I%)=mh%!(2|
000024a0  38 2b 38 2b 32 34 2a 49  25 29 84 26 34 30 30 30  |8+8+24*I%).&4000|
000024b0  30 30 3a e1 0d 12 f2 04  0d 12 fc 12 dd f2 74 69  |00:...........ti|
000024c0  63 6b 28 6d 68 25 2c 49  25 29 0d 13 06 27 6d 68  |ck(mh%,I%)...'mh|
000024d0  25 21 28 32 38 2b 32 34  2a 49 25 29 3d 6d 68 25  |%!(28+24*I%)=mh%|
000024e0  21 28 32 38 2b 32 34 2a  49 25 29 84 26 30 31 3a  |!(28+24*I%).&01:|
000024f0  e1 0d 13 10 04 0d 13 1a  0d dd a4 63 6f 6d 6d 61  |...........comma|
00002500  6e 64 0d 13 24 0d ea 54  25 2c 49 25 2c 54 24 0d  |nd..$..T%,I%,T$.|
00002510  13 2e 16 c8 99 22 4f 53  5f 47 65 74 45 6e 76 22  |....."OS_GetEnv"|
00002520  20 b8 20 54 24 0d 13 38  0e f2 73 74 72 69 70 28  | . T$..8..strip(|
00002530  54 24 29 0d 13 42 07 3d  54 24 0d 13 4c 04 0d 13  |T$)..B.=T$..L...|
00002540  56 0b dd a4 70 61 72 61  6d 0d 13 60 16 ea 49 25  |V...param..`..I%|
00002550  2c 54 24 3a 54 24 3d a4  63 6f 6d 6d 61 6e 64 0d  |,T$:T$=.command.|
00002560  13 6a 1f 49 25 3d a7 54  24 2c 22 20 2d 71 75 69  |.j.I%=.T$," -qui|
00002570  74 20 22 29 3a e7 49 25  3d 30 3a 3d 22 22 0d 13  |t "):.I%=0:=""..|
00002580  74 1b 54 24 3d c1 54 24  2c 49 25 2b 37 29 3a f2  |t.T$=.T$,I%+7):.|
00002590  73 74 72 69 70 28 54 24  29 0d 13 7e 31 49 25 3d  |strip(T$)..~1I%=|
000025a0  a7 54 24 2c 22 20 22 29  3a e7 49 25 3e 30 54 24  |.T$," "):.I%>0T$|
000025b0  3d c1 54 24 2c 49 25 2b  31 29 3a f2 73 74 72 69  |=.T$,I%+1):.stri|
000025c0  70 28 54 24 29 3a 8b 3d  22 22 0d 13 88 2c 49 25  |p(T$):.=""...,I%|
000025d0  3d a7 54 24 2c 22 20 22  29 3a e7 49 25 3e 30 54  |=.T$," "):.I%>0T|
000025e0  24 3d c0 54 24 2c 49 25  2d 31 29 3a f2 73 74 72  |$=.T$,I%-1):.str|
000025f0  69 70 28 54 24 29 0d 13  92 07 3d 54 24 0d 13 9c  |ip(T$)....=T$...|
00002600  04 0d 13 a6 12 dd a4 66  69 6c 65 74 79 70 65 28  |.......filetype(|
00002610  8c 22 1f e5 02 00 52 e3  1c 22 1f 05 04 20 8f 12  |."....R.."... ..|
00002620  0e f0 a0 e1 00 00 00 00  65 22 2c 35 2c 54 24 20  |........e",5,T$ |
00002630  b8 55 25 2c 2c 54 25 0d  13 ba 0d e7 54 25 3d 30  |.U%,,T%.....T%=0|
00002640  3a 3d 2d 31 0d 13 c4 13  3d 28 54 25 80 26 46 46  |:=-1....=(T%.&FF|
00002650  46 30 30 29 3e 3e 38 0d  13 ce 05 20 0d 13 d8 0f  |F00)>>8.... ....|
00002660  dd f2 77 61 69 74 70 6f  69 6e 74 0d 13 e2 0e e7  |..waitpoint.....|
00002670  20 6f 73 25 3c 3e 32 20  e1 0d 13 ec 0e 77 61 69  | os%<>2 .....wai|
00002680  74 65 72 25 2b 3d 31 0d  13 f6 14 c8 99 22 48 6f  |ter%+=1......"Ho|
00002690  75 72 67 6c 61 73 73 5f  4f 6e 22 0d 14 00 05 e1  |urglass_On".....|
000026a0  0d 14 0a 04 0d 14 14 0f  dd f2 6e 6f 72 6d 70 6f  |..........normpo|
000026b0  69 6e 74 0d 14 1e 0e e7  20 6f 73 25 3c 3e 32 20  |int..... os%<>2 |
000026c0  e1 0d 14 28 38 c8 95 77  61 69 74 65 72 25 3e 30  |...(8..waiter%>0|
000026d0  3a c8 99 22 48 6f 75 72  67 6c 61 73 73 5f 4f 66  |:.."Hourglass_Of|
000026e0  66 22 3a 77 61 69 74 65  72 25 2d 3d 31 3a ce 3a  |f":waiter%-=1:.:|
000026f0  77 61 69 74 65 72 25 3d  30 0d 14 32 05 e1 0d 14  |waiter%=0..2....|
00002700  3c 04 0d 14 46 0a dd f2  68 65 6c 70 0d 14 50 05  |<...F...help..P.|
00002710  e1 0d 14 5a 04 0d 14 64  11 dd f2 64 61 74 61 6c  |...Z...d...datal|
00002720  6f 61 64 61 63 6b 0d 14  6e 1e 71 25 21 30 3d 32  |oadack..n.q%!0=2|
00002730  30 3a 71 25 21 31 32 3d  72 65 66 25 3a 71 25 21  |0:q%!12=ref%:q%!|
00002740  31 36 3d 34 0d 14 78 24  c8 99 22 57 69 6d 70 5f  |16=4..x$.."Wimp_|
00002750  53 65 6e 64 4d 65 73 73  61 67 65 22 2c 31 37 2c  |SendMessage",17,|
00002760  71 25 2c 74 61 73 6b 25  0d 14 82 05 e1 0d 14 8c  |q%,task%........|
00002770  04 0d 14 96 11 dd f2 64  61 74 61 73 61 76 65 61  |.......datasavea|
00002780  63 6b 0d 14 a0 3c e7 a4  41 72 66 56 61 72 28 22  |ck...<..ArfVar("|
00002790  57 69 6d 70 24 53 63 72  61 70 22 29 3d 22 22 3a  |Wimp$Scrap")="":|
000027a0  85 39 39 2c 22 3c 57 69  6d 70 24 53 63 72 61 70  |.99,"<Wimp$Scrap|
000027b0  3e 20 6e 6f 74 20 64 65  66 69 6e 65 64 22 0d 14  |> not defined"..|
000027c0  aa 41 21 71 25 3d 36 30  3a 71 25 21 31 32 3d 72  |.A!q%=60:q%!12=r|
000027d0  65 66 25 3a 71 25 21 31  36 3d 32 3a 71 25 21 33  |ef%:q%!16=2:q%!3|
000027e0  36 3d 2d 31 3a 24 28 71  25 2b 34 34 29 3d 22 3c  |6=-1:$(q%+44)="<|
000027f0  57 69 6d 70 24 53 63 72  61 70 3e 22 2b bd 30 0d  |Wimp$Scrap>"+.0.|
00002800  14 b4 31 c8 99 22 57 69  6d 70 5f 53 65 6e 64 4d  |..1.."Wimp_SendM|
00002810  65 73 73 61 67 65 22 2c  31 37 2c 71 25 2c 74 61  |essage",17,q%,ta|
00002820  73 6b 25 3a 61 63 6b 72  65 66 25 3d 71 25 21 38  |sk%:ackref%=q%!8|
00002830  0d 14 be 05 e1 0d 14 c8  04 0d 14 d2 1a dd f2 73  |...............s|
00002840  61 76 65 72 65 71 28 54  24 2c 74 25 2c 73 25 2c  |avereq(T$,t%,s%,|
00002850  72 25 29 0d 14 dc 12 73  61 76 65 72 65 61 73 6f  |r%)....savereaso|
00002860  6e 25 3d 72 25 0d 14 e6  2b 71 25 21 33 32 3d 6d  |n%=r%...+q%!32=m|
00002870  79 25 3a 71 25 21 32 38  3d 6d 78 25 3a 71 25 21  |y%:q%!28=mx%:q%!|
00002880  32 34 3d 6d 69 25 3a 71  25 21 32 30 3d 6d 68 25  |24=mi%:q%!20=mh%|
00002890  0d 14 f0 2c 71 25 21 31  36 3d 31 3a 71 25 21 31  |...,q%!16=1:q%!1|
000028a0  32 3d 30 3a 71 25 21 33  36 3d 73 25 3a 71 25 21  |2=0:q%!36=s%:q%!|
000028b0  34 30 3d 74 25 3a 21 71  25 3d 36 30 0d 14 fa 39  |40=t%:!q%=60...9|
000028c0  24 28 71 25 2b 34 34 29  3d 54 24 2b bd 30 3a c8  |$(q%+44)=T$+.0:.|
000028d0  99 22 57 69 6d 70 5f 53  65 6e 64 4d 65 73 73 61  |."Wimp_SendMessa|
000028e0  67 65 22 2c 31 37 2c 71  25 2c 71 25 21 32 30 2c  |ge",17,q%,q%!20,|
000028f0  71 25 21 32 34 0d 15 04  13 73 61 76 65 72 65 66  |q%!24....saveref|
00002900  25 3d 71 25 21 38 3a e1  0d 15 0e 04 0d 15 18 0e  |%=q%!8:.........|
00002910  dd f2 6c 6f 61 64 6d 65  73 73 0d 15 22 1c 24 28  |..loadmess..".$(|
00002920  71 25 2b 34 34 29 3d 66  69 6c 65 24 2b bd 30 3a  |q%+44)=file$+.0:|
00002930  21 71 25 3d 36 30 0d 15  2c 37 71 25 21 31 32 3d  |!q%=60..,7q%!12=|
00002940  72 65 66 25 3a 71 25 21  31 36 3d 33 3a c8 99 22  |ref%:q%!16=3:.."|
00002950  57 69 6d 70 5f 53 65 6e  64 4d 65 73 73 61 67 65  |Wimp_SendMessage|
00002960  22 2c 31 37 2c 71 25 2c  74 61 73 6b 25 0d 15 36  |",17,q%,task%..6|
00002970  13 61 63 6b 70 65 6e 64  69 6e 67 25 3d b9 3a e1  |.ackpending%=.:.|
00002980  0d 15 40 05 20 0d 15 4a  17 dd a4 7a 74 73 28 54  |..@. ..J...zts(T|
00002990  25 29 3a ea 54 24 3a 54  24 3d 22 22 0d 15 54 1d  |%):.T$:T$=""..T.|
000029a0  c8 95 3f 54 25 3c 3e 30  3a 54 24 2b 3d bd 3f 54  |..?T%<>0:T$+=.?T|
000029b0  25 3a 54 25 2b 3d 31 3a  ce 0d 15 5e 07 3d 54 24  |%:T%+=1:...^.=T$|
000029c0  0d 15 68 04 0d 15 72 2b  dd f2 67 65 74 63 74 3a  |..h...r+..getct:|
000029d0  c8 99 22 57 69 6d 70 5f  47 65 74 43 61 72 65 74  |.."Wimp_GetCaret|
000029e0  50 6f 73 69 74 69 6f 6e  22 2c 2c 71 25 3a e1 0d  |Position",,q%:..|
000029f0  15 7c 04 0d 15 86 3e dd  f2 73 65 74 63 74 28 68  |.|....>..setct(h|
00002a00  25 2c 69 25 2c 6f 25 29  3a c8 99 20 22 57 69 6d  |%,i%,o%):.. "Wim|
00002a10  70 5f 53 65 74 43 61 72  65 74 50 6f 73 69 74 69  |p_SetCaretPositi|
00002a20  6f 6e 22 2c 68 25 2c 69  25 2c 2c 2c 2d 31 2c 6f  |on",h%,i%,,,-1,o|
00002a30  25 0d 15 90 05 e1 0d 15  9a 04 0d 15 a4 0e dd a4  |%...............|
00002a40  6c 65 61 66 28 54 24 29  0d 15 ae 0a ea 49 25 2c  |leaf(T$).....I%,|
00002a50  43 25 0d 15 b8 24 e7 28  28 a7 54 24 2c 22 2e 22  |C%...$.((.T$,"."|
00002a60  29 3d 30 29 80 28 a7 54  24 2c 22 3a 22 29 3d 30  |)=0).(.T$,":")=0|
00002a70  29 29 8c 3d 54 24 0d 15  c2 0c 49 25 3d a9 28 54  |)).=T$....I%=.(T|
00002a80  24 29 0d 15 cc 05 f5 0d  15 d6 11 43 25 3d 97 c1  |$).........C%=..|
00002a90  54 24 2c 49 25 2c 31 29  0d 15 e0 09 49 25 2d 3d  |T$,I%,1)....I%-=|
00002aa0  31 0d 15 ea 1c fd 28 49  25 3c 3d 30 84 43 25 3d  |1.....(I%<=0.C%=|
00002ab0  97 22 2e 22 84 43 25 3d  97 22 3a 22 29 0d 15 f4  |.".".C%=.":")...|
00002ac0  1a e7 49 25 3e 30 8c 3d  c2 54 24 2c a9 28 54 24  |..I%>0.=.T$,.(T$|
00002ad0  29 2d 49 25 2d 31 29 0d  15 fe 07 3d 54 24 0d 16  |)-I%-1)....=T$..|
00002ae0  08 04 0d 16 12 0b dd f2  73 63 72 73 7a 0d 16 1c  |........scrsz...|
00002af0  48 21 77 6f 72 6b 62 75  66 25 3d 34 3a 77 6f 72  |H!workbuf%=4:wor|
00002b00  6b 62 75 66 25 21 34 3d  35 3a 77 6f 72 6b 62 75  |kbuf%!4=5:workbu|
00002b10  66 25 21 38 3d 31 31 3a  77 6f 72 6b 62 75 66 25  |f%!8=11:workbuf%|
00002b20  21 31 32 3d 31 32 3a 77  6f 72 6b 62 75 66 25 21  |!12=12:workbuf%!|
00002b30  31 36 3d 2d 31 0d 16 26  31 c8 99 20 22 4f 53 5f  |16=-1..&1.. "OS_|
00002b40  52 65 61 64 56 64 75 56  61 72 69 61 62 6c 65 73  |ReadVduVariables|
00002b50  22 2c 77 6f 72 6b 62 75  66 25 2c 77 6f 72 6b 62  |",workbuf%,workb|
00002b60  75 66 25 2b 32 34 0d 16  30 49 71 25 21 33 32 3d  |uf%+24..0Iq%!32=|
00002b70  28 77 6f 72 6b 62 75 66  25 21 33 32 29 3c 3c 28  |(workbuf%!32)<<(|
00002b80  77 6f 72 6b 62 75 66 25  21 32 34 29 3a 71 25 21  |workbuf%!24):q%!|
00002b90  33 36 3d 28 77 6f 72 6b  62 75 66 25 21 33 36 29  |36=(workbuf%!36)|
00002ba0  3c 3c 28 77 6f 72 6b 62  75 66 25 21 32 38 29 0d  |<<(workbuf%!28).|
00002bb0  16 3a 05 e1 0d 16 44 04  0d 16 4e 1a dd f2 73 61  |.:....D...N...sa|
00002bc0  76 65 73 65 74 28 66 24  2c 54 25 2c 72 25 2c 73  |veset(f$,T%,r%,s|
00002bd0  25 29 0d 16 58 30 73 61  76 65 72 65 61 73 6f 6e  |%)..X0savereason|
00002be0  25 3d 72 25 3a 73 61 76  65 66 24 3d 66 24 3a 73  |%=r%:savef$=f$:s|
00002bf0  61 76 65 74 25 3d 54 25  3a 73 61 76 65 73 25 3d  |avet%=T%:saves%=|
00002c00  73 25 0d 16 62 3e f2 73  65 74 69 28 77 5f 73 61  |s%..b>.seti(w_sa|
00002c10  76 65 25 2c 32 2c 66 24  29 3a 24 a4 76 61 28 77  |ve%,2,f$):$.va(w|
00002c20  5f 73 61 76 65 25 2c 33  29 3d 22 73 66 69 6c 65  |_save%,3)="sfile|
00002c30  5f 22 2b c2 22 30 30 22  2b c3 7e 54 25 2c 33 29  |_"+."00"+.~T%,3)|
00002c40  0d 16 6c 05 e1 0d 16 76  04 0d 16 80 15 dd f2 64  |..l....v.......d|
00002c50  72 61 67 69 63 6f 6e 28  68 25 2c 69 25 29 0d 16  |ragicon(h%,i%)..|
00002c60  8a 0e ea 78 25 2c 79 25  2c 79 73 25 0d 16 94 2c  |...x%,y%,ys%...,|
00002c70  f2 67 65 74 77 28 68 25  29 3a 79 73 25 3d 79 31  |.getw(h%):ys%=y1|
00002c80  25 2d 79 30 25 3a 78 25  3d 62 78 25 3a 79 25 3d  |%-y0%:x%=bx%:y%=|
00002c90  79 30 25 2d 73 63 79 25  0d 16 9e 31 f2 67 65 74  |y0%-scy%...1.get|
00002ca0  69 28 68 25 2c 69 25 29  3a 71 25 21 38 2b 3d 78  |i(h%,i%):q%!8+=x|
00002cb0  25 3a 71 25 21 31 32 2b  3d 79 25 2b 79 73 25 3a  |%:q%!12+=y%+ys%:|
00002cc0  71 25 21 31 36 2b 3d 78  25 0d 16 a8 30 71 25 21  |q%!16+=x%...0q%!|
00002cd0  32 30 2b 3d 79 25 2b 79  73 25 3a 71 25 21 32 34  |20+=y%+ys%:q%!24|
00002ce0  3d 30 3a 71 25 21 32 38  3d 30 3a 21 71 25 3d 30  |=0:q%!28=0:!q%=0|
00002cf0  3a f2 64 72 61 67 35 3a  e1 0d 16 b2 04 0d 16 bc  |:.drag5:........|
00002d00  1f dd f2 64 72 61 67 35  3a f2 72 65 61 64 70 6f  |...drag5:.readpo|
00002d10  69 6e 74 65 72 3a f2 73  63 72 73 7a 0d 16 c6 46  |inter:.scrsz...F|
00002d20  71 25 21 32 34 2d 3d 6d  78 25 2d 71 25 21 38 3a  |q%!24-=mx%-q%!8:|
00002d30  71 25 21 32 38 2d 3d 6d  79 25 2d 71 25 21 31 32  |q%!28-=my%-q%!12|
00002d40  3a 71 25 21 33 32 2b 3d  71 25 21 31 36 2d 6d 78  |:q%!32+=q%!16-mx|
00002d50  25 3a 71 25 21 33 36 2b  3d 71 25 21 32 30 2d 6d  |%:q%!36+=q%!20-m|
00002d60  79 25 0d 16 d0 21 71 25  21 34 3d 35 3a c8 99 22  |y%...!q%!4=5:.."|
00002d70  57 69 6d 70 5f 44 72 61  67 42 6f 78 22 2c 2c 71  |Wimp_DragBox",,q|
00002d80  25 3a e1 0d 16 da 04 0d  16 e4 0e dd f2 73 61 76  |%:...........sav|
00002d90  65 64 61 74 61 0d 16 ee  16 e7 71 25 21 31 32 3c  |edata.....q%!12<|
00002da0  3e 73 61 76 65 72 65 66  25 3a e1 0d 16 f8 15 66  |>saveref%:.....f|
00002db0  69 6c 65 24 3d a4 7a 74  73 28 71 25 2b 34 34 29  |ile$=.zts(q%+44)|
00002dc0  0d 17 02 0e f2 73 61 76  65 64 61 74 61 31 0d 17  |.....savedata1..|
00002dd0  0c 05 e1 0d 17 16 04 0d  17 20 20 dd f2 73 61 76  |.........  ..sav|
00002de0  65 64 61 74 61 31 3a f2  63 6c 6f 73 65 77 28 77  |edata1:.closew(w|
00002df0  5f 73 61 76 65 25 29 0d  17 2a 20 f2 73 61 76 65  |_save%)..* .save|
00002e00  66 69 6c 65 28 73 61 76  65 72 65 61 73 6f 6e 25  |file(savereason%|
00002e10  2c 66 69 6c 65 24 29 0d  17 34 1c 73 61 76 65 72  |,file$)..4.saver|
00002e20  65 61 73 6f 6e 25 3d 2d                           |eason%=-|
00002e28

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .