Home » Archimedes archive » Acorn User » AU 1994-Xmas.adf » Programs » StarInfo/December/Van/VORONOI

StarInfo/December/Van/VORONOI

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn User » AU 1994-Xmas.adf » Programs
Filename: StarInfo/December/Van/VORONOI
Read OK:
File size: 084D bytes
Load address: 0000
Exec address: 0000
File contents
   10REM >VORONOI
   20REM JEAN VAN MOURIK 4 PANTLLYN LLANDYBIE AMMANFORD DYFED SA183JT  U.K. 1994
   30REM X%() AND Y%() ARRAYS FOR RANDOM SET OF VORONOI COORDINATES. C%() ARRAY FOR COLOUR ASSOCIATED WITH EACH COORDINATE.
   40PROCMODE:DIMX%(1611),Y%(1611),C%(622),A%(622),B%(622):ORIGIN640,512
   50RESTORE:FOR X=0TO15:READ R,G,B:COLOUR X,R,G,B:NEXT
   60CIRCLE FILL0,0,76:P%=0:D%=4:IF MO%=1 D%=2
   70PRINT"VORONOI TESSELATION GENERATOR":PRINT:PRINT"WAIT TILL THE COLUMN OF NUMBERS HAS REACHED 0."
   80PRINT"THIS IS THE CALCULATION OF ALL PIXELS WITHIN A CIRCLE OF RADIUS 76 AND SORTED TO DISTANCE TO THE CENTRE."
   90PRINT"THIS ARRAY OF COORDINATES IS USED WITHIN THE TESSELATION GENERATOR."
  100 
  110REM A%() AND B%() ARRAYS FOR PIXEL COORDINATES WITHIN A CIRCLE OF RADIUS 76
  120FORX%=0TO76STEPD%:FORY%=0TOX%STEPD%:IF POINT(X%,Y%) A%(P%)=X%:B%(P%)=Y%:P%+=1
  130NEXT:NEXT:P%-=1
  140FOR X%=1TOP%:C%(X%)=8*ATN(B%(X%)/A%(X%))/(PI/4)+1:NEXT
  150FOR X%=0TOP%-1:N%=0:FOR Y%=X%+1TOP%:C%=A%(Y%)*A%(Y%)+B%(Y%)*B%(Y%):IF C%>N% N%=C%:M%=Y%
  160NEXT:SWAP A%(X%),A%(M%):SWAP B%(X%),B%(M%):SWAP C%(X%),C%(M%):PRINTN%:NEXT
  170 
  180FOR X%=0TOP%:A%=A%(X%):B%=B%(X%):GCOLC%(X%):POINT A%,B%:POINT -A%,B%:POINT A%,-B%:POINT -A%,-B%:GCOL16-C%(X%):POINT B%,A%:POINT -B%,A%:POINT B%,-A%:POINT -B%,-A%:NEXT
  190Q%=P%:P%=0:GCOL7:CLS:PROCWRAP:END
  280 
  290REM SUITABLE MODE DETECTING ROUTINE
  300DEFPROCMODE LOCAL C%,F%
  310SYS "OS_CheckModeValid",20 TO ;F%
  320C%=(F%AND%0010)>>1
  330IF NOT (C%=1) MODE 20:MO%=1 ELSE MODE 9:MO%=0
  340OFF:ENDPROC
  350 
  360REM ROUTINE TO CREATE AN ARRAY OF EQUALY DISTRIBUTED DOTS
  370DEFPROCWRAP:FOR X%=0TO255:X%(X%)=RND(1278):Y%(X%)=RND(1022):NEXT:P%=255:K%=1280:L%=1024:ORIGIN0,0
  380FOR R%=0TOQ%:A%=A%(R%):B%=B%(R%):GCOLC%(R%):FOR X%=1TOP%:M%=X%(X%)+K%:N%=Y%(X%)+L%:POINT (M%+A%)MODK%,(N%+B%)MODL%:POINT (M%-A%)MODK%,(N%+B%)MODL%:POINT (M%+A%)MODK%,(N%-B%)MODL%:POINT (M%-A%)MODK%,(N%-B%)MODL%:NEXT
  390GCOL16-C%(R%):FOR X%=1TOP%:M%=X%(X%)+K%:N%=Y%(X%)+L%:POINT (M%+B%)MODK%,(N%+A%)MODL%:POINT (M%-B%)MODK%,(N%+A%)MODL%:POINT (M%+B%)MODK%,(N%-A%)MODL%:POINT (M%-B%)MODK%,(N%-A%)MODL%:NEXT:NEXT
  400ENDPROC
  410 
  420REM R,G,B VALUES OF THE PALETTE
  430DATA 0,0,0,192,0,240,144,48,240,96,96,240,48,144,240,0,192,240,0,240,192,48,240,144,96,240,96,144,240,48,192,240,0,240,192,0,240,144,48,240,96,96,240,48,144,240,0,192
  440REM DATA FOR PROCRECUR
  450DATA .57735,-.57735,.57735,-.57735,-1.1547,1.1547,1.732,-1.732,0,0,-1.732,1.732
  460DATA 1,-1,-1,1,0,0,1,-1,-2,2,1,-1

� >VORONOI
M� JEAN VAN MOURIK 4 PANTLLYN LLANDYBIE AMMANFORD DYFED SA183JT  U.K. 1994
x� X%() AND Y%() ARRAYS FOR RANDOM SET OF VORONOI COORDINATES. C%() ARRAY FOR COLOUR ASSOCIATED WITH EACH COORDINATE.
(>�MODE:�X%(1611),Y%(1611),C%(622),A%(622),B%(622):ȑ640,512
2"�:� X=0�15:� R,G,B:� X,R,G,B:�
<&ȏ Ȑ0,0,76:P%=0:D%=4:� MO%=1 D%=2
FX�"VORONOI TESSELATION GENERATOR":�:�"WAIT TILL THE COLUMN OF NUMBERS HAS REACHED 0."
Po�"THIS IS THE CALCULATION OF ALL PIXELS WITHIN A CIRCLE OF RADIUS 76 AND SORTED TO DISTANCE TO THE CENTRE."
ZJ�"THIS ARRAY OF COORDINATES IS USED WITHIN THE TESSELATION GENERATOR."
d 
nM� A%() AND B%() ARRAYS FOR PIXEL COORDINATES WITHIN A CIRCLE OF RADIUS 76
x?�X%=0�76�D%:�Y%=0�X%�D%:� �X%,Y%) A%(P%)=X%:B%(P%)=Y%:P%+=1
�
�:�:P%-=1
�1� X%=1�P%:C%(X%)=8*�(B%(X%)/A%(X%))/(�/4)+1:�
�T� X%=0�P%-1:N%=0:� Y%=X%+1�P%:C%=A%(Y%)*A%(Y%)+B%(Y%)*B%(Y%):� C%>N% N%=C%:M%=Y%
�>�:Ȕ A%(X%),A%(M%):Ȕ B%(X%),B%(M%):Ȕ C%(X%),C%(M%):�N%:�
� 
��� X%=0�P%:A%=A%(X%):B%=B%(X%):�C%(X%):Ȓ A%,B%:Ȓ -A%,B%:Ȓ A%,-B%:Ȓ -A%,-B%:�16-C%(X%):Ȓ B%,A%:Ȓ -B%,A%:Ȓ B%,-A%:Ȓ -B%,-A%:�
�Q%=P%:P%=0:�7:�:�WRAP:�
 
"%� SUITABLE MODE DETECTING ROUTINE
,��MODE � C%,F%
6#ș "OS_CheckModeValid",20 � ;F%
@C%=(F%�%0010)>>1
J%� � (C%=1) � 20:MO%=1 � � 9:MO%=0
T�:�
^ 
h;� ROUTINE TO CREATE AN ARRAY OF EQUALY DISTRIBUTED DOTS
rR��WRAP:� X%=0�255:X%(X%)=�(1278):Y%(X%)=�(1022):�:P%=255:K%=1280:L%=1024:ȑ0,0
|�� R%=0�Q%:A%=A%(R%):B%=B%(R%):�C%(R%):� X%=1�P%:M%=X%(X%)+K%:N%=Y%(X%)+L%:Ȓ (M%+A%)�K%,(N%+B%)�L%:Ȓ (M%-A%)�K%,(N%+B%)�L%:Ȓ (M%+A%)�K%,(N%-B%)�L%:Ȓ (M%-A%)�K%,(N%-B%)�L%:�
���16-C%(R%):� X%=1�P%:M%=X%(X%)+K%:N%=Y%(X%)+L%:Ȓ (M%+B%)�K%,(N%+A%)�L%:Ȓ (M%-B%)�K%,(N%+A%)�L%:Ȓ (M%+B%)�K%,(N%-A%)�L%:Ȓ (M%-B%)�K%,(N%-A%)�L%:�:�
��
� 
�!� R,G,B VALUES OF THE PALETTE
��� 0,0,0,192,0,240,144,48,240,96,96,240,48,144,240,0,192,240,0,240,192,48,240,144,96,240,96,144,240,48,192,240,0,240,192,0,240,144,48,240,96,96,240,48,144,240,0,192
�� DATA FOR PROCRECUR
�P� .57735,-.57735,.57735,-.57735,-1.1547,1.1547,1.732,-1.732,0,0,-1.732,1.732
�"� 1,-1,-1,1,0,0,1,-1,-2,2,1,-1
�
00000000  0d 00 0a 0e f4 20 3e 56  4f 52 4f 4e 4f 49 0d 00  |..... >VORONOI..|
00000010  14 4d f4 20 4a 45 41 4e  20 56 41 4e 20 4d 4f 55  |.M. JEAN VAN MOU|
00000020  52 49 4b 20 34 20 50 41  4e 54 4c 4c 59 4e 20 4c  |RIK 4 PANTLLYN L|
00000030  4c 41 4e 44 59 42 49 45  20 41 4d 4d 41 4e 46 4f  |LANDYBIE AMMANFO|
00000040  52 44 20 44 59 46 45 44  20 53 41 31 38 33 4a 54  |RD DYFED SA183JT|
00000050  20 20 55 2e 4b 2e 20 31  39 39 34 0d 00 1e 78 f4  |  U.K. 1994...x.|
00000060  20 58 25 28 29 20 41 4e  44 20 59 25 28 29 20 41  | X%() AND Y%() A|
00000070  52 52 41 59 53 20 46 4f  52 20 52 41 4e 44 4f 4d  |RRAYS FOR RANDOM|
00000080  20 53 45 54 20 4f 46 20  56 4f 52 4f 4e 4f 49 20  | SET OF VORONOI |
00000090  43 4f 4f 52 44 49 4e 41  54 45 53 2e 20 43 25 28  |COORDINATES. C%(|
000000a0  29 20 41 52 52 41 59 20  46 4f 52 20 43 4f 4c 4f  |) ARRAY FOR COLO|
000000b0  55 52 20 41 53 53 4f 43  49 41 54 45 44 20 57 49  |UR ASSOCIATED WI|
000000c0  54 48 20 45 41 43 48 20  43 4f 4f 52 44 49 4e 41  |TH EACH COORDINA|
000000d0  54 45 2e 0d 00 28 3e f2  4d 4f 44 45 3a de 58 25  |TE...(>.MODE:.X%|
000000e0  28 31 36 31 31 29 2c 59  25 28 31 36 31 31 29 2c  |(1611),Y%(1611),|
000000f0  43 25 28 36 32 32 29 2c  41 25 28 36 32 32 29 2c  |C%(622),A%(622),|
00000100  42 25 28 36 32 32 29 3a  c8 91 36 34 30 2c 35 31  |B%(622):..640,51|
00000110  32 0d 00 32 22 f7 3a e3  20 58 3d 30 b8 31 35 3a  |2..2".:. X=0.15:|
00000120  f3 20 52 2c 47 2c 42 3a  fb 20 58 2c 52 2c 47 2c  |. R,G,B:. X,R,G,|
00000130  42 3a ed 0d 00 3c 26 c8  8f 20 c8 90 30 2c 30 2c  |B:...<&.. ..0,0,|
00000140  37 36 3a 50 25 3d 30 3a  44 25 3d 34 3a e7 20 4d  |76:P%=0:D%=4:. M|
00000150  4f 25 3d 31 20 44 25 3d  32 0d 00 46 58 f1 22 56  |O%=1 D%=2..FX."V|
00000160  4f 52 4f 4e 4f 49 20 54  45 53 53 45 4c 41 54 49  |ORONOI TESSELATI|
00000170  4f 4e 20 47 45 4e 45 52  41 54 4f 52 22 3a f1 3a  |ON GENERATOR":.:|
00000180  f1 22 57 41 49 54 20 54  49 4c 4c 20 54 48 45 20  |."WAIT TILL THE |
00000190  43 4f 4c 55 4d 4e 20 4f  46 20 4e 55 4d 42 45 52  |COLUMN OF NUMBER|
000001a0  53 20 48 41 53 20 52 45  41 43 48 45 44 20 30 2e  |S HAS REACHED 0.|
000001b0  22 0d 00 50 6f f1 22 54  48 49 53 20 49 53 20 54  |"..Po."THIS IS T|
000001c0  48 45 20 43 41 4c 43 55  4c 41 54 49 4f 4e 20 4f  |HE CALCULATION O|
000001d0  46 20 41 4c 4c 20 50 49  58 45 4c 53 20 57 49 54  |F ALL PIXELS WIT|
000001e0  48 49 4e 20 41 20 43 49  52 43 4c 45 20 4f 46 20  |HIN A CIRCLE OF |
000001f0  52 41 44 49 55 53 20 37  36 20 41 4e 44 20 53 4f  |RADIUS 76 AND SO|
00000200  52 54 45 44 20 54 4f 20  44 49 53 54 41 4e 43 45  |RTED TO DISTANCE|
00000210  20 54 4f 20 54 48 45 20  43 45 4e 54 52 45 2e 22  | TO THE CENTRE."|
00000220  0d 00 5a 4a f1 22 54 48  49 53 20 41 52 52 41 59  |..ZJ."THIS ARRAY|
00000230  20 4f 46 20 43 4f 4f 52  44 49 4e 41 54 45 53 20  | OF COORDINATES |
00000240  49 53 20 55 53 45 44 20  57 49 54 48 49 4e 20 54  |IS USED WITHIN T|
00000250  48 45 20 54 45 53 53 45  4c 41 54 49 4f 4e 20 47  |HE TESSELATION G|
00000260  45 4e 45 52 41 54 4f 52  2e 22 0d 00 64 05 20 0d  |ENERATOR."..d. .|
00000270  00 6e 4d f4 20 41 25 28  29 20 41 4e 44 20 42 25  |.nM. A%() AND B%|
00000280  28 29 20 41 52 52 41 59  53 20 46 4f 52 20 50 49  |() ARRAYS FOR PI|
00000290  58 45 4c 20 43 4f 4f 52  44 49 4e 41 54 45 53 20  |XEL COORDINATES |
000002a0  57 49 54 48 49 4e 20 41  20 43 49 52 43 4c 45 20  |WITHIN A CIRCLE |
000002b0  4f 46 20 52 41 44 49 55  53 20 37 36 0d 00 78 3f  |OF RADIUS 76..x?|
000002c0  e3 58 25 3d 30 b8 37 36  88 44 25 3a e3 59 25 3d  |.X%=0.76.D%:.Y%=|
000002d0  30 b8 58 25 88 44 25 3a  e7 20 b0 58 25 2c 59 25  |0.X%.D%:. .X%,Y%|
000002e0  29 20 41 25 28 50 25 29  3d 58 25 3a 42 25 28 50  |) A%(P%)=X%:B%(P|
000002f0  25 29 3d 59 25 3a 50 25  2b 3d 31 0d 00 82 0d ed  |%)=Y%:P%+=1.....|
00000300  3a ed 3a 50 25 2d 3d 31  0d 00 8c 31 e3 20 58 25  |:.:P%-=1...1. X%|
00000310  3d 31 b8 50 25 3a 43 25  28 58 25 29 3d 38 2a 99  |=1.P%:C%(X%)=8*.|
00000320  28 42 25 28 58 25 29 2f  41 25 28 58 25 29 29 2f  |(B%(X%)/A%(X%))/|
00000330  28 af 2f 34 29 2b 31 3a  ed 0d 00 96 54 e3 20 58  |(./4)+1:....T. X|
00000340  25 3d 30 b8 50 25 2d 31  3a 4e 25 3d 30 3a e3 20  |%=0.P%-1:N%=0:. |
00000350  59 25 3d 58 25 2b 31 b8  50 25 3a 43 25 3d 41 25  |Y%=X%+1.P%:C%=A%|
00000360  28 59 25 29 2a 41 25 28  59 25 29 2b 42 25 28 59  |(Y%)*A%(Y%)+B%(Y|
00000370  25 29 2a 42 25 28 59 25  29 3a e7 20 43 25 3e 4e  |%)*B%(Y%):. C%>N|
00000380  25 20 4e 25 3d 43 25 3a  4d 25 3d 59 25 0d 00 a0  |% N%=C%:M%=Y%...|
00000390  3e ed 3a c8 94 20 41 25  28 58 25 29 2c 41 25 28  |>.:.. A%(X%),A%(|
000003a0  4d 25 29 3a c8 94 20 42  25 28 58 25 29 2c 42 25  |M%):.. B%(X%),B%|
000003b0  28 4d 25 29 3a c8 94 20  43 25 28 58 25 29 2c 43  |(M%):.. C%(X%),C|
000003c0  25 28 4d 25 29 3a f1 4e  25 3a ed 0d 00 aa 05 20  |%(M%):.N%:..... |
000003d0  0d 00 b4 86 e3 20 58 25  3d 30 b8 50 25 3a 41 25  |..... X%=0.P%:A%|
000003e0  3d 41 25 28 58 25 29 3a  42 25 3d 42 25 28 58 25  |=A%(X%):B%=B%(X%|
000003f0  29 3a e6 43 25 28 58 25  29 3a c8 92 20 41 25 2c  |):.C%(X%):.. A%,|
00000400  42 25 3a c8 92 20 2d 41  25 2c 42 25 3a c8 92 20  |B%:.. -A%,B%:.. |
00000410  41 25 2c 2d 42 25 3a c8  92 20 2d 41 25 2c 2d 42  |A%,-B%:.. -A%,-B|
00000420  25 3a e6 31 36 2d 43 25  28 58 25 29 3a c8 92 20  |%:.16-C%(X%):.. |
00000430  42 25 2c 41 25 3a c8 92  20 2d 42 25 2c 41 25 3a  |B%,A%:.. -B%,A%:|
00000440  c8 92 20 42 25 2c 2d 41  25 3a c8 92 20 2d 42 25  |.. B%,-A%:.. -B%|
00000450  2c 2d 41 25 3a ed 0d 00  be 1b 51 25 3d 50 25 3a  |,-A%:.....Q%=P%:|
00000460  50 25 3d 30 3a e6 37 3a  db 3a f2 57 52 41 50 3a  |P%=0:.7:.:.WRAP:|
00000470  e0 0d 01 18 05 20 0d 01  22 25 f4 20 53 55 49 54  |..... .."%. SUIT|
00000480  41 42 4c 45 20 4d 4f 44  45 20 44 45 54 45 43 54  |ABLE MODE DETECT|
00000490  49 4e 47 20 52 4f 55 54  49 4e 45 0d 01 2c 12 dd  |ING ROUTINE..,..|
000004a0  f2 4d 4f 44 45 20 ea 20  43 25 2c 46 25 0d 01 36  |.MODE . C%,F%..6|
000004b0  23 c8 99 20 22 4f 53 5f  43 68 65 63 6b 4d 6f 64  |#.. "OS_CheckMod|
000004c0  65 56 61 6c 69 64 22 2c  32 30 20 b8 20 3b 46 25  |eValid",20 . ;F%|
000004d0  0d 01 40 14 43 25 3d 28  46 25 80 25 30 30 31 30  |..@.C%=(F%.%0010|
000004e0  29 3e 3e 31 0d 01 4a 25  e7 20 ac 20 28 43 25 3d  |)>>1..J%. . (C%=|
000004f0  31 29 20 eb 20 32 30 3a  4d 4f 25 3d 31 20 8b 20  |1) . 20:MO%=1 . |
00000500  eb 20 39 3a 4d 4f 25 3d  30 0d 01 54 07 87 3a e1  |. 9:MO%=0..T..:.|
00000510  0d 01 5e 05 20 0d 01 68  3b f4 20 52 4f 55 54 49  |..^. ..h;. ROUTI|
00000520  4e 45 20 54 4f 20 43 52  45 41 54 45 20 41 4e 20  |NE TO CREATE AN |
00000530  41 52 52 41 59 20 4f 46  20 45 51 55 41 4c 59 20  |ARRAY OF EQUALY |
00000540  44 49 53 54 52 49 42 55  54 45 44 20 44 4f 54 53  |DISTRIBUTED DOTS|
00000550  0d 01 72 52 dd f2 57 52  41 50 3a e3 20 58 25 3d  |..rR..WRAP:. X%=|
00000560  30 b8 32 35 35 3a 58 25  28 58 25 29 3d b3 28 31  |0.255:X%(X%)=.(1|
00000570  32 37 38 29 3a 59 25 28  58 25 29 3d b3 28 31 30  |278):Y%(X%)=.(10|
00000580  32 32 29 3a ed 3a 50 25  3d 32 35 35 3a 4b 25 3d  |22):.:P%=255:K%=|
00000590  31 32 38 30 3a 4c 25 3d  31 30 32 34 3a c8 91 30  |1280:L%=1024:..0|
000005a0  2c 30 0d 01 7c b3 e3 20  52 25 3d 30 b8 51 25 3a  |,0..|.. R%=0.Q%:|
000005b0  41 25 3d 41 25 28 52 25  29 3a 42 25 3d 42 25 28  |A%=A%(R%):B%=B%(|
000005c0  52 25 29 3a e6 43 25 28  52 25 29 3a e3 20 58 25  |R%):.C%(R%):. X%|
000005d0  3d 31 b8 50 25 3a 4d 25  3d 58 25 28 58 25 29 2b  |=1.P%:M%=X%(X%)+|
000005e0  4b 25 3a 4e 25 3d 59 25  28 58 25 29 2b 4c 25 3a  |K%:N%=Y%(X%)+L%:|
000005f0  c8 92 20 28 4d 25 2b 41  25 29 83 4b 25 2c 28 4e  |.. (M%+A%).K%,(N|
00000600  25 2b 42 25 29 83 4c 25  3a c8 92 20 28 4d 25 2d  |%+B%).L%:.. (M%-|
00000610  41 25 29 83 4b 25 2c 28  4e 25 2b 42 25 29 83 4c  |A%).K%,(N%+B%).L|
00000620  25 3a c8 92 20 28 4d 25  2b 41 25 29 83 4b 25 2c  |%:.. (M%+A%).K%,|
00000630  28 4e 25 2d 42 25 29 83  4c 25 3a c8 92 20 28 4d  |(N%-B%).L%:.. (M|
00000640  25 2d 41 25 29 83 4b 25  2c 28 4e 25 2d 42 25 29  |%-A%).K%,(N%-B%)|
00000650  83 4c 25 3a ed 0d 01 86  9a e6 31 36 2d 43 25 28  |.L%:......16-C%(|
00000660  52 25 29 3a e3 20 58 25  3d 31 b8 50 25 3a 4d 25  |R%):. X%=1.P%:M%|
00000670  3d 58 25 28 58 25 29 2b  4b 25 3a 4e 25 3d 59 25  |=X%(X%)+K%:N%=Y%|
00000680  28 58 25 29 2b 4c 25 3a  c8 92 20 28 4d 25 2b 42  |(X%)+L%:.. (M%+B|
00000690  25 29 83 4b 25 2c 28 4e  25 2b 41 25 29 83 4c 25  |%).K%,(N%+A%).L%|
000006a0  3a c8 92 20 28 4d 25 2d  42 25 29 83 4b 25 2c 28  |:.. (M%-B%).K%,(|
000006b0  4e 25 2b 41 25 29 83 4c  25 3a c8 92 20 28 4d 25  |N%+A%).L%:.. (M%|
000006c0  2b 42 25 29 83 4b 25 2c  28 4e 25 2d 41 25 29 83  |+B%).K%,(N%-A%).|
000006d0  4c 25 3a c8 92 20 28 4d  25 2d 42 25 29 83 4b 25  |L%:.. (M%-B%).K%|
000006e0  2c 28 4e 25 2d 41 25 29  83 4c 25 3a ed 3a ed 0d  |,(N%-A%).L%:.:..|
000006f0  01 90 05 e1 0d 01 9a 05  20 0d 01 a4 21 f4 20 52  |........ ...!. R|
00000700  2c 47 2c 42 20 56 41 4c  55 45 53 20 4f 46 20 54  |,G,B VALUES OF T|
00000710  48 45 20 50 41 4c 45 54  54 45 0d 01 ae a7 dc 20  |HE PALETTE..... |
00000720  30 2c 30 2c 30 2c 31 39  32 2c 30 2c 32 34 30 2c  |0,0,0,192,0,240,|
00000730  31 34 34 2c 34 38 2c 32  34 30 2c 39 36 2c 39 36  |144,48,240,96,96|
00000740  2c 32 34 30 2c 34 38 2c  31 34 34 2c 32 34 30 2c  |,240,48,144,240,|
00000750  30 2c 31 39 32 2c 32 34  30 2c 30 2c 32 34 30 2c  |0,192,240,0,240,|
00000760  31 39 32 2c 34 38 2c 32  34 30 2c 31 34 34 2c 39  |192,48,240,144,9|
00000770  36 2c 32 34 30 2c 39 36  2c 31 34 34 2c 32 34 30  |6,240,96,144,240|
00000780  2c 34 38 2c 31 39 32 2c  32 34 30 2c 30 2c 32 34  |,48,192,240,0,24|
00000790  30 2c 31 39 32 2c 30 2c  32 34 30 2c 31 34 34 2c  |0,192,0,240,144,|
000007a0  34 38 2c 32 34 30 2c 39  36 2c 39 36 2c 32 34 30  |48,240,96,96,240|
000007b0  2c 34 38 2c 31 34 34 2c  32 34 30 2c 30 2c 31 39  |,48,144,240,0,19|
000007c0  32 0d 01 b8 18 f4 20 44  41 54 41 20 46 4f 52 20  |2..... DATA FOR |
000007d0  50 52 4f 43 52 45 43 55  52 0d 01 c2 50 dc 20 2e  |PROCRECUR...P. .|
000007e0  35 37 37 33 35 2c 2d 2e  35 37 37 33 35 2c 2e 35  |57735,-.57735,.5|
000007f0  37 37 33 35 2c 2d 2e 35  37 37 33 35 2c 2d 31 2e  |7735,-.57735,-1.|
00000800  31 35 34 37 2c 31 2e 31  35 34 37 2c 31 2e 37 33  |1547,1.1547,1.73|
00000810  32 2c 2d 31 2e 37 33 32  2c 30 2c 30 2c 2d 31 2e  |2,-1.732,0,0,-1.|
00000820  37 33 32 2c 31 2e 37 33  32 0d 01 cc 22 dc 20 31  |732,1.732...". 1|
00000830  2c 2d 31 2c 2d 31 2c 31  2c 30 2c 30 2c 31 2c 2d  |,-1,-1,1,0,0,1,-|
00000840  31 2c 2d 32 2c 32 2c 31  2c 2d 31 0d ff           |1,-2,2,1,-1..|
0000084d