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