,ț "<Saviour$Dir>.Library":�saviour_init
�129
�1
(�
2;ș"XFont_FindFont",,"Homerton.Bold",640,640 � font%;er%
<T�er%=6:ș"Font_SetFont",font%:ș"ColourTrans_SetFontColours",font%,0,&0000FF00,6
F�0,1
P7DA%=2:DB%=1:NX%=-1:NY%=-1:X%=600:Y%=500:MX%=0:MY%=0
Z�5
d�jr
n�
x
X%=X%+MX%
�
Y%=Y%+MY%
�(�within(X%,NX%)��within(Y%,NY%):�jr
�!�X%<0�Y%<0�X%>1000�Y%>950:�jr
�NX$=��$,17,5):ȔDA%,DB%:Ȗ:ș"OS_Byte",112,DA%:ș"OS_Byte",113,DB%:�:�X%,Y%
�J�er%<>6:�X%,Y%:�X$:�ș"Font_SetFont",font%:ș"Font_Paint",,X$,16,X%,Y%
��saviour_check:��
���jr
�NX%=�(1000)
�NY%=�(950)
�"MO%=�((NX%-X%)^2+(NY%-Y%)^2)/8
�MX%=(NX%-X%)/MO%
�MY%=(NY%-Y%)/MO%
��

ݤwithin(VA1%,VA2%)

�VA1%=VA2%:=�

 �VA1%-VA2%>0�VA1%-VA2%<32:=�

" �VA2%-VA1%>0�VA2%-VA1%<32:=�

,=�

6��dfont

@ș"Font_Paint",,X$,16,X%,Y%

J�
�

00000000  0d 00 0a 2c c8 9b 20 22  3c 53 61 76 69 6f 75 72  |...,.. "<Saviour|
00000010  24 44 69 72 3e 2e 4c 69  62 72 61 72 79 22 3a f2  |$Dir>.Library":.|
00000020  73 61 76 69 6f 75 72 5f  69 6e 69 74 0d 00 14 08  |saviour_init....|
00000030  eb 31 32 39 0d 00 1e 06  eb 31 0d 00 28 05 87 0d  |.129.....1..(...|
00000040  00 32 3b c8 99 22 58 46  6f 6e 74 5f 46 69 6e 64  |.2;.."XFont_Find|
00000050  46 6f 6e 74 22 2c 2c 22  48 6f 6d 65 72 74 6f 6e  |Font",,"Homerton|
00000060  2e 42 6f 6c 64 22 2c 36  34 30 2c 36 34 30 20 b8  |.Bold",640,640 .|
00000070  20 66 6f 6e 74 25 3b 65  72 25 0d 00 3c 54 e7 65  | font%;er%..<T.e|
00000080  72 25 3d 36 3a c8 99 22  46 6f 6e 74 5f 53 65 74  |r%=6:.."Font_Set|
00000090  46 6f 6e 74 22 2c 66 6f  6e 74 25 3a c8 99 22 43  |Font",font%:.."C|
000000a0  6f 6c 6f 75 72 54 72 61  6e 73 5f 53 65 74 46 6f  |olourTrans_SetFo|
000000b0  6e 74 43 6f 6c 6f 75 72  73 22 2c 66 6f 6e 74 25  |ntColours",font%|
000000c0  2c 30 2c 26 30 30 30 30  46 46 30 30 2c 36 0d 00  |,0,&0000FF00,6..|
000000d0  46 08 e6 30 2c 31 0d 00  50 37 44 41 25 3d 32 3a  |F..0,1..P7DA%=2:|
000000e0  44 42 25 3d 31 3a 4e 58  25 3d 2d 31 3a 4e 59 25  |DB%=1:NX%=-1:NY%|
000000f0  3d 2d 31 3a 58 25 3d 36  30 30 3a 59 25 3d 35 30  |=-1:X%=600:Y%=50|
00000100  30 3a 4d 58 25 3d 30 3a  4d 59 25 3d 30 0d 00 5a  |0:MX%=0:MY%=0..Z|
00000110  06 ef 35 0d 00 64 07 f2  6a 72 0d 00 6e 05 f5 0d  |..5..d..jr..n...|
00000120  00 78 0d 58 25 3d 58 25  2b 4d 58 25 0d 00 82 0d  |.x.X%=X%+MX%....|
00000130  59 25 3d 59 25 2b 4d 59  25 0d 00 8c 28 e7 a4 77  |Y%=Y%+MY%...(..w|
00000140  69 74 68 69 6e 28 58 25  2c 4e 58 25 29 80 a4 77  |ithin(X%,NX%)..w|
00000150  69 74 68 69 6e 28 59 25  2c 4e 59 25 29 3a f2 6a  |ithin(Y%,NY%):.j|
00000160  72 0d 00 96 21 e7 58 25  3c 30 84 59 25 3c 30 84  |r...!.X%<0.Y%<0.|
00000170  58 25 3e 31 30 30 30 84  59 25 3e 39 35 30 3a f2  |X%>1000.Y%>950:.|
00000180  6a 72 0d 00 a0 4e 58 24  3d c1 91 24 2c 31 37 2c  |jr...NX$=..$,17,|
00000190  35 29 3a c8 94 44 41 25  2c 44 42 25 3a c8 96 3a  |5):..DA%,DB%:..:|
000001a0  c8 99 22 4f 53 5f 42 79  74 65 22 2c 31 31 32 2c  |.."OS_Byte",112,|
000001b0  44 41 25 3a c8 99 22 4f  53 5f 42 79 74 65 22 2c  |DA%:.."OS_Byte",|
000001c0  31 31 33 2c 44 42 25 3a  db 3a ec 58 25 2c 59 25  |113,DB%:.:.X%,Y%|
000001d0  0d 00 aa 4a e7 65 72 25  3c 3e 36 3a ec 58 25 2c  |...J.er%<>6:.X%,|
000001e0  59 25 3a f1 58 24 3a 8b  c8 99 22 46 6f 6e 74 5f  |Y%:.X$:..."Font_|
000001f0  53 65 74 46 6f 6e 74 22  2c 66 6f 6e 74 25 3a c8  |SetFont",font%:.|
00000200  99 22 46 6f 6e 74 5f 50  61 69 6e 74 22 2c 2c 58  |."Font_Paint",,X|
00000210  24 2c 31 36 2c 58 25 2c  59 25 0d 00 b4 15 f2 73  |$,16,X%,Y%.....s|
00000220  61 76 69 6f 75 72 5f 63  68 65 63 6b 3a fd a3 0d  |aviour_check:...|
00000230  00 be 08 dd f2 6a 72 0d  00 c8 0f 4e 58 25 3d b3  |.....jr....NX%=.|
00000240  28 31 30 30 30 29 0d 00  d2 0e 4e 59 25 3d b3 28  |(1000)....NY%=.(|
00000250  39 35 30 29 0d 00 dc 22  4d 4f 25 3d b6 28 28 4e  |950)..."MO%=.((N|
00000260  58 25 2d 58 25 29 5e 32  2b 28 4e 59 25 2d 59 25  |X%-X%)^2+(NY%-Y%|
00000270  29 5e 32 29 2f 38 0d 00  e6 14 4d 58 25 3d 28 4e  |)^2)/8....MX%=(N|
00000280  58 25 2d 58 25 29 2f 4d  4f 25 0d 00 f0 14 4d 59  |X%-X%)/MO%....MY|
00000290  25 3d 28 4e 59 25 2d 59  25 29 2f 4d 4f 25 0d 00  |%=(NY%-Y%)/MO%..|
000002a0  fa 05 e1 0d 01 04 17 dd  a4 77 69 74 68 69 6e 28  |.........within(|
000002b0  56 41 31 25 2c 56 41 32  25 29 0d 01 0e 11 e7 56  |VA1%,VA2%).....V|
000002c0  41 31 25 3d 56 41 32 25  3a 3d b9 0d 01 18 20 e7  |A1%=VA2%:=.... .|
000002d0  56 41 31 25 2d 56 41 32  25 3e 30 80 56 41 31 25  |VA1%-VA2%>0.VA1%|
000002e0  2d 56 41 32 25 3c 33 32  3a 3d b9 0d 01 22 20 e7  |-VA2%<32:=..." .|
000002f0  56 41 32 25 2d 56 41 31  25 3e 30 80 56 41 32 25  |VA2%-VA1%>0.VA2%|
00000300  2d 56 41 31 25 3c 33 32  3a 3d b9 0d 01 2c 06 3d  |-VA1%<32:=...,.=|
00000310  a3 0d 01 36 0b dd f2 64  66 6f 6e 74 0d 01 40 1f  |...6...dfont..@.|
00000320  c8 99 22 46 6f 6e 74 5f  50 61 69 6e 74 22 2c 2c  |.."Font_Paint",,|
00000330  58 24 2c 31 36 2c 58 25  2c 59 25 0d 01 4a 05 e1  |X$,16,X%,Y%..J..|
00000340  0d ff                                             |..|
00000342