==============================================================================================================================================
OFFSET    00 01 02 03 04 05 06 07  08 09 0A 0B 0C 0D 0E 0F  10 11 12 13 14 15 16 17  18 19 1A 1B 1C 1D 1E 1F
----------------------------------------------------------------------------------------------------------------------------------------------
00000000  54 75 72 62 6F 20 43 20  43 6F 6E 74 65 78 74 20  46 69 6C 65 20 1A 00 01  0D 12 17 01 1A 00 00 09  Turbo C Context File →.☺♪↕↨☺→..○
00000020  64 00 8C 00 05 00 00 00  62 00 37 00 0C 00 0C 00  43 45 4C 4C 32 44 2E 43  00 01 00 01 00 01 00 01  d.î.♣...b.7.♀.♀.CELL2D.C.☺.☺.☺.☺
00000040  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 00 00 47 52 41 50 48  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...GRAPH
00000060  42 2E 43 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  B.C.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.
00000080  01 00 01 00 00 00 4D 41  54 48 42 2E 43 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  ☺.☺...MATHB.C.☺.☺.☺.☺.☺.☺.☺.☺.☺.
000000A0  01 00 01 00 01 00 01 00  01 00 01 00 01 00 00 00  65 00 BF 00 0E 00 1C 00  9D 00 00 00 0D 00 11 00  ☺.☺.☺.☺.☺.☺.☺...e.┐.♫.∟.¥...♪.◄.
000000C0  1A 00 27 00 2D 00 33 00  4C 00 5F 00 63 00 78 00  8D 00 93 00 99 00 2E 2E  5C 4D 4F 44 45 4C 5C 2A  →.'.-.3.L._.c.x.ì.ô.Ö...\MODEL\*
000000E0  2E 48 00 2A 2E 2A 00 2E  2E 5C 2A 2E 54 58 54 00  2E 2E 5C 4D 4F 44 45 4C  5C 2A 2E 43 00 2A 2E 49  .H.*.*...\*.TXT...\MODEL\*.C.*.I
00000100  4E 43 00 2A 2E 54 58 54  00 5C 42 4C 53 43 5C 41  4E 49 4D 41 54 45 5C 41  4E 49 4D 41 54 45 34 2E  NC.*.TXT.\BLSC\ANIMATE\ANIMATE4.
00000120  43 00 5C 42 4C 53 43 5C  53 43 4E 53 43 52 50 54  5C 2A 2E 43 00 2A 2E 48  00 43 3A 5C 42 4F 52 4C  C.\BLSC\SCNSCRPT\*.C.*.H.C:\BORL
00000140  41 4E 44 43 5C 43 4C 49  42 5C 2A 2E 43 00 43 3A  5C 42 4F 52 4C 41 4E 44  43 5C 43 4C 49 42 5C 2A  ANDC\CLIB\*.C.C:\BORLANDC\CLIB\*
00000160  2E 48 00 2A 2E 41 53 4D  00 2A 2E 50 41 53 00 2A  2E 43 00 78 00 A4 00 0F  00 1E 00 80 00 00 00 09  .H.*.ASM.*.PAS.*.C.x.ñ.☼.▲.Ç...○
00000180  00 12 00 1C 00 24 00 29  00 2F 00 35 00 3A 00 3F  00 4D 00 57 00 61 00 6B  00 77 00 6E 65 77 77 6F  .↕.∟.$.)./.5.:.?.M.W.a.k.w.newwo
000001A0  72 6C 64 00 6F 6C 64 77  6F 72 6C 64 00 74 65 6D  70 77 6F 72 6C 64 00 64  6F 77 6F 72 6C 64 00 6C  rld.oldworld.tempworld.doworld.l
000001C0  6F 77 69 00 68 69 67 68  69 00 68 69 67 68 6A 00  6C 6F 77 6A 00 6E 61 6D  65 00 77 6F 72 6C 64 66  owi.highi.highj.lowj.name.worldf
000001E0  69 6C 65 4E 61 6D 65 00  77 6F 72 6C 64 66 69 6C  65 00 6C 6F 61 64 77 6F  72 6C 64 00 6C 6F 61 64  ileName.worldfile.loadworld.load
00000200  52 75 6C 65 73 00 63 6C  65 61 72 6D 65 6D 6F 72  79 00 70 61 6C 61 72 72  61 79 00 79 00 A4 00 0F  Rules.clearmemory.palarray.y.ñ.☼
00000220  00 1E 00 80 00 00 00 09  00 12 00 1C 00 24 00 29  00 2F 00 35 00 3A 00 3F  00 4D 00 57 00 61 00 6B  .▲.Ç...○.↕.∟.$.)./.5.:.?.M.W.a.k
00000240  00 77 00 4E 65 77 57 6F  72 6C 64 00 4F 6C 64 57  6F 72 6C 64 00 54 65 6D  70 57 6F 72 6C 64 00 44  .w.NewWorld.OldWorld.TempWorld.D
00000260  6F 57 6F 72 6C 64 00 4C  6F 77 49 00 48 69 67 68  49 00 48 69 67 68 4A 00  4C 6F 77 4A 00 4E 61 6D  oWorld.LowI.HighI.HighJ.LowJ.Nam
00000280  65 00 57 6F 72 6C 64 46  69 6C 65 4E 61 6D 65 00  57 6F 72 6C 64 46 69 6C  65 00 4C 6F 61 64 57 6F  e.WorldFileName.WorldFile.LoadWo
000002A0  72 6C 64 00 4C 6F 61 64  52 75 6C 65 73 00 43 6C  65 61 72 4D 65 6D 6F 72  79 00 50 61 6C 41 72 72  rld.LoadRules.ClearMemory.PalArr
000002C0  61 79 00 7A 00 14 00 02  00 04 00 0A 00 00 00 06  00 2A 2E 4F 42 4A 00 2A  2E 43 00 F4 01 3B 05 1E  ay.z.¶.☻.♦.◙...♠.*.OBJ.*.C.⌠☺;♣▲
000002E0  00 00 19 00 00 0F 05 40  15 0F 05 40 15 04 00 20  20 95 05 00 00 0E 00 04  00 3D 00 2E 00 12 00 00  ..↓..☼♣@§☼♣@§♦.  ò♣..♫.♦.=...↕..
00000300  19 00 00 00 11 4F 17 00  11 4F 17 02 00 30 0D 45  00 00 19 00 00 01 02 4F  17 00 01 4F 10 00 00 00  ↓...◄O↨.◄O↨☻.0♪E..↓..☺☻O↨.☺O►...
00000320  00 43 3A 5C 57 4F 52 4B  5C 47 52 41 50 48 42 2E  43 00 02 00 44 02 01 00  31 02 01 00 01 00 01 00  .C:\WORK\GRAPHB.C.☻.D☻☺.1☻☺.☺.☺.
00000340  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 00 00 46 00 00 19  00 01 00 01 4F 17 00 01  ☺.☺.☺.☺.☺.☺.☺.☺.☺...F..↓.☺.☺O↨.☺
00000360  4F 10 00 00 00 00 43 3A  5C 57 4F 52 4B 5C 56 49  44 45 4F 2E 41 53 4D 00  18 00 B5 08 01 00 AB 08  O►....C:\WORK\VIDEO.ASM.↑.╡◘☺.½◘
00000380  01 00 01 00 01 00 AE 08  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  00 00 54 00 00 19 00 01  ☺.☺.☺.«◘☺.☺.☺.☺.☺.☺.☺.☺...T..↓.☺
000003A0  00 01 4F 17 00 01 4F 10  00 00 00 00 43 3A 5C 42  4C 53 50 5C 42 4F 4F 4B  4D 49 53 43 5C 54 4D 50  .☺O↨.☺O►....C:\BLSP\BOOKMISC\TMP
000003C0  5C 43 45 4C 4C 32 44 2E  50 41 53 00 01 00 0C 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  \CELL2D.PAS.☺.♀.☺.☺.☺.☺.☺.☺.☺.☺.
000003E0  01 00 01 00 01 00 01 00  01 00 01 00 00 00 54 00  00 19 00 01 00 01 4F 17  00 01 4F 10 00 00 00 00  ☺.☺.☺.☺.☺.☺...T..↓.☺.☺O↨.☺O►....
00000400  43 3A 5C 42 4C 53 50 5C  42 4F 4F 4B 4D 49 53 43  5C 54 4D 50 5C 52 55 4C  45 32 44 2E 50 41 53 00  C:\BLSP\BOOKMISC\TMP\RULE2D.PAS.
00000420  01 00 0F 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  ☺.☼.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.
00000440  00 00 54 00 00 19 00 01  00 01 4F 17 00 01 4F 10  00 00 00 00 43 3A 5C 42  4C 53 50 5C 42 4F 4F 4B  ..T..↓.☺.☺O↨.☺O►....C:\BLSP\BOOK
00000460  4D 49 53 43 5C 54 4D 50  5C 53 49 45 52 32 44 2E  50 41 53 00 01 00 0F 00  01 00 01 00 01 00 01 00  MISC\TMP\SIER2D.PAS.☺.☼.☺.☺.☺.☺.
00000480  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 00 00 55 00  00 19 00 01 00 01 4F 17  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...U..↓.☺.☺O↨
000004A0  00 01 4F 10 00 00 00 00  43 3A 5C 42 4C 53 50 5C  42 4F 4F 4B 4D 49 53 43  5C 54 4D 50 5C 57 4F 52  .☺O►....C:\BLSP\BOOKMISC\TMP\WOR
000004C0  4C 44 32 44 2E 50 41 53  00 01 00 0F 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  LD2D.PAS.☺.☼.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺
000004E0  00 01 00 01 00 01 00 01  00 00 00 54 00 00 19 00  00 01 02 4F 17 00 01 4F  10 00 00 00 00 43 3A 5C  .☺.☺.☺.☺...T..↓..☺☻O↨.☺O►....C:\
00000500  42 4C 53 50 5C 42 4F 4F  4B 4D 49 53 43 5C 54 4D  50 5C 43 45 4C 4C 32 44  2E 50 41 53 00 01 00 01  BLSP\BOOKMISC\TMP\CELL2D.PAS.☺.☺
00000520  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 00 00 52  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...R
00000540  00 00 19 00 01 00 01 4F  17 00 01 4F 10 00 00 00  00 43 3A 5C 42 4C 53 50  5C 42 4F 4F 4B 4D 49 53  ..↓.☺.☺O↨.☺O►....C:\BLSP\BOOKMIS
00000560  43 5C 54 4D 50 5C 52 55  4C 45 32 44 2E 43 00 0A  00 1A 00 01 00 0B 00 01  00 01 00 01 00 01 00 01  C\TMP\RULE2D.C.◙.→.☺.♂.☺.☺.☺.☺.☺
00000580  00 01 00 01 00 01 00 01  00 0D 00 01 00 0D 00 00  00 52 00 00 19 00 00 02  03 4F 17 00 01 4F 10 00  .☺.☺.☺.☺.♪.☺.♪...R..↓..☻♥O↨.☺O►.
000005A0  00 00 00 43 3A 5C 42 4C  53 50 5C 42 4F 4F 4B 4D  49 53 43 5C 54 4D 50 5C  52 55 4C 45 31 44 2E 43  ...C:\BLSP\BOOKMISC\TMP\RULE1D.C
000005C0  00 01 00 13 00 01 00 13  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  .☺.‼.☺.‼.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺
000005E0  00 00 00 54 00 00 19 00  00 01 02 4F 17 00 01 4F  10 00 00 00 00 43 3A 5C  42 4C 53 50 5C 42 4F 4F  ...T..↓..☺☻O↨.☺O►....C:\BLSP\BOO
00000600  4B 4D 49 53 43 5C 54 4D  50 5C 52 55 4C 45 32 44  2E 50 41 53 00 01 00 20  00 01 00 20 00 01 00 01  KMISC\TMP\RULE2D.PAS.☺. .☺. .☺.☺
00000620  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 00 00 52  00 00 19 00 01 00 01 4F  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...R..↓.☺.☺O
00000640  17 00 01 4F 10 00 00 00  00 43 3A 5C 42 4C 53 50  5C 42 4F 4F 4B 4D 49 53  43 5C 54 4D 50 5C 53 49  ↨.☺O►....C:\BLSP\BOOKMISC\TMP\SI
00000660  45 52 32 44 2E 43 00 01  00 0A 00 01 00 0A 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  ER2D.C.☺.◙.☺.◙.☺.☺.☺.☺.☺.☺.☺.☺.☺
00000680  00 0D 00 01 00 0D 00 00  00 34 00 01 19 00 01 00  01 4F 17 00 01 4F 10 00  00 00 00 01 00 4D 02 01  .♪.☺.♪...4.☺↓.☺.☺O↨.☺O►....☺.M☻☺
000006A0  00 39 02 00 00 00 00 00  00 00 00 00 00 00 00 00  00 00 00 01 00 3D 02 01  00 44 02 00 00 53 00 00  .9☻................☺.=☻☺.D☻..S..
000006C0  19 00 01 00 01 4F 17 00  01 4F 10 00 00 00 00 43  3A 5C 42 4C 53 50 5C 42  4F 4F 4B 4D 49 53 43 5C  ↓.☺.☺O↨.☺O►....C:\BLSP\BOOKMISC\
000006E0  54 4D 50 5C 57 4F 52 4C  44 32 44 2E 43 00 01 00  0D 00 01 00 0A 00 01 00  01 00 01 00 01 00 01 00  TMP\WORLD2D.C.☺.♪.☺.◙.☺.☺.☺.☺.☺.
00000700  01 00 01 00 01 00 01 00  0D 00 01 00 0D 00 00 00  54 00 00 19 00 00 01 02  4F 17 00 01 4F 10 00 00  ☺.☺.☺.☺.♪.☺.♪...T..↓..☺☻O↨.☺O►..
00000720  00 00 43 3A 5C 42 4C 53  50 5C 42 4F 4F 4B 4D 49  53 43 5C 54 4D 50 5C 43  45 4C 4C 32 44 2E 50 41  ..C:\BLSP\BOOKMISC\TMP\CELL2D.PA
00000740  53 00 01 00 01 00 01 00  BA 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  S.☺.☺.☺.║.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.
00000760  01 00 00 00 52 00 00 19  00 00 01 02 4F 17 00 01  4F 10 00 00 00 00 43 3A  5C 42 4C 53 50 5C 42 4F  ☺...R..↓..☺☻O↨.☺O►....C:\BLSP\BO
00000780  4F 4B 4D 49 53 43 5C 54  4D 50 5C 47 52 41 50 48  42 2E 43 00 01 00 01 00  01 00 01 00 01 00 01 00  OKMISC\TMP\GRAPHB.C.☺.☺.☺.☺.☺.☺.
000007A0  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 00 00 52 00  00 19 00 01 00 01 4F 17  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...R..↓.☺.☺O↨
000007C0  00 01 4F 10 00 00 00 00  43 3A 5C 42 4C 53 50 5C  42 4F 4F 4B 4D 49 53 43  5C 54 4D 50 5C 43 45 4C  .☺O►....C:\BLSP\BOOKMISC\TMP\CEL
000007E0  4C 32 44 2E 43 00 11 00  C6 00 01 00 BA 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  L2D.C.◄.╞.☺.║.☺.☺.☺.☺.☺.☺.☺.☺.☺.
00000800  C8 00 01 00 C8 00 00 00  12 00 00 19 00 00 00 11  4F 17 00 11 4F 17 08 00  10 00 F6 01 5A 3C 4D 41  ╚.☺.╚...↕..↓...◄O↨.◄O↨◘.►.÷☺Z<MA
00000820  54 45 52 49 41 4C 0D 0A  20 20 20 54 59 50 45 20  20 20 20 3D 20 4D 49 52  52 4F 52 0D 0A 20 20 20  TERIAL♪◙   TYPE    = MIRROR♪◙   
00000840  54 45 58 54 55 52 45 20  3D 20 53 4D 4F 4F 54 48  0D 0A 20 20 20 41 4D 42  52 46 4C 20 20 3D 20 20  TEXTURE = SMOOTH♪◙   AMBRFL  =  
00000860  20 20 30 2E 30 30 30 20  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 30 30  30 0D 0A 20 20 20 44 49    0.000    0.000    0.000♪◙   DI
00000880  46 52 46 4C 20 20 3D 20  20 20 20 30 2E 37 30 30  20 20 20 20 30 2E 37 30  30 20 20 20 20 30 2E 37  FRFL  =    0.700    0.700    0.7
000008A0  30 30 0D 0A 20 20 20 53  50 43 52 46 4C 20 20 3D  20 20 20 20 30 2E 33 30  30 20 20 20 20 30 2E 33  00♪◙   SPCRFL  =    0.300    0.3
000008C0  30 30 20 20 20 20 30 2E  33 30 30 0D 0A 20 20 20  47 4C 4F 53 53 20 20 20  3D 20 20 20 35 30 2E 30  00    0.300♪◙   GLOSS   =   50.0
000008E0  30 30 0D 0A 0D 0A 4D 41  54 45 52 49 41 4C 0D 0A  20 20 20 54 59 50 45 20  20 20 20 3D 20 52 45 44  00♪◙♪◙MATERIAL♪◙   TYPE    = RED
00000900  4D 49 52 52 4F 52 0D 0A  20 20 20 54 45 58 54 55  52 45 20 3D 20 53 4D 4F  4F 54 48 0D 0A 20 20 20  MIRROR♪◙   TEXTURE = SMOOTH♪◙   
00000920  41 4D 42 52 46 4C 20 20  3D 20 20 20 20 30 2E 30  30 30 20 20 20 20 30 2E  30 30 30 20 20 20 20 30  AMBRFL  =    0.000    0.000    0
00000940  2E 30 30 30 0D 0A 20 20  20 44 49 46 52 46 4C 20  20 3D 20 20 20 20 30 2E  37 30 30 20 20 20 20 30  .000♪◙   DIFRFL  =    0.700    0
00000960  2E 30 30 30 20 20 20 20  30 2E 30 30 30 0D 0A 20  20 20 53 50 43 52 46 4C  20 20 3D 20 20 20 20 30  .000    0.000♪◙   SPCRFL  =    0
00000980  2E 33 30 30 20 20 20 20  30 2E 30 30 30 20 20 20  20 30 2E 30 30 30 0D 0A  20 20 20 47 4C 4F 53 53  .300    0.000    0.000♪◙   GLOSS
000009A0  20 20 20 3D 20 20 20 35  30 2E 30 30 30 0D 0A 0D  0A 4D 41 54 45 52 49 41  4C 0D 0A 20 20 20 54 59     =   50.000♪◙♪◙MATERIAL♪◙   TY
000009C0  50 45 20 20 20 20 3D 20  47 52 45 45 4E 4D 49 52  52 4F 52 0D 0A 20 20 20  54 45 58 54 55 52 45 20  PE    = GREENMIRROR♪◙   TEXTURE 
000009E0  3D 20 53 4D 4F 4F 54 48  0D 0A 20 20 20 41 4D 42  52 46 4C 20 20 3D 20 20  20 20 30 2E 30 30 30 20  = SMOOTH♪◙   AMBRFL  =    0.000 
00000A00  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 30 30  30 0D 0A 20 20 20 44 49  46 52 46 4C 20 20 3D 20     0.000    0.000♪◙   DIFRFL  = 
00000A20  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 37 30  30 20 20 20 20 30 2E 30  30 30 0D 0A 20 20 20 53     0.000    0.700    0.000♪◙   S
00000A40  50 43 52 46 4C 20 20 3D  20 20 20 20 30 2E 30 30  30 20 20 20 20 30 2E 33  30 30 20 20 20 20 30 2E  PCRFL  =    0.000    0.300    0.
00000A60  30 30 30 0D 0A 20 20 20  47 4C 4F 53 53 20 20 20  3D 20 20 20 35 30 2E 30  30 30 0D 0A 0D 0A 4D 41  000♪◙   GLOSS   =   50.000♪◙♪◙MA
00000A80  54 45 52 49 41 4C 0D 0A  20 20 20 54 59 50 45 20  20 20 20 3D 20 42 4C 55  45 4D 49 52 52 4F 52 0D  TERIAL♪◙   TYPE    = BLUEMIRROR♪
00000AA0  0A 20 20 20 54 45 58 54  55 52 45 20 3D 20 53 4D  4F 4F 54 48 0D 0A 20 20  20 41 4D 42 52 46 4C 20  ◙   TEXTURE = SMOOTH♪◙   AMBRFL 
00000AC0  20 3D 20 20 20 20 30 2E  30 30 30 20 20 20 20 30  2E 30 30 30 20 20 20 20  30 2E 30 30 30 0D 0A 20   =    0.000    0.000    0.000♪◙ 
00000AE0  20 20 44 49 46 52 46 4C  20 20 3D 20 20 20 20 30  2E 30 30 30 20 20 20 20  30 2E 30 30 30 20 20 20    DIFRFL  =    0.000    0.000   
00000B00  20 30 2E 37 30 30 0D 0A  20 20 20 53 50 43 52 46  4C 20 20 3D 20 20 20 20  30 2E 30 30 30 20 20 20   0.700♪◙   SPCRFL  =    0.000   
00000B20  20 30 2E 30 30 30 20 20  20 20 30 2E 33 30 30 0D  0A 20 20 20 47 4C 4F 53  53 20 20 20 3D 20 20 20   0.000    0.300♪◙   GLOSS   =   
00000B40  35 30 2E 30 30 30 0D 0A  4D 41 54 45 52 49 41 4C  0D 0A 20 20 20 54 59 50  45 20 20 20 20 3D 20 43  50.000♪◙MATERIAL♪◙   TYPE    = C
00000B60  48 52 4F 4D 45 0D 0A 20  20 20 54 45 58 54 55 52  45 20 3D 20 53 4D 4F 4F  54 48 0D 0A 20 20 20 41  HROME♪◙   TEXTURE = SMOOTH♪◙   A
00000B80  4D 42 52 46 4C 20 20 3D  20 20 20 20 30 2E 31 30  30 20 20 20 20 30 2E 31  30 30 20 20 20 20 30 2E  MBRFL  =    0.100    0.100    0.
00000BA0  31 30 30 0D 0A 20 20 20  44 49 46 52 46 4C 20 20  3D 20 20 20 20 30 2E 31  30 30 20 20 20 20 30 2E  100♪◙   DIFRFL  =    0.100    0.
00000BC0  31 30 30 20 20 20 20 30  2E 31 30 30 0D 0A 20 20  20 53 50 43 52 46 4C 20  20 3D 20 20 20 20 30 2E  100    0.100♪◙   SPCRFL  =    0.
00000BE0  38 30 30 20 20 20 20 30  2E 38 30 30 20 20 20 20  30 2E 38 30 30 0D 0A 20  20 20 47 4C 4F 53 53 20  800    0.800    0.800♪◙   GLOSS 
00000C00  20 20 3D 20 20 20 34 30  2E 30 30 30 0D 0A 0D 0A  0D 0A 4D 41 54 45 52 49  41 4C 0D 0A 20 20 20 54    =   40.000♪◙♪◙♪◙MATERIAL♪◙   T
00000C20  59 50 45 20 20 20 20 3D  20 42 52 41 53 53 0D 0A  20 20 20 54 45 58 54 55  52 45 20 3D 20 53 4D 4F  YPE    = BRASS♪◙   TEXTURE = SMO
00000C40  4F 54 48 0D 0A 20 20 20  41 4D 42 52 46 4C 20 20  3D 20 20 20 20 30 2E 31  30 30 20 20 20 20 30 2E  OTH♪◙   AMBRFL  =    0.100    0.
00000C60  31 30 30 20 20 20 20 30  2E 31 30 30 0D 0A 20 20  20 44 49 46 52 46 4C 20  20 3D 20 20 20 20 30 2E  100    0.100♪◙   DIFRFL  =    0.
00000C80  33 30 30 20 20 20 20 30  2E 33 30 30 20 20 20 20  30 2E 33 30 30 0D 0A 20  20 20 53 50 43 52 46 4C  300    0.300    0.300♪◙   SPCRFL
00000CA0  20 20 3D 20 20 20 20 30  2E 36 30 30 20 20 20 20  30 2E 35 30 30 20 20 20  20 30 2E 32 35 30 0D 0A    =    0.600    0.500    0.250♪◙
00000CC0  20 20 20 47 4C 4F 53 53  20 20 20 3D 20 20 20 33  30 2E 30 30 30 0D 0A 4D  41 54 45 52 49 41 4C 0D     GLOSS   =   30.000♪◙MATERIAL♪
00000CE0  0A 20 20 20 54 59 50 45  20 20 20 20 3D 20 57 41  54 45 52 0D 0A 20 20 20  54 45 58 54 55 52 45 20  ◙   TYPE    = WATER♪◙   TEXTURE 
00000D00  3D 20 47 52 49 54 0D 0A  20 20 20 41 4D 42 52 46  4C 20 20 3D 20 20 20 20  30 2E 31 30 30 20 20 20  = GRIT♪◙   AMBRFL  =    0.100   
00000D20  20 30 2E 31 30 30 20 20  20 20 30 2E 33 30 30 0D  0A 20 20 20 44 49 46 52  46 4C 20 20 3D 20 20 20   0.100    0.300♪◙   DIFRFL  =   
00000D40  20 30 2E 31 30 30 20 20  20 20 30 2E 33 30 30 20  20 20 20 30 2E 33 30 30  0D 0A 20 20 20 53 50 43   0.100    0.300    0.300♪◙   SPC
00000D60  52 46 4C 20 20 3D 20 20  20 20 30 2E 31 30 30 20  20 20 20 30 2E 31 30 30  20 20 20 20 30 2E 34 30  RFL  =    0.100    0.100    0.40
00000D80  30 0D 0A 20 20 20 47 4C  4F 53 53 20 20 20 3D 20  20 20 20 33 2E 30 30 30  0D 0A 4D 41 54 45 52 49  0♪◙   GLOSS   =    3.000♪◙MATERI
00000DA0  41 4C 0D 0A 20 20 20 54  59 50 45 20 20 20 20 3D  20 50 4C 41 53 54 49 43  54 49 4C 45 0D 0A 20 20  AL♪◙   TYPE    = PLASTICTILE♪◙  
00000DC0  20 54 45 58 54 55 52 45  20 3D 20 43 48 45 43 4B  45 52 0D 0A 20 20 20 41  4D 42 52 46 4C 20 20 3D   TEXTURE = CHECKER♪◙   AMBRFL  =
00000DE0  20 20 20 20 30 2E 31 30  30 20 20 20 20 30 2E 31  30 30 20 20 20 20 30 2E  31 30 30 0D 0A 20 20 20      0.100    0.100    0.100♪◙   
00000E00  44 49 46 52 46 4C 20 20  3D 20 20 20 20 30 2E 37  30 30 20 20 20 20 30 2E  37 30 30 20 20 20 20 30  DIFRFL  =    0.700    0.700    0
00000E20  2E 37 30 30 0D 0A 20 20  20 53 50 43 52 46 4C 20  20 3D 20 20 20 20 30 2E  32 30 30 20 20 20 20 30  .700♪◙   SPCRFL  =    0.200    0
00000E40  2E 32 30 30 20 20 20 20  30 2E 32 30 30 0D 0A 20  20 20 47 4C 4F 53 53 20  20 20 3D 20 20 20 20 34  .200    0.200♪◙   GLOSS   =    4
00000E60  2E 30 30 30 0D 0A 0D 0A  43 48 45 43 4B 0D 0A 20  20 20 54 49 4C 45 31 20  20 20 3D 20 20 20 20 31  .000♪◙♪◙CHECK♪◙   TILE1   =    1
00000E80  2E 30 30 30 20 20 20 20  30 2E 30 30 30 20 20 20  20 30 2E 30 30 30 0D 0A  20 20 20 54 49 4C 45 32  .000    0.000    0.000♪◙   TILE2
00000EA0  20 20 20 3D 20 20 20 20  30 2E 32 30 30 20 20 20  20 30 2E 32 30 30 20 20  20 20 30 2E 32 30 30 0D     =    0.200    0.200    0.200♪
00000EC0  0A 20 20 20 54 49 4C 45  20 20 20 20 3D 20 20 20  20 30 2E 30 32 0D 0A 4D  41 54 45 52 49 41 4C 0D  ◙   TILE    =    0.02♪◙MATERIAL♪
00000EE0  0A 20 20 20 54 59 50 45  20 20 20 20 3D 20 49 54  41 4C 49 41 4E 4D 41 52  42 4C 45 0D 0A 20 20 20  ◙   TYPE    = ITALIANMARBLE♪◙   
00000F00  54 45 58 54 55 52 45 20  3D 20 57 4F 4F 44 0D 0A  20 20 20 41 4D 42 52 46  4C 20 20 3D 20 20 20 20  TEXTURE = WOOD♪◙   AMBRFL  =    
00000F20  30 2E 31 30 30 20 20 20  20 30 2E 31 30 30 20 20  20 20 30 2E 31 30 30 0D  0A 20 20 20 44 49 46 52  0.100    0.100    0.100♪◙   DIFR
00000F40  46 4C 20 20 3D 20 20 20  20 30 2E 37 30 30 20 20  20 20 30 2E 37 30 30 20  20 20 20 30 2E 37 30 30  FL  =    0.700    0.700    0.700
00000F60  0D 0A 20 20 20 53 50 43  52 46 4C 20 20 3D 20 20  20 20 30 2E 32 30 30 20  20 20 20 30 2E 32 30 30  ♪◙   SPCRFL  =    0.200    0.200
00000F80  20 20 20 20 30 2E 32 30  30 0D 0A 20 20 20 47 4C  4F 53 53 20 20 20 3D 20  20 20 31 30 2E 30 30 30      0.200♪◙   GLOSS   =   10.000
00000FA0  0D 0A 4D 41 54 45 52 49  41 4C 0D 0A 20 20 20 54  59 50 45 20 20 20 20 3D  20 4F 41 4B 57 4F 4F 44  ♪◙MATERIAL♪◙   TYPE    = OAKWOOD
00000FC0  0D 0A 20 20 20 54 45 58  54 55 52 45 20 3D 20 57  4F 4F 44 0D 0A 20 20 20  41 4D 42 52 46 4C 20 20  ♪◙   TEXTURE = WOOD♪◙   AMBRFL  
00000FE0  3D 20 20 20 20 30 2E 32  30 30 20 20 20 20 30 2E  32 30 30 20 20 20 20 30  2E 32 30 30 0D 0A 20 20  =    0.200    0.200    0.200♪◙  
00001000  20 44 49 46 52 46 4C 20  20 3D 20 20 20 20 30 2E  37 30 30 20 20 20 20 30  2E 34 30 30 20 20 20 20   DIFRFL  =    0.700    0.400    
00001020  30 2E 33 30 30 0D 0A 20  20 20 53 50 43 52 46 4C  20 20 3D 20 20 20 20 30  2E 31 30 30 20 20 20 20  0.300♪◙   SPCRFL  =    0.100    
00001040  30 2E 31 30 30 20 20 20  20 30 2E 31 30 30 0D 0A  20 20 20 47 4C 4F 53 53  20 20 20 3D 20 20 20 20  0.100    0.100♪◙   GLOSS   =    
00001060  35 2E 30 30 30 0D 0A 4D  41 54 45 52 49 41 4C 0D  0A 20 20 20 54 59 50 45  20 20 20 20 3D 20 47 52  5.000♪◙MATERIAL♪◙   TYPE    = GR
00001080  41 53 53 0D 0A 20 20 20  54 45 58 54 55 52 45 20  3D 20 47 52 49 54 0D 0A  20 20 20 41 4D 42 52 46  ASS♪◙   TEXTURE = GRIT♪◙   AMBRF
000010A0  4C 20 20 3D 20 20 20 20  30 2E 32 30 30 20 20 20  20 30 2E 32 30 30 20 20  20 20 30 2E 32 30 30 0D  L  =    0.200    0.200    0.200♪
000010C0  0A 20 20 20 44 49 46 52  46 4C 20 20 3D 20 20 20  20 30 2E 36 30 30 20 20  20 20 30 2E 38 30 30 20  ◙   DIFRFL  =    0.600    0.800 
000010E0  20 20 20 30 2E 32 35 30  0D 0A 20 20 20 53 50 43  52 46 4C 20 20 3D 20 20  20 20 30 2E 30 30 30 20     0.250♪◙   SPCRFL  =    0.000 
00001100  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 30 30  30 0D 0A 20 20 20 47 4C  4F 53 53 20 20 20 3D 20     0.000    0.000♪◙   GLOSS   = 
00001120  20 20 20 30 2E 30 30 30  0D 0A 0D 0A 0D 0A 4D 41  54 45 52 49 41 4C 0D 0A  20 20 20 54 59 50 45 20     0.000♪◙♪◙♪◙MATERIAL♪◙   TYPE 
00001140  20 20 20 3D 20 43 45 4D  45 4E 54 0D 0A 20 20 20  54 45 58 54 55 52 45 20  3D 20 47 52 49 54 0D 0A     = CEMENT♪◙   TEXTURE = GRIT♪◙
00001160  20 20 20 41 4D 42 52 46  4C 20 20 3D 20 20 20 20  30 2E 32 30 30 20 20 20  20 30 2E 32 30 30 20 20     AMBRFL  =    0.200    0.200  
00001180  20 20 30 2E 32 30 30 0D  0A 20 20 20 44 49 46 52  46 4C 20 20 3D 20 20 20  20 30 2E 38 30 30 20 20    0.200♪◙   DIFRFL  =    0.800  
000011A0  20 20 30 2E 38 30 30 20  20 20 20 30 2E 38 30 30  0D 0A 20 20 20 53 50 43  52 46 4C 20 20 3D 20 20    0.800    0.800♪◙   SPCRFL  =  
000011C0  20 20 30 2E 30 30 30 20  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 30 30  30 0D 0A 20 20 20 47 4C    0.000    0.000    0.000♪◙   GL
000011E0  4F 53 53 20 20 20 3D 20  20 20 20 30 2E 30 30 30  0D 0A 4D 41 54 45 52 49  41 4C 0D 0A 20 20 20 54  OSS   =    0.000♪◙MATERIAL♪◙   T
00001200  59 50 45 20 20 20 20 3D  20 42 4C 41 43 4B 43 48  52 4F 4D 45 0D 0A 20 20  20 54 45 58 54 55 52 45  YPE    = BLACKCHROME♪◙   TEXTURE
00001220  20 3D 20 53 4D 4F 4F 54  48 0D 0A 20 20 20 41 4D  42 52 46 4C 20 20 3D 20  20 20 20 31 2E 30 30 30   = SMOOTH♪◙   AMBRFL  =    1.000
00001240  20 20 20 20 31 2E 30 30  30 20 20 20 20 31 2E 30  30 30 0D 0A 20 20 20 44  49 46 52 46 4C 20 20 3D      1.000    1.000♪◙   DIFRFL  =
00001260  20 20 20 20 30 2E 30 30  30 20 20 20 20 30 2E 30  30 30 20 20 20 20 30 2E  30 30 30 0D 0A 20 20 20      0.000    0.000    0.000♪◙   
00001280  53 50 43 52 46 4C 20 20  3D 20 20 20 20 30 2E 30  30 30 20 20 20 20 30 2E  30 30 30 20 20 20 20 30  SPCRFL  =    0.000    0.000    0
000012A0  2E 30 30 30 0D 0A 20 20  20 47 4C 4F 53 53 20 20  20 3D 20 20 20 34 30 2E  30 30 30 0D 0A 50 59 52  .000♪◙   GLOSS   =   40.000♪◙PYR
000012C0  41 4D 49 44 0D 0A 20 20  20 4C 4F 43 20 20 20 20  20 3D 20 2D 32 30 30 2E  30 30 30 20 39 39 39 39  AMID♪◙   LOC     = -200.000 9999
000012E0  2E 30 30 30 20 20 20 20  30 2E 30 30 30 0D 0A 20  20 20 56 31 20 20 20 20  20 20 3D 20 20 34 30 30  .000    0.000♪◙   V1      =  400
00001300  2E 30 30 30 20 20 20 20  30 2E 30 30 30 20 20 20  20 30 2E 30 30 30 0D 0A  20 20 20 56 32 20 20 20  .000    0.000    0.000♪◙   V2   
00001320  20 20 20 3D 20 20 20 20  30 2E 30 30 30 20 20 34  30 30 2E 30 30 30 20 20  20 20 30 2E 30 30 30 0D     =    0.000  400.000    0.000♪
00001340  0A 20 20 20 48 45 49 47  48 54 20 20 3D 20 31 32  30 30 2E 30 30 30 0D 0A  20 20 20 4D 41 54 4C 20  ◙   HEIGHT  = 1200.000♪◙   MATL 
00001360  20 20 20 3D 20 42 4C 41  43 4B 43 48 52 4F 4D 45  0D 0A 4C 41 4D 50 0D 0A  20 20 20 4C 4F 43 20 20     = BLACKCHROME♪◙LAMP♪◙   LOC  
00001380  20 20 20 3D 20 31 30 30  30 2E 30 30 30 20 2D 39  39 39 2E 30 30 30 20 31  30 30 30 2E 30 30 30 0D     = 1000.000 -999.000 1000.000♪
000013A0  0A 20 20 20 52 41 44 49  55 53 20 20 3D 20 20 37  30 30 2E 30 30 30 0D 0A  20 20 20 49 4E 54 45 4E  ◙   RADIUS  =  700.000♪◙   INTEN
000013C0  53 20 20 3D 20 20 20 20  31 2E 30 30 30 20 20 20  20 31 2E 30 30 30 20 20  20 20 30 2E 39 30 30 0D  S  =    1.000    1.000    0.900♪
000013E0  0A 09 09 61 71 75 61 6D  61 72 69 6E 65 20 20 20  20 20 20 20 20 20 20 20  30 2E 34 33 39 32 31 36  ◙○○aquamarine           0.439216
00001400  20 30 2E 38 35 38 38 32  34 20 30 2E 35 37 36 34  37 31 0D 0A 09 09 62 6C  61 63 6B 20 20 20 20 20   0.858824 0.576471♪◙○○black     
00001420  20 20 20 20 20 20 20 20  20 20 20 30 2E 30 30 30  30 30 30 20 30 2E 30 30  30 30 30 30 20 30 2E 30             0.000000 0.000000 0.0
00001440  30 30 30 30 30 0D 0A 09  09 62 6C 75 65 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  00000♪◙○○blue                 0.
00001460  30 30 30 30 30 30 20 30  2E 30 30 30 30 30 30 20  31 2E 30 30 30 30 30 30  0D 0A 09 09 62 6C 75 65  000000 0.000000 1.000000♪◙○○blue
00001480  5F 76 69 6F 6C 65 74 20  20 20 20 20 20 20 20 20  20 30 2E 36 32 33 35 32  39 20 30 2E 33 37 32 35  _violet          0.623529 0.3725
000014A0  34 39 20 30 2E 36 32 33  35 32 39 0D 0A 09 09 62  72 6F 77 6E 20 20 20 20  20 20 20 20 20 20 20 20  49 0.623529♪◙○○brown            
000014C0  20 20 20 20 30 2E 36 34  37 30 35 39 20 30 2E 31  36 34 37 30 36 20 30 2E  31 36 34 37 30 36 0D 0A      0.647059 0.164706 0.164706♪◙
000014E0  09 09 63 61 64 65 74 5F  62 6C 75 65 20 20 20 20  20 20 20 20 20 20 20 30  2E 33 37 32 35 34 39 20  ○○cadet_blue           0.372549 
00001500  30 2E 36 32 33 35 32 39  20 30 2E 36 32 33 35 32  39 0D 0A 09 09 63 6F 72  61 6C 20 20 20 20 20 20  0.623529 0.623529♪◙○○coral      
00001520  20 20 20 20 20 20 20 20  20 20 31 2E 30 30 30 30  30 30 20 30 2E 34 39 38  30 33 39 20 30 2E 30 30            1.000000 0.498039 0.00
00001540  30 30 30 30 0D 0A 09 09  63 6F 72 6E 66 6C 6F 77  65 72 5F 62 6C 75 65 20  20 20 20 20 20 30 2E 32  0000♪◙○○cornflower_blue      0.2
00001560  35 38 38 32 34 20 30 2E  32 35 38 38 32 34 20 30  2E 34 33 35 32 39 34 0D  0A 09 09 63 79 61 6E 20  58824 0.258824 0.435294♪◙○○cyan 
00001580  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  30 2E 30 30 30 30 30 30  20 31 2E 30 30 30 30 30                  0.000000 1.00000
000015A0  30 20 31 2E 30 30 30 30  30 30 0D 0A 09 09 64 61  72 6B 5F 67 72 65 65 6E  20 20 20 20 20 20 20 20  0 1.000000♪◙○○dark_green        
000015C0  20 20 20 30 2E 31 38 34  33 31 34 20 30 2E 33 30  39 38 30 34 20 30 2E 31  38 34 33 31 34 0D 0A 09     0.184314 0.309804 0.184314♪◙○
000015E0  09 64 61 72 6B 5F 6F 6C  69 76 65 5F 67 72 65 65  6E 20 20 20 20 20 30 2E  33 30 39 38 30 34 20 30  ○dark_olive_green     0.309804 0
00001600  2E 33 30 39 38 30 34 20  30 2E 31 38 34 33 31 34  0D 0A 09 09 64 61 72 6B  5F 6F 72 63 68 69 64 20  .309804 0.184314♪◙○○dark_orchid 
00001620  20 20 20 20 20 20 20 20  20 30 2E 36 30 30 30 30  30 20 30 2E 31 39 36 30  37 38 20 30 2E 38 30 30           0.600000 0.196078 0.800
00001640  30 30 30 0D 0A 09 09 64  61 72 6B 5F 73 6C 61 74  65 5F 62 6C 75 65 20 20  20 20 20 20 30 2E 34 31  000♪◙○○dark_slate_blue      0.41
00001660  39 36 30 38 20 30 2E 31  33 37 32 35 35 20 30 2E  35 35 36 38 36 33 0D 0A  09 09 64 61 72 6B 5F 73  9608 0.137255 0.556863♪◙○○dark_s
00001680  6C 61 74 65 5F 67 72 61  79 20 20 20 20 20 20 30  2E 31 38 34 33 31 34 20  30 2E 33 30 39 38 30 34  late_gray      0.184314 0.309804
000016A0  20 30 2E 33 30 39 38 30  34 0D 0A 09 09 64 61 72  6B 5F 73 6C 61 74 65 5F  67 72 65 79 20 20 20 20   0.309804♪◙○○dark_slate_grey    
000016C0  20 20 30 2E 31 38 34 33  31 34 20 30 2E 33 30 39  38 30 34 20 30 2E 33 30  39 38 30 34 0D 0A 09 09    0.184314 0.309804 0.309804♪◙○○
000016E0  64 61 72 6B 5F 74 75 72  71 75 6F 69 73 65 20 20  20 20 20 20 20 30 2E 34  33 39 32 31 36 20 30 2E  dark_turquoise       0.439216 0.
00001700  35 37 36 34 37 31 20 30  2E 38 35 38 38 32 34 0D  0A 09 09 64 69 6D 5F 67  72 61 79 20 20 20 20 20  576471 0.858824♪◙○○dim_gray     
00001720  20 20 20 20 20 20 20 20  30 2E 33 32 39 34 31 32  20 30 2E 33 32 39 34 31  32 20 30 2E 33 32 39 34          0.329412 0.329412 0.3294
00001740  31 32 0D 0A 09 09 64 69  6D 5F 67 72 65 79 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 33 32 39  12♪◙○○dim_grey             0.329
00001760  34 31 32 20 30 2E 33 32  39 34 31 32 20 30 2E 33  32 39 34 31 32 0D 0A 09  09 66 69 72 65 62 72 69  412 0.329412 0.329412♪◙○○firebri
00001780  63 6B 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  35 35 36 38 36 33 20 30  2E 31 33 37 32 35 35 20  ck            0.556863 0.137255 
000017A0  30 2E 31 33 37 32 35 35  0D 0A 09 09 66 6F 72 65  73 74 5F 67 72 65 65 6E  20 20 20 20 20 20 20 20  0.137255♪◙○○forest_green        
000017C0  20 30 2E 31 33 37 32 35  35 20 30 2E 35 35 36 38  36 33 20 30 2E 31 33 37  32 35 35 0D 0A 09 09 67   0.137255 0.556863 0.137255♪◙○○g
000017E0  6F 6C 64 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 38 30  30 30 30 30 20 30 2E 34  old                 0.800000 0.4
00001800  39 38 30 33 39 20 30 2E  31 39 36 30 37 38 0D 0A  09 09 67 6F 6C 64 65 6E  72 6F 64 20 20 20 20 20  98039 0.196078♪◙○○goldenrod     
00001820  20 20 20 20 20 20 20 30  2E 38 35 38 38 32 34 20  30 2E 38 35 38 38 32 34  20 30 2E 34 33 39 32 31         0.858824 0.858824 0.43921
00001840  36 0D 0A 09 09 67 72 61  79 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 30 2E 37 35 32 39  6♪◙○○gray                 0.7529
00001860  34 31 20 30 2E 37 35 32  39 34 31 20 30 2E 37 35  32 39 34 31 0D 0A 09 09  67 72 65 65 6E 20 20 20  41 0.752941 0.752941♪◙○○green   
00001880  20 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 30  30 30 30 30 30 20 31 2E  30 30 30 30 30 30 20 30               0.000000 1.000000 0
000018A0  2E 30 30 30 30 30 30 0D  0A 09 09 67 72 65 65 6E  5F 79 65 6C 6C 6F 77 20  20 20 20 20 20 20 20 20  .000000♪◙○○green_yellow         
000018C0  30 2E 35 37 36 34 37 31  20 30 2E 38 35 38 38 32  34 20 30 2E 34 33 39 32  31 36 0D 0A 09 09 67 72  0.576471 0.858824 0.439216♪◙○○gr
000018E0  65 79 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 37 35 32  39 34 31 20 30 2E 37 35  ey                 0.752941 0.75
00001900  32 39 34 31 20 30 2E 37  35 32 39 34 31 0D 0A 09  09 69 6E 64 69 61 6E 5F  72 65 64 20 20 20 20 20  2941 0.752941♪◙○○indian_red     
00001920  20 20 20 20 20 20 30 2E  33 30 39 38 30 34 20 30  2E 31 38 34 33 31 34 20  30 2E 31 38 34 33 31 34        0.309804 0.184314 0.184314
00001940  0D 0A 09 09 6B 68 61 6B  69 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 30 2E 36 32 33 35 32  ♪◙○○khaki                0.62352
00001960  39 20 30 2E 36 32 33 35  32 39 20 30 2E 33 37 32  35 34 39 0D 0A 09 09 6C  69 67 68 74 5F 62 6C 75  9 0.623529 0.372549♪◙○○light_blu
00001980  65 20 20 20 20 20 20 20  20 20 20 20 30 2E 37 34  39 30 32 30 20 30 2E 38  34 37 30 35 39 20 30 2E  e           0.749020 0.847059 0.
000019A0  38 34 37 30 35 39 0D 0A  09 09 6C 69 67 68 74 5F  67 72 61 79 20 20 20 20  20 20 20 20 20 20 20 30  847059♪◙○○light_gray           0
000019C0  2E 36 35 38 38 32 34 20  30 2E 36 35 38 38 32 34  20 30 2E 36 35 38 38 32  34 0D 0A 09 09 6C 69 67  .658824 0.658824 0.658824♪◙○○lig
000019E0  68 74 5F 67 72 65 79 20  20 20 20 20 20 20 20 20  20 20 30 2E 36 35 38 38  32 34 20 30 2E 36 35 38  ht_grey           0.658824 0.658
00001A00  38 32 34 20 30 2E 36 35  38 38 32 34 0D 0A 09 09  6C 69 67 68 74 5F 73 74  65 65 6C 5F 62 6C 75 65  824 0.658824♪◙○○light_steel_blue
00001A20  20 20 20 20 20 30 2E 35  36 30 37 38 34 20 30 2E  35 36 30 37 38 34 20 30  2E 37 33 37 32 35 35 0D       0.560784 0.560784 0.737255♪
00001A40  0A 09 09 6C 69 6D 65 5F  67 72 65 65 6E 20 20 20  20 20 20 20 20 20 20 20  30 2E 31 39 36 30 37 38  ◙○○lime_green           0.196078
00001A60  20 30 2E 38 30 30 30 30  30 20 30 2E 31 39 36 30  37 38 0D 0A 09 09 6D 61  67 65 6E 74 61 20 20 20   0.800000 0.196078♪◙○○magenta   
00001A80  20 20 20 20 20 20 20 20  20 20 20 31 2E 30 30 30  30 30 30 20 30 2E 30 30  30 30 30 30 20 31 2E 30             1.000000 0.000000 1.0
00001AA0  30 30 30 30 30 0D 0A 09  09 6D 61 72 6F 6F 6E 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  00000♪◙○○maroon               0.
00001AC0  35 35 36 38 36 33 20 30  2E 31 33 37 32 35 35 20  30 2E 34 31 39 36 30 38  0D 0A 09 09 6D 65 64 69  556863 0.137255 0.419608♪◙○○medi
00001AE0  75 6D 5F 61 71 75 61 6D  61 72 69 6E 65 20 20 20  20 30 2E 31 39 36 30 37  38 20 30 2E 38 30 30 30  um_aquamarine    0.196078 0.8000
00001B00  30 30 20 30 2E 36 30 30  30 30 30 0D 0A 09 09 6D  65 64 69 75 6D 5F 62 6C  75 65 20 20 20 20 20 20  00 0.600000♪◙○○medium_blue      
00001B20  20 20 20 20 30 2E 31 39  36 30 37 38 20 30 2E 31  39 36 30 37 38 20 30 2E  38 30 30 30 30 30 0D 0A      0.196078 0.196078 0.800000♪◙
00001B40  09 09 6D 65 64 69 75 6D  5F 66 6F 72 65 73 74 5F  67 72 65 65 6E 20 20 30  2E 34 31 39 36 30 38 20  ○○medium_forest_green  0.419608 
00001B60  30 2E 35 35 36 38 36 33  20 30 2E 31 33 37 32 35  35 0D 0A 09 09 6D 65 64  69 75 6D 5F 67 6F 6C 64  0.556863 0.137255♪◙○○medium_gold
00001B80  65 6E 72 6F 64 20 20 20  20 20 30 2E 39 31 37 36  34 37 20 30 2E 39 31 37  36 34 37 20 30 2E 36 37  enrod     0.917647 0.917647 0.67
00001BA0  38 34 33 31 0D 0A 09 09  6D 65 64 69 75 6D 5F 6F  72 63 68 69 64 20 20 20  20 20 20 20 20 30 2E 35  8431♪◙○○medium_orchid        0.5
00001BC0  37 36 34 37 31 20 30 2E  34 33 39 32 31 36 20 30  2E 38 35 38 38 32 34 0D  0A 09 09 6D 65 64 69 75  76471 0.439216 0.858824♪◙○○mediu
00001BE0  6D 5F 73 65 61 5F 67 72  65 65 6E 20 20 20 20 20  30 2E 32 35 38 38 32 34  20 30 2E 34 33 35 32 39  m_sea_green     0.258824 0.43529
00001C00  34 20 30 2E 32 35 38 38  32 34 0D 0A 09 09 6D 65  64 69 75 6D 5F 73 6C 61  74 65 5F 62 6C 75 65 20  4 0.258824♪◙○○medium_slate_blue 
00001C20  20 20 20 30 2E 34 39 38  30 33 39 20 30 2E 30 30  30 30 30 30 20 31 2E 30  30 30 30 30 30 0D 0A 09     0.498039 0.000000 1.000000♪◙○
00001C40  09 6D 65 64 69 75 6D 5F  73 70 72 69 6E 67 5F 67  72 65 65 6E 20 20 30 2E  34 39 38 30 33 39 20 31  ○medium_spring_green  0.498039 1
00001C60  2E 30 30 30 30 30 30 20  30 2E 30 30 30 30 30 30  0D 0A 09 09 6D 65 64 69  75 6D 5F 74 75 72 71 75  .000000 0.000000♪◙○○medium_turqu
00001C80  6F 69 73 65 20 20 20 20  20 30 2E 34 33 39 32 31  36 20 30 2E 38 35 38 38  32 34 20 30 2E 38 35 38  oise     0.439216 0.858824 0.858
00001CA0  38 32 34 0D 0A 09 09 6D  65 64 69 75 6D 5F 76 69  6F 6C 65 74 5F 72 65 64  20 20 20 20 30 2E 38 35  824♪◙○○medium_violet_red    0.85
00001CC0  38 38 32 34 20 30 2E 34  33 39 32 31 36 20 30 2E  35 37 36 34 37 31 0D 0A  09 09 6D 69 64 6E 69 67  8824 0.439216 0.576471♪◙○○midnig
00001CE0  68 74 5F 62 6C 75 65 20  20 20 20 20 20 20 20 30  2E 31 38 34 33 31 34 20  30 2E 31 38 34 33 31 34  ht_blue        0.184314 0.184314
00001D00  20 30 2E 33 30 39 38 30  34 0D 0A 09 09 6E 61 76  79 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20   0.309804♪◙○○navy               
00001D20  20 20 30 2E 31 33 37 32  35 35 20 30 2E 31 33 37  32 35 35 20 30 2E 35 35  36 38 36 33 0D 0A 09 09    0.137255 0.137255 0.556863♪◙○○
00001D40  6E 61 76 79 5F 62 6C 75  65 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 31  33 37 32 35 35 20 30 2E  navy_blue            0.137255 0.
00001D60  31 33 37 32 35 35 20 30  2E 35 35 36 38 36 33 0D  0A 09 09 6F 72 61 6E 67  65 20 20 20 20 20 20 20  137255 0.556863♪◙○○orange       
00001D80  20 20 20 20 20 20 20 20  30 2E 38 30 30 30 30 30  20 30 2E 31 39 36 30 37  38 20 30 2E 31 39 36 30          0.800000 0.196078 0.1960
00001DA0  37 38 0D 0A 09 09 6F 72  61 6E 67 65 5F 72 65 64  20 20 20 20 20 20 20 20  20 20 20 31 2E 30 30 30  78♪◙○○orange_red           1.000
00001DC0  30 30 30 20 30 2E 30 30  30 30 30 30 20 30 2E 34  39 38 30 33 39 0D 0A 09  09 6F 72 63 68 69 64 20  000 0.000000 0.498039♪◙○○orchid 
00001DE0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  38 35 38 38 32 34 20 30  2E 34 33 39 32 31 36 20                0.858824 0.439216 
00001E00  30 2E 38 35 38 38 32 34  0D 0A 09 09 70 61 6C 65  5F 67 72 65 65 6E 20 20  20 20 20 20 20 20 20 20  0.858824♪◙○○pale_green          
00001E20  20 30 2E 35 36 30 37 38  34 20 30 2E 37 33 37 32  35 35 20 30 2E 35 36 30  37 38 34 0D 0A 09 09 70   0.560784 0.737255 0.560784♪◙○○p
00001E40  69 6E 6B 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 37 33  37 32 35 35 20 30 2E 35  ink                 0.737255 0.5
00001E60  36 30 37 38 34 20 30 2E  35 36 30 37 38 34 0D 0A  09 09 70 6C 75 6D 20 20  20 20 20 20 20 20 20 20  60784 0.560784♪◙○○plum          
00001E80  20 20 20 20 20 20 20 30  2E 39 31 37 36 34 37 20  30 2E 36 37 38 34 33 31  20 30 2E 39 31 37 36 34         0.917647 0.678431 0.91764
00001EA0  37 0D 0A 09 09 72 65 64  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 31 2E 30 30 30 30  7♪◙○○red                  1.0000
00001EC0  30 30 20 30 2E 30 30 30  30 30 30 20 30 2E 30 30  30 30 30 30 0D 0A 09 09  73 61 6C 6D 6F 6E 20 20  00 0.000000 0.000000♪◙○○salmon  
00001EE0  20 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 34  33 35 32 39 34 20 30 2E  32 35 38 38 32 34 20 30               0.435294 0.258824 0
00001F00  2E 32 35 38 38 32 34 0D  0A 09 09 73 65 61 5F 67  72 65 65 6E 20 20 20 20  20 20 20 20 20 20 20 20  .258824♪◙○○sea_green            
00001F20  30 2E 31 33 37 32 35 35  20 30 2E 35 35 36 38 36  33 20 30 2E 34 31 39 36  30 38 0D 0A 09 09 73 69  0.137255 0.556863 0.419608♪◙○○si
00001F40  65 6E 6E 61 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 35 35 36  38 36 33 20 30 2E 34 31  enna               0.556863 0.41
00001F60  39 36 30 38 20 30 2E 31  33 37 32 35 35 0D 0A 09  09 73 6B 79 5F 62 6C 75  65 20 20 20 20 20 20 20  9608 0.137255♪◙○○sky_blue       
00001F80  20 20 20 20 20 20 30 2E  31 39 36 30 37 38 20 30  2E 36 30 30 30 30 30 20  30 2E 38 30 30 30 30 30        0.196078 0.600000 0.800000
00001FA0  0D 0A 09 09 73 6C 61 74  65 5F 62 6C 75 65 20 20  20 20 20 20 20 20 20 20  20 30 2E 30 30 30 30 30  ♪◙○○slate_blue           0.00000
00001FC0  30 20 30 2E 34 39 38 30  33 39 20 31 2E 30 30 30  30 30 30 0D 0A 09 09 73  70 72 69 6E 67 5F 67 72  0 0.498039 1.000000♪◙○○spring_gr
00001FE0  65 65 6E 20 20 20 20 20  20 20 20 20 30 2E 30 30  30 30 30 30 20 31 2E 30  30 30 30 30 30 20 30 2E  een         0.000000 1.000000 0.
00002000  34 39 38 30 33 39 0D 0A  09 09 73 74 65 65 6C 5F  62 6C 75 65 20 20 20 20  20 20 20 20 20 20 20 30  498039♪◙○○steel_blue           0
00002020  2E 31 33 37 32 35 35 20  30 2E 34 31 39 36 30 38  20 30 2E 35 35 36 38 36  33 0D 0A 09 09 74 61 6E  .137255 0.419608 0.556863♪◙○○tan
00002040  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 30 2E 38 35 38 38  32 34 20 30 2E 35 37 36                    0.858824 0.576
00002060  34 37 31 20 30 2E 34 33  39 32 31 36 0D 0A 09 09  74 68 69 73 74 6C 65 20  20 20 20 20 20 20 20 20  471 0.439216♪◙○○thistle         
00002080  20 20 20 20 20 30 2E 38  34 37 30 35 39 20 30 2E  37 34 39 30 32 30 20 30  2E 38 34 37 30 35 39 0D       0.847059 0.749020 0.847059♪
000020A0  0A 09 09 74 75 72 71 75  6F 69 73 65 20 20 20 20  20 20 20 20 20 20 20 20  30 2E 36 37 38 34 33 31  ◙○○turquoise            0.678431
000020C0  20 30 2E 39 31 37 36 34  37 20 30 2E 39 31 37 36  34 37 0D 0A 09 09 76 69  6F 6C 65 74 20 20 20 20   0.917647 0.917647♪◙○○violet    
000020E0  20 20 20 20 20 20 20 20  20 20 20 30 2E 33 30 39  38 30 34 20 30 2E 31 38  34 33 31 34 20 30 2E 33             0.309804 0.184314 0.3
00002100  30 39 38 30 34 0D 0A 09  09 76 69 6F 6C 65 74 5F  72 65 64 20 20 20 20 20  20 20 20 20 20 20 30 2E  09804♪◙○○violet_red           0.
00002120  38 30 30 30 30 30 20 30  2E 31 39 36 30 37 38 20  30 2E 36 30 30 30 30 30  0D 0A 09 09 77 68 65 61  800000 0.196078 0.600000♪◙○○whea
00002140  74 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 30 2E 38 34 37 30 35  39 20 30 2E 38 34 37 30  t                0.847059 0.8470
00002160  35 39 20 30 2E 37 34 39  30 32 30 0D 0A 09 09 77  68 69 74 65 20 20 20 20  20 20 20 20 20 20 20 20  59 0.749020♪◙○○white            
00002180  20 20 20 20 30 2E 39 38  38 32 33 35 20 30 2E 39  38 38 32 33 35 20 30 2E  39 38 38 32 33 35 0D 0A      0.988235 0.988235 0.988235♪◙
000021A0  09 09 79 65 6C 6C 6F 77  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 31  2E 30 30 30 30 30 30 20  ○○yellow               1.000000 
000021C0  31 2E 30 30 30 30 30 30  20 30 2E 30 30 30 30 30  30 0D 0A 09 09 79 65 6C  6C 6F 77 5F 67 72 65 65  1.000000 0.000000♪◙○○yellow_gree
000021E0  6E 20 20 20 20 20 20 20  20 20 30 2E 36 30 30 30  30 30 20 30 2E 38 30 30  30 30 30 20 30 2E 31 39  n         0.600000 0.800000 0.19
00002200  36 30 37 38 0D 0A 74 79  70 65 64 65 66 20 75 6E  73 69 67 6E 65 64 20 63  68 61 72 20 20 20 20 20  6078♪◙typedef unsigned char     
00002220  20 42 79 74 65 3B 0D 0A  74 79 70 65 64 65 66 20  75 6E 73 69 67 6E 65 64  20 69 6E 74 20 20 20 20   Byte;♪◙typedef unsigned int    
00002240  20 20 20 57 6F 72 64 3B  0D 0A 74 79 70 65 64 65  66 20 65 6E 75 6D 20 7B  66 61 6C 73 65 2C 20 74     Word;♪◙typedef enum {false, t
00002260  72 75 65 7D 20 42 6F 6F  6C 65 61 6E 3B 0D 0A 74  79 70 65 64 65 66 20 73  74 72 75 63 74 0D 0A 7B  rue} Boolean;♪◙typedef struct♪◙{
00002280  0D 0A 20 20 42 79 74 65  20 52 65 64 3B 0D 0A 20  20 42 79 74 65 20 47 72  6E 3B 0D 0A 20 20 42 79  ♪◙  Byte Red;♪◙  Byte Grn;♪◙  By
000022A0  74 65 20 42 6C 75 3B 0D  0A 7D 0D 0A 52 47 42 3B  0D 0A 0D 0A 74 79 70 65  64 65 66 20 52 47 42 20  te Blu;♪◙}♪◙RGB;♪◙♪◙typedef RGB 
000022C0  50 61 6C 65 74 74 65 52  65 67 69 73 74 65 72 5B  32 35 36 5D 3B 0D 0A 0D  0A 76 6F 69 64 20 53 65  PaletteRegister[256];♪◙♪◙void Se
000022E0  74 5F 47 72 61 70 68 69  63 73 5F 4D 6F 64 65 28  29 0D 0A 7B 0D 0A 20 20  69 66 28 28 58 52 65 73  t_Graphics_Mode()♪◙{♪◙  if((XRes
00002300  3C 33 32 31 29 20 26 26  20 28 59 52 65 73 3C 32  30 31 29 29 0D 0A 20 20  20 20 49 6E 69 74 47 72  <321) && (YRes<201))♪◙    InitGr
00002320  61 70 68 69 63 73 28 31  39 29 3B 0D 0A 20 20 65  6C 73 65 0D 0A 20 20 7B  0D 0A 20 20 20 20 69 66  aphics(19);♪◙  else♪◙  {♪◙    if
00002340  28 28 58 52 65 73 3C 36  34 31 29 20 26 26 20 28  59 52 65 73 3C 33 35 31  29 29 0D 0A 20 20 20 20  ((XRes<641) && (YRes<351))♪◙    
00002360  20 20 49 6E 69 74 47 72  61 70 68 69 63 73 28 34  35 29 3B 0D 0A 20 20 20  20 65 6C 73 65 0D 0A 20    InitGraphics(45);♪◙    else♪◙ 
00002380  20 20 20 7B 0D 0A 20 20  20 20 20 20 69 66 28 28  58 52 65 73 3C 36 34 31  29 20 26 26 20 28 59 52     {♪◙      if((XRes<641) && (YR
000023A0  65 73 3C 34 38 31 29 29  0D 0A 09 49 6E 69 74 47  72 61 70 68 69 63 73 28  34 36 29 3B 0D 0A 20 20  es<481))♪◙○InitGraphics(46);♪◙  
000023C0  20 20 20 20 65 6C 73 65  0D 0A 20 20 20 20 20 20  7B 0D 0A 09 69 66 28 28  58 52 65 73 3C 38 30 31      else♪◙      {♪◙○if((XRes<801
000023E0  29 20 26 26 20 28 59 52  65 73 3C 36 30 31 29 29  0D 0A 09 20 20 49 6E 69  74 47 72 61 70 68 69 63  ) && (YRes<601))♪◙○  InitGraphic
00002400  73 28 34 38 29 3B 0D 0A  09 65 6C 73 65 0D 0A 09  20 20 49 6E 69 74 47 72  61 70 68 69 63 73 28 35  s(48);♪◙○else♪◙○  InitGraphics(5
00002420  36 29 3B 0D 0A 20 20 20  20 20 20 7D 0D 0A 20 20  20 20 7D 0D 0A 20 20 7D  0D 0A 7D 0D 0A 20 20 50  6);♪◙      }♪◙    }♪◙  }♪◙}♪◙  P
00002440  69 63 5F 46 69 6C 65 3D  66 6F 70 65 6E 28 50 5F  4E 61 6D 65 2C 20 22 77  2B 62 22 29 3B 0D 0A 20  ic_File=fopen(P_Name, "w+b");♪◙ 
00002460  20 66 6F 72 28 79 3D 30  3B 20 79 3C 37 3B 20 79  2B 2B 29 3B 0D 0A 20 20  7B 0D 0A 20 20 20 20 66   for(y=0; y<7; y++);♪◙  {♪◙    f
00002480  70 75 74 63 28 32 35 33  2C 20 50 69 63 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 66 70 75 74 63 28  putc(253, Pic_File);♪◙    fputc(
000024A0  32 30 2C 20 50 69 63 5F  46 69 6C 65 29 3B 0D 0A  20 20 20 20 66 70 75 74  63 28 34 31 2C 20 50 69  20, Pic_File);♪◙    fputc(41, Pi
000024C0  63 5F 46 69 6C 65 29 3B  0D 0A 20 20 20 20 66 70  75 74 63 28 31 34 2C 20  50 69 63 5F 46 69 6C 65  c_File);♪◙    fputc(14, Pic_File
000024E0  29 3B 0D 0A 20 20 20 20  66 70 75 74 63 28 30 2C  20 50 69 63 5F 46 69 6C  65 29 3B 0D 0A 20 20 20  );♪◙    fputc(0, Pic_File);♪◙   
00002500  20 66 70 75 74 63 28 39  2C 20 50 69 63 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 66 70 75 74 63 28   fputc(9, Pic_File);♪◙    fputc(
00002520  33 2C 20 50 69 63 5F 46  69 6C 65 29 3B 0D 0A 20  20 7D 0D 0A 76 6F 69 64  20 47 65 74 53 63 65 6E  3, Pic_File);♪◙  }♪◙void GetScen
00002540  65 46 69 6C 65 28 29 0D  0A 7B 0D 0A 20 20 69 6E  74 20 69 3B 0D 0A 20 20  42 79 74 65 20 78 2C 20  eFile()♪◙{♪◙  int i;♪◙  Byte x, 
00002560  79 3B 0D 0A 0D 0A 20 20  70 72 69 6E 74 66 28 22  5C 6E 45 6E 74 65 72 20  46 69 6C 65 20 4E 61 6D  y;♪◙♪◙  printf("\nEnter File Nam
00002580  65 20 2D 3E 20 22 29 3B  0D 0A 20 20 78 3D 77 68  65 72 65 78 28 29 3B 0D  0A 20 20 79 3D 77 68 65  e -> ");♪◙  x=wherex();♪◙  y=whe
000025A0  72 65 79 28 29 3B 0D 0A  20 20 67 65 74 73 28 53  63 65 6E 65 46 69 6C 65  29 3B 0D 0A 20 20 69 66  rey();♪◙  gets(SceneFile);♪◙  if
000025C0  28 21 28 73 74 72 63 6D  70 28 53 63 65 6E 65 46  69 6C 65 2C 20 22 22 29  29 29 0D 0A 20 20 7B 0D  (!(strcmp(SceneFile, "")))♪◙  {♪
000025E0  0A 20 20 20 20 73 74 72  63 70 79 28 53 63 65 6E  65 46 69 6C 65 2C 20 22  43 55 42 45 50 4C 41 4E  ◙    strcpy(SceneFile, "CUBEPLAN
00002600  22 29 3B 0D 0A 20 20 20  20 67 6F 74 6F 78 79 28  78 2C 20 79 29 3B 0D 0A  20 20 20 20 70 75 74 73  ");♪◙    gotoxy(x, y);♪◙    puts
00002620  28 53 63 65 6E 65 46 69  6C 65 29 3B 0D 0A 20 20  7D 0D 0A 20 20 70 75 74  73 28 22 22 29 3B 0D 0A  (SceneFile);♪◙  }♪◙  puts("");♪◙
00002640  20 20 66 6F 72 28 69 3D  30 3B 20 69 3C 73 74 72  6C 65 6E 28 53 63 65 6E  65 46 69 6C 65 29 3B 20    for(i=0; i<strlen(SceneFile); 
00002660  69 2B 2B 29 0D 0A 20 20  20 20 53 63 65 6E 65 46  69 6C 65 5B 69 5D 3D 74  6F 75 70 70 65 72 28 53  i++)♪◙    SceneFile[i]=toupper(S
00002680  63 65 6E 65 46 69 6C 65  5B 69 5D 29 3B 0D 0A 7D  0D 0A 0D 0A 76 6F 69 64  20 53 61 76 65 5F 50 69  ceneFile[i]);♪◙}♪◙♪◙void Save_Pi
000026A0  63 74 75 72 65 28 29 0D  0A 7B 0D 0A 20 20 57 6F  72 64 20 78 2C 20 79 3B  0D 0A 20 20 42 79 74 65  cture()♪◙{♪◙  Word x, y;♪◙  Byte
000026C0  20 64 3B 0D 0A 20 20 46  49 4C 45 20 2A 4F 75 74  5F 46 69 6C 65 3B 0D 0A  0D 0A 20 20 4F 75 74 5F   d;♪◙  FILE *Out_File;♪◙♪◙  Out_
000026E0  46 69 6C 65 3D 66 6F 70  65 6E 28 22 54 45 4D 50  2E 54 47 41 22 2C 20 22  77 2B 62 22 29 3B 0D 0A  File=fopen("TEMP.TGA", "w+b");♪◙
00002700  20 20 66 6F 72 28 79 3D  30 3B 20 79 3C 37 3B 20  79 2B 2B 29 3B 0D 0A 20  20 7B 0D 0A 20 20 20 20    for(y=0; y<7; y++);♪◙  {♪◙    
00002720  70 75 74 77 28 32 35 36  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 70 75 74 77 28 31  putw(256, Out_File);♪◙    putw(1
00002740  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 70 75 74 77 28 30  2C 20 4F 75 74 5F 46 69  , Out_File);♪◙    putw(0, Out_Fi
00002760  6C 65 29 3B 0D 0A 20 20  20 20 70 75 74 63 28 31  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  le);♪◙    putc(1, Out_File);♪◙  
00002780  20 20 70 75 74 63 28 32  34 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  20 20 20 70 75 74 77 28    putc(24, Out_File);♪◙    putw(
000027A0  30 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  20 20 20 70 75 74 77 28  30 2C 20 4F 75 74 5F 46  0, Out_File);♪◙    putw(0, Out_F
000027C0  69 6C 65 29 3B 0D 0A 20  20 20 20 70 75 74 77 28  58 52 65 73 2C 20 4F 75  74 5F 46 69 6C 65 29 3B  ile);♪◙    putw(XRes, Out_File);
000027E0  0D 0A 20 20 20 20 70 75  74 77 28 59 52 65 73 2C  20 4F 75 74 5F 46 69 6C  65 29 3B 0D 0A 20 20 20  ♪◙    putw(YRes, Out_File);♪◙   
00002800  20 70 75 74 77 28 43 52  65 73 2C 20 4F 75 74 5F  46 69 6C 65 29 3B 0D 0A  20 20 7D 0D 0A 20 20 66   putw(CRes, Out_File);♪◙  }♪◙  f
00002820  6F 72 28 79 3D 30 3B 20  79 3C 32 35 36 3B 20 79  2B 2B 29 0D 0A 20 20 7B  0D 0A 20 20 20 20 66 70  or(y=0; y<256; y++)♪◙  {♪◙    fp
00002840  75 74 63 28 28 50 61 6C  41 72 72 61 79 5B 79 5D  2E 42 6C 75 29 3C 3C 32  2C 20 4F 75 74 5F 46 69  utc((PalArray[y].Blu)<<2, Out_Fi
00002860  6C 65 29 3B 0D 0A 20 20  20 20 66 70 75 74 63 28  28 50 61 6C 41 72 72 61  79 5B 79 5D 2E 47 72 6E  le);♪◙    fputc((PalArray[y].Grn
00002880  29 3C 3C 32 2C 20 4F 75  74 5F 46 69 6C 65 29 3B  0D 0A 20 20 20 20 66 70  75 74 63 28 28 50 61 6C  )<<2, Out_File);♪◙    fputc((Pal
000028A0  41 72 72 61 79 5B 79 5D  2E 52 65 64 29 3C 3C 32  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  Array[y].Red)<<2, Out_File);♪◙  
000028C0  7D 0D 0A 20 20 66 6F 72  28 79 3D 59 52 65 73 3B  20 79 3E 30 3B 20 79 2D  2D 29 0D 0A 20 20 7B 0D  }♪◙  for(y=YRes; y>0; y--)♪◙  {♪
000028E0  0A 20 20 20 20 66 6F 72  28 78 3D 30 3B 20 78 3C  58 52 65 73 3B 20 78 2B  2B 29 0D 0A 20 20 20 20  ◙    for(x=0; x<XRes; x++)♪◙    
00002900  7B 0D 0A 20 20 20 20 20  20 64 3D 47 65 74 50 69  78 65 6C 28 78 2C 20 79  2D 31 29 3B 0D 0A 20 20  {♪◙      d=GetPixel(x, y-1);♪◙  
00002920  20 20 20 20 66 70 75 74  63 28 64 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 7D 0D 0A      fputc(d, Out_File);♪◙    }♪◙
00002940  20 20 7D 0D 0A 20 20 66  63 6C 6F 73 65 61 6C 6C  28 29 3B 0D 0A 7D 0D 0A  0D 0A 23 69 6E 63 6C 75    }♪◙  fcloseall();♪◙}♪◙♪◙#inclu
00002960  64 65 20 22 73 74 64 69  6F 2E 68 22 0D 0A 23 69  6E 63 6C 75 64 65 20 22  64 6F 73 2E 68 22 0D 0A  de "stdio.h"♪◙#include "dos.h"♪◙
00002980  23 69 6E 63 6C 75 64 65  20 22 63 6F 6E 69 6F 2E  68 22 0D 0A 23 69 6E 63  6C 75 64 65 20 22 64 65  #include "conio.h"♪◙#include "de
000029A0  66 73 2E 68 22 0D 0A 0D  0A 76 6F 69 64 20 53 65  74 5F 54 65 78 74 5F 53  63 72 65 65 6E 28 69 6E  fs.h"♪◙♪◙void Set_Text_Screen(in
000029C0  74 20 74 63 2C 20 69 6E  74 20 74 62 29 0D 0A 7B  0D 0A 20 20 74 65 78 74  63 6F 6C 6F 72 28 74 63  t tc, int tb)♪◙{♪◙  textcolor(tc
000029E0  29 3B 0D 0A 20 20 74 65  78 74 62 61 63 6B 67 72  6F 75 6E 64 28 74 62 29  3B 0D 0A 20 20 63 6C 72  );♪◙  textbackground(tb);♪◙  clr
00002A00  73 63 72 28 29 3B 0D 0A  7D 0D 0A 69 6E 73 74 61  6C 6C 75 73 65 72 64 72  69 76 65 72 28 22 53 56  scr();♪◙}♪◙installuserdriver("SV
00002A20  47 41 32 35 36 22 2C 44  65 74 65 63 74 56 47 41  32 35 36 29 3B 0D 0A 0D  0A 3B 20 2A 2A 2A 2A 2A  GA256",DetectVGA256);♪◙♪◙; *****
00002A40  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 20 46 75 6E 63 74  69 6F 6E 20 73 74 6F 72  ****************** Function stor
00002A60  65 64 61 63 28 29 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  edac() *************************
00002A80  2A 2A 2A 0D 0A 0D 0A 3B  09 46 75 6E 63 74 69 6F  6E 20 74 6F 20 53 74 6F  72 65 20 74 68 65 20 64  ***♪◙♪◙;○Function to Store the d
00002AA0  61 63 62 6F 78 5B 5D 5B  5D 20 61 72 72 61 79 20  69 6E 74 6F 20 56 47 41  2C 0D 0A 3B 09 63 61 6C  acbox[][] array into VGA,♪◙;○cal
00002AC0  6C 65 64 20 66 72 6F 6D  20 6C 6F 61 64 64 61 63  28 29 20 64 75 72 72 69  6E 67 20 69 6E 69 74 69  led from loaddac() durring initi
00002AE0  61 6C 69 7A 61 74 69 6F  6E 2E 0D 0A 0D 0A 73 74  6F 72 65 64 61 63 09 70  72 6F 63 0D 0A 09 70 75  alization.♪◙♪◙storedac○proc♪◙○pu
00002B00  73 68 09 65 73 09 09 09  3B 20 6E 65 65 64 20 45  53 20 3D 3D 20 44 53 20  74 65 6D 70 6F 72 61 72  sh○es○○○; need ES == DS temporar
00002B20  69 6C 79 0D 0A 09 70 75  73 68 09 64 73 09 09 09  3B 20 20 2E 2E 2E 0D 0A  09 70 6F 70 09 65 73 09  ily♪◙○push○ds○○○;  ...♪◙○pop○es○
00002B40  09 09 3B 20 20 2E 2E 2E  0D 0A 09 6D 6F 76 09 61  78 2C 31 30 31 32 68 09  09 3B 20 67 65 74 20 74  ○○;  ...♪◙○mov○ax,1012h○○; get t
00002B60  68 65 20 6F 6C 64 20 44  41 43 20 76 61 6C 75 65  73 0D 0A 09 6D 6F 76 09  62 78 2C 30 09 09 09 3B  he old DAC values♪◙○mov○bx,0○○○;
00002B80  20 20 28 61 73 73 75 6D  69 6E 67 2C 20 6F 66 20  63 6F 75 72 73 65 2C 20  74 68 65 79 20 65 78 69    (assuming, of course, they exi
00002BA0  73 74 29 0D 0A 09 6D 6F  76 09 63 78 2C 32 35 36  09 09 09 3B 20 20 2E 2E  2E 0D 0A 09 6D 6F 76 09  st)♪◙○mov○cx,256○○○;  ...♪◙○mov○
00002BC0  64 78 2C 6F 66 66 73 65  74 20 64 61 63 62 6F 78  09 3B 20 20 2E 2E 2E 0D  0A 09 69 6E 74 09 31 30  dx,offset dacbox○;  ...♪◙○int○10
00002BE0  68 09 09 09 3B 20 64 6F  20 69 74 2E 0D 0A 09 70  6F 70 09 65 73 09 09 09  3B 20 20 2E 2E 2E 0D 0A  h○○○; do it.♪◙○pop○es○○○;  ...♪◙
00002C00  09 72 65 74 0D 0A 73 74  6F 72 65 64 61 63 20 65  6E 64 70 0D 0A 80 02 5E  01 93 0D 0A 65 78 74 65  ○ret♪◙storedac endp♪◙Ç☻^☺ô♪◙exte
00002C20  72 6E 20 69 6E 74 20 20  58 52 65 73 2C 20 59 52  65 73 3B 0D 0A 65 78 74  65 72 6E 20 57 6F 72 64  rn int  XRes, YRes;♪◙extern Word
00002C40  20 4D 61 78 58 52 65 73  2C 20 4D 61 78 59 52 65  73 3B 0D 0A 65 78 74 65  72 6E 20 57 6F 72 64 20   MaxXRes, MaxYRes;♪◙extern Word 
00002C60  4D 61 78 58 2C 20 4D 61  78 59 3B 0D 0A 65 78 74  65 72 6E 20 42 6F 6F 6C  65 61 6E 20 50 65 72 73  MaxX, MaxY;♪◙extern Boolean Pers
00002C80  70 65 63 74 69 76 65 50  6C 6F 74 3B 0D 0A 65 78  74 65 72 6E 20 66 6C 6F  61 74 20 20 20 4D 78 2C  pectivePlot;♪◙extern float   Mx,
00002CA0  20 4D 79 2C 20 4D 7A 2C  20 64 73 3B 0D 0A 65 78  74 65 72 6E 20 42 6F 6F  6C 65 61 6E 20 44 72 61   My, Mz, ds;♪◙extern Boolean Dra
00002CC0  77 5F 41 78 69 73 5F 41  6E 64 5F 50 61 6C 65 74  74 65 3B 0D 0A 23 69 6E  63 6C 75 64 65 20 22 73  w_Axis_And_Palette;♪◙#include "s
00002CE0  74 64 69 6F 2E 68 22 0D  0A 23 69 6E 63 6C 75 64  65 20 22 64 6F 73 2E 68  22 0D 0A 23 69 6E 63 6C  tdio.h"♪◙#include "dos.h"♪◙#incl
00002D00  75 64 65 20 22 64 65 66  73 2E 68 22 0D 0A 23 69  6E 63 6C 75 64 65 20 22  67 6C 6F 62 61 6C 73 2E  ude "defs.h"♪◙#include "globals.
00002D20  68 22 0D 0A 23 69 6E 63  6C 75 64 65 20 22 6D 61  74 68 62 2E 68 22 0D 0A  23 69 6E 63 6C 75 64 65  h"♪◙#include "mathb.h"♪◙#include
00002D40  20 22 67 72 61 70 68 62  2E 68 22 0D 0A 4D 41 53  4D 20 25 31 20 25 31 20  4E 55 4C 20 4E 55 4C 0D   "graphb.h"♪◙MASM %1 %1 NUL NUL♪
00002D60  0A 49 46 20 45 52 52 4F  52 4C 45 56 45 4C 20 31  20 47 4F 54 4F 20 50 52  4F 42 4C 45 4D 0D 0A 4C  ◙IF ERRORLEVEL 1 GOTO PROBLEM♪◙L
00002D80  49 4E 4B 20 25 31 20 40  41 55 54 4F 4C 49 4E 4B  0D 0A 45 58 45 32 42 49  4E 20 25 31 20 25 31 2E  INK %1 @AUTOLINK♪◙EXE2BIN %1 %1.
00002DA0  44 52 56 0D 0A 44 45 4C  20 25 31 2E 45 58 45 0D  0A 44 45 4C 20 25 31 2E  4F 42 4A 0D 0A 3A 50 52  DRV♪◙DEL %1.EXE♪◙DEL %1.OBJ♪◙:PR
00002DC0  4F 42 4C 45 4D 0D 0A 23  64 65 66 69 6E 65 20 4E  75 6D 56 65 72 74 69 63  69 65 73 49 6E 46 61 63  OBLEM♪◙#define NumVerticiesInFac
00002DE0  65 74 20 34 0D 0A 23 64  65 66 69 6E 65 20 4D 61  78 56 65 72 74 65 78 4E  75 6D 49 6E 46 61 63 65  et 4♪◙#define MaxVertexNumInFace
00002E00  74 20 34 0D 0A 23 64 65  66 69 6E 65 20 53 63 61  6C 65 44 61 74 61 20 32  33 30 30 30 0D 0A 23 64  t 4♪◙#define ScaleData 23000♪◙#d
00002E20  65 66 69 6E 65 20 53 63  61 6C 65 49 6D 61 67 65  20 31 30 30 0D 0A 0D 0A  2F 2A 0D 0A 23 64 65 66  efine ScaleImage 100♪◙♪◙/*♪◙#def
00002E40  69 6E 65 20 4D 61 78 46  61 63 65 74 20 31 36 37  38 09 20 20 20 20 20 09  20 20 20 20 20 20 69 6E  ine MaxFacet 1678○     ○      in
00002E60  64 65 70 65 6E 64 61 6E  74 20 3A 20 4D 61 78 46  61 63 65 74 20 20 3D 20  6E 0D 0A 23 64 65 66 69  dependant : MaxFacet  = n♪◙#defi
00002E80  6E 65 20 4D 61 78 56 65  72 74 65 78 20 36 37 31  32 09 20 20 20 20 20 09  20 20 20 20 20 20 76 65  ne MaxVertex 6712○     ○      ve
00002EA0  72 74 69 63 69 65 73 20  20 20 4D 61 78 56 65 72  74 65 78 20 3D 20 34 20  2A 20 6E 0D 0A 2A 2F 0D  rticies   MaxVertex = 4 * n♪◙*/♪
00002EC0  0A 0D 0A 23 64 65 66 69  6E 65 20 4D 61 78 46 61  63 65 74 20 33 36 30 30  0D 0A 23 64 65 66 69 6E  ◙♪◙#define MaxFacet 3600♪◙#defin
00002EE0  65 20 4D 61 78 56 65 72  74 65 78 20 33 37 32 31  0D 0A 0D 0A 69 6E 74 20  4C 61 73 74 56 65 72 74  e MaxVertex 3721♪◙♪◙int LastVert
00002F00  65 78 2C 20 4C 61 73 74  46 61 63 65 74 3B 0D 0A  69 6E 74 20 4C 61 73 74  56 65 72 74 65 78 4E 75  ex, LastFacet;♪◙int LastVertexNu
00002F20  6D 49 6E 46 61 63 65 74  3B 0D 0A 69 6E 74 20 56  65 72 74 65 78 4E 75 6D  2C 20 46 61 63 65 74 4E  mInFacet;♪◙int VertexNum, FacetN
00002F40  75 6D 3B 0D 0A 69 6E 74  20 56 65 72 74 65 78 4E  75 6D 49 6E 46 61 63 65  74 3B 0D 0A 54 44 49 41  um;♪◙int VertexNumInFacet;♪◙TDIA
00002F60  20 56 65 72 74 65 78 5B  4D 61 78 56 65 72 74 65  78 2B 31 5D 3B 0D 0A 73  74 61 74 69 63 20 69 6E   Vertex[MaxVertex+1];♪◙static in
00002F80  74 20 66 61 72 20 2A 46  61 63 65 74 3B 0D 0A 0D  0A 66 6C 6F 61 74 20 49  6E 76 53 63 61 6C 65 44  t far *Facet;♪◙♪◙float InvScaleD
00002FA0  61 74 61 2C 20 49 6E 76  53 63 61 6C 65 49 6D 61  67 65 3B 0D 0A 74 79 70  65 64 65 66 20 63 68 61  ata, InvScaleImage;♪◙typedef cha
00002FC0  72 20 4E 61 6D 65 5B 32  30 5D 3B 0D 0A 4E 61 6D  65 20 46 69 6C 65 4E 61  6D 65 3B 0D 0A 74 79 70  r Name[20];♪◙Name FileName;♪◙typ
00002FE0  65 64 65 66 20 73 74 72  75 63 74 7B 0D 0A 20 20  69 6E 74 20 78 3B 0D 0A  20 20 69 6E 74 20 79 3B  edef struct{♪◙  int x;♪◙  int y;
00003000  0D 0A 7D 20 50 69 78 65  6C 56 65 63 74 6F 72 3B  0D 0A 0D 0A 74 79 70 65  64 65 66 20 50 69 78 65  ♪◙} PixelVector;♪◙♪◙typedef Pixe
00003020  6C 56 65 63 74 6F 72 20  50 69 78 65 6C 41 72 72  61 79 5B 4E 75 6D 56 65  72 74 69 63 69 65 73 49  lVector PixelArray[NumVerticiesI
00003040  6E 46 61 63 65 74 2B 32  5D 3B 0D 0A 74 79 70 65  64 65 66 20 54 44 41 20  56 6F 78 65 6C 41 72 72  nFacet+2];♪◙typedef TDA VoxelArr
00003060  61 79 5B 4E 75 6D 56 65  72 74 69 63 69 65 73 49  6E 46 61 63 65 74 2B 31  5D 3B 0D 0A 0D 0A 76 6F  ay[NumVerticiesInFacet+1];♪◙♪◙vo
00003080  69 64 20 49 6E 69 74 56  65 72 74 65 78 42 75 66  66 65 72 28 29 0D 0A 76  6F 69 64 20 4C 6F 61 64  id InitVertexBuffer()♪◙void Load
000030A0  44 61 74 61 28 4E 61 6D  65 20 46 69 6C 65 4E 61  6D 65 29 0D 0A 76 6F 69  64 20 53 61 76 65 44 61  Data(Name FileName)♪◙void SaveDa
000030C0  74 61 28 4E 61 6D 65 20  46 69 6C 65 4E 61 6D 65  29 0D 0A 76 6F 69 64 20  50 75 74 57 69 72 65 46  ta(Name FileName)♪◙void PutWireF
000030E0  61 63 65 74 28 50 69 78  65 6C 41 72 72 61 79 20  50 74 73 2C 20 42 79 74  65 20 43 6F 6C 6F 72 29  acet(PixelArray Pts, Byte Color)
00003100  0D 0A 76 6F 69 64 20 50  75 74 46 61 63 65 74 28  50 69 78 65 6C 41 72 72  61 79 20 46 61 63 65 32  ♪◙void PutFacet(PixelArray Face2
00003120  64 2C 20 42 79 74 65 20  43 6F 6C 6F 72 2C 20 42  79 74 65 20 49 6E 74 65  6E 73 29 0D 0A 76 6F 69  d, Byte Color, Byte Intens)♪◙voi
00003140  64 20 47 65 74 5F 41 4E  49 5F 46 69 6C 65 5F 4E  61 6D 65 28 29 0D 0A 7B  0D 0A 20 20 42 79 74 65  d Get_ANI_File_Name()♪◙{♪◙  Byte
00003160  20 78 2C 20 79 3B 0D 0A  0D 0A 20 20 74 65 78 74  63 6F 6C 6F 72 28 59 45  4C 4C 4F 57 29 3B 0D 0A   x, y;♪◙♪◙  textcolor(YELLOW);♪◙
00003180  20 20 74 65 78 74 62 61  63 6B 67 72 6F 75 6E 64  28 42 4C 55 45 29 3B 0D  0A 20 20 67 6F 74 6F 78    textbackground(BLUE);♪◙  gotox
000031A0  79 28 31 2C 20 38 29 3B  0D 0A 20 20 63 70 72 69  6E 74 66 28 22 45 6E 74  65 72 20 46 69 6C 65 20  y(1, 8);♪◙  cprintf("Enter File 
000031C0  4E 61 6D 65 20 2D 3E 20  22 29 3B 0D 0A 20 20 78  3D 77 68 65 72 65 78 28  29 3B 0D 0A 20 20 79 3D  Name -> ");♪◙  x=wherex();♪◙  y=
000031E0  77 68 65 72 65 79 28 29  3B 0D 0A 20 20 74 65 78  74 63 6F 6C 6F 72 28 57  48 49 54 45 2B 42 4C 49  wherey();♪◙  textcolor(WHITE+BLI
00003200  4E 4B 29 3B 0D 0A 20 20  63 70 72 69 6E 74 66 28  22 25 73 22 2C 20 22 53  50 48 52 50 4C 41 4E 22  NK);♪◙  cprintf("%s", "SPHRPLAN"
00003220  29 3B 0D 0A 20 20 74 65  78 74 63 6F 6C 6F 72 28  59 45 4C 4C 4F 57 29 3B  0D 0A 20 20 67 6F 74 6F  );♪◙  textcolor(YELLOW);♪◙  goto
00003240  78 79 28 78 2C 20 79 29  3B 0D 0A 20 20 77 68 69  6C 65 28 21 28 6B 62 68  69 74 28 29 29 29 3B 0D  xy(x, y);♪◙  while(!(kbhit()));♪
00003260  0A 20 20 63 70 72 69 6E  74 66 28 22 20 20 20 20  20 20 20 20 20 20 20 20  22 29 3B 0D 0A 20 20 67  ◙  cprintf("            ");♪◙  g
00003280  6F 74 6F 78 79 28 78 2C  20 79 29 3B 0D 0A 20 20  67 65 74 73 28 46 69 6C  65 5F 4E 61 6D 65 29 3B  otoxy(x, y);♪◙  gets(File_Name);
000032A0  0D 0A 20 20 69 66 28 21  28 73 74 72 63 6D 70 28  46 69 6C 65 5F 4E 61 6D  65 2C 20 22 22 29 29 29  ♪◙  if(!(strcmp(File_Name, "")))
000032C0  0D 0A 20 20 20 20 73 74  72 63 70 79 28 46 69 6C  65 5F 4E 61 6D 65 2C 20  22 53 50 48 52 50 4C 41  ♪◙    strcpy(File_Name, "SPHRPLA
000032E0  4E 22 29 3B 0D 0A 20 20  73 74 72 75 70 72 28 46  69 6C 65 5F 4E 61 6D 65  29 3B 0D 0A 20 20 73 74  N");♪◙  strupr(File_Name);♪◙  st
00003300  72 63 61 74 28 46 69 6C  65 5F 4E 61 6D 65 2C 20  22 2E 41 4E 49 22 29 3B  0D 0A 20 20 67 6F 74 6F  rcat(File_Name, ".ANI");♪◙  goto
00003320  78 79 28 31 2C 20 38 29  3B 0D 0A 20 20 70 72 69  6E 74 66 28 22 20 20 20  20 20 20 20 20 20 20 20  xy(1, 8);♪◙  printf("           
00003340  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 22 29 3B 0D  0A 20 20 74 65 78 74 63                      ");♪◙  textc
00003360  6F 6C 6F 72 28 57 48 49  54 45 2B 42 4C 49 4E 4B  29 3B 0D 0A 20 20 67 6F  74 6F 78 79 28 31 2C 20  olor(WHITE+BLINK);♪◙  gotoxy(1, 
00003380  38 29 3B 0D 0A 20 20 63  70 72 69 6E 74 66 28 22  4C 6F 61 64 69 6E 67 20  22 29 3B 0D 0A 20 20 74  8);♪◙  cprintf("Loading ");♪◙  t
000033A0  65 78 74 63 6F 6C 6F 72  28 59 45 4C 4C 4F 57 29  3B 0D 0A 20 20 63 70 72  69 6E 74 66 28 22 25 73  extcolor(YELLOW);♪◙  cprintf("%s
000033C0  22 2C 20 46 69 6C 65 5F  4E 61 6D 65 29 3B 0D 0A  7D 0D 0A 50 61 6C 65 74  74 65 5F 52 65 67 69 73  ", File_Name);♪◙}♪◙Palette_Regis
000033E0  74 65 72 20 50 61 6C 3B  0D 0A 0D 0A 76 6F 69 64  20 47 72 65 79 5F 50 61  6C 65 74 74 65 28 50 61  ter Pal;♪◙♪◙void Grey_Palette(Pa
00003400  6C 65 74 74 65 5F 52 65  67 69 73 74 65 72 20 50  61 6C 29 0D 0A 7B 0D 0A  20 20 57 6F 72 64 20 69  lette_Register Pal)♪◙{♪◙  Word i
00003420  3B 0D 0A 0D 0A 20 20 66  6F 72 28 69 3D 30 3B 20  69 3C 36 34 3B 20 69 2B  2B 29 0D 0A 20 20 7B 0D  ;♪◙♪◙  for(i=0; i<64; i++)♪◙  {♪
00003440  0A 20 20 20 20 50 61 6C  5B 69 5D 2E 52 65 64 3D  69 3B 0D 0A 20 20 20 20  50 61 6C 5B 69 5D 2E 47  ◙    Pal[i].Red=i;♪◙    Pal[i].G
00003460  72 6E 3D 69 3B 0D 0A 20  20 20 20 50 61 6C 5B 69  5D 2E 42 6C 75 3D 69 3B  0D 0A 20 20 7D 0D 0A 7D  rn=i;♪◙    Pal[i].Blu=i;♪◙  }♪◙}
00003480  0D 0A 23 69 6E 63 6C 75  64 65 20 22 73 74 64 69  6F 2E 68 22 0D 0A 23 69  6E 63 6C 75 64 65 20 22  ♪◙#include "stdio.h"♪◙#include "
000034A0  6D 61 74 68 2E 68 22 0D  0A 23 69 6E 63 6C 75 64  65 20 22 64 65 66 73 2E  68 22 0D 0A 23 69 6E 63  math.h"♪◙#include "defs.h"♪◙#inc
000034C0  6C 75 64 65 20 22 6D 61  74 68 62 2E 68 22 0D 0A  76 6F 69 64 20 43 6C 65  61 72 50 61 6C 65 74 74  lude "mathb.h"♪◙void ClearPalett
000034E0  65 28 50 61 6C 65 74 74  65 52 65 67 69 73 74 65  72 20 43 6F 6C 6F 72 29  0D 0A 0D 0A 7B 20 57 6F  e(PaletteRegister Color)♪◙♪◙{ Wo
00003500  72 64 20 69 3B 0D 0A 0D  0A 20 20 66 6F 72 28 69  3D 30 3B 20 69 3C 3D 32  35 35 3B 20 69 2B 2B 29  rd i;♪◙♪◙  for(i=0; i<=255; i++)
00003520  0D 0A 20 20 7B 0D 0A 20  20 20 20 43 6F 6C 6F 72  5B 69 5D 2E 52 65 64 3D  30 3B 0D 0A 20 20 20 20  ♪◙  {♪◙    Color[i].Red=0;♪◙    
00003540  43 6F 6C 6F 72 5B 69 5D  2E 47 72 6E 3D 30 3B 0D  0A 20 20 20 20 43 6F 6C  6F 72 5B 69 5D 2E 42 6C  Color[i].Grn=0;♪◙    Color[i].Bl
00003560  75 3D 30 3B 0D 0A 20 20  7D 0D 0A 7D 0D 0A 76 6F  69 64 20 47 65 74 5F 53  63 72 65 65 6E 5F 4C 69  u=0;♪◙  }♪◙}♪◙void Get_Screen_Li
00003580  6E 65 28 57 6F 72 64 20  4C 69 6E 65 2C 20 63 68  61 72 20 62 75 66 5B 36  34 5D 29 0D 0A 7B 0D 0A  ne(Word Line, char buf[64])♪◙{♪◙
000035A0  20 20 6C 6F 6E 67 20 4C  5F 4F 66 66 73 65 74 3B  0D 0A 20 20 57 6F 72 64  20 4F 66 66 73 65 74 2C    long L_Offset;♪◙  Word Offset,
000035C0  20 50 61 67 65 3B 0D 0A  20 20 57 6F 72 64 20 53  63 72 65 65 6E 3D 30 78  41 30 30 30 3B 0D 0A 20   Page;♪◙  Word Screen=0xA000;♪◙ 
000035E0  20 57 6F 72 64 20 4F 6C  64 5F 50 61 67 65 3B 0D  0A 20 20 57 6F 72 64 20  6C 78 2C 20 6C 79 3B 0D   Word Old_Page;♪◙  Word lx, ly;♪
00003600  0A 20 20 42 79 74 65 20  64 3B 0D 0A 0D 0A 20 20  69 66 28 4C 69 6E 65 3C  59 52 65 73 29 0D 0A 20  ◙  Byte d;♪◙♪◙  if(Line<YRes)♪◙ 
00003620  20 7B 0D 0A 20 20 20 20  4F 6C 64 5F 50 61 67 65  3D 30 3B 0D 0A 20 20 20  20 73 77 69 74 63 68 28   {♪◙    Old_Page=0;♪◙    switch(
00003640  52 65 73 29 0D 0A 20 20  20 20 7B 0D 0A 20 20 20  20 20 20 63 61 73 65 20  48 69 67 68 5F 52 65 73  Res)♪◙    {♪◙      case High_Res
00003660  20 3A 20 20 20 4F 66 66  73 65 74 3D 50 72 65 5F  43 61 6C 63 5F 59 31 5B  4C 69 6E 65 2B 59 5F 4F   :   Offset=Pre_Calc_Y1[Line+Y_O
00003680  66 66 5D 3B 0D 0A 09 09  09 50 61 67 65 3D 28 28  4C 69 6E 65 3E 3E 36 29  3C 3C 34 29 3B 0D 0A 09  ff];♪◙○○○Page=((Line>>6)<<4);♪◙○
000036A0  09 09 69 66 28 50 61 67  65 21 3D 4F 6C 64 5F 50  61 67 65 29 0D 0A 09 09  09 7B 0D 0A 09 09 09 20  ○○if(Page!=Old_Page)♪◙○○○{♪◙○○○ 
000036C0  20 6F 75 74 70 77 28 30  78 33 43 44 2C 20 50 61  67 65 29 3B 0D 0A 09 09  09 20 20 4F 6C 64 5F 50   outpw(0x3CD, Page);♪◙○○○  Old_P
000036E0  61 67 65 3D 50 61 67 65  3B 0D 0A 09 09 09 7D 0D  0A 09 09 09 6D 6F 76 65  64 61 74 61 28 53 63 72  age=Page;♪◙○○○}♪◙○○○movedata(Scr
00003700  65 65 6E 2C 20 4F 66 66  73 65 74 2C 20 5F 44 53  2C 20 28 57 6F 72 64 29  62 75 66 2C 20 58 52 65  een, Offset, _DS, (Word)buf, XRe
00003720  73 29 3B 0D 0A 09 09 09  62 72 65 61 6B 3B 0D 0A  20 20 20 20 20 20 63 61  73 65 20 4D 65 64 69 75  s);♪◙○○○break;♪◙      case Mediu
00003740  6D 5F 52 65 73 20 3A 20  4C 69 6E 65 2B 3D 59 5F  4F 66 66 3B 0D 0A 09 09  09 66 6F 72 28 6C 78 3D  m_Res : Line+=Y_Off;♪◙○○○for(lx=
00003760  58 5F 4F 66 66 3B 20 6C  78 3C 28 58 52 65 73 2B  58 5F 4F 66 66 29 3B 20  6C 78 2B 2B 29 0D 0A 09  X_Off; lx<(XRes+X_Off); lx++)♪◙○
00003780  09 09 7B 0D 0A 09 09 09  20 20 64 3D 47 65 74 5F  50 69 78 65 6C 28 6C 78  2C 20 4C 69 6E 65 29 3B  ○○{♪◙○○○  d=Get_Pixel(lx, Line);
000037A0  0D 0A 09 09 09 20 20 62  75 66 5B 6C 78 5D 3D 64  3B 0D 0A 09 09 09 7D 0D  0A 09 09 09 62 72 65 61  ♪◙○○○  buf[lx]=d;♪◙○○○}♪◙○○○brea
000037C0  6B 3B 0D 0A 09 63 61 73  65 20 4C 6F 77 5F 52 65  73 20 20 3A 20 4F 66 66  73 65 74 3D 50 72 65 5F  k;♪◙○case Low_Res  : Offset=Pre_
000037E0  43 61 6C 63 5F 59 31 5B  4C 69 6E 65 2B 59 5F 4F  66 66 5D 3B 0D 0A 09 09  09 6D 6F 76 65 64 61 74  Calc_Y1[Line+Y_Off];♪◙○○○movedat
00003800  61 28 53 63 72 65 65 6E  2C 20 4F 66 66 73 65 74  2C 20 5F 44 53 2C 20 28  57 6F 72 64 29 62 75 66  a(Screen, Offset, _DS, (Word)buf
00003820  2C 20 58 52 65 73 29 3B  0D 0A 09 09 09 62 72 65  61 6B 3B 0D 0A 20 20 20  20 7D 0D 0A 20 20 7D 0D  , XRes);♪◙○○○break;♪◙    }♪◙  }♪
00003840  0A 7D 0D 0A 0D 0A 20 20  77 68 69 6C 65 28 21 69  73 64 69 67 69 74 28 63  5B 30 5D 29 29 0D 0A 20  ◙}♪◙♪◙  while(!isdigit(c[0]))♪◙ 
00003860  20 7B 0D 0A 20 20 20 20  77 68 69 6C 65 28 21 6B  62 68 69 74 28 29 29 3B  0D 0A 20 20 20 20 63 5B   {♪◙    while(!kbhit());♪◙    c[
00003880  30 5D 3D 67 65 74 63 68  28 29 3B 0D 0A 20 20 7D  0D 0A 20 20 72 65 74 75  72 6E 28 61 74 6F 69 28  0]=getch();♪◙  }♪◙  return(atoi(
000038A0  63 29 29 3B 0D 0A 42 79  74 65 20 62 5B 31 30 32  34 5D 3B 0D 0A 0D 0A 76  6F 69 64 20 47 65 74 5F  c));♪◙Byte b[1024];♪◙♪◙void Get_
000038C0  53 63 72 65 65 6E 5F 4C  69 6E 65 28 57 6F 72 64  20 4C 69 6E 65 29 0D 0A  7B 0D 0A 20 20 57 6F 72  Screen_Line(Word Line)♪◙{♪◙  Wor
000038E0  64 20 4F 66 66 73 65 74  2C 20 50 61 67 65 3B 0D  0A 20 20 57 6F 72 64 20  53 63 72 65 65 6E 3D 30  d Offset, Page;♪◙  Word Screen=0
00003900  78 41 30 30 30 3B 0D 0A  20 20 57 6F 72 64 20 6C  78 2C 20 6C 79 3B 0D 0A  20 20 42 79 74 65 20 64  xA000;♪◙  Word lx, ly;♪◙  Byte d
00003920  3B 0D 0A 0D 0A 20 20 69  66 28 4C 69 6E 65 3C 59  52 65 73 29 0D 0A 20 20  7B 0D 0A 20 20 20 20 66  ;♪◙♪◙  if(Line<YRes)♪◙  {♪◙    f
00003940  6F 72 28 6C 78 3D 30 3B  20 6C 78 3C 58 52 65 73  3B 20 6C 78 2B 2B 29 0D  0A 20 20 20 20 7B 0D 0A  or(lx=0; lx<XRes; lx++)♪◙    {♪◙
00003960  20 20 20 20 20 20 64 3D  47 65 74 5F 50 69 78 65  6C 28 6C 78 2C 20 4C 69  6E 65 29 3B 0D 0A 20 20        d=Get_Pixel(lx, Line);♪◙  
00003980  20 20 20 20 62 5B 6C 78  5D 3D 64 3B 0D 0A 20 20  20 20 7D 0D 0A 20 20 7D  0D 0A 7D 0D 0A 0D 0A 76      b[lx]=d;♪◙    }♪◙  }♪◙}♪◙♪◙v
000039A0  6F 69 64 20 57 72 69 74  65 5F 50 43 58 5F 4C 69  6E 65 28 57 6F 72 64 20  79 29 0D 0A 7B 0D 0A 20  oid Write_PCX_Line(Word y)♪◙{♪◙ 
000039C0  20 57 6F 72 64 20 74 3D  30 3B 0D 0A 20 20 42 79  74 65 20 69 3D 30 3B 0D  0A 0D 0A 20 20 47 65 74   Word t=0;♪◙  Byte i=0;♪◙♪◙  Get
000039E0  5F 53 63 72 65 65 6E 5F  4C 69 6E 65 28 79 29 3B  0D 0A 20 20 64 6F 0D 0A  20 20 7B 0D 0A 20 20 20  _Screen_Line(y);♪◙  do♪◙  {♪◙   
00003A00  20 69 3D 30 3B 0D 0A 20  20 20 20 77 68 69 6C 65  28 28 62 5B 74 2B 69 5D  3D 3D 62 5B 74 2B 69 2B   i=0;♪◙    while((b[t+i]==b[t+i+
00003A20  31 5D 29 20 26 26 20 28  28 74 2B 69 29 3C 58 52  65 73 29 20 26 26 20 28  69 3C 36 33 29 29 2B 2B  1]) && ((t+i)<XRes) && (i<63))++
00003A40  69 3B 0D 0A 20 20 20 20  69 66 28 69 3E 30 29 0D  0A 20 20 20 20 7B 0D 0A  20 20 20 20 20 20 66 70  i;♪◙    if(i>0)♪◙    {♪◙      fp
00003A60  75 74 63 28 69 7C 30 78  63 30 2C 20 4F 75 74 5F  46 69 6C 65 29 3B 0D 0A  20 20 20 20 20 20 66 70  utc(i|0xc0, Out_File);♪◙      fp
00003A80  75 74 63 28 62 5B 74 5D  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 20 20 74 2B 3D 69  utc(b[t], Out_File);♪◙      t+=i
00003AA0  3B 0D 0A 20 20 20 20 7D  0D 0A 20 20 20 20 65 6C  73 65 0D 0A 20 20 20 20  7B 0D 0A 20 20 20 20 20  ;♪◙    }♪◙    else♪◙    {♪◙     
00003AC0  20 69 66 28 28 28 62 5B  74 5D 29 26 30 78 63 30  29 3D 3D 30 78 63 30 29  0D 0A 09 66 70 75 74 63   if(((b[t])&0xc0)==0xc0)♪◙○fputc
00003AE0  28 30 78 63 31 2C 20 4F  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 20 20 20  20 66 70 75 74 63 28 62  (0xc1, Out_File);♪◙      fputc(b
00003B00  5B 74 2B 2B 5D 2C 20 4F  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 20 20 7D  0D 0A 20 20 7D 0D 0A 20  [t++], Out_File);♪◙    }♪◙  }♪◙ 
00003B20  20 77 68 69 6C 65 28 74  3C 58 52 65 73 29 3B 0D  0A 7D 0D 0A 0D 0A 76 6F  69 64 20 53 61 76 65 5F   while(t<XRes);♪◙}♪◙♪◙void Save_
00003B40  50 43 58 28 29 0D 0A 7B  0D 0A 20 20 57 6F 72 64  20 79 3B 0D 0A 0D 0A 20  20 69 66 28 28 4F 75 74  PCX()♪◙{♪◙  Word y;♪◙♪◙  if((Out
00003B60  5F 46 69 6C 65 3D 66 6F  70 65 6E 28 46 69 6C 65  5F 4E 61 6D 65 5F 32 2C  20 22 77 62 22 29 29 3D  _File=fopen(File_Name_2, "wb"))=
00003B80  3D 4E 55 4C 4C 29 0D 0A  20 20 7B 0D 0A 20 20 20  20 75 6E 67 65 74 63 68  28 33 32 29 3B 0D 0A 20  =NULL)♪◙  {♪◙    ungetch(32);♪◙ 
00003BA0  20 20 20 45 78 69 74 5F  47 72 61 70 68 69 63 73  28 29 3B 0D 0A 20 20 20  20 70 72 69 6E 74 66 28     Exit_Graphics();♪◙    printf(
00003BC0  22 43 61 6E 6E 6F 74 20  6F 70 65 6E 20 6F 75 74  70 75 74 20 66 69 6C 65  21 5C 6E 5C 6E 48 69 74  "Cannot open output file!\n\nHit
00003BE0  20 61 6E 79 20 6B 65 79  20 74 6F 20 65 78 69 74  2E 2E 2E 2E 22 29 3B 0D  0A 20 20 20 20 67 65 74   any key to exit....");♪◙    get
00003C00  63 68 28 29 3B 0D 0A 20  20 20 20 65 78 69 74 28  31 29 3B 0D 0A 20 20 7D  0D 0A 20 20 70 75 74 63  ch();♪◙    exit(1);♪◙  }♪◙  putc
00003C20  28 30 78 30 61 2C 20 4F  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 70 75 74  63 28 35 2C 20 4F 75 74  (0x0a, Out_File);♪◙  putc(5, Out
00003C40  5F 46 69 6C 65 29 3B 0D  0A 20 20 70 75 74 63 28  31 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  _File);♪◙  putc(1, Out_File);♪◙ 
00003C60  20 70 75 74 63 28 38 2C  20 4F 75 74 5F 46 69 6C  65 29 3B 0D 0A 20 20 70  75 74 77 28 30 2C 20 4F   putc(8, Out_File);♪◙  putw(0, O
00003C80  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 70 75 74  77 28 30 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  ut_File);♪◙  putw(0, Out_File);♪
00003CA0  0A 20 20 70 75 74 77 28  58 52 65 73 2D 31 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 70 75  ◙  putw(XRes-1, Out_File);♪◙  pu
00003CC0  74 77 28 59 52 65 73 2D  31 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  20 70 75 74 77 28 58 52  tw(YRes-1, Out_File);♪◙  putw(XR
00003CE0  65 73 2C 20 4F 75 74 5F  46 69 6C 65 29 3B 0D 0A  20 20 70 75 74 77 28 59  52 65 73 2C 20 4F 75 74  es, Out_File);♪◙  putw(YRes, Out
00003D00  5F 46 69 6C 65 29 3B 0D  0A 20 20 66 6F 72 28 79  3D 30 3B 20 79 3C 34 39  3B 20 79 2B 2B 29 0D 0A  _File);♪◙  for(y=0; y<49; y++)♪◙
00003D20  20 20 20 70 75 74 63 28  30 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  20 70 75 74 63 28 31 2C     putc(0, Out_File);♪◙  putc(1,
00003D40  20 4F 75 74 5F 46 69 6C  65 29 3B 0D 0A 20 20 70  75 74 77 28 58 52 65 73  2C 20 4F 75 74 5F 46 69   Out_File);♪◙  putw(XRes, Out_Fi
00003D60  6C 65 29 3B 0D 0A 20 20  70 75 74 77 28 32 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 66 6F  le);♪◙  putw(2, Out_File);♪◙  fo
00003D80  72 28 79 3D 30 3B 20 79  3C 35 38 3B 20 79 2B 2B  29 0D 0A 20 20 20 70 75  74 63 28 30 2C 20 4F 75  r(y=0; y<58; y++)♪◙   putc(0, Ou
00003DA0  74 5F 46 69 6C 65 29 3B  0D 0A 20 20 66 6F 72 28  79 3D 30 3B 20 79 3C 59  52 65 73 3B 20 79 2B 2B  t_File);♪◙  for(y=0; y<YRes; y++
00003DC0  29 0D 0A 20 20 20 20 57  72 69 74 65 5F 50 43 58  5F 4C 69 6E 65 28 79 29  3B 0D 0A 20 20 70 75 74  )♪◙    Write_PCX_Line(y);♪◙  put
00003DE0  63 28 30 78 30 43 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 66 6F  72 28 79 3D 30 3B 20 79  c(0x0C, Out_File);♪◙  for(y=0; y
00003E00  3C 32 35 36 3B 20 79 2B  2B 29 0D 0A 20 20 7B 0D  0A 20 20 20 20 70 75 74  63 28 28 28 50 61 6C 5B  <256; y++)♪◙  {♪◙    putc(((Pal[
00003E20  79 5D 2E 52 65 64 29 3C  3C 32 29 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 70 75 74  y].Red)<<2), Out_File);♪◙    put
00003E40  63 28 28 28 50 61 6C 5B  79 5D 2E 47 72 6E 29 3C  3C 32 29 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  c(((Pal[y].Grn)<<2), Out_File);♪
00003E60  0A 20 20 20 20 70 75 74  63 28 28 28 50 61 6C 5B  79 5D 2E 42 6C 75 29 3C  3C 32 29 2C 20 4F 75 74  ◙    putc(((Pal[y].Blu)<<2), Out
00003E80  5F 46 69 6C 65 29 3B 0D  0A 20 20 7D 0D 0A 20 20  66 63 6C 6F 73 65 28 4F  75 74 5F 46 69 6C 65 29  _File);♪◙  }♪◙  fclose(Out_File)
00003EA0  3B 0D 0A 7D 0D 0A 66 6C  6F 61 74 20 4D 49 4E 28  66 6C 6F 61 74 20 61 2C  20 66 6C 6F 61 74 20 62  ;♪◙}♪◙float MIN(float a, float b
00003EC0  29 0D 0A 66 6C 6F 61 74  20 4D 41 58 28 66 6C 6F  61 74 20 61 2C 20 66 6C  6F 61 74 20 62 29 0D 0A  )♪◙float MAX(float a, float b)♪◙
00003EE0  66 6C 6F 61 74 20 4D 49  4E 33 28 66 6C 6F 61 74  20 61 2C 20 66 6C 6F 61  74 20 62 2C 20 66 6C 6F  float MIN3(float a, float b, flo
00003F00  61 74 20 63 29 0D 0A 66  6C 6F 61 74 20 4D 41 58  33 28 66 6C 6F 61 74 20  61 2C 20 66 6C 6F 61 74  at c)♪◙float MAX3(float a, float
00003F20  20 62 2C 20 66 6C 6F 61  74 20 63 29 0D 0A 66 6C  6F 61 74 20 4D 49 4E 34  28 66 6C 6F 61 74 20 61   b, float c)♪◙float MIN4(float a
00003F40  2C 20 66 6C 6F 61 74 20  62 2C 20 66 6C 6F 61 74  20 63 2C 20 66 6C 6F 61  74 20 64 29 0D 0A 66 6C  , float b, float c, float d)♪◙fl
00003F60  6F 61 74 20 4D 41 58 34  28 66 6C 6F 61 74 20 61  2C 20 66 6C 6F 61 74 20  62 2C 20 66 6C 6F 61 74  oat MAX4(float a, float b, float
00003F80  20 63 2C 20 66 6C 6F 61  74 20 64 29 0D 0A 76 6F  69 64 20 56 65 63 4D 69  6E 28 54 44 41 20 61 2C   c, float d)♪◙void VecMin(TDA a,
00003FA0  20 54 44 41 20 62 2C 20  54 44 41 20 63 29 0D 0A  76 6F 69 64 20 56 65 63  4D 61 78 28 54 44 41 20   TDA b, TDA c)♪◙void VecMax(TDA 
00003FC0  61 2C 20 54 44 41 20 62  2C 20 54 44 41 20 63 29  0D 0A 76 6F 69 64 20 56  65 63 4E 65 67 61 74 65  a, TDA b, TDA c)♪◙void VecNegate
00003FE0  28 54 44 41 20 41 29 0D  0A 76 6F 69 64 20 49 6E  69 74 52 61 6E 64 28 66  6C 6F 61 74 20 53 65 65  (TDA A)♪◙void InitRand(float See
00004000  64 29 0D 0A 69 6E 74 20  52 61 6E 64 49 6E 74 28  57 6F 72 64 20 52 61 6E  67 65 29 0D 0A 66 6C 6F  d)♪◙int RandInt(Word Range)♪◙flo
00004020  61 74 20 52 61 6E 64 28  29 0D 0A 42 79 74 65 20  47 65 74 5F 50 69 78 65  6C 5F 32 28 57 6F 72 64  at Rand()♪◙Byte Get_Pixel_2(Word
00004040  20 78 2C 20 57 6F 72 64  20 79 29 0D 0A 23 69 6E  63 6C 75 64 65 20 22 73  74 64 69 6F 2E 68 22 0D   x, Word y)♪◙#include "stdio.h"♪
00004060  0A 23 69 6E 63 6C 75 64  65 20 22 64 6F 73 2E 68  22 0D 0A 23 69 6E 63 6C  75 64 65 20 22 61 6C 6C  ◙#include "dos.h"♪◙#include "all
00004080  6F 63 2E 68 22 0D 0A 23  69 6E 63 6C 75 64 65 20  22 73 74 72 69 6E 67 2E  68 22 0D 0A 23 69 6E 63  oc.h"♪◙#include "string.h"♪◙#inc
000040A0  6C 75 64 65 20 22 64 65  66 73 2E 68 22 0D 0A 23  69 6E 63 6C 75 64 65 20  22 67 6C 6F 62 61 6C 73  lude "defs.h"♪◙#include "globals
000040C0  2E 68 22 0D 0A 23 69 6E  63 6C 75 64 65 20 22 6D  61 74 68 62 2E 68 22 0D  0A 0D 0A 23 64 65 66 69  .h"♪◙#include "mathb.h"♪◙♪◙#defi
000040E0  6E 65 20 73 74 61 74 65  73 20 33 36 0D 0A 23 64  65 66 69 6E 65 20 6D 61  78 73 74 61 74 65 20 73  ne states 36♪◙#define maxstate s
00004100  74 61 74 65 73 2D 31 0D  0A 0D 0A 74 79 70 65 64  65 66 20 42 79 74 65 20  73 74 61 74 65 5B 33 36  tates-1♪◙♪◙typedef Byte state[36
00004120  5D 3B 0D 0A 74 79 70 65  64 65 66 20 73 74 61 74  65 20 72 75 6C 65 69 3B  0D 0A 74 79 70 65 64 65  ];♪◙typedef state rulei;♪◙typede
00004140  66 20 72 75 6C 65 69 20  72 75 6C 65 5B 33 36 5D  3B 0D 0A 74 79 70 65 64  65 66 20 63 68 61 72 20  f rulei rule[36];♪◙typedef char 
00004160  6E 61 6D 65 5B 33 33 5D  3B 0D 0A 0D 0A 6E 61 6D  65 20 72 75 6C 65 66 69  6C 65 6E 61 6D 65 3B 0D  name[33];♪◙♪◙name rulefilename;♪
00004180  0A 46 49 4C 45 20 2A 72  75 6C 65 66 69 6C 65 3B  0D 0A 72 75 6C 65 20 66  61 72 20 2A 72 75 6C 65  ◙FILE *rulefile;♪◙rule far *rule
000041A0  73 3B 0D 0A 57 6F 72 64  20 69 2C 20 6A 2C 20 6B  3B 0D 0A 69 6E 74 20 78  3B 0D 0A 42 79 74 65 20  s;♪◙Word i, j, k;♪◙int x;♪◙Byte 
000041C0  6F 3B 0D 0A 42 79 74 65  20 72 3B 0D 0A 76 6F 69  64 20 77 72 69 74 65 72  75 6C 65 66 69 6C 65 28  o;♪◙Byte r;♪◙void writerulefile(
000041E0  29 0D 0A 7B 0D 0A 20 20  66 77 72 69 74 65 28 72  75 6C 65 73 2C 20 73 69  7A 65 6F 66 28 72 75 6C  )♪◙{♪◙  fwrite(rules, sizeof(rul
00004200  65 29 2C 20 33 36 2C 20  72 75 6C 65 66 69 6C 65  29 3B 0D 0A 20 20 66 63  6C 6F 73 65 28 72 75 6C  e), 36, rulefile);♪◙  fclose(rul
00004220  65 66 69 6C 65 29 3B 0D  0A 7D 0D 0A 20 20 73 74  72 63 70 79 28 72 75 6C  65 66 69 6C 65 6E 61 6D  efile);♪◙}♪◙  strcpy(rulefilenam
00004240  65 2C 20 22 52 55 4C 45  2E 43 41 22 29 3B 0D 0A  20 20 69 66 28 28 72 75  6C 65 66 69 6C 65 3D 66  e, "RULE.CA");♪◙  if((rulefile=f
00004260  6F 70 65 6E 28 72 75 6C  65 66 69 6C 65 6E 61 6D  65 2C 20 22 77 62 22 29  29 3D 3D 4E 55 4C 4C 29  open(rulefilename, "wb"))==NULL)
00004280  0D 0A 20 20 7B 0D 0A 20  20 20 20 70 72 69 6E 74  66 28 22 63 61 6E 27 74  20 6F 70 65 6E 20 66 69  ♪◙  {♪◙    printf("can't open fi
000042A0  6C 65 2E 5C 6E 22 29 3B  0D 0A 20 20 20 20 65 78  69 74 28 31 29 3B 0D 0A  20 20 7D 0D 0A 20 20 72  le.\n");♪◙    exit(1);♪◙  }♪◙  r
000042C0  75 6C 65 73 3D 66 61 72  63 61 6C 6C 6F 63 28 33  36 2C 20 73 69 7A 65 6F  66 28 72 75 6C 65 29 29  ules=farcalloc(36, sizeof(rule))
000042E0  3B 0D 0A 20 20 69 66 28  72 75 6C 65 73 3D 3D 4E  55 4C 4C 29 0D 0A 20 20  7B 0D 0A 20 20 20 20 70  ;♪◙  if(rules==NULL)♪◙  {♪◙    p
00004300  72 69 6E 74 66 28 22 63  61 6E 27 74 20 67 65 74  20 74 68 65 20 6D 65 6D  21 5C 6E 22 29 3B 0D 0A  rintf("can't get the mem!\n");♪◙
00004320  20 20 20 20 65 78 69 74  28 31 29 3B 0D 0A 20 20  7D 0D 0A 20 20 66 77 72  69 74 65 28 72 75 6C 65      exit(1);♪◙  }♪◙  fwrite(rule
00004340  73 2C 20 73 69 7A 65 6F  66 28 72 75 6C 65 29 2C  20 33 36 2C 20 72 75 6C  65 66 69 6C 65 29 3B 0D  s, sizeof(rule), 36, rulefile);♪
00004360  0A 74 79 70 65 64 65 66  20 73 74 61 74 65 20 72  75 6C 65 69 3B 0D 0A 74  79 70 65 64 65 66 20 72  ◙typedef state rulei;♪◙typedef r
00004380  75 6C 65 69 20 72 75 6C  65 5B 33 36 5D 3B 0D 0A  72 75 6C 65 73 3D 66 61  72 63 61 6C 6C 6F 63 28  ulei rule[36];♪◙rules=farcalloc(
000043A0  33 36 2C 20 73 69 7A 65  6F 66 28 72 75 6C 65 29  29 3B 0D 0A 20 20 69 66  28 72 75 6C 65 73 3D 3D  36, sizeof(rule));♪◙  if(rules==
000043C0  4E 55 4C 4C 29 0D 0A 20  20 7B 0D 0A 20 20 20 20  70 72 69 6E 74 66 28 22  63 61 6E 27 74 20 67 65  NULL)♪◙  {♪◙    printf("can't ge
000043E0  74 20 74 68 65 20 6D 65  6D 21 5C 6E 22 29 3B 0D  0A 20 20 20 20 65 78 69  74 28 31 29 3B 0D 0A 20  t the mem!\n");♪◙    exit(1);♪◙ 
00004400  20 7D 0D 0A 20 20 0D 0A  76 6F 69 64 20 43 6C 65  61 72 5F 53 63 72 65 65  6E 28 29 0D 0A 7B 0D 0A   }♪◙  ♪◙void Clear_Screen()♪◙{♪◙
00004420  20 20 53 65 74 5F 47 72  61 70 68 69 63 73 5F 4D  6F 64 65 28 31 36 30 2C  20 31 30 30 29 3B 0D 0A    Set_Graphics_Mode(160, 100);♪◙
00004440  20 20 49 6E 69 74 5F 50  61 6C 65 74 74 65 28 50  61 6C 41 72 72 61 79 29  3B 0D 0A 20 20 53 65 74    Init_Palette(PalArray);♪◙  Set
00004460  5F 50 61 6C 65 74 74 65  28 50 61 6C 41 72 72 61  79 29 3B 0D 0A 7D 0D 0A  FF FF 00 00              _Palette(PalArray);♪◙}♪◙  ..