Home » Archimedes archive » Acorn User » AU 1994-10.adf » !StarInfo_StarInfo » VanMourik/Breeder

VanMourik/Breeder

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-10.adf » !StarInfo_StarInfo
Filename: VanMourik/Breeder
Read OK:
File size: 0799 bytes
Load address: 0000
Exec address: 0000
File contents
   10REM >BREEDER
   20REM (C) JEAN VAN MOURIK MILLCOTTAGE DERWYDD AMMANFORD DYFED SA183QL U.K. 93
   25MODE12:COLOUR132:CLS:OFF
   30PRINT:PRINT"                BREEDER AUTOMATON":OFF
   35PRINT:PRINT:PRINT:PRINT" (C) 3rd MILLENNIUM  1993":PRINT
   40PRINT
   50REPEAT
   60PRINT"1  MODE 4   2 COLOURS":PRINT"2  MODE 1   4 COLOURS":PRINT"3  MODE 9  16 COLOURS":PRINT"4  MODE 25  2 COLOURS":PRINT"5  MODE 26  4 COLOURS":PRINT"6  MODE 27 16 COLOURS":PRINT:PRINT" WHICH MODE ?  (CHOOSE 1-6)":A%=GET
   65A%-=48:UNTILA%>0ANDA%<7
   70IF A%=1 MODE4:C%=4:T%=2
   80IF A%=2 MODE1:C%=4:T%=4:COLOUR1,44,44,255:COLOUR2,44,255,44
   90IF A%=3 MODE9:C%=4:T%=16:FOR X=0TO15:READR,G,B:COLOURX,R,G,B:NEXT
  100IF A%=4 MODE25:C%=2:T%=2
  110IF A%=5 MODE26:C%=2:T%=4:COLOUR1,44,44,255:COLOUR2,44,255,44
  120IF A%=6 MODE27:C%=2:T%=16:FOR X=0TO15:READR,G,B:COLOURX,R,G,B:NEXT
  130PRINT" FIRST SEQUENCE STARTS WITH A CIRCLE         , THEN FOLLOWS A SEQUENCE STARTING WITH A COLOUR FILLED CIRCLE."
  140PRINT:PRINT" TAP SPACE NOW.":A=GET:CLS:OFF
  150R%=21:ORIGIN320,500:CIRCLE0,0,R%:H%=640:E%=2*C%:N%=0:S%=R%*1.5+E%:G%=0
  160 
  170REM START OF MAIN LOOP
  180REPEAT:REPEAT
  185FORX%=0TOS%STEPC%:A%=X%+640:B%=X%+C%:D%=X%-C%:F%=640-X%:W%=POINT(X%,G%-C%):V%=POINT(X%,G%):IFG%>S%-X%:X%=S%:NEXTX%:GOTO195
  190FORY%=G%TOS%-X%STEPC%:U%=POINT(X%,Y%+C%):GCOL(POINT(B%,Y%)+U%+W%+POINT(D%,Y%))MODT%:POINTA%,Y%:POINTY%+H%,X%:POINTF%,Y%:POINTH%-Y%,X%:POINTF%,-Y%:POINTH%-Y%,-X%:POINTA%,-Y%:POINTH%+Y%,-X%:W%=V%:V%=U%:NEXT:G%+=C%:NEXTX%
  195G%=0:ORIGIN960,500:PRINTTAB(0,0)"ITERATION "E%/C%
  200 
  220FORX%=0TO S%STEPC%:A%=X%-640:B%=X%+C%:D%=X%-C%:F%=-640-X%:W%=POINT(X%,G%-C%):V%=POINT(X%,G%):IFG%>S%-X% X%=S%:NEXTX%:GOTO232
  230FORY%=G%TO S%-X%STEPC%:U%=POINT(X%,Y%+C%):GCOL(POINT(B%,Y%)+U%+W%+POINT(D%,Y%))MODT%:POINTA%,Y%:POINTY%-H%,X%:POINTF%,Y%:POINT-H%-Y%,X%:POINTF%,-Y%:POINT-H%-Y%,-X%:POINTA%,-Y%:POINTY%-H%,-X%:W%=V%:V%=U%:NEXT:G%+=C%:NEXTX%
  232G%=0:ORIGIN320,500:PRINTTAB(0,0)"ITERATION "E%/C%+1
  235 
  240MOUSE A,B,C:IF C=1:END
  250E%=E%+2*C%:S%=R%*1.5+E%:UNTILE%>280
  260CLS:GCOLRND(T%-1):CIRCLEFILL0,0,R%:H%=640:E%=2*C%:N%=0:S%=R%*1.5+E%
  270IF T%=2:GCOL1:CIRCLEFILL0,0,R%
  280UNTIL0
  290 
  295REM RGB DATA TO DEFINE THE PALETTE
  300DATA 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  REM R,G,B VALUES TO DEFINE THE PALETTE

� >BREEDER
M� (C) JEAN VAN MOURIK MILLCOTTAGE DERWYDD AMMANFORD DYFED SA183QL U.K. 93
�12:�132:�:�
,�:�"                BREEDER AUTOMATON":�
#(�:�:�:�" (C) 3rd MILLENNIUM  1993":�
(�
2�
<��"1  MODE 4   2 COLOURS":�"2  MODE 1   4 COLOURS":�"3  MODE 9  16 COLOURS":�"4  MODE 25  2 COLOURS":�"5  MODE 26  4 COLOURS":�"6  MODE 27 16 COLOURS":�:�" WHICH MODE ?  (CHOOSE 1-6)":A%=�
AA%-=48:�A%>0�A%<7
F� A%=1 �4:C%=4:T%=2
P1� A%=2 �1:C%=4:T%=4:�1,44,44,255:�2,44,255,44
Z3� A%=3 �9:C%=4:T%=16:� X=0�15:�R,G,B:�X,R,G,B:�
d� A%=4 �25:C%=2:T%=2
n2� A%=5 �26:C%=2:T%=4:�1,44,44,255:�2,44,255,44
x4� A%=6 �27:C%=2:T%=16:� X=0�15:�R,G,B:�X,R,G,B:�
�s�" FIRST SEQUENCE STARTS WITH A CIRCLE         , THEN FOLLOWS A SEQUENCE STARTING WITH A COLOUR FILLED CIRCLE."
� �:�" TAP SPACE NOW.":A=�:�:�
�BR%=21:ȑ320,500:ȏ0,0,R%:H%=640:E%=2*C%:N%=0:S%=R%*1.5+E%:G%=0
� 
�� START OF MAIN LOOP
��:�
�h�X%=0�S%�C%:A%=X%+640:B%=X%+C%:D%=X%-C%:F%=640-X%:W%=�X%,G%-C%):V%=�X%,G%):�G%>S%-X%:X%=S%:�X%:�dC@
���Y%=G%�S%-X%�C%:U%=�X%,Y%+C%):�(�B%,Y%)+U%+W%+�D%,Y%))�T%:ȒA%,Y%:ȒY%+H%,X%:ȒF%,Y%:ȒH%-Y%,X%:ȒF%,-Y%:ȒH%-Y%,-X%:ȒA%,-Y%:ȒH%+Y%,-X%:W%=V%:V%=U%:�:G%+=C%:�X%
�*G%=0:ȑ960,500:�0,0)"ITERATION "E%/C%
� 
�j�X%=0� S%�C%:A%=X%-640:B%=X%+C%:D%=X%-C%:F%=-640-X%:W%=�X%,G%-C%):V%=�X%,G%):�G%>S%-X% X%=S%:�X%:�dh@
��Y%=G%� S%-X%�C%:U%=�X%,Y%+C%):�(�B%,Y%)+U%+W%+�D%,Y%))�T%:ȒA%,Y%:ȒY%-H%,X%:ȒF%,Y%:Ȓ-H%-Y%,X%:ȒF%,-Y%:Ȓ-H%-Y%,-X%:ȒA%,-Y%:ȒY%-H%,-X%:W%=V%:V%=U%:�:G%+=C%:�X%
�,G%=0:ȑ320,500:�0,0)"ITERATION "E%/C%+1
� 
�ȗ A,B,C:� C=1:�
�#E%=E%+2*C%:S%=R%*1.5+E%:�E%>280
:�:�(T%-1):ȏȐ0,0,R%:H%=640:E%=2*C%:N%=0:S%=R%*1.5+E%
� T%=2:�1:ȏȐ0,0,R%
�0
" 
'$� RGB DATA TO DEFINE 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  REM R,G,B VALUES TO DEFINE THE PALETTE
�
00000000  0d 00 0a 0e f4 20 3e 42  52 45 45 44 45 52 0d 00  |..... >BREEDER..|
00000010  14 4d f4 20 28 43 29 20  4a 45 41 4e 20 56 41 4e  |.M. (C) JEAN VAN|
00000020  20 4d 4f 55 52 49 4b 20  4d 49 4c 4c 43 4f 54 54  | MOURIK MILLCOTT|
00000030  41 47 45 20 44 45 52 57  59 44 44 20 41 4d 4d 41  |AGE DERWYDD AMMA|
00000040  4e 46 4f 52 44 20 44 59  46 45 44 20 53 41 31 38  |NFORD DYFED SA18|
00000050  33 51 4c 20 55 2e 4b 2e  20 39 33 0d 00 19 10 eb  |3QL U.K. 93.....|
00000060  31 32 3a fb 31 33 32 3a  db 3a 87 0d 00 1e 2c f1  |12:.132:.:....,.|
00000070  3a f1 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |:."             |
00000080  20 20 20 42 52 45 45 44  45 52 20 41 55 54 4f 4d  |   BREEDER AUTOM|
00000090  41 54 4f 4e 22 3a 87 0d  00 23 28 f1 3a f1 3a f1  |ATON":...#(.:.:.|
000000a0  3a f1 22 20 28 43 29 20  33 72 64 20 4d 49 4c 4c  |:." (C) 3rd MILL|
000000b0  45 4e 4e 49 55 4d 20 20  31 39 39 33 22 3a f1 0d  |ENNIUM  1993":..|
000000c0  00 28 05 f1 0d 00 32 05  f5 0d 00 3c bf f1 22 31  |.(....2....<.."1|
000000d0  20 20 4d 4f 44 45 20 34  20 20 20 32 20 43 4f 4c  |  MODE 4   2 COL|
000000e0  4f 55 52 53 22 3a f1 22  32 20 20 4d 4f 44 45 20  |OURS":."2  MODE |
000000f0  31 20 20 20 34 20 43 4f  4c 4f 55 52 53 22 3a f1  |1   4 COLOURS":.|
00000100  22 33 20 20 4d 4f 44 45  20 39 20 20 31 36 20 43  |"3  MODE 9  16 C|
00000110  4f 4c 4f 55 52 53 22 3a  f1 22 34 20 20 4d 4f 44  |OLOURS":."4  MOD|
00000120  45 20 32 35 20 20 32 20  43 4f 4c 4f 55 52 53 22  |E 25  2 COLOURS"|
00000130  3a f1 22 35 20 20 4d 4f  44 45 20 32 36 20 20 34  |:."5  MODE 26  4|
00000140  20 43 4f 4c 4f 55 52 53  22 3a f1 22 36 20 20 4d  | COLOURS":."6  M|
00000150  4f 44 45 20 32 37 20 31  36 20 43 4f 4c 4f 55 52  |ODE 27 16 COLOUR|
00000160  53 22 3a f1 3a f1 22 20  57 48 49 43 48 20 4d 4f  |S":.:." WHICH MO|
00000170  44 45 20 3f 20 20 28 43  48 4f 4f 53 45 20 31 2d  |DE ?  (CHOOSE 1-|
00000180  36 29 22 3a 41 25 3d a5  0d 00 41 15 41 25 2d 3d  |6)":A%=...A.A%-=|
00000190  34 38 3a fd 41 25 3e 30  80 41 25 3c 37 0d 00 46  |48:.A%>0.A%<7..F|
000001a0  17 e7 20 41 25 3d 31 20  eb 34 3a 43 25 3d 34 3a  |.. A%=1 .4:C%=4:|
000001b0  54 25 3d 32 0d 00 50 31  e7 20 41 25 3d 32 20 eb  |T%=2..P1. A%=2 .|
000001c0  31 3a 43 25 3d 34 3a 54  25 3d 34 3a fb 31 2c 34  |1:C%=4:T%=4:.1,4|
000001d0  34 2c 34 34 2c 32 35 35  3a fb 32 2c 34 34 2c 32  |4,44,255:.2,44,2|
000001e0  35 35 2c 34 34 0d 00 5a  33 e7 20 41 25 3d 33 20  |55,44..Z3. A%=3 |
000001f0  eb 39 3a 43 25 3d 34 3a  54 25 3d 31 36 3a e3 20  |.9:C%=4:T%=16:. |
00000200  58 3d 30 b8 31 35 3a f3  52 2c 47 2c 42 3a fb 58  |X=0.15:.R,G,B:.X|
00000210  2c 52 2c 47 2c 42 3a ed  0d 00 64 18 e7 20 41 25  |,R,G,B:...d.. A%|
00000220  3d 34 20 eb 32 35 3a 43  25 3d 32 3a 54 25 3d 32  |=4 .25:C%=2:T%=2|
00000230  0d 00 6e 32 e7 20 41 25  3d 35 20 eb 32 36 3a 43  |..n2. A%=5 .26:C|
00000240  25 3d 32 3a 54 25 3d 34  3a fb 31 2c 34 34 2c 34  |%=2:T%=4:.1,44,4|
00000250  34 2c 32 35 35 3a fb 32  2c 34 34 2c 32 35 35 2c  |4,255:.2,44,255,|
00000260  34 34 0d 00 78 34 e7 20  41 25 3d 36 20 eb 32 37  |44..x4. A%=6 .27|
00000270  3a 43 25 3d 32 3a 54 25  3d 31 36 3a e3 20 58 3d  |:C%=2:T%=16:. X=|
00000280  30 b8 31 35 3a f3 52 2c  47 2c 42 3a fb 58 2c 52  |0.15:.R,G,B:.X,R|
00000290  2c 47 2c 42 3a ed 0d 00  82 73 f1 22 20 46 49 52  |,G,B:....s." FIR|
000002a0  53 54 20 53 45 51 55 45  4e 43 45 20 53 54 41 52  |ST SEQUENCE STAR|
000002b0  54 53 20 57 49 54 48 20  41 20 43 49 52 43 4c 45  |TS WITH A CIRCLE|
000002c0  20 20 20 20 20 20 20 20  20 2c 20 54 48 45 4e 20  |         , THEN |
000002d0  46 4f 4c 4c 4f 57 53 20  41 20 53 45 51 55 45 4e  |FOLLOWS A SEQUEN|
000002e0  43 45 20 53 54 41 52 54  49 4e 47 20 57 49 54 48  |CE STARTING WITH|
000002f0  20 41 20 43 4f 4c 4f 55  52 20 46 49 4c 4c 45 44  | A COLOUR FILLED|
00000300  20 43 49 52 43 4c 45 2e  22 0d 00 8c 20 f1 3a f1  | CIRCLE."... .:.|
00000310  22 20 54 41 50 20 53 50  41 43 45 20 4e 4f 57 2e  |" TAP SPACE NOW.|
00000320  22 3a 41 3d a5 3a db 3a  87 0d 00 96 42 52 25 3d  |":A=.:.:....BR%=|
00000330  32 31 3a c8 91 33 32 30  2c 35 30 30 3a c8 8f 30  |21:..320,500:..0|
00000340  2c 30 2c 52 25 3a 48 25  3d 36 34 30 3a 45 25 3d  |,0,R%:H%=640:E%=|
00000350  32 2a 43 25 3a 4e 25 3d  30 3a 53 25 3d 52 25 2a  |2*C%:N%=0:S%=R%*|
00000360  31 2e 35 2b 45 25 3a 47  25 3d 30 0d 00 a0 05 20  |1.5+E%:G%=0.... |
00000370  0d 00 aa 18 f4 20 53 54  41 52 54 20 4f 46 20 4d  |..... START OF M|
00000380  41 49 4e 20 4c 4f 4f 50  0d 00 b4 07 f5 3a f5 0d  |AIN LOOP.....:..|
00000390  00 b9 68 e3 58 25 3d 30  b8 53 25 88 43 25 3a 41  |..h.X%=0.S%.C%:A|
000003a0  25 3d 58 25 2b 36 34 30  3a 42 25 3d 58 25 2b 43  |%=X%+640:B%=X%+C|
000003b0  25 3a 44 25 3d 58 25 2d  43 25 3a 46 25 3d 36 34  |%:D%=X%-C%:F%=64|
000003c0  30 2d 58 25 3a 57 25 3d  b0 58 25 2c 47 25 2d 43  |0-X%:W%=.X%,G%-C|
000003d0  25 29 3a 56 25 3d b0 58  25 2c 47 25 29 3a e7 47  |%):V%=.X%,G%):.G|
000003e0  25 3e 53 25 2d 58 25 3a  58 25 3d 53 25 3a ed 58  |%>S%-X%:X%=S%:.X|
000003f0  25 3a e5 8d 64 43 40 0d  00 be a6 e3 59 25 3d 47  |%:..dC@.....Y%=G|
00000400  25 b8 53 25 2d 58 25 88  43 25 3a 55 25 3d b0 58  |%.S%-X%.C%:U%=.X|
00000410  25 2c 59 25 2b 43 25 29  3a e6 28 b0 42 25 2c 59  |%,Y%+C%):.(.B%,Y|
00000420  25 29 2b 55 25 2b 57 25  2b b0 44 25 2c 59 25 29  |%)+U%+W%+.D%,Y%)|
00000430  29 83 54 25 3a c8 92 41  25 2c 59 25 3a c8 92 59  |).T%:..A%,Y%:..Y|
00000440  25 2b 48 25 2c 58 25 3a  c8 92 46 25 2c 59 25 3a  |%+H%,X%:..F%,Y%:|
00000450  c8 92 48 25 2d 59 25 2c  58 25 3a c8 92 46 25 2c  |..H%-Y%,X%:..F%,|
00000460  2d 59 25 3a c8 92 48 25  2d 59 25 2c 2d 58 25 3a  |-Y%:..H%-Y%,-X%:|
00000470  c8 92 41 25 2c 2d 59 25  3a c8 92 48 25 2b 59 25  |..A%,-Y%:..H%+Y%|
00000480  2c 2d 58 25 3a 57 25 3d  56 25 3a 56 25 3d 55 25  |,-X%:W%=V%:V%=U%|
00000490  3a ed 3a 47 25 2b 3d 43  25 3a ed 58 25 0d 00 c3  |:.:G%+=C%:.X%...|
000004a0  2a 47 25 3d 30 3a c8 91  39 36 30 2c 35 30 30 3a  |*G%=0:..960,500:|
000004b0  f1 8a 30 2c 30 29 22 49  54 45 52 41 54 49 4f 4e  |..0,0)"ITERATION|
000004c0  20 22 45 25 2f 43 25 0d  00 c8 05 20 0d 00 dc 6a  | "E%/C%.... ...j|
000004d0  e3 58 25 3d 30 b8 20 53  25 88 43 25 3a 41 25 3d  |.X%=0. S%.C%:A%=|
000004e0  58 25 2d 36 34 30 3a 42  25 3d 58 25 2b 43 25 3a  |X%-640:B%=X%+C%:|
000004f0  44 25 3d 58 25 2d 43 25  3a 46 25 3d 2d 36 34 30  |D%=X%-C%:F%=-640|
00000500  2d 58 25 3a 57 25 3d b0  58 25 2c 47 25 2d 43 25  |-X%:W%=.X%,G%-C%|
00000510  29 3a 56 25 3d b0 58 25  2c 47 25 29 3a e7 47 25  |):V%=.X%,G%):.G%|
00000520  3e 53 25 2d 58 25 20 58  25 3d 53 25 3a ed 58 25  |>S%-X% X%=S%:.X%|
00000530  3a e5 8d 64 68 40 0d 00  e6 a9 e3 59 25 3d 47 25  |:..dh@.....Y%=G%|
00000540  b8 20 53 25 2d 58 25 88  43 25 3a 55 25 3d b0 58  |. S%-X%.C%:U%=.X|
00000550  25 2c 59 25 2b 43 25 29  3a e6 28 b0 42 25 2c 59  |%,Y%+C%):.(.B%,Y|
00000560  25 29 2b 55 25 2b 57 25  2b b0 44 25 2c 59 25 29  |%)+U%+W%+.D%,Y%)|
00000570  29 83 54 25 3a c8 92 41  25 2c 59 25 3a c8 92 59  |).T%:..A%,Y%:..Y|
00000580  25 2d 48 25 2c 58 25 3a  c8 92 46 25 2c 59 25 3a  |%-H%,X%:..F%,Y%:|
00000590  c8 92 2d 48 25 2d 59 25  2c 58 25 3a c8 92 46 25  |..-H%-Y%,X%:..F%|
000005a0  2c 2d 59 25 3a c8 92 2d  48 25 2d 59 25 2c 2d 58  |,-Y%:..-H%-Y%,-X|
000005b0  25 3a c8 92 41 25 2c 2d  59 25 3a c8 92 59 25 2d  |%:..A%,-Y%:..Y%-|
000005c0  48 25 2c 2d 58 25 3a 57  25 3d 56 25 3a 56 25 3d  |H%,-X%:W%=V%:V%=|
000005d0  55 25 3a ed 3a 47 25 2b  3d 43 25 3a ed 58 25 0d  |U%:.:G%+=C%:.X%.|
000005e0  00 e8 2c 47 25 3d 30 3a  c8 91 33 32 30 2c 35 30  |..,G%=0:..320,50|
000005f0  30 3a f1 8a 30 2c 30 29  22 49 54 45 52 41 54 49  |0:..0,0)"ITERATI|
00000600  4f 4e 20 22 45 25 2f 43  25 2b 31 0d 00 eb 05 20  |ON "E%/C%+1.... |
00000610  0d 00 f0 14 c8 97 20 41  2c 42 2c 43 3a e7 20 43  |...... A,B,C:. C|
00000620  3d 31 3a e0 0d 00 fa 23  45 25 3d 45 25 2b 32 2a  |=1:....#E%=E%+2*|
00000630  43 25 3a 53 25 3d 52 25  2a 31 2e 35 2b 45 25 3a  |C%:S%=R%*1.5+E%:|
00000640  fd 45 25 3e 32 38 30 0d  01 04 3a db 3a e6 b3 28  |.E%>280...:.:..(|
00000650  54 25 2d 31 29 3a c8 8f  c8 90 30 2c 30 2c 52 25  |T%-1):....0,0,R%|
00000660  3a 48 25 3d 36 34 30 3a  45 25 3d 32 2a 43 25 3a  |:H%=640:E%=2*C%:|
00000670  4e 25 3d 30 3a 53 25 3d  52 25 2a 31 2e 35 2b 45  |N%=0:S%=R%*1.5+E|
00000680  25 0d 01 0e 18 e7 20 54  25 3d 32 3a e6 31 3a c8  |%..... T%=2:.1:.|
00000690  8f c8 90 30 2c 30 2c 52  25 0d 01 18 06 fd 30 0d  |...0,0,R%.....0.|
000006a0  01 22 05 20 0d 01 27 24  f4 20 52 47 42 20 44 41  |.". ..'$. RGB DA|
000006b0  54 41 20 54 4f 20 44 45  46 49 4e 45 20 54 48 45  |TA TO DEFINE THE|
000006c0  20 50 41 4c 45 54 54 45  0d 01 2c cf dc 20 30 2c  | PALETTE..,.. 0,|
000006d0  30 2c 30 2c 31 39 32 2c  30 2c 32 34 30 2c 31 34  |0,0,192,0,240,14|
000006e0  34 2c 34 38 2c 32 34 30  2c 39 36 2c 39 36 2c 32  |4,48,240,96,96,2|
000006f0  34 30 2c 34 38 2c 31 34  34 2c 32 34 30 2c 30 2c  |40,48,144,240,0,|
00000700  31 39 32 2c 32 34 30 2c  30 2c 32 34 30 2c 31 39  |192,240,0,240,19|
00000710  32 2c 34 38 2c 32 34 30  2c 31 34 34 2c 39 36 2c  |2,48,240,144,96,|
00000720  32 34 30 2c 39 36 2c 31  34 34 2c 32 34 30 2c 34  |240,96,144,240,4|
00000730  38 2c 31 39 32 2c 32 34  30 2c 30 2c 32 34 30 2c  |8,192,240,0,240,|
00000740  31 39 32 2c 30 2c 32 34  30 2c 31 34 34 2c 34 38  |192,0,240,144,48|
00000750  2c 32 34 30 2c 39 36 2c  39 36 2c 32 34 30 2c 34  |,240,96,96,240,4|
00000760  38 2c 31 34 34 2c 32 34  30 2c 30 2c 31 39 32 20  |8,144,240,0,192 |
00000770  20 52 45 4d 20 52 2c 47  2c 42 20 56 41 4c 55 45  | REM R,G,B VALUE|
00000780  53 20 54 4f 20 44 45 46  49 4e 45 20 54 48 45 20  |S TO DEFINE THE |
00000790  50 41 4c 45 54 54 45 0d  ff                       |PALETTE..|
00000799