�    >Guts
� By  Jan Vibe
� For 32-bit machines
(� (c) BAU December 1993
2:
<
� 12:�
F � x(15),y(15),z(15):x()=-100
P� i=1�15
Z# � 16-i,7*i+150,14*i+45,14*i+45
d�
nx1 =�(768)+256
xy1 =�(512)+256
�dx1=�(16)*��
�dy1=�(16)*��
�x2 =�(768)+256
�y2 =�(512)+256
�dx2=�(16)*��
�dy2=�(16)*��
�a=0
�� � �error
��
�1 � x1+dx1<256 � x1+dx1>1024 dx1=�(16)*�(-dx1)
�1 � y1+dy1<256 � y1+dy1>768  dy1=�(16)*�(-dy1)
� x1+=dx1
� y1+=dy1

 � x2<x1 � dx2<24  dx2+=1

 � x2>x1 � dx2>-24 dx2-=1

 � y2<y1 � dy2<24  dy2+=1

" � y2>y1 � dy2>-24 dy2-=1

, x2+=dx2

6 y2+=dy2

@ a=(a+10) � 360

J � i=2 � 15

T  x(i-1)=x(i)

^  y(i-1)=y(i)

h  z(i-1)=z(i)

r �

|
 x(15)=x2

�
 y(15)=y2

� z(15)=(��a+1)+2

� � i=1 � 15

�	  � i

�  ȏ Ȑ x(i),y(i),i*z(i)

� �

�� �

�:

�� �error

�	� � �

�� i=15 � 1 � -1

� � j=i � 15

�	  � i
  ȏ Ȑ x(j),y(j),i*z(j)
 �
�
&�
�

00000000  0d 00 0a 0e f4 20 20 20  20 3e 47 75 74 73 0d 00  |.....    >Guts..|
00000010  14 12 f4 20 42 79 20 20  4a 61 6e 20 56 69 62 65  |... By  Jan Vibe|
00000020  0d 00 1e 19 f4 20 46 6f  72 20 33 32 2d 62 69 74  |..... For 32-bit|
00000030  20 6d 61 63 68 69 6e 65  73 0d 00 28 1b f4 20 28  | machines..(.. (|
00000040  63 29 20 42 41 55 20 44  65 63 65 6d 62 65 72 20  |c) BAU December |
00000050  31 39 39 33 0d 00 32 05  3a 0d 00 3c 0a eb 20 31  |1993..2.:..<.. 1|
00000060  32 3a 87 0d 00 46 20 de  20 78 28 31 35 29 2c 79  |2:...F . x(15),y|
00000070  28 31 35 29 2c 7a 28 31  35 29 3a 78 28 29 3d 2d  |(15),z(15):x()=-|
00000080  31 30 30 0d 00 50 0c e3  20 69 3d 31 b8 31 35 0d  |100..P.. i=1.15.|
00000090  00 5a 23 20 fb 20 31 36  2d 69 2c 37 2a 69 2b 31  |.Z# . 16-i,7*i+1|
000000a0  35 30 2c 31 34 2a 69 2b  34 35 2c 31 34 2a 69 2b  |50,14*i+45,14*i+|
000000b0  34 35 0d 00 64 05 ed 0d  00 6e 12 78 31 20 3d b3  |45..d....n.x1 =.|
000000c0  28 37 36 38 29 2b 32 35  36 0d 00 78 12 79 31 20  |(768)+256..x.y1 |
000000d0  3d b3 28 35 31 32 29 2b  32 35 36 0d 00 82 10 64  |=.(512)+256....d|
000000e0  78 31 3d b3 28 31 36 29  2a b4 b3 0d 00 8c 10 64  |x1=.(16)*......d|
000000f0  79 31 3d b3 28 31 36 29  2a b4 b3 0d 00 96 12 78  |y1=.(16)*......x|
00000100  32 20 3d b3 28 37 36 38  29 2b 32 35 36 0d 00 a0  |2 =.(768)+256...|
00000110  12 79 32 20 3d b3 28 35  31 32 29 2b 32 35 36 0d  |.y2 =.(512)+256.|
00000120  00 aa 10 64 78 32 3d b3  28 31 36 29 2a b4 b3 0d  |...dx2=.(16)*...|
00000130  00 b4 10 64 79 32 3d b3  28 31 36 29 2a b4 b3 0d  |...dy2=.(16)*...|
00000140  00 be 07 61 3d 30 0d 00  c8 0e ee 20 85 20 f2 65  |...a=0..... . .e|
00000150  72 72 6f 72 0d 00 d2 05  f5 0d 00 dc 31 20 e7 20  |rror........1 . |
00000160  78 31 2b 64 78 31 3c 32  35 36 20 84 20 78 31 2b  |x1+dx1<256 . x1+|
00000170  64 78 31 3e 31 30 32 34  20 64 78 31 3d b3 28 31  |dx1>1024 dx1=.(1|
00000180  36 29 2a b4 28 2d 64 78  31 29 0d 00 e6 31 20 e7  |6)*.(-dx1)...1 .|
00000190  20 79 31 2b 64 79 31 3c  32 35 36 20 84 20 79 31  | y1+dy1<256 . y1|
000001a0  2b 64 79 31 3e 37 36 38  20 20 64 79 31 3d b3 28  |+dy1>768  dy1=.(|
000001b0  31 36 29 2a b4 28 2d 64  79 31 29 0d 00 f0 0c 20  |16)*.(-dy1).... |
000001c0  78 31 2b 3d 64 78 31 0d  00 fa 0c 20 79 31 2b 3d  |x1+=dx1.... y1+=|
000001d0  64 79 31 0d 01 04 1d 20  e7 20 78 32 3c 78 31 20  |dy1.... . x2<x1 |
000001e0  80 20 64 78 32 3c 32 34  20 20 64 78 32 2b 3d 31  |. dx2<24  dx2+=1|
000001f0  0d 01 0e 1d 20 e7 20 78  32 3e 78 31 20 80 20 64  |.... . x2>x1 . d|
00000200  78 32 3e 2d 32 34 20 64  78 32 2d 3d 31 0d 01 18  |x2>-24 dx2-=1...|
00000210  1d 20 e7 20 79 32 3c 79  31 20 80 20 64 79 32 3c  |. . y2<y1 . dy2<|
00000220  32 34 20 20 64 79 32 2b  3d 31 0d 01 22 1d 20 e7  |24  dy2+=1..". .|
00000230  20 79 32 3e 79 31 20 80  20 64 79 32 3e 2d 32 34  | y2>y1 . dy2>-24|
00000240  20 64 79 32 2d 3d 31 0d  01 2c 0c 20 78 32 2b 3d  | dy2-=1..,. x2+=|
00000250  64 78 32 0d 01 36 0c 20  79 32 2b 3d 64 79 32 0d  |dx2..6. y2+=dy2.|
00000260  01 40 13 20 61 3d 28 61  2b 31 30 29 20 83 20 33  |.@. a=(a+10) . 3|
00000270  36 30 0d 01 4a 0f 20 e3  20 69 3d 32 20 b8 20 31  |60..J. . i=2 . 1|
00000280  35 0d 01 54 11 20 20 78  28 69 2d 31 29 3d 78 28  |5..T.  x(i-1)=x(|
00000290  69 29 0d 01 5e 11 20 20  79 28 69 2d 31 29 3d 79  |i)..^.  y(i-1)=y|
000002a0  28 69 29 0d 01 68 11 20  20 7a 28 69 2d 31 29 3d  |(i)..h.  z(i-1)=|
000002b0  7a 28 69 29 0d 01 72 06  20 ed 0d 01 7c 0d 20 78  |z(i)..r. ...|. x|
000002c0  28 31 35 29 3d 78 32 0d  01 86 0d 20 79 28 31 35  |(15)=x2.... y(15|
000002d0  29 3d 79 32 0d 01 90 14  20 7a 28 31 35 29 3d 28  |)=y2.... z(15)=(|
000002e0  b5 b2 61 2b 31 29 2b 32  0d 01 9a 0f 20 e3 20 69  |..a+1)+2.... . i|
000002f0  3d 31 20 b8 20 31 35 0d  01 a4 09 20 20 e6 20 69  |=1 . 15....  . i|
00000300  0d 01 ae 1c 20 20 c8 8f  20 c8 90 20 78 28 69 29  |....  .. .. x(i)|
00000310  2c 79 28 69 29 2c 69 2a  7a 28 69 29 0d 01 b8 06  |,y(i),i*z(i)....|
00000320  20 ed 0d 01 c2 07 fd 20  a3 0d 01 cc 05 3a 0d 01  | ...... .....:..|
00000330  d6 0c dd 20 f2 65 72 72  6f 72 0d 01 e0 09 ee 20  |... .error..... |
00000340  85 20 87 0d 01 ea 13 e3  20 69 3d 31 35 20 b8 20  |. ...... i=15 . |
00000350  31 20 88 20 2d 31 0d 01  f4 0f 20 e3 20 6a 3d 69  |1 . -1.... . j=i|
00000360  20 b8 20 31 35 0d 01 fe  09 20 20 e6 20 69 0d 02  | . 15....  . i..|
00000370  08 1c 20 20 c8 8f 20 c8  90 20 78 28 6a 29 2c 79  |..  .. .. x(j),y|
00000380  28 6a 29 2c 69 2a 7a 28  6a 29 0d 02 12 06 20 ed  |(j),i*z(j).... .|
00000390  0d 02 1c 05 ed 0d 02 26  05 e0 0d ff              |.......&....|
0000039c