==============================================================================================================================================
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 5F 00 04 00 00 00  35 00 0A 00 0A 00 53 49  45 52 31 44 2E 43 00 01  00 01 00 01 00 01 00 01  d._.♦...5.◙.◙.SIER1D.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 00  00 4D 41 54 48 42 2E 43  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...MATHB.C
00000060  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 01 00 01  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺
00000080  00 00 00 65 00 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  ...e.½.♫.∟.ë...♥.•.¶.↑.!...C.I.O
000000A0  00 68 00 7B 00 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  .h.{.⌂.à.OL.OL....\MODEL\*.H.*.*
000000C0  00 2E 2E 5C 2A 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  ...\*.TXT...\MODEL\*.C.C:\BORLAN
000000E0  44 43 5C 43 4C 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  DC\CLIB\*.C.*.INC.*.TXT.\BLSC\AN
00000100  49 4D 41 54 45 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  IMATE\ANIMATE4.C.\BLSC\SCNSCRPT\
00000120  2A 2E 43 00 2A 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  *.C.*.H.*.PAS.*.C.v.○.☺.☻.☺....x
00000140  00 97 00 0F 00 1E 00 73  00 00 00 02 00 07 00 0B  00 0C 00 14 00 20 00 2E  00 37 00 3E 00 44 00 4A  .ù.☼.▲.s...☻.•.♂.♀.¶. ...7.>.D.J
00000160  00 4F 00 5C 00 65 00 38  00 50 41 52 54 00 62 69  74 00 00 50 72 65 70 61  72 65 00 52 65 66 6C 53  .O.\.e.8.PART.bit..Prepare.ReflS
00000180  75 72 66 61 63 65 00 49  6E 69 74 5F 47 72 61 70  68 69 63 73 00 6D 61 78  73 74 61 74 65 00 73 74  urface.Init_Graphics.maxstate.st
000001A0  61 74 65 73 00 73 74 61  74 65 00 72 75 6C 65 69  00 72 75 6C 65 00 52 75  6C 65 66 69 6C 65 6E 61  ates.state.rulei.rule.Rulefilena
000001C0  6D 65 00 52 75 6C 65 66  69 6C 65 00 77 72 69 74  65 52 75 6C 65 46 69 6C  65 00 79 00 8C 00 0F 00  me.Rulefile.writeRuleFile.y.î.☼.
000001E0  1E 00 68 00 00 00 09 00  0F 00 14 00 19 00 1F 00  25 00 2C 00 2F 00 30 00  39 00 3F 00 44 00 51 00  ▲.h...○.☼.¶.↓.▼.%.,./.0.9.?.D.Q.
00000200  5A 00 4F 75 74 5F 46 69  6C 65 00 66 6C 6F 61 74  00 57 6F 72 64 00 42 79  74 65 00 28 69 6E 74 29  Z.Out_File.float.Word.Byte.(int)
00000220  00 54 68 72 65 65 00 54  68 72 65 65 2D 00 2E 43  00 00 4D 61 78 53 74 61  74 65 00 53 74 61 74 65  .Three.Three-..C..MaxState.State
00000240  00 52 75 6C 65 00 52 75  6C 65 46 69 6C 65 4E 61  6D 65 00 52 75 6C 65 46  69 6C 65 00 57 72 69 74  .Rule.RuleFileName.RuleFile.Writ
00000260  65 52 75 6C 65 46 69 6C  65 00 7A 00 14 00 02 00  04 00 0A 00 00 00 06 00  2A 2E 4F 42 4A 00 2A 2E  eRuleFile.z.¶.☻.♦.◙...♠.*.OBJ.*.
00000280  43 00 F4 01 1C 05 1E 00  00 19 00 00 0F 05 40 15  0F 05 40 15 04 00 20 20  84 03 00 00 00 00 00 00  C.⌠☺∟♣▲..↓..☼♣@§☼♣@§♦.  ä♥......
000002A0  00 00 2E 00 12 00 00 19  00 00 00 11 4F 17 00 11  4F 17 02 00 30 0D 34 00  01 19 00 01 00 01 4F 17  ....↕..↓...◄O↨.◄O↨☻.0♪4.☺↓.☺.☺O↨
000002C0  00 01 4F 10 00 00 00 00  01 00 3C 02 01 00 2A 02  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  .☺O►....☺.<☻☺.*☻................
000002E0  01 00 3C 02 01 00 3C 02  00 00 52 00 00 19 00 00  01 02 4F 17 00 01 4F 10  00 00 00 00 43 3A 5C 42  ☺.<☻☺.<☻..R..↓..☺☻O↨.☺O►....C:\B
00000300  4C 53 50 5C 42 4F 4F 4B  4D 49 53 43 5C 54 4D 50  5C 52 55 4C 45 2E 50 41  53 00 01 00 01 00 01 00  LSP\BOOKMISC\TMP\RULE.PAS.☺.☺.☺.
00000320  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 00 00 19  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...R..↓
00000340  00 00 02 03 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
00000360  4D 50 5C 52 55 4C 45 2E  50 41 53 00 01 00 55 00  01 00 43 00 01 00 01 00  01 00 01 00 01 00 01 00  MP\RULE.PAS.☺.U.☺.C.☺.☺.☺.☺.☺.☺.
00000380  01 00 01 00 01 00 01 00  01 00 01 00 00 00 4F 00  00 19 00 00 02 03 4F 17  00 01 4F 10 00 00 00 00  ☺.☺.☺.☺.☺.☺...O..↓..☻♥O↨.☺O►....
000003A0  43 3A 5C 42 4C 53 43 5C  41 4E 49 4D 41 54 45 5C  41 4E 49 4D 41 54 45 34  2E 43 00 01 00 E7 01 01  C:\BLSC\ANIMATE\ANIMATE4.C.☺.τ☺☺
000003C0  00 E7 01 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..
000003E0  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 54 5C  ↓..☻♥O↨.☺O►....C:\BLSC\SCNSCRPT\
00000400  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 00 01  SCNSCR.C.☺.m.☺.m.☺.☺.☺.☺.☺.☺.☺.☺
00000420  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 3A 5C  .☺.☺.☺.☺...P..↓..☺☻O↨.☺O►....C:\
00000440  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 00 01  BLSP\BOOKMISC\TMP\RULE.C.☺.☺.☺.☺
00000460  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 19 00  .☺.☺.☺.☺.☺.☺.☺.☺.☺.↑.☺.↑...O..↓.
00000480  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 4C 42  ☺.☺O↨.☺O►....C:\BLSC\ANIMATE\OLB
000004A0  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 01 00  LSC.TXT.☺.╡.☺.╡.☺.☺.☺.☺.☺.☺.☺.☺.
000004C0  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 5C 42  ☺.☺.☺.☺...N..↓..☻♥O↨.☺O►....C:\B
000004E0  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 01 00  LSC\SCNSCRPT\SCNSCR.C.☺.[.☺.[.☺.
00000500  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 00 01  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...C..↓.☺.☺
00000520  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 00 B3  O↨.☺O►....C:\WORK\DC22.C.☺.┬.☺.│
00000540  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 19 00  .☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...N..↓.
00000560  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 47 52  .☺☻O↨.☺O►....C:\BORLANDC\CLIB\GR
00000580  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 00 01  APHB.H.↓.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺
000005A0  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 42 4F  .#.☺.#...N..↓.☺.☺O↨.☺O►....C:\BO
000005C0  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 00 01  RLANDC\CLIB\GRAPHB.C.☺.q☻☺.g☻☺.☺
000005E0  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 01 4F  .☺.Z☻♥.╟☺☺.☺.☺.q☻☺.q☻..M..↓...☺O
00000600  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 42 2E  ►.☺O►....C:\BORLANDC\CLIB\MATHB.
00000620  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 01 00  H.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.
00000640  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 42 4F  ☺...V..↓..☺☻O↨.☺O►....C:\BLSP\BO
00000660  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 52 00  OKMISC\TMP\SIERRULE.PAS.☺._.☺.R.
00000680  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 00 00  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...P..↓..
000006A0  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 4D 50  ☺☻O↨.☺O►....C:\BLSP\BOOKMISC\TMP
000006C0  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 01 00  \RULE.C.☺.9.☺.&.☺.☺.☺.☺.☺.☺.☺.☺.
000006E0  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 5C 42  ☺.9.☺.9...T..↓.☺.☺O↨.☺O►....C:\B
00000700  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 01 00 01 00  LSP\BOOKMISC\TMP\SIERRULE.C.☺.☺.
00000720  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 00  ☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺...R.
00000740  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 43  .↓.☺.☺O↨.☺O►....C:\BLSP\BOOKMISC
00000760  5C 54 4D 50 5C 53 49 45  52 31 44 2E 43 00 19 00  2E 00 01 00 1D 00 01 00  01 00 01 00 01 00 01 00  \TMP\SIER1D.C.↓...☺.↔.☺.☺.☺.☺.☺.
00000780  01 00 01 00 01 00 01 00  01 00 01 00 01 00 00 00  12 00 00 19 00 00 00 11  4F 17 00 11 4F 17 08 00  ☺.☺.☺.☺.☺.☺.☺...↕..↓...◄O↨.◄O↨◘.
000007A0  00 00 F6 01 15 3B 4D 41  54 45 52 49 41 4C 0D 0A  20 20 20 54 59 50 45 20  20 20 20 3D 20 4D 49 52  ..÷☺§;MATERIAL♪◙   TYPE    = MIR
000007C0  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 41 4D 42  ROR♪◙   TEXTURE = SMOOTH♪◙   AMB
000007E0  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 30 30  RFL  =    0.000    0.000    0.00
00000800  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 2E 37 30  0♪◙   DIFRFL  =    0.700    0.70
00000820  30 20 20 20 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 33 30  0    0.700♪◙   SPCRFL  =    0.30
00000840  30 20 20 20 20 30 2E 33  30 30 20 20 20 20 30 2E  33 30 30 0D 0A 20 20 20  47 4C 4F 53 53 20 20 20  0    0.300    0.300♪◙   GLOSS   
00000860  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 45 20  =   50.000♪◙♪◙MATERIAL♪◙   TYPE 
00000880  20 20 20 3D 20 52 45 44  4D 49 52 52 4F 52 0D 0A  20 20 20 54 45 58 54 55  52 45 20 3D 20 53 4D 4F     = REDMIRROR♪◙   TEXTURE = SMO
000008A0  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.
000008C0  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.
000008E0  37 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 53 50 43 52 46 4C  700    0.000    0.000♪◙   SPCRFL
00000900  20 20 3D 20 20 20 20 30  2E 33 30 30 20 20 20 20  30 2E 30 30 30 20 20 20  20 30 2E 30 30 30 0D 0A    =    0.300    0.000    0.000♪◙
00000920  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
00000940  4C 0D 0A 20 20 20 54 59  50 45 20 20 20 20 3D 20  47 52 45 45 4E 4D 49 52  52 4F 52 0D 0A 20 20 20  L♪◙   TYPE    = GREENMIRROR♪◙   
00000960  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  =  
00000980  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
000009A0  46 52 46 4C 20 20 3D 20  20 20 20 30 2E 30 30 30  20 20 20 20 30 2E 37 30  30 20 20 20 20 30 2E 30  FRFL  =    0.000    0.700    0.0
000009C0  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 33  00♪◙   SPCRFL  =    0.000    0.3
000009E0  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 35 30 2E 30  00    0.000♪◙   GLOSS   =   50.0
00000A00  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 42 4C 55  00♪◙♪◙MATERIAL♪◙   TYPE    = BLU
00000A20  45 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  EMIRROR♪◙   TEXTURE = SMOOTH♪◙  
00000A40  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 30 30 30 20 20 20 20   AMBRFL  =    0.000    0.000    
00000A60  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 30 30 30 20 20 20 20  0.000♪◙   DIFRFL  =    0.000    
00000A80  30 2E 30 30 30 20 20 20  20 30 2E 37 30 30 0D 0A  20 20 20 53 50 43 52 46  4C 20 20 3D 20 20 20 20  0.000    0.700♪◙   SPCRFL  =    
00000AA0  30 2E 30 30 30 20 20 20  20 30 2E 30 30 30 20 20  20 20 30 2E 33 30 30 0D  0A 20 20 20 47 4C 4F 53  0.000    0.000    0.300♪◙   GLOS
00000AC0  53 20 20 20 3D 20 20 20  35 30 2E 30 30 30 0D 0A  4D 41 54 45 52 49 41 4C  0D 0A 20 20 20 54 59 50  S   =   50.000♪◙MATERIAL♪◙   TYP
00000AE0  45 20 20 20 20 3D 20 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  E    = CHROME♪◙   TEXTURE = SMOO
00000B00  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 31  TH♪◙   AMBRFL  =    0.100    0.1
00000B20  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 31  00    0.100♪◙   DIFRFL  =    0.1
00000B40  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 53 50 43 52 46 4C 20  00    0.100    0.100♪◙   SPCRFL 
00000B60  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 38 30 30 0D 0A 20   =    0.800    0.800    0.800♪◙ 
00000B80  20 20 47 4C 4F 53 53 20  20 20 3D 20 20 20 34 30  2E 30 30 30 0D 0A 0D 0A  0D 0A 4D 41 54 45 52 49    GLOSS   =   40.000♪◙♪◙♪◙MATERI
00000BA0  41 4C 0D 0A 20 20 20 54  59 50 45 20 20 20 20 3D  20 42 52 41 53 53 0D 0A  20 20 20 54 45 58 54 55  AL♪◙   TYPE    = BRASS♪◙   TEXTU
00000BC0  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 2E 31  RE = SMOOTH♪◙   AMBRFL  =    0.1
00000BE0  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 4C 20  00    0.100    0.100♪◙   DIFRFL 
00000C00  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 20   =    0.300    0.300    0.300♪◙ 
00000C20  20 20 53 50 43 52 46 4C  20 20 3D 20 20 20 20 30  2E 36 30 30 20 20 20 20  30 2E 35 30 30 20 20 20    SPCRFL  =    0.600    0.500   
00000C40  20 30 2E 32 35 30 0D 0A  20 20 20 47 4C 4F 53 53  20 20 20 3D 20 20 20 33  30 2E 30 30 30 0D 0A 4D   0.250♪◙   GLOSS   =   30.000♪◙M
00000C60  41 54 45 52 49 41 4C 0D  0A 20 20 20 54 59 50 45  20 20 20 20 3D 20 57 41  54 45 52 0D 0A 20 20 20  ATERIAL♪◙   TYPE    = WATER♪◙   
00000C80  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 20 20 20  TEXTURE = GRIT♪◙   AMBRFL  =    
00000CA0  30 2E 31 30 30 20 20 20  20 30 2E 31 30 30 20 20  20 20 30 2E 33 30 30 0D  0A 20 20 20 44 49 46 52  0.100    0.100    0.300♪◙   DIFR
00000CC0  46 4C 20 20 3D 20 20 20  20 30 2E 31 30 30 20 20  20 20 30 2E 33 30 30 20  20 20 20 30 2E 33 30 30  FL  =    0.100    0.300    0.300
00000CE0  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 30 2E 31 30 30  ♪◙   SPCRFL  =    0.100    0.100
00000D00  20 20 20 20 30 2E 34 30  30 0D 0A 20 20 20 47 4C  4F 53 53 20 20 20 3D 20  20 20 20 33 2E 30 30 30      0.400♪◙   GLOSS   =    3.000
00000D20  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 50 4C 41 53 54 49 43  ♪◙MATERIAL♪◙   TYPE    = PLASTIC
00000D40  54 49 4C 45 0D 0A 20 20  20 54 45 58 54 55 52 45  20 3D 20 43 48 45 43 4B  45 52 0D 0A 20 20 20 41  TILE♪◙   TEXTURE = CHECKER♪◙   A
00000D60  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.
00000D80  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 30 20 20 20 20 30 2E  100♪◙   DIFRFL  =    0.700    0.
00000DA0  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 3D 20 20 20 20 30 2E  700    0.700♪◙   SPCRFL  =    0.
00000DC0  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 47 4C 4F 53 53 20  200    0.200    0.200♪◙   GLOSS 
00000DE0  20 20 3D 20 20 20 20 34  2E 30 30 30 0D 0A 0D 0A  43 48 45 43 4B 0D 0A 20  20 20 54 49 4C 45 31 20    =    4.000♪◙♪◙CHECK♪◙   TILE1 
00000E00  20 20 3D 20 20 20 20 31  2E 30 30 30 20 20 20 20  30 2E 30 30 30 20 20 20  20 30 2E 30 30 30 0D 0A    =    1.000    0.000    0.000♪◙
00000E20  20 20 20 54 49 4C 45 32  20 20 20 3D 20 20 20 20  30 2E 32 30 30 20 20 20  20 30 2E 32 30 30 20 20     TILE2   =    0.200    0.200  
00000E40  20 20 30 2E 32 30 30 0D  0A 20 20 20 54 49 4C 45  20 20 20 20 3D 20 20 20  20 30 2E 30 32 0D 0A 4D    0.200♪◙   TILE    =    0.02♪◙M
00000E60  41 54 45 52 49 41 4C 0D  0A 20 20 20 54 59 50 45  20 20 20 20 3D 20 49 54  41 4C 49 41 4E 4D 41 52  ATERIAL♪◙   TYPE    = ITALIANMAR
00000E80  42 4C 45 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  BLE♪◙   TEXTURE = WOOD♪◙   AMBRF
00000EA0  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♪
00000EC0  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 2E 37 30 30 20  ◙   DIFRFL  =    0.700    0.700 
00000EE0  20 20 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 32 30 30 20     0.700♪◙   SPCRFL  =    0.200 
00000F00  20 20 20 30 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     0.200    0.200♪◙   GLOSS   = 
00000F20  20 20 31 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    10.000♪◙MATERIAL♪◙   TYPE    =
00000F40  20 4F 41 4B 57 4F 4F 44  0D 0A 20 20 20 54 45 58  54 55 52 45 20 3D 20 57  4F 4F 44 0D 0A 20 20 20   OAKWOOD♪◙   TEXTURE = WOOD♪◙   
00000F60  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 20 20 30  AMBRFL  =    0.200    0.200    0
00000F80  2E 32 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  .200♪◙   DIFRFL  =    0.700    0
00000FA0  2E 34 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  .400    0.300♪◙   SPCRFL  =    0
00000FC0  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 47 4C 4F 53 53  .100    0.100    0.100♪◙   GLOSS
00000FE0  20 20 20 3D 20 20 20 20  35 2E 30 30 30 0D 0A 4D  41 54 45 52 49 41 4C 0D  0A 20 20 20 54 59 50 45     =    5.000♪◙MATERIAL♪◙   TYPE
00001000  20 20 20 20 3D 20 47 52  41 53 53 0D 0A 20 20 20  54 45 58 54 55 52 45 20  3D 20 47 52 49 54 0D 0A      = GRASS♪◙   TEXTURE = GRIT♪◙
00001020  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  
00001040  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 36 30 30 20 20    0.200♪◙   DIFRFL  =    0.600  
00001060  20 20 30 2E 38 30 30 20  20 20 20 30 2E 32 35 30  0D 0A 20 20 20 53 50 43  52 46 4C 20 20 3D 20 20    0.800    0.250♪◙   SPCRFL  =  
00001080  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
000010A0  4F 53 53 20 20 20 3D 20  20 20 20 30 2E 30 30 30  0D 0A 0D 0A 0D 0A 4D 41  54 45 52 49 41 4C 0D 0A  OSS   =    0.000♪◙♪◙♪◙MATERIAL♪◙
000010C0  20 20 20 54 59 50 45 20  20 20 20 3D 20 43 45 4D  45 4E 54 0D 0A 20 20 20  54 45 58 54 55 52 45 20     TYPE    = CEMENT♪◙   TEXTURE 
000010E0  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 20 20 20  = GRIT♪◙   AMBRFL  =    0.200   
00001100  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  =   
00001120  20 30 2E 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 53 50 43   0.800    0.800    0.800♪◙   SPC
00001140  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 30 30  RFL  =    0.000    0.000    0.00
00001160  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 4D 41 54 45 52 49  0♪◙   GLOSS   =    0.000♪◙MATERI
00001180  41 4C 0D 0A 20 20 20 54  59 50 45 20 20 20 20 3D  20 42 4C 41 43 4B 43 48  52 4F 4D 45 0D 0A 20 20  AL♪◙   TYPE    = BLACKCHROME♪◙  
000011A0  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 20 3D 20   TEXTURE = SMOOTH♪◙   AMBRFL  = 
000011C0  20 20 20 31 2E 30 30 30  20 20 20 20 31 2E 30 30  30 20 20 20 20 31 2E 30  30 30 0D 0A 20 20 20 44     1.000    1.000    1.000♪◙   D
000011E0  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 20 30 2E  IFRFL  =    0.000    0.000    0.
00001200  30 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  000♪◙   SPCRFL  =    0.000    0.
00001220  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 34 30 2E  000    0.000♪◙   GLOSS   =   40.
00001240  30 30 30 0D 0A 50 59 52  41 4D 49 44 0D 0A 20 20  20 4C 4F 43 20 20 20 20  20 3D 20 2D 32 30 30 2E  000♪◙PYRAMID♪◙   LOC     = -200.
00001260  30 30 30 20 39 39 39 39  2E 30 30 30 20 20 20 20  30 2E 30 30 30 0D 0A 20  20 20 56 31 20 20 20 20  000 9999.000    0.000♪◙   V1    
00001280  20 20 3D 20 20 34 30 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    =  400.000    0.000    0.000♪◙
000012A0  20 20 20 56 32 20 20 20  20 20 20 3D 20 20 20 20  30 2E 30 30 30 20 20 34  30 30 2E 30 30 30 20 20     V2      =    0.000  400.000  
000012C0  20 20 30 2E 30 30 30 0D  0A 20 20 20 48 45 49 47  48 54 20 20 3D 20 31 32  30 30 2E 30 30 30 0D 0A    0.000♪◙   HEIGHT  = 1200.000♪◙
000012E0  20 20 20 4D 41 54 4C 20  20 20 20 3D 20 42 4C 41  43 4B 43 48 52 4F 4D 45  0D 0A 4C 41 4D 50 0D 0A     MATL    = BLACKCHROME♪◙LAMP♪◙
00001300  20 20 20 4C 4F 43 20 20  20 20 20 3D 20 31 30 30  30 2E 30 30 30 20 2D 39  39 39 2E 30 30 30 20 31     LOC     = 1000.000 -999.000 1
00001320  30 30 30 2E 30 30 30 0D  0A 20 20 20 52 41 44 49  55 53 20 20 3D 20 20 37  30 30 2E 30 30 30 0D 0A  000.000♪◙   RADIUS  =  700.000♪◙
00001340  20 20 20 49 4E 54 45 4E  53 20 20 3D 20 20 20 20  31 2E 30 30 30 20 20 20  20 31 2E 30 30 30 20 20     INTENS  =    1.000    1.000  
00001360  20 20 30 2E 39 30 30 0D  0A 09 09 61 71 75 61 6D  61 72 69 6E 65 20 20 20  20 20 20 20 20 20 20 20    0.900♪◙○○aquamarine           
00001380  30 2E 34 33 39 32 31 36  20 30 2E 38 35 38 38 32  34 20 30 2E 35 37 36 34  37 31 0D 0A 09 09 62 6C  0.439216 0.858824 0.576471♪◙○○bl
000013A0  61 63 6B 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  ack                0.000000 0.00
000013C0  30 30 30 30 20 30 2E 30  30 30 30 30 30 0D 0A 09  09 62 6C 75 65 20 20 20  20 20 20 20 20 20 20 20  0000 0.000000♪◙○○blue           
000013E0  20 20 20 20 20 20 30 2E  30 30 30 30 30 30 20 30  2E 30 30 30 30 30 30 20  31 2E 30 30 30 30 30 30        0.000000 0.000000 1.000000
00001400  0D 0A 09 09 62 6C 75 65  5F 76 69 6F 6C 65 74 20  20 20 20 20 20 20 20 20  20 30 2E 36 32 33 35 32  ♪◙○○blue_violet          0.62352
00001420  39 20 30 2E 33 37 32 35  34 39 20 30 2E 36 32 33  35 32 39 0D 0A 09 09 62  72 6F 77 6E 20 20 20 20  9 0.372549 0.623529♪◙○○brown    
00001440  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 36 34  37 30 35 39 20 30 2E 31  36 34 37 30 36 20 30 2E              0.647059 0.164706 0.
00001460  31 36 34 37 30 36 0D 0A  09 09 63 61 64 65 74 5F  62 6C 75 65 20 20 20 20  20 20 20 20 20 20 20 30  164706♪◙○○cadet_blue           0
00001480  2E 33 37 32 35 34 39 20  30 2E 36 32 33 35 32 39  20 30 2E 36 32 33 35 32  39 0D 0A 09 09 63 6F 72  .372549 0.623529 0.623529♪◙○○cor
000014A0  61 6C 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 31 2E 30 30 30 30  30 30 20 30 2E 34 39 38  al                1.000000 0.498
000014C0  30 33 39 20 30 2E 30 30  30 30 30 30 0D 0A 09 09  63 6F 72 6E 66 6C 6F 77  65 72 5F 62 6C 75 65 20  039 0.000000♪◙○○cornflower_blue 
000014E0  20 20 20 20 20 30 2E 32  35 38 38 32 34 20 30 2E  32 35 38 38 32 34 20 30  2E 34 33 35 32 39 34 0D       0.258824 0.258824 0.435294♪
00001500  0A 09 09 63 79 61 6E 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  ◙○○cyan                 0.000000
00001520  20 31 2E 30 30 30 30 30  30 20 31 2E 30 30 30 30  30 30 0D 0A 09 09 64 61  72 6B 5F 67 72 65 65 6E   1.000000 1.000000♪◙○○dark_green
00001540  20 20 20 20 20 20 20 20  20 20 20 30 2E 31 38 34  33 31 34 20 30 2E 33 30  39 38 30 34 20 30 2E 31             0.184314 0.309804 0.1
00001560  38 34 33 31 34 0D 0A 09  09 64 61 72 6B 5F 6F 6C  69 76 65 5F 67 72 65 65  6E 20 20 20 20 20 30 2E  84314♪◙○○dark_olive_green     0.
00001580  33 30 39 38 30 34 20 30  2E 33 30 39 38 30 34 20  30 2E 31 38 34 33 31 34  0D 0A 09 09 64 61 72 6B  309804 0.309804 0.184314♪◙○○dark
000015A0  5F 6F 72 63 68 69 64 20  20 20 20 20 20 20 20 20  20 30 2E 36 30 30 30 30  30 20 30 2E 31 39 36 30  _orchid          0.600000 0.1960
000015C0  37 38 20 30 2E 38 30 30  30 30 30 0D 0A 09 09 64  61 72 6B 5F 73 6C 61 74  65 5F 62 6C 75 65 20 20  78 0.800000♪◙○○dark_slate_blue  
000015E0  20 20 20 20 30 2E 34 31  39 36 30 38 20 30 2E 31  33 37 32 35 35 20 30 2E  35 35 36 38 36 33 0D 0A      0.419608 0.137255 0.556863♪◙
00001600  09 09 64 61 72 6B 5F 73  6C 61 74 65 5F 67 72 61  79 20 20 20 20 20 20 30  2E 31 38 34 33 31 34 20  ○○dark_slate_gray      0.184314 
00001620  30 2E 33 30 39 38 30 34  20 30 2E 33 30 39 38 30  34 0D 0A 09 09 64 61 72  6B 5F 73 6C 61 74 65 5F  0.309804 0.309804♪◙○○dark_slate_
00001640  67 72 65 79 20 20 20 20  20 20 30 2E 31 38 34 33  31 34 20 30 2E 33 30 39  38 30 34 20 30 2E 33 30  grey      0.184314 0.309804 0.30
00001660  39 38 30 34 0D 0A 09 09  64 61 72 6B 5F 74 75 72  71 75 6F 69 73 65 20 20  20 20 20 20 20 30 2E 34  9804♪◙○○dark_turquoise       0.4
00001680  33 39 32 31 36 20 30 2E  35 37 36 34 37 31 20 30  2E 38 35 38 38 32 34 0D  0A 09 09 64 69 6D 5F 67  39216 0.576471 0.858824♪◙○○dim_g
000016A0  72 61 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  ray             0.329412 0.32941
000016C0  32 20 30 2E 33 32 39 34  31 32 0D 0A 09 09 64 69  6D 5F 67 72 65 79 20 20  20 20 20 20 20 20 20 20  2 0.329412♪◙○○dim_grey          
000016E0  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 31 32 0D 0A 09     0.329412 0.329412 0.329412♪◙○
00001700  09 66 69 72 65 62 72 69  63 6B 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  35 35 36 38 36 33 20 30  ○firebrick            0.556863 0
00001720  2E 31 33 37 32 35 35 20  30 2E 31 33 37 32 35 35  0D 0A 09 09 66 6F 72 65  73 74 5F 67 72 65 65 6E  .137255 0.137255♪◙○○forest_green
00001740  20 20 20 20 20 20 20 20  20 30 2E 31 33 37 32 35  35 20 30 2E 35 35 36 38  36 33 20 30 2E 31 33 37           0.137255 0.556863 0.137
00001760  32 35 35 0D 0A 09 09 67  6F 6C 64 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 38 30  255♪◙○○gold                 0.80
00001780  30 30 30 30 20 30 2E 34  39 38 30 33 39 20 30 2E  31 39 36 30 37 38 0D 0A  09 09 67 6F 6C 64 65 6E  0000 0.498039 0.196078♪◙○○golden
000017A0  72 6F 64 20 20 20 20 20  20 20 20 20 20 20 20 30  2E 38 35 38 38 32 34 20  30 2E 38 35 38 38 32 34  rod            0.858824 0.858824
000017C0  20 30 2E 34 33 39 32 31  36 0D 0A 09 09 67 72 61  79 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20   0.439216♪◙○○gray               
000017E0  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 0D 0A 09 09    0.752941 0.752941 0.752941♪◙○○
00001800  67 72 65 65 6E 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  green                0.000000 1.
00001820  30 30 30 30 30 30 20 30  2E 30 30 30 30 30 30 0D  0A 09 09 67 72 65 65 6E  5F 79 65 6C 6C 6F 77 20  000000 0.000000♪◙○○green_yellow 
00001840  20 20 20 20 20 20 20 20  30 2E 35 37 36 34 37 31  20 30 2E 38 35 38 38 32  34 20 30 2E 34 33 39 32          0.576471 0.858824 0.4392
00001860  31 36 0D 0A 09 09 67 72  65 79 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 37 35 32  16♪◙○○grey                 0.752
00001880  39 34 31 20 30 2E 37 35  32 39 34 31 20 30 2E 37  35 32 39 34 31 0D 0A 09  09 69 6E 64 69 61 6E 5F  941 0.752941 0.752941♪◙○○indian_
000018A0  72 65 64 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  red           0.309804 0.184314 
000018C0  30 2E 31 38 34 33 31 34  0D 0A 09 09 6B 68 61 6B  69 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  0.184314♪◙○○khaki               
000018E0  20 30 2E 36 32 33 35 32  39 20 30 2E 36 32 33 35  32 39 20 30 2E 33 37 32  35 34 39 0D 0A 09 09 6C   0.623529 0.623529 0.372549♪◙○○l
00001900  69 67 68 74 5F 62 6C 75  65 20 20 20 20 20 20 20  20 20 20 20 30 2E 37 34  39 30 32 30 20 30 2E 38  ight_blue           0.749020 0.8
00001920  34 37 30 35 39 20 30 2E  38 34 37 30 35 39 0D 0A  09 09 6C 69 67 68 74 5F  67 72 61 79 20 20 20 20  47059 0.847059♪◙○○light_gray    
00001940  20 20 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         0.658824 0.658824 0.65882
00001960  34 0D 0A 09 09 6C 69 67  68 74 5F 67 72 65 79 20  20 20 20 20 20 20 20 20  20 20 30 2E 36 35 38 38  4♪◙○○light_grey           0.6588
00001980  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 68 74 5F 73 74  24 0.658824 0.658824♪◙○○light_st
000019A0  65 65 6C 5F 62 6C 75 65  20 20 20 20 20 30 2E 35  36 30 37 38 34 20 30 2E  35 36 30 37 38 34 20 30  eel_blue     0.560784 0.560784 0
000019C0  2E 37 33 37 32 35 35 0D  0A 09 09 6C 69 6D 65 5F  67 72 65 65 6E 20 20 20  20 20 20 20 20 20 20 20  .737255♪◙○○lime_green           
000019E0  30 2E 31 39 36 30 37 38  20 30 2E 38 30 30 30 30  30 20 30 2E 31 39 36 30  37 38 0D 0A 09 09 6D 61  0.196078 0.800000 0.196078♪◙○○ma
00001A00  67 65 6E 74 61 20 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  genta              1.000000 0.00
00001A20  30 30 30 30 20 31 2E 30  30 30 30 30 30 0D 0A 09  09 6D 61 72 6F 6F 6E 20  20 20 20 20 20 20 20 20  0000 1.000000♪◙○○maroon         
00001A40  20 20 20 20 20 20 30 2E  35 35 36 38 36 33 20 30  2E 31 33 37 32 35 35 20  30 2E 34 31 39 36 30 38        0.556863 0.137255 0.419608
00001A60  0D 0A 09 09 6D 65 64 69  75 6D 5F 61 71 75 61 6D  61 72 69 6E 65 20 20 20  20 30 2E 31 39 36 30 37  ♪◙○○medium_aquamarine    0.19607
00001A80  38 20 30 2E 38 30 30 30  30 30 20 30 2E 36 30 30  30 30 30 0D 0A 09 09 6D  65 64 69 75 6D 5F 62 6C  8 0.800000 0.600000♪◙○○medium_bl
00001AA0  75 65 20 20 20 20 20 20  20 20 20 20 30 2E 31 39  36 30 37 38 20 30 2E 31  39 36 30 37 38 20 30 2E  ue          0.196078 0.196078 0.
00001AC0  38 30 30 30 30 30 0D 0A  09 09 6D 65 64 69 75 6D  5F 66 6F 72 65 73 74 5F  67 72 65 65 6E 20 20 30  800000♪◙○○medium_forest_green  0
00001AE0  2E 34 31 39 36 30 38 20  30 2E 35 35 36 38 36 33  20 30 2E 31 33 37 32 35  35 0D 0A 09 09 6D 65 64  .419608 0.556863 0.137255♪◙○○med
00001B00  69 75 6D 5F 67 6F 6C 64  65 6E 72 6F 64 20 20 20  20 20 30 2E 39 31 37 36  34 37 20 30 2E 39 31 37  ium_goldenrod     0.917647 0.917
00001B20  36 34 37 20 30 2E 36 37  38 34 33 31 0D 0A 09 09  6D 65 64 69 75 6D 5F 6F  72 63 68 69 64 20 20 20  647 0.678431♪◙○○medium_orchid   
00001B40  20 20 20 20 20 30 2E 35  37 36 34 37 31 20 30 2E  34 33 39 32 31 36 20 30  2E 38 35 38 38 32 34 0D       0.576471 0.439216 0.858824♪
00001B60  0A 09 09 6D 65 64 69 75  6D 5F 73 65 61 5F 67 72  65 65 6E 20 20 20 20 20  30 2E 32 35 38 38 32 34  ◙○○medium_sea_green     0.258824
00001B80  20 30 2E 34 33 35 32 39  34 20 30 2E 32 35 38 38  32 34 0D 0A 09 09 6D 65  64 69 75 6D 5F 73 6C 61   0.435294 0.258824♪◙○○medium_sla
00001BA0  74 65 5F 62 6C 75 65 20  20 20 20 30 2E 34 39 38  30 33 39 20 30 2E 30 30  30 30 30 30 20 31 2E 30  te_blue    0.498039 0.000000 1.0
00001BC0  30 30 30 30 30 0D 0A 09  09 6D 65 64 69 75 6D 5F  73 70 72 69 6E 67 5F 67  72 65 65 6E 20 20 30 2E  00000♪◙○○medium_spring_green  0.
00001BE0  34 39 38 30 33 39 20 31  2E 30 30 30 30 30 30 20  30 2E 30 30 30 30 30 30  0D 0A 09 09 6D 65 64 69  498039 1.000000 0.000000♪◙○○medi
00001C00  75 6D 5F 74 75 72 71 75  6F 69 73 65 20 20 20 20  20 30 2E 34 33 39 32 31  36 20 30 2E 38 35 38 38  um_turquoise     0.439216 0.8588
00001C20  32 34 20 30 2E 38 35 38  38 32 34 0D 0A 09 09 6D  65 64 69 75 6D 5F 76 69  6F 6C 65 74 5F 72 65 64  24 0.858824♪◙○○medium_violet_red
00001C40  20 20 20 20 30 2E 38 35  38 38 32 34 20 30 2E 34  33 39 32 31 36 20 30 2E  35 37 36 34 37 31 0D 0A      0.858824 0.439216 0.576471♪◙
00001C60  09 09 6D 69 64 6E 69 67  68 74 5F 62 6C 75 65 20  20 20 20 20 20 20 20 30  2E 31 38 34 33 31 34 20  ○○midnight_blue        0.184314 
00001C80  30 2E 31 38 34 33 31 34  20 30 2E 33 30 39 38 30  34 0D 0A 09 09 6E 61 76  79 20 20 20 20 20 20 20  0.184314 0.309804♪◙○○navy       
00001CA0  20 20 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            0.137255 0.137255 0.55
00001CC0  36 38 36 33 0D 0A 09 09  6E 61 76 79 5F 62 6C 75  65 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 31  6863♪◙○○navy_blue            0.1
00001CE0  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 6F 72 61 6E 67  37255 0.137255 0.556863♪◙○○orang
00001D00  65 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 31 39 36 30 37  e               0.800000 0.19607
00001D20  38 20 30 2E 31 39 36 30  37 38 0D 0A 09 09 6F 72  61 6E 67 65 5F 72 65 64  20 20 20 20 20 20 20 20  8 0.196078♪◙○○orange_red        
00001D40  20 20 20 31 2E 30 30 30  30 30 30 20 30 2E 30 30  30 30 30 30 20 30 2E 34  39 38 30 33 39 0D 0A 09     1.000000 0.000000 0.498039♪◙○
00001D60  09 6F 72 63 68 69 64 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  ○orchid               0.858824 0
00001D80  2E 34 33 39 32 31 36 20  30 2E 38 35 38 38 32 34  0D 0A 09 09 70 61 6C 65  5F 67 72 65 65 6E 20 20  .439216 0.858824♪◙○○pale_green  
00001DA0  20 20 20 20 20 20 20 20  20 30 2E 35 36 30 37 38  34 20 30 2E 37 33 37 32  35 35 20 30 2E 35 36 30           0.560784 0.737255 0.560
00001DC0  37 38 34 0D 0A 09 09 70  69 6E 6B 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 37 33  784♪◙○○pink                 0.73
00001DE0  37 32 35 35 20 30 2E 35  36 30 37 38 34 20 30 2E  35 36 30 37 38 34 0D 0A  09 09 70 6C 75 6D 20 20  7255 0.560784 0.560784♪◙○○plum  
00001E00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 30  2E 39 31 37 36 34 37 20  30 2E 36 37 38 34 33 31                 0.917647 0.678431
00001E20  20 30 2E 39 31 37 36 34  37 0D 0A 09 09 72 65 64  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20   0.917647♪◙○○red                
00001E40  20 20 31 2E 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    1.000000 0.000000 0.000000♪◙○○
00001E60  73 61 6C 6D 6F 6E 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 34  33 35 32 39 34 20 30 2E  salmon               0.435294 0.
00001E80  32 35 38 38 32 34 20 30  2E 32 35 38 38 32 34 0D  0A 09 09 73 65 61 5F 67  72 65 65 6E 20 20 20 20  258824 0.258824♪◙○○sea_green    
00001EA0  20 20 20 20 20 20 20 20  30 2E 31 33 37 32 35 35  20 30 2E 35 35 36 38 36  33 20 30 2E 34 31 39 36          0.137255 0.556863 0.4196
00001EC0  30 38 0D 0A 09 09 73 69  65 6E 6E 61 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 35 35 36  08♪◙○○sienna               0.556
00001EE0  38 36 33 20 30 2E 34 31  39 36 30 38 20 30 2E 31  33 37 32 35 35 0D 0A 09  09 73 6B 79 5F 62 6C 75  863 0.419608 0.137255♪◙○○sky_blu
00001F00  65 20 20 20 20 20 20 20  20 20 20 20 20 20 30 2E  31 39 36 30 37 38 20 30  2E 36 30 30 30 30 30 20  e             0.196078 0.600000 
00001F20  30 2E 38 30 30 30 30 30  0D 0A 09 09 73 6C 61 74  65 5F 62 6C 75 65 20 20  20 20 20 20 20 20 20 20  0.800000♪◙○○slate_blue          
00001F40  20 30 2E 30 30 30 30 30  30 20 30 2E 34 39 38 30  33 39 20 31 2E 30 30 30  30 30 30 0D 0A 09 09 73   0.000000 0.498039 1.000000♪◙○○s
00001F60  70 72 69 6E 67 5F 67 72  65 65 6E 20 20 20 20 20  20 20 20 20 30 2E 30 30  30 30 30 30 20 31 2E 30  pring_green         0.000000 1.0
00001F80  30 30 30 30 30 20 30 2E  34 39 38 30 33 39 0D 0A  09 09 73 74 65 65 6C 5F  62 6C 75 65 20 20 20 20  00000 0.498039♪◙○○steel_blue    
00001FA0  20 20 20 20 20 20 20 30  2E 31 33 37 32 35 35 20  30 2E 34 31 39 36 30 38  20 30 2E 35 35 36 38 36         0.137255 0.419608 0.55686
00001FC0  33 0D 0A 09 09 74 61 6E  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 30 2E 38 35 38 38  3♪◙○○tan                  0.8588
00001FE0  32 34 20 30 2E 35 37 36  34 37 31 20 30 2E 34 33  39 32 31 36 0D 0A 09 09  74 68 69 73 74 6C 65 20  24 0.576471 0.439216♪◙○○thistle 
00002000  20 20 20 20 20 20 20 20  20 20 20 20 20 30 2E 38  34 37 30 35 39 20 30 2E  37 34 39 30 32 30 20 30               0.847059 0.749020 0
00002020  2E 38 34 37 30 35 39 0D  0A 09 09 74 75 72 71 75  6F 69 73 65 20 20 20 20  20 20 20 20 20 20 20 20  .847059♪◙○○turquoise            
00002040  30 2E 36 37 38 34 33 31  20 30 2E 39 31 37 36 34  37 20 30 2E 39 31 37 36  34 37 0D 0A 09 09 76 69  0.678431 0.917647 0.917647♪◙○○vi
00002060  6F 6C 65 74 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 30 2E 33 30 39  38 30 34 20 30 2E 31 38  olet               0.309804 0.18
00002080  34 33 31 34 20 30 2E 33  30 39 38 30 34 0D 0A 09  09 76 69 6F 6C 65 74 5F  72 65 64 20 20 20 20 20  4314 0.309804♪◙○○violet_red     
000020A0  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 36 30 30 30 30 30        0.800000 0.196078 0.600000
000020C0  0D 0A 09 09 77 68 65 61  74 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 30 2E 38 34 37 30 35  ♪◙○○wheat                0.84705
000020E0  39 20 30 2E 38 34 37 30  35 39 20 30 2E 37 34 39  30 32 30 0D 0A 09 09 77  68 69 74 65 20 20 20 20  9 0.847059 0.749020♪◙○○white    
00002100  20 20 20 20 20 20 20 20  20 20 20 20 30 2E 39 38  38 32 33 35 20 30 2E 39  38 38 32 33 35 20 30 2E              0.988235 0.988235 0.
00002120  39 38 38 32 33 35 0D 0A  09 09 79 65 6C 6C 6F 77  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 31  988235♪◙○○yellow               1
00002140  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 79 65 6C  .000000 1.000000 0.000000♪◙○○yel
00002160  6C 6F 77 5F 67 72 65 65  6E 20 20 20 20 20 20 20  20 20 30 2E 36 30 30 30  30 30 20 30 2E 38 30 30  low_green         0.600000 0.800
00002180  30 30 30 20 30 2E 31 39  36 30 37 38 0D 0A 74 79  70 65 64 65 66 20 75 6E  73 69 67 6E 65 64 20 63  000 0.196078♪◙typedef unsigned c
000021A0  68 61 72 20 20 20 20 20  20 42 79 74 65 3B 0D 0A  74 79 70 65 64 65 66 20  75 6E 73 69 67 6E 65 64  har      Byte;♪◙typedef unsigned
000021C0  20 69 6E 74 20 20 20 20  20 20 20 57 6F 72 64 3B  0D 0A 74 79 70 65 64 65  66 20 65 6E 75 6D 20 7B   int       Word;♪◙typedef enum {
000021E0  66 61 6C 73 65 2C 20 74  72 75 65 7D 20 42 6F 6F  6C 65 61 6E 3B 0D 0A 74  79 70 65 64 65 66 20 73  false, true} Boolean;♪◙typedef s
00002200  74 72 75 63 74 0D 0A 7B  0D 0A 20 20 42 79 74 65  20 52 65 64 3B 0D 0A 20  20 42 79 74 65 20 47 72  truct♪◙{♪◙  Byte Red;♪◙  Byte Gr
00002220  6E 3B 0D 0A 20 20 42 79  74 65 20 42 6C 75 3B 0D  0A 7D 0D 0A 52 47 42 3B  0D 0A 0D 0A 74 79 70 65  n;♪◙  Byte Blu;♪◙}♪◙RGB;♪◙♪◙type
00002240  64 65 66 20 52 47 42 20  50 61 6C 65 74 74 65 52  65 67 69 73 74 65 72 5B  32 35 36 5D 3B 0D 0A 0D  def RGB PaletteRegister[256];♪◙♪
00002260  0A 76 6F 69 64 20 53 65  74 5F 47 72 61 70 68 69  63 73 5F 4D 6F 64 65 28  29 0D 0A 7B 0D 0A 20 20  ◙void Set_Graphics_Mode()♪◙{♪◙  
00002280  69 66 28 28 58 52 65 73  3C 33 32 31 29 20 26 26  20 28 59 52 65 73 3C 32  30 31 29 29 0D 0A 20 20  if((XRes<321) && (YRes<201))♪◙  
000022A0  20 20 49 6E 69 74 47 72  61 70 68 69 63 73 28 31  39 29 3B 0D 0A 20 20 65  6C 73 65 0D 0A 20 20 7B    InitGraphics(19);♪◙  else♪◙  {
000022C0  0D 0A 20 20 20 20 69 66  28 28 58 52 65 73 3C 36  34 31 29 20 26 26 20 28  59 52 65 73 3C 33 35 31  ♪◙    if((XRes<641) && (YRes<351
000022E0  29 29 0D 0A 20 20 20 20  20 20 49 6E 69 74 47 72  61 70 68 69 63 73 28 34  35 29 3B 0D 0A 20 20 20  ))♪◙      InitGraphics(45);♪◙   
00002300  20 65 6C 73 65 0D 0A 20  20 20 20 7B 0D 0A 20 20  20 20 20 20 69 66 28 28  58 52 65 73 3C 36 34 31   else♪◙    {♪◙      if((XRes<641
00002320  29 20 26 26 20 28 59 52  65 73 3C 34 38 31 29 29  0D 0A 09 49 6E 69 74 47  72 61 70 68 69 63 73 28  ) && (YRes<481))♪◙○InitGraphics(
00002340  34 36 29 3B 0D 0A 20 20  20 20 20 20 65 6C 73 65  0D 0A 20 20 20 20 20 20  7B 0D 0A 09 69 66 28 28  46);♪◙      else♪◙      {♪◙○if((
00002360  58 52 65 73 3C 38 30 31  29 20 26 26 20 28 59 52  65 73 3C 36 30 31 29 29  0D 0A 09 20 20 49 6E 69  XRes<801) && (YRes<601))♪◙○  Ini
00002380  74 47 72 61 70 68 69 63  73 28 34 38 29 3B 0D 0A  09 65 6C 73 65 0D 0A 09  20 20 49 6E 69 74 47 72  tGraphics(48);♪◙○else♪◙○  InitGr
000023A0  61 70 68 69 63 73 28 35  36 29 3B 0D 0A 20 20 20  20 20 20 7D 0D 0A 20 20  20 20 7D 0D 0A 20 20 7D  aphics(56);♪◙      }♪◙    }♪◙  }
000023C0  0D 0A 7D 0D 0A 20 20 50  69 63 5F 46 69 6C 65 3D  66 6F 70 65 6E 28 50 5F  4E 61 6D 65 2C 20 22 77  ♪◙}♪◙  Pic_File=fopen(P_Name, "w
000023E0  2B 62 22 29 3B 0D 0A 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  +b");♪◙  for(y=0; y<7; y++);♪◙  
00002400  7B 0D 0A 20 20 20 20 66  70 75 74 63 28 32 35 33  2C 20 50 69 63 5F 46 69  6C 65 29 3B 0D 0A 20 20  {♪◙    fputc(253, Pic_File);♪◙  
00002420  20 20 66 70 75 74 63 28  32 30 2C 20 50 69 63 5F  46 69 6C 65 29 3B 0D 0A  20 20 20 20 66 70 75 74    fputc(20, Pic_File);♪◙    fput
00002440  63 28 34 31 2C 20 50 69  63 5F 46 69 6C 65 29 3B  0D 0A 20 20 20 20 66 70  75 74 63 28 31 34 2C 20  c(41, Pic_File);♪◙    fputc(14, 
00002460  50 69 63 5F 46 69 6C 65  29 3B 0D 0A 20 20 20 20  66 70 75 74 63 28 30 2C  20 50 69 63 5F 46 69 6C  Pic_File);♪◙    fputc(0, Pic_Fil
00002480  65 29 3B 0D 0A 20 20 20  20 66 70 75 74 63 28 39  2C 20 50 69 63 5F 46 69  6C 65 29 3B 0D 0A 20 20  e);♪◙    fputc(9, Pic_File);♪◙  
000024A0  20 20 66 70 75 74 63 28  33 2C 20 50 69 63 5F 46  69 6C 65 29 3B 0D 0A 20  20 7D 0D 0A 76 6F 69 64    fputc(3, Pic_File);♪◙  }♪◙void
000024C0  20 47 65 74 53 63 65 6E  65 46 69 6C 65 28 29 0D  0A 7B 0D 0A 20 20 69 6E  74 20 69 3B 0D 0A 20 20   GetSceneFile()♪◙{♪◙  int i;♪◙  
000024E0  42 79 74 65 20 78 2C 20  79 3B 0D 0A 0D 0A 20 20  70 72 69 6E 74 66 28 22  5C 6E 45 6E 74 65 72 20  Byte x, y;♪◙♪◙  printf("\nEnter 
00002500  46 69 6C 65 20 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  File Name -> ");♪◙  x=wherex();♪
00002520  0A 20 20 79 3D 77 68 65  72 65 79 28 29 3B 0D 0A  20 20 67 65 74 73 28 53  63 65 6E 65 46 69 6C 65  ◙  y=wherey();♪◙  gets(SceneFile
00002540  29 3B 0D 0A 20 20 69 66  28 21 28 73 74 72 63 6D  70 28 53 63 65 6E 65 46  69 6C 65 2C 20 22 22 29  );♪◙  if(!(strcmp(SceneFile, "")
00002560  29 29 0D 0A 20 20 7B 0D  0A 20 20 20 20 73 74 72  63 70 79 28 53 63 65 6E  65 46 69 6C 65 2C 20 22  ))♪◙  {♪◙    strcpy(SceneFile, "
00002580  43 55 42 45 50 4C 41 4E  22 29 3B 0D 0A 20 20 20  20 67 6F 74 6F 78 79 28  78 2C 20 79 29 3B 0D 0A  CUBEPLAN");♪◙    gotoxy(x, y);♪◙
000025A0  20 20 20 20 70 75 74 73  28 53 63 65 6E 65 46 69  6C 65 29 3B 0D 0A 20 20  7D 0D 0A 20 20 70 75 74      puts(SceneFile);♪◙  }♪◙  put
000025C0  73 28 22 22 29 3B 0D 0A  20 20 66 6F 72 28 69 3D  30 3B 20 69 3C 73 74 72  6C 65 6E 28 53 63 65 6E  s("");♪◙  for(i=0; i<strlen(Scen
000025E0  65 46 69 6C 65 29 3B 20  69 2B 2B 29 0D 0A 20 20  20 20 53 63 65 6E 65 46  69 6C 65 5B 69 5D 3D 74  eFile); i++)♪◙    SceneFile[i]=t
00002600  6F 75 70 70 65 72 28 53  63 65 6E 65 46 69 6C 65  5B 69 5D 29 3B 0D 0A 7D  0D 0A 0D 0A 76 6F 69 64  oupper(SceneFile[i]);♪◙}♪◙♪◙void
00002620  20 53 61 76 65 5F 50 69  63 74 75 72 65 28 29 0D  0A 7B 0D 0A 20 20 57 6F  72 64 20 78 2C 20 79 3B   Save_Picture()♪◙{♪◙  Word x, y;
00002640  0D 0A 20 20 42 79 74 65  20 64 3B 0D 0A 20 20 46  49 4C 45 20 2A 4F 75 74  5F 46 69 6C 65 3B 0D 0A  ♪◙  Byte d;♪◙  FILE *Out_File;♪◙
00002660  0D 0A 20 20 4F 75 74 5F  46 69 6C 65 3D 66 6F 70  65 6E 28 22 54 45 4D 50  2E 54 47 41 22 2C 20 22  ♪◙  Out_File=fopen("TEMP.TGA", "
00002680  77 2B 62 22 29 3B 0D 0A  20 20 66 6F 72 28 79 3D  30 3B 20 79 3C 37 3B 20  79 2B 2B 29 3B 0D 0A 20  w+b");♪◙  for(y=0; y<7; y++);♪◙ 
000026A0  20 7B 0D 0A 20 20 20 20  70 75 74 77 28 32 35 36  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20   {♪◙    putw(256, Out_File);♪◙  
000026C0  20 20 70 75 74 77 28 31  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 70 75 74 77 28 30    putw(1, Out_File);♪◙    putw(0
000026E0  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  20 20 70 75 74 63 28 31  2C 20 4F 75 74 5F 46 69  , Out_File);♪◙    putc(1, Out_Fi
00002700  6C 65 29 3B 0D 0A 20 20  20 20 70 75 74 63 28 32  34 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  le);♪◙    putc(24, Out_File);♪◙ 
00002720  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 77 28     putw(0, Out_File);♪◙    putw(
00002740  30 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  20 20 20 70 75 74 77 28  58 52 65 73 2C 20 4F 75  0, Out_File);♪◙    putw(XRes, Ou
00002760  74 5F 46 69 6C 65 29 3B  0D 0A 20 20 20 20 70 75  74 77 28 59 52 65 73 2C  20 4F 75 74 5F 46 69 6C  t_File);♪◙    putw(YRes, Out_Fil
00002780  65 29 3B 0D 0A 20 20 20  20 70 75 74 77 28 43 52  65 73 2C 20 4F 75 74 5F  46 69 6C 65 29 3B 0D 0A  e);♪◙    putw(CRes, Out_File);♪◙
000027A0  20 20 7D 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 20 7B    }♪◙  for(y=0; y<256; y++)♪◙  {
000027C0  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 42 6C 75 29 3C 3C 32  ♪◙    fputc((PalArray[y].Blu)<<2
000027E0  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 41 72 72 61  , Out_File);♪◙    fputc((PalArra
00002800  79 5B 79 5D 2E 47 72 6E  29 3C 3C 32 2C 20 4F 75  74 5F 46 69 6C 65 29 3B  0D 0A 20 20 20 20 66 70  y[y].Grn)<<2, Out_File);♪◙    fp
00002820  75 74 63 28 28 50 61 6C  41 72 72 61 79 5B 79 5D  2E 52 65 64 29 3C 3C 32  2C 20 4F 75 74 5F 46 69  utc((PalArray[y].Red)<<2, Out_Fi
00002840  6C 65 29 3B 0D 0A 20 20  7D 0D 0A 20 20 66 6F 72  28 79 3D 59 52 65 73 3B  20 79 3E 30 3B 20 79 2D  le);♪◙  }♪◙  for(y=YRes; y>0; y-
00002860  2D 29 0D 0A 20 20 7B 0D  0A 20 20 20 20 66 6F 72  28 78 3D 30 3B 20 78 3C  58 52 65 73 3B 20 78 2B  -)♪◙  {♪◙    for(x=0; x<XRes; x+
00002880  2B 29 0D 0A 20 20 20 20  7B 0D 0A 20 20 20 20 20  20 64 3D 47 65 74 50 69  78 65 6C 28 78 2C 20 79  +)♪◙    {♪◙      d=GetPixel(x, y
000028A0  2D 31 29 3B 0D 0A 20 20  20 20 20 20 66 70 75 74  63 28 64 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  -1);♪◙      fputc(d, Out_File);♪
000028C0  0A 20 20 20 20 7D 0D 0A  20 20 7D 0D 0A 20 20 66  63 6C 6F 73 65 61 6C 6C  28 29 3B 0D 0A 7D 0D 0A  ◙    }♪◙  }♪◙  fcloseall();♪◙}♪◙
000028E0  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 "
00002900  64 6F 73 2E 68 22 0D 0A  23 69 6E 63 6C 75 64 65  20 22 63 6F 6E 69 6F 2E  68 22 0D 0A 23 69 6E 63  dos.h"♪◙#include "conio.h"♪◙#inc
00002920  6C 75 64 65 20 22 64 65  66 73 2E 68 22 0D 0A 0D  0A 76 6F 69 64 20 53 65  74 5F 54 65 78 74 5F 53  lude "defs.h"♪◙♪◙void Set_Text_S
00002940  63 72 65 65 6E 28 69 6E  74 20 74 63 2C 20 69 6E  74 20 74 62 29 0D 0A 7B  0D 0A 20 20 74 65 78 74  creen(int tc, int tb)♪◙{♪◙  text
00002960  63 6F 6C 6F 72 28 74 63  29 3B 0D 0A 20 20 74 65  78 74 62 61 63 6B 67 72  6F 75 6E 64 28 74 62 29  color(tc);♪◙  textbackground(tb)
00002980  3B 0D 0A 20 20 63 6C 72  73 63 72 28 29 3B 0D 0A  7D 0D 0A 69 6E 73 74 61  6C 6C 75 73 65 72 64 72  ;♪◙  clrscr();♪◙}♪◙installuserdr
000029A0  69 76 65 72 28 22 53 56  47 41 32 35 36 22 2C 44  65 74 65 63 74 56 47 41  32 35 36 29 3B 0D 0A 0D  iver("SVGA256",DetectVGA256);♪◙♪
000029C0  0A 3B 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 20 46 75 6E 63 74  ◙; *********************** Funct
000029E0  69 6F 6E 20 73 74 6F 72  65 64 61 63 28 29 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  ion storedac() *****************
00002A00  2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 0D 0A 0D 0A 3B  09 46 75 6E 63 74 69 6F  6E 20 74 6F 20 53 74 6F  ***********♪◙♪◙;○Function to Sto
00002A20  72 65 20 74 68 65 20 64  61 63 62 6F 78 5B 5D 5B  5D 20 61 72 72 61 79 20  69 6E 74 6F 20 56 47 41  re the dacbox[][] array into VGA
00002A40  2C 0D 0A 3B 09 63 61 6C  6C 65 64 20 66 72 6F 6D  20 6C 6F 61 64 64 61 63  28 29 20 64 75 72 72 69  ,♪◙;○called from loaddac() durri
00002A60  6E 67 20 69 6E 69 74 69  61 6C 69 7A 61 74 69 6F  6E 2E 0D 0A 0D 0A 73 74  6F 72 65 64 61 63 09 70  ng initialization.♪◙♪◙storedac○p
00002A80  72 6F 63 0D 0A 09 70 75  73 68 09 65 73 09 09 09  3B 20 6E 65 65 64 20 45  53 20 3D 3D 20 44 53 20  roc♪◙○push○es○○○; need ES == DS 
00002AA0  74 65 6D 70 6F 72 61 72  69 6C 79 0D 0A 09 70 75  73 68 09 64 73 09 09 09  3B 20 20 2E 2E 2E 0D 0A  temporarily♪◙○push○ds○○○;  ...♪◙
00002AC0  09 70 6F 70 09 65 73 09  09 09 3B 20 20 2E 2E 2E  0D 0A 09 6D 6F 76 09 61  78 2C 31 30 31 32 68 09  ○pop○es○○○;  ...♪◙○mov○ax,1012h○
00002AE0  09 3B 20 67 65 74 20 74  68 65 20 6F 6C 64 20 44  41 43 20 76 61 6C 75 65  73 0D 0A 09 6D 6F 76 09  ○; get the old DAC values♪◙○mov○
00002B00  62 78 2C 30 09 09 09 3B  20 20 28 61 73 73 75 6D  69 6E 67 2C 20 6F 66 20  63 6F 75 72 73 65 2C 20  bx,0○○○;  (assuming, of course, 
00002B20  74 68 65 79 20 65 78 69  73 74 29 0D 0A 09 6D 6F  76 09 63 78 2C 32 35 36  09 09 09 3B 20 20 2E 2E  they exist)♪◙○mov○cx,256○○○;  ..
00002B40  2E 0D 0A 09 6D 6F 76 09  64 78 2C 6F 66 66 73 65  74 20 64 61 63 62 6F 78  09 3B 20 20 2E 2E 2E 0D  .♪◙○mov○dx,offset dacbox○;  ...♪
00002B60  0A 09 69 6E 74 09 31 30  68 09 09 09 3B 20 64 6F  20 69 74 2E 0D 0A 09 70  6F 70 09 65 73 09 09 09  ◙○int○10h○○○; do it.♪◙○pop○es○○○
00002B80  3B 20 20 2E 2E 2E 0D 0A  09 72 65 74 0D 0A 73 74  6F 72 65 64 61 63 20 65  6E 64 70 0D 0A 80 02 5E  ;  ...♪◙○ret♪◙storedac endp♪◙Ç☻^
00002BA0  01 93 0D 0A 65 78 74 65  72 6E 20 69 6E 74 20 20  58 52 65 73 2C 20 59 52  65 73 3B 0D 0A 65 78 74  ☺ô♪◙extern int  XRes, YRes;♪◙ext
00002BC0  65 72 6E 20 57 6F 72 64  20 4D 61 78 58 52 65 73  2C 20 4D 61 78 59 52 65  73 3B 0D 0A 65 78 74 65  ern Word MaxXRes, MaxYRes;♪◙exte
00002BE0  72 6E 20 57 6F 72 64 20  4D 61 78 58 2C 20 4D 61  78 59 3B 0D 0A 65 78 74  65 72 6E 20 42 6F 6F 6C  rn Word MaxX, MaxY;♪◙extern Bool
00002C00  65 61 6E 20 50 65 72 73  70 65 63 74 69 76 65 50  6C 6F 74 3B 0D 0A 65 78  74 65 72 6E 20 66 6C 6F  ean PerspectivePlot;♪◙extern flo
00002C20  61 74 20 20 20 4D 78 2C  20 4D 79 2C 20 4D 7A 2C  20 64 73 3B 0D 0A 65 78  74 65 72 6E 20 42 6F 6F  at   Mx, My, Mz, ds;♪◙extern Boo
00002C40  6C 65 61 6E 20 44 72 61  77 5F 41 78 69 73 5F 41  6E 64 5F 50 61 6C 65 74  74 65 3B 0D 0A 23 69 6E  lean Draw_Axis_And_Palette;♪◙#in
00002C60  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 73 2E 68  clude "stdio.h"♪◙#include "dos.h
00002C80  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 6C 75 64 65 20 22  "♪◙#include "defs.h"♪◙#include "
00002CA0  67 6C 6F 62 61 6C 73 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  globals.h"♪◙#include "mathb.h"♪◙
00002CC0  23 69 6E 63 6C 75 64 65  20 22 67 72 61 70 68 62  2E 68 22 0D 0A 4D 41 53  4D 20 25 31 20 25 31 20  #include "graphb.h"♪◙MASM %1 %1 
00002CE0  4E 55 4C 20 4E 55 4C 0D  0A 49 46 20 45 52 52 4F  52 4C 45 56 45 4C 20 31  20 47 4F 54 4F 20 50 52  NUL NUL♪◙IF ERRORLEVEL 1 GOTO PR
00002D00  4F 42 4C 45 4D 0D 0A 4C  49 4E 4B 20 25 31 20 40  41 55 54 4F 4C 49 4E 4B  0D 0A 45 58 45 32 42 49  OBLEM♪◙LINK %1 @AUTOLINK♪◙EXE2BI
00002D20  4E 20 25 31 20 25 31 2E  44 52 56 0D 0A 44 45 4C  20 25 31 2E 45 58 45 0D  0A 44 45 4C 20 25 31 2E  N %1 %1.DRV♪◙DEL %1.EXE♪◙DEL %1.
00002D40  4F 42 4A 0D 0A 3A 50 52  4F 42 4C 45 4D 0D 0A 23  64 65 66 69 6E 65 20 4E  75 6D 56 65 72 74 69 63  OBJ♪◙:PROBLEM♪◙#define NumVertic
00002D60  69 65 73 49 6E 46 61 63  65 74 20 34 0D 0A 23 64  65 66 69 6E 65 20 4D 61  78 56 65 72 74 65 78 4E  iesInFacet 4♪◙#define MaxVertexN
00002D80  75 6D 49 6E 46 61 63 65  74 20 34 0D 0A 23 64 65  66 69 6E 65 20 53 63 61  6C 65 44 61 74 61 20 32  umInFacet 4♪◙#define ScaleData 2
00002DA0  33 30 30 30 0D 0A 23 64  65 66 69 6E 65 20 53 63  61 6C 65 49 6D 61 67 65  20 31 30 30 0D 0A 0D 0A  3000♪◙#define ScaleImage 100♪◙♪◙
00002DC0  2F 2A 0D 0A 23 64 65 66  69 6E 65 20 4D 61 78 46  61 63 65 74 20 31 36 37  38 09 20 20 20 20 20 09  /*♪◙#define MaxFacet 1678○     ○
00002DE0  20 20 20 20 20 20 69 6E  64 65 70 65 6E 64 61 6E  74 20 3A 20 4D 61 78 46  61 63 65 74 20 20 3D 20        independant : MaxFacet  = 
00002E00  6E 0D 0A 23 64 65 66 69  6E 65 20 4D 61 78 56 65  72 74 65 78 20 36 37 31  32 09 20 20 20 20 20 09  n♪◙#define MaxVertex 6712○     ○
00002E20  20 20 20 20 20 20 76 65  72 74 69 63 69 65 73 20  20 20 4D 61 78 56 65 72  74 65 78 20 3D 20 34 20        verticies   MaxVertex = 4 
00002E40  2A 20 6E 0D 0A 2A 2F 0D  0A 0D 0A 23 64 65 66 69  6E 65 20 4D 61 78 46 61  63 65 74 20 33 36 30 30  * n♪◙*/♪◙♪◙#define MaxFacet 3600
00002E60  0D 0A 23 64 65 66 69 6E  65 20 4D 61 78 56 65 72  74 65 78 20 33 37 32 31  0D 0A 0D 0A 69 6E 74 20  ♪◙#define MaxVertex 3721♪◙♪◙int 
00002E80  4C 61 73 74 56 65 72 74  65 78 2C 20 4C 61 73 74  46 61 63 65 74 3B 0D 0A  69 6E 74 20 4C 61 73 74  LastVertex, LastFacet;♪◙int Last
00002EA0  56 65 72 74 65 78 4E 75  6D 49 6E 46 61 63 65 74  3B 0D 0A 69 6E 74 20 56  65 72 74 65 78 4E 75 6D  VertexNumInFacet;♪◙int VertexNum
00002EC0  2C 20 46 61 63 65 74 4E  75 6D 3B 0D 0A 69 6E 74  20 56 65 72 74 65 78 4E  75 6D 49 6E 46 61 63 65  , FacetNum;♪◙int VertexNumInFace
00002EE0  74 3B 0D 0A 54 44 49 41  20 56 65 72 74 65 78 5B  4D 61 78 56 65 72 74 65  78 2B 31 5D 3B 0D 0A 73  t;♪◙TDIA Vertex[MaxVertex+1];♪◙s
00002F00  74 61 74 69 63 20 69 6E  74 20 66 61 72 20 2A 46  61 63 65 74 3B 0D 0A 0D  0A 66 6C 6F 61 74 20 49  tatic int far *Facet;♪◙♪◙float I
00002F20  6E 76 53 63 61 6C 65 44  61 74 61 2C 20 49 6E 76  53 63 61 6C 65 49 6D 61  67 65 3B 0D 0A 74 79 70  nvScaleData, InvScaleImage;♪◙typ
00002F40  65 64 65 66 20 63 68 61  72 20 4E 61 6D 65 5B 32  30 5D 3B 0D 0A 4E 61 6D  65 20 46 69 6C 65 4E 61  edef char Name[20];♪◙Name FileNa
00002F60  6D 65 3B 0D 0A 74 79 70  65 64 65 66 20 73 74 72  75 63 74 7B 0D 0A 20 20  69 6E 74 20 78 3B 0D 0A  me;♪◙typedef struct{♪◙  int x;♪◙
00002F80  20 20 69 6E 74 20 79 3B  0D 0A 7D 20 50 69 78 65  6C 56 65 63 74 6F 72 3B  0D 0A 0D 0A 74 79 70 65    int y;♪◙} PixelVector;♪◙♪◙type
00002FA0  64 65 66 20 50 69 78 65  6C 56 65 63 74 6F 72 20  50 69 78 65 6C 41 72 72  61 79 5B 4E 75 6D 56 65  def PixelVector PixelArray[NumVe
00002FC0  72 74 69 63 69 65 73 49  6E 46 61 63 65 74 2B 32  5D 3B 0D 0A 74 79 70 65  64 65 66 20 54 44 41 20  rticiesInFacet+2];♪◙typedef TDA 
00002FE0  56 6F 78 65 6C 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 31  VoxelArray[NumVerticiesInFacet+1
00003000  5D 3B 0D 0A 0D 0A 76 6F  69 64 20 49 6E 69 74 56  65 72 74 65 78 42 75 66  66 65 72 28 29 0D 0A 76  ];♪◙♪◙void InitVertexBuffer()♪◙v
00003020  6F 69 64 20 4C 6F 61 64  44 61 74 61 28 4E 61 6D  65 20 46 69 6C 65 4E 61  6D 65 29 0D 0A 76 6F 69  oid LoadData(Name FileName)♪◙voi
00003040  64 20 53 61 76 65 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  d SaveData(Name FileName)♪◙void 
00003060  50 75 74 57 69 72 65 46  61 63 65 74 28 50 69 78  65 6C 41 72 72 61 79 20  50 74 73 2C 20 42 79 74  PutWireFacet(PixelArray Pts, Byt
00003080  65 20 43 6F 6C 6F 72 29  0D 0A 76 6F 69 64 20 50  75 74 46 61 63 65 74 28  50 69 78 65 6C 41 72 72  e Color)♪◙void PutFacet(PixelArr
000030A0  61 79 20 46 61 63 65 32  64 2C 20 42 79 74 65 20  43 6F 6C 6F 72 2C 20 42  79 74 65 20 49 6E 74 65  ay Face2d, Byte Color, Byte Inte
000030C0  6E 73 29 0D 0A 76 6F 69  64 20 47 65 74 5F 41 4E  49 5F 46 69 6C 65 5F 4E  61 6D 65 28 29 0D 0A 7B  ns)♪◙void Get_ANI_File_Name()♪◙{
000030E0  0D 0A 20 20 42 79 74 65  20 78 2C 20 79 3B 0D 0A  0D 0A 20 20 74 65 78 74  63 6F 6C 6F 72 28 59 45  ♪◙  Byte x, y;♪◙♪◙  textcolor(YE
00003100  4C 4C 4F 57 29 3B 0D 0A  20 20 74 65 78 74 62 61  63 6B 67 72 6F 75 6E 64  28 42 4C 55 45 29 3B 0D  LLOW);♪◙  textbackground(BLUE);♪
00003120  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 66 28 22 45 6E 74  ◙  gotoxy(1, 8);♪◙  cprintf("Ent
00003140  65 72 20 46 69 6C 65 20  4E 61 6D 65 20 2D 3E 20  22 29 3B 0D 0A 20 20 78  3D 77 68 65 72 65 78 28  er File Name -> ");♪◙  x=wherex(
00003160  29 3B 0D 0A 20 20 79 3D  77 68 65 72 65 79 28 29  3B 0D 0A 20 20 74 65 78  74 63 6F 6C 6F 72 28 57  );♪◙  y=wherey();♪◙  textcolor(W
00003180  48 49 54 45 2B 42 4C 49  4E 4B 29 3B 0D 0A 20 20  63 70 72 69 6E 74 66 28  22 25 73 22 2C 20 22 53  HITE+BLINK);♪◙  cprintf("%s", "S
000031A0  50 48 52 50 4C 41 4E 22  29 3B 0D 0A 20 20 74 65  78 74 63 6F 6C 6F 72 28  59 45 4C 4C 4F 57 29 3B  PHRPLAN");♪◙  textcolor(YELLOW);
000031C0  0D 0A 20 20 67 6F 74 6F  78 79 28 78 2C 20 79 29  3B 0D 0A 20 20 77 68 69  6C 65 28 21 28 6B 62 68  ♪◙  gotoxy(x, y);♪◙  while(!(kbh
000031E0  69 74 28 29 29 29 3B 0D  0A 20 20 63 70 72 69 6E  74 66 28 22 20 20 20 20  20 20 20 20 20 20 20 20  it()));♪◙  cprintf("            
00003200  22 29 3B 0D 0A 20 20 67  6F 74 6F 78 79 28 78 2C  20 79 29 3B 0D 0A 20 20  67 65 74 73 28 46 69 6C  ");♪◙  gotoxy(x, y);♪◙  gets(Fil
00003220  65 5F 4E 61 6D 65 29 3B  0D 0A 20 20 69 66 28 21  28 73 74 72 63 6D 70 28  46 69 6C 65 5F 4E 61 6D  e_Name);♪◙  if(!(strcmp(File_Nam
00003240  65 2C 20 22 22 29 29 29  0D 0A 20 20 20 20 73 74  72 63 70 79 28 46 69 6C  65 5F 4E 61 6D 65 2C 20  e, "")))♪◙    strcpy(File_Name, 
00003260  22 53 50 48 52 50 4C 41  4E 22 29 3B 0D 0A 20 20  73 74 72 75 70 72 28 46  69 6C 65 5F 4E 61 6D 65  "SPHRPLAN");♪◙  strupr(File_Name
00003280  29 3B 0D 0A 20 20 73 74  72 63 61 74 28 46 69 6C  65 5F 4E 61 6D 65 2C 20  22 2E 41 4E 49 22 29 3B  );♪◙  strcat(File_Name, ".ANI");
000032A0  0D 0A 20 20 67 6F 74 6F  78 79 28 31 2C 20 38 29  3B 0D 0A 20 20 70 72 69  6E 74 66 28 22 20 20 20  ♪◙  gotoxy(1, 8);♪◙  printf("   
000032C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 22 29 3B 0D                              ");♪
000032E0  0A 20 20 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 67 6F  ◙  textcolor(WHITE+BLINK);♪◙  go
00003300  74 6F 78 79 28 31 2C 20  38 29 3B 0D 0A 20 20 63  70 72 69 6E 74 66 28 22  4C 6F 61 64 69 6E 67 20  toxy(1, 8);♪◙  cprintf("Loading 
00003320  22 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 63 70 72  ");♪◙  textcolor(YELLOW);♪◙  cpr
00003340  69 6E 74 66 28 22 25 73  22 2C 20 46 69 6C 65 5F  4E 61 6D 65 29 3B 0D 0A  7D 0D 0A 50 61 6C 65 74  intf("%s", File_Name);♪◙}♪◙Palet
00003360  74 65 5F 52 65 67 69 73  74 65 72 20 50 61 6C 3B  0D 0A 0D 0A 76 6F 69 64  20 47 72 65 79 5F 50 61  te_Register Pal;♪◙♪◙void Grey_Pa
00003380  6C 65 74 74 65 28 50 61  6C 65 74 74 65 5F 52 65  67 69 73 74 65 72 20 50  61 6C 29 0D 0A 7B 0D 0A  lette(Palette_Register Pal)♪◙{♪◙
000033A0  20 20 57 6F 72 64 20 69  3B 0D 0A 0D 0A 20 20 66  6F 72 28 69 3D 30 3B 20  69 3C 36 34 3B 20 69 2B    Word i;♪◙♪◙  for(i=0; i<64; i+
000033C0  2B 29 0D 0A 20 20 7B 0D  0A 20 20 20 20 50 61 6C  5B 69 5D 2E 52 65 64 3D  69 3B 0D 0A 20 20 20 20  +)♪◙  {♪◙    Pal[i].Red=i;♪◙    
000033E0  50 61 6C 5B 69 5D 2E 47  72 6E 3D 69 3B 0D 0A 20  20 20 20 50 61 6C 5B 69  5D 2E 42 6C 75 3D 69 3B  Pal[i].Grn=i;♪◙    Pal[i].Blu=i;
00003400  0D 0A 20 20 7D 0D 0A 7D  0D 0A 23 69 6E 63 6C 75  64 65 20 22 73 74 64 69  6F 2E 68 22 0D 0A 23 69  ♪◙  }♪◙}♪◙#include "stdio.h"♪◙#i
00003420  6E 63 6C 75 64 65 20 22  6D 61 74 68 2E 68 22 0D  0A 23 69 6E 63 6C 75 64  65 20 22 64 65 66 73 2E  nclude "math.h"♪◙#include "defs.
00003440  68 22 0D 0A 23 69 6E 63  6C 75 64 65 20 22 6D 61  74 68 62 2E 68 22 0D 0A  76 6F 69 64 20 43 6C 65  h"♪◙#include "mathb.h"♪◙void Cle
00003460  61 72 50 61 6C 65 74 74  65 28 50 61 6C 65 74 74  65 52 65 67 69 73 74 65  72 20 43 6F 6C 6F 72 29  arPalette(PaletteRegister Color)
00003480  0D 0A 0D 0A 7B 20 57 6F  72 64 20 69 3B 0D 0A 0D  0A 20 20 66 6F 72 28 69  3D 30 3B 20 69 3C 3D 32  ♪◙♪◙{ Word i;♪◙♪◙  for(i=0; i<=2
000034A0  35 35 3B 20 69 2B 2B 29  0D 0A 20 20 7B 0D 0A 20  20 20 20 43 6F 6C 6F 72  5B 69 5D 2E 52 65 64 3D  55; i++)♪◙  {♪◙    Color[i].Red=
000034C0  30 3B 0D 0A 20 20 20 20  43 6F 6C 6F 72 5B 69 5D  2E 47 72 6E 3D 30 3B 0D  0A 20 20 20 20 43 6F 6C  0;♪◙    Color[i].Grn=0;♪◙    Col
000034E0  6F 72 5B 69 5D 2E 42 6C  75 3D 30 3B 0D 0A 20 20  7D 0D 0A 7D 0D 0A 76 6F  69 64 20 47 65 74 5F 53  or[i].Blu=0;♪◙  }♪◙}♪◙void Get_S
00003500  63 72 65 65 6E 5F 4C 69  6E 65 28 57 6F 72 64 20  4C 69 6E 65 2C 20 63 68  61 72 20 62 75 66 5B 36  creen_Line(Word Line, char buf[6
00003520  34 5D 29 0D 0A 7B 0D 0A  20 20 6C 6F 6E 67 20 4C  5F 4F 66 66 73 65 74 3B  0D 0A 20 20 57 6F 72 64  4])♪◙{♪◙  long L_Offset;♪◙  Word
00003540  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 78   Offset, Page;♪◙  Word Screen=0x
00003560  41 30 30 30 3B 0D 0A 20  20 57 6F 72 64 20 4F 6C  64 5F 50 61 67 65 3B 0D  0A 20 20 57 6F 72 64 20  A000;♪◙  Word Old_Page;♪◙  Word 
00003580  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 65 3C  lx, ly;♪◙  Byte d;♪◙♪◙  if(Line<
000035A0  59 52 65 73 29 0D 0A 20  20 7B 0D 0A 20 20 20 20  4F 6C 64 5F 50 61 67 65  3D 30 3B 0D 0A 20 20 20  YRes)♪◙  {♪◙    Old_Page=0;♪◙   
000035C0  20 73 77 69 74 63 68 28  52 65 73 29 0D 0A 20 20  20 20 7B 0D 0A 20 20 20  20 20 20 63 61 73 65 20   switch(Res)♪◙    {♪◙      case 
000035E0  48 69 67 68 5F 52 65 73  20 3A 20 20 20 4F 66 66  73 65 74 3D 50 72 65 5F  43 61 6C 63 5F 59 31 5B  High_Res :   Offset=Pre_Calc_Y1[
00003600  4C 69 6E 65 2B 59 5F 4F  66 66 5D 3B 0D 0A 09 09  09 50 61 67 65 3D 28 28  4C 69 6E 65 3E 3E 36 29  Line+Y_Off];♪◙○○○Page=((Line>>6)
00003620  3C 3C 34 29 3B 0D 0A 09  09 09 69 66 28 50 61 67  65 21 3D 4F 6C 64 5F 50  61 67 65 29 0D 0A 09 09  <<4);♪◙○○○if(Page!=Old_Page)♪◙○○
00003640  09 7B 0D 0A 09 09 09 20  20 6F 75 74 70 77 28 30  78 33 43 44 2C 20 50 61  67 65 29 3B 0D 0A 09 09  ○{♪◙○○○  outpw(0x3CD, Page);♪◙○○
00003660  09 20 20 4F 6C 64 5F 50  61 67 65 3D 50 61 67 65  3B 0D 0A 09 09 09 7D 0D  0A 09 09 09 6D 6F 76 65  ○  Old_Page=Page;♪◙○○○}♪◙○○○move
00003680  64 61 74 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  data(Screen, Offset, _DS, (Word)
000036A0  62 75 66 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 20 20 63 61  buf, XRes);♪◙○○○break;♪◙      ca
000036C0  73 65 20 4D 65 64 69 75  6D 5F 52 65 73 20 3A 20  4C 69 6E 65 2B 3D 59 5F  4F 66 66 3B 0D 0A 09 09  se Medium_Res : Line+=Y_Off;♪◙○○
000036E0  09 66 6F 72 28 6C 78 3D  58 5F 4F 66 66 3B 20 6C  78 3C 28 58 52 65 73 2B  58 5F 4F 66 66 29 3B 20  ○for(lx=X_Off; lx<(XRes+X_Off); 
00003700  6C 78 2B 2B 29 0D 0A 09  09 09 7B 0D 0A 09 09 09  20 20 64 3D 47 65 74 5F  50 69 78 65 6C 28 6C 78  lx++)♪◙○○○{♪◙○○○  d=Get_Pixel(lx
00003720  2C 20 4C 69 6E 65 29 3B  0D 0A 09 09 09 20 20 62  75 66 5B 6C 78 5D 3D 64  3B 0D 0A 09 09 09 7D 0D  , Line);♪◙○○○  buf[lx]=d;♪◙○○○}♪
00003740  0A 09 09 09 62 72 65 61  6B 3B 0D 0A 09 63 61 73  65 20 4C 6F 77 5F 52 65  73 20 20 3A 20 4F 66 66  ◙○○○break;♪◙○case Low_Res  : Off
00003760  73 65 74 3D 50 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  set=Pre_Calc_Y1[Line+Y_Off];♪◙○○
00003780  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 5F 44 53 2C 20 28  ○movedata(Screen, Offset, _DS, (
000037A0  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 3B 0D 0A 20 20 20  Word)buf, XRes);♪◙○○○break;♪◙   
000037C0  20 7D 0D 0A 20 20 7D 0D  0A 7D 0D 0A 0D 0A 20 20  77 68 69 6C 65 28 21 69  73 64 69 67 69 74 28 63   }♪◙  }♪◙}♪◙♪◙  while(!isdigit(c
000037E0  5B 30 5D 29 29 0D 0A 20  20 7B 0D 0A 20 20 20 20  77 68 69 6C 65 28 21 6B  62 68 69 74 28 29 29 3B  [0]))♪◙  {♪◙    while(!kbhit());
00003800  0D 0A 20 20 20 20 63 5B  30 5D 3D 67 65 74 63 68  28 29 3B 0D 0A 20 20 7D  0D 0A 20 20 72 65 74 75  ♪◙    c[0]=getch();♪◙  }♪◙  retu
00003820  72 6E 28 61 74 6F 69 28  63 29 29 3B 0D 0A 42 79  74 65 20 62 5B 31 30 32  34 5D 3B 0D 0A 0D 0A 76  rn(atoi(c));♪◙Byte b[1024];♪◙♪◙v
00003840  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 29 0D 0A  oid Get_Screen_Line(Word Line)♪◙
00003860  7B 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 64 20  {♪◙  Word Offset, Page;♪◙  Word 
00003880  53 63 72 65 65 6E 3D 30  78 41 30 30 30 3B 0D 0A  20 20 57 6F 72 64 20 6C  78 2C 20 6C 79 3B 0D 0A  Screen=0xA000;♪◙  Word lx, ly;♪◙
000038A0  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 20    Byte d;♪◙♪◙  if(Line<YRes)♪◙  
000038C0  7B 0D 0A 20 20 20 20 66  6F 72 28 6C 78 3D 30 3B  20 6C 78 3C 58 52 65 73  3B 20 6C 78 2B 2B 29 0D  {♪◙    for(lx=0; lx<XRes; lx++)♪
000038E0  0A 20 20 20 20 7B 0D 0A  20 20 20 20 20 20 64 3D  47 65 74 5F 50 69 78 65  6C 28 6C 78 2C 20 4C 69  ◙    {♪◙      d=Get_Pixel(lx, Li
00003900  6E 65 29 3B 0D 0A 20 20  20 20 20 20 62 5B 6C 78  5D 3D 64 3B 0D 0A 20 20  20 20 7D 0D 0A 20 20 7D  ne);♪◙      b[lx]=d;♪◙    }♪◙  }
00003920  0D 0A 7D 0D 0A 0D 0A 76  6F 69 64 20 57 72 69 74  65 5F 50 43 58 5F 4C 69  6E 65 28 57 6F 72 64 20  ♪◙}♪◙♪◙void Write_PCX_Line(Word 
00003940  79 29 0D 0A 7B 0D 0A 20  20 57 6F 72 64 20 74 3D  30 3B 0D 0A 20 20 42 79  74 65 20 69 3D 30 3B 0D  y)♪◙{♪◙  Word t=0;♪◙  Byte i=0;♪
00003960  0A 0D 0A 20 20 47 65 74  5F 53 63 72 65 65 6E 5F  4C 69 6E 65 28 79 29 3B  0D 0A 20 20 64 6F 0D 0A  ◙♪◙  Get_Screen_Line(y);♪◙  do♪◙
00003980  20 20 7B 0D 0A 20 20 20  20 69 3D 30 3B 0D 0A 20  20 20 20 77 68 69 6C 65  28 28 62 5B 74 2B 69 5D    {♪◙    i=0;♪◙    while((b[t+i]
000039A0  3D 3D 62 5B 74 2B 69 2B  31 5D 29 20 26 26 20 28  28 74 2B 69 29 3C 58 52  65 73 29 20 26 26 20 28  ==b[t+i+1]) && ((t+i)<XRes) && (
000039C0  69 3C 36 33 29 29 2B 2B  69 3B 0D 0A 20 20 20 20  69 66 28 69 3E 30 29 0D  0A 20 20 20 20 7B 0D 0A  i<63))++i;♪◙    if(i>0)♪◙    {♪◙
000039E0  20 20 20 20 20 20 66 70  75 74 63 28 69 7C 30 78  63 30 2C 20 4F 75 74 5F  46 69 6C 65 29 3B 0D 0A        fputc(i|0xc0, Out_File);♪◙
00003A00  20 20 20 20 20 20 66 70  75 74 63 28 62 5B 74 5D  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20        fputc(b[t], Out_File);♪◙  
00003A20  20 20 20 20 74 2B 3D 69  3B 0D 0A 20 20 20 20 7D  0D 0A 20 20 20 20 65 6C  73 65 0D 0A 20 20 20 20      t+=i;♪◙    }♪◙    else♪◙    
00003A40  7B 0D 0A 20 20 20 20 20  20 69 66 28 28 28 62 5B  74 5D 29 26 30 78 63 30  29 3D 3D 30 78 63 30 29  {♪◙      if(((b[t])&0xc0)==0xc0)
00003A60  0D 0A 09 66 70 75 74 63  28 30 78 63 31 2C 20 4F  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 20 20 20  ♪◙○fputc(0xc1, Out_File);♪◙     
00003A80  20 66 70 75 74 63 28 62  5B 74 2B 2B 5D 2C 20 4F  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 20 20 7D   fputc(b[t++], Out_File);♪◙    }
00003AA0  0D 0A 20 20 7D 0D 0A 20  20 77 68 69 6C 65 28 74  3C 58 52 65 73 29 3B 0D  0A 7D 0D 0A 0D 0A 76 6F  ♪◙  }♪◙  while(t<XRes);♪◙}♪◙♪◙vo
00003AC0  69 64 20 53 61 76 65 5F  50 43 58 28 29 0D 0A 7B  0D 0A 20 20 57 6F 72 64  20 79 3B 0D 0A 0D 0A 20  id Save_PCX()♪◙{♪◙  Word y;♪◙♪◙ 
00003AE0  20 69 66 28 28 4F 75 74  5F 46 69 6C 65 3D 66 6F  70 65 6E 28 46 69 6C 65  5F 4E 61 6D 65 5F 32 2C   if((Out_File=fopen(File_Name_2,
00003B00  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 75 6E 67 65 74 63 68   "wb"))==NULL)♪◙  {♪◙    ungetch
00003B20  28 33 32 29 3B 0D 0A 20  20 20 20 45 78 69 74 5F  47 72 61 70 68 69 63 73  28 29 3B 0D 0A 20 20 20  (32);♪◙    Exit_Graphics();♪◙   
00003B40  20 70 72 69 6E 74 66 28  22 43 61 6E 6E 6F 74 20  6F 70 65 6E 20 6F 75 74  70 75 74 20 66 69 6C 65   printf("Cannot open output file
00003B60  21 5C 6E 5C 6E 48 69 74  20 61 6E 79 20 6B 65 79  20 74 6F 20 65 78 69 74  2E 2E 2E 2E 22 29 3B 0D  !\n\nHit any key to exit....");♪
00003B80  0A 20 20 20 20 67 65 74  63 68 28 29 3B 0D 0A 20  20 20 20 65 78 69 74 28  31 29 3B 0D 0A 20 20 7D  ◙    getch();♪◙    exit(1);♪◙  }
00003BA0  0D 0A 20 20 70 75 74 63  28 30 78 30 61 2C 20 4F  75 74 5F 46 69 6C 65 29  3B 0D 0A 20 20 70 75 74  ♪◙  putc(0x0a, Out_File);♪◙  put
00003BC0  63 28 35 2C 20 4F 75 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  c(5, Out_File);♪◙  putc(1, Out_F
00003BE0  69 6C 65 29 3B 0D 0A 20  20 70 75 74 63 28 38 2C  20 4F 75 74 5F 46 69 6C  65 29 3B 0D 0A 20 20 70  ile);♪◙  putc(8, Out_File);♪◙  p
00003C00  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 30 2C 20 4F 75 74  utw(0, Out_File);♪◙  putw(0, Out
00003C20  5F 46 69 6C 65 29 3B 0D  0A 20 20 70 75 74 77 28  58 52 65 73 2D 31 2C 20  4F 75 74 5F 46 69 6C 65  _File);♪◙  putw(XRes-1, Out_File
00003C40  29 3B 0D 0A 20 20 70 75  74 77 28 59 52 65 73 2D  31 2C 20 4F 75 74 5F 46  69 6C 65 29 3B 0D 0A 20  );♪◙  putw(YRes-1, Out_File);♪◙ 
00003C60  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 59   putw(XRes, Out_File);♪◙  putw(Y
00003C80  52 65 73 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 34 39  Res, Out_File);♪◙  for(y=0; y<49
00003CA0  3B 20 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  ; y++)♪◙   putc(0, Out_File);♪◙ 
00003CC0  20 70 75 74 63 28 31 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   putc(1, Out_File);♪◙  putw(XRes
00003CE0  2C 20 4F 75 74 5F 46 69  6C 65 29 3B 0D 0A 20 20  70 75 74 77 28 32 2C 20  4F 75 74 5F 46 69 6C 65  , Out_File);♪◙  putw(2, Out_File
00003D00  29 3B 0D 0A 20 20 66 6F  72 28 79 3D 30 3B 20 79  3C 35 38 3B 20 79 2B 2B  29 0D 0A 20 20 20 70 75  );♪◙  for(y=0; y<58; y++)♪◙   pu
00003D20  74 63 28 30 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 59  tc(0, Out_File);♪◙  for(y=0; y<Y
00003D40  52 65 73 3B 20 79 2B 2B  29 0D 0A 20 20 20 20 57  72 69 74 65 5F 50 43 58  5F 4C 69 6E 65 28 79 29  Res; y++)♪◙    Write_PCX_Line(y)
00003D60  3B 0D 0A 20 20 70 75 74  63 28 30 78 30 43 2C 20  4F 75 74 5F 46 69 6C 65  29 3B 0D 0A 20 20 66 6F  ;♪◙  putc(0x0C, Out_File);♪◙  fo
00003D80  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 70 75 74  r(y=0; y<256; y++)♪◙  {♪◙    put
00003DA0  63 28 28 28 50 61 6C 5B  79 5D 2E 52 65 64 29 3C  3C 32 29 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  c(((Pal[y].Red)<<2), Out_File);♪
00003DC0  0A 20 20 20 20 70 75 74  63 28 28 28 50 61 6C 5B  79 5D 2E 47 72 6E 29 3C  3C 32 29 2C 20 4F 75 74  ◙    putc(((Pal[y].Grn)<<2), Out
00003DE0  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 42 6C 75 29 3C  _File);♪◙    putc(((Pal[y].Blu)<
00003E00  3C 32 29 2C 20 4F 75 74  5F 46 69 6C 65 29 3B 0D  0A 20 20 7D 0D 0A 20 20  66 63 6C 6F 73 65 28 4F  <2), Out_File);♪◙  }♪◙  fclose(O
00003E20  75 74 5F 46 69 6C 65 29  3B 0D 0A 7D 0D 0A 66 6C  6F 61 74 20 4D 49 4E 28  66 6C 6F 61 74 20 61 2C  ut_File);♪◙}♪◙float MIN(float a,
00003E40  20 66 6C 6F 61 74 20 62  29 0D 0A 66 6C 6F 61 74  20 4D 41 58 28 66 6C 6F  61 74 20 61 2C 20 66 6C   float b)♪◙float MAX(float a, fl
00003E60  6F 61 74 20 62 29 0D 0A  66 6C 6F 61 74 20 4D 49  4E 33 28 66 6C 6F 61 74  20 61 2C 20 66 6C 6F 61  oat b)♪◙float MIN3(float a, floa
00003E80  74 20 62 2C 20 66 6C 6F  61 74 20 63 29 0D 0A 66  6C 6F 61 74 20 4D 41 58  33 28 66 6C 6F 61 74 20  t b, float c)♪◙float MAX3(float 
00003EA0  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 4D 49 4E 34  a, float b, float c)♪◙float MIN4
00003EC0  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 2C 20 66 6C 6F 61  (float a, float b, float c, floa
00003EE0  74 20 64 29 0D 0A 66 6C  6F 61 74 20 4D 41 58 34  28 66 6C 6F 61 74 20 61  2C 20 66 6C 6F 61 74 20  t d)♪◙float MAX4(float a, float 
00003F00  62 2C 20 66 6C 6F 61 74  20 63 2C 20 66 6C 6F 61  74 20 64 29 0D 0A 76 6F  69 64 20 56 65 63 4D 69  b, float c, float d)♪◙void VecMi
00003F20  6E 28 54 44 41 20 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  n(TDA a, TDA b, TDA c)♪◙void Vec
00003F40  4D 61 78 28 54 44 41 20  61 2C 20 54 44 41 20 62  2C 20 54 44 41 20 63 29  0D 0A 76 6F 69 64 20 56  Max(TDA a, TDA b, TDA c)♪◙void V
00003F60  65 63 4E 65 67 61 74 65  28 54 44 41 20 41 29 0D  0A 76 6F 69 64 20 49 6E  69 74 52 61 6E 64 28 66  ecNegate(TDA A)♪◙void InitRand(f
00003F80  6C 6F 61 74 20 53 65 65  64 29 0D 0A 69 6E 74 20  52 61 6E 64 49 6E 74 28  57 6F 72 64 20 52 61 6E  loat Seed)♪◙int RandInt(Word Ran
00003FA0  67 65 29 0D 0A 66 6C 6F  61 74 20 52 61 6E 64 28  29 0D 0A 42 79 74 65 20  47 65 74 5F 50 69 78 65  ge)♪◙float Rand()♪◙Byte Get_Pixe
00003FC0  6C 5F 32 28 57 6F 72 64  20 78 2C 20 57 6F 72 64  20 79 29 0D 0A 23 69 6E  63 6C 75 64 65 20 22 73  l_2(Word x, Word y)♪◙#include "s
00003FE0  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
00004000  75 64 65 20 22 61 6C 6C  6F 63 2E 68 22 0D 0A 23  69 6E 63 6C 75 64 65 20  22 73 74 72 69 6E 67 2E  ude "alloc.h"♪◙#include "string.
00004020  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 6C 75 64 65 20  h"♪◙#include "defs.h"♪◙#include 
00004040  22 67 6C 6F 62 61 6C 73  2E 68 22 0D 0A 23 69 6E  63 6C 75 64 65 20 22 6D  61 74 68 62 2E 68 22 0D  "globals.h"♪◙#include "mathb.h"♪
00004060  0A 0D 0A 23 64 65 66 69  6E 65 20 73 74 61 74 65  73 20 33 36 0D 0A 23 64  65 66 69 6E 65 20 6D 61  ◙♪◙#define states 36♪◙#define ma
00004080  78 73 74 61 74 65 20 73  74 61 74 65 73 2D 31 0D  0A 0D 0A 74 79 70 65 64  65 66 20 42 79 74 65 20  xstate states-1♪◙♪◙typedef Byte 
000040A0  73 74 61 74 65 5B 33 36  5D 3B 0D 0A 74 79 70 65  64 65 66 20 73 74 61 74  65 20 72 75 6C 65 69 3B  state[36];♪◙typedef state rulei;
000040C0  0D 0A 74 79 70 65 64 65  66 20 72 75 6C 65 69 20  72 75 6C 65 5B 33 36 5D  3B 0D 0A 74 79 70 65 64  ♪◙typedef rulei rule[36];♪◙typed
000040E0  65 66 20 63 68 61 72 20  6E 61 6D 65 5B 33 33 5D  3B 0D 0A 0D 0A 6E 61 6D  65 20 72 75 6C 65 66 69  ef char name[33];♪◙♪◙name rulefi
00004100  6C 65 6E 61 6D 65 3B 0D  0A 46 49 4C 45 20 2A 72  75 6C 65 66 69 6C 65 3B  0D 0A 72 75 6C 65 20 66  lename;♪◙FILE *rulefile;♪◙rule f
00004120  61 72 20 2A 72 75 6C 65  73 3B 0D 0A 57 6F 72 64  20 69 2C 20 6A 2C 20 6B  3B 0D 0A 69 6E 74 20 78  ar *rules;♪◙Word i, j, k;♪◙int x
00004140  3B 0D 0A 42 79 74 65 20  6F 3B 0D 0A 42 79 74 65  20 72 3B 0D 0A 76 6F 69  64 20 77 72 69 74 65 72  ;♪◙Byte o;♪◙Byte r;♪◙void writer
00004160  75 6C 65 66 69 6C 65 28  29 0D 0A 7B 0D 0A 20 20  66 77 72 69 74 65 28 72  75 6C 65 73 2C 20 73 69  ulefile()♪◙{♪◙  fwrite(rules, si
00004180  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 0A 20 20 66 63  zeof(rule), 36, rulefile);♪◙  fc
000041A0  6C 6F 73 65 28 72 75 6C  65 66 69 6C 65 29 3B 0D  0A 7D 0D 0A 20 20 73 74  72 63 70 79 28 72 75 6C  lose(rulefile);♪◙}♪◙  strcpy(rul
000041C0  65 66 69 6C 65 6E 61 6D  65 2C 20 22 52 55 4C 45  2E 43 41 22 29 3B 0D 0A  20 20 69 66 28 28 72 75  efilename, "RULE.CA");♪◙  if((ru
000041E0  6C 65 66 69 6C 65 3D 66  6F 70 65 6E 28 72 75 6C  65 66 69 6C 65 6E 61 6D  65 2C 20 22 77 62 22 29  lefile=fopen(rulefilename, "wb")
00004200  29 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  )==NULL)♪◙  {♪◙    printf("can't
00004220  20 6F 70 65 6E 20 66 69  6C 65 2E 5C 6E 22 29 3B  0D 0A 20 20 20 20 65 78  69 74 28 31 29 3B 0D 0A   open file.\n");♪◙    exit(1);♪◙
00004240  20 20 7D 0D 0A 20 20 72  75 6C 65 73 3D 66 61 72  63 61 6C 6C 6F 63 28 33  36 2C 20 73 69 7A 65 6F    }♪◙  rules=farcalloc(36, sizeo
00004260  66 28 72 75 6C 65 29 29  3B 0D 0A 20 20 69 66 28  72 75 6C 65 73 3D 3D 4E  55 4C 4C 29 0D 0A 20 20  f(rule));♪◙  if(rules==NULL)♪◙  
00004280  7B 0D 0A 20 20 20 20 70  72 69 6E 74 66 28 22 63  61 6E 27 74 20 67 65 74  20 74 68 65 20 6D 65 6D  {♪◙    printf("can't get the mem
000042A0  21 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 FF FF 00 00     !\n");♪◙    exit(1);♪◙  }♪◙  ..