� >Taglia
� by dL 31Jul95
ț "PROCmode"
(�mode("X800 Y600 C32T"):�
2m=10
<� x(m-1),y(m-1)
F	x=800
P	y=600
Z	x()=x
d	y()=y
na=�(1)*360
xt=0
�r=�(1)*3+0.2
�g=�(1)*3+0.2
�b=�(1)*3+0.2
�n=0
��
� d=�(1)*180-90
� l=�(15)+12
� � i=0 � l-1
�  x+=��(a)*2
�  y+=��(a)*2
�
  t+=1
�  � x>1600 x-=1600
�  � y>1200 y-=1200

  � x<0 x+=1600

  � y<0 y+=1200


  � 0,0,0

"  ȏ Ȑ x,y,8

,7  � 127+127*��(t*r),127+127*��(t*g),127+127*��(t*b)

6  ȏ Ȑ x(n),y(n),6

@  x(n)=x

J  y(n)=y

T  n=(n+1) � m

^  a+=d/l

h �

r a=a

|� 0
�

00000000  0d 00 0a 0d f4 20 3e 54  61 67 6c 69 61 0d 00 14  |..... >Taglia...|
00000010  13 f4 20 62 79 20 64 4c  20 33 31 4a 75 6c 39 35  |.. by dL 31Jul95|
00000020  0d 00 1e 11 c8 9b 20 22  50 52 4f 43 6d 6f 64 65  |...... "PROCmode|
00000030  22 0d 00 28 1d f2 6d 6f  64 65 28 22 58 38 30 30  |"..(..mode("X800|
00000040  20 59 36 30 30 20 43 33  32 54 22 29 3a 87 0d 00  | Y600 C32T"):...|
00000050  32 08 6d 3d 31 30 0d 00  3c 13 de 20 78 28 6d 2d  |2.m=10..<.. x(m-|
00000060  31 29 2c 79 28 6d 2d 31  29 0d 00 46 09 78 3d 38  |1),y(m-1)..F.x=8|
00000070  30 30 0d 00 50 09 79 3d  36 30 30 0d 00 5a 09 78  |00..P.y=600..Z.x|
00000080  28 29 3d 78 0d 00 64 09  79 28 29 3d 79 0d 00 6e  |()=x..d.y()=y..n|
00000090  0e 61 3d b3 28 31 29 2a  33 36 30 0d 00 78 07 74  |.a=.(1)*360..x.t|
000000a0  3d 30 0d 00 82 10 72 3d  b3 28 31 29 2a 33 2b 30  |=0....r=.(1)*3+0|
000000b0  2e 32 0d 00 8c 10 67 3d  b3 28 31 29 2a 33 2b 30  |.2....g=.(1)*3+0|
000000c0  2e 32 0d 00 96 10 62 3d  b3 28 31 29 2a 33 2b 30  |.2....b=.(1)*3+0|
000000d0  2e 32 0d 00 a0 07 6e 3d  30 0d 00 aa 05 f5 0d 00  |.2....n=0.......|
000000e0  b4 12 20 64 3d b3 28 31  29 2a 31 38 30 2d 39 30  |.. d=.(1)*180-90|
000000f0  0d 00 be 0f 20 6c 3d b3  28 31 35 29 2b 31 32 0d  |.... l=.(15)+12.|
00000100  00 c8 10 20 e3 20 69 3d  30 20 b8 20 6c 2d 31 0d  |... . i=0 . l-1.|
00000110  00 d2 10 20 20 78 2b 3d  b5 b2 28 61 29 2a 32 0d  |...  x+=..(a)*2.|
00000120  00 dc 10 20 20 79 2b 3d  9b b2 28 61 29 2a 32 0d  |...  y+=..(a)*2.|
00000130  00 e6 0a 20 20 74 2b 3d  31 0d 00 f0 16 20 20 e7  |...  t+=1....  .|
00000140  20 78 3e 31 36 30 30 20  78 2d 3d 31 36 30 30 0d  | x>1600 x-=1600.|
00000150  00 fa 16 20 20 e7 20 79  3e 31 32 30 30 20 79 2d  |...  . y>1200 y-|
00000160  3d 31 32 30 30 0d 01 04  13 20 20 e7 20 78 3c 30  |=1200....  . x<0|
00000170  20 78 2b 3d 31 36 30 30  0d 01 0e 13 20 20 e7 20  | x+=1600....  . |
00000180  79 3c 30 20 79 2b 3d 31  32 30 30 0d 01 18 0d 20  |y<0 y+=1200.... |
00000190  20 e6 20 30 2c 30 2c 30  0d 01 22 11 20 20 c8 8f  | . 0,0,0..".  ..|
000001a0  20 c8 90 20 78 2c 79 2c  38 0d 01 2c 37 20 20 e6  | .. x,y,8..,7  .|
000001b0  20 31 32 37 2b 31 32 37  2a b5 b2 28 74 2a 72 29  | 127+127*..(t*r)|
000001c0  2c 31 32 37 2b 31 32 37  2a b5 b2 28 74 2a 67 29  |,127+127*..(t*g)|
000001d0  2c 31 32 37 2b 31 32 37  2a b5 b2 28 74 2a 62 29  |,127+127*..(t*b)|
000001e0  0d 01 36 17 20 20 c8 8f  20 c8 90 20 78 28 6e 29  |..6.  .. .. x(n)|
000001f0  2c 79 28 6e 29 2c 36 0d  01 40 0c 20 20 78 28 6e  |,y(n),6..@.  x(n|
00000200  29 3d 78 0d 01 4a 0c 20  20 79 28 6e 29 3d 79 0d  |)=x..J.  y(n)=y.|
00000210  01 54 11 20 20 6e 3d 28  6e 2b 31 29 20 83 20 6d  |.T.  n=(n+1) . m|
00000220  0d 01 5e 0c 20 20 61 2b  3d 64 2f 6c 0d 01 68 06  |..^.  a+=d/l..h.|
00000230  20 ed 0d 01 72 08 20 61  3d 61 0d 01 7c 07 fd 20  | ...r. a=a..|.. |
00000240  30 0d ff                                          |0..|
00000243