� > !RunImage
5�   !MakeSpray allows the creation of SprayFiles.
�   The Flying Pig!
(�   11th April 1994.
2:
<MaxSize%=500
F:
P
笤mode �
Z
�assemble
d	�15:�
n�170Ȝ0
x
�code%
��28,0,5,79,0
�
�spray
��
�:
�
ݤmode
�A�:���"I need at least 160k of screen memory. Sorry!"':��:=�
��15
��
�6�"!MakeSpray application for creating SprayFiles."
�+�'"11th April 1994."''"The Flying Pig!"
���
�=�
�:

��assemble

3�code%34000,record%MaxSize%*1024,sprites%&10032

2ș"OS_File",&FF,"<Obey$Dir>.SprayCode",code%,0

"fade=code%+112

,choose=code%+40

6x=code%+324

@y=code%+328

Jpos=code%+332

Tdots=code%+336

^newcol=code%+337

hsize=code%+338

rvduout=code%+320

|!pos=record%+256

�gcol%=63:tint%=255:w%=7

�gcol2%=0:tint2%=0

�scol%=255:acol%=0

�$record%="Untitled"+�(0)

�#$(record%+128)="Anonymous"+�(0)

�name$="SprayFile"

�!sprites%=&10032

�sprites%!4=0

�sprites%!8=16

�sprites%!12=16

�5ș"OS_SpriteOp",266,sprites%,"<Obey$Dir>.Sprites"

��

�:
��spray
*POINTER 1
�
&ȗX%,Y%,Z%
0�Z%=2�newcolour:�0
:�Z%�
D�=0
N�Z%<>w%�col
X	!x=X%
b	!y=Y%
l	�fade
v�<1���>=1
��
���
��
�:
���newcolour
�9ș"OS_SpriteOp",272,sprites%,"Back",0,0,832,1280,1024
��drawtools
�olddots%=?dots
�oldsize%=?size
�oldgcol%=?newcol
�ș"OS_Byte",15,1
�break%=�
��ȗX%,Y%,Z%:�Z%=0
�ȗX%,Y%,Z%

�Z%�5�
 �click(0,0,1280,832)�choose
 "�click(24,862,536,992)�choose
*#�click(564,930,728,994)�choose
49�click(838,932,944,994)?dots=255:?size=30:�drawtools
>$�click(572,872,940,888)�density
H$�click(1078,844,1238,1004)�size
R!�click(744,932,828,994)�menu
\�
f	�Z%�2
p/ș"OS_SpriteOp",290,sprites%,"Back",0,832,0
z�ȗX%,Y%,Z%:�Z%=0
�A�olddots%<>?dots �oldsize%<>?size �oldgcol%<>?newcol �altered
��
�:
���drawtools
�0ș"OS_SpriteOp",290,sprites%,"Panel",0,832,0
��gcol%Ȝtint%
�ȓȐ972,872,42,114
��gcol2%Ȝtint2%
�ȓȐ1012,872,42,114
��?size<23�
�
�42Ȝ0
�ȓȐ1078,844,164
�
�2Ȝ64
ȏȐ1160,928,((?size)-1)*4
�
�?dots<>255�
$�21Ȝ192
.ȓȐ572,872,368,16
8
�2Ȝ64
BȓȐ572,872,?dots*2,16
L�
V�
`:
j��choose
t
�Z%�4�
~!gcol%=�X%,Y%):tint%=Ȝ(X%,Y%)
��gcol%Ȝtint%
�ȓȐ972,872,42,114
�4scol%=?((!vduout)+(640*255)-�(Y%/4)*640+�(X%/2))
�?newcol=scol%
��choose
��
�
�Z%�1�
�#gcol2%=�X%,Y%):tint2%=Ȝ(X%,Y%)
��gcol2%Ȝtint2%
�ȓȐ1012,872,42,114
�4acol%=?((!vduout)+(640*255)-�(Y%/4)*640+�(X%/2))
�w%=4
�

�
:

��density
(ȗȓ572,872,368,16
2�ȗX%,Y%,Z%
<
�2Ȝ64
FȓȐ572,872,X%-574,16
P�21Ȝ192
ZȓȐX%,872,940-X%,16
d
�(Z%�5)=0
nȗȓ0,0,1279,1023
x?dots=�((X%-572)/2)
��
�:
�
��size
�ȗȓ1160,928,82,0
�OX%=2000
��ȗX%,Y%,Z%
��X%<OX%�
�
�42Ȝ0
�ȓȐ1078,844,164
��
�
�2Ȝ64
�ȏȐ1160,928,X%-1160
�Ȗ

OX%=X%

�(Z%�5)=0
ȗȓ0,0,1279,1023
"?size=�((X%-1160)/4)+1
,�
6:
@
��altered
Jp%=!pos
Tp%?2=127+?size
^p%?1=?dots
h?p%=?newcol
r
!pos=p%+3
|�
�:
���breakpoint
��break%�
�p%=!pos
�?p%=255
�p%?1=255
�p%?2=255
�
!pos=p%+3
�break%=�
��plinth(344,900,-320,-44)
��2,4)"BreakPoint Inserted"
��
�:

��save
+�:���0,2)"Not saved. ";:�:�".";:��:�
	�wipe
&%�"Title of work (";$record%;"):-"
0
�""title$
:	�wipe
D,�"Name of artist (";$(record%+128);"):-"
N�""artist$
X�
b	�wipe
l �"Date (";�$;"): ";:�""date$
v��date$<31
�#�title$<>""$record%=title$+�(0)
�0�artist$<>""$(record%+127)=�(0)+artist$+�(0)
�$(record%+223)=�(0)+�$+�(0)
�,�date$<>""$(record%+223)=�(0)+date$+�(0)
�	�wipe
��"Filename (";name$;"): ";
�	�""n$
��n$<>""name$=n$
�+ș"OS_File",&A,name$,&044,,record%,!pos
� �0,2)"File saved as ";name$
���
��
�:

��wipe
�
�0,0);
 �
*:
4��oscli
>�:���:�:��:�
H	�wipe
R�"*"command$
\ș"OS_CLI",command$
f��
p�
z:
�	��col
�,�Z%=4�w%�1?newcol=scol%:�choose:�altered
�,�w%=4�Z%�1?newcol=acol%:�choose:�altered
�,�w%=1�Z%�4?newcol=scol%:�choose:�altered
�,�Z%=1�w%�4?newcol=acol%:�choose:�altered
�	w%=Z%
��
�:
���drawmenu
��plinth(0,832,1279,191)
��plinth(616,996,-592,-44)
�0�2,1)"Memory used: ";�((!pos-record%)/1024)
�:�22,1)"Memory left: ";�(MaxSize%-(!pos-record%)/1024)
	!�button(632,948,"BreakPoint")
	�button(824,948,"*Command")
	�button(984,948,"Save")
	$�button(1080,948,"Quit")
	.�button(1176,948,"Back")
	8@�break%�plinth(344,900,-320,-44):�2,4)"BreakPoint Inserted"
	B�
	L�
	V:
	`
��menu
	j
�drawmenu
	t�ȗX%,Y%,Z%:�Z%=0
	~back%=�
	��ȗX%,Y%,Z%
	�
�Z%�5�
	�(�click(632,948,808,1000)�breakpoint
	�)�click(824,948,968,1000)�oscli:�done
	�)�click(984,948,1068,1000)�save:�done
	� �click(1080,948,1160,1000)�
	�&�click(1176,948,1256,1000)back%=�
	��
	��Z%�2�back%
	��back%�
	��drawtools
	��ȗX%,Y%,Z%:�Z%=0
ș"OS_Byte",15,1

�
:
��plinth(x%,y%,w%,h%)
(
�42Ȝ0
2ȓȐx%,y%,w%,h%
<
�21Ȝ0
FȓȐx%,y%,w%,4
P�42Ȝ128
ZȓȐx%,y%+4,4,h%-8
d�42Ȝ192
nȓȐx%,y%+h%-4,w%-4,4
x�21Ȝ64
�ȓȐx%+w%-4,y%+4,4,h%-8
��
�:
���button(x%,y%,t$)
��plinth(x%,y%,16+16*�t$,52)
��1+x%/16,(1000-y%)/32);t$
��
�:
�
��done
�2�'"Press a key or mouse button to continue..."
��ȗX%,Y%,Z%
��Z%<>0��(0)<>-1
��ȗX%,Y%,Z%:�Z%=0

���(0)=-1
ș"OS_Byte",15,1

�drawmenu
"�
,:
6ݤclick(x%,y%,u%,v%)
@�X%>x%�X%<u%�Y%>y%�Y%<v%=�
J=�
�

00000000  0d 00 0a 11 f4 20 3e 20  21 52 75 6e 49 6d 61 67  |..... > !RunImag|
00000010  65 0d 00 14 35 f4 20 20  20 21 4d 61 6b 65 53 70  |e...5.   !MakeSp|
00000020  72 61 79 20 61 6c 6c 6f  77 73 20 74 68 65 20 63  |ray allows the c|
00000030  72 65 61 74 69 6f 6e 20  6f 66 20 53 70 72 61 79  |reation of Spray|
00000040  46 69 6c 65 73 2e 0d 00  1e 17 f4 20 20 20 54 68  |Files......   Th|
00000050  65 20 46 6c 79 69 6e 67  20 50 69 67 21 0d 00 28  |e Flying Pig!..(|
00000060  18 f4 20 20 20 31 31 74  68 20 41 70 72 69 6c 20  |..   11th April |
00000070  31 39 39 34 2e 0d 00 32  05 3a 0d 00 3c 10 4d 61  |1994...2.:..<.Ma|
00000080  78 53 69 7a 65 25 3d 35  30 30 0d 00 46 05 3a 0d  |xSize%=500..F.:.|
00000090  00 50 0d e7 ac a4 6d 6f  64 65 20 e0 0d 00 5a 0d  |.P....mode ...Z.|
000000a0  f2 61 73 73 65 6d 62 6c  65 0d 00 64 09 eb 31 35  |.assemble..d..15|
000000b0  3a 87 0d 00 6e 0b fb 31  37 30 c8 9c 30 0d 00 78  |:...n..170..0..x|
000000c0  0a d6 63 6f 64 65 25 0d  00 82 10 ef 32 38 2c 30  |..code%.....28,0|
000000d0  2c 35 2c 37 39 2c 30 0d  00 8c 0a f2 73 70 72 61  |,5,79,0.....spra|
000000e0  79 0d 00 96 05 e0 0d 00  a0 05 3a 0d 00 aa 0a dd  |y.........:.....|
000000f0  a4 6d 6f 64 65 0d 00 b4  41 ea 85 3a ee 85 ea f1  |.mode...A..:....|
00000100  22 49 20 6e 65 65 64 20  61 74 20 6c 65 61 73 74  |"I need at least|
00000110  20 31 36 30 6b 20 6f 66  20 73 63 72 65 65 6e 20  | 160k of screen |
00000120  6d 65 6d 6f 72 79 2e 20  53 6f 72 72 79 21 22 27  |memory. Sorry!"'|
00000130  3a f7 85 3a 3d a3 0d 00  be 07 eb 31 35 0d 00 c8  |:..:=......15...|
00000140  05 87 0d 00 d2 36 f1 22  21 4d 61 6b 65 53 70 72  |.....6."!MakeSpr|
00000150  61 79 20 61 70 70 6c 69  63 61 74 69 6f 6e 20 66  |ay application f|
00000160  6f 72 20 63 72 65 61 74  69 6e 67 20 53 70 72 61  |or creating Spra|
00000170  79 46 69 6c 65 73 2e 22  0d 00 dc 2b f1 27 22 31  |yFiles."...+.'"1|
00000180  31 74 68 20 41 70 72 69  6c 20 31 39 39 34 2e 22  |1th April 1994."|
00000190  27 27 22 54 68 65 20 46  6c 79 69 6e 67 20 50 69  |''"The Flying Pi|
000001a0  67 21 22 0d 00 e6 06 f7  85 0d 00 f0 06 3d b9 0d  |g!"..........=..|
000001b0  00 fa 05 3a 0d 01 04 0e  dd f2 61 73 73 65 6d 62  |...:......assemb|
000001c0  6c 65 0d 01 0e 33 de 63  6f 64 65 25 33 34 30 30  |le...3.code%3400|
000001d0  30 2c 72 65 63 6f 72 64  25 4d 61 78 53 69 7a 65  |0,record%MaxSize|
000001e0  25 2a 31 30 32 34 2c 73  70 72 69 74 65 73 25 26  |%*1024,sprites%&|
000001f0  31 30 30 33 32 0d 01 18  32 c8 99 22 4f 53 5f 46  |10032...2.."OS_F|
00000200  69 6c 65 22 2c 26 46 46  2c 22 3c 4f 62 65 79 24  |ile",&FF,"<Obey$|
00000210  44 69 72 3e 2e 53 70 72  61 79 43 6f 64 65 22 2c  |Dir>.SprayCode",|
00000220  63 6f 64 65 25 2c 30 0d  01 22 12 66 61 64 65 3d  |code%,0..".fade=|
00000230  63 6f 64 65 25 2b 31 31  32 0d 01 2c 13 63 68 6f  |code%+112..,.cho|
00000240  6f 73 65 3d 63 6f 64 65  25 2b 34 30 0d 01 36 0f  |ose=code%+40..6.|
00000250  78 3d 63 6f 64 65 25 2b  33 32 34 0d 01 40 0f 79  |x=code%+324..@.y|
00000260  3d 63 6f 64 65 25 2b 33  32 38 0d 01 4a 11 70 6f  |=code%+328..J.po|
00000270  73 3d 63 6f 64 65 25 2b  33 33 32 0d 01 54 12 64  |s=code%+332..T.d|
00000280  6f 74 73 3d 63 6f 64 65  25 2b 33 33 36 0d 01 5e  |ots=code%+336..^|
00000290  14 6e 65 77 63 6f 6c 3d  63 6f 64 65 25 2b 33 33  |.newcol=code%+33|
000002a0  37 0d 01 68 12 73 69 7a  65 3d 63 6f 64 65 25 2b  |7..h.size=code%+|
000002b0  33 33 38 0d 01 72 14 76  64 75 6f 75 74 3d 63 6f  |338..r.vduout=co|
000002c0  64 65 25 2b 33 32 30 0d  01 7c 14 21 70 6f 73 3d  |de%+320..|.!pos=|
000002d0  72 65 63 6f 72 64 25 2b  32 35 36 0d 01 86 1b 67  |record%+256....g|
000002e0  63 6f 6c 25 3d 36 33 3a  74 69 6e 74 25 3d 32 35  |col%=63:tint%=25|
000002f0  35 3a 77 25 3d 37 0d 01  90 15 67 63 6f 6c 32 25  |5:w%=7....gcol2%|
00000300  3d 30 3a 74 69 6e 74 32  25 3d 30 0d 01 9a 15 73  |=0:tint2%=0....s|
00000310  63 6f 6c 25 3d 32 35 35  3a 61 63 6f 6c 25 3d 30  |col%=255:acol%=0|
00000320  0d 01 a4 1c 24 72 65 63  6f 72 64 25 3d 22 55 6e  |....$record%="Un|
00000330  74 69 74 6c 65 64 22 2b  bd 28 30 29 0d 01 ae 23  |titled"+.(0)...#|
00000340  24 28 72 65 63 6f 72 64  25 2b 31 32 38 29 3d 22  |$(record%+128)="|
00000350  41 6e 6f 6e 79 6d 6f 75  73 22 2b bd 28 30 29 0d  |Anonymous"+.(0).|
00000360  01 b8 15 6e 61 6d 65 24  3d 22 53 70 72 61 79 46  |...name$="SprayF|
00000370  69 6c 65 22 0d 01 c2 14  21 73 70 72 69 74 65 73  |ile"....!sprites|
00000380  25 3d 26 31 30 30 33 32  0d 01 cc 10 73 70 72 69  |%=&10032....spri|
00000390  74 65 73 25 21 34 3d 30  0d 01 d6 11 73 70 72 69  |tes%!4=0....spri|
000003a0  74 65 73 25 21 38 3d 31  36 0d 01 e0 12 73 70 72  |tes%!8=16....spr|
000003b0  69 74 65 73 25 21 31 32  3d 31 36 0d 01 ea 35 c8  |ites%!12=16...5.|
000003c0  99 22 4f 53 5f 53 70 72  69 74 65 4f 70 22 2c 32  |."OS_SpriteOp",2|
000003d0  36 36 2c 73 70 72 69 74  65 73 25 2c 22 3c 4f 62  |66,sprites%,"<Ob|
000003e0  65 79 24 44 69 72 3e 2e  53 70 72 69 74 65 73 22  |ey$Dir>.Sprites"|
000003f0  0d 01 f4 05 e1 0d 01 fe  05 3a 0d 02 08 0b dd f2  |.........:......|
00000400  73 70 72 61 79 0d 02 12  0e 2a 50 4f 49 4e 54 45  |spray....*POINTE|
00000410  52 20 31 0d 02 1c 05 f5  0d 02 26 0e c8 97 58 25  |R 1.......&...X%|
00000420  2c 59 25 2c 5a 25 0d 02  30 16 e7 5a 25 3d 32 f2  |,Y%,Z%..0..Z%=2.|
00000430  6e 65 77 63 6f 6c 6f 75  72 3a fd 30 0d 02 3a 08  |newcolour:.0..:.|
00000440  e7 5a 25 8c 0d 02 44 07  d1 3d 30 0d 02 4e 0f e7  |.Z%...D..=0..N..|
00000450  5a 25 3c 3e 77 25 f2 63  6f 6c 0d 02 58 09 21 78  |Z%<>w%.col..X.!x|
00000460  3d 58 25 0d 02 62 09 21  79 3d 59 25 0d 02 6c 09  |=X%..b.!y=Y%..l.|
00000470  d6 66 61 64 65 0d 02 76  0e e7 91 3c 31 f5 fd 91  |.fade..v...<1...|
00000480  3e 3d 31 0d 02 80 05 cd  0d 02 8a 06 fd a3 0d 02  |>=1.............|
00000490  94 05 e1 0d 02 9e 05 3a  0d 02 a8 0f dd f2 6e 65  |.......:......ne|
000004a0  77 63 6f 6c 6f 75 72 0d  02 b2 39 c8 99 22 4f 53  |wcolour...9.."OS|
000004b0  5f 53 70 72 69 74 65 4f  70 22 2c 32 37 32 2c 73  |_SpriteOp",272,s|
000004c0  70 72 69 74 65 73 25 2c  22 42 61 63 6b 22 2c 30  |prites%,"Back",0|
000004d0  2c 30 2c 38 33 32 2c 31  32 38 30 2c 31 30 32 34  |,0,832,1280,1024|
000004e0  0d 02 bc 0e f2 64 72 61  77 74 6f 6f 6c 73 0d 02  |.....drawtools..|
000004f0  c6 12 6f 6c 64 64 6f 74  73 25 3d 3f 64 6f 74 73  |..olddots%=?dots|
00000500  0d 02 d0 12 6f 6c 64 73  69 7a 65 25 3d 3f 73 69  |....oldsize%=?si|
00000510  7a 65 0d 02 da 14 6f 6c  64 67 63 6f 6c 25 3d 3f  |ze....oldgcol%=?|
00000520  6e 65 77 63 6f 6c 0d 02  e4 14 c8 99 22 4f 53 5f  |newcol......"OS_|
00000530  42 79 74 65 22 2c 31 35  2c 31 0d 02 ee 0c 62 72  |Byte",15,1....br|
00000540  65 61 6b 25 3d a3 0d 02  f8 15 f5 c8 97 58 25 2c  |eak%=........X%,|
00000550  59 25 2c 5a 25 3a fd 5a  25 3d 30 0d 03 02 0f f5  |Y%,Z%:.Z%=0.....|
00000560  c8 97 58 25 2c 59 25 2c  5a 25 0d 03 0c 0a e7 5a  |..X%,Y%,Z%.....Z|
00000570  25 80 35 8c 0d 03 16 20  e7 a4 63 6c 69 63 6b 28  |%.5.... ..click(|
00000580  30 2c 30 2c 31 32 38 30  2c 38 33 32 29 f2 63 68  |0,0,1280,832).ch|
00000590  6f 6f 73 65 0d 03 20 22  e7 a4 63 6c 69 63 6b 28  |oose.. "..click(|
000005a0  32 34 2c 38 36 32 2c 35  33 36 2c 39 39 32 29 f2  |24,862,536,992).|
000005b0  63 68 6f 6f 73 65 0d 03  2a 23 e7 a4 63 6c 69 63  |choose..*#..clic|
000005c0  6b 28 35 36 34 2c 39 33  30 2c 37 32 38 2c 39 39  |k(564,930,728,99|
000005d0  34 29 f2 63 68 6f 6f 73  65 0d 03 34 39 e7 a4 63  |4).choose..49..c|
000005e0  6c 69 63 6b 28 38 33 38  2c 39 33 32 2c 39 34 34  |lick(838,932,944|
000005f0  2c 39 39 34 29 3f 64 6f  74 73 3d 32 35 35 3a 3f  |,994)?dots=255:?|
00000600  73 69 7a 65 3d 33 30 3a  f2 64 72 61 77 74 6f 6f  |size=30:.drawtoo|
00000610  6c 73 0d 03 3e 24 e7 a4  63 6c 69 63 6b 28 35 37  |ls..>$..click(57|
00000620  32 2c 38 37 32 2c 39 34  30 2c 38 38 38 29 f2 64  |2,872,940,888).d|
00000630  65 6e 73 69 74 79 0d 03  48 24 e7 a4 63 6c 69 63  |ensity..H$..clic|
00000640  6b 28 31 30 37 38 2c 38  34 34 2c 31 32 33 38 2c  |k(1078,844,1238,|
00000650  31 30 30 34 29 f2 73 69  7a 65 0d 03 52 21 e7 a4  |1004).size..R!..|
00000660  63 6c 69 63 6b 28 37 34  34 2c 39 33 32 2c 38 32  |click(744,932,82|
00000670  38 2c 39 39 34 29 f2 6d  65 6e 75 0d 03 5c 05 cd  |8,994).menu..\..|
00000680  0d 03 66 09 fd 5a 25 80  32 0d 03 70 2f c8 99 22  |..f..Z%.2..p/.."|
00000690  4f 53 5f 53 70 72 69 74  65 4f 70 22 2c 32 39 30  |OS_SpriteOp",290|
000006a0  2c 73 70 72 69 74 65 73  25 2c 22 42 61 63 6b 22  |,sprites%,"Back"|
000006b0  2c 30 2c 38 33 32 2c 30  0d 03 7a 15 f5 c8 97 58  |,0,832,0..z....X|
000006c0  25 2c 59 25 2c 5a 25 3a  fd 5a 25 3d 30 0d 03 84  |%,Y%,Z%:.Z%=0...|
000006d0  41 e7 6f 6c 64 64 6f 74  73 25 3c 3e 3f 64 6f 74  |A.olddots%<>?dot|
000006e0  73 20 84 6f 6c 64 73 69  7a 65 25 3c 3e 3f 73 69  |s .oldsize%<>?si|
000006f0  7a 65 20 84 6f 6c 64 67  63 6f 6c 25 3c 3e 3f 6e  |ze .oldgcol%<>?n|
00000700  65 77 63 6f 6c 20 f2 61  6c 74 65 72 65 64 0d 03  |ewcol .altered..|
00000710  8e 05 e1 0d 03 98 05 3a  0d 03 a2 0f dd f2 64 72  |.......:......dr|
00000720  61 77 74 6f 6f 6c 73 0d  03 ac 30 c8 99 22 4f 53  |awtools...0.."OS|
00000730  5f 53 70 72 69 74 65 4f  70 22 2c 32 39 30 2c 73  |_SpriteOp",290,s|
00000740  70 72 69 74 65 73 25 2c  22 50 61 6e 65 6c 22 2c  |prites%,"Panel",|
00000750  30 2c 38 33 32 2c 30 0d  03 b6 11 e6 67 63 6f 6c  |0,832,0.....gcol|
00000760  25 c8 9c 74 69 6e 74 25  0d 03 c0 16 c8 93 c8 90  |%..tint%........|
00000770  39 37 32 2c 38 37 32 2c  34 32 2c 31 31 34 0d 03  |972,872,42,114..|
00000780  ca 13 e6 67 63 6f 6c 32  25 c8 9c 74 69 6e 74 32  |...gcol2%..tint2|
00000790  25 0d 03 d4 17 c8 93 c8  90 31 30 31 32 2c 38 37  |%........1012,87|
000007a0  32 2c 34 32 2c 31 31 34  0d 03 de 0e e7 3f 73 69  |2,42,114.....?si|
000007b0  7a 65 3c 32 33 8c 0d 03  e8 0a e6 34 32 c8 9c 30  |ze<23......42..0|
000007c0  0d 03 f2 14 c8 93 c8 90  31 30 37 38 2c 38 34 34  |........1078,844|
000007d0  2c 31 36 34 0d 03 fc 0a  e6 32 c8 9c 36 34 0d 04  |,164.....2..64..|
000007e0  06 1e c8 8f c8 90 31 31  36 30 2c 39 32 38 2c 28  |......1160,928,(|
000007f0  28 3f 73 69 7a 65 29 2d  31 29 2a 34 0d 04 10 05  |(?size)-1)*4....|
00000800  cd 0d 04 1a 10 e7 3f 64  6f 74 73 3c 3e 32 35 35  |......?dots<>255|
00000810  8c 0d 04 24 0c e6 32 31  c8 9c 31 39 32 0d 04 2e  |...$..21..192...|
00000820  16 c8 93 c8 90 35 37 32  2c 38 37 32 2c 33 36 38  |.....572,872,368|
00000830  2c 31 36 0d 04 38 0a e6  32 c8 9c 36 34 0d 04 42  |,16..8..2..64..B|
00000840  1a c8 93 c8 90 35 37 32  2c 38 37 32 2c 3f 64 6f  |.....572,872,?do|
00000850  74 73 2a 32 2c 31 36 0d  04 4c 05 cd 0d 04 56 05  |ts*2,16..L....V.|
00000860  e1 0d 04 60 05 3a 0d 04  6a 0c dd f2 63 68 6f 6f  |...`.:..j...choo|
00000870  73 65 0d 04 74 0a e7 5a  25 80 34 8c 0d 04 7e 21  |se..t..Z%.4...~!|
00000880  67 63 6f 6c 25 3d b0 58  25 2c 59 25 29 3a 74 69  |gcol%=.X%,Y%):ti|
00000890  6e 74 25 3d c8 9c 28 58  25 2c 59 25 29 0d 04 88  |nt%=..(X%,Y%)...|
000008a0  11 e6 67 63 6f 6c 25 c8  9c 74 69 6e 74 25 0d 04  |..gcol%..tint%..|
000008b0  92 16 c8 93 c8 90 39 37  32 2c 38 37 32 2c 34 32  |......972,872,42|
000008c0  2c 31 31 34 0d 04 9c 34  73 63 6f 6c 25 3d 3f 28  |,114...4scol%=?(|
000008d0  28 21 76 64 75 6f 75 74  29 2b 28 36 34 30 2a 32  |(!vduout)+(640*2|
000008e0  35 35 29 2d a8 28 59 25  2f 34 29 2a 36 34 30 2b  |55)-.(Y%/4)*640+|
000008f0  a8 28 58 25 2f 32 29 29  0d 04 a6 11 3f 6e 65 77  |.(X%/2))....?new|
00000900  63 6f 6c 3d 73 63 6f 6c  25 0d 04 b0 0b d6 63 68  |col=scol%.....ch|
00000910  6f 6f 73 65 0d 04 ba 05  cd 0d 04 c4 0a e7 5a 25  |oose..........Z%|
00000920  80 31 8c 0d 04 ce 23 67  63 6f 6c 32 25 3d b0 58  |.1....#gcol2%=.X|
00000930  25 2c 59 25 29 3a 74 69  6e 74 32 25 3d c8 9c 28  |%,Y%):tint2%=..(|
00000940  58 25 2c 59 25 29 0d 04  d8 13 e6 67 63 6f 6c 32  |X%,Y%).....gcol2|
00000950  25 c8 9c 74 69 6e 74 32  25 0d 04 e2 17 c8 93 c8  |%..tint2%.......|
00000960  90 31 30 31 32 2c 38 37  32 2c 34 32 2c 31 31 34  |.1012,872,42,114|
00000970  0d 04 ec 34 61 63 6f 6c  25 3d 3f 28 28 21 76 64  |...4acol%=?((!vd|
00000980  75 6f 75 74 29 2b 28 36  34 30 2a 32 35 35 29 2d  |uout)+(640*255)-|
00000990  a8 28 59 25 2f 34 29 2a  36 34 30 2b a8 28 58 25  |.(Y%/4)*640+.(X%|
000009a0  2f 32 29 29 0d 04 f6 08  77 25 3d 34 0d 05 00 05  |/2))....w%=4....|
000009b0  cd 0d 05 0a 05 e1 0d 05  14 05 3a 0d 05 1e 0d dd  |..........:.....|
000009c0  f2 64 65 6e 73 69 74 79  0d 05 28 16 c8 97 c8 93  |.density..(.....|
000009d0  35 37 32 2c 38 37 32 2c  33 36 38 2c 31 36 0d 05  |572,872,368,16..|
000009e0  32 0f f5 c8 97 58 25 2c  59 25 2c 5a 25 0d 05 3c  |2....X%,Y%,Z%..<|
000009f0  0a e6 32 c8 9c 36 34 0d  05 46 19 c8 93 c8 90 35  |..2..64..F.....5|
00000a00  37 32 2c 38 37 32 2c 58  25 2d 35 37 34 2c 31 36  |72,872,X%-574,16|
00000a10  0d 05 50 0c e6 32 31 c8  9c 31 39 32 0d 05 5a 18  |..P..21..192..Z.|
00000a20  c8 93 c8 90 58 25 2c 38  37 32 2c 39 34 30 2d 58  |....X%,872,940-X|
00000a30  25 2c 31 36 0d 05 64 0d  fd 28 5a 25 80 35 29 3d  |%,16..d..(Z%.5)=|
00000a40  30 0d 05 6e 15 c8 97 c8  93 30 2c 30 2c 31 32 37  |0..n.....0,0,127|
00000a50  39 2c 31 30 32 33 0d 05  78 17 3f 64 6f 74 73 3d  |9,1023..x.?dots=|
00000a60  a8 28 28 58 25 2d 35 37  32 29 2f 32 29 0d 05 82  |.((X%-572)/2)...|
00000a70  05 e1 0d 05 8c 05 3a 0d  05 96 0a dd f2 73 69 7a  |......:......siz|
00000a80  65 0d 05 a0 15 c8 97 c8  93 31 31 36 30 2c 39 32  |e........1160,92|
00000a90  38 2c 38 32 2c 30 0d 05  aa 0c 4f 58 25 3d 32 30  |8,82,0....OX%=20|
00000aa0  30 30 0d 05 b4 0f f5 c8  97 58 25 2c 59 25 2c 5a  |00.......X%,Y%,Z|
00000ab0  25 0d 05 be 0c e7 58 25  3c 4f 58 25 8c 0d 05 c8  |%.....X%<OX%....|
00000ac0  0a e6 34 32 c8 9c 30 0d  05 d2 14 c8 93 c8 90 31  |..42..0........1|
00000ad0  30 37 38 2c 38 34 34 2c  31 36 34 0d 05 dc 05 cd  |078,844,164.....|
00000ae0  0d 05 e6 0a e6 32 c8 9c  36 34 0d 05 f0 18 c8 8f  |.....2..64......|
00000af0  c8 90 31 31 36 30 2c 39  32 38 2c 58 25 2d 31 31  |..1160,928,X%-11|
00000b00  36 30 0d 05 fa 06 c8 96  0d 06 04 0a 4f 58 25 3d  |60..........OX%=|
00000b10  58 25 0d 06 0e 0d fd 28  5a 25 80 35 29 3d 30 0d  |X%.....(Z%.5)=0.|
00000b20  06 18 15 c8 97 c8 93 30  2c 30 2c 31 32 37 39 2c  |.......0,0,1279,|
00000b30  31 30 32 33 0d 06 22 1a  3f 73 69 7a 65 3d a8 28  |1023..".?size=.(|
00000b40  28 58 25 2d 31 31 36 30  29 2f 34 29 2b 31 0d 06  |(X%-1160)/4)+1..|
00000b50  2c 05 e1 0d 06 36 05 3a  0d 06 40 0d dd f2 61 6c  |,....6.:..@...al|
00000b60  74 65 72 65 64 0d 06 4a  0b 70 25 3d 21 70 6f 73  |tered..J.p%=!pos|
00000b70  0d 06 54 12 70 25 3f 32  3d 31 32 37 2b 3f 73 69  |..T.p%?2=127+?si|
00000b80  7a 65 0d 06 5e 0e 70 25  3f 31 3d 3f 64 6f 74 73  |ze..^.p%?1=?dots|
00000b90  0d 06 68 0f 3f 70 25 3d  3f 6e 65 77 63 6f 6c 0d  |..h.?p%=?newcol.|
00000ba0  06 72 0d 21 70 6f 73 3d  70 25 2b 33 0d 06 7c 05  |.r.!pos=p%+3..|.|
00000bb0  e1 0d 06 86 05 3a 0d 06  90 10 dd f2 62 72 65 61  |.....:......brea|
00000bc0  6b 70 6f 69 6e 74 0d 06  9a 0c e7 62 72 65 61 6b  |kpoint.....break|
00000bd0  25 e1 0d 06 a4 0b 70 25  3d 21 70 6f 73 0d 06 ae  |%.....p%=!pos...|
00000be0  0b 3f 70 25 3d 32 35 35  0d 06 b8 0c 70 25 3f 31  |.?p%=255....p%?1|
00000bf0  3d 32 35 35 0d 06 c2 0c  70 25 3f 32 3d 32 35 35  |=255....p%?2=255|
00000c00  0d 06 cc 0d 21 70 6f 73  3d 70 25 2b 33 0d 06 d6  |....!pos=p%+3...|
00000c10  0c 62 72 65 61 6b 25 3d  b9 0d 06 e0 1d f2 70 6c  |.break%=......pl|
00000c20  69 6e 74 68 28 33 34 34  2c 39 30 30 2c 2d 33 32  |inth(344,900,-32|
00000c30  30 2c 2d 34 34 29 0d 06  ea 1f f1 8a 32 2c 34 29  |0,-44)......2,4)|
00000c40  22 42 72 65 61 6b 50 6f  69 6e 74 20 49 6e 73 65  |"BreakPoint Inse|
00000c50  72 74 65 64 22 0d 06 f4  05 e1 0d 06 fe 05 3a 0d  |rted".........:.|
00000c60  07 08 0a dd f2 73 61 76  65 0d 07 12 2b ea 85 3a  |.....save...+..:|
00000c70  ee 85 ea f1 8a 30 2c 32  29 22 4e 6f 74 20 73 61  |.....0,2)"Not sa|
00000c80  76 65 64 2e 20 22 3b 3a  f6 3a f1 22 2e 22 3b 3a  |ved. ";:.:.".";:|
00000c90  f7 85 3a e1 0d 07 1c 09  f2 77 69 70 65 0d 07 26  |..:......wipe..&|
00000ca0  25 f1 22 54 69 74 6c 65  20 6f 66 20 77 6f 72 6b  |%."Title of work|
00000cb0  20 28 22 3b 24 72 65 63  6f 72 64 25 3b 22 29 3a  | (";$record%;"):|
00000cc0  2d 22 0d 07 30 0d e8 22  22 74 69 74 6c 65 24 0d  |-"..0..""title$.|
00000cd0  07 3a 09 f2 77 69 70 65  0d 07 44 2c f1 22 4e 61  |.:..wipe..D,."Na|
00000ce0  6d 65 20 6f 66 20 61 72  74 69 73 74 20 28 22 3b  |me of artist (";|
00000cf0  24 28 72 65 63 6f 72 64  25 2b 31 32 38 29 3b 22  |$(record%+128);"|
00000d00  29 3a 2d 22 0d 07 4e 0e  e8 22 22 61 72 74 69 73  |):-"..N..""artis|
00000d10  74 24 0d 07 58 05 f5 0d  07 62 09 f2 77 69 70 65  |t$..X....b..wipe|
00000d20  0d 07 6c 20 f1 22 44 61  74 65 20 28 22 3b 91 24  |..l ."Date (";.$|
00000d30  3b 22 29 3a 20 22 3b 3a  e8 22 22 64 61 74 65 24  |;"): ";:.""date$|
00000d40  0d 07 76 0e fd a9 64 61  74 65 24 3c 33 31 0d 07  |..v...date$<31..|
00000d50  80 23 e7 74 69 74 6c 65  24 3c 3e 22 22 24 72 65  |.#.title$<>""$re|
00000d60  63 6f 72 64 25 3d 74 69  74 6c 65 24 2b bd 28 30  |cord%=title$+.(0|
00000d70  29 0d 07 8a 30 e7 61 72  74 69 73 74 24 3c 3e 22  |)...0.artist$<>"|
00000d80  22 24 28 72 65 63 6f 72  64 25 2b 31 32 37 29 3d  |"$(record%+127)=|
00000d90  bd 28 30 29 2b 61 72 74  69 73 74 24 2b bd 28 30  |.(0)+artist$+.(0|
00000da0  29 0d 07 94 1f 24 28 72  65 63 6f 72 64 25 2b 32  |)....$(record%+2|
00000db0  32 33 29 3d bd 28 30 29  2b 91 24 2b bd 28 30 29  |23)=.(0)+.$+.(0)|
00000dc0  0d 07 9e 2c e7 64 61 74  65 24 3c 3e 22 22 24 28  |...,.date$<>""$(|
00000dd0  72 65 63 6f 72 64 25 2b  32 32 33 29 3d bd 28 30  |record%+223)=.(0|
00000de0  29 2b 64 61 74 65 24 2b  bd 28 30 29 0d 07 a8 09  |)+date$+.(0)....|
00000df0  f2 77 69 70 65 0d 07 b2  1e f1 22 46 69 6c 65 6e  |.wipe....."Filen|
00000e00  61 6d 65 20 28 22 3b 6e  61 6d 65 24 3b 22 29 3a  |ame (";name$;"):|
00000e10  20 22 3b 0d 07 bc 09 e8  22 22 6e 24 0d 07 c6 13  | ";.....""n$....|
00000e20  e7 6e 24 3c 3e 22 22 6e  61 6d 65 24 3d 6e 24 0d  |.n$<>""name$=n$.|
00000e30  07 d0 2b c8 99 22 4f 53  5f 46 69 6c 65 22 2c 26  |..+.."OS_File",&|
00000e40  41 2c 6e 61 6d 65 24 2c  26 30 34 34 2c 2c 72 65  |A,name$,&044,,re|
00000e50  63 6f 72 64 25 2c 21 70  6f 73 0d 07 da 20 f1 8a  |cord%,!pos... ..|
00000e60  30 2c 32 29 22 46 69 6c  65 20 73 61 76 65 64 20  |0,2)"File saved |
00000e70  61 73 20 22 3b 6e 61 6d  65 24 0d 07 e4 06 f7 85  |as ";name$......|
00000e80  0d 07 ee 05 e1 0d 07 f8  05 3a 0d 08 02 0a dd f2  |.........:......|
00000e90  77 69 70 65 0d 08 0c 05  db 0d 08 16 0b f1 8a 30  |wipe...........0|
00000ea0  2c 30 29 3b 0d 08 20 05  e1 0d 08 2a 05 3a 0d 08  |,0);.. ....*.:..|
00000eb0  34 0b dd f2 6f 73 63 6c  69 0d 08 3e 12 ea 85 3a  |4...oscli..>...:|
00000ec0  ee 85 ea f1 3a f6 3a f7  85 3a e1 0d 08 48 09 f2  |....:.:..:...H..|
00000ed0  77 69 70 65 0d 08 52 10  e8 22 2a 22 63 6f 6d 6d  |wipe..R.."*"comm|
00000ee0  61 6e 64 24 0d 08 5c 17  c8 99 22 4f 53 5f 43 4c  |and$..\..."OS_CL|
00000ef0  49 22 2c 63 6f 6d 6d 61  6e 64 24 0d 08 66 06 f7  |I",command$..f..|
00000f00  85 0d 08 70 05 e1 0d 08  7a 05 3a 0d 08 84 09 dd  |...p....z.:.....|
00000f10  f2 63 6f 6c 0d 08 8e 2c  e7 5a 25 3d 34 80 77 25  |.col...,.Z%=4.w%|
00000f20  80 31 3f 6e 65 77 63 6f  6c 3d 73 63 6f 6c 25 3a  |.1?newcol=scol%:|
00000f30  d6 63 68 6f 6f 73 65 3a  f2 61 6c 74 65 72 65 64  |.choose:.altered|
00000f40  0d 08 98 2c e7 77 25 3d  34 80 5a 25 80 31 3f 6e  |...,.w%=4.Z%.1?n|
00000f50  65 77 63 6f 6c 3d 61 63  6f 6c 25 3a d6 63 68 6f  |ewcol=acol%:.cho|
00000f60  6f 73 65 3a f2 61 6c 74  65 72 65 64 0d 08 a2 2c  |ose:.altered...,|
00000f70  e7 77 25 3d 31 80 5a 25  80 34 3f 6e 65 77 63 6f  |.w%=1.Z%.4?newco|
00000f80  6c 3d 73 63 6f 6c 25 3a  d6 63 68 6f 6f 73 65 3a  |l=scol%:.choose:|
00000f90  f2 61 6c 74 65 72 65 64  0d 08 ac 2c e7 5a 25 3d  |.altered...,.Z%=|
00000fa0  31 80 77 25 80 34 3f 6e  65 77 63 6f 6c 3d 61 63  |1.w%.4?newcol=ac|
00000fb0  6f 6c 25 3a d6 63 68 6f  6f 73 65 3a f2 61 6c 74  |ol%:.choose:.alt|
00000fc0  65 72 65 64 0d 08 b6 09  77 25 3d 5a 25 0d 08 c0  |ered....w%=Z%...|
00000fd0  05 e1 0d 08 ca 05 3a 0d  08 d4 0e dd f2 64 72 61  |......:......dra|
00000fe0  77 6d 65 6e 75 0d 08 de  1b f2 70 6c 69 6e 74 68  |wmenu.....plinth|
00000ff0  28 30 2c 38 33 32 2c 31  32 37 39 2c 31 39 31 29  |(0,832,1279,191)|
00001000  0d 08 e8 1d f2 70 6c 69  6e 74 68 28 36 31 36 2c  |.....plinth(616,|
00001010  39 39 36 2c 2d 35 39 32  2c 2d 34 34 29 0d 08 f2  |996,-592,-44)...|
00001020  30 f1 8a 32 2c 31 29 22  4d 65 6d 6f 72 79 20 75  |0..2,1)"Memory u|
00001030  73 65 64 3a 20 22 3b a8  28 28 21 70 6f 73 2d 72  |sed: ";.((!pos-r|
00001040  65 63 6f 72 64 25 29 2f  31 30 32 34 29 0d 08 fc  |ecord%)/1024)...|
00001050  3a f1 8a 32 32 2c 31 29  22 4d 65 6d 6f 72 79 20  |:..22,1)"Memory |
00001060  6c 65 66 74 3a 20 22 3b  a8 28 4d 61 78 53 69 7a  |left: ";.(MaxSiz|
00001070  65 25 2d 28 21 70 6f 73  2d 72 65 63 6f 72 64 25  |e%-(!pos-record%|
00001080  29 2f 31 30 32 34 29 0d  09 06 21 f2 62 75 74 74  |)/1024)...!.butt|
00001090  6f 6e 28 36 33 32 2c 39  34 38 2c 22 42 72 65 61  |on(632,948,"Brea|
000010a0  6b 50 6f 69 6e 74 22 29  0d 09 10 1f f2 62 75 74  |kPoint").....but|
000010b0  74 6f 6e 28 38 32 34 2c  39 34 38 2c 22 2a 43 6f  |ton(824,948,"*Co|
000010c0  6d 6d 61 6e 64 22 29 0d  09 1a 1b f2 62 75 74 74  |mmand").....butt|
000010d0  6f 6e 28 39 38 34 2c 39  34 38 2c 22 53 61 76 65  |on(984,948,"Save|
000010e0  22 29 0d 09 24 1c f2 62  75 74 74 6f 6e 28 31 30  |")..$..button(10|
000010f0  38 30 2c 39 34 38 2c 22  51 75 69 74 22 29 0d 09  |80,948,"Quit")..|
00001100  2e 1c f2 62 75 74 74 6f  6e 28 31 31 37 36 2c 39  |...button(1176,9|
00001110  34 38 2c 22 42 61 63 6b  22 29 0d 09 38 40 e7 62  |48,"Back")..8@.b|
00001120  72 65 61 6b 25 f2 70 6c  69 6e 74 68 28 33 34 34  |reak%.plinth(344|
00001130  2c 39 30 30 2c 2d 33 32  30 2c 2d 34 34 29 3a f1  |,900,-320,-44):.|
00001140  8a 32 2c 34 29 22 42 72  65 61 6b 50 6f 69 6e 74  |.2,4)"BreakPoint|
00001150  20 49 6e 73 65 72 74 65  64 22 0d 09 42 05 87 0d  | Inserted"..B...|
00001160  09 4c 05 e1 0d 09 56 05  3a 0d 09 60 0a dd f2 6d  |.L....V.:..`...m|
00001170  65 6e 75 0d 09 6a 0d f2  64 72 61 77 6d 65 6e 75  |enu..j..drawmenu|
00001180  0d 09 74 15 f5 c8 97 58  25 2c 59 25 2c 5a 25 3a  |..t....X%,Y%,Z%:|
00001190  fd 5a 25 3d 30 0d 09 7e  0b 62 61 63 6b 25 3d a3  |.Z%=0..~.back%=.|
000011a0  0d 09 88 0f f5 c8 97 58  25 2c 59 25 2c 5a 25 0d  |.......X%,Y%,Z%.|
000011b0  09 92 0a e7 5a 25 80 35  8c 0d 09 9c 28 e7 a4 63  |....Z%.5....(..c|
000011c0  6c 69 63 6b 28 36 33 32  2c 39 34 38 2c 38 30 38  |lick(632,948,808|
000011d0  2c 31 30 30 30 29 f2 62  72 65 61 6b 70 6f 69 6e  |,1000).breakpoin|
000011e0  74 0d 09 a6 29 e7 a4 63  6c 69 63 6b 28 38 32 34  |t...)..click(824|
000011f0  2c 39 34 38 2c 39 36 38  2c 31 30 30 30 29 f2 6f  |,948,968,1000).o|
00001200  73 63 6c 69 3a f2 64 6f  6e 65 0d 09 b0 29 e7 a4  |scli:.done...)..|
00001210  63 6c 69 63 6b 28 39 38  34 2c 39 34 38 2c 31 30  |click(984,948,10|
00001220  36 38 2c 31 30 30 30 29  f2 73 61 76 65 3a f2 64  |68,1000).save:.d|
00001230  6f 6e 65 0d 09 ba 20 e7  a4 63 6c 69 63 6b 28 31  |one... ..click(1|
00001240  30 38 30 2c 39 34 38 2c  31 31 36 30 2c 31 30 30  |080,948,1160,100|
00001250  30 29 e0 0d 09 c4 26 e7  a4 63 6c 69 63 6b 28 31  |0)....&..click(1|
00001260  31 37 36 2c 39 34 38 2c  31 32 35 36 2c 31 30 30  |176,948,1256,100|
00001270  30 29 62 61 63 6b 25 3d  b9 0d 09 ce 05 cd 0d 09  |0)back%=........|
00001280  d8 0f fd 5a 25 80 32 84  62 61 63 6b 25 0d 09 e2  |...Z%.2.back%...|
00001290  0c e7 ac 62 61 63 6b 25  e1 0d 09 ec 0e f2 64 72  |...back%......dr|
000012a0  61 77 74 6f 6f 6c 73 0d  09 f6 15 f5 c8 97 58 25  |awtools.......X%|
000012b0  2c 59 25 2c 5a 25 3a fd  5a 25 3d 30 0d 0a 00 14  |,Y%,Z%:.Z%=0....|
000012c0  c8 99 22 4f 53 5f 42 79  74 65 22 2c 31 35 2c 31  |.."OS_Byte",15,1|
000012d0  0d 0a 0a 05 e1 0d 0a 14  05 3a 0d 0a 1e 19 dd f2  |.........:......|
000012e0  70 6c 69 6e 74 68 28 78  25 2c 79 25 2c 77 25 2c  |plinth(x%,y%,w%,|
000012f0  68 25 29 0d 0a 28 0a e6  34 32 c8 9c 30 0d 0a 32  |h%)..(..42..0..2|
00001300  13 c8 93 c8 90 78 25 2c  79 25 2c 77 25 2c 68 25  |.....x%,y%,w%,h%|
00001310  0d 0a 3c 0a e6 32 31 c8  9c 30 0d 0a 46 12 c8 93  |..<..21..0..F...|
00001320  c8 90 78 25 2c 79 25 2c  77 25 2c 34 0d 0a 50 0c  |..x%,y%,w%,4..P.|
00001330  e6 34 32 c8 9c 31 32 38  0d 0a 5a 16 c8 93 c8 90  |.42..128..Z.....|
00001340  78 25 2c 79 25 2b 34 2c  34 2c 68 25 2d 38 0d 0a  |x%,y%+4,4,h%-8..|
00001350  64 0c e6 34 32 c8 9c 31  39 32 0d 0a 6e 19 c8 93  |d..42..192..n...|
00001360  c8 90 78 25 2c 79 25 2b  68 25 2d 34 2c 77 25 2d  |..x%,y%+h%-4,w%-|
00001370  34 2c 34 0d 0a 78 0b e6  32 31 c8 9c 36 34 0d 0a  |4,4..x..21..64..|
00001380  82 1b c8 93 c8 90 78 25  2b 77 25 2d 34 2c 79 25  |......x%+w%-4,y%|
00001390  2b 34 2c 34 2c 68 25 2d  38 0d 0a 8c 05 e1 0d 0a  |+4,4,h%-8.......|
000013a0  96 05 3a 0d 0a a0 16 dd  f2 62 75 74 74 6f 6e 28  |..:......button(|
000013b0  78 25 2c 79 25 2c 74 24  29 0d 0a aa 1f f2 70 6c  |x%,y%,t$).....pl|
000013c0  69 6e 74 68 28 78 25 2c  79 25 2c 31 36 2b 31 36  |inth(x%,y%,16+16|
000013d0  2a a9 74 24 2c 35 32 29  0d 0a b4 1e f1 8a 31 2b  |*.t$,52)......1+|
000013e0  78 25 2f 31 36 2c 28 31  30 30 30 2d 79 25 29 2f  |x%/16,(1000-y%)/|
000013f0  33 32 29 3b 74 24 0d 0a  be 05 e1 0d 0a c8 05 3a  |32);t$.........:|
00001400  0d 0a d2 0a dd f2 64 6f  6e 65 0d 0a dc 32 f1 27  |......done...2.'|
00001410  22 50 72 65 73 73 20 61  20 6b 65 79 20 6f 72 20  |"Press a key or |
00001420  6d 6f 75 73 65 20 62 75  74 74 6f 6e 20 74 6f 20  |mouse button to |
00001430  63 6f 6e 74 69 6e 75 65  2e 2e 2e 22 0d 0a e6 0f  |continue..."....|
00001440  f5 c8 97 58 25 2c 59 25  2c 5a 25 0d 0a f0 13 fd  |...X%,Y%,Z%.....|
00001450  5a 25 3c 3e 30 84 a6 28  30 29 3c 3e 2d 31 0d 0a  |Z%<>0..(0)<>-1..|
00001460  fa 15 f5 c8 97 58 25 2c  59 25 2c 5a 25 3a fd 5a  |.....X%,Y%,Z%:.Z|
00001470  25 3d 30 0d 0b 04 0d f5  fd a6 28 30 29 3d 2d 31  |%=0.......(0)=-1|
00001480  0d 0b 0e 14 c8 99 22 4f  53 5f 42 79 74 65 22 2c  |......"OS_Byte",|
00001490  31 35 2c 31 0d 0b 18 0d  f2 64 72 61 77 6d 65 6e  |15,1.....drawmen|
000014a0  75 0d 0b 22 05 e1 0d 0b  2c 05 3a 0d 0b 36 18 dd  |u.."....,.:..6..|
000014b0  a4 63 6c 69 63 6b 28 78  25 2c 79 25 2c 75 25 2c  |.click(x%,y%,u%,|
000014c0  76 25 29 0d 0b 40 1e e7  58 25 3e 78 25 80 58 25  |v%)..@..X%>x%.X%|
000014d0  3c 75 25 80 59 25 3e 79  25 80 59 25 3c 76 25 3d  |<u%.Y%>y%.Y%<v%=|
000014e0  b9 0d 0b 4a 06 3d a3 0d  ff                       |...J.=...|
000014e9