�       ...Workshop... 
 
$� ..BBC and Electron Version 1..

 
�         Copyright (c)  
�    Acornsoft Limited 1984
 
#��dBA
((�5:�19,0,4;0;19,3,5;0;23;8202;0;0;0;
2�1,2,1,0,3,2,1,0,0,1,2,2
<��Tr@:�J=1�4:�K=1�3
F3�L:�L=0�0,1:�26:�b1(J,K)��w(J,K):L=128+L:�0,L:�
P�,:�0,2:�l
Z�c(548,704,48)
d4�0,0:�b2(832,524,154,76):�0,3:�b2(872,564,76,76)
nR�w(1,3):�0,0:�t(264,328,456,328,360,236):�0,1:�b1(1,3):�0,0:�b2(340,420,44,88)
x`�w(3,1):�0,0:�t(648,760,792,628,648,628):�bk:Y=768:�X=648�784�26:�5:�X,Y:�241:Y=Y-24:�:�4,26
�A�0,3:�b2(732,420,72,52):�b2(648,364,72,52):�b2(732,308,72,48)
�R�w(2,2):�0,2:�t(452,528,636,528,544,628):�0,3:�b1(2,2):�0,2:�b2(516,524,56,88)
�C�26:�0,1:�b2(832,420,154,76):�c(912,296,28):�0,2:�c(912,384,28)
�E�0,0:�t(280,452,280,596,352,524):�0,1:�t(292,604,436,604,360,532)
�{�w(4,1):�0,3:�b3(800,712,888,624,948,680):�0,2:�t(832,724,832,788,896,788):�0,1:�b1(4,1):�0,1:�dn(864,800):�dp(864,652)
�Y�0,0:�b3(832,652,840,636,936,728):�dn(916,760):�dn(936,740):�dp(916,788):�dp(928,772)
�W�0,1:K=640:�J=896�928�16:�J,K:�J-16,K+20:K=K+16:�:�0,3:�b3(872,720,912,680,924,688)
�G�0,1:�844,728:�860,712:�884,704:�908,680:�924,696:�900,720:�900,728
Җ�26:�0,3:�b3(476,348,532,288,604,356):�0,0:�t(464,340,464,260,544,260):�0,2:�dp(536,284):�dp(574,372):K=380:�J=536�568�16:�J,K:�J+16,K+20:K=K-16:�
ܔ�0,1:�b3(488,404,548,340,556,352):�dp(544,364):�dn(540,332):�0,0:�dp(572,340):�dn(564,308):�0,1:�dp(556,356):�dn(548,324):�0,0:�552,316:�584,348
�i�0,3:�b3(512,368,524,356,548,380):�0,2:�496,316:�520,336:�520,352:�548,372:�532,392:�508,368:�492,368
�g�0,3:�b4(660,520,728,448,786,508):�0,2:�t(736,444,800,508,800,444):�0,0:�t(364,628,436,700,436,628)
�>�800,508:�800,500:�0,1:�364,628:�372,628:�364,632:�372,632

gK=712:A=328:B=360:�L=1�2:�J=A�B�16:�J,K:�J-16,K+20:K=K+16:�:�dn(B-28,K+24):A=688:B=720:K=512:�0,0:�

|�0,2:�b3(304,664,312,652,436,772):�23,241,12,12,26,26,54,52,108,104:�0,2:�5:�732,572:�241:�716,556:�241,4:�c(740,532,14)

r�X=-8�8�4:�740+X,548+X:�672+X,488+X:�740+X,536+X:�700+X,464+X:�748+X,532+X:�:�0,3:�b4(684,508,724,472,744,480)

"��0,0:Y=0:�X=0�360�360:�716-X,464+Y:�716-X,472+Y:�680-X,504+Y:�696-X,524+Y:�728-X,492+Y:�744-X,492+Y:�756-X,480+Y:�0,1:Y=200:�

'X=�(500)

,!�28,4,30,17,25,17,2:�"WSHOP2"

6�

@���l:�26:A%=&A:X%=0:Y%=&A:D=&A00:�N=1�8:R=N*88+208:S=960:?D=�(�"WORKSHOP",N,1)):�&FFF1:�O=1�7�2:P=D?O:Q=O+1:Q=D?Q:�23,241,P,P,P,P,Q,Q,Q,Q:S=S-32:�5:�R,S:�241:�4:�,:�

JO��w(X,Y):X=X-1:Y=4-Y:A=X*184+272:D=Y*184+240:B=D-168:C=A+168:�24,A;B;C;D;:�

TV��b1(X,Y):X=(X-1)*184+272:Y=(4-Y)*184+240:Z=168:�X,Y:�X,Y-Z:�X+Z,Y-Z:�X+Z,Y:�X,Y:�

^5��b2(X,Y,J,K):�X,Y-K:�X,Y:�85,X+J,Y-K:�85,X+J,Y:�

h9��b3(X,Y,V,W,J,K):�V,W:�X,Y:�85,J,K:�85,X+J-V,Y+K-W:�

rb��b4(X,Y,V,W,J,K):�J%=1�2:�b3(X,Y,V,W,J,K):L=360:X=X-L:V=V-L:J=J-L:L=200:Y=Y+L:W=W+L:K=K+L:�:�

|L��c(A,B,Z):�Y=0�Z�4:X=�(Z*Z-Y*Y):�A-X,B+Y:�A+X,B+Y:�A-X,B-Y:�A+X,B-Y:�:�

�(��t(X,Y,J,K,V,W):�X,Y:�V,W:�85,J,K:�

�(��bk:P=240:�23,241,P,P,P,P,P,P,0,0:�

�7��dn(X,Y):�23,241,254,254,124,124,56,56,16,16:�tnA

�1��dp(X,Y):�23,241,16,16,56,56,124,124,254,254

��5:�X,Y:�241,4:�

��=17 �
�

00000000  0d 00 0a 1b f4 20 20 20  20 20 20 20 2e 2e 2e 57  |.....       ...W|
00000010  6f 72 6b 73 68 6f 70 2e  2e 2e 20 0d 00 0b 05 20  |orkshop... .... |
00000020  0d 00 0c 24 f4 20 2e 2e  42 42 43 20 61 6e 64 20  |...$. ..BBC and |
00000030  45 6c 65 63 74 72 6f 6e  20 56 65 72 73 69 6f 6e  |Electron Version|
00000040  20 31 2e 2e 0d 00 0d 05  20 0d 00 0e 1d f4 20 20  | 1...... .....  |
00000050  20 20 20 20 20 20 20 43  6f 70 79 72 69 67 68 74  |       Copyright|
00000060  20 28 63 29 20 20 0d 00  0f 1f f4 20 20 20 20 41  | (c)  .....    A|
00000070  63 6f 72 6e 73 6f 66 74  20 4c 69 6d 69 74 65 64  |cornsoft Limited|
00000080  20 31 39 38 34 0d 00 1e  05 20 0d 00 23 0b ee 85  | 1984.... ..#...|
00000090  e5 8d 64 42 41 0d 00 28  28 eb 35 3a ef 31 39 2c  |..dBA..((.5:.19,|
000000a0  30 2c 34 3b 30 3b 31 39  2c 33 2c 35 3b 30 3b 32  |0,4;0;19,3,5;0;2|
000000b0  33 3b 38 32 30 32 3b 30  3b 30 3b 30 3b 0d 00 32  |3;8202;0;0;0;..2|
000000c0  1c dc 31 2c 32 2c 31 2c  30 2c 33 2c 32 2c 31 2c  |..1,2,1,0,3,2,1,|
000000d0  30 2c 30 2c 31 2c 32 2c  32 0d 00 3c 17 f7 8d 54  |0,0,1,2,2..<...T|
000000e0  72 40 3a e3 4a 3d 31 b8  34 3a e3 4b 3d 31 b8 33  |r@:.J=1.4:.K=1.3|
000000f0  0d 00 46 33 f3 4c 3a e7  4c 3d 30 e6 30 2c 31 3a  |..F3.L:.L=0.0,1:|
00000100  ef 32 36 3a f2 62 31 28  4a 2c 4b 29 8b f2 77 28  |.26:.b1(J,K)..w(|
00000110  4a 2c 4b 29 3a 4c 3d 31  32 38 2b 4c 3a e6 30 2c  |J,K):L=128+L:.0,|
00000120  4c 3a da 0d 00 50 0e ed  2c 3a e6 30 2c 32 3a f2  |L:...P..,:.0,2:.|
00000130  6c 0d 00 5a 12 f2 63 28  35 34 38 2c 37 30 34 2c  |l..Z..c(548,704,|
00000140  34 38 29 0d 00 64 34 e6  30 2c 30 3a f2 62 32 28  |48)..d4.0,0:.b2(|
00000150  38 33 32 2c 35 32 34 2c  31 35 34 2c 37 36 29 3a  |832,524,154,76):|
00000160  e6 30 2c 33 3a f2 62 32  28 38 37 32 2c 35 36 34  |.0,3:.b2(872,564|
00000170  2c 37 36 2c 37 36 29 0d  00 6e 52 f2 77 28 31 2c  |,76,76)..nR.w(1,|
00000180  33 29 3a e6 30 2c 30 3a  f2 74 28 32 36 34 2c 33  |3):.0,0:.t(264,3|
00000190  32 38 2c 34 35 36 2c 33  32 38 2c 33 36 30 2c 32  |28,456,328,360,2|
000001a0  33 36 29 3a e6 30 2c 31  3a f2 62 31 28 31 2c 33  |36):.0,1:.b1(1,3|
000001b0  29 3a e6 30 2c 30 3a f2  62 32 28 33 34 30 2c 34  |):.0,0:.b2(340,4|
000001c0  32 30 2c 34 34 2c 38 38  29 0d 00 78 60 f2 77 28  |20,44,88)..x`.w(|
000001d0  33 2c 31 29 3a e6 30 2c  30 3a f2 74 28 36 34 38  |3,1):.0,0:.t(648|
000001e0  2c 37 36 30 2c 37 39 32  2c 36 32 38 2c 36 34 38  |,760,792,628,648|
000001f0  2c 36 32 38 29 3a f2 62  6b 3a 59 3d 37 36 38 3a  |,628):.bk:Y=768:|
00000200  e3 58 3d 36 34 38 b8 37  38 34 88 32 36 3a ef 35  |.X=648.784.26:.5|
00000210  3a ec 58 2c 59 3a ef 32  34 31 3a 59 3d 59 2d 32  |:.X,Y:.241:Y=Y-2|
00000220  34 3a ed 3a ef 34 2c 32  36 0d 00 82 41 e6 30 2c  |4:.:.4,26...A.0,|
00000230  33 3a f2 62 32 28 37 33  32 2c 34 32 30 2c 37 32  |3:.b2(732,420,72|
00000240  2c 35 32 29 3a f2 62 32  28 36 34 38 2c 33 36 34  |,52):.b2(648,364|
00000250  2c 37 32 2c 35 32 29 3a  f2 62 32 28 37 33 32 2c  |,72,52):.b2(732,|
00000260  33 30 38 2c 37 32 2c 34  38 29 0d 00 8c 52 f2 77  |308,72,48)...R.w|
00000270  28 32 2c 32 29 3a e6 30  2c 32 3a f2 74 28 34 35  |(2,2):.0,2:.t(45|
00000280  32 2c 35 32 38 2c 36 33  36 2c 35 32 38 2c 35 34  |2,528,636,528,54|
00000290  34 2c 36 32 38 29 3a e6  30 2c 33 3a f2 62 31 28  |4,628):.0,3:.b1(|
000002a0  32 2c 32 29 3a e6 30 2c  32 3a f2 62 32 28 35 31  |2,2):.0,2:.b2(51|
000002b0  36 2c 35 32 34 2c 35 36  2c 38 38 29 0d 00 96 43  |6,524,56,88)...C|
000002c0  ef 32 36 3a e6 30 2c 31  3a f2 62 32 28 38 33 32  |.26:.0,1:.b2(832|
000002d0  2c 34 32 30 2c 31 35 34  2c 37 36 29 3a f2 63 28  |,420,154,76):.c(|
000002e0  39 31 32 2c 32 39 36 2c  32 38 29 3a e6 30 2c 32  |912,296,28):.0,2|
000002f0  3a f2 63 28 39 31 32 2c  33 38 34 2c 32 38 29 0d  |:.c(912,384,28).|
00000300  00 a0 45 e6 30 2c 30 3a  f2 74 28 32 38 30 2c 34  |..E.0,0:.t(280,4|
00000310  35 32 2c 32 38 30 2c 35  39 36 2c 33 35 32 2c 35  |52,280,596,352,5|
00000320  32 34 29 3a e6 30 2c 31  3a f2 74 28 32 39 32 2c  |24):.0,1:.t(292,|
00000330  36 30 34 2c 34 33 36 2c  36 30 34 2c 33 36 30 2c  |604,436,604,360,|
00000340  35 33 32 29 0d 00 aa 7b  f2 77 28 34 2c 31 29 3a  |532)...{.w(4,1):|
00000350  e6 30 2c 33 3a f2 62 33  28 38 30 30 2c 37 31 32  |.0,3:.b3(800,712|
00000360  2c 38 38 38 2c 36 32 34  2c 39 34 38 2c 36 38 30  |,888,624,948,680|
00000370  29 3a e6 30 2c 32 3a f2  74 28 38 33 32 2c 37 32  |):.0,2:.t(832,72|
00000380  34 2c 38 33 32 2c 37 38  38 2c 38 39 36 2c 37 38  |4,832,788,896,78|
00000390  38 29 3a e6 30 2c 31 3a  f2 62 31 28 34 2c 31 29  |8):.0,1:.b1(4,1)|
000003a0  3a e6 30 2c 31 3a f2 64  6e 28 38 36 34 2c 38 30  |:.0,1:.dn(864,80|
000003b0  30 29 3a f2 64 70 28 38  36 34 2c 36 35 32 29 0d  |0):.dp(864,652).|
000003c0  00 b4 59 e6 30 2c 30 3a  f2 62 33 28 38 33 32 2c  |..Y.0,0:.b3(832,|
000003d0  36 35 32 2c 38 34 30 2c  36 33 36 2c 39 33 36 2c  |652,840,636,936,|
000003e0  37 32 38 29 3a f2 64 6e  28 39 31 36 2c 37 36 30  |728):.dn(916,760|
000003f0  29 3a f2 64 6e 28 39 33  36 2c 37 34 30 29 3a f2  |):.dn(936,740):.|
00000400  64 70 28 39 31 36 2c 37  38 38 29 3a f2 64 70 28  |dp(916,788):.dp(|
00000410  39 32 38 2c 37 37 32 29  0d 00 be 57 e6 30 2c 31  |928,772)...W.0,1|
00000420  3a 4b 3d 36 34 30 3a e3  4a 3d 38 39 36 b8 39 32  |:K=640:.J=896.92|
00000430  38 88 31 36 3a ec 4a 2c  4b 3a df 4a 2d 31 36 2c  |8.16:.J,K:.J-16,|
00000440  4b 2b 32 30 3a 4b 3d 4b  2b 31 36 3a ed 3a e6 30  |K+20:K=K+16:.:.0|
00000450  2c 33 3a f2 62 33 28 38  37 32 2c 37 32 30 2c 39  |,3:.b3(872,720,9|
00000460  31 32 2c 36 38 30 2c 39  32 34 2c 36 38 38 29 0d  |12,680,924,688).|
00000470  00 c8 47 e6 30 2c 31 3a  ec 38 34 34 2c 37 32 38  |..G.0,1:.844,728|
00000480  3a df 38 36 30 2c 37 31  32 3a df 38 38 34 2c 37  |:.860,712:.884,7|
00000490  30 34 3a df 39 30 38 2c  36 38 30 3a df 39 32 34  |04:.908,680:.924|
000004a0  2c 36 39 36 3a df 39 30  30 2c 37 32 30 3a df 39  |,696:.900,720:.9|
000004b0  30 30 2c 37 32 38 0d 00  d2 96 ef 32 36 3a e6 30  |00,728.....26:.0|
000004c0  2c 33 3a f2 62 33 28 34  37 36 2c 33 34 38 2c 35  |,3:.b3(476,348,5|
000004d0  33 32 2c 32 38 38 2c 36  30 34 2c 33 35 36 29 3a  |32,288,604,356):|
000004e0  e6 30 2c 30 3a f2 74 28  34 36 34 2c 33 34 30 2c  |.0,0:.t(464,340,|
000004f0  34 36 34 2c 32 36 30 2c  35 34 34 2c 32 36 30 29  |464,260,544,260)|
00000500  3a e6 30 2c 32 3a f2 64  70 28 35 33 36 2c 32 38  |:.0,2:.dp(536,28|
00000510  34 29 3a f2 64 70 28 35  37 34 2c 33 37 32 29 3a  |4):.dp(574,372):|
00000520  4b 3d 33 38 30 3a e3 4a  3d 35 33 36 b8 35 36 38  |K=380:.J=536.568|
00000530  88 31 36 3a ec 4a 2c 4b  3a df 4a 2b 31 36 2c 4b  |.16:.J,K:.J+16,K|
00000540  2b 32 30 3a 4b 3d 4b 2d  31 36 3a ed 0d 00 dc 94  |+20:K=K-16:.....|
00000550  e6 30 2c 31 3a f2 62 33  28 34 38 38 2c 34 30 34  |.0,1:.b3(488,404|
00000560  2c 35 34 38 2c 33 34 30  2c 35 35 36 2c 33 35 32  |,548,340,556,352|
00000570  29 3a f2 64 70 28 35 34  34 2c 33 36 34 29 3a f2  |):.dp(544,364):.|
00000580  64 6e 28 35 34 30 2c 33  33 32 29 3a e6 30 2c 30  |dn(540,332):.0,0|
00000590  3a f2 64 70 28 35 37 32  2c 33 34 30 29 3a f2 64  |:.dp(572,340):.d|
000005a0  6e 28 35 36 34 2c 33 30  38 29 3a e6 30 2c 31 3a  |n(564,308):.0,1:|
000005b0  f2 64 70 28 35 35 36 2c  33 35 36 29 3a f2 64 6e  |.dp(556,356):.dn|
000005c0  28 35 34 38 2c 33 32 34  29 3a e6 30 2c 30 3a ec  |(548,324):.0,0:.|
000005d0  35 35 32 2c 33 31 36 3a  df 35 38 34 2c 33 34 38  |552,316:.584,348|
000005e0  0d 00 e6 69 e6 30 2c 33  3a f2 62 33 28 35 31 32  |...i.0,3:.b3(512|
000005f0  2c 33 36 38 2c 35 32 34  2c 33 35 36 2c 35 34 38  |,368,524,356,548|
00000600  2c 33 38 30 29 3a e6 30  2c 32 3a ec 34 39 36 2c  |,380):.0,2:.496,|
00000610  33 31 36 3a df 35 32 30  2c 33 33 36 3a df 35 32  |316:.520,336:.52|
00000620  30 2c 33 35 32 3a df 35  34 38 2c 33 37 32 3a df  |0,352:.548,372:.|
00000630  35 33 32 2c 33 39 32 3a  df 35 30 38 2c 33 36 38  |532,392:.508,368|
00000640  3a df 34 39 32 2c 33 36  38 0d 00 f0 67 e6 30 2c  |:.492,368...g.0,|
00000650  33 3a f2 62 34 28 36 36  30 2c 35 32 30 2c 37 32  |3:.b4(660,520,72|
00000660  38 2c 34 34 38 2c 37 38  36 2c 35 30 38 29 3a e6  |8,448,786,508):.|
00000670  30 2c 32 3a f2 74 28 37  33 36 2c 34 34 34 2c 38  |0,2:.t(736,444,8|
00000680  30 30 2c 35 30 38 2c 38  30 30 2c 34 34 34 29 3a  |00,508,800,444):|
00000690  e6 30 2c 30 3a f2 74 28  33 36 34 2c 36 32 38 2c  |.0,0:.t(364,628,|
000006a0  34 33 36 2c 37 30 30 2c  34 33 36 2c 36 32 38 29  |436,700,436,628)|
000006b0  0d 00 fa 3e ec 38 30 30  2c 35 30 38 3a df 38 30  |...>.800,508:.80|
000006c0  30 2c 35 30 30 3a e6 30  2c 31 3a ec 33 36 34 2c  |0,500:.0,1:.364,|
000006d0  36 32 38 3a df 33 37 32  2c 36 32 38 3a ec 33 36  |628:.372,628:.36|
000006e0  34 2c 36 33 32 3a df 33  37 32 2c 36 33 32 0d 01  |4,632:.372,632..|
000006f0  04 67 4b 3d 37 31 32 3a  41 3d 33 32 38 3a 42 3d  |.gK=712:A=328:B=|
00000700  33 36 30 3a e3 4c 3d 31  b8 32 3a e3 4a 3d 41 b8  |360:.L=1.2:.J=A.|
00000710  42 88 31 36 3a ec 4a 2c  4b 3a df 4a 2d 31 36 2c  |B.16:.J,K:.J-16,|
00000720  4b 2b 32 30 3a 4b 3d 4b  2b 31 36 3a ed 3a f2 64  |K+20:K=K+16:.:.d|
00000730  6e 28 42 2d 32 38 2c 4b  2b 32 34 29 3a 41 3d 36  |n(B-28,K+24):A=6|
00000740  38 38 3a 42 3d 37 32 30  3a 4b 3d 35 31 32 3a e6  |88:B=720:K=512:.|
00000750  30 2c 30 3a ed 0d 01 0e  7c e6 30 2c 32 3a f2 62  |0,0:....|.0,2:.b|
00000760  33 28 33 30 34 2c 36 36  34 2c 33 31 32 2c 36 35  |3(304,664,312,65|
00000770  32 2c 34 33 36 2c 37 37  32 29 3a ef 32 33 2c 32  |2,436,772):.23,2|
00000780  34 31 2c 31 32 2c 31 32  2c 32 36 2c 32 36 2c 35  |41,12,12,26,26,5|
00000790  34 2c 35 32 2c 31 30 38  2c 31 30 34 3a e6 30 2c  |4,52,108,104:.0,|
000007a0  32 3a ef 35 3a ec 37 33  32 2c 35 37 32 3a ef 32  |2:.5:.732,572:.2|
000007b0  34 31 3a ec 37 31 36 2c  35 35 36 3a ef 32 34 31  |41:.716,556:.241|
000007c0  2c 34 3a f2 63 28 37 34  30 2c 35 33 32 2c 31 34  |,4:.c(740,532,14|
000007d0  29 0d 01 18 72 e3 58 3d  2d 38 b8 38 88 34 3a ec  |)...r.X=-8.8.4:.|
000007e0  37 34 30 2b 58 2c 35 34  38 2b 58 3a df 36 37 32  |740+X,548+X:.672|
000007f0  2b 58 2c 34 38 38 2b 58  3a df 37 34 30 2b 58 2c  |+X,488+X:.740+X,|
00000800  35 33 36 2b 58 3a ec 37  30 30 2b 58 2c 34 36 34  |536+X:.700+X,464|
00000810  2b 58 3a df 37 34 38 2b  58 2c 35 33 32 2b 58 3a  |+X:.748+X,532+X:|
00000820  ed 3a e6 30 2c 33 3a f2  62 34 28 36 38 34 2c 35  |.:.0,3:.b4(684,5|
00000830  30 38 2c 37 32 34 2c 34  37 32 2c 37 34 34 2c 34  |08,724,472,744,4|
00000840  38 30 29 0d 01 22 81 e6  30 2c 30 3a 59 3d 30 3a  |80).."..0,0:Y=0:|
00000850  e3 58 3d 30 b8 33 36 30  88 33 36 30 3a ec 37 31  |.X=0.360.360:.71|
00000860  36 2d 58 2c 34 36 34 2b  59 3a df 37 31 36 2d 58  |6-X,464+Y:.716-X|
00000870  2c 34 37 32 2b 59 3a df  36 38 30 2d 58 2c 35 30  |,472+Y:.680-X,50|
00000880  34 2b 59 3a df 36 39 36  2d 58 2c 35 32 34 2b 59  |4+Y:.696-X,524+Y|
00000890  3a df 37 32 38 2d 58 2c  34 39 32 2b 59 3a df 37  |:.728-X,492+Y:.7|
000008a0  34 34 2d 58 2c 34 39 32  2b 59 3a df 37 35 36 2d  |44-X,492+Y:.756-|
000008b0  58 2c 34 38 30 2b 59 3a  e6 30 2c 31 3a 59 3d 32  |X,480+Y:.0,1:Y=2|
000008c0  30 30 3a ed 0d 01 27 0c  58 3d a6 28 35 30 30 29  |00:...'.X=.(500)|
000008d0  0d 01 2c 21 ef 32 38 2c  34 2c 33 30 2c 31 37 2c  |..,!.28,4,30,17,|
000008e0  32 35 2c 31 37 2c 32 3a  d7 22 57 53 48 4f 50 32  |25,17,2:."WSHOP2|
000008f0  22 0d 01 36 05 e0 0d 01  40 a8 dd f2 6c 3a ef 32  |"..6....@...l:.2|
00000900  36 3a 41 25 3d 26 41 3a  58 25 3d 30 3a 59 25 3d  |6:A%=&A:X%=0:Y%=|
00000910  26 41 3a 44 3d 26 41 30  30 3a e3 4e 3d 31 b8 38  |&A:D=&A00:.N=1.8|
00000920  3a 52 3d 4e 2a 38 38 2b  32 30 38 3a 53 3d 39 36  |:R=N*88+208:S=96|
00000930  30 3a 3f 44 3d 97 28 c1  22 57 4f 52 4b 53 48 4f  |0:?D=.(."WORKSHO|
00000940  50 22 2c 4e 2c 31 29 29  3a d6 26 46 46 46 31 3a  |P",N,1)):.&FFF1:|
00000950  e3 4f 3d 31 b8 37 88 32  3a 50 3d 44 3f 4f 3a 51  |.O=1.7.2:P=D?O:Q|
00000960  3d 4f 2b 31 3a 51 3d 44  3f 51 3a ef 32 33 2c 32  |=O+1:Q=D?Q:.23,2|
00000970  34 31 2c 50 2c 50 2c 50  2c 50 2c 51 2c 51 2c 51  |41,P,P,P,P,Q,Q,Q|
00000980  2c 51 3a 53 3d 53 2d 33  32 3a ef 35 3a ec 52 2c  |,Q:S=S-32:.5:.R,|
00000990  53 3a ef 32 34 31 3a ef  34 3a ed 2c 3a e1 0d 01  |S:.241:.4:.,:...|
000009a0  4a 4f dd f2 77 28 58 2c  59 29 3a 58 3d 58 2d 31  |JO..w(X,Y):X=X-1|
000009b0  3a 59 3d 34 2d 59 3a 41  3d 58 2a 31 38 34 2b 32  |:Y=4-Y:A=X*184+2|
000009c0  37 32 3a 44 3d 59 2a 31  38 34 2b 32 34 30 3a 42  |72:D=Y*184+240:B|
000009d0  3d 44 2d 31 36 38 3a 43  3d 41 2b 31 36 38 3a ef  |=D-168:C=A+168:.|
000009e0  32 34 2c 41 3b 42 3b 43  3b 44 3b 3a e1 0d 01 54  |24,A;B;C;D;:...T|
000009f0  56 dd f2 62 31 28 58 2c  59 29 3a 58 3d 28 58 2d  |V..b1(X,Y):X=(X-|
00000a00  31 29 2a 31 38 34 2b 32  37 32 3a 59 3d 28 34 2d  |1)*184+272:Y=(4-|
00000a10  59 29 2a 31 38 34 2b 32  34 30 3a 5a 3d 31 36 38  |Y)*184+240:Z=168|
00000a20  3a ec 58 2c 59 3a df 58  2c 59 2d 5a 3a df 58 2b  |:.X,Y:.X,Y-Z:.X+|
00000a30  5a 2c 59 2d 5a 3a df 58  2b 5a 2c 59 3a df 58 2c  |Z,Y-Z:.X+Z,Y:.X,|
00000a40  59 3a e1 0d 01 5e 35 dd  f2 62 32 28 58 2c 59 2c  |Y:...^5..b2(X,Y,|
00000a50  4a 2c 4b 29 3a ec 58 2c  59 2d 4b 3a ec 58 2c 59  |J,K):.X,Y-K:.X,Y|
00000a60  3a f0 38 35 2c 58 2b 4a  2c 59 2d 4b 3a f0 38 35  |:.85,X+J,Y-K:.85|
00000a70  2c 58 2b 4a 2c 59 3a e1  0d 01 68 39 dd f2 62 33  |,X+J,Y:...h9..b3|
00000a80  28 58 2c 59 2c 56 2c 57  2c 4a 2c 4b 29 3a ec 56  |(X,Y,V,W,J,K):.V|
00000a90  2c 57 3a ec 58 2c 59 3a  f0 38 35 2c 4a 2c 4b 3a  |,W:.X,Y:.85,J,K:|
00000aa0  f0 38 35 2c 58 2b 4a 2d  56 2c 59 2b 4b 2d 57 3a  |.85,X+J-V,Y+K-W:|
00000ab0  e1 0d 01 72 62 dd f2 62  34 28 58 2c 59 2c 56 2c  |...rb..b4(X,Y,V,|
00000ac0  57 2c 4a 2c 4b 29 3a e3  4a 25 3d 31 b8 32 3a f2  |W,J,K):.J%=1.2:.|
00000ad0  62 33 28 58 2c 59 2c 56  2c 57 2c 4a 2c 4b 29 3a  |b3(X,Y,V,W,J,K):|
00000ae0  4c 3d 33 36 30 3a 58 3d  58 2d 4c 3a 56 3d 56 2d  |L=360:X=X-L:V=V-|
00000af0  4c 3a 4a 3d 4a 2d 4c 3a  4c 3d 32 30 30 3a 59 3d  |L:J=J-L:L=200:Y=|
00000b00  59 2b 4c 3a 57 3d 57 2b  4c 3a 4b 3d 4b 2b 4c 3a  |Y+L:W=W+L:K=K+L:|
00000b10  ed 3a e1 0d 01 7c 4c dd  f2 63 28 41 2c 42 2c 5a  |.:...|L..c(A,B,Z|
00000b20  29 3a e3 59 3d 30 b8 5a  88 34 3a 58 3d b6 28 5a  |):.Y=0.Z.4:X=.(Z|
00000b30  2a 5a 2d 59 2a 59 29 3a  ec 41 2d 58 2c 42 2b 59  |*Z-Y*Y):.A-X,B+Y|
00000b40  3a df 41 2b 58 2c 42 2b  59 3a ec 41 2d 58 2c 42  |:.A+X,B+Y:.A-X,B|
00000b50  2d 59 3a df 41 2b 58 2c  42 2d 59 3a ed 3a e1 0d  |-Y:.A+X,B-Y:.:..|
00000b60  01 86 28 dd f2 74 28 58  2c 59 2c 4a 2c 4b 2c 56  |..(..t(X,Y,J,K,V|
00000b70  2c 57 29 3a ec 58 2c 59  3a ec 56 2c 57 3a f0 38  |,W):.X,Y:.V,W:.8|
00000b80  35 2c 4a 2c 4b 3a e1 0d  01 90 28 dd f2 62 6b 3a  |5,J,K:....(..bk:|
00000b90  50 3d 32 34 30 3a ef 32  33 2c 32 34 31 2c 50 2c  |P=240:.23,241,P,|
00000ba0  50 2c 50 2c 50 2c 50 2c  50 2c 30 2c 30 3a e1 0d  |P,P,P,P,P,0,0:..|
00000bb0  01 9a 37 dd f2 64 6e 28  58 2c 59 29 3a ef 32 33  |..7..dn(X,Y):.23|
00000bc0  2c 32 34 31 2c 32 35 34  2c 32 35 34 2c 31 32 34  |,241,254,254,124|
00000bd0  2c 31 32 34 2c 35 36 2c  35 36 2c 31 36 2c 31 36  |,124,56,56,16,16|
00000be0  3a e5 8d 74 6e 41 0d 01  a4 31 dd f2 64 70 28 58  |:..tnA...1..dp(X|
00000bf0  2c 59 29 3a ef 32 33 2c  32 34 31 2c 31 36 2c 31  |,Y):.23,241,16,1|
00000c00  36 2c 35 36 2c 35 36 2c  31 32 34 2c 31 32 34 2c  |6,56,56,124,124,|
00000c10  32 35 34 2c 32 35 34 0d  01 ae 14 ef 35 3a ec 58  |254,254.....5:.X|
00000c20  2c 59 3a ef 32 34 31 2c  34 3a e1 0d 01 c2 0b e7  |,Y:.241,4:......|
00000c30  9f 3d 31 37 20 f9 0d ff                           |.=17 ...|
00000c38