�     >SymBalls
� By  Jan Vibe
� For 32-bit machines
(� (c) BAU January 1994
2:
<	� 141
F� 13
P�
Z
scr%=1
dos_spriteop%=&2E
ndelay%=0
xstep%=32
�r%=�(-�)
�� � �err:�
�
�"� spr &15000,bgr &15000,sz &10
�spr!0=&15000
�spr!4=0
�spr!8=16
�
spr!12=16
�bgr!0=&15000
�bgr!4=0
�bgr!8=16
�
bgr!12=16
�

�


 �swap

 q=�(delay%)

" delay%=100

, � n%=1�15

6!  �pearl(�(1280),�(1024),100)

@ �

J< ș os_spriteop%,&110,spr,"all",0,0,0,1276,1020 � ,,all%

T sz!00=1280

^ sz!04=1024

h sz!08=1280

r sz!12=1020

| � n%=1280 � 640 �-32

�  m%=n%*0.8

�  fx%=(1280-n%)/2

�  fy%=(1024-m%)/2

�  �swap_and_cls

�  sz!00=n%

�  sz!04=m%

�2  ș os_spriteop%,&234,spr,all%,fx%,fy%,8,sz,0

� �

�F ș os_spriteop%,&110,spr,"all",0,fx%,fy%,fx%+636,fy%+508 � ,,all%

� sz!00=640

� sz!04=512

� sz!08=640

� sz!12=512
 � n%=fx% � 0 � -8
  m%=n%*0.8
  �swap_and_cls
&+  ș os_spriteop%,&222,spr,all%,n%,m%,0
0 �
:: ș os_spriteop%,&110,bgr,"bag",0,0,1020,1276 � ,,bag%
D( ș os_spriteop%,&222,bgr,bag%,0,0,0
N � n%=512 � 0 � -step%
X  �swap_and_cls
b)  ș os_spriteop%,&222,bgr,bag%,0,0,0
l  sz!04=n%
v3  ș os_spriteop%,&234,spr,all%,0,512-n%,8,sz,0
� �
�" ș os_spriteop%,&221,spr,all%
� � n%=16 � 512 � step%
�  �swap_and_cls
�)  ș os_spriteop%,&222,bgr,bag%,0,0,0
�  sz!04=n%
�0  ș os_spriteop%,&234,spr,all%,0,512,8,sz,0
� �
�: ș os_spriteop%,&110,bgr,"bag",0,0,1020,1276 � ,,bag%
� � n%=640 � 0 � -step%
�  �swap_and_cls
�)  ș os_spriteop%,&222,bgr,bag%,0,0,0
�  sz!00=n%
5  ș os_spriteop%,&234,spr,all%,640-n%,512,8,sz,0
 �
" ș os_spriteop%,&22F,spr,all%
  � n%=0 � 640 � step%
*  �swap_and_cls
4)  ș os_spriteop%,&222,bgr,bag%,0,0,0
>  sz!00=n%
H2  ș os_spriteop%,&234,spr,all%,640,512,8,sz,0
R �
\: ș os_spriteop%,&110,bgr,"bag",0,0,1020,1276 � ,,bag%
f � n%=512 � 0 � -step%
p  �swap_and_cls
z)  ș os_spriteop%,&222,bgr,bag%,0,0,0
�  sz!04=n%
�2  ș os_spriteop%,&234,spr,all%,640,512,8,sz,0
� �
�" ș os_spriteop%,&221,spr,all%
� � n%=0 � 512 � step%
�  �swap_and_cls
�)  ș os_spriteop%,&222,bgr,bag%,0,0,0
�  sz!04=n%
�5  ș os_spriteop%,&234,spr,all%,640,512-n%,8,sz,0
� �
�: ș os_spriteop%,&110,spr,"all",0,0,1020,1276 � ,,all%
�
 �swap
�( ș os_spriteop%,&234,spr,all%,0,0,8
� �
:
� �pearl(x%,y%,r%)
$� d,n%,c%,delay%,m%,t%
.d=r%/12
8t%=0
B�
L� n%=1 � �(7)
V	 � k%
`�
j� n%=1 � 3
t
 c%=k%*n%
~ � m%=0 � 3
�  � c% Ȝ m%<<6
�  ȏ Ȑ x%,y%,r%-t%*d
�  t%+=1
�  �
��
��
�:
�� 1,4,5,16,17,20,21
�:
�
� �err
�ș 6,112,scr%
��:�" at line "Þ
�

�
:
� �swap_and_cls
(	�swap
2�
<�
F:
P� �swap
ZȖ
dș 6,113,scr%
nscr%=3-scr%
xș 6,112,scr%
��
�

00000000  0d 00 0a 13 f4 20 20 20  20 20 3e 53 79 6d 42 61  |.....     >SymBa|
00000010  6c 6c 73 0d 00 14 12 f4  20 42 79 20 20 4a 61 6e  |lls..... By  Jan|
00000020  20 56 69 62 65 0d 00 1e  19 f4 20 46 6f 72 20 33  | Vibe..... For 3|
00000030  32 2d 62 69 74 20 6d 61  63 68 69 6e 65 73 0d 00  |2-bit machines..|
00000040  28 1a f4 20 28 63 29 20  42 41 55 20 4a 61 6e 75  |(.. (c) BAU Janu|
00000050  61 72 79 20 31 39 39 34  0d 00 32 05 3a 0d 00 3c  |ary 1994..2.:..<|
00000060  09 eb 20 31 34 31 0d 00  46 08 eb 20 31 33 0d 00  |.. 141..F.. 13..|
00000070  50 05 87 0d 00 5a 0a 73  63 72 25 3d 31 0d 00 64  |P....Z.scr%=1..d|
00000080  14 6f 73 5f 73 70 72 69  74 65 6f 70 25 3d 26 32  |.os_spriteop%=&2|
00000090  45 0d 00 6e 0c 64 65 6c  61 79 25 3d 30 0d 00 78  |E..n.delay%=0..x|
000000a0  0c 73 74 65 70 25 3d 33  32 0d 00 82 0c 72 25 3d  |.step%=32....r%=|
000000b0  b3 28 2d 91 29 0d 00 8c  0e ee 20 85 20 f2 65 72  |.(-.)..... . .er|
000000c0  72 3a e0 0d 00 96 04 0d  00 a0 22 de 20 73 70 72  |r:........". spr|
000000d0  20 26 31 35 30 30 30 2c  62 67 72 20 26 31 35 30  | &15000,bgr &150|
000000e0  30 30 2c 73 7a 20 26 31  30 0d 00 aa 10 73 70 72  |00,sz &10....spr|
000000f0  21 30 3d 26 31 35 30 30  30 0d 00 b4 0b 73 70 72  |!0=&15000....spr|
00000100  21 34 3d 30 0d 00 be 0c  73 70 72 21 38 3d 31 36  |!4=0....spr!8=16|
00000110  0d 00 c8 0d 73 70 72 21  31 32 3d 31 36 0d 00 d2  |....spr!12=16...|
00000120  10 62 67 72 21 30 3d 26  31 35 30 30 30 0d 00 dc  |.bgr!0=&15000...|
00000130  0b 62 67 72 21 34 3d 30  0d 00 e6 0c 62 67 72 21  |.bgr!4=0....bgr!|
00000140  38 3d 31 36 0d 00 f0 0d  62 67 72 21 31 32 3d 31  |8=16....bgr!12=1|
00000150  36 0d 00 fa 04 0d 01 04  05 f5 0d 01 0e 0a 20 f2  |6............. .|
00000160  73 77 61 70 0d 01 18 10  20 71 3d a6 28 64 65 6c  |swap.... q=.(del|
00000170  61 79 25 29 0d 01 22 0f  20 64 65 6c 61 79 25 3d  |ay%)..". delay%=|
00000180  31 30 30 0d 01 2c 0e 20  e3 20 6e 25 3d 31 b8 31  |100..,. . n%=1.1|
00000190  35 0d 01 36 21 20 20 f2  70 65 61 72 6c 28 b3 28  |5..6!  .pearl(.(|
000001a0  31 32 38 30 29 2c b3 28  31 30 32 34 29 2c 31 30  |1280),.(1024),10|
000001b0  30 29 0d 01 40 06 20 ed  0d 01 4a 3c 20 c8 99 20  |0)..@. ...J< .. |
000001c0  6f 73 5f 73 70 72 69 74  65 6f 70 25 2c 26 31 31  |os_spriteop%,&11|
000001d0  30 2c 73 70 72 2c 22 61  6c 6c 22 2c 30 2c 30 2c  |0,spr,"all",0,0,|
000001e0  30 2c 31 32 37 36 2c 31  30 32 30 20 b8 20 2c 2c  |0,1276,1020 . ,,|
000001f0  61 6c 6c 25 0d 01 54 0f  20 73 7a 21 30 30 3d 31  |all%..T. sz!00=1|
00000200  32 38 30 0d 01 5e 0f 20  73 7a 21 30 34 3d 31 30  |280..^. sz!04=10|
00000210  32 34 0d 01 68 0f 20 73  7a 21 30 38 3d 31 32 38  |24..h. sz!08=128|
00000220  30 0d 01 72 0f 20 73 7a  21 31 32 3d 31 30 32 30  |0..r. sz!12=1020|
00000230  0d 01 7c 19 20 e3 20 6e  25 3d 31 32 38 30 20 b8  |..|. . n%=1280 .|
00000240  20 36 34 30 20 88 2d 33  32 0d 01 86 0f 20 20 6d  | 640 .-32....  m|
00000250  25 3d 6e 25 2a 30 2e 38  0d 01 90 15 20 20 66 78  |%=n%*0.8....  fx|
00000260  25 3d 28 31 32 38 30 2d  6e 25 29 2f 32 0d 01 9a  |%=(1280-n%)/2...|
00000270  15 20 20 66 79 25 3d 28  31 30 32 34 2d 6d 25 29  |.  fy%=(1024-m%)|
00000280  2f 32 0d 01 a4 13 20 20  f2 73 77 61 70 5f 61 6e  |/2....  .swap_an|
00000290  64 5f 63 6c 73 0d 01 ae  0e 20 20 73 7a 21 30 30  |d_cls....  sz!00|
000002a0  3d 6e 25 0d 01 b8 0e 20  20 73 7a 21 30 34 3d 6d  |=n%....  sz!04=m|
000002b0  25 0d 01 c2 32 20 20 c8  99 20 6f 73 5f 73 70 72  |%...2  .. os_spr|
000002c0  69 74 65 6f 70 25 2c 26  32 33 34 2c 73 70 72 2c  |iteop%,&234,spr,|
000002d0  61 6c 6c 25 2c 66 78 25  2c 66 79 25 2c 38 2c 73  |all%,fx%,fy%,8,s|
000002e0  7a 2c 30 0d 01 cc 06 20  ed 0d 01 d6 46 20 c8 99  |z,0.... ....F ..|
000002f0  20 6f 73 5f 73 70 72 69  74 65 6f 70 25 2c 26 31  | os_spriteop%,&1|
00000300  31 30 2c 73 70 72 2c 22  61 6c 6c 22 2c 30 2c 66  |10,spr,"all",0,f|
00000310  78 25 2c 66 79 25 2c 66  78 25 2b 36 33 36 2c 66  |x%,fy%,fx%+636,f|
00000320  79 25 2b 35 30 38 20 b8  20 2c 2c 61 6c 6c 25 0d  |y%+508 . ,,all%.|
00000330  01 e0 0e 20 73 7a 21 30  30 3d 36 34 30 0d 01 ea  |... sz!00=640...|
00000340  0e 20 73 7a 21 30 34 3d  35 31 32 0d 01 f4 0e 20  |. sz!04=512.... |
00000350  73 7a 21 30 38 3d 36 34  30 0d 01 fe 0e 20 73 7a  |sz!08=640.... sz|
00000360  21 31 32 3d 35 31 32 0d  02 08 16 20 e3 20 6e 25  |!12=512.... . n%|
00000370  3d 66 78 25 20 b8 20 30  20 88 20 2d 38 0d 02 12  |=fx% . 0 . -8...|
00000380  0f 20 20 6d 25 3d 6e 25  2a 30 2e 38 0d 02 1c 13  |.  m%=n%*0.8....|
00000390  20 20 f2 73 77 61 70 5f  61 6e 64 5f 63 6c 73 0d  |  .swap_and_cls.|
000003a0  02 26 2b 20 20 c8 99 20  6f 73 5f 73 70 72 69 74  |.&+  .. os_sprit|
000003b0  65 6f 70 25 2c 26 32 32  32 2c 73 70 72 2c 61 6c  |eop%,&222,spr,al|
000003c0  6c 25 2c 6e 25 2c 6d 25  2c 30 0d 02 30 06 20 ed  |l%,n%,m%,0..0. .|
000003d0  0d 02 3a 3a 20 c8 99 20  6f 73 5f 73 70 72 69 74  |..:: .. os_sprit|
000003e0  65 6f 70 25 2c 26 31 31  30 2c 62 67 72 2c 22 62  |eop%,&110,bgr,"b|
000003f0  61 67 22 2c 30 2c 30 2c  31 30 32 30 2c 31 32 37  |ag",0,0,1020,127|
00000400  36 20 b8 20 2c 2c 62 61  67 25 0d 02 44 28 20 c8  |6 . ,,bag%..D( .|
00000410  99 20 6f 73 5f 73 70 72  69 74 65 6f 70 25 2c 26  |. os_spriteop%,&|
00000420  32 32 32 2c 62 67 72 2c  62 61 67 25 2c 30 2c 30  |222,bgr,bag%,0,0|
00000430  2c 30 0d 02 4e 1a 20 e3  20 6e 25 3d 35 31 32 20  |,0..N. . n%=512 |
00000440  b8 20 30 20 88 20 2d 73  74 65 70 25 0d 02 58 13  |. 0 . -step%..X.|
00000450  20 20 f2 73 77 61 70 5f  61 6e 64 5f 63 6c 73 0d  |  .swap_and_cls.|
00000460  02 62 29 20 20 c8 99 20  6f 73 5f 73 70 72 69 74  |.b)  .. os_sprit|
00000470  65 6f 70 25 2c 26 32 32  32 2c 62 67 72 2c 62 61  |eop%,&222,bgr,ba|
00000480  67 25 2c 30 2c 30 2c 30  0d 02 6c 0e 20 20 73 7a  |g%,0,0,0..l.  sz|
00000490  21 30 34 3d 6e 25 0d 02  76 33 20 20 c8 99 20 6f  |!04=n%..v3  .. o|
000004a0  73 5f 73 70 72 69 74 65  6f 70 25 2c 26 32 33 34  |s_spriteop%,&234|
000004b0  2c 73 70 72 2c 61 6c 6c  25 2c 30 2c 35 31 32 2d  |,spr,all%,0,512-|
000004c0  6e 25 2c 38 2c 73 7a 2c  30 0d 02 80 06 20 ed 0d  |n%,8,sz,0.... ..|
000004d0  02 8a 22 20 c8 99 20 6f  73 5f 73 70 72 69 74 65  |.." .. os_sprite|
000004e0  6f 70 25 2c 26 32 32 31  2c 73 70 72 2c 61 6c 6c  |op%,&221,spr,all|
000004f0  25 0d 02 94 1a 20 e3 20  6e 25 3d 31 36 20 b8 20  |%.... . n%=16 . |
00000500  35 31 32 20 88 20 73 74  65 70 25 0d 02 9e 13 20  |512 . step%.... |
00000510  20 f2 73 77 61 70 5f 61  6e 64 5f 63 6c 73 0d 02  | .swap_and_cls..|
00000520  a8 29 20 20 c8 99 20 6f  73 5f 73 70 72 69 74 65  |.)  .. os_sprite|
00000530  6f 70 25 2c 26 32 32 32  2c 62 67 72 2c 62 61 67  |op%,&222,bgr,bag|
00000540  25 2c 30 2c 30 2c 30 0d  02 b2 0e 20 20 73 7a 21  |%,0,0,0....  sz!|
00000550  30 34 3d 6e 25 0d 02 bc  30 20 20 c8 99 20 6f 73  |04=n%...0  .. os|
00000560  5f 73 70 72 69 74 65 6f  70 25 2c 26 32 33 34 2c  |_spriteop%,&234,|
00000570  73 70 72 2c 61 6c 6c 25  2c 30 2c 35 31 32 2c 38  |spr,all%,0,512,8|
00000580  2c 73 7a 2c 30 0d 02 c6  06 20 ed 0d 02 d0 3a 20  |,sz,0.... ....: |
00000590  c8 99 20 6f 73 5f 73 70  72 69 74 65 6f 70 25 2c  |.. os_spriteop%,|
000005a0  26 31 31 30 2c 62 67 72  2c 22 62 61 67 22 2c 30  |&110,bgr,"bag",0|
000005b0  2c 30 2c 31 30 32 30 2c  31 32 37 36 20 b8 20 2c  |,0,1020,1276 . ,|
000005c0  2c 62 61 67 25 0d 02 da  1a 20 e3 20 6e 25 3d 36  |,bag%.... . n%=6|
000005d0  34 30 20 b8 20 30 20 88  20 2d 73 74 65 70 25 0d  |40 . 0 . -step%.|
000005e0  02 e4 13 20 20 f2 73 77  61 70 5f 61 6e 64 5f 63  |...  .swap_and_c|
000005f0  6c 73 0d 02 ee 29 20 20  c8 99 20 6f 73 5f 73 70  |ls...)  .. os_sp|
00000600  72 69 74 65 6f 70 25 2c  26 32 32 32 2c 62 67 72  |riteop%,&222,bgr|
00000610  2c 62 61 67 25 2c 30 2c  30 2c 30 0d 02 f8 0e 20  |,bag%,0,0,0.... |
00000620  20 73 7a 21 30 30 3d 6e  25 0d 03 02 35 20 20 c8  | sz!00=n%...5  .|
00000630  99 20 6f 73 5f 73 70 72  69 74 65 6f 70 25 2c 26  |. os_spriteop%,&|
00000640  32 33 34 2c 73 70 72 2c  61 6c 6c 25 2c 36 34 30  |234,spr,all%,640|
00000650  2d 6e 25 2c 35 31 32 2c  38 2c 73 7a 2c 30 0d 03  |-n%,512,8,sz,0..|
00000660  0c 06 20 ed 0d 03 16 22  20 c8 99 20 6f 73 5f 73  |.. ...." .. os_s|
00000670  70 72 69 74 65 6f 70 25  2c 26 32 32 46 2c 73 70  |priteop%,&22F,sp|
00000680  72 2c 61 6c 6c 25 0d 03  20 19 20 e3 20 6e 25 3d  |r,all%.. . . n%=|
00000690  30 20 b8 20 36 34 30 20  88 20 73 74 65 70 25 0d  |0 . 640 . step%.|
000006a0  03 2a 13 20 20 f2 73 77  61 70 5f 61 6e 64 5f 63  |.*.  .swap_and_c|
000006b0  6c 73 0d 03 34 29 20 20  c8 99 20 6f 73 5f 73 70  |ls..4)  .. os_sp|
000006c0  72 69 74 65 6f 70 25 2c  26 32 32 32 2c 62 67 72  |riteop%,&222,bgr|
000006d0  2c 62 61 67 25 2c 30 2c  30 2c 30 0d 03 3e 0e 20  |,bag%,0,0,0..>. |
000006e0  20 73 7a 21 30 30 3d 6e  25 0d 03 48 32 20 20 c8  | sz!00=n%..H2  .|
000006f0  99 20 6f 73 5f 73 70 72  69 74 65 6f 70 25 2c 26  |. os_spriteop%,&|
00000700  32 33 34 2c 73 70 72 2c  61 6c 6c 25 2c 36 34 30  |234,spr,all%,640|
00000710  2c 35 31 32 2c 38 2c 73  7a 2c 30 0d 03 52 06 20  |,512,8,sz,0..R. |
00000720  ed 0d 03 5c 3a 20 c8 99  20 6f 73 5f 73 70 72 69  |...\: .. os_spri|
00000730  74 65 6f 70 25 2c 26 31  31 30 2c 62 67 72 2c 22  |teop%,&110,bgr,"|
00000740  62 61 67 22 2c 30 2c 30  2c 31 30 32 30 2c 31 32  |bag",0,0,1020,12|
00000750  37 36 20 b8 20 2c 2c 62  61 67 25 0d 03 66 1a 20  |76 . ,,bag%..f. |
00000760  e3 20 6e 25 3d 35 31 32  20 b8 20 30 20 88 20 2d  |. n%=512 . 0 . -|
00000770  73 74 65 70 25 0d 03 70  13 20 20 f2 73 77 61 70  |step%..p.  .swap|
00000780  5f 61 6e 64 5f 63 6c 73  0d 03 7a 29 20 20 c8 99  |_and_cls..z)  ..|
00000790  20 6f 73 5f 73 70 72 69  74 65 6f 70 25 2c 26 32  | os_spriteop%,&2|
000007a0  32 32 2c 62 67 72 2c 62  61 67 25 2c 30 2c 30 2c  |22,bgr,bag%,0,0,|
000007b0  30 0d 03 84 0e 20 20 73  7a 21 30 34 3d 6e 25 0d  |0....  sz!04=n%.|
000007c0  03 8e 32 20 20 c8 99 20  6f 73 5f 73 70 72 69 74  |..2  .. os_sprit|
000007d0  65 6f 70 25 2c 26 32 33  34 2c 73 70 72 2c 61 6c  |eop%,&234,spr,al|
000007e0  6c 25 2c 36 34 30 2c 35  31 32 2c 38 2c 73 7a 2c  |l%,640,512,8,sz,|
000007f0  30 0d 03 98 06 20 ed 0d  03 a2 22 20 c8 99 20 6f  |0.... ...." .. o|
00000800  73 5f 73 70 72 69 74 65  6f 70 25 2c 26 32 32 31  |s_spriteop%,&221|
00000810  2c 73 70 72 2c 61 6c 6c  25 0d 03 ac 19 20 e3 20  |,spr,all%.... . |
00000820  6e 25 3d 30 20 b8 20 35  31 32 20 88 20 73 74 65  |n%=0 . 512 . ste|
00000830  70 25 0d 03 b6 13 20 20  f2 73 77 61 70 5f 61 6e  |p%....  .swap_an|
00000840  64 5f 63 6c 73 0d 03 c0  29 20 20 c8 99 20 6f 73  |d_cls...)  .. os|
00000850  5f 73 70 72 69 74 65 6f  70 25 2c 26 32 32 32 2c  |_spriteop%,&222,|
00000860  62 67 72 2c 62 61 67 25  2c 30 2c 30 2c 30 0d 03  |bgr,bag%,0,0,0..|
00000870  ca 0e 20 20 73 7a 21 30  34 3d 6e 25 0d 03 d4 35  |..  sz!04=n%...5|
00000880  20 20 c8 99 20 6f 73 5f  73 70 72 69 74 65 6f 70  |  .. os_spriteop|
00000890  25 2c 26 32 33 34 2c 73  70 72 2c 61 6c 6c 25 2c  |%,&234,spr,all%,|
000008a0  36 34 30 2c 35 31 32 2d  6e 25 2c 38 2c 73 7a 2c  |640,512-n%,8,sz,|
000008b0  30 0d 03 de 06 20 ed 0d  03 e8 3a 20 c8 99 20 6f  |0.... ....: .. o|
000008c0  73 5f 73 70 72 69 74 65  6f 70 25 2c 26 31 31 30  |s_spriteop%,&110|
000008d0  2c 73 70 72 2c 22 61 6c  6c 22 2c 30 2c 30 2c 31  |,spr,"all",0,0,1|
000008e0  30 32 30 2c 31 32 37 36  20 b8 20 2c 2c 61 6c 6c  |020,1276 . ,,all|
000008f0  25 0d 03 f2 0a 20 f2 73  77 61 70 0d 03 fc 28 20  |%.... .swap...( |
00000900  c8 99 20 6f 73 5f 73 70  72 69 74 65 6f 70 25 2c  |.. os_spriteop%,|
00000910  26 32 33 34 2c 73 70 72  2c 61 6c 6c 25 2c 30 2c  |&234,spr,all%,0,|
00000920  30 2c 38 0d 04 06 07 fd  20 a3 0d 04 10 05 3a 0d  |0,8..... .....:.|
00000930  04 1a 16 dd 20 f2 70 65  61 72 6c 28 78 25 2c 79  |.... .pearl(x%,y|
00000940  25 2c 72 25 29 0d 04 24  1a ea 20 64 2c 6e 25 2c  |%,r%)..$.. d,n%,|
00000950  63 25 2c 64 65 6c 61 79  25 2c 6d 25 2c 74 25 0d  |c%,delay%,m%,t%.|
00000960  04 2e 0b 64 3d 72 25 2f  31 32 0d 04 38 08 74 25  |...d=r%/12..8.t%|
00000970  3d 30 0d 04 42 05 f7 0d  04 4c 11 e3 20 6e 25 3d  |=0..B....L.. n%=|
00000980  31 20 b8 20 b3 28 37 29  0d 04 56 09 20 f3 20 6b  |1 . .(7)..V. . k|
00000990  25 0d 04 60 05 ed 0d 04  6a 0e e3 20 6e 25 3d 31  |%..`....j.. n%=1|
000009a0  20 b8 20 33 0d 04 74 0d  20 63 25 3d 6b 25 2a 6e  | . 3..t. c%=k%*n|
000009b0  25 0d 04 7e 0f 20 e3 20  6d 25 3d 30 20 b8 20 33  |%..~. . m%=0 . 3|
000009c0  0d 04 88 13 20 20 e6 20  63 25 20 c8 9c 20 6d 25  |....  . c% .. m%|
000009d0  3c 3c 36 0d 04 92 19 20  20 c8 8f 20 c8 90 20 78  |<<6....  .. .. x|
000009e0  25 2c 79 25 2c 72 25 2d  74 25 2a 64 0d 04 9c 0b  |%,y%,r%-t%*d....|
000009f0  20 20 74 25 2b 3d 31 0d  04 a6 07 20 20 ed 0d 04  |  t%+=1....  ...|
00000a00  b0 05 ed 0d 04 ba 05 e1  0d 04 c4 05 3a 0d 04 ce  |............:...|
00000a10  17 dc 20 31 2c 34 2c 35  2c 31 36 2c 31 37 2c 32  |.. 1,4,5,16,17,2|
00000a20  30 2c 32 31 0d 04 d8 05  3a 0d 04 e2 0a dd 20 f2  |0,21....:..... .|
00000a30  65 72 72 0d 04 ec 11 c8  99 20 36 2c 31 31 32 2c  |err...... 6,112,|
00000a40  73 63 72 25 0d 04 f6 14  f6 3a f1 22 20 61 74 20  |scr%.....:." at |
00000a50  6c 69 6e 65 20 22 c3 9e  0d 05 00 05 ee 0d 05 0a  |line "..........|
00000a60  05 e1 0d 05 14 05 3a 0d  05 1e 13 dd 20 f2 73 77  |......:..... .sw|
00000a70  61 70 5f 61 6e 64 5f 63  6c 73 0d 05 28 09 f2 73  |ap_and_cls..(..s|
00000a80  77 61 70 0d 05 32 05 db  0d 05 3c 05 e1 0d 05 46  |wap..2....<....F|
00000a90  05 3a 0d 05 50 0b dd 20  f2 73 77 61 70 0d 05 5a  |.:..P.. .swap..Z|
00000aa0  06 c8 96 0d 05 64 11 c8  99 20 36 2c 31 31 33 2c  |.....d... 6,113,|
00000ab0  73 63 72 25 0d 05 6e 0f  73 63 72 25 3d 33 2d 73  |scr%..n.scr%=3-s|
00000ac0  63 72 25 0d 05 78 11 c8  99 20 36 2c 31 31 32 2c  |cr%..x... 6,112,|
00000ad0  73 63 72 25 0d 05 82 05  e1 0d ff                 |scr%.......|
00000adb