� > TUNNEL16

	�20:�
(P� CX(180),CY(180),RGB%(3,16),BGR%(3,16),G%(3),CH%(3),RM%(15),GM%(15),BM%(15)
25�N%=1�180:T=�(2*N%):CX(N%)=840*�T:CY(N%)=840*�T:�
<:�N%=0�7:RGB%(1,N%)=255:RGB%(2,N%)=32*N%:RGB%(3,N%)=0:�
FB�N%=0�7:RGB%(1,N%+8)=255:RGB%(2,N%+8)=255:RGB%(3,N%+8)=32*N%:�
P3�N%=0�15:�N%,RGB%(1,N%),RGB%(2,N%),RGB%(3,N%):�
Z
d/�I%=1�127:�P(2*I%):�640+CX(180),512+CY(180)
n<�N%=1�180:D=1-�(1)/30:�640,512:�85,640+CX(N%),512+CY(N%)
x&CX(N%)=CX(N%)*D:CY(N%)=CY(N%)*D:�,
�
��
�FK%=�(7):G%(1)=RGB%(1,16):G%(2)=RGB%(2,16):G%(3)=RGB%(3,16):CH%()=0
�*�K%�1 CH%(1)=32:� G%(1)>128 CH%(1)=-32
�*�K%�2 CH%(2)=32:� G%(2)>128 CH%(2)=-32
�*�K%�4 CH%(3)=32:� G%(3)>128 CH%(3)=-32
��I%=1�7:BGR%()=RGB%()
�1�N%=1�16:�M%=1�3:RGB%(M%,N%-1)=RGB%(M%,N%):�,
�-G%(1)+=CH%(1):G%(2)+=CH%(2):G%(3)+=CH%(3)
�6RGB%(1,16)=G%(1):RGB%(2,16)=G%(2):RGB%(3,16)=G%(3)
��M%=0�15:M1%=15-M%
��N%=0�15
�-RM%(N%)=(RGB%(1,N%)*M%+BGR%(1,N%)*M1%)/16

-GM%(N%)=(RGB%(2,N%)*M%+BGR%(2,N%)*M1%)/16

-BM%(N%)=(RGB%(3,N%)*M%+BGR%(3,N%)*M1%)/16

�

"*�N%=0�15:�N%,RM%(N%),GM%(N%),BM%(N%):�

,�,

6�0

@

J��P(P%)

T<� A%,B%,C%,P1%,P2%,C1%,C2%,N%,M%,T1$(),T2$(),D1%(),D2%()

^!� T1$(4),T2$(4),D1%(4),D2%(4)

hA%=P%�16:B%=P%�16

r�A%=15 B%=0

|�A%=0 A%=1:B%=0

�
� �tTB

��N%=1�4:�P1%,P2%

�&� B%<P1% T1$(N%)="0" � T1$(N%)="1"

�(� B%<P2% T1$(N%)+="0" � T1$(N%)+="1"

��

��N%=1�4:�P1%,P2%

�&� B%<P1% T2$(N%)="0" � T2$(N%)="1"

�(� B%<P2% T2$(N%)+="0" � T2$(N%)+="1"

��

��M%=1�4

�#C1%=A%:� �T1$(M%),1)="1" C1%+=1

�#C2%=A%:� �T1$(M%),1)="1" C2%+=1

�C%=8:�N%=1�4
)D1%(M%)=D1%(M%)*2:� C%�C1% D1%(M%)+=1
)D1%(M%)=D1%(M%)*2:� C%�C2% D1%(M%)+=1

C%=C%/2:�
&#C1%=A%:� �T2$(M%),1)="1" C1%+=1
0#C2%=A%:� �T2$(M%),1)="1" C2%+=1
:C%=8:�N%=1�4
D)D2%(M%)=D2%(M%)*2:� C%�C1% D2%(M%)+=1
N)D2%(M%)=D2%(M%)*2:� C%�C2% D2%(M%)+=1
XC%=C%/2:�,
bA�23,2,D1%(1),D1%(2),D1%(3),D1%(4),D1%(1),D1%(2),D1%(3),D1%(4)
lA�23,3,D2%(1),D2%(2),D2%(3),D2%(4),D2%(1),D2%(2),D2%(3),D2%(4)
vA�23,4,D1%(1),D1%(2),D1%(3),D1%(4),D1%(1),D1%(2),D1%(3),D1%(4)
�A�23,5,D2%(1),D2%(2),D2%(3),D2%(4),D2%(1),D2%(2),D2%(3),D2%(4)
�	�80,0
�,� 16,8,4,12,14,6,2,10,13,5,1,9,15,7,3,11
��
�

00000000  0d 00 0a 10 f4 20 3e 20  54 55 4e 4e 45 4c 31 36  |..... > TUNNEL16|
00000010  0d 00 14 04 0d 00 1e 09  eb 32 30 3a 87 0d 00 28  |.........20:...(|
00000020  50 de 20 43 58 28 31 38  30 29 2c 43 59 28 31 38  |P. CX(180),CY(18|
00000030  30 29 2c 52 47 42 25 28  33 2c 31 36 29 2c 42 47  |0),RGB%(3,16),BG|
00000040  52 25 28 33 2c 31 36 29  2c 47 25 28 33 29 2c 43  |R%(3,16),G%(3),C|
00000050  48 25 28 33 29 2c 52 4d  25 28 31 35 29 2c 47 4d  |H%(3),RM%(15),GM|
00000060  25 28 31 35 29 2c 42 4d  25 28 31 35 29 0d 00 32  |%(15),BM%(15)..2|
00000070  35 e3 4e 25 3d 31 b8 31  38 30 3a 54 3d b2 28 32  |5.N%=1.180:T=.(2|
00000080  2a 4e 25 29 3a 43 58 28  4e 25 29 3d 38 34 30 2a  |*N%):CX(N%)=840*|
00000090  b5 54 3a 43 59 28 4e 25  29 3d 38 34 30 2a 9b 54  |.T:CY(N%)=840*.T|
000000a0  3a ed 0d 00 3c 3a e3 4e  25 3d 30 b8 37 3a 52 47  |:...<:.N%=0.7:RG|
000000b0  42 25 28 31 2c 4e 25 29  3d 32 35 35 3a 52 47 42  |B%(1,N%)=255:RGB|
000000c0  25 28 32 2c 4e 25 29 3d  33 32 2a 4e 25 3a 52 47  |%(2,N%)=32*N%:RG|
000000d0  42 25 28 33 2c 4e 25 29  3d 30 3a ed 0d 00 46 42  |B%(3,N%)=0:...FB|
000000e0  e3 4e 25 3d 30 b8 37 3a  52 47 42 25 28 31 2c 4e  |.N%=0.7:RGB%(1,N|
000000f0  25 2b 38 29 3d 32 35 35  3a 52 47 42 25 28 32 2c  |%+8)=255:RGB%(2,|
00000100  4e 25 2b 38 29 3d 32 35  35 3a 52 47 42 25 28 33  |N%+8)=255:RGB%(3|
00000110  2c 4e 25 2b 38 29 3d 33  32 2a 4e 25 3a ed 0d 00  |,N%+8)=32*N%:...|
00000120  50 33 e3 4e 25 3d 30 b8  31 35 3a fb 4e 25 2c 52  |P3.N%=0.15:.N%,R|
00000130  47 42 25 28 31 2c 4e 25  29 2c 52 47 42 25 28 32  |GB%(1,N%),RGB%(2|
00000140  2c 4e 25 29 2c 52 47 42  25 28 33 2c 4e 25 29 3a  |,N%),RGB%(3,N%):|
00000150  ed 0d 00 5a 04 0d 00 64  2f e3 49 25 3d 31 b8 31  |...Z...d/.I%=1.1|
00000160  32 37 3a f2 50 28 32 2a  49 25 29 3a ec 36 34 30  |27:.P(2*I%):.640|
00000170  2b 43 58 28 31 38 30 29  2c 35 31 32 2b 43 59 28  |+CX(180),512+CY(|
00000180  31 38 30 29 0d 00 6e 3c  e3 4e 25 3d 31 b8 31 38  |180)..n<.N%=1.18|
00000190  30 3a 44 3d 31 2d b3 28  31 29 2f 33 30 3a ec 36  |0:D=1-.(1)/30:.6|
000001a0  34 30 2c 35 31 32 3a f0  38 35 2c 36 34 30 2b 43  |40,512:.85,640+C|
000001b0  58 28 4e 25 29 2c 35 31  32 2b 43 59 28 4e 25 29  |X(N%),512+CY(N%)|
000001c0  0d 00 78 26 43 58 28 4e  25 29 3d 43 58 28 4e 25  |..x&CX(N%)=CX(N%|
000001d0  29 2a 44 3a 43 59 28 4e  25 29 3d 43 59 28 4e 25  |)*D:CY(N%)=CY(N%|
000001e0  29 2a 44 3a ed 2c 0d 00  82 04 0d 00 8c 05 f5 0d  |)*D:.,..........|
000001f0  00 96 46 4b 25 3d b3 28  37 29 3a 47 25 28 31 29  |..FK%=.(7):G%(1)|
00000200  3d 52 47 42 25 28 31 2c  31 36 29 3a 47 25 28 32  |=RGB%(1,16):G%(2|
00000210  29 3d 52 47 42 25 28 32  2c 31 36 29 3a 47 25 28  |)=RGB%(2,16):G%(|
00000220  33 29 3d 52 47 42 25 28  33 2c 31 36 29 3a 43 48  |3)=RGB%(3,16):CH|
00000230  25 28 29 3d 30 0d 00 a0  2a e7 4b 25 80 31 20 43  |%()=0...*.K%.1 C|
00000240  48 25 28 31 29 3d 33 32  3a e7 20 47 25 28 31 29  |H%(1)=32:. G%(1)|
00000250  3e 31 32 38 20 43 48 25  28 31 29 3d 2d 33 32 0d  |>128 CH%(1)=-32.|
00000260  00 aa 2a e7 4b 25 80 32  20 43 48 25 28 32 29 3d  |..*.K%.2 CH%(2)=|
00000270  33 32 3a e7 20 47 25 28  32 29 3e 31 32 38 20 43  |32:. G%(2)>128 C|
00000280  48 25 28 32 29 3d 2d 33  32 0d 00 b4 2a e7 4b 25  |H%(2)=-32...*.K%|
00000290  80 34 20 43 48 25 28 33  29 3d 33 32 3a e7 20 47  |.4 CH%(3)=32:. G|
000002a0  25 28 33 29 3e 31 32 38  20 43 48 25 28 33 29 3d  |%(3)>128 CH%(3)=|
000002b0  2d 33 32 0d 00 be 19 e3  49 25 3d 31 b8 37 3a 42  |-32.....I%=1.7:B|
000002c0  47 52 25 28 29 3d 52 47  42 25 28 29 0d 00 c8 31  |GR%()=RGB%()...1|
000002d0  e3 4e 25 3d 31 b8 31 36  3a e3 4d 25 3d 31 b8 33  |.N%=1.16:.M%=1.3|
000002e0  3a 52 47 42 25 28 4d 25  2c 4e 25 2d 31 29 3d 52  |:RGB%(M%,N%-1)=R|
000002f0  47 42 25 28 4d 25 2c 4e  25 29 3a ed 2c 0d 00 d2  |GB%(M%,N%):.,...|
00000300  2d 47 25 28 31 29 2b 3d  43 48 25 28 31 29 3a 47  |-G%(1)+=CH%(1):G|
00000310  25 28 32 29 2b 3d 43 48  25 28 32 29 3a 47 25 28  |%(2)+=CH%(2):G%(|
00000320  33 29 2b 3d 43 48 25 28  33 29 0d 00 dc 36 52 47  |3)+=CH%(3)...6RG|
00000330  42 25 28 31 2c 31 36 29  3d 47 25 28 31 29 3a 52  |B%(1,16)=G%(1):R|
00000340  47 42 25 28 32 2c 31 36  29 3d 47 25 28 32 29 3a  |GB%(2,16)=G%(2):|
00000350  52 47 42 25 28 33 2c 31  36 29 3d 47 25 28 33 29  |RGB%(3,16)=G%(3)|
00000360  0d 00 e6 16 e3 4d 25 3d  30 b8 31 35 3a 4d 31 25  |.....M%=0.15:M1%|
00000370  3d 31 35 2d 4d 25 0d 00  f0 0c e3 4e 25 3d 30 b8  |=15-M%.....N%=0.|
00000380  31 35 0d 00 fa 2d 52 4d  25 28 4e 25 29 3d 28 52  |15...-RM%(N%)=(R|
00000390  47 42 25 28 31 2c 4e 25  29 2a 4d 25 2b 42 47 52  |GB%(1,N%)*M%+BGR|
000003a0  25 28 31 2c 4e 25 29 2a  4d 31 25 29 2f 31 36 0d  |%(1,N%)*M1%)/16.|
000003b0  01 04 2d 47 4d 25 28 4e  25 29 3d 28 52 47 42 25  |..-GM%(N%)=(RGB%|
000003c0  28 32 2c 4e 25 29 2a 4d  25 2b 42 47 52 25 28 32  |(2,N%)*M%+BGR%(2|
000003d0  2c 4e 25 29 2a 4d 31 25  29 2f 31 36 0d 01 0e 2d  |,N%)*M1%)/16...-|
000003e0  42 4d 25 28 4e 25 29 3d  28 52 47 42 25 28 33 2c  |BM%(N%)=(RGB%(3,|
000003f0  4e 25 29 2a 4d 25 2b 42  47 52 25 28 33 2c 4e 25  |N%)*M%+BGR%(3,N%|
00000400  29 2a 4d 31 25 29 2f 31  36 0d 01 18 05 ed 0d 01  |)*M1%)/16.......|
00000410  22 2a e3 4e 25 3d 30 b8  31 35 3a fb 4e 25 2c 52  |"*.N%=0.15:.N%,R|
00000420  4d 25 28 4e 25 29 2c 47  4d 25 28 4e 25 29 2c 42  |M%(N%),GM%(N%),B|
00000430  4d 25 28 4e 25 29 3a ed  0d 01 2c 06 ed 2c 0d 01  |M%(N%):...,..,..|
00000440  36 06 fd 30 0d 01 40 04  0d 01 4a 0b dd f2 50 28  |6..0..@...J...P(|
00000450  50 25 29 0d 01 54 3c ea  20 41 25 2c 42 25 2c 43  |P%)..T<. A%,B%,C|
00000460  25 2c 50 31 25 2c 50 32  25 2c 43 31 25 2c 43 32  |%,P1%,P2%,C1%,C2|
00000470  25 2c 4e 25 2c 4d 25 2c  54 31 24 28 29 2c 54 32  |%,N%,M%,T1$(),T2|
00000480  24 28 29 2c 44 31 25 28  29 2c 44 32 25 28 29 0d  |$(),D1%(),D2%().|
00000490  01 5e 21 de 20 54 31 24  28 34 29 2c 54 32 24 28  |.^!. T1$(4),T2$(|
000004a0  34 29 2c 44 31 25 28 34  29 2c 44 32 25 28 34 29  |4),D1%(4),D2%(4)|
000004b0  0d 01 68 15 41 25 3d 50  25 81 31 36 3a 42 25 3d  |..h.A%=P%.16:B%=|
000004c0  50 25 83 31 36 0d 01 72  0f e7 41 25 3d 31 35 20  |P%.16..r..A%=15 |
000004d0  42 25 3d 30 0d 01 7c 13  e7 41 25 3d 30 20 41 25  |B%=0..|..A%=0 A%|
000004e0  3d 31 3a 42 25 3d 30 0d  01 86 0a f7 20 8d 74 54  |=1:B%=0..... .tT|
000004f0  42 0d 01 90 14 e3 4e 25  3d 31 b8 34 3a f3 50 31  |B.....N%=1.4:.P1|
00000500  25 2c 50 32 25 0d 01 9a  26 e7 20 42 25 3c 50 31  |%,P2%...&. B%<P1|
00000510  25 20 54 31 24 28 4e 25  29 3d 22 30 22 20 8b 20  |% T1$(N%)="0" . |
00000520  54 31 24 28 4e 25 29 3d  22 31 22 0d 01 a4 28 e7  |T1$(N%)="1"...(.|
00000530  20 42 25 3c 50 32 25 20  54 31 24 28 4e 25 29 2b  | B%<P2% T1$(N%)+|
00000540  3d 22 30 22 20 8b 20 54  31 24 28 4e 25 29 2b 3d  |="0" . T1$(N%)+=|
00000550  22 31 22 0d 01 ae 05 ed  0d 01 b8 14 e3 4e 25 3d  |"1"..........N%=|
00000560  31 b8 34 3a f3 50 31 25  2c 50 32 25 0d 01 c2 26  |1.4:.P1%,P2%...&|
00000570  e7 20 42 25 3c 50 31 25  20 54 32 24 28 4e 25 29  |. B%<P1% T2$(N%)|
00000580  3d 22 30 22 20 8b 20 54  32 24 28 4e 25 29 3d 22  |="0" . T2$(N%)="|
00000590  31 22 0d 01 cc 28 e7 20  42 25 3c 50 32 25 20 54  |1"...(. B%<P2% T|
000005a0  32 24 28 4e 25 29 2b 3d  22 30 22 20 8b 20 54 32  |2$(N%)+="0" . T2|
000005b0  24 28 4e 25 29 2b 3d 22  31 22 0d 01 d6 05 ed 0d  |$(N%)+="1"......|
000005c0  01 e0 0b e3 4d 25 3d 31  b8 34 0d 01 ea 23 43 31  |....M%=1.4...#C1|
000005d0  25 3d 41 25 3a e7 20 c0  54 31 24 28 4d 25 29 2c  |%=A%:. .T1$(M%),|
000005e0  31 29 3d 22 31 22 20 43  31 25 2b 3d 31 0d 01 f4  |1)="1" C1%+=1...|
000005f0  23 43 32 25 3d 41 25 3a  e7 20 c2 54 31 24 28 4d  |#C2%=A%:. .T1$(M|
00000600  25 29 2c 31 29 3d 22 31  22 20 43 32 25 2b 3d 31  |%),1)="1" C2%+=1|
00000610  0d 01 fe 10 43 25 3d 38  3a e3 4e 25 3d 31 b8 34  |....C%=8:.N%=1.4|
00000620  0d 02 08 29 44 31 25 28  4d 25 29 3d 44 31 25 28  |...)D1%(M%)=D1%(|
00000630  4d 25 29 2a 32 3a e7 20  43 25 80 43 31 25 20 44  |M%)*2:. C%.C1% D|
00000640  31 25 28 4d 25 29 2b 3d  31 0d 02 12 29 44 31 25  |1%(M%)+=1...)D1%|
00000650  28 4d 25 29 3d 44 31 25  28 4d 25 29 2a 32 3a e7  |(M%)=D1%(M%)*2:.|
00000660  20 43 25 80 43 32 25 20  44 31 25 28 4d 25 29 2b  | C%.C2% D1%(M%)+|
00000670  3d 31 0d 02 1c 0d 43 25  3d 43 25 2f 32 3a ed 0d  |=1....C%=C%/2:..|
00000680  02 26 23 43 31 25 3d 41  25 3a e7 20 c0 54 32 24  |.&#C1%=A%:. .T2$|
00000690  28 4d 25 29 2c 31 29 3d  22 31 22 20 43 31 25 2b  |(M%),1)="1" C1%+|
000006a0  3d 31 0d 02 30 23 43 32  25 3d 41 25 3a e7 20 c2  |=1..0#C2%=A%:. .|
000006b0  54 32 24 28 4d 25 29 2c  31 29 3d 22 31 22 20 43  |T2$(M%),1)="1" C|
000006c0  32 25 2b 3d 31 0d 02 3a  10 43 25 3d 38 3a e3 4e  |2%+=1..:.C%=8:.N|
000006d0  25 3d 31 b8 34 0d 02 44  29 44 32 25 28 4d 25 29  |%=1.4..D)D2%(M%)|
000006e0  3d 44 32 25 28 4d 25 29  2a 32 3a e7 20 43 25 80  |=D2%(M%)*2:. C%.|
000006f0  43 31 25 20 44 32 25 28  4d 25 29 2b 3d 31 0d 02  |C1% D2%(M%)+=1..|
00000700  4e 29 44 32 25 28 4d 25  29 3d 44 32 25 28 4d 25  |N)D2%(M%)=D2%(M%|
00000710  29 2a 32 3a e7 20 43 25  80 43 32 25 20 44 32 25  |)*2:. C%.C2% D2%|
00000720  28 4d 25 29 2b 3d 31 0d  02 58 0e 43 25 3d 43 25  |(M%)+=1..X.C%=C%|
00000730  2f 32 3a ed 2c 0d 02 62  41 ef 32 33 2c 32 2c 44  |/2:.,..bA.23,2,D|
00000740  31 25 28 31 29 2c 44 31  25 28 32 29 2c 44 31 25  |1%(1),D1%(2),D1%|
00000750  28 33 29 2c 44 31 25 28  34 29 2c 44 31 25 28 31  |(3),D1%(4),D1%(1|
00000760  29 2c 44 31 25 28 32 29  2c 44 31 25 28 33 29 2c  |),D1%(2),D1%(3),|
00000770  44 31 25 28 34 29 0d 02  6c 41 ef 32 33 2c 33 2c  |D1%(4)..lA.23,3,|
00000780  44 32 25 28 31 29 2c 44  32 25 28 32 29 2c 44 32  |D2%(1),D2%(2),D2|
00000790  25 28 33 29 2c 44 32 25  28 34 29 2c 44 32 25 28  |%(3),D2%(4),D2%(|
000007a0  31 29 2c 44 32 25 28 32  29 2c 44 32 25 28 33 29  |1),D2%(2),D2%(3)|
000007b0  2c 44 32 25 28 34 29 0d  02 76 41 ef 32 33 2c 34  |,D2%(4)..vA.23,4|
000007c0  2c 44 31 25 28 31 29 2c  44 31 25 28 32 29 2c 44  |,D1%(1),D1%(2),D|
000007d0  31 25 28 33 29 2c 44 31  25 28 34 29 2c 44 31 25  |1%(3),D1%(4),D1%|
000007e0  28 31 29 2c 44 31 25 28  32 29 2c 44 31 25 28 33  |(1),D1%(2),D1%(3|
000007f0  29 2c 44 31 25 28 34 29  0d 02 80 41 ef 32 33 2c  |),D1%(4)...A.23,|
00000800  35 2c 44 32 25 28 31 29  2c 44 32 25 28 32 29 2c  |5,D2%(1),D2%(2),|
00000810  44 32 25 28 33 29 2c 44  32 25 28 34 29 2c 44 32  |D2%(3),D2%(4),D2|
00000820  25 28 31 29 2c 44 32 25  28 32 29 2c 44 32 25 28  |%(1),D2%(2),D2%(|
00000830  33 29 2c 44 32 25 28 34  29 0d 02 8a 09 e6 38 30  |3),D2%(4).....80|
00000840  2c 30 0d 02 94 2c dc 20  31 36 2c 38 2c 34 2c 31  |,0...,. 16,8,4,1|
00000850  32 2c 31 34 2c 36 2c 32  2c 31 30 2c 31 33 2c 35  |2,14,6,2,10,13,5|
00000860  2c 31 2c 39 2c 31 35 2c  37 2c 33 2c 31 31 0d 02  |,1,9,15,7,3,11..|
00000870  9e 05 e1 0d ff                                    |.....|
00000875