� � �error
	�init
	�poll
(:
2� �init
<8ș "Wimp_Initialise",200,&4B534154,"Puzell" � ,task%
F,� ca% 50,b% 1000,men% 500,t% 1000,e% 255
Ptend%=t%+1000
Z
end%=�
d�templates
n�random
x�
�:
�� �poll
�b%!0=main%
� ș "Wimp_GetWindowState",,b%
�ș "Wimp_OpenWindow",,b%
�T=�
��
�m%=%1111110110010
�$ș"Wimp_PollIdle",m%,b%,100 � r%
�Ȏ r% �
�� 0:�check_won
�� 2:ș"Wimp_OpenWindow",,b%
�'� 3:ș"Wimp_CloseWindow",,b%:end%=�

� 6:�mouseclick

� 17,18:�recieve

�

"
� end%

,
�close

6�

@:

J� �close

T&ș"Wimp_CloseDown",task%,&4B534154

^�

h�

r:

|� �recieve

�Ȏ b%!16 �

�� 0:end%=�

��

��

�:

�� �mouseclick

�&� b%!8=4 � b%!12=main% � b%!16>8 �

�Ȏ b%!16 �

�� 15:�scrolly(1,-1)

�� 16:�scrolly(2,-1)

�� 17:�scrolly(3,-1)

�� 18:�scrolly(1,1)

�� 19:�scrolly(2,1)
� 20:�scrolly(3,1)
� 14:�scrollx(1,-1)
� 13:�scrollx(2,-1)
&� 12:�scrollx(3,-1)
0� 11:�scrollx(1,1)
:� 10:�scrollx(2,1)
D� 09:�scrollx(3,1)
N�
X�
b�
l:
v� �templates
�3ș"Wimp_OpenTemplate",,"<Puzzel$Dir>.Templates"
�:ș"Wimp_LoadTemplate",,b%,t%,tend%,-1,"BOARD",0 � ,,t%
�� board(3,3)
�!board(1,3) = !(b%+88+32*0+20)
�!board(2,3) = !(b%+88+32*1+20)
�!board(3,3) = !(b%+88+32*2+20)
�!board(1,2) = !(b%+88+32*3+20)
�!board(2,2) = !(b%+88+32*4+20)
�!board(3,2) = !(b%+88+32*5+20)
�!board(1,1) = !(b%+88+32*6+20)
�!board(2,1) = !(b%+88+32*7+20)
�!board(3,1) = !(b%+88+32*8+20)
�%ș"Wimp_CreateWindow",,b% � main%
ș"Wimp_CloseTemplate"
�
:
 � �updateicon(noi)
*b%!0=main%
4b%!4=noi
>ș &400CE,,b%
H5ș"Wimp_ForceRedraw",main%,b%!8,b%!12,b%!16,b%!20
R�
\:
f� �fatal(t$)
p
e%!0=0
z$(e%+4)=t$
�ș &400DF,e%,%1001,"Puzzel"
�ș "Wimp_CreateMenu",-1
�
�close
��
�:
�� �nonfatal(t$)
�
e%!0=0
�$(e%+4)=t$
�ș &400DF,e%,%1010,"Puzzel"
�ș "Wimp_CreateMenu",-1
��
�:
�� �error
	� � �
,str$="Basic error: "+�$+" at line "+�(�)
�fatal(str$)
$�
.:
8��scrollx(row,dir)
Btemp$ = $board(1,row)
L� dir=-1 �
V!$board(1,row) = $board(2,row)
`!$board(2,row) = $board(3,row)
j$board(3,row) = temp$
t�
~!$board(1,row) = $board(3,row)
�!$board(3,row) = $board(2,row)
�$board(2,row) = temp$
��
�Ȏ row �
�4� 1:�updateicon(6):�updateicon(7):�updateicon(8)
�4� 2:�updateicon(3):�updateicon(4):�updateicon(5)
�4� 3:�updateicon(0):�updateicon(1):�updateicon(2)
��
��
�:
���scrolly(col,dir)
�temp$ = $board(col,1)
� dir=-1 �

!$board(col,1) = $board(col,2)
!$board(col,2) = $board(col,3)
$board(col,3) = temp$
(�
2!$board(col,1) = $board(col,3)
<!$board(col,3) = $board(col,2)
F$board(col,2) = temp$
P�
ZȎ col �
d4� 1:�updateicon(0):�updateicon(3):�updateicon(6)
n4� 2:�updateicon(1):�updateicon(4):�updateicon(7)
x4� 3:�updateicon(2):�updateicon(5):�updateicon(8)
��
��
�:
���check_won
�;� $board(1,3)="1" � $board(2,3)="2" � $board(3,3)="3" �
�;� $board(1,2)="4" � $board(2,2)="5" � $board(3,2)="6" �
�;� $board(1,1)="7" � $board(2,1)="8" � $board(3,1)="9" �
��won
��
��
��
��
�:
	��won

b%!0=0
<$(b%+4)="Well Done! You have completed the mini-puzzel."
">ș "Wimp_ReportError",b%,%11001,"Message from Mini-Puzzel"
,�random
6�
@:
J��random
T� T=1 � 20
^?�scrollx(�(3),((�(2)-1)*2)-1):�scrolly(�(3),((�(2)-1)*2)-1)
h� T
r�
�

00000000  0d 00 0a 0e ee 20 85 20  f2 65 72 72 6f 72 0d 00  |..... . .error..|
00000010  14 09 f2 69 6e 69 74 0d  00 1e 09 f2 70 6f 6c 6c  |...init.....poll|
00000020  0d 00 28 05 3a 0d 00 32  0b dd 20 f2 69 6e 69 74  |..(.:..2.. .init|
00000030  0d 00 3c 38 c8 99 20 22  57 69 6d 70 5f 49 6e 69  |..<8.. "Wimp_Ini|
00000040  74 69 61 6c 69 73 65 22  2c 32 30 30 2c 26 34 42  |tialise",200,&4B|
00000050  35 33 34 31 35 34 2c 22  50 75 7a 65 6c 6c 22 20  |534154,"Puzell" |
00000060  b8 20 2c 74 61 73 6b 25  0d 00 46 2c de 20 63 61  |. ,task%..F,. ca|
00000070  25 20 35 30 2c 62 25 20  31 30 30 30 2c 6d 65 6e  |% 50,b% 1000,men|
00000080  25 20 35 30 30 2c 74 25  20 31 30 30 30 2c 65 25  |% 500,t% 1000,e%|
00000090  20 32 35 35 0d 00 50 11  74 65 6e 64 25 3d 74 25  | 255..P.tend%=t%|
000000a0  2b 31 30 30 30 0d 00 5a  0a 65 6e 64 25 3d a3 0d  |+1000..Z.end%=..|
000000b0  00 64 0e f2 74 65 6d 70  6c 61 74 65 73 0d 00 6e  |.d..templates..n|
000000c0  0b f2 72 61 6e 64 6f 6d  0d 00 78 05 e1 0d 00 82  |..random..x.....|
000000d0  05 3a 0d 00 8c 0b dd 20  f2 70 6f 6c 6c 0d 00 96  |.:..... .poll...|
000000e0  0e 62 25 21 30 3d 6d 61  69 6e 25 0d 00 a0 20 c8  |.b%!0=main%... .|
000000f0  99 20 22 57 69 6d 70 5f  47 65 74 57 69 6e 64 6f  |. "Wimp_GetWindo|
00000100  77 53 74 61 74 65 22 2c  2c 62 25 0d 00 aa 1c c8  |wState",,b%.....|
00000110  99 20 22 57 69 6d 70 5f  4f 70 65 6e 57 69 6e 64  |. "Wimp_OpenWind|
00000120  6f 77 22 2c 2c 62 25 0d  00 b4 07 54 3d 91 0d 00  |ow",,b%....T=...|
00000130  be 05 f5 0d 00 c8 15 6d  25 3d 25 31 31 31 31 31  |.......m%=%11111|
00000140  31 30 31 31 30 30 31 30  0d 00 d2 24 c8 99 22 57  |10110010...$.."W|
00000150  69 6d 70 5f 50 6f 6c 6c  49 64 6c 65 22 2c 6d 25  |imp_PollIdle",m%|
00000160  2c 62 25 2c 31 30 30 20  b8 20 72 25 0d 00 dc 0b  |,b%,100 . r%....|
00000170  c8 8e 20 72 25 20 ca 0d  00 e6 12 c9 20 30 3a f2  |.. r% ...... 0:.|
00000180  63 68 65 63 6b 5f 77 6f  6e 0d 00 f0 1f c9 20 32  |check_won..... 2|
00000190  3a c8 99 22 57 69 6d 70  5f 4f 70 65 6e 57 69 6e  |:.."Wimp_OpenWin|
000001a0  64 6f 77 22 2c 2c 62 25  0d 00 fa 27 c9 20 33 3a  |dow",,b%...'. 3:|
000001b0  c8 99 22 57 69 6d 70 5f  43 6c 6f 73 65 57 69 6e  |.."Wimp_CloseWin|
000001c0  64 6f 77 22 2c 2c 62 25  3a 65 6e 64 25 3d b9 0d  |dow",,b%:end%=..|
000001d0  01 04 13 c9 20 36 3a f2  6d 6f 75 73 65 63 6c 69  |.... 6:.mousecli|
000001e0  63 6b 0d 01 0e 14 c9 20  31 37 2c 31 38 3a f2 72  |ck..... 17,18:.r|
000001f0  65 63 69 65 76 65 0d 01  18 05 cb 0d 01 22 0a fd  |ecieve......."..|
00000200  20 65 6e 64 25 0d 01 2c  0a f2 63 6c 6f 73 65 0d  | end%..,..close.|
00000210  01 36 05 e1 0d 01 40 05  3a 0d 01 4a 0c dd 20 f2  |.6....@.:..J.. .|
00000220  63 6c 6f 73 65 0d 01 54  26 c8 99 22 57 69 6d 70  |close..T&.."Wimp|
00000230  5f 43 6c 6f 73 65 44 6f  77 6e 22 2c 74 61 73 6b  |_CloseDown",task|
00000240  25 2c 26 34 42 35 33 34  31 35 34 0d 01 5e 05 e0  |%,&4B534154..^..|
00000250  0d 01 68 05 e1 0d 01 72  05 3a 0d 01 7c 0e dd 20  |..h....r.:..|.. |
00000260  f2 72 65 63 69 65 76 65  0d 01 86 0e c8 8e 20 62  |.recieve...... b|
00000270  25 21 31 36 20 ca 0d 01  90 0e c9 20 30 3a 65 6e  |%!16 ...... 0:en|
00000280  64 25 3d b9 0d 01 9a 05  cb 0d 01 a4 05 e1 0d 01  |d%=.............|
00000290  ae 05 3a 0d 01 b8 11 dd  20 f2 6d 6f 75 73 65 63  |..:..... .mousec|
000002a0  6c 69 63 6b 0d 01 c2 26  e7 20 62 25 21 38 3d 34  |lick...&. b%!8=4|
000002b0  20 80 20 62 25 21 31 32  3d 6d 61 69 6e 25 20 80  | . b%!12=main% .|
000002c0  20 62 25 21 31 36 3e 38  20 8c 0d 01 cc 0e c8 8e  | b%!16>8 .......|
000002d0  20 62 25 21 31 36 20 ca  0d 01 d6 17 c9 20 31 35  | b%!16 ...... 15|
000002e0  3a f2 73 63 72 6f 6c 6c  79 28 31 2c 2d 31 29 0d  |:.scrolly(1,-1).|
000002f0  01 e0 17 c9 20 31 36 3a  f2 73 63 72 6f 6c 6c 79  |.... 16:.scrolly|
00000300  28 32 2c 2d 31 29 0d 01  ea 17 c9 20 31 37 3a f2  |(2,-1)..... 17:.|
00000310  73 63 72 6f 6c 6c 79 28  33 2c 2d 31 29 0d 01 f4  |scrolly(3,-1)...|
00000320  16 c9 20 31 38 3a f2 73  63 72 6f 6c 6c 79 28 31  |.. 18:.scrolly(1|
00000330  2c 31 29 0d 01 fe 16 c9  20 31 39 3a f2 73 63 72  |,1)..... 19:.scr|
00000340  6f 6c 6c 79 28 32 2c 31  29 0d 02 08 16 c9 20 32  |olly(2,1)..... 2|
00000350  30 3a f2 73 63 72 6f 6c  6c 79 28 33 2c 31 29 0d  |0:.scrolly(3,1).|
00000360  02 12 17 c9 20 31 34 3a  f2 73 63 72 6f 6c 6c 78  |.... 14:.scrollx|
00000370  28 31 2c 2d 31 29 0d 02  1c 17 c9 20 31 33 3a f2  |(1,-1)..... 13:.|
00000380  73 63 72 6f 6c 6c 78 28  32 2c 2d 31 29 0d 02 26  |scrollx(2,-1)..&|
00000390  17 c9 20 31 32 3a f2 73  63 72 6f 6c 6c 78 28 33  |.. 12:.scrollx(3|
000003a0  2c 2d 31 29 0d 02 30 16  c9 20 31 31 3a f2 73 63  |,-1)..0.. 11:.sc|
000003b0  72 6f 6c 6c 78 28 31 2c  31 29 0d 02 3a 16 c9 20  |rollx(1,1)..:.. |
000003c0  31 30 3a f2 73 63 72 6f  6c 6c 78 28 32 2c 31 29  |10:.scrollx(2,1)|
000003d0  0d 02 44 16 c9 20 30 39  3a f2 73 63 72 6f 6c 6c  |..D.. 09:.scroll|
000003e0  78 28 33 2c 31 29 0d 02  4e 05 cb 0d 02 58 05 cd  |x(3,1)..N....X..|
000003f0  0d 02 62 05 e1 0d 02 6c  05 3a 0d 02 76 10 dd 20  |..b....l.:..v.. |
00000400  f2 74 65 6d 70 6c 61 74  65 73 0d 02 80 33 c8 99  |.templates...3..|
00000410  22 57 69 6d 70 5f 4f 70  65 6e 54 65 6d 70 6c 61  |"Wimp_OpenTempla|
00000420  74 65 22 2c 2c 22 3c 50  75 7a 7a 65 6c 24 44 69  |te",,"<Puzzel$Di|
00000430  72 3e 2e 54 65 6d 70 6c  61 74 65 73 22 0d 02 8a  |r>.Templates"...|
00000440  3a c8 99 22 57 69 6d 70  5f 4c 6f 61 64 54 65 6d  |:.."Wimp_LoadTem|
00000450  70 6c 61 74 65 22 2c 2c  62 25 2c 74 25 2c 74 65  |plate",,b%,t%,te|
00000460  6e 64 25 2c 2d 31 2c 22  42 4f 41 52 44 22 2c 30  |nd%,-1,"BOARD",0|
00000470  20 b8 20 2c 2c 74 25 0d  02 94 10 de 20 62 6f 61  | . ,,t%..... boa|
00000480  72 64 28 33 2c 33 29 0d  02 9e 21 62 6f 61 72 64  |rd(3,3)...!board|
00000490  28 31 2c 33 29 20 3d 20  21 28 62 25 2b 38 38 2b  |(1,3) = !(b%+88+|
000004a0  33 32 2a 30 2b 32 30 29  0d 02 a8 21 62 6f 61 72  |32*0+20)...!boar|
000004b0  64 28 32 2c 33 29 20 3d  20 21 28 62 25 2b 38 38  |d(2,3) = !(b%+88|
000004c0  2b 33 32 2a 31 2b 32 30  29 0d 02 b2 21 62 6f 61  |+32*1+20)...!boa|
000004d0  72 64 28 33 2c 33 29 20  3d 20 21 28 62 25 2b 38  |rd(3,3) = !(b%+8|
000004e0  38 2b 33 32 2a 32 2b 32  30 29 0d 02 bc 21 62 6f  |8+32*2+20)...!bo|
000004f0  61 72 64 28 31 2c 32 29  20 3d 20 21 28 62 25 2b  |ard(1,2) = !(b%+|
00000500  38 38 2b 33 32 2a 33 2b  32 30 29 0d 02 c6 21 62  |88+32*3+20)...!b|
00000510  6f 61 72 64 28 32 2c 32  29 20 3d 20 21 28 62 25  |oard(2,2) = !(b%|
00000520  2b 38 38 2b 33 32 2a 34  2b 32 30 29 0d 02 d0 21  |+88+32*4+20)...!|
00000530  62 6f 61 72 64 28 33 2c  32 29 20 3d 20 21 28 62  |board(3,2) = !(b|
00000540  25 2b 38 38 2b 33 32 2a  35 2b 32 30 29 0d 02 da  |%+88+32*5+20)...|
00000550  21 62 6f 61 72 64 28 31  2c 31 29 20 3d 20 21 28  |!board(1,1) = !(|
00000560  62 25 2b 38 38 2b 33 32  2a 36 2b 32 30 29 0d 02  |b%+88+32*6+20)..|
00000570  e4 21 62 6f 61 72 64 28  32 2c 31 29 20 3d 20 21  |.!board(2,1) = !|
00000580  28 62 25 2b 38 38 2b 33  32 2a 37 2b 32 30 29 0d  |(b%+88+32*7+20).|
00000590  02 ee 21 62 6f 61 72 64  28 33 2c 31 29 20 3d 20  |..!board(3,1) = |
000005a0  21 28 62 25 2b 38 38 2b  33 32 2a 38 2b 32 30 29  |!(b%+88+32*8+20)|
000005b0  0d 02 f8 25 c8 99 22 57  69 6d 70 5f 43 72 65 61  |...%.."Wimp_Crea|
000005c0  74 65 57 69 6e 64 6f 77  22 2c 2c 62 25 20 b8 20  |teWindow",,b% . |
000005d0  6d 61 69 6e 25 0d 03 02  1a c8 99 22 57 69 6d 70  |main%......"Wimp|
000005e0  5f 43 6c 6f 73 65 54 65  6d 70 6c 61 74 65 22 0d  |_CloseTemplate".|
000005f0  03 0c 05 e1 0d 03 16 05  3a 0d 03 20 16 dd 20 f2  |........:.. .. .|
00000600  75 70 64 61 74 65 69 63  6f 6e 28 6e 6f 69 29 0d  |updateicon(noi).|
00000610  03 2a 0e 62 25 21 30 3d  6d 61 69 6e 25 0d 03 34  |.*.b%!0=main%..4|
00000620  0c 62 25 21 34 3d 6e 6f  69 0d 03 3e 11 c8 99 20  |.b%!4=noi..>... |
00000630  26 34 30 30 43 45 2c 2c  62 25 0d 03 48 35 c8 99  |&400CE,,b%..H5..|
00000640  22 57 69 6d 70 5f 46 6f  72 63 65 52 65 64 72 61  |"Wimp_ForceRedra|
00000650  77 22 2c 6d 61 69 6e 25  2c 62 25 21 38 2c 62 25  |w",main%,b%!8,b%|
00000660  21 31 32 2c 62 25 21 31  36 2c 62 25 21 32 30 0d  |!12,b%!16,b%!20.|
00000670  03 52 05 e1 0d 03 5c 05  3a 0d 03 66 10 dd 20 f2  |.R....\.:..f.. .|
00000680  66 61 74 61 6c 28 74 24  29 0d 03 70 0a 65 25 21  |fatal(t$)..p.e%!|
00000690  30 3d 30 0d 03 7a 0e 24  28 65 25 2b 34 29 3d 74  |0=0..z.$(e%+4)=t|
000006a0  24 0d 03 84 1f c8 99 20  26 34 30 30 44 46 2c 65  |$...... &400DF,e|
000006b0  25 2c 25 31 30 30 31 2c  22 50 75 7a 7a 65 6c 22  |%,%1001,"Puzzel"|
000006c0  0d 03 8e 1b c8 99 20 22  57 69 6d 70 5f 43 72 65  |...... "Wimp_Cre|
000006d0  61 74 65 4d 65 6e 75 22  2c 2d 31 0d 03 98 0a f2  |ateMenu",-1.....|
000006e0  63 6c 6f 73 65 0d 03 a2  05 e1 0d 03 ac 05 3a 0d  |close.........:.|
000006f0  03 b6 13 dd 20 f2 6e 6f  6e 66 61 74 61 6c 28 74  |.... .nonfatal(t|
00000700  24 29 0d 03 c0 0a 65 25  21 30 3d 30 0d 03 ca 0e  |$)....e%!0=0....|
00000710  24 28 65 25 2b 34 29 3d  74 24 0d 03 d4 1f c8 99  |$(e%+4)=t$......|
00000720  20 26 34 30 30 44 46 2c  65 25 2c 25 31 30 31 30  | &400DF,e%,%1010|
00000730  2c 22 50 75 7a 7a 65 6c  22 0d 03 de 1b c8 99 20  |,"Puzzel"...... |
00000740  22 57 69 6d 70 5f 43 72  65 61 74 65 4d 65 6e 75  |"Wimp_CreateMenu|
00000750  22 2c 2d 31 0d 03 e8 05  e1 0d 03 f2 05 3a 0d 03  |",-1.........:..|
00000760  fc 0c dd 20 f2 65 72 72  6f 72 0d 04 06 09 ee 20  |... .error..... |
00000770  85 20 87 0d 04 10 2c 73  74 72 24 3d 22 42 61 73  |. ....,str$="Bas|
00000780  69 63 20 65 72 72 6f 72  3a 20 22 2b f6 24 2b 22  |ic error: "+.$+"|
00000790  20 61 74 20 6c 69 6e 65  20 22 2b c3 28 9e 29 0d  | at line "+.(.).|
000007a0  04 1a 10 f2 66 61 74 61  6c 28 73 74 72 24 29 0d  |....fatal(str$).|
000007b0  04 24 05 e1 0d 04 2e 05  3a 0d 04 38 16 dd f2 73  |.$......:..8...s|
000007c0  63 72 6f 6c 6c 78 28 72  6f 77 2c 64 69 72 29 0d  |crollx(row,dir).|
000007d0  04 42 19 74 65 6d 70 24  20 3d 20 24 62 6f 61 72  |.B.temp$ = $boar|
000007e0  64 28 31 2c 72 6f 77 29  0d 04 4c 0e e7 20 64 69  |d(1,row)..L.. di|
000007f0  72 3d 2d 31 20 8c 0d 04  56 21 24 62 6f 61 72 64  |r=-1 ...V!$board|
00000800  28 31 2c 72 6f 77 29 20  3d 20 24 62 6f 61 72 64  |(1,row) = $board|
00000810  28 32 2c 72 6f 77 29 0d  04 60 21 24 62 6f 61 72  |(2,row)..`!$boar|
00000820  64 28 32 2c 72 6f 77 29  20 3d 20 24 62 6f 61 72  |d(2,row) = $boar|
00000830  64 28 33 2c 72 6f 77 29  0d 04 6a 19 24 62 6f 61  |d(3,row)..j.$boa|
00000840  72 64 28 33 2c 72 6f 77  29 20 3d 20 74 65 6d 70  |rd(3,row) = temp|
00000850  24 0d 04 74 05 cc 0d 04  7e 21 24 62 6f 61 72 64  |$..t....~!$board|
00000860  28 31 2c 72 6f 77 29 20  3d 20 24 62 6f 61 72 64  |(1,row) = $board|
00000870  28 33 2c 72 6f 77 29 0d  04 88 21 24 62 6f 61 72  |(3,row)...!$boar|
00000880  64 28 33 2c 72 6f 77 29  20 3d 20 24 62 6f 61 72  |d(3,row) = $boar|
00000890  64 28 32 2c 72 6f 77 29  0d 04 92 19 24 62 6f 61  |d(2,row)....$boa|
000008a0  72 64 28 32 2c 72 6f 77  29 20 3d 20 74 65 6d 70  |rd(2,row) = temp|
000008b0  24 0d 04 9c 05 cd 0d 04  a6 0c c8 8e 20 72 6f 77  |$........... row|
000008c0  20 ca 0d 04 b0 34 c9 20  31 3a f2 75 70 64 61 74  | ....4. 1:.updat|
000008d0  65 69 63 6f 6e 28 36 29  3a f2 75 70 64 61 74 65  |eicon(6):.update|
000008e0  69 63 6f 6e 28 37 29 3a  f2 75 70 64 61 74 65 69  |icon(7):.updatei|
000008f0  63 6f 6e 28 38 29 0d 04  ba 34 c9 20 32 3a f2 75  |con(8)...4. 2:.u|
00000900  70 64 61 74 65 69 63 6f  6e 28 33 29 3a f2 75 70  |pdateicon(3):.up|
00000910  64 61 74 65 69 63 6f 6e  28 34 29 3a f2 75 70 64  |dateicon(4):.upd|
00000920  61 74 65 69 63 6f 6e 28  35 29 0d 04 c4 34 c9 20  |ateicon(5)...4. |
00000930  33 3a f2 75 70 64 61 74  65 69 63 6f 6e 28 30 29  |3:.updateicon(0)|
00000940  3a f2 75 70 64 61 74 65  69 63 6f 6e 28 31 29 3a  |:.updateicon(1):|
00000950  f2 75 70 64 61 74 65 69  63 6f 6e 28 32 29 0d 04  |.updateicon(2)..|
00000960  ce 05 cb 0d 04 d8 05 e1  0d 04 e2 05 3a 0d 04 ec  |............:...|
00000970  16 dd f2 73 63 72 6f 6c  6c 79 28 63 6f 6c 2c 64  |...scrolly(col,d|
00000980  69 72 29 0d 04 f6 19 74  65 6d 70 24 20 3d 20 24  |ir)....temp$ = $|
00000990  62 6f 61 72 64 28 63 6f  6c 2c 31 29 0d 05 00 0e  |board(col,1)....|
000009a0  e7 20 64 69 72 3d 2d 31  20 8c 0d 05 0a 21 24 62  |. dir=-1 ....!$b|
000009b0  6f 61 72 64 28 63 6f 6c  2c 31 29 20 3d 20 24 62  |oard(col,1) = $b|
000009c0  6f 61 72 64 28 63 6f 6c  2c 32 29 0d 05 14 21 24  |oard(col,2)...!$|
000009d0  62 6f 61 72 64 28 63 6f  6c 2c 32 29 20 3d 20 24  |board(col,2) = $|
000009e0  62 6f 61 72 64 28 63 6f  6c 2c 33 29 0d 05 1e 19  |board(col,3)....|
000009f0  24 62 6f 61 72 64 28 63  6f 6c 2c 33 29 20 3d 20  |$board(col,3) = |
00000a00  74 65 6d 70 24 0d 05 28  05 cc 0d 05 32 21 24 62  |temp$..(....2!$b|
00000a10  6f 61 72 64 28 63 6f 6c  2c 31 29 20 3d 20 24 62  |oard(col,1) = $b|
00000a20  6f 61 72 64 28 63 6f 6c  2c 33 29 0d 05 3c 21 24  |oard(col,3)..<!$|
00000a30  62 6f 61 72 64 28 63 6f  6c 2c 33 29 20 3d 20 24  |board(col,3) = $|
00000a40  62 6f 61 72 64 28 63 6f  6c 2c 32 29 0d 05 46 19  |board(col,2)..F.|
00000a50  24 62 6f 61 72 64 28 63  6f 6c 2c 32 29 20 3d 20  |$board(col,2) = |
00000a60  74 65 6d 70 24 0d 05 50  05 cd 0d 05 5a 0c c8 8e  |temp$..P....Z...|
00000a70  20 63 6f 6c 20 ca 0d 05  64 34 c9 20 31 3a f2 75  | col ...d4. 1:.u|
00000a80  70 64 61 74 65 69 63 6f  6e 28 30 29 3a f2 75 70  |pdateicon(0):.up|
00000a90  64 61 74 65 69 63 6f 6e  28 33 29 3a f2 75 70 64  |dateicon(3):.upd|
00000aa0  61 74 65 69 63 6f 6e 28  36 29 0d 05 6e 34 c9 20  |ateicon(6)..n4. |
00000ab0  32 3a f2 75 70 64 61 74  65 69 63 6f 6e 28 31 29  |2:.updateicon(1)|
00000ac0  3a f2 75 70 64 61 74 65  69 63 6f 6e 28 34 29 3a  |:.updateicon(4):|
00000ad0  f2 75 70 64 61 74 65 69  63 6f 6e 28 37 29 0d 05  |.updateicon(7)..|
00000ae0  78 34 c9 20 33 3a f2 75  70 64 61 74 65 69 63 6f  |x4. 3:.updateico|
00000af0  6e 28 32 29 3a f2 75 70  64 61 74 65 69 63 6f 6e  |n(2):.updateicon|
00000b00  28 35 29 3a f2 75 70 64  61 74 65 69 63 6f 6e 28  |(5):.updateicon(|
00000b10  38 29 0d 05 82 05 cb 0d  05 8c 05 e1 0d 05 96 05  |8)..............|
00000b20  3a 0d 05 a0 0f dd f2 63  68 65 63 6b 5f 77 6f 6e  |:......check_won|
00000b30  0d 05 aa 3b e7 20 24 62  6f 61 72 64 28 31 2c 33  |...;. $board(1,3|
00000b40  29 3d 22 31 22 20 80 20  24 62 6f 61 72 64 28 32  |)="1" . $board(2|
00000b50  2c 33 29 3d 22 32 22 20  80 20 24 62 6f 61 72 64  |,3)="2" . $board|
00000b60  28 33 2c 33 29 3d 22 33  22 20 8c 0d 05 b4 3b e7  |(3,3)="3" ....;.|
00000b70  20 24 62 6f 61 72 64 28  31 2c 32 29 3d 22 34 22  | $board(1,2)="4"|
00000b80  20 80 20 24 62 6f 61 72  64 28 32 2c 32 29 3d 22  | . $board(2,2)="|
00000b90  35 22 20 80 20 24 62 6f  61 72 64 28 33 2c 32 29  |5" . $board(3,2)|
00000ba0  3d 22 36 22 20 8c 0d 05  be 3b e7 20 24 62 6f 61  |="6" ....;. $boa|
00000bb0  72 64 28 31 2c 31 29 3d  22 37 22 20 80 20 24 62  |rd(1,1)="7" . $b|
00000bc0  6f 61 72 64 28 32 2c 31  29 3d 22 38 22 20 80 20  |oard(2,1)="8" . |
00000bd0  24 62 6f 61 72 64 28 33  2c 31 29 3d 22 39 22 20  |$board(3,1)="9" |
00000be0  8c 0d 05 c8 08 f2 77 6f  6e 0d 05 d2 05 cd 0d 05  |......won.......|
00000bf0  dc 05 cd 0d 05 e6 05 cd  0d 05 f0 05 e1 0d 05 fa  |................|
00000c00  05 3a 0d 06 04 09 dd f2  77 6f 6e 0d 06 0e 0a 62  |.:......won....b|
00000c10  25 21 30 3d 30 0d 06 18  3c 24 28 62 25 2b 34 29  |%!0=0...<$(b%+4)|
00000c20  3d 22 57 65 6c 6c 20 44  6f 6e 65 21 20 59 6f 75  |="Well Done! You|
00000c30  20 68 61 76 65 20 63 6f  6d 70 6c 65 74 65 64 20  | have completed |
00000c40  74 68 65 20 6d 69 6e 69  2d 70 75 7a 7a 65 6c 2e  |the mini-puzzel.|
00000c50  22 0d 06 22 3e c8 99 20  22 57 69 6d 70 5f 52 65  |"..">.. "Wimp_Re|
00000c60  70 6f 72 74 45 72 72 6f  72 22 2c 62 25 2c 25 31  |portError",b%,%1|
00000c70  31 30 30 31 2c 22 4d 65  73 73 61 67 65 20 66 72  |1001,"Message fr|
00000c80  6f 6d 20 4d 69 6e 69 2d  50 75 7a 7a 65 6c 22 0d  |om Mini-Puzzel".|
00000c90  06 2c 0b f2 72 61 6e 64  6f 6d 0d 06 36 05 e1 0d  |.,..random..6...|
00000ca0  06 40 05 3a 0d 06 4a 0c  dd f2 72 61 6e 64 6f 6d  |.@.:..J...random|
00000cb0  0d 06 54 0e e3 20 54 3d  31 20 b8 20 32 30 0d 06  |..T.. T=1 . 20..|
00000cc0  5e 3f f2 73 63 72 6f 6c  6c 78 28 b3 28 33 29 2c  |^?.scrollx(.(3),|
00000cd0  28 28 b3 28 32 29 2d 31  29 2a 32 29 2d 31 29 3a  |((.(2)-1)*2)-1):|
00000ce0  f2 73 63 72 6f 6c 6c 79  28 b3 28 33 29 2c 28 28  |.scrolly(.(3),((|
00000cf0  b3 28 32 29 2d 31 29 2a  32 29 2d 31 29 0d 06 68  |.(2)-1)*2)-1)..h|
00000d00  07 ed 20 54 0d 06 72 05  e1 0d ff                 |.. T..r....|
00000d0b