�     >Shatter
� By  Jan Vibe
� For 32-bit machines
(� (c) BAU November 1993
2:
<	� 140
F� 12
P�
Z>� vert_x%(50,15),vert_y%(50,15),nvert%(50),ax%(15),ay%(15)
d	s1%=1
n	s2%=2
x� � �err:�
��
� v%=�(6)+2
� nvert%(1)=v%
�
 d=360/v%
� � n%=1 � v%
�  t=�(360-n%*d)
�   vert_x%(1,n%)=640+500*�(t)
�   vert_y%(1,n%)=512+500*�(t)
� �
� � i%=1 � 49
�  � i%=1 �
�   r%=1
�  �


   max%=0

   � n%=1 � i%


    x1%=0

"
    y1%=0

,    � m%=1 � nvert%(n%)

6     x1%+=vert_x%(n%,m%)

@     y1%+=vert_y%(n%,m%)

J	    �

T    x1%=x1%/nvert%(n%)

^    y1%=y1%/nvert%(n%)

h    a%=0

r    � m%=1 � nvert%(n%)

|     m1%=m% � nvert%(n%)+1

�     x2%=vert_x%(n%,m%)

�     y2%=vert_y%(n%,m%)

�     x3%=vert_x%(n%,m1%)

�     y3%=vert_y%(n%,m1%)

�@     a%+=(x1%*y2%+y1%*x3%+y3%*x2%-y2%*x3%-y1%*x2%-x1%*y3%)/2

�	    �

�    � a%>max% max%=a%:r%=n%

�   �

�  �

�  p%=nvert%(r%)

�  � n%=1 � p%

�   ax%(n%)=vert_x%(r%,n%)

�   ay%(n%)=vert_y%(r%,n%)
  �

  l%=0
  � n%=1 � p%
&   n1%=n% � p%+1
03   g%=(ax%(n%)-ax%(n1%))^2+(ay%(n%)-ay%(n1%))^2
:   � g%>l% l%=g%:d11%=n%
D  �
N  �
X   d21%=�(p%)
b  � d11%<>d21%
l  � d11%>d21% Ȕ d11%,d21%
v  d12%=d11% � p%+1
�  d22%=d21% � p%+1
�  f1%=�(2)
�  f2%=3-f1%
�*  px1%=(f1%*ax%(d11%)+f2%*ax%(d12%))/3
�*  py1%=(f1%*ay%(d11%)+f2%*ay%(d12%))/3
�*  px2%=(f1%*ax%(d21%)+f2%*ax%(d22%))/3
�*  py2%=(f1%*ay%(d21%)+f2%*ay%(d22%))/3
�
  k%=0
�  � n%=1 � p%
�   k%+=1
�   vert_x%(r%,k%)=ax%(n%)
�   vert_y%(r%,k%)=ay%(n%)
�   � n%=d11% �

    k%+=1
    vert_x%(r%,k%)=px1%
    vert_y%(r%,k%)=py1%
 
    k%+=1
*    vert_x%(r%,k%)=px2%
4    vert_y%(r%,k%)=py2%
>    n%=d21%
H   �
R  �
\  nvert%(r%)=k%
f
  q%=i%+1
p
  k%=1
z  vert_x%(q%,k%)=px1%
�  vert_y%(q%,k%)=py1%
�  � n%=d11%+1 � d21%
�   k%+=1
�   vert_x%(q%,k%)=ax%(n%)
�   vert_y%(q%,k%)=ay%(n%)
�  �
�  k%+=1
�  vert_x%(q%,k%)=px2%
�  vert_y%(q%,k%)=py2%
�  nvert%(q%)=k%
�  ș 6,112,s1%
�  ș 6,113,s2%
�  Ȗ
  �
  Ȕ s1%,s2%
  � n%=1 � i%+1
$
   �d(n%)
.  �
8 �
B Ȗ
L ș 6,112,s1%
V ș 6,113,s2%
` �
j Ȕ s1%,s2%
t
 k=�(500)
~� �
�:
�� �d(p%)
�� n%,cx%,cy%,x%,y%
�� n%=1 � nvert%(p%)
� cx%+=vert_x%(p%,n%)
� cy%+=vert_y%(p%,n%)
��
�cx%=cx%/nvert%(p%)
�cy%=cy%/nvert%(p%)
�+x%=(vert_x%(p%,nvert%(p%))-cx%)*0.7+cx%
�+y%=(vert_y%(p%,nvert%(p%))-cy%)*0.7+cy%
�� x%,y%
� n%=1 � nvert%(p%)

 � cx%,cy%
$ x%=(vert_x%(p%,n%)-cx%)*0.7+cx%
$ y%=(vert_y%(p%,n%)-cy%)*0.7+cy%
( � 85,x%,y%
2�
<�
F:
P
� �err
Zș 6,112,s1%
d�$" at line "Þ
n�
x�
�

00000000  0d 00 0a 12 f4 20 20 20  20 20 3e 53 68 61 74 74  |.....     >Shatt|
00000010  65 72 0d 00 14 12 f4 20  42 79 20 20 4a 61 6e 20  |er..... By  Jan |
00000020  56 69 62 65 0d 00 1e 19  f4 20 46 6f 72 20 33 32  |Vibe..... For 32|
00000030  2d 62 69 74 20 6d 61 63  68 69 6e 65 73 0d 00 28  |-bit machines..(|
00000040  1b f4 20 28 63 29 20 42  41 55 20 4e 6f 76 65 6d  |.. (c) BAU Novem|
00000050  62 65 72 20 31 39 39 33  0d 00 32 05 3a 0d 00 3c  |ber 1993..2.:..<|
00000060  09 eb 20 31 34 30 0d 00  46 08 eb 20 31 32 0d 00  |.. 140..F.. 12..|
00000070  50 05 87 0d 00 5a 3e de  20 76 65 72 74 5f 78 25  |P....Z>. vert_x%|
00000080  28 35 30 2c 31 35 29 2c  76 65 72 74 5f 79 25 28  |(50,15),vert_y%(|
00000090  35 30 2c 31 35 29 2c 6e  76 65 72 74 25 28 35 30  |50,15),nvert%(50|
000000a0  29 2c 61 78 25 28 31 35  29 2c 61 79 25 28 31 35  |),ax%(15),ay%(15|
000000b0  29 0d 00 64 09 73 31 25  3d 31 0d 00 6e 09 73 32  |)..d.s1%=1..n.s2|
000000c0  25 3d 32 0d 00 78 0e ee  20 85 20 f2 65 72 72 3a  |%=2..x.. . .err:|
000000d0  e0 0d 00 82 05 f5 0d 00  8c 0e 20 76 25 3d b3 28  |.......... v%=.(|
000000e0  36 29 2b 32 0d 00 96 11  20 6e 76 65 72 74 25 28  |6)+2.... nvert%(|
000000f0  31 29 3d 76 25 0d 00 a0  0d 20 64 3d 33 36 30 2f  |1)=v%.... d=360/|
00000100  76 25 0d 00 aa 10 20 e3  20 6e 25 3d 31 20 b8 20  |v%.... . n%=1 . |
00000110  76 25 0d 00 b4 13 20 20  74 3d b2 28 33 36 30 2d  |v%....  t=.(360-|
00000120  6e 25 2a 64 29 0d 00 be  20 20 20 76 65 72 74 5f  |n%*d)...   vert_|
00000130  78 25 28 31 2c 6e 25 29  3d 36 34 30 2b 35 30 30  |x%(1,n%)=640+500|
00000140  2a b5 28 74 29 0d 00 c8  20 20 20 76 65 72 74 5f  |*.(t)...   vert_|
00000150  79 25 28 31 2c 6e 25 29  3d 35 31 32 2b 35 30 30  |y%(1,n%)=512+500|
00000160  2a 9b 28 74 29 0d 00 d2  06 20 ed 0d 00 dc 10 20  |*.(t).... ..... |
00000170  e3 20 69 25 3d 31 20 b8  20 34 39 0d 00 e6 0e 20  |. i%=1 . 49.... |
00000180  20 e7 20 69 25 3d 31 20  8c 0d 00 f0 0b 20 20 20  | . i%=1 .....   |
00000190  72 25 3d 31 0d 00 fa 07  20 20 cc 0d 01 04 0d 20  |r%=1....  ..... |
000001a0  20 20 6d 61 78 25 3d 30  0d 01 0e 12 20 20 20 e3  |  max%=0....   .|
000001b0  20 6e 25 3d 31 20 b8 20  69 25 0d 01 18 0d 20 20  | n%=1 . i%....  |
000001c0  20 20 78 31 25 3d 30 0d  01 22 0d 20 20 20 20 79  |  x1%=0..".    y|
000001d0  31 25 3d 30 0d 01 2c 1b  20 20 20 20 e3 20 6d 25  |1%=0..,.    . m%|
000001e0  3d 31 20 b8 20 6e 76 65  72 74 25 28 6e 25 29 0d  |=1 . nvert%(n%).|
000001f0  01 36 1c 20 20 20 20 20  78 31 25 2b 3d 76 65 72  |.6.     x1%+=ver|
00000200  74 5f 78 25 28 6e 25 2c  6d 25 29 0d 01 40 1c 20  |t_x%(n%,m%)..@. |
00000210  20 20 20 20 79 31 25 2b  3d 76 65 72 74 5f 79 25  |    y1%+=vert_y%|
00000220  28 6e 25 2c 6d 25 29 0d  01 4a 09 20 20 20 20 ed  |(n%,m%)..J.    .|
00000230  0d 01 54 1a 20 20 20 20  78 31 25 3d 78 31 25 2f  |..T.    x1%=x1%/|
00000240  6e 76 65 72 74 25 28 6e  25 29 0d 01 5e 1a 20 20  |nvert%(n%)..^.  |
00000250  20 20 79 31 25 3d 79 31  25 2f 6e 76 65 72 74 25  |  y1%=y1%/nvert%|
00000260  28 6e 25 29 0d 01 68 0c  20 20 20 20 61 25 3d 30  |(n%)..h.    a%=0|
00000270  0d 01 72 1b 20 20 20 20  e3 20 6d 25 3d 31 20 b8  |..r.    . m%=1 .|
00000280  20 6e 76 65 72 74 25 28  6e 25 29 0d 01 7c 1e 20  | nvert%(n%)..|. |
00000290  20 20 20 20 6d 31 25 3d  6d 25 20 83 20 6e 76 65  |    m1%=m% . nve|
000002a0  72 74 25 28 6e 25 29 2b  31 0d 01 86 1b 20 20 20  |rt%(n%)+1....   |
000002b0  20 20 78 32 25 3d 76 65  72 74 5f 78 25 28 6e 25  |  x2%=vert_x%(n%|
000002c0  2c 6d 25 29 0d 01 90 1b  20 20 20 20 20 79 32 25  |,m%)....     y2%|
000002d0  3d 76 65 72 74 5f 79 25  28 6e 25 2c 6d 25 29 0d  |=vert_y%(n%,m%).|
000002e0  01 9a 1c 20 20 20 20 20  78 33 25 3d 76 65 72 74  |...     x3%=vert|
000002f0  5f 78 25 28 6e 25 2c 6d  31 25 29 0d 01 a4 1c 20  |_x%(n%,m1%).... |
00000300  20 20 20 20 79 33 25 3d  76 65 72 74 5f 79 25 28  |    y3%=vert_y%(|
00000310  6e 25 2c 6d 31 25 29 0d  01 ae 40 20 20 20 20 20  |n%,m1%)...@     |
00000320  61 25 2b 3d 28 78 31 25  2a 79 32 25 2b 79 31 25  |a%+=(x1%*y2%+y1%|
00000330  2a 78 33 25 2b 79 33 25  2a 78 32 25 2d 79 32 25  |*x3%+y3%*x2%-y2%|
00000340  2a 78 33 25 2d 79 31 25  2a 78 32 25 2d 78 31 25  |*x3%-y1%*x2%-x1%|
00000350  2a 79 33 25 29 2f 32 0d  01 b8 09 20 20 20 20 ed  |*y3%)/2....    .|
00000360  0d 01 c2 1f 20 20 20 20  e7 20 61 25 3e 6d 61 78  |....    . a%>max|
00000370  25 20 6d 61 78 25 3d 61  25 3a 72 25 3d 6e 25 0d  |% max%=a%:r%=n%.|
00000380  01 cc 08 20 20 20 ed 0d  01 d6 07 20 20 cd 0d 01  |...   .....  ...|
00000390  e0 13 20 20 70 25 3d 6e  76 65 72 74 25 28 72 25  |..  p%=nvert%(r%|
000003a0  29 0d 01 ea 11 20 20 e3  20 6e 25 3d 31 20 b8 20  |)....  . n%=1 . |
000003b0  70 25 0d 01 f4 1d 20 20  20 61 78 25 28 6e 25 29  |p%....   ax%(n%)|
000003c0  3d 76 65 72 74 5f 78 25  28 72 25 2c 6e 25 29 0d  |=vert_x%(r%,n%).|
000003d0  01 fe 1d 20 20 20 61 79  25 28 6e 25 29 3d 76 65  |...   ay%(n%)=ve|
000003e0  72 74 5f 79 25 28 72 25  2c 6e 25 29 0d 02 08 07  |rt_y%(r%,n%)....|
000003f0  20 20 ed 0d 02 12 0a 20  20 6c 25 3d 30 0d 02 1c  |  .....  l%=0...|
00000400  11 20 20 e3 20 6e 25 3d  31 20 b8 20 70 25 0d 02  |.  . n%=1 . p%..|
00000410  26 14 20 20 20 6e 31 25  3d 6e 25 20 83 20 70 25  |&.   n1%=n% . p%|
00000420  2b 31 0d 02 30 33 20 20  20 67 25 3d 28 61 78 25  |+1..03   g%=(ax%|
00000430  28 6e 25 29 2d 61 78 25  28 6e 31 25 29 29 5e 32  |(n%)-ax%(n1%))^2|
00000440  2b 28 61 79 25 28 6e 25  29 2d 61 79 25 28 6e 31  |+(ay%(n%)-ay%(n1|
00000450  25 29 29 5e 32 0d 02 3a  1c 20 20 20 e7 20 67 25  |%))^2..:.   . g%|
00000460  3e 6c 25 20 6c 25 3d 67  25 3a 64 31 31 25 3d 6e  |>l% l%=g%:d11%=n|
00000470  25 0d 02 44 07 20 20 ed  0d 02 4e 07 20 20 f5 0d  |%..D.  ...N.  ..|
00000480  02 58 11 20 20 20 64 32  31 25 3d b3 28 70 25 29  |.X.   d21%=.(p%)|
00000490  0d 02 62 12 20 20 fd 20  64 31 31 25 3c 3e 64 32  |..b.  . d11%<>d2|
000004a0  31 25 0d 02 6c 1e 20 20  e7 20 64 31 31 25 3e 64  |1%..l.  . d11%>d|
000004b0  32 31 25 20 c8 94 20 64  31 31 25 2c 64 32 31 25  |21% .. d11%,d21%|
000004c0  0d 02 76 16 20 20 64 31  32 25 3d 64 31 31 25 20  |..v.  d12%=d11% |
000004d0  83 20 70 25 2b 31 0d 02  80 16 20 20 64 32 32 25  |. p%+1....  d22%|
000004e0  3d 64 32 31 25 20 83 20  70 25 2b 31 0d 02 8a 0e  |=d21% . p%+1....|
000004f0  20 20 66 31 25 3d b3 28  32 29 0d 02 94 0f 20 20  |  f1%=.(2)....  |
00000500  66 32 25 3d 33 2d 66 31  25 0d 02 9e 2a 20 20 70  |f2%=3-f1%...*  p|
00000510  78 31 25 3d 28 66 31 25  2a 61 78 25 28 64 31 31  |x1%=(f1%*ax%(d11|
00000520  25 29 2b 66 32 25 2a 61  78 25 28 64 31 32 25 29  |%)+f2%*ax%(d12%)|
00000530  29 2f 33 0d 02 a8 2a 20  20 70 79 31 25 3d 28 66  |)/3...*  py1%=(f|
00000540  31 25 2a 61 79 25 28 64  31 31 25 29 2b 66 32 25  |1%*ay%(d11%)+f2%|
00000550  2a 61 79 25 28 64 31 32  25 29 29 2f 33 0d 02 b2  |*ay%(d12%))/3...|
00000560  2a 20 20 70 78 32 25 3d  28 66 31 25 2a 61 78 25  |*  px2%=(f1%*ax%|
00000570  28 64 32 31 25 29 2b 66  32 25 2a 61 78 25 28 64  |(d21%)+f2%*ax%(d|
00000580  32 32 25 29 29 2f 33 0d  02 bc 2a 20 20 70 79 32  |22%))/3...*  py2|
00000590  25 3d 28 66 31 25 2a 61  79 25 28 64 32 31 25 29  |%=(f1%*ay%(d21%)|
000005a0  2b 66 32 25 2a 61 79 25  28 64 32 32 25 29 29 2f  |+f2%*ay%(d22%))/|
000005b0  33 0d 02 c6 0a 20 20 6b  25 3d 30 0d 02 d0 11 20  |3....  k%=0.... |
000005c0  20 e3 20 6e 25 3d 31 20  b8 20 70 25 0d 02 da 0c  | . n%=1 . p%....|
000005d0  20 20 20 6b 25 2b 3d 31  0d 02 e4 1d 20 20 20 76  |   k%+=1....   v|
000005e0  65 72 74 5f 78 25 28 72  25 2c 6b 25 29 3d 61 78  |ert_x%(r%,k%)=ax|
000005f0  25 28 6e 25 29 0d 02 ee  1d 20 20 20 76 65 72 74  |%(n%)....   vert|
00000600  5f 79 25 28 72 25 2c 6b  25 29 3d 61 79 25 28 6e  |_y%(r%,k%)=ay%(n|
00000610  25 29 0d 02 f8 12 20 20  20 e7 20 6e 25 3d 64 31  |%)....   . n%=d1|
00000620  31 25 20 8c 0d 03 02 0d  20 20 20 20 6b 25 2b 3d  |1% .....    k%+=|
00000630  31 0d 03 0c 1b 20 20 20  20 76 65 72 74 5f 78 25  |1....    vert_x%|
00000640  28 72 25 2c 6b 25 29 3d  70 78 31 25 0d 03 16 1b  |(r%,k%)=px1%....|
00000650  20 20 20 20 76 65 72 74  5f 79 25 28 72 25 2c 6b  |    vert_y%(r%,k|
00000660  25 29 3d 70 79 31 25 0d  03 20 0d 20 20 20 20 6b  |%)=py1%.. .    k|
00000670  25 2b 3d 31 0d 03 2a 1b  20 20 20 20 76 65 72 74  |%+=1..*.    vert|
00000680  5f 78 25 28 72 25 2c 6b  25 29 3d 70 78 32 25 0d  |_x%(r%,k%)=px2%.|
00000690  03 34 1b 20 20 20 20 76  65 72 74 5f 79 25 28 72  |.4.    vert_y%(r|
000006a0  25 2c 6b 25 29 3d 70 79  32 25 0d 03 3e 0f 20 20  |%,k%)=py2%..>.  |
000006b0  20 20 6e 25 3d 64 32 31  25 0d 03 48 08 20 20 20  |  n%=d21%..H.   |
000006c0  cd 0d 03 52 07 20 20 ed  0d 03 5c 13 20 20 6e 76  |...R.  ...\.  nv|
000006d0  65 72 74 25 28 72 25 29  3d 6b 25 0d 03 66 0d 20  |ert%(r%)=k%..f. |
000006e0  20 71 25 3d 69 25 2b 31  0d 03 70 0a 20 20 6b 25  | q%=i%+1..p.  k%|
000006f0  3d 31 0d 03 7a 19 20 20  76 65 72 74 5f 78 25 28  |=1..z.  vert_x%(|
00000700  71 25 2c 6b 25 29 3d 70  78 31 25 0d 03 84 19 20  |q%,k%)=px1%.... |
00000710  20 76 65 72 74 5f 79 25  28 71 25 2c 6b 25 29 3d  | vert_y%(q%,k%)=|
00000720  70 79 31 25 0d 03 8e 18  20 20 e3 20 6e 25 3d 64  |py1%....  . n%=d|
00000730  31 31 25 2b 31 20 b8 20  64 32 31 25 0d 03 98 0c  |11%+1 . d21%....|
00000740  20 20 20 6b 25 2b 3d 31  0d 03 a2 1d 20 20 20 76  |   k%+=1....   v|
00000750  65 72 74 5f 78 25 28 71  25 2c 6b 25 29 3d 61 78  |ert_x%(q%,k%)=ax|
00000760  25 28 6e 25 29 0d 03 ac  1d 20 20 20 76 65 72 74  |%(n%)....   vert|
00000770  5f 79 25 28 71 25 2c 6b  25 29 3d 61 79 25 28 6e  |_y%(q%,k%)=ay%(n|
00000780  25 29 0d 03 b6 07 20 20  ed 0d 03 c0 0b 20 20 6b  |%)....  .....  k|
00000790  25 2b 3d 31 0d 03 ca 19  20 20 76 65 72 74 5f 78  |%+=1....  vert_x|
000007a0  25 28 71 25 2c 6b 25 29  3d 70 78 32 25 0d 03 d4  |%(q%,k%)=px2%...|
000007b0  19 20 20 76 65 72 74 5f  79 25 28 71 25 2c 6b 25  |.  vert_y%(q%,k%|
000007c0  29 3d 70 79 32 25 0d 03  de 13 20 20 6e 76 65 72  |)=py2%....  nver|
000007d0  74 25 28 71 25 29 3d 6b  25 0d 03 e8 12 20 20 c8  |t%(q%)=k%....  .|
000007e0  99 20 36 2c 31 31 32 2c  73 31 25 0d 03 f2 12 20  |. 6,112,s1%.... |
000007f0  20 c8 99 20 36 2c 31 31  33 2c 73 32 25 0d 03 fc  | .. 6,113,s2%...|
00000800  08 20 20 c8 96 0d 04 06  07 20 20 db 0d 04 10 10  |.  ......  .....|
00000810  20 20 c8 94 20 73 31 25  2c 73 32 25 0d 04 1a 13  |  .. s1%,s2%....|
00000820  20 20 e3 20 6e 25 3d 31  20 b8 20 69 25 2b 31 0d  |  . n%=1 . i%+1.|
00000830  04 24 0d 20 20 20 f2 64  28 6e 25 29 0d 04 2e 07  |.$.   .d(n%)....|
00000840  20 20 ed 0d 04 38 06 20  ed 0d 04 42 07 20 c8 96  |  ...8. ...B. ..|
00000850  0d 04 4c 11 20 c8 99 20  36 2c 31 31 32 2c 73 31  |..L. .. 6,112,s1|
00000860  25 0d 04 56 11 20 c8 99  20 36 2c 31 31 33 2c 73  |%..V. .. 6,113,s|
00000870  32 25 0d 04 60 06 20 db  0d 04 6a 0f 20 c8 94 20  |2%..`. ...j. .. |
00000880  73 31 25 2c 73 32 25 0d  04 74 0d 20 6b 3d a6 28  |s1%,s2%..t. k=.(|
00000890  35 30 30 29 0d 04 7e 07  fd 20 a3 0d 04 88 05 3a  |500)..~.. .....:|
000008a0  0d 04 92 0c dd 20 f2 64  28 70 25 29 0d 04 9c 16  |..... .d(p%)....|
000008b0  ea 20 6e 25 2c 63 78 25  2c 63 79 25 2c 78 25 2c  |. n%,cx%,cy%,x%,|
000008c0  79 25 0d 04 a6 17 e3 20  6e 25 3d 31 20 b8 20 6e  |y%..... n%=1 . n|
000008d0  76 65 72 74 25 28 70 25  29 0d 04 b0 18 20 63 78  |vert%(p%).... cx|
000008e0  25 2b 3d 76 65 72 74 5f  78 25 28 70 25 2c 6e 25  |%+=vert_x%(p%,n%|
000008f0  29 0d 04 ba 18 20 63 79  25 2b 3d 76 65 72 74 5f  |).... cy%+=vert_|
00000900  79 25 28 70 25 2c 6e 25  29 0d 04 c4 05 ed 0d 04  |y%(p%,n%).......|
00000910  ce 16 63 78 25 3d 63 78  25 2f 6e 76 65 72 74 25  |..cx%=cx%/nvert%|
00000920  28 70 25 29 0d 04 d8 16  63 79 25 3d 63 79 25 2f  |(p%)....cy%=cy%/|
00000930  6e 76 65 72 74 25 28 70  25 29 0d 04 e2 2b 78 25  |nvert%(p%)...+x%|
00000940  3d 28 76 65 72 74 5f 78  25 28 70 25 2c 6e 76 65  |=(vert_x%(p%,nve|
00000950  72 74 25 28 70 25 29 29  2d 63 78 25 29 2a 30 2e  |rt%(p%))-cx%)*0.|
00000960  37 2b 63 78 25 0d 04 ec  2b 79 25 3d 28 76 65 72  |7+cx%...+y%=(ver|
00000970  74 5f 79 25 28 70 25 2c  6e 76 65 72 74 25 28 70  |t_y%(p%,nvert%(p|
00000980  25 29 29 2d 63 79 25 29  2a 30 2e 37 2b 63 79 25  |%))-cy%)*0.7+cy%|
00000990  0d 04 f6 0b ec 20 78 25  2c 79 25 0d 05 00 17 e3  |..... x%,y%.....|
000009a0  20 6e 25 3d 31 20 b8 20  6e 76 65 72 74 25 28 70  | n%=1 . nvert%(p|
000009b0  25 29 0d 05 0a 0e 20 ec  20 63 78 25 2c 63 79 25  |%).... . cx%,cy%|
000009c0  0d 05 14 24 20 78 25 3d  28 76 65 72 74 5f 78 25  |...$ x%=(vert_x%|
000009d0  28 70 25 2c 6e 25 29 2d  63 78 25 29 2a 30 2e 37  |(p%,n%)-cx%)*0.7|
000009e0  2b 63 78 25 0d 05 1e 24  20 79 25 3d 28 76 65 72  |+cx%...$ y%=(ver|
000009f0  74 5f 79 25 28 70 25 2c  6e 25 29 2d 63 79 25 29  |t_y%(p%,n%)-cy%)|
00000a00  2a 30 2e 37 2b 63 79 25  0d 05 28 0f 20 f0 20 38  |*0.7+cy%..(. . 8|
00000a10  35 2c 78 25 2c 79 25 0d  05 32 05 ed 0d 05 3c 05  |5,x%,y%..2....<.|
00000a20  e1 0d 05 46 05 3a 0d 05  50 0a dd 20 f2 65 72 72  |...F.:..P.. .err|
00000a30  0d 05 5a 10 c8 99 20 36  2c 31 31 32 2c 73 31 25  |..Z... 6,112,s1%|
00000a40  0d 05 64 14 f1 f6 24 22  20 61 74 20 6c 69 6e 65  |..d...$" at line|
00000a50  20 22 c3 9e 0d 05 6e 05  ee 0d 05 78 05 e1 0d ff  | "....n....x....|
00000a60