==============================================================================================================================================
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 BA 00 06 00 00 00  90 00 64 00 3A 00 0E 00  0E 00 57 4F 52 4C 44 31  44 2E 43 00 01 00 01 00  d.║.♠...É.d.:.♫.♫.WORLD1D.C.☺.☺.
00000040  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 4D 41  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...MA
00000060  54 48 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  THB.C.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.
00000080  01 00 01 00 01 00 00 00  57 4F 52 4C 44 31 44 2E  43 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  ☺.☺.☺...WORLD1D.C.☺.☺.☺.☺.☺.☺.☺.
000000A0  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 00 00 4D 41 54 48  42 2E 43 00 01 00 01 00  ☺.☺.☺.☺.☺.☺.☺.☺.☺...MATHB.C.☺.☺.
000000C0  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 65 00  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...e.
000000E0  AB 00 0E 00 1C 00 89 00  00 00 03 00 07 00 14 00  18 00 21 00 2E 00 43 00  49 00 4F 00 68 00 7B 00  ½.♫.∟.ë...♥.•.¶.↑.!...C.I.O.h.{.
00000100  7F 00 85 00 4F 4C 00 4F  4C 2E 00 2E 2E 5C 4D 4F  44 45 4C 5C 2A 2E 48 00  2A 2E 2A 00 2E 2E 5C 2A  ⌂.à.OL.OL....\MODEL\*.H.*.*...\*
00000120  2E 54 58 54 00 2E 2E 5C  4D 4F 44 45 4C 5C 2A 2E  43 00 43 3A 5C 42 4F 52  4C 41 4E 44 43 5C 43 4C  .TXT...\MODEL\*.C.C:\BORLANDC\CL
00000140  49 42 5C 2A 2E 43 00 2A  2E 49 4E 43 00 2A 2E 54  58 54 00 5C 42 4C 53 43  5C 41 4E 49 4D 41 54 45  IB\*.C.*.INC.*.TXT.\BLSC\ANIMATE
00000160  5C 41 4E 49 4D 41 54 45  34 2E 43 00 5C 42 4C 53  43 5C 53 43 4E 53 43 52  50 54 5C 2A 2E 43 00 2A  \ANIMATE4.C.\BLSC\SCNSCRPT\*.C.*
00000180  2E 48 00 2A 2E 50 41 53  00 2A 2E 43 00 76 00 09  00 01 00 02 00 01 00 00  00 00 78 00 AF 00 0F 00  .H.*.PAS.*.C.v.○.☺.☻.☺....x.».☼.
000001A0  1E 00 8B 00 00 00 09 00  10 00 16 00 1B 00 29 00  33 00 39 00 44 00 52 00  55 00 64 00 6D 00 76 00  ▲.ï...○.►.▬.←.).3.9.D.R.U.d.m.v.
000001C0  84 00 6D 61 78 73 74 61  74 65 00 73 74 61 74 65  73 00 73 74 61 74 65 00  6E 61 6D 65 00 77 6F 72  ä.maxstate.states.state.name.wor
000001E0  6C 64 66 69 6C 65 4E 61  6D 65 00 77 6F 72 6C 64  66 69 6C 65 00 77 6F 72  6C 64 00 63 6C 65 61 72  ldfileName.worldfile.world.clear
00000200  57 6F 72 6C 64 00 64 6F  52 61 6E 64 6F 6D 57 6F  72 6C 64 00 64 6F 00 77  72 69 74 65 57 6F 72 6C  World.doRandomWorld.do.writeWorl
00000220  64 46 69 6C 65 00 77 6F  72 6C 64 74 6F 70 00 57  6F 72 6C 64 74 6F 70 00  44 6F 52 61 6E 44 6F 6D  dFile.worldtop.Worldtop.DoRanDom
00000240  57 6F 72 6C 64 00 52 61  6E 44 6F 6D 00 79 00 A2  00 0F 00 1E 00 7E 00 00  00 08 00 09 00 15 00 1F  World.RanDom.y.ó.☼.▲.~...◘.○.§.▼
00000260  00 28 00 2E 00 33 00 41  00 4B 00 51 00 5C 00 5F  00 6E 00 77 00 52 61 6E  64 49 6E 74 00 00 52 61  .(...3.A.K.Q.\._.n.w.RandInt..Ra
00000280  6E 64 6F 6D 57 6F 72 6C  64 00 4D 61 78 43 6F 6C  75 6D 6E 00 4D 61 78 53  74 61 74 65 00 53 74 61  ndomWorld.MaxColumn.MaxState.Sta
000002A0  74 65 00 4E 61 6D 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  te.Name.WorldFileName.WorldFile.
000002C0  57 6F 72 6C 64 00 43 6C  65 61 72 57 6F 72 6C 64  00 44 6F 00 57 72 69 74  65 57 6F 72 6C 64 46 69  World.ClearWorld.Do.WriteWorldFi
000002E0  6C 65 00 57 6F 72 6C 64  54 6F 70 00 52 61 6E 64  6F 6D 00 7A 00 14 00 02  00 04 00 0A 00 00 00 06  le.WorldTop.Random.z.¶.☻.♦.◙...♠
00000300  00 2A 2E 4F 42 4A 00 2A  2E 43 00 F4 01 1E 05 1E  00 00 19 00 00 0F 05 40  15 0F 05 40 15 04 00 20  .*.OBJ.*.C.⌠☺▲♣▲..↓..☼♣@§☼♣@§♦. 
00000320  20 84 03 00 00 00 00 00  00 00 00 2E 00 12 00 00  19 00 00 00 11 4F 17 00  11 4F 17 02 00 30 0D 4E   ä♥..........↕..↓...◄O↨.◄O↨☻.0♪N
00000340  00 00 19 00 00 02 03 4F  17 00 01 4F 10 00 00 00  00 43 3A 5C 42 4C 53 43  5C 53 43 4E 53 43 52 50  ..↓..☻♥O↨.☺O►....C:\BLSC\SCNSCRP
00000360  54 5C 53 43 4E 53 43 52  2E 43 00 01 00 6D 00 01  00 6D 00 01 00 01 00 01  00 01 00 01 00 01 00 01  T\SCNSCR.C.☺.m.☺.m.☺.☺.☺.☺.☺.☺.☺
00000380  00 01 00 01 00 01 00 01  00 01 00 00 00 50 00 00  19 00 00 01 02 4F 17 00  01 4F 10 00 00 00 00 43  .☺.☺.☺.☺.☺...P..↓..☺☻O↨.☺O►....C
000003A0  3A 5C 42 4C 53 50 5C 42  4F 4F 4B 4D 49 53 43 5C  54 4D 50 5C 52 55 4C 45  2E 43 00 01 00 01 00 01  :\BLSP\BOOKMISC\TMP\RULE.C.☺.☺.☺
000003C0  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 18 00 01  00 18 00 00 00 4F 00 00  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.↑.☺.↑...O..
000003E0  19 00 01 00 01 4F 17 00  01 4F 10 00 00 00 00 43  3A 5C 42 4C 53 43 5C 41  4E 49 4D 41 54 45 5C 4F  ↓.☺.☺O↨.☺O►....C:\BLSC\ANIMATE\O
00000400  4C 42 4C 53 43 2E 54 58  54 00 01 00 B5 00 01 00  B5 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  LBLSC.TXT.☺.╡.☺.╡.☺.☺.☺.☺.☺.☺.☺.
00000420  01 00 01 00 01 00 01 00  01 00 00 00 4E 00 00 19  00 00 02 03 4F 17 00 01  4F 10 00 00 00 00 43 3A  ☺.☺.☺.☺.☺...N..↓..☻♥O↨.☺O►....C:
00000440  5C 42 4C 53 43 5C 53 43  4E 53 43 52 50 54 5C 53  43 4E 53 43 52 2E 43 00  01 00 5B 00 01 00 5B 00  \BLSC\SCNSCRPT\SCNSCR.C.☺.[.☺.[.
00000460  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 43 00 00 19 00 01  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...C..↓.☺
00000480  00 01 4F 17 00 01 4F 10  00 00 00 00 43 3A 5C 57  4F 52 4B 5C 44 43 32 32  2E 43 00 01 00 C2 00 01  .☺O↨.☺O►....C:\WORK\DC22.C.☺.┬.☺
000004A0  00 B3 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 4E 00 00  .│.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...N..
000004C0  19 00 00 01 02 4F 17 00  01 4F 10 00 00 00 00 43  3A 5C 42 4F 52 4C 41 4E  44 43 5C 43 4C 49 42 5C  ↓..☺☻O↨.☺O►....C:\BORLANDC\CLIB\
000004E0  47 52 41 50 48 42 2E 48  00 19 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  GRAPHB.H.↓.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺
00000500  00 01 00 23 00 01 00 23  00 00 00 4E 00 00 19 00  01 00 01 4F 17 00 01 4F  10 00 00 00 00 43 3A 5C  .☺.#.☺.#...N..↓.☺.☺O↨.☺O►....C:\
00000520  42 4F 52 4C 41 4E 44 43  5C 43 4C 49 42 5C 47 52  41 50 48 42 2E 43 00 01  00 71 02 01 00 67 02 01  BORLANDC\CLIB\GRAPHB.C.☺.q☻☺.g☻☺
00000540  00 01 00 01 00 5A 02 03  00 C7 01 01 00 01 00 01  00 71 02 01 00 71 02 00  00 4D 00 00 19 00 00 00  .☺.☺.Z☻♥.╟☺☺.☺.☺.q☻☺.q☻..M..↓...
00000560  01 4F 10 00 01 4F 10 00  00 00 00 43 3A 5C 42 4F  52 4C 41 4E 44 43 5C 43  4C 49 42 5C 4D 41 54 48  ☺O►.☺O►....C:\BORLANDC\CLIB\MATH
00000580  42 2E 48 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.H.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.
000005A0  01 00 01 00 00 00 56 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  ☺.☺...V..↓..☺☻O↨.☺O►....C:\BLSP\
000005C0  42 4F 4F 4B 4D 49 53 43  5C 54 4D 50 5C 53 49 45  52 52 55 4C 45 2E 50 41  53 00 01 00 5F 00 01 00  BOOKMISC\TMP\SIERRULE.PAS.☺._.☺.
000005E0  52 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 50 00 00 19  R.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...P..↓
00000600  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 4B 4D 49 53 43 5C 54  ..☺☻O↨.☺O►....C:\BLSP\BOOKMISC\T
00000620  4D 50 5C 52 55 4C 45 2E  43 00 01 00 39 00 01 00  26 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  MP\RULE.C.☺.9.☺.&.☺.☺.☺.☺.☺.☺.☺.
00000640  01 00 01 00 39 00 01 00  39 00 00 00 54 00 00 19  00 01 00 01 4F 17 00 01  4F 10 00 00 00 00 43 3A  ☺.☺.9.☺.9...T..↓.☺.☺O↨.☺O►....C:
00000660  5C 42 4C 53 50 5C 42 4F  4F 4B 4D 49 53 43 5C 54  4D 50 5C 53 49 45 52 52  55 4C 45 2E 43 00 02 00  \BLSP\BOOKMISC\TMP\SIERRULE.C.☻.
00000680  6D 00 01 00 59 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 03 00  2E 00 03 00 2E 00 00 00  m.☺.Y.☺.☺.☺.☺.☺.☺.☺.☺.♥...♥.....
000006A0  53 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 4B 4D 49  S..↓..☺☻O↨.☺O►....C:\BLSP\BOOKMI
000006C0  53 43 5C 54 4D 50 5C 57  4F 52 4C 44 2E 50 41 53  00 01 00 14 00 01 00 01  00 01 00 01 00 01 00 01  SC\TMP\WORLD.PAS.☺.¶.☺.☺.☺.☺.☺.☺
000006E0  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 00 00 50 00 00 19 00  00 01 02 4F 17 00 01 4F  .☺.☺.☺.☺.☺.☺.☺.☺...P..↓..☺☻O↨.☺O
00000700  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 52 55 4C 45 2E 43  ►....C:\BLSP\BOOKMISC\TMP\RULE.C
00000720  00 01 00 28 00 01 00 1D  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 28 00 01 00 28  .☺.(.☺.↔.☺.☺.☺.☺.☺.☺.☺.☺.☺.(.☺.(
00000740  00 00 00 34 00 01 19 00  01 00 01 4F 17 00 01 4F  10 00 00 00 00 01 00 44  02 01 00 3B 02 00 00 00  ...4.☺↓.☺.☺O↨.☺O►....☺.D☻☺.;☻...
00000760  00 00 00 00 00 00 00 00  00 00 00 00 00 01 00 3D  02 01 00 44 02 00 00 51  00 00 19 00 01 00 01 4F  .............☺.=☻☺.D☻..Q..↓.☺.☺O
00000780  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 57 4F  ↨.☺O►....C:\BLSP\BOOKMISC\TMP\WO
000007A0  52 4C 44 2E 43 00 01 00  01 00 01 00 3A 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  RLD.C.☺.☺.☺.:.☺.☺.☺.☺.☺.☺.☺.☺.☺.
000007C0  0D 00 01 00 0D 00 00 00  12 00 00 19 00 00 00 11  4F 17 00 11 4F 17 08 00  00 00 53 00 00 19 00 01  ♪.☺.♪...↕..↓...◄O↨.◄O↨◘...S..↓.☺
000007E0  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
00000800  5C 57 4F 52 4C 44 31 44  2E 43 00 20 00 3E 00 01  00 30 00 01 00 01 00 01  00 01 00 01 00 01 00 01  \WORLD1D.C. .>.☺.0.☺.☺.☺.☺.☺.☺.☺
00000820  00 01 00 01 00 01 00 01  00 01 00 00 00 F6 01 43  3B 4D 41 54 45 52 49 41  4C 0D 0A 20 20 20 54 59  .☺.☺.☺.☺.☺...÷☺C;MATERIAL♪◙   TY
00000840  50 45 20 20 20 20 3D 20  4D 49 52 52 4F 52 0D 0A  20 20 20 54 45 58 54 55  52 45 20 3D 20 53 4D 4F  PE    = MIRROR♪◙   TEXTURE = SMO
00000860  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 20 20 20 30 2E  OTH♪◙   AMBRFL  =    0.000    0.
00000880  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 20 20 20 30 2E  000    0.000♪◙   DIFRFL  =    0.
000008A0  37 30 30 20 20 20 20 30  2E 37 30 30 20 20 20 20  30 2E 37 30 30 0D 0A 20  20 20 53 50 43 52 46 4C  700    0.700    0.700♪◙   SPCRFL
000008C0  20 20 3D 20 20 20 20 30  2E 33 30 30 20 20 20 20  30 2E 33 30 30 20 20 20  20 30 2E 33 30 30 0D 0A    =    0.300    0.300    0.300♪◙
000008E0  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 54 45 52 49 41     GLOSS   =   50.000♪◙♪◙MATERIA
00000900  4C 0D 0A 20 20 20 54 59  50 45 20 20 20 20 3D 20  52 45 44 4D 49 52 52 4F  52 0D 0A 20 20 20 54 45  L♪◙   TYPE    = REDMIRROR♪◙   TE
00000920  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 20 20  XTURE = SMOOTH♪◙   AMBRFL  =    
00000940  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 46 52  0.000    0.000    0.000♪◙   DIFR
00000960  46 4C 20 20 3D 20 20 20  20 30 2E 37 30 30 20 20  20 20 30 2E 30 30 30 20  20 20 20 30 2E 30 30 30  FL  =    0.700    0.000    0.000
00000980  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 30 30 30  ♪◙   SPCRFL  =    0.300    0.000
000009A0  20 20 20 20 30 2E 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      0.000♪◙   GLOSS   =   50.000
000009C0  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 47 52 45 45 4E  ♪◙♪◙MATERIAL♪◙   TYPE    = GREEN
000009E0  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♪◙   
00000A00  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
00000A20  2E 30 30 30 0D 0A 20 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  .000♪◙   DIFRFL  =    0.000    0
00000A40  2E 37 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  .700    0.000♪◙   SPCRFL  =    0
00000A60  2E 30 30 30 20 20 20 20  30 2E 33 30 30 20 20 20  20 30 2E 30 30 30 0D 0A  20 20 20 47 4C 4F 53 53  .000    0.300    0.000♪◙   GLOSS
00000A80  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
00000AA0  50 45 20 20 20 20 3D 20  42 4C 55 45 4D 49 52 52  4F 52 0D 0A 20 20 20 54  45 58 54 55 52 45 20 3D  PE    = BLUEMIRROR♪◙   TEXTURE =
00000AC0  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 20   SMOOTH♪◙   AMBRFL  =    0.000  
00000AE0  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 20    0.000    0.000♪◙   DIFRFL  =  
00000B00  20 20 30 2E 30 30 30 20  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 37 30  30 0D 0A 20 20 20 53 50    0.000    0.000    0.700♪◙   SP
00000B20  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 2E 33  CRFL  =    0.000    0.000    0.3
00000B40  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 4D 41 54 45 52  00♪◙   GLOSS   =   50.000♪◙MATER
00000B60  49 41 4C 0D 0A 20 20 20  54 59 50 45 20 20 20 20  3D 20 43 48 52 4F 4D 45  0D 0A 20 20 20 54 45 58  IAL♪◙   TYPE    = CHROME♪◙   TEX
00000B80  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 20 20 30  TURE = SMOOTH♪◙   AMBRFL  =    0
00000BA0  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 46  .100    0.100    0.100♪◙   DIFRF
00000BC0  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 31 30 30 0D  L  =    0.100    0.100    0.100♪
00000BE0  0A 20 20 20 53 50 43 52  46 4C 20 20 3D 20 20 20  20 30 2E 38 30 30 20 20  20 20 30 2E 38 30 30 20  ◙   SPCRFL  =    0.800    0.800 
00000C00  20 20 20 30 2E 38 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     0.800♪◙   GLOSS   =   40.000♪
00000C20  0A 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 42 52 41 53  ◙♪◙♪◙MATERIAL♪◙   TYPE    = BRAS
00000C40  53 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 4D 42 52 46  S♪◙   TEXTURE = SMOOTH♪◙   AMBRF
00000C60  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 31 30 30 0D  L  =    0.100    0.100    0.100♪
00000C80  0A 20 20 20 44 49 46 52  46 4C 20 20 3D 20 20 20  20 30 2E 33 30 30 20 20  20 20 30 2E 33 30 30 20  ◙   DIFRFL  =    0.300    0.300 
00000CA0  20 20 20 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 36 30 30 20     0.300♪◙   SPCRFL  =    0.600 
00000CC0  20 20 20 30 2E 35 30 30  20 20 20 20 30 2E 32 35  30 0D 0A 20 20 20 47 4C  4F 53 53 20 20 20 3D 20     0.500    0.250♪◙   GLOSS   = 
00000CE0  20 20 33 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    30.000♪◙MATERIAL♪◙   TYPE    =
00000D00  20 57 41 54 45 52 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   WATER♪◙   TEXTURE = GRIT♪◙   AM
00000D20  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 33  BRFL  =    0.100    0.100    0.3
00000D40  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 33  00♪◙   DIFRFL  =    0.100    0.3
00000D60  30 30 20 20 20 20 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  00    0.300♪◙   SPCRFL  =    0.1
00000D80  30 30 20 20 20 20 30 2E  31 30 30 20 20 20 20 30  2E 34 30 30 0D 0A 20 20  20 47 4C 4F 53 53 20 20  00    0.100    0.400♪◙   GLOSS  
00000DA0  20 3D 20 20 20 20 33 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   =    3.000♪◙MATERIAL♪◙   TYPE  
00000DC0  20 20 3D 20 50 4C 41 53  54 49 43 54 49 4C 45 0D  0A 20 20 20 54 45 58 54  55 52 45 20 3D 20 43 48    = PLASTICTILE♪◙   TEXTURE = CH
00000DE0  45 43 4B 45 52 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  ECKER♪◙   AMBRFL  =    0.100    
00000E00  30 2E 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  0.100    0.100♪◙   DIFRFL  =    
00000E20  30 2E 37 30 30 20 20 20  20 30 2E 37 30 30 20 20  20 20 30 2E 37 30 30 0D  0A 20 20 20 53 50 43 52  0.700    0.700    0.700♪◙   SPCR
00000E40  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 20 20 30 2E 32 30 30  FL  =    0.200    0.200    0.200
00000E60  0D 0A 20 20 20 47 4C 4F  53 53 20 20 20 3D 20 20  20 20 34 2E 30 30 30 0D  0A 0D 0A 43 48 45 43 4B  ♪◙   GLOSS   =    4.000♪◙♪◙CHECK
00000E80  0D 0A 20 20 20 54 49 4C  45 31 20 20 20 3D 20 20  20 20 31 2E 30 30 30 20  20 20 20 30 2E 30 30 30  ♪◙   TILE1   =    1.000    0.000
00000EA0  20 20 20 20 30 2E 30 30  30 0D 0A 20 20 20 54 49  4C 45 32 20 20 20 3D 20  20 20 20 30 2E 32 30 30      0.000♪◙   TILE2   =    0.200
00000EC0  20 20 20 20 30 2E 32 30  30 20 20 20 20 30 2E 32  30 30 0D 0A 20 20 20 54  49 4C 45 20 20 20 20 3D      0.200    0.200♪◙   TILE    =
00000EE0  20 20 20 20 30 2E 30 32  0D 0A 4D 41 54 45 52 49  41 4C 0D 0A 20 20 20 54  59 50 45 20 20 20 20 3D      0.02♪◙MATERIAL♪◙   TYPE    =
00000F00  20 49 54 41 4C 49 41 4E  4D 41 52 42 4C 45 0D 0A  20 20 20 54 45 58 54 55  52 45 20 3D 20 57 4F 4F   ITALIANMARBLE♪◙   TEXTURE = WOO
00000F20  44 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 31 30  D♪◙   AMBRFL  =    0.100    0.10
00000F40  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 37 30  0    0.100♪◙   DIFRFL  =    0.70
00000F60  30 20 20 20 20 30 2E 37  30 30 20 20 20 20 30 2E  37 30 30 0D 0A 20 20 20  53 50 43 52 46 4C 20 20  0    0.700    0.700♪◙   SPCRFL  
00000F80  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♪◙  
00000FA0  20 47 4C 4F 53 53 20 20  20 3D 20 20 20 31 30 2E  30 30 30 0D 0A 4D 41 54  45 52 49 41 4C 0D 0A 20   GLOSS   =   10.000♪◙MATERIAL♪◙ 
00000FC0  20 20 54 59 50 45 20 20  20 20 3D 20 4F 41 4B 57  4F 4F 44 0D 0A 20 20 20  54 45 58 54 55 52 45 20    TYPE    = OAKWOOD♪◙   TEXTURE 
00000FE0  3D 20 57 4F 4F 44 0D 0A  20 20 20 41 4D 42 52 46  4C 20 20 3D 20 20 20 20  30 2E 32 30 30 20 20 20  = WOOD♪◙   AMBRFL  =    0.200   
00001000  20 30 2E 32 30 30 20 20  20 20 30 2E 32 30 30 0D  0A 20 20 20 44 49 46 52  46 4C 20 20 3D 20 20 20   0.200    0.200♪◙   DIFRFL  =   
00001020  20 30 2E 37 30 30 20 20  20 20 30 2E 34 30 30 20  20 20 20 30 2E 33 30 30  0D 0A 20 20 20 53 50 43   0.700    0.400    0.300♪◙   SPC
00001040  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 31 30  RFL  =    0.100    0.100    0.10
00001060  30 0D 0A 20 20 20 47 4C  4F 53 53 20 20 20 3D 20  20 20 20 35 2E 30 30 30  0D 0A 4D 41 54 45 52 49  0♪◙   GLOSS   =    5.000♪◙MATERI
00001080  41 4C 0D 0A 20 20 20 54  59 50 45 20 20 20 20 3D  20 47 52 41 53 53 0D 0A  20 20 20 54 45 58 54 55  AL♪◙   TYPE    = GRASS♪◙   TEXTU
000010A0  52 45 20 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 32 30 30  RE = GRIT♪◙   AMBRFL  =    0.200
000010C0  20 20 20 20 30 2E 32 30  30 20 20 20 20 30 2E 32  30 30 0D 0A 20 20 20 44  49 46 52 46 4C 20 20 3D      0.200    0.200♪◙   DIFRFL  =
000010E0  20 20 20 20 30 2E 36 30  30 20 20 20 20 30 2E 38  30 30 20 20 20 20 30 2E  32 35 30 0D 0A 20 20 20      0.600    0.800    0.250♪◙   
00001100  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
00001120  2E 30 30 30 0D 0A 20 20  20 47 4C 4F 53 53 20 20  20 3D 20 20 20 20 30 2E  30 30 30 0D 0A 0D 0A 0D  .000♪◙   GLOSS   =    0.000♪◙♪◙♪
00001140  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 45 4D 45 4E 54 0D 0A  ◙MATERIAL♪◙   TYPE    = CEMENT♪◙
00001160  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 4C 20 20 3D 20     TEXTURE = GRIT♪◙   AMBRFL  = 
00001180  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 20 44     0.200    0.200    0.200♪◙   D
000011A0  49 46 52 46 4C 20 20 3D  20 20 20 20 30 2E 38 30  30 20 20 20 20 30 2E 38  30 30 20 20 20 20 30 2E  IFRFL  =    0.800    0.800    0.
000011C0  38 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 20 30 2E  800♪◙   SPCRFL  =    0.000    0.
000011E0  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 20 20 20 30 2E  000    0.000♪◙   GLOSS   =    0.
00001200  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 42 4C 41 43  000♪◙MATERIAL♪◙   TYPE    = BLAC
00001220  4B 43 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  KCHROME♪◙   TEXTURE = SMOOTH♪◙  
00001240  20 41 4D 42 52 46 4C 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   AMBRFL  =    1.000    1.000    
00001260  31 2E 30 30 30 0D 0A 20  20 20 44 49 46 52 46 4C  20 20 3D 20 20 20 20 30  2E 30 30 30 20 20 20 20  1.000♪◙   DIFRFL  =    0.000    
00001280  30 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  0.000    0.000♪◙   SPCRFL  =    
000012A0  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 4F 53  0.000    0.000    0.000♪◙   GLOS
000012C0  53 20 20 20 3D 20 20 20  34 30 2E 30 30 30 0D 0A  50 59 52 41 4D 49 44 0D  0A 20 20 20 4C 4F 43 20  S   =   40.000♪◙PYRAMID♪◙   LOC 
000012E0  20 20 20 20 3D 20 2D 32  30 30 2E 30 30 30 20 39  39 39 39 2E 30 30 30 20  20 20 20 30 2E 30 30 30      = -200.000 9999.000    0.000
00001300  0D 0A 20 20 20 56 31 20  20 20 20 20 20 3D 20 20  34 30 30 2E 30 30 30 20  20 20 20 30 2E 30 30 30  ♪◙   V1      =  400.000    0.000
00001320  20 20 20 20 30 2E 30 30  30 0D 0A 20 20 20 56 32  20 20 20 20 20 20 3D 20  20 20 20 30 2E 30 30 30      0.000♪◙   V2      =    0.000
00001340  20 20 34 30 30 2E 30 30  30 20 20 20 20 30 2E 30  30 30 0D 0A 20 20 20 48  45 49 47 48 54 20 20 3D    400.000    0.000♪◙   HEIGHT  =
00001360  20 31 32 30 30 2E 30 30  30 0D 0A 20 20 20 4D 41  54 4C 20 20 20 20 3D 20  42 4C 41 43 4B 43 48 52   1200.000♪◙   MATL    = BLACKCHR
00001380  4F 4D 45 0D 0A 4C 41 4D  50 0D 0A 20 20 20 4C 4F  43 20 20 20 20 20 3D 20  31 30 30 30 2E 30 30 30  OME♪◙LAMP♪◙   LOC     = 1000.000
000013A0  20 2D 39 39 39 2E 30 30  30 20 31 30 30 30 2E 30  30 30 0D 0A 20 20 20 52  41 44 49 55 53 20 20 3D   -999.000 1000.000♪◙   RADIUS  =
000013C0  20 20 37 30 30 2E 30 30  30 0D 0A 20 20 20 49 4E  54 45 4E 53 20 20 3D 20  20 20 20 31 2E 30 30 30    700.000♪◙   INTENS  =    1.000
000013E0  20 20 20 20 31 2E 30 30  30 20 20 20 20 30 2E 39  30 30 0D 0A 09 09 61 71  75 61 6D 61 72 69 6E 65      1.000    0.900♪◙○○aquamarine
00001400  20 20 20 20 20 20 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 35             0.439216 0.858824 0.5
00001420  37 36 34 37 31 0D 0A 09  09 62 6C 61 63 6B 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  76471♪◙○○black                0.
00001440  30 30 30 30 30 30 20 30  2E 30 30 30 30 30 30 20  30 2E 30 30 30 30 30 30  0D 0A 09 09 62 6C 75 65  000000 0.000000 0.000000♪◙○○blue
00001460  20 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 30 2E 30 30 30 30                   0.000000 0.0000
00001480  30 30 20 31 2E 30 30 30  30 30 30 0D 0A 09 09 62  6C 75 65 5F 76 69 6F 6C  65 74 20 20 20 20 20 20  00 1.000000♪◙○○blue_violet      
000014A0  20 20 20 20 30 2E 36 32  33 35 32 39 20 30 2E 33  37 32 35 34 39 20 30 2E  36 32 33 35 32 39 0D 0A      0.623529 0.372549 0.623529♪◙
000014C0  09 09 62 72 6F 77 6E 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 30  2E 36 34 37 30 35 39 20  ○○brown                0.647059 
000014E0  30 2E 31 36 34 37 30 36  20 30 2E 31 36 34 37 30  36 0D 0A 09 09 63 61 64  65 74 5F 62 6C 75 65 20  0.164706 0.164706♪◙○○cadet_blue 
00001500  20 20 20 20 20 20 20 20  20 20 30 2E 33 37 32 35  34 39 20 30 2E 36 32 33  35 32 39 20 30 2E 36 32            0.372549 0.623529 0.62
00001520  33 35 32 39 0D 0A 09 09  63 6F 72 61 6C 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 31 2E 30  3529♪◙○○coral                1.0
00001540  30 30 30 30 30 20 30 2E  34 39 38 30 33 39 20 30  2E 30 30 30 30 30 30 0D  0A 09 09 63 6F 72 6E 66  00000 0.498039 0.000000♪◙○○cornf
00001560  6C 6F 77 65 72 5F 62 6C  75 65 20 20 20 20 20 20  30 2E 32 35 38 38 32 34  20 30 2E 32 35 38 38 32  lower_blue      0.258824 0.25882
00001580  34 20 30 2E 34 33 35 32  39 34 0D 0A 09 09 63 79  61 6E 20 20 20 20 20 20  20 20 20 20 20 20 20 20  4 0.435294♪◙○○cyan              
000015A0  20 20 20 30 2E 30 30 30  30 30 30 20 31 2E 30 30  30 30 30 30 20 31 2E 30  30 30 30 30 30 0D 0A 09     0.000000 1.000000 1.000000♪◙○
000015C0  09 64 61 72 6B 5F 67 72  65 65 6E 20 20 20 20 20  20 20 20 20 20 20 30 2E  31 38 34 33 31 34 20 30  ○dark_green           0.184314 0
000015E0  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 6C 69 76 65 5F 67  .309804 0.184314♪◙○○dark_olive_g
00001600  72 65 65 6E 20 20 20 20  20 30 2E 33 30 39 38 30  34 20 30 2E 33 30 39 38  30 34 20 30 2E 31 38 34  reen     0.309804 0.309804 0.184
00001620  33 31 34 0D 0A 09 09 64  61 72 6B 5F 6F 72 63 68  69 64 20 20 20 20 20 20  20 20 20 20 30 2E 36 30  314♪◙○○dark_orchid          0.60
00001640  30 30 30 30 20 30 2E 31  39 36 30 37 38 20 30 2E  38 30 30 30 30 30 0D 0A  09 09 64 61 72 6B 5F 73  0000 0.196078 0.800000♪◙○○dark_s
00001660  6C 61 74 65 5F 62 6C 75  65 20 20 20 20 20 20 30  2E 34 31 39 36 30 38 20  30 2E 31 33 37 32 35 35  late_blue      0.419608 0.137255
00001680  20 30 2E 35 35 36 38 36  33 0D 0A 09 09 64 61 72  6B 5F 73 6C 61 74 65 5F  67 72 61 79 20 20 20 20   0.556863♪◙○○dark_slate_gray    
000016A0  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♪◙○○
000016C0  64 61 72 6B 5F 73 6C 61  74 65 5F 67 72 65 79 20  20 20 20 20 20 30 2E 31  38 34 33 31 34 20 30 2E  dark_slate_grey      0.184314 0.
000016E0  33 30 39 38 30 34 20 30  2E 33 30 39 38 30 34 0D  0A 09 09 64 61 72 6B 5F  74 75 72 71 75 6F 69 73  309804 0.309804♪◙○○dark_turquois
00001700  65 20 20 20 20 20 20 20  30 2E 34 33 39 32 31 36  20 30 2E 35 37 36 34 37  31 20 30 2E 38 35 38 38  e       0.439216 0.576471 0.8588
00001720  32 34 0D 0A 09 09 64 69  6D 5F 67 72 61 79 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 33 32 39  24♪◙○○dim_gray             0.329
00001740  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 64 69 6D 5F 67 72 65  412 0.329412 0.329412♪◙○○dim_gre
00001760  79 20 20 20 20 20 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  y             0.329412 0.329412 
00001780  30 2E 33 32 39 34 31 32  0D 0A 09 09 66 69 72 65  62 72 69 63 6B 20 20 20  20 20 20 20 20 20 20 20  0.329412♪◙○○firebrick           
000017A0  20 30 2E 35 35 36 38 36  33 20 30 2E 31 33 37 32  35 35 20 30 2E 31 33 37  32 35 35 0D 0A 09 09 66   0.556863 0.137255 0.137255♪◙○○f
000017C0  6F 72 65 73 74 5F 67 72  65 65 6E 20 20 20 20 20  20 20 20 20 30 2E 31 33  37 32 35 35 20 30 2E 35  orest_green         0.137255 0.5
000017E0  35 36 38 36 33 20 30 2E  31 33 37 32 35 35 0D 0A  09 09 67 6F 6C 64 20 20  20 20 20 20 20 20 20 20  56863 0.137255♪◙○○gold          
00001800  20 20 20 20 20 20 20 30  2E 38 30 30 30 30 30 20  30 2E 34 39 38 30 33 39  20 30 2E 31 39 36 30 37         0.800000 0.498039 0.19607
00001820  38 0D 0A 09 09 67 6F 6C  64 65 6E 72 6F 64 20 20  20 20 20 20 20 20 20 20  20 20 30 2E 38 35 38 38  8♪◙○○goldenrod            0.8588
00001840  32 34 20 30 2E 38 35 38  38 32 34 20 30 2E 34 33  39 32 31 36 0D 0A 09 09  67 72 61 79 20 20 20 20  24 0.858824 0.439216♪◙○○gray    
00001860  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 32 39 34 31 20 30               0.752941 0.752941 0
00001880  2E 37 35 32 39 34 31 0D  0A 09 09 67 72 65 65 6E  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  .752941♪◙○○green                
000018A0  30 2E 30 30 30 30 30 30  20 31 2E 30 30 30 30 30  30 20 30 2E 30 30 30 30  30 30 0D 0A 09 09 67 72  0.000000 1.000000 0.000000♪◙○○gr
000018C0  65 65 6E 5F 79 65 6C 6C  6F 77 20 20 20 20 20 20  20 20 20 30 2E 35 37 36  34 37 31 20 30 2E 38 35  een_yellow         0.576471 0.85
000018E0  38 38 32 34 20 30 2E 34  33 39 32 31 36 0D 0A 09  09 67 72 65 79 20 20 20  20 20 20 20 20 20 20 20  8824 0.439216♪◙○○grey           
00001900  20 20 20 20 20 20 30 2E  37 35 32 39 34 31 20 30  2E 37 35 32 39 34 31 20  30 2E 37 35 32 39 34 31        0.752941 0.752941 0.752941
00001920  0D 0A 09 09 69 6E 64 69  61 6E 5F 72 65 64 20 20  20 20 20 20 20 20 20 20  20 30 2E 33 30 39 38 30  ♪◙○○indian_red           0.30980
00001940  34 20 30 2E 31 38 34 33  31 34 20 30 2E 31 38 34  33 31 34 0D 0A 09 09 6B  68 61 6B 69 20 20 20 20  4 0.184314 0.184314♪◙○○khaki    
00001960  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 36 32  33 35 32 39 20 30 2E 36  32 33 35 32 39 20 30 2E              0.623529 0.623529 0.
00001980  33 37 32 35 34 39 0D 0A  09 09 6C 69 67 68 74 5F  62 6C 75 65 20 20 20 20  20 20 20 20 20 20 20 30  372549♪◙○○light_blue           0
000019A0  2E 37 34 39 30 32 30 20  30 2E 38 34 37 30 35 39  20 30 2E 38 34 37 30 35  39 0D 0A 09 09 6C 69 67  .749020 0.847059 0.847059♪◙○○lig
000019C0  68 74 5F 67 72 61 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_gray           0.658824 0.658
000019E0  38 32 34 20 30 2E 36 35  38 38 32 34 0D 0A 09 09  6C 69 67 68 74 5F 67 72  65 79 20 20 20 20 20 20  824 0.658824♪◙○○light_grey      
00001A00  20 20 20 20 20 30 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       0.658824 0.658824 0.658824♪
00001A20  0A 09 09 6C 69 67 68 74  5F 73 74 65 65 6C 5F 62  6C 75 65 20 20 20 20 20  30 2E 35 36 30 37 38 34  ◙○○light_steel_blue     0.560784
00001A40  20 30 2E 35 36 30 37 38  34 20 30 2E 37 33 37 32  35 35 0D 0A 09 09 6C 69  6D 65 5F 67 72 65 65 6E   0.560784 0.737255♪◙○○lime_green
00001A60  20 20 20 20 20 20 20 20  20 20 20 30 2E 31 39 36  30 37 38 20 30 2E 38 30  30 30 30 30 20 30 2E 31             0.196078 0.800000 0.1
00001A80  39 36 30 37 38 0D 0A 09  09 6D 61 67 65 6E 74 61  20 20 20 20 20 20 20 20  20 20 20 20 20 20 31 2E  96078♪◙○○magenta              1.
00001AA0  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 6D 61 72 6F  000000 0.000000 1.000000♪◙○○maro
00001AC0  6F 6E 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 31 33 37 32  on               0.556863 0.1372
00001AE0  35 35 20 30 2E 34 31 39  36 30 38 0D 0A 09 09 6D  65 64 69 75 6D 5F 61 71  75 61 6D 61 72 69 6E 65  55 0.419608♪◙○○medium_aquamarine
00001B00  20 20 20 20 30 2E 31 39  36 30 37 38 20 30 2E 38  30 30 30 30 30 20 30 2E  36 30 30 30 30 30 0D 0A      0.196078 0.800000 0.600000♪◙
00001B20  09 09 6D 65 64 69 75 6D  5F 62 6C 75 65 20 20 20  20 20 20 20 20 20 20 30  2E 31 39 36 30 37 38 20  ○○medium_blue          0.196078 
00001B40  30 2E 31 39 36 30 37 38  20 30 2E 38 30 30 30 30  30 0D 0A 09 09 6D 65 64  69 75 6D 5F 66 6F 72 65  0.196078 0.800000♪◙○○medium_fore
00001B60  73 74 5F 67 72 65 65 6E  20 20 30 2E 34 31 39 36  30 38 20 30 2E 35 35 36  38 36 33 20 30 2E 31 33  st_green  0.419608 0.556863 0.13
00001B80  37 32 35 35 0D 0A 09 09  6D 65 64 69 75 6D 5F 67  6F 6C 64 65 6E 72 6F 64  20 20 20 20 20 30 2E 39  7255♪◙○○medium_goldenrod     0.9
00001BA0  31 37 36 34 37 20 30 2E  39 31 37 36 34 37 20 30  2E 36 37 38 34 33 31 0D  0A 09 09 6D 65 64 69 75  17647 0.917647 0.678431♪◙○○mediu
00001BC0  6D 5F 6F 72 63 68 69 64  20 20 20 20 20 20 20 20  30 2E 35 37 36 34 37 31  20 30 2E 34 33 39 32 31  m_orchid        0.576471 0.43921
00001BE0  36 20 30 2E 38 35 38 38  32 34 0D 0A 09 09 6D 65  64 69 75 6D 5F 73 65 61  5F 67 72 65 65 6E 20 20  6 0.858824♪◙○○medium_sea_green  
00001C00  20 20 20 30 2E 32 35 38  38 32 34 20 30 2E 34 33  35 32 39 34 20 30 2E 32  35 38 38 32 34 0D 0A 09     0.258824 0.435294 0.258824♪◙○
00001C20  09 6D 65 64 69 75 6D 5F  73 6C 61 74 65 5F 62 6C  75 65 20 20 20 20 30 2E  34 39 38 30 33 39 20 30  ○medium_slate_blue    0.498039 0
00001C40  2E 30 30 30 30 30 30 20  31 2E 30 30 30 30 30 30  0D 0A 09 09 6D 65 64 69  75 6D 5F 73 70 72 69 6E  .000000 1.000000♪◙○○medium_sprin
00001C60  67 5F 67 72 65 65 6E 20  20 30 2E 34 39 38 30 33  39 20 31 2E 30 30 30 30  30 30 20 30 2E 30 30 30  g_green  0.498039 1.000000 0.000
00001C80  30 30 30 0D 0A 09 09 6D  65 64 69 75 6D 5F 74 75  72 71 75 6F 69 73 65 20  20 20 20 20 30 2E 34 33  000♪◙○○medium_turquoise     0.43
00001CA0  39 32 31 36 20 30 2E 38  35 38 38 32 34 20 30 2E  38 35 38 38 32 34 0D 0A  09 09 6D 65 64 69 75 6D  9216 0.858824 0.858824♪◙○○medium
00001CC0  5F 76 69 6F 6C 65 74 5F  72 65 64 20 20 20 20 30  2E 38 35 38 38 32 34 20  30 2E 34 33 39 32 31 36  _violet_red    0.858824 0.439216
00001CE0  20 30 2E 35 37 36 34 37  31 0D 0A 09 09 6D 69 64  6E 69 67 68 74 5F 62 6C  75 65 20 20 20 20 20 20   0.576471♪◙○○midnight_blue      
00001D00  20 20 30 2E 31 38 34 33  31 34 20 30 2E 31 38 34  33 31 34 20 30 2E 33 30  39 38 30 34 0D 0A 09 09    0.184314 0.184314 0.309804♪◙○○
00001D20  6E 61 76 79 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 31  33 37 32 35 35 20 30 2E  navy                 0.137255 0.
00001D40  31 33 37 32 35 35 20 30  2E 35 35 36 38 36 33 0D  0A 09 09 6E 61 76 79 5F  62 6C 75 65 20 20 20 20  137255 0.556863♪◙○○navy_blue    
00001D60  20 20 20 20 20 20 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          0.137255 0.137255 0.5568
00001D80  36 33 0D 0A 09 09 6F 72  61 6E 67 65 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 38 30 30  63♪◙○○orange               0.800
00001DA0  30 30 30 20 30 2E 31 39  36 30 37 38 20 30 2E 31  39 36 30 37 38 0D 0A 09  09 6F 72 61 6E 67 65 5F  000 0.196078 0.196078♪◙○○orange_
00001DC0  72 65 64 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  red           1.000000 0.000000 
00001DE0  30 2E 34 39 38 30 33 39  0D 0A 09 09 6F 72 63 68  69 64 20 20 20 20 20 20  20 20 20 20 20 20 20 20  0.498039♪◙○○orchid              
00001E00  20 30 2E 38 35 38 38 32  34 20 30 2E 34 33 39 32  31 36 20 30 2E 38 35 38  38 32 34 0D 0A 09 09 70   0.858824 0.439216 0.858824♪◙○○p
00001E20  61 6C 65 5F 67 72 65 65  6E 20 20 20 20 20 20 20  20 20 20 20 30 2E 35 36  30 37 38 34 20 30 2E 37  ale_green           0.560784 0.7
00001E40  33 37 32 35 35 20 30 2E  35 36 30 37 38 34 0D 0A  09 09 70 69 6E 6B 20 20  20 20 20 20 20 20 20 20  37255 0.560784♪◙○○pink          
00001E60  20 20 20 20 20 20 20 30  2E 37 33 37 32 35 35 20  30 2E 35 36 30 37 38 34  20 30 2E 35 36 30 37 38         0.737255 0.560784 0.56078
00001E80  34 0D 0A 09 09 70 6C 75  6D 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 30 2E 39 31 37 36  4♪◙○○plum                 0.9176
00001EA0  34 37 20 30 2E 36 37 38  34 33 31 20 30 2E 39 31  37 36 34 37 0D 0A 09 09  72 65 64 20 20 20 20 20  47 0.678431 0.917647♪◙○○red     
00001EC0  20 20 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 30               1.000000 0.000000 0
00001EE0  2E 30 30 30 30 30 30 0D  0A 09 09 73 61 6C 6D 6F  6E 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  .000000♪◙○○salmon               
00001F00  30 2E 34 33 35 32 39 34  20 30 2E 32 35 38 38 32  34 20 30 2E 32 35 38 38  32 34 0D 0A 09 09 73 65  0.435294 0.258824 0.258824♪◙○○se
00001F20  61 5F 67 72 65 65 6E 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 31 33 37  32 35 35 20 30 2E 35 35  a_green            0.137255 0.55
00001F40  36 38 36 33 20 30 2E 34  31 39 36 30 38 0D 0A 09  09 73 69 65 6E 6E 61 20  20 20 20 20 20 20 20 20  6863 0.419608♪◙○○sienna         
00001F60  20 20 20 20 20 20 30 2E  35 35 36 38 36 33 20 30  2E 34 31 39 36 30 38 20  30 2E 31 33 37 32 35 35        0.556863 0.419608 0.137255
00001F80  0D 0A 09 09 73 6B 79 5F  62 6C 75 65 20 20 20 20  20 20 20 20 20 20 20 20  20 30 2E 31 39 36 30 37  ♪◙○○sky_blue             0.19607
00001FA0  38 20 30 2E 36 30 30 30  30 30 20 30 2E 38 30 30  30 30 30 0D 0A 09 09 73  6C 61 74 65 5F 62 6C 75  8 0.600000 0.800000♪◙○○slate_blu
00001FC0  65 20 20 20 20 20 20 20  20 20 20 20 30 2E 30 30  30 30 30 30 20 30 2E 34  39 38 30 33 39 20 31 2E  e           0.000000 0.498039 1.
00001FE0  30 30 30 30 30 30 0D 0A  09 09 73 70 72 69 6E 67  5F 67 72 65 65 6E 20 20  20 20 20 20 20 20 20 30  000000♪◙○○spring_green         0
00002000  2E 30 30 30 30 30 30 20  31 2E 30 30 30 30 30 30  20 30 2E 34 39 38 30 33  39 0D 0A 09 09 73 74 65  .000000 1.000000 0.498039♪◙○○ste
00002020  65 6C 5F 62 6C 75 65 20  20 20 20 20 20 20 20 20  20 20 30 2E 31 33 37 32  35 35 20 30 2E 34 31 39  el_blue           0.137255 0.419
00002040  36 30 38 20 30 2E 35 35  36 38 36 33 0D 0A 09 09  74 61 6E 20 20 20 20 20  20 20 20 20 20 20 20 20  608 0.556863♪◙○○tan             
00002060  20 20 20 20 20 30 2E 38  35 38 38 32 34 20 30 2E  35 37 36 34 37 31 20 30  2E 34 33 39 32 31 36 0D       0.858824 0.576471 0.439216♪
00002080  0A 09 09 74 68 69 73 74  6C 65 20 20 20 20 20 20  20 20 20 20 20 20 20 20  30 2E 38 34 37 30 35 39  ◙○○thistle              0.847059
000020A0  20 30 2E 37 34 39 30 32  30 20 30 2E 38 34 37 30  35 39 0D 0A 09 09 74 75  72 71 75 6F 69 73 65 20   0.749020 0.847059♪◙○○turquoise 
000020C0  20 20 20 20 20 20 20 20  20 20 20 30 2E 36 37 38  34 33 31 20 30 2E 39 31  37 36 34 37 20 30 2E 39             0.678431 0.917647 0.9
000020E0  31 37 36 34 37 0D 0A 09  09 76 69 6F 6C 65 74 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  17647♪◙○○violet               0.
00002100  33 30 39 38 30 34 20 30  2E 31 38 34 33 31 34 20  30 2E 33 30 39 38 30 34  0D 0A 09 09 76 69 6F 6C  309804 0.184314 0.309804♪◙○○viol
00002120  65 74 5F 72 65 64 20 20  20 20 20 20 20 20 20 20  20 30 2E 38 30 30 30 30  30 20 30 2E 31 39 36 30  et_red           0.800000 0.1960
00002140  37 38 20 30 2E 36 30 30  30 30 30 0D 0A 09 09 77  68 65 61 74 20 20 20 20  20 20 20 20 20 20 20 20  78 0.600000♪◙○○wheat            
00002160  20 20 20 20 30 2E 38 34  37 30 35 39 20 30 2E 38  34 37 30 35 39 20 30 2E  37 34 39 30 32 30 0D 0A      0.847059 0.847059 0.749020♪◙
00002180  09 09 77 68 69 74 65 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 30  2E 39 38 38 32 33 35 20  ○○white                0.988235 
000021A0  30 2E 39 38 38 32 33 35  20 30 2E 39 38 38 32 33  35 0D 0A 09 09 79 65 6C  6C 6F 77 20 20 20 20 20  0.988235 0.988235♪◙○○yellow     
000021C0  20 20 20 20 20 20 20 20  20 20 31 2E 30 30 30 30  30 30 20 31 2E 30 30 30  30 30 30 20 30 2E 30 30            1.000000 1.000000 0.00
000021E0  30 30 30 30 0D 0A 09 09  79 65 6C 6C 6F 77 5F 67  72 65 65 6E 20 20 20 20  20 20 20 20 20 30 2E 36  0000♪◙○○yellow_green         0.6
00002200  30 30 30 30 30 20 30 2E  38 30 30 30 30 30 20 30  2E 31 39 36 30 37 38 0D  0A 74 79 70 65 64 65 66  00000 0.800000 0.196078♪◙typedef
00002220  20 75 6E 73 69 67 6E 65  64 20 63 68 61 72 20 20  20 20 20 20 42 79 74 65  3B 0D 0A 74 79 70 65 64   unsigned char      Byte;♪◙typed
00002240  65 66 20 75 6E 73 69 67  6E 65 64 20 69 6E 74 20  20 20 20 20 20 20 57 6F  72 64 3B 0D 0A 74 79 70  ef unsigned int       Word;♪◙typ
00002260  65 64 65 66 20 65 6E 75  6D 20 7B 66 61 6C 73 65  2C 20 74 72 75 65 7D 20  42 6F 6F 6C 65 61 6E 3B  edef enum {false, true} Boolean;
00002280  0D 0A 74 79 70 65 64 65  66 20 73 74 72 75 63 74  0D 0A 7B 0D 0A 20 20 42  79 74 65 20 52 65 64 3B  ♪◙typedef struct♪◙{♪◙  Byte Red;
000022A0  0D 0A 20 20 42 79 74 65  20 47 72 6E 3B 0D 0A 20  20 42 79 74 65 20 42 6C  75 3B 0D 0A 7D 0D 0A 52  ♪◙  Byte Grn;♪◙  Byte Blu;♪◙}♪◙R
000022C0  47 42 3B 0D 0A 0D 0A 74  79 70 65 64 65 66 20 52  47 42 20 50 61 6C 65 74  74 65 52 65 67 69 73 74  GB;♪◙♪◙typedef RGB PaletteRegist
000022E0  65 72 5B 32 35 36 5D 3B  0D 0A 0D 0A 76 6F 69 64  20 53 65 74 5F 47 72 61  70 68 69 63 73 5F 4D 6F  er[256];♪◙♪◙void Set_Graphics_Mo
00002300  64 65 28 29 0D 0A 7B 0D  0A 20 20 69 66 28 28 58  52 65 73 3C 33 32 31 29  20 26 26 20 28 59 52 65  de()♪◙{♪◙  if((XRes<321) && (YRe
00002320  73 3C 32 30 31 29 29 0D  0A 20 20 20 20 49 6E 69  74 47 72 61 70 68 69 63  73 28 31 39 29 3B 0D 0A  s<201))♪◙    InitGraphics(19);♪◙
00002340  20 20 65 6C 73 65 0D 0A  20 20 7B 0D 0A 20 20 20  20 69 66 28 28 58 52 65  73 3C 36 34 31 29 20 26    else♪◙  {♪◙    if((XRes<641) &
00002360  26 20 28 59 52 65 73 3C  33 35 31 29 29 0D 0A 20  20 20 20 20 20 49 6E 69  74 47 72 61 70 68 69 63  & (YRes<351))♪◙      InitGraphic
00002380  73 28 34 35 29 3B 0D 0A  20 20 20 20 65 6C 73 65  0D 0A 20 20 20 20 7B 0D  0A 20 20 20 20 20 20 69  s(45);♪◙    else♪◙    {♪◙      i
000023A0  66 28 28 58 52 65 73 3C  36 34 31 29 20 26 26 20  28 59 52 65 73 3C 34 38  31 29 29 0D 0A 09 49 6E  f((XRes<641) && (YRes<481))♪◙○In
000023C0  69 74 47 72 61 70 68 69  63 73 28 34 36 29 3B 0D  0A 20 20 20 20 20 20 65  6C 73 65 0D 0A 20 20 20  itGraphics(46);♪◙      else♪◙   
000023E0  20 20 20 7B 0D 0A 09 69  66 28 28 58 52 65 73 3C  38 30 31 29 20 26 26 20  28 59 52 65 73 3C 36 30     {♪◙○if((XRes<801) && (YRes<60
00002400  31 29 29 0D 0A 09 20 20  49 6E 69 74 47 72 61 70  68 69 63 73 28 34 38 29  3B 0D 0A 09 65 6C 73 65  1))♪◙○  InitGraphics(48);♪◙○else
00002420  0D 0A 09 20 20 49 6E 69  74 47 72 61 70 68 69 63  73 28 35 36 29 3B 0D 0A  20 20 20 20 20 20 7D 0D  ♪◙○  InitGraphics(56);♪◙      }♪
00002440  0A 20 20 20 20 7D 0D 0A  20 20 7D 0D 0A 7D 0D 0A  20 20 50 69 63 5F 46 69  6C 65 3D 66 6F 70 65 6E  ◙    }♪◙  }♪◙}♪◙  Pic_File=fopen
00002460  28 50 5F 4E 61 6D 65 2C  20 22 77 2B 62 22 29 3B  0D 0A 20 20 66 6F 72 28  79 3D 30 3B 20 79 3C 37  (P_Name, "w+b");♪◙  for(y=0; y<7
00002480  3B 20 79 2B 2B 29 3B 0D  0A 20 20 7B 0D 0A 20 20  20 20 66 70 75 74 63 28  32 35 33 2C 20 50 69 63  ; y++);♪◙  {♪◙    fputc(253, Pic
000024A0  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 66 70 75  74 63 28 32 30 2C 20 50  69 63 5F 46 69 6C 65 29  _File);♪◙    fputc(20, Pic_File)
000024C0  3B 0D 0A 20 20 20 20 66  70 75 74 63 28 34 31 2C  20 50 69 63 5F 46 69 6C  65 29 3B 0D 0A 20 20 20  ;♪◙    fputc(41, Pic_File);♪◙   
000024E0  20 66 70 75 74 63 28 31  34 2C 20 50 69 63 5F 46  69 6C 65 29 3B 0D 0A 20  20 20 20 66 70 75 74 63   fputc(14, Pic_File);♪◙    fputc
00002500  28 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 39 2C 20 50 69 63  (0, Pic_File);♪◙    fputc(9, Pic
00002520  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 66 70 75  74 63 28 33 2C 20 50 69  63 5F 46 69 6C 65 29 3B  _File);♪◙    fputc(3, Pic_File);
00002540  0D 0A 20 20 7D 0D 0A 76  6F 69 64 20 47 65 74 53  63 65 6E 65 46 69 6C 65  28 29 0D 0A 7B 0D 0A 20  ♪◙  }♪◙void GetSceneFile()♪◙{♪◙ 
00002560  20 69 6E 74 20 69 3B 0D  0A 20 20 42 79 74 65 20  78 2C 20 79 3B 0D 0A 0D  0A 20 20 70 72 69 6E 74   int i;♪◙  Byte x, y;♪◙♪◙  print
00002580  66 28 22 5C 6E 45 6E 74  65 72 20 46 69 6C 65 20  4E 61 6D 65 20 2D 3E 20  22 29 3B 0D 0A 20 20 78  f("\nEnter File Name -> ");♪◙  x
000025A0  3D 77 68 65 72 65 78 28  29 3B 0D 0A 20 20 79 3D  77 68 65 72 65 79 28 29  3B 0D 0A 20 20 67 65 74  =wherex();♪◙  y=wherey();♪◙  get
000025C0  73 28 53 63 65 6E 65 46  69 6C 65 29 3B 0D 0A 20  20 69 66 28 21 28 73 74  72 63 6D 70 28 53 63 65  s(SceneFile);♪◙  if(!(strcmp(Sce
000025E0  6E 65 46 69 6C 65 2C 20  22 22 29 29 29 0D 0A 20  20 7B 0D 0A 20 20 20 20  73 74 72 63 70 79 28 53  neFile, "")))♪◙  {♪◙    strcpy(S
00002600  63 65 6E 65 46 69 6C 65  2C 20 22 43 55 42 45 50  4C 41 4E 22 29 3B 0D 0A  20 20 20 20 67 6F 74 6F  ceneFile, "CUBEPLAN");♪◙    goto
00002620  78 79 28 78 2C 20 79 29  3B 0D 0A 20 20 20 20 70  75 74 73 28 53 63 65 6E  65 46 69 6C 65 29 3B 0D  xy(x, y);♪◙    puts(SceneFile);♪
00002640  0A 20 20 7D 0D 0A 20 20  70 75 74 73 28 22 22 29  3B 0D 0A 20 20 66 6F 72  28 69 3D 30 3B 20 69 3C  ◙  }♪◙  puts("");♪◙  for(i=0; i<
00002660  73 74 72 6C 65 6E 28 53  63 65 6E 65 46 69 6C 65  29 3B 20 69 2B 2B 29 0D  0A 20 20 20 20 53 63 65  strlen(SceneFile); i++)♪◙    Sce
00002680  6E 65 46 69 6C 65 5B 69  5D 3D 74 6F 75 70 70 65  72 28 53 63 65 6E 65 46  69 6C 65 5B 69 5D 29 3B  neFile[i]=toupper(SceneFile[i]);
000026A0  0D 0A 7D 0D 0A 0D 0A 76  6F 69 64 20 53 61 76 65  5F 50 69 63 74 75 72 65  28 29 0D 0A 7B 0D 0A 20  ♪◙}♪◙♪◙void Save_Picture()♪◙{♪◙ 
000026C0  20 57 6F 72 64 20 78 2C  20 79 3B 0D 0A 20 20 42  79 74 65 20 64 3B 0D 0A  20 20 46 49 4C 45 20 2A   Word x, y;♪◙  Byte d;♪◙  FILE *
000026E0  4F 75 74 5F 46 69 6C 65  3B 0D 0A 0D 0A 20 20 4F  75 74 5F 46 69 6C 65 3D  66 6F 70 65 6E 28 22 54  Out_File;♪◙♪◙  Out_File=fopen("T
00002700  45 4D 50 2E 54 47 41 22  2C 20 22 77 2B 62 22 29  3B 0D 0A 20 20 66 6F 72  28 79 3D 30 3B 20 79 3C  EMP.TGA", "w+b");♪◙  for(y=0; y<
00002720  37 3B 20 79 2B 2B 29 3B  0D 0A 20 20 7B 0D 0A 20  20 20 20 70 75 74 77 28  32 35 36 2C 20 4F 75 74  7; y++);♪◙  {♪◙    putw(256, Out
00002740  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 70 75 74  77 28 31 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  _File);♪◙    putw(1, Out_File);♪
00002760  0A 20 20 20 20 70 75 74  77 28 30 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 70 75 74  ◙    putw(0, Out_File);♪◙    put
00002780  63 28 31 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 70 75 74  63 28 32 34 2C 20 4F 75  c(1, Out_File);♪◙    putc(24, Ou
000027A0  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 6C 65 29 3B  t_File);♪◙    putw(0, Out_File);
000027C0  0D 0A 20 20 20 20 70 75  74 77 28 30 2C 20 4F 75  74 5F 46 69 6C 65 29 3B  0D 0A 20 20 20 20 70 75  ♪◙    putw(0, Out_File);♪◙    pu
000027E0  74 77 28 58 52 65 73 2C  20 4F 75 74 5F 46 69 6C  65 29 3B 0D 0A 20 20 20  20 70 75 74 77 28 59 52  tw(XRes, Out_File);♪◙    putw(YR
00002800  65 73 2C 20 4F 75 74 5F  46 69 6C 65 29 3B 0D 0A  20 20 20 20 70 75 74 77  28 43 52 65 73 2C 20 4F  es, Out_File);♪◙    putw(CRes, O
00002820  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 7D 0D 0A  20 20 66 6F 72 28 79 3D  30 3B 20 79 3C 32 35 36  ut_File);♪◙  }♪◙  for(y=0; y<256
00002840  3B 20 79 2B 2B 29 0D 0A  20 20 7B 0D 0A 20 20 20  20 66 70 75 74 63 28 28  50 61 6C 41 72 72 61 79  ; y++)♪◙  {♪◙    fputc((PalArray
00002860  5B 79 5D 2E 42 6C 75 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  [y].Blu)<<2, Out_File);♪◙    fpu
00002880  74 63 28 28 50 61 6C 41  72 72 61 79 5B 79 5D 2E  47 72 6E 29 3C 3C 32 2C  20 4F 75 74 5F 46 69 6C  tc((PalArray[y].Grn)<<2, Out_Fil
000028A0  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 52 65 64 29  e);♪◙    fputc((PalArray[y].Red)
000028C0  3C 3C 32 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 7D 0D 0A 20 20  66 6F 72 28 79 3D 59 52  <<2, Out_File);♪◙  }♪◙  for(y=YR
000028E0  65 73 3B 20 79 3E 30 3B  20 79 2D 2D 29 0D 0A 20  20 7B 0D 0A 20 20 20 20  66 6F 72 28 78 3D 30 3B  es; y>0; y--)♪◙  {♪◙    for(x=0;
00002900  20 78 3C 58 52 65 73 3B  20 78 2B 2B 29 0D 0A 20  20 20 20 7B 0D 0A 20 20  20 20 20 20 64 3D 47 65   x<XRes; x++)♪◙    {♪◙      d=Ge
00002920  74 50 69 78 65 6C 28 78  2C 20 79 2D 31 29 3B 0D  0A 20 20 20 20 20 20 66  70 75 74 63 28 64 2C 20  tPixel(x, y-1);♪◙      fputc(d, 
00002940  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 20 66 63 6C 6F 73 65  Out_File);♪◙    }♪◙  }♪◙  fclose
00002960  61 6C 6C 28 29 3B 0D 0A  7D 0D 0A 0D 0A 23 69 6E  63 6C 75 64 65 20 22 73  74 64 69 6F 2E 68 22 0D  all();♪◙}♪◙♪◙#include "stdio.h"♪
00002980  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 63 6F 6E  ◙#include "dos.h"♪◙#include "con
000029A0  69 6F 2E 68 22 0D 0A 23  69 6E 63 6C 75 64 65 20  22 64 65 66 73 2E 68 22  0D 0A 0D 0A 76 6F 69 64  io.h"♪◙#include "defs.h"♪◙♪◙void
000029C0  20 53 65 74 5F 54 65 78  74 5F 53 63 72 65 65 6E  28 69 6E 74 20 74 63 2C  20 69 6E 74 20 74 62 29   Set_Text_Screen(int tc, int tb)
000029E0  0D 0A 7B 0D 0A 20 20 74  65 78 74 63 6F 6C 6F 72  28 74 63 29 3B 0D 0A 20  20 74 65 78 74 62 61 63  ♪◙{♪◙  textcolor(tc);♪◙  textbac
00002A00  6B 67 72 6F 75 6E 64 28  74 62 29 3B 0D 0A 20 20  63 6C 72 73 63 72 28 29  3B 0D 0A 7D 0D 0A 69 6E  kground(tb);♪◙  clrscr();♪◙}♪◙in
00002A20  73 74 61 6C 6C 75 73 65  72 64 72 69 76 65 72 28  22 53 56 47 41 32 35 36  22 2C 44 65 74 65 63 74  stalluserdriver("SVGA256",Detect
00002A40  56 47 41 32 35 36 29 3B  0D 0A 0D 0A 3B 20 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  VGA256);♪◙♪◙; ******************
00002A60  2A 2A 2A 2A 2A 20 46 75  6E 63 74 69 6F 6E 20 73  74 6F 72 65 64 61 63 28  29 20 2A 2A 2A 2A 2A 2A  ***** Function storedac() ******
00002A80  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 0D 0A  0D 0A 3B 09 46 75 6E 63  **********************♪◙♪◙;○Func
00002AA0  74 69 6F 6E 20 74 6F 20  53 74 6F 72 65 20 74 68  65 20 64 61 63 62 6F 78  5B 5D 5B 5D 20 61 72 72  tion to Store the dacbox[][] arr
00002AC0  61 79 20 69 6E 74 6F 20  56 47 41 2C 0D 0A 3B 09  63 61 6C 6C 65 64 20 66  72 6F 6D 20 6C 6F 61 64  ay into VGA,♪◙;○called from load
00002AE0  64 61 63 28 29 20 64 75  72 72 69 6E 67 20 69 6E  69 74 69 61 6C 69 7A 61  74 69 6F 6E 2E 0D 0A 0D  dac() durring initialization.♪◙♪
00002B00  0A 73 74 6F 72 65 64 61  63 09 70 72 6F 63 0D 0A  09 70 75 73 68 09 65 73  09 09 09 3B 20 6E 65 65  ◙storedac○proc♪◙○push○es○○○; nee
00002B20  64 20 45 53 20 3D 3D 20  44 53 20 74 65 6D 70 6F  72 61 72 69 6C 79 0D 0A  09 70 75 73 68 09 64 73  d ES == DS temporarily♪◙○push○ds
00002B40  09 09 09 3B 20 20 2E 2E  2E 0D 0A 09 70 6F 70 09  65 73 09 09 09 3B 20 20  2E 2E 2E 0D 0A 09 6D 6F  ○○○;  ...♪◙○pop○es○○○;  ...♪◙○mo
00002B60  76 09 61 78 2C 31 30 31  32 68 09 09 3B 20 67 65  74 20 74 68 65 20 6F 6C  64 20 44 41 43 20 76 61  v○ax,1012h○○; get the old DAC va
00002B80  6C 75 65 73 0D 0A 09 6D  6F 76 09 62 78 2C 30 09  09 09 3B 20 20 28 61 73  73 75 6D 69 6E 67 2C 20  lues♪◙○mov○bx,0○○○;  (assuming, 
00002BA0  6F 66 20 63 6F 75 72 73  65 2C 20 74 68 65 79 20  65 78 69 73 74 29 0D 0A  09 6D 6F 76 09 63 78 2C  of course, they exist)♪◙○mov○cx,
00002BC0  32 35 36 09 09 09 3B 20  20 2E 2E 2E 0D 0A 09 6D  6F 76 09 64 78 2C 6F 66  66 73 65 74 20 64 61 63  256○○○;  ...♪◙○mov○dx,offset dac
00002BE0  62 6F 78 09 3B 20 20 2E  2E 2E 0D 0A 09 69 6E 74  09 31 30 68 09 09 09 3B  20 64 6F 20 69 74 2E 0D  box○;  ...♪◙○int○10h○○○; do it.♪
00002C00  0A 09 70 6F 70 09 65 73  09 09 09 3B 20 20 2E 2E  2E 0D 0A 09 72 65 74 0D  0A 73 74 6F 72 65 64 61  ◙○pop○es○○○;  ...♪◙○ret♪◙storeda
00002C20  63 20 65 6E 64 70 0D 0A  80 02 5E 01 93 0D 0A 65  78 74 65 72 6E 20 69 6E  74 20 20 58 52 65 73 2C  c endp♪◙Ç☻^☺ô♪◙extern int  XRes,
00002C40  20 59 52 65 73 3B 0D 0A  65 78 74 65 72 6E 20 57  6F 72 64 20 4D 61 78 58  52 65 73 2C 20 4D 61 78   YRes;♪◙extern Word MaxXRes, Max
00002C60  59 52 65 73 3B 0D 0A 65  78 74 65 72 6E 20 57 6F  72 64 20 4D 61 78 58 2C  20 4D 61 78 59 3B 0D 0A  YRes;♪◙extern Word MaxX, MaxY;♪◙
00002C80  65 78 74 65 72 6E 20 42  6F 6F 6C 65 61 6E 20 50  65 72 73 70 65 63 74 69  76 65 50 6C 6F 74 3B 0D  extern Boolean PerspectivePlot;♪
00002CA0  0A 65 78 74 65 72 6E 20  66 6C 6F 61 74 20 20 20  4D 78 2C 20 4D 79 2C 20  4D 7A 2C 20 64 73 3B 0D  ◙extern float   Mx, My, Mz, ds;♪
00002CC0  0A 65 78 74 65 72 6E 20  42 6F 6F 6C 65 61 6E 20  44 72 61 77 5F 41 78 69  73 5F 41 6E 64 5F 50 61  ◙extern Boolean Draw_Axis_And_Pa
00002CE0  6C 65 74 74 65 3B 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  lette;♪◙#include "stdio.h"♪◙#inc
00002D00  6C 75 64 65 20 22 64 6F  73 2E 68 22 0D 0A 23 69  6E 63 6C 75 64 65 20 22  64 65 66 73 2E 68 22 0D  lude "dos.h"♪◙#include "defs.h"♪
00002D20  0A 23 69 6E 63 6C 75 64  65 20 22 67 6C 6F 62 61  6C 73 2E 68 22 0D 0A 23  69 6E 63 6C 75 64 65 20  ◙#include "globals.h"♪◙#include 
00002D40  22 6D 61 74 68 62 2E 68  22 0D 0A 23 69 6E 63 6C  75 64 65 20 22 67 72 61  70 68 62 2E 68 22 0D 0A  "mathb.h"♪◙#include "graphb.h"♪◙
00002D60  4D 41 53 4D 20 25 31 20  25 31 20 4E 55 4C 20 4E  55 4C 0D 0A 49 46 20 45  52 52 4F 52 4C 45 56 45  MASM %1 %1 NUL NUL♪◙IF ERRORLEVE
00002D80  4C 20 31 20 47 4F 54 4F  20 50 52 4F 42 4C 45 4D  0D 0A 4C 49 4E 4B 20 25  31 20 40 41 55 54 4F 4C  L 1 GOTO PROBLEM♪◙LINK %1 @AUTOL
00002DA0  49 4E 4B 0D 0A 45 58 45  32 42 49 4E 20 25 31 20  25 31 2E 44 52 56 0D 0A  44 45 4C 20 25 31 2E 45  INK♪◙EXE2BIN %1 %1.DRV♪◙DEL %1.E
00002DC0  58 45 0D 0A 44 45 4C 20  25 31 2E 4F 42 4A 0D 0A  3A 50 52 4F 42 4C 45 4D  0D 0A 23 64 65 66 69 6E  XE♪◙DEL %1.OBJ♪◙:PROBLEM♪◙#defin
00002DE0  65 20 4E 75 6D 56 65 72  74 69 63 69 65 73 49 6E  46 61 63 65 74 20 34 0D  0A 23 64 65 66 69 6E 65  e NumVerticiesInFacet 4♪◙#define
00002E00  20 4D 61 78 56 65 72 74  65 78 4E 75 6D 49 6E 46  61 63 65 74 20 34 0D 0A  23 64 65 66 69 6E 65 20   MaxVertexNumInFacet 4♪◙#define 
00002E20  53 63 61 6C 65 44 61 74  61 20 32 33 30 30 30 0D  0A 23 64 65 66 69 6E 65  20 53 63 61 6C 65 49 6D  ScaleData 23000♪◙#define ScaleIm
00002E40  61 67 65 20 31 30 30 0D  0A 0D 0A 2F 2A 0D 0A 23  64 65 66 69 6E 65 20 4D  61 78 46 61 63 65 74 20  age 100♪◙♪◙/*♪◙#define MaxFacet 
00002E60  31 36 37 38 09 20 20 20  20 20 09 20 20 20 20 20  20 69 6E 64 65 70 65 6E  64 61 6E 74 20 3A 20 4D  1678○     ○      independant : M
00002E80  61 78 46 61 63 65 74 20  20 3D 20 6E 0D 0A 23 64  65 66 69 6E 65 20 4D 61  78 56 65 72 74 65 78 20  axFacet  = n♪◙#define MaxVertex 
00002EA0  36 37 31 32 09 20 20 20  20 20 09 20 20 20 20 20  20 76 65 72 74 69 63 69  65 73 20 20 20 4D 61 78  6712○     ○      verticies   Max
00002EC0  56 65 72 74 65 78 20 3D  20 34 20 2A 20 6E 0D 0A  2A 2F 0D 0A 0D 0A 23 64  65 66 69 6E 65 20 4D 61  Vertex = 4 * n♪◙*/♪◙♪◙#define Ma
00002EE0  78 46 61 63 65 74 20 33  36 30 30 0D 0A 23 64 65  66 69 6E 65 20 4D 61 78  56 65 72 74 65 78 20 33  xFacet 3600♪◙#define MaxVertex 3
00002F00  37 32 31 0D 0A 0D 0A 69  6E 74 20 4C 61 73 74 56  65 72 74 65 78 2C 20 4C  61 73 74 46 61 63 65 74  721♪◙♪◙int LastVertex, LastFacet
00002F20  3B 0D 0A 69 6E 74 20 4C  61 73 74 56 65 72 74 65  78 4E 75 6D 49 6E 46 61  63 65 74 3B 0D 0A 69 6E  ;♪◙int LastVertexNumInFacet;♪◙in
00002F40  74 20 56 65 72 74 65 78  4E 75 6D 2C 20 46 61 63  65 74 4E 75 6D 3B 0D 0A  69 6E 74 20 56 65 72 74  t VertexNum, FacetNum;♪◙int Vert
00002F60  65 78 4E 75 6D 49 6E 46  61 63 65 74 3B 0D 0A 54  44 49 41 20 56 65 72 74  65 78 5B 4D 61 78 56 65  exNumInFacet;♪◙TDIA Vertex[MaxVe
00002F80  72 74 65 78 2B 31 5D 3B  0D 0A 73 74 61 74 69 63  20 69 6E 74 20 66 61 72  20 2A 46 61 63 65 74 3B  rtex+1];♪◙static int far *Facet;
00002FA0  0D 0A 0D 0A 66 6C 6F 61  74 20 49 6E 76 53 63 61  6C 65 44 61 74 61 2C 20  49 6E 76 53 63 61 6C 65  ♪◙♪◙float InvScaleData, InvScale
00002FC0  49 6D 61 67 65 3B 0D 0A  74 79 70 65 64 65 66 20  63 68 61 72 20 4E 61 6D  65 5B 32 30 5D 3B 0D 0A  Image;♪◙typedef char Name[20];♪◙
00002FE0  4E 61 6D 65 20 46 69 6C  65 4E 61 6D 65 3B 0D 0A  74 79 70 65 64 65 66 20  73 74 72 75 63 74 7B 0D  Name FileName;♪◙typedef struct{♪
00003000  0A 20 20 69 6E 74 20 78  3B 0D 0A 20 20 69 6E 74  20 79 3B 0D 0A 7D 20 50  69 78 65 6C 56 65 63 74  ◙  int x;♪◙  int y;♪◙} PixelVect
00003020  6F 72 3B 0D 0A 0D 0A 74  79 70 65 64 65 66 20 50  69 78 65 6C 56 65 63 74  6F 72 20 50 69 78 65 6C  or;♪◙♪◙typedef PixelVector Pixel
00003040  41 72 72 61 79 5B 4E 75  6D 56 65 72 74 69 63 69  65 73 49 6E 46 61 63 65  74 2B 32 5D 3B 0D 0A 74  Array[NumVerticiesInFacet+2];♪◙t
00003060  79 70 65 64 65 66 20 54  44 41 20 56 6F 78 65 6C  41 72 72 61 79 5B 4E 75  6D 56 65 72 74 69 63 69  ypedef TDA VoxelArray[NumVertici
00003080  65 73 49 6E 46 61 63 65  74 2B 31 5D 3B 0D 0A 0D  0A 76 6F 69 64 20 49 6E  69 74 56 65 72 74 65 78  esInFacet+1];♪◙♪◙void InitVertex
000030A0  42 75 66 66 65 72 28 29  0D 0A 76 6F 69 64 20 4C  6F 61 64 44 61 74 61 28  4E 61 6D 65 20 46 69 6C  Buffer()♪◙void LoadData(Name Fil
000030C0  65 4E 61 6D 65 29 0D 0A  76 6F 69 64 20 53 61 76  65 44 61 74 61 28 4E 61  6D 65 20 46 69 6C 65 4E  eName)♪◙void SaveData(Name FileN
000030E0  61 6D 65 29 0D 0A 76 6F  69 64 20 50 75 74 57 69  72 65 46 61 63 65 74 28  50 69 78 65 6C 41 72 72  ame)♪◙void PutWireFacet(PixelArr
00003100  61 79 20 50 74 73 2C 20  42 79 74 65 20 43 6F 6C  6F 72 29 0D 0A 76 6F 69  64 20 50 75 74 46 61 63  ay Pts, Byte Color)♪◙void PutFac
00003120  65 74 28 50 69 78 65 6C  41 72 72 61 79 20 46 61  63 65 32 64 2C 20 42 79  74 65 20 43 6F 6C 6F 72  et(PixelArray Face2d, Byte Color
00003140  2C 20 42 79 74 65 20 49  6E 74 65 6E 73 29 0D 0A  76 6F 69 64 20 47 65 74  5F 41 4E 49 5F 46 69 6C  , Byte Intens)♪◙void Get_ANI_Fil
00003160  65 5F 4E 61 6D 65 28 29  0D 0A 7B 0D 0A 20 20 42  79 74 65 20 78 2C 20 79  3B 0D 0A 0D 0A 20 20 74  e_Name()♪◙{♪◙  Byte x, y;♪◙♪◙  t
00003180  65 78 74 63 6F 6C 6F 72  28 59 45 4C 4C 4F 57 29  3B 0D 0A 20 20 74 65 78  74 62 61 63 6B 67 72 6F  extcolor(YELLOW);♪◙  textbackgro
000031A0  75 6E 64 28 42 4C 55 45  29 3B 0D 0A 20 20 67 6F  74 6F 78 79 28 31 2C 20  38 29 3B 0D 0A 20 20 63  und(BLUE);♪◙  gotoxy(1, 8);♪◙  c
000031C0  70 72 69 6E 74 66 28 22  45 6E 74 65 72 20 46 69  6C 65 20 4E 61 6D 65 20  2D 3E 20 22 29 3B 0D 0A  printf("Enter File Name -> ");♪◙
000031E0  20 20 78 3D 77 68 65 72  65 78 28 29 3B 0D 0A 20  20 79 3D 77 68 65 72 65  79 28 29 3B 0D 0A 20 20    x=wherex();♪◙  y=wherey();♪◙  
00003200  74 65 78 74 63 6F 6C 6F  72 28 57 48 49 54 45 2B  42 4C 49 4E 4B 29 3B 0D  0A 20 20 63 70 72 69 6E  textcolor(WHITE+BLINK);♪◙  cprin
00003220  74 66 28 22 25 73 22 2C  20 22 53 50 48 52 50 4C  41 4E 22 29 3B 0D 0A 20  20 74 65 78 74 63 6F 6C  tf("%s", "SPHRPLAN");♪◙  textcol
00003240  6F 72 28 59 45 4C 4C 4F  57 29 3B 0D 0A 20 20 67  6F 74 6F 78 79 28 78 2C  20 79 29 3B 0D 0A 20 20  or(YELLOW);♪◙  gotoxy(x, y);♪◙  
00003260  77 68 69 6C 65 28 21 28  6B 62 68 69 74 28 29 29  29 3B 0D 0A 20 20 63 70  72 69 6E 74 66 28 22 20  while(!(kbhit()));♪◙  cprintf(" 
00003280  20 20 20 20 20 20 20 20  20 20 20 22 29 3B 0D 0A  20 20 67 6F 74 6F 78 79  28 78 2C 20 79 29 3B 0D             ");♪◙  gotoxy(x, y);♪
000032A0  0A 20 20 67 65 74 73 28  46 69 6C 65 5F 4E 61 6D  65 29 3B 0D 0A 20 20 69  66 28 21 28 73 74 72 63  ◙  gets(File_Name);♪◙  if(!(strc
000032C0  6D 70 28 46 69 6C 65 5F  4E 61 6D 65 2C 20 22 22  29 29 29 0D 0A 20 20 20  20 73 74 72 63 70 79 28  mp(File_Name, "")))♪◙    strcpy(
000032E0  46 69 6C 65 5F 4E 61 6D  65 2C 20 22 53 50 48 52  50 4C 41 4E 22 29 3B 0D  0A 20 20 73 74 72 75 70  File_Name, "SPHRPLAN");♪◙  strup
00003300  72 28 46 69 6C 65 5F 4E  61 6D 65 29 3B 0D 0A 20  20 73 74 72 63 61 74 28  46 69 6C 65 5F 4E 61 6D  r(File_Name);♪◙  strcat(File_Nam
00003320  65 2C 20 22 2E 41 4E 49  22 29 3B 0D 0A 20 20 67  6F 74 6F 78 79 28 31 2C  20 38 29 3B 0D 0A 20 20  e, ".ANI");♪◙  gotoxy(1, 8);♪◙  
00003340  70 72 69 6E 74 66 28 22  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  printf("                        
00003360  20 20 20 20 20 20 20 22  29 3B 0D 0A 20 20 74 65  78 74 63 6F 6C 6F 72 28  57 48 49 54 45 2B 42 4C         ");♪◙  textcolor(WHITE+BL
00003380  49 4E 4B 29 3B 0D 0A 20  20 67 6F 74 6F 78 79 28  31 2C 20 38 29 3B 0D 0A  20 20 63 70 72 69 6E 74  INK);♪◙  gotoxy(1, 8);♪◙  cprint
000033A0  66 28 22 4C 6F 61 64 69  6E 67 20 22 29 3B 0D 0A  20 20 74 65 78 74 63 6F  6C 6F 72 28 59 45 4C 4C  f("Loading ");♪◙  textcolor(YELL
000033C0  4F 57 29 3B 0D 0A 20 20  63 70 72 69 6E 74 66 28  22 25 73 22 2C 20 46 69  6C 65 5F 4E 61 6D 65 29  OW);♪◙  cprintf("%s", File_Name)
000033E0  3B 0D 0A 7D 0D 0A 50 61  6C 65 74 74 65 5F 52 65  67 69 73 74 65 72 20 50  61 6C 3B 0D 0A 0D 0A 76  ;♪◙}♪◙Palette_Register Pal;♪◙♪◙v
00003400  6F 69 64 20 47 72 65 79  5F 50 61 6C 65 74 74 65  28 50 61 6C 65 74 74 65  5F 52 65 67 69 73 74 65  oid Grey_Palette(Palette_Registe
00003420  72 20 50 61 6C 29 0D 0A  7B 0D 0A 20 20 57 6F 72  64 20 69 3B 0D 0A 0D 0A  20 20 66 6F 72 28 69 3D  r Pal)♪◙{♪◙  Word i;♪◙♪◙  for(i=
00003440  30 3B 20 69 3C 36 34 3B  20 69 2B 2B 29 0D 0A 20  20 7B 0D 0A 20 20 20 20  50 61 6C 5B 69 5D 2E 52  0; i<64; i++)♪◙  {♪◙    Pal[i].R
00003460  65 64 3D 69 3B 0D 0A 20  20 20 20 50 61 6C 5B 69  5D 2E 47 72 6E 3D 69 3B  0D 0A 20 20 20 20 50 61  ed=i;♪◙    Pal[i].Grn=i;♪◙    Pa
00003480  6C 5B 69 5D 2E 42 6C 75  3D 69 3B 0D 0A 20 20 7D  0D 0A 7D 0D 0A 23 69 6E  63 6C 75 64 65 20 22 73  l[i].Blu=i;♪◙  }♪◙}♪◙#include "s
000034A0  74 64 69 6F 2E 68 22 0D  0A 23 69 6E 63 6C 75 64  65 20 22 6D 61 74 68 2E  68 22 0D 0A 23 69 6E 63  tdio.h"♪◙#include "math.h"♪◙#inc
000034C0  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 6D 61 74 68 62 2E 68  lude "defs.h"♪◙#include "mathb.h
000034E0  22 0D 0A 76 6F 69 64 20  43 6C 65 61 72 50 61 6C  65 74 74 65 28 50 61 6C  65 74 74 65 52 65 67 69  "♪◙void ClearPalette(PaletteRegi
00003500  73 74 65 72 20 43 6F 6C  6F 72 29 0D 0A 0D 0A 7B  20 57 6F 72 64 20 69 3B  0D 0A 0D 0A 20 20 66 6F  ster Color)♪◙♪◙{ Word i;♪◙♪◙  fo
00003520  72 28 69 3D 30 3B 20 69  3C 3D 32 35 35 3B 20 69  2B 2B 29 0D 0A 20 20 7B  0D 0A 20 20 20 20 43 6F  r(i=0; i<=255; i++)♪◙  {♪◙    Co
00003540  6C 6F 72 5B 69 5D 2E 52  65 64 3D 30 3B 0D 0A 20  20 20 20 43 6F 6C 6F 72  5B 69 5D 2E 47 72 6E 3D  lor[i].Red=0;♪◙    Color[i].Grn=
00003560  30 3B 0D 0A 20 20 20 20  43 6F 6C 6F 72 5B 69 5D  2E 42 6C 75 3D 30 3B 0D  0A 20 20 7D 0D 0A 7D 0D  0;♪◙    Color[i].Blu=0;♪◙  }♪◙}♪
00003580  0A 76 6F 69 64 20 47 65  74 5F 53 63 72 65 65 6E  5F 4C 69 6E 65 28 57 6F  72 64 20 4C 69 6E 65 2C  ◙void Get_Screen_Line(Word Line,
000035A0  20 63 68 61 72 20 62 75  66 5B 36 34 5D 29 0D 0A  7B 0D 0A 20 20 6C 6F 6E  67 20 4C 5F 4F 66 66 73   char buf[64])♪◙{♪◙  long L_Offs
000035C0  65 74 3B 0D 0A 20 20 57  6F 72 64 20 4F 66 66 73  65 74 2C 20 50 61 67 65  3B 0D 0A 20 20 57 6F 72  et;♪◙  Word Offset, Page;♪◙  Wor
000035E0  64 20 53 63 72 65 65 6E  3D 30 78 41 30 30 30 3B  0D 0A 20 20 57 6F 72 64  20 4F 6C 64 5F 50 61 67  d Screen=0xA000;♪◙  Word Old_Pag
00003600  65 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 3B 0D 0A 0D  e;♪◙  Word lx, ly;♪◙  Byte d;♪◙♪
00003620  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 4F 6C 64 5F 50  ◙  if(Line<YRes)♪◙  {♪◙    Old_P
00003640  61 67 65 3D 30 3B 0D 0A  20 20 20 20 73 77 69 74  63 68 28 52 65 73 29 0D  0A 20 20 20 20 7B 0D 0A  age=0;♪◙    switch(Res)♪◙    {♪◙
00003660  20 20 20 20 20 20 63 61  73 65 20 48 69 67 68 5F  52 65 73 20 3A 20 20 20  4F 66 66 73 65 74 3D 50        case High_Res :   Offset=P
00003680  72 65 5F 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 50 61 67 65  re_Calc_Y1[Line+Y_Off];♪◙○○○Page
000036A0  3D 28 28 4C 69 6E 65 3E  3E 36 29 3C 3C 34 29 3B  0D 0A 09 09 09 69 66 28  50 61 67 65 21 3D 4F 6C  =((Line>>6)<<4);♪◙○○○if(Page!=Ol
000036C0  64 5F 50 61 67 65 29 0D  0A 09 09 09 7B 0D 0A 09  09 09 20 20 6F 75 74 70  77 28 30 78 33 43 44 2C  d_Page)♪◙○○○{♪◙○○○  outpw(0x3CD,
000036E0  20 50 61 67 65 29 3B 0D  0A 09 09 09 20 20 4F 6C  64 5F 50 61 67 65 3D 50  61 67 65 3B 0D 0A 09 09   Page);♪◙○○○  Old_Page=Page;♪◙○○
00003700  09 7D 0D 0A 09 09 09 6D  6F 76 65 64 61 74 61 28  53 63 72 65 65 6E 2C 20  4F 66 66 73 65 74 2C 20  ○}♪◙○○○movedata(Screen, Offset, 
00003720  5F 44 53 2C 20 28 57 6F  72 64 29 62 75 66 2C 20  58 52 65 73 29 3B 0D 0A  09 09 09 62 72 65 61 6B  _DS, (Word)buf, XRes);♪◙○○○break
00003740  3B 0D 0A 20 20 20 20 20  20 63 61 73 65 20 4D 65  64 69 75 6D 5F 52 65 73  20 3A 20 4C 69 6E 65 2B  ;♪◙      case Medium_Res : Line+
00003760  3D 59 5F 4F 66 66 3B 0D  0A 09 09 09 66 6F 72 28  6C 78 3D 58 5F 4F 66 66  3B 20 6C 78 3C 28 58 52  =Y_Off;♪◙○○○for(lx=X_Off; lx<(XR
00003780  65 73 2B 58 5F 4F 66 66  29 3B 20 6C 78 2B 2B 29  0D 0A 09 09 09 7B 0D 0A  09 09 09 20 20 64 3D 47  es+X_Off); lx++)♪◙○○○{♪◙○○○  d=G
000037A0  65 74 5F 50 69 78 65 6C  28 6C 78 2C 20 4C 69 6E  65 29 3B 0D 0A 09 09 09  20 20 62 75 66 5B 6C 78  et_Pixel(lx, Line);♪◙○○○  buf[lx
000037C0  5D 3D 64 3B 0D 0A 09 09  09 7D 0D 0A 09 09 09 62  72 65 61 6B 3B 0D 0A 09  63 61 73 65 20 4C 6F 77  ]=d;♪◙○○○}♪◙○○○break;♪◙○case Low
000037E0  5F 52 65 73 20 20 3A 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  _Res  : Offset=Pre_Calc_Y1[Line+
00003800  59 5F 4F 66 66 5D 3B 0D  0A 09 09 09 6D 6F 76 65  64 61 74 61 28 53 63 72  65 65 6E 2C 20 4F 66 66  Y_Off];♪◙○○○movedata(Screen, Off
00003820  73 65 74 2C 20 5F 44 53  2C 20 28 57 6F 72 64 29  62 75 66 2C 20 58 52 65  73 29 3B 0D 0A 09 09 09  set, _DS, (Word)buf, XRes);♪◙○○○
00003840  62 72 65 61 6B 3B 0D 0A  20 20 20 20 7D 0D 0A 20  20 7D 0D 0A 7D 0D 0A 0D  0A 20 20 77 68 69 6C 65  break;♪◙    }♪◙  }♪◙}♪◙♪◙  while
00003860  28 21 69 73 64 69 67 69  74 28 63 5B 30 5D 29 29  0D 0A 20 20 7B 0D 0A 20  20 20 20 77 68 69 6C 65  (!isdigit(c[0]))♪◙  {♪◙    while
00003880  28 21 6B 62 68 69 74 28  29 29 3B 0D 0A 20 20 20  20 63 5B 30 5D 3D 67 65  74 63 68 28 29 3B 0D 0A  (!kbhit());♪◙    c[0]=getch();♪◙
000038A0  20 20 7D 0D 0A 20 20 72  65 74 75 72 6E 28 61 74  6F 69 28 63 29 29 3B 0D  0A 42 79 74 65 20 62 5B    }♪◙  return(atoi(c));♪◙Byte b[
000038C0  31 30 32 34 5D 3B 0D 0A  0D 0A 76 6F 69 64 20 47  65 74 5F 53 63 72 65 65  6E 5F 4C 69 6E 65 28 57  1024];♪◙♪◙void Get_Screen_Line(W
000038E0  6F 72 64 20 4C 69 6E 65  29 0D 0A 7B 0D 0A 20 20  57 6F 72 64 20 4F 66 66  73 65 74 2C 20 50 61 67  ord Line)♪◙{♪◙  Word Offset, Pag
00003900  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 20 57 6F 72  e;♪◙  Word Screen=0xA000;♪◙  Wor
00003920  64 20 6C 78 2C 20 6C 79  3B 0D 0A 20 20 42 79 74  65 20 64 3B 0D 0A 0D 0A  20 20 69 66 28 4C 69 6E  d lx, ly;♪◙  Byte d;♪◙♪◙  if(Lin
00003940  65 3C 59 52 65 73 29 0D  0A 20 20 7B 0D 0A 20 20  20 20 66 6F 72 28 6C 78  3D 30 3B 20 6C 78 3C 58  e<YRes)♪◙  {♪◙    for(lx=0; lx<X
00003960  52 65 73 3B 20 6C 78 2B  2B 29 0D 0A 20 20 20 20  7B 0D 0A 20 20 20 20 20  20 64 3D 47 65 74 5F 50  Res; lx++)♪◙    {♪◙      d=Get_P
00003980  69 78 65 6C 28 6C 78 2C  20 4C 69 6E 65 29 3B 0D  0A 20 20 20 20 20 20 62  5B 6C 78 5D 3D 64 3B 0D  ixel(lx, Line);♪◙      b[lx]=d;♪
000039A0  0A 20 20 20 20 7D 0D 0A  20 20 7D 0D 0A 7D 0D 0A  0D 0A 76 6F 69 64 20 57  72 69 74 65 5F 50 43 58  ◙    }♪◙  }♪◙}♪◙♪◙void Write_PCX
000039C0  5F 4C 69 6E 65 28 57 6F  72 64 20 79 29 0D 0A 7B  0D 0A 20 20 57 6F 72 64  20 74 3D 30 3B 0D 0A 20  _Line(Word y)♪◙{♪◙  Word t=0;♪◙ 
000039E0  20 42 79 74 65 20 69 3D  30 3B 0D 0A 0D 0A 20 20  47 65 74 5F 53 63 72 65  65 6E 5F 4C 69 6E 65 28   Byte i=0;♪◙♪◙  Get_Screen_Line(
00003A00  79 29 3B 0D 0A 20 20 64  6F 0D 0A 20 20 7B 0D 0A  20 20 20 20 69 3D 30 3B  0D 0A 20 20 20 20 77 68  y);♪◙  do♪◙  {♪◙    i=0;♪◙    wh
00003A20  69 6C 65 28 28 62 5B 74  2B 69 5D 3D 3D 62 5B 74  2B 69 2B 31 5D 29 20 26  26 20 28 28 74 2B 69 29  ile((b[t+i]==b[t+i+1]) && ((t+i)
00003A40  3C 58 52 65 73 29 20 26  26 20 28 69 3C 36 33 29  29 2B 2B 69 3B 0D 0A 20  20 20 20 69 66 28 69 3E  <XRes) && (i<63))++i;♪◙    if(i>
00003A60  30 29 0D 0A 20 20 20 20  7B 0D 0A 20 20 20 20 20  20 66 70 75 74 63 28 69  7C 30 78 63 30 2C 20 4F  0)♪◙    {♪◙      fputc(i|0xc0, O
00003A80  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 20 20 20  20 66 70 75 74 63 28 62  5B 74 5D 2C 20 4F 75 74  ut_File);♪◙      fputc(b[t], Out
00003AA0  5F 46 69 6C 65 29 3B 0D  0A 20 20 20 20 20 20 74  2B 3D 69 3B 0D 0A 20 20  20 20 7D 0D 0A 20 20 20  _File);♪◙      t+=i;♪◙    }♪◙   
00003AC0  20 65 6C 73 65 0D 0A 20  20 20 20 7B 0D 0A 20 20  20 20 20 20 69 66 28 28  28 62 5B 74 5D 29 26 30   else♪◙    {♪◙      if(((b[t])&0
00003AE0  78 63 30 29 3D 3D 30 78  63 30 29 0D 0A 09 66 70  75 74 63 28 30 78 63 31  2C 20 4F 75 74 5F 46 69  xc0)==0xc0)♪◙○fputc(0xc1, Out_Fi
00003B00  6C 65 29 3B 0D 0A 20 20  20 20 20 20 66 70 75 74  63 28 62 5B 74 2B 2B 5D  2C 20 4F 75 74 5F 46 69  le);♪◙      fputc(b[t++], Out_Fi
00003B20  6C 65 29 3B 0D 0A 20 20  20 20 7D 0D 0A 20 20 7D  0D 0A 20 20 77 68 69 6C  65 28 74 3C 58 52 65 73  le);♪◙    }♪◙  }♪◙  while(t<XRes
00003B40  29 3B 0D 0A 7D 0D 0A 0D  0A 76 6F 69 64 20 53 61  76 65 5F 50 43 58 28 29  0D 0A 7B 0D 0A 20 20 57  );♪◙}♪◙♪◙void Save_PCX()♪◙{♪◙  W
00003B60  6F 72 64 20 79 3B 0D 0A  0D 0A 20 20 69 66 28 28  4F 75 74 5F 46 69 6C 65  3D 66 6F 70 65 6E 28 46  ord y;♪◙♪◙  if((Out_File=fopen(F
00003B80  69 6C 65 5F 4E 61 6D 65  5F 32 2C 20 22 77 62 22  29 29 3D 3D 4E 55 4C 4C  29 0D 0A 20 20 7B 0D 0A  ile_Name_2, "wb"))==NULL)♪◙  {♪◙
00003BA0  20 20 20 20 75 6E 67 65  74 63 68 28 33 32 29 3B  0D 0A 20 20 20 20 45 78  69 74 5F 47 72 61 70 68      ungetch(32);♪◙    Exit_Graph
00003BC0  69 63 73 28 29 3B 0D 0A  20 20 20 20 70 72 69 6E  74 66 28 22 43 61 6E 6E  6F 74 20 6F 70 65 6E 20  ics();♪◙    printf("Cannot open 
00003BE0  6F 75 74 70 75 74 20 66  69 6C 65 21 5C 6E 5C 6E  48 69 74 20 61 6E 79 20  6B 65 79 20 74 6F 20 65  output file!\n\nHit any key to e
00003C00  78 69 74 2E 2E 2E 2E 22  29 3B 0D 0A 20 20 20 20  67 65 74 63 68 28 29 3B  0D 0A 20 20 20 20 65 78  xit....");♪◙    getch();♪◙    ex
00003C20  69 74 28 31 29 3B 0D 0A  20 20 7D 0D 0A 20 20 70  75 74 63 28 30 78 30 61  2C 20 4F 75 74 5F 46 69  it(1);♪◙  }♪◙  putc(0x0a, Out_Fi
00003C40  6C 65 29 3B 0D 0A 20 20  70 75 74 63 28 35 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 70 75  le);♪◙  putc(5, Out_File);♪◙  pu
00003C60  74 63 28 31 2C 20 4F 75  74 5F 46 69 6C 65 29 3B  0D 0A 20 20 70 75 74 63  28 38 2C 20 4F 75 74 5F  tc(1, Out_File);♪◙  putc(8, Out_
00003C80  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 0A 20 20  File);♪◙  putw(0, Out_File);♪◙  
00003CA0  70 75 74 77 28 30 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 70 75  74 77 28 58 52 65 73 2D  putw(0, Out_File);♪◙  putw(XRes-
00003CC0  31 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 2D 31 2C 20 4F 75  1, Out_File);♪◙  putw(YRes-1, Ou
00003CE0  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 6C 65 29  t_File);♪◙  putw(XRes, Out_File)
00003D00  3B 0D 0A 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 66 6F  ;♪◙  putw(YRes, Out_File);♪◙  fo
00003D20  72 28 79 3D 30 3B 20 79  3C 34 39 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<49; y++)♪◙   putc(0, Ou
00003D40  74 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  t_File);♪◙  putc(1, Out_File);♪◙
00003D60  20 20 70 75 74 77 28 58  52 65 73 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 70 75 74 77 28    putw(XRes, Out_File);♪◙  putw(
00003D80  32 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 3C 35 38 3B 20  2, Out_File);♪◙  for(y=0; y<58; 
00003DA0  79 2B 2B 29 0D 0A 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 66  y++)♪◙   putc(0, Out_File);♪◙  f
00003DC0  6F 72 28 79 3D 30 3B 20  79 3C 59 52 65 73 3B 20  79 2B 2B 29 0D 0A 20 20  20 20 57 72 69 74 65 5F  or(y=0; y<YRes; y++)♪◙    Write_
00003DE0  50 43 58 5F 4C 69 6E 65  28 79 29 3B 0D 0A 20 20  70 75 74 63 28 30 78 30  43 2C 20 4F 75 74 5F 46  PCX_Line(y);♪◙  putc(0x0C, Out_F
00003E00  69 6C 65 29 3B 0D 0A 20  20 66 6F 72 28 79 3D 30  3B 20 79 3C 32 35 36 3B  20 79 2B 2B 29 0D 0A 20  ile);♪◙  for(y=0; y<256; y++)♪◙ 
00003E20  20 7B 0D 0A 20 20 20 20  70 75 74 63 28 28 28 50  61 6C 5B 79 5D 2E 52 65  64 29 3C 3C 32 29 2C 20   {♪◙    putc(((Pal[y].Red)<<2), 
00003E40  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 20 20  70 75 74 63 28 28 28 50  61 6C 5B 79 5D 2E 47 72  Out_File);♪◙    putc(((Pal[y].Gr
00003E60  6E 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 63 28 28 28 50  n)<<2), Out_File);♪◙    putc(((P
00003E80  61 6C 5B 79 5D 2E 42 6C  75 29 3C 3C 32 29 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 7D 0D  al[y].Blu)<<2), Out_File);♪◙  }♪
00003EA0  0A 20 20 66 63 6C 6F 73  65 28 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 7D 0D  0A 66 6C 6F 61 74 20 4D  ◙  fclose(Out_File);♪◙}♪◙float M
00003EC0  49 4E 28 66 6C 6F 61 74  20 61 2C 20 66 6C 6F 61  74 20 62 29 0D 0A 66 6C  6F 61 74 20 4D 41 58 28  IN(float a, float b)♪◙float MAX(
00003EE0  66 6C 6F 61 74 20 61 2C  20 66 6C 6F 61 74 20 62  29 0D 0A 66 6C 6F 61 74  20 4D 49 4E 33 28 66 6C  float a, float b)♪◙float MIN3(fl
00003F00  6F 61 74 20 61 2C 20 66  6C 6F 61 74 20 62 2C 20  66 6C 6F 61 74 20 63 29  0D 0A 66 6C 6F 61 74 20  oat a, float b, float c)♪◙float 
00003F20  4D 41 58 33 28 66 6C 6F  61 74 20 61 2C 20 66 6C  6F 61 74 20 62 2C 20 66  6C 6F 61 74 20 63 29 0D  MAX3(float a, float b, float c)♪
00003F40  0A 66 6C 6F 61 74 20 4D  49 4E 34 28 66 6C 6F 61  74 20 61 2C 20 66 6C 6F  61 74 20 62 2C 20 66 6C  ◙float MIN4(float a, float b, fl
00003F60  6F 61 74 20 63 2C 20 66  6C 6F 61 74 20 64 29 0D  0A 66 6C 6F 61 74 20 4D  41 58 34 28 66 6C 6F 61  oat c, float d)♪◙float MAX4(floa
00003F80  74 20 61 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  t a, float b, float c, float d)♪
00003FA0  0A 76 6F 69 64 20 56 65  63 4D 69 6E 28 54 44 41  20 61 2C 20 54 44 41 20  62 2C 20 54 44 41 20 63  ◙void VecMin(TDA a, TDA b, TDA c
00003FC0  29 0D 0A 76 6F 69 64 20  56 65 63 4D 61 78 28 54  44 41 20 61 2C 20 54 44  41 20 62 2C 20 54 44 41  )♪◙void VecMax(TDA a, TDA b, TDA
00003FE0  20 63 29 0D 0A 76 6F 69  64 20 56 65 63 4E 65 67  61 74 65 28 54 44 41 20  41 29 0D 0A 76 6F 69 64   c)♪◙void VecNegate(TDA A)♪◙void
00004000  20 49 6E 69 74 52 61 6E  64 28 66 6C 6F 61 74 20  53 65 65 64 29 0D 0A 69  6E 74 20 52 61 6E 64 49   InitRand(float Seed)♪◙int RandI
00004020  6E 74 28 57 6F 72 64 20  52 61 6E 67 65 29 0D 0A  66 6C 6F 61 74 20 52 61  6E 64 28 29 0D 0A 42 79  nt(Word Range)♪◙float Rand()♪◙By
00004040  74 65 20 47 65 74 5F 50  69 78 65 6C 5F 32 28 57  6F 72 64 20 78 2C 20 57  6F 72 64 20 79 29 0D 0A  te Get_Pixel_2(Word x, Word y)♪◙
00004060  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 64 6F  #include "stdio.h"♪◙#include "do
00004080  73 2E 68 22 0D 0A 23 69  6E 63 6C 75 64 65 20 22  61 6C 6C 6F 63 2E 68 22  0D 0A 23 69 6E 63 6C 75  s.h"♪◙#include "alloc.h"♪◙#inclu
000040A0  64 65 20 22 73 74 72 69  6E 67 2E 68 22 0D 0A 23  69 6E 63 6C 75 64 65 20  22 64 65 66 73 2E 68 22  de "string.h"♪◙#include "defs.h"
000040C0  0D 0A 23 69 6E 63 6C 75  64 65 20 22 67 6C 6F 62  61 6C 73 2E 68 22 0D 0A  23 69 6E 63 6C 75 64 65  ♪◙#include "globals.h"♪◙#include
000040E0  20 22 6D 61 74 68 62 2E  68 22 0D 0A 0D 0A 23 64  65 66 69 6E 65 20 73 74  61 74 65 73 20 33 36 0D   "mathb.h"♪◙♪◙#define states 36♪
00004100  0A 23 64 65 66 69 6E 65  20 6D 61 78 73 74 61 74  65 20 73 74 61 74 65 73  2D 31 0D 0A 0D 0A 74 79  ◙#define maxstate states-1♪◙♪◙ty
00004120  70 65 64 65 66 20 42 79  74 65 20 73 74 61 74 65  5B 33 36 5D 3B 0D 0A 74  79 70 65 64 65 66 20 73  pedef Byte state[36];♪◙typedef s
00004140  74 61 74 65 20 72 75 6C  65 69 3B 0D 0A 74 79 70  65 64 65 66 20 72 75 6C  65 69 20 72 75 6C 65 5B  tate rulei;♪◙typedef rulei rule[
00004160  33 36 5D 3B 0D 0A 74 79  70 65 64 65 66 20 63 68  61 72 20 6E 61 6D 65 5B  33 33 5D 3B 0D 0A 0D 0A  36];♪◙typedef char name[33];♪◙♪◙
00004180  6E 61 6D 65 20 72 75 6C  65 66 69 6C 65 6E 61 6D  65 3B 0D 0A 46 49 4C 45  20 2A 72 75 6C 65 66 69  name rulefilename;♪◙FILE *rulefi
000041A0  6C 65 3B 0D 0A 72 75 6C  65 20 66 61 72 20 2A 72  75 6C 65 73 3B 0D 0A 57  6F 72 64 20 69 2C 20 6A  le;♪◙rule far *rules;♪◙Word i, j
000041C0  2C 20 6B 3B 0D 0A 69 6E  74 20 78 3B 0D 0A 42 79  74 65 20 6F 3B 0D 0A 42  79 74 65 20 72 3B 0D 0A  , k;♪◙int x;♪◙Byte o;♪◙Byte r;♪◙
000041E0  76 6F 69 64 20 77 72 69  74 65 72 75 6C 65 66 69  6C 65 28 29 0D 0A 7B 0D  0A 20 20 66 77 72 69 74  void writerulefile()♪◙{♪◙  fwrit
00004200  65 28 72 75 6C 65 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  e(rules, sizeof(rule), 36, rulef
00004220  69 6C 65 29 3B 0D 0A 20  20 66 63 6C 6F 73 65 28  72 75 6C 65 66 69 6C 65  29 3B 0D 0A 7D 0D 0A 20  ile);♪◙  fclose(rulefile);♪◙}♪◙ 
00004240  20 73 74 72 63 70 79 28  72 75 6C 65 66 69 6C 65  6E 61 6D 65 2C 20 22 52  55 4C 45 2E 43 41 22 29   strcpy(rulefilename, "RULE.CA")
00004260  3B 0D 0A 20 20 69 66 28  28 72 75 6C 65 66 69 6C  65 3D 66 6F 70 65 6E 28  72 75 6C 65 66 69 6C 65  ;♪◙  if((rulefile=fopen(rulefile
00004280  6E 61 6D 65 2C 20 22 77  62 22 29 29 3D 3D 4E 55  4C 4C 29 0D 0A 20 20 7B  0D 0A 20 20 20 20 70 72  name, "wb"))==NULL)♪◙  {♪◙    pr
000042A0  69 6E 74 66 28 22 63 61  6E 27 74 20 6F 70 65 6E  20 66 69 6C 65 2E 5C 6E  22 29 3B 0D 0A 20 20 20  intf("can't open file.\n");♪◙   
000042C0  20 65 78 69 74 28 31 29  3B 0D 0A 20 20 7D 0D 0A  20 20 72 75 6C 65 73 3D  66 61 72 63 61 6C 6C 6F   exit(1);♪◙  }♪◙  rules=farcallo
000042E0  63 28 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  c(36, sizeof(rule));♪◙  if(rules
00004300  3D 3D 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  ==NULL)♪◙  {♪◙    printf("can't 
00004320  67 65 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  get the mem!\n");♪◙    exit(1);♪
00004340  0A 20 20 7D 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
00004360  65 29 2C 20 33 36 2C 20  72 75 6C 65 66 69 6C 65  29 3B 0D 0A FF FF 00 00                           e), 36, rulefile);♪◙  ..