Metropoli BBS
VIEWER: world2d.dsk MODE: BINARY (HEX)
==============================================================================================================================================
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 32  44 2E 43 00 01 00 01 00  d.....É.d.:...WORLD2D.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 32 44 2E  43 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  .....WORLD2D.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  BF 00 0E 00 1C 00 9D 00  00 00 0D 00 11 00 1A 00  27 00 2D 00 33 00 4C 00  5F 00 63 00 78 00 8D 00  ...¥......'.-.3.L._.c.x.ì.
00000100  93 00 99 00 2E 2E 5C 4D  4F 44 45 4C 5C 2A 2E 48  00 2A 2E 2A 00 2E 2E 5C  2A 2E 54 58 54 00 2E 2E  ô.Ö...\MODEL\*.H.*.*...\*.TXT...
00000120  5C 4D 4F 44 45 4C 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  \MODEL\*.C.*.INC.*.TXT.\BLSC\ANI
00000140  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 2A  MATE\ANIMATE4.C.\BLSC\SCNSCRPT\*
00000160  2E 43 00 2A 2E 48 00 43  3A 5C 42 4F 52 4C 41 4E  44 43 5C 43 4C 49 42 5C  2A 2E 43 00 43 3A 5C 42  .C.*.H.C:\BORLANDC\CLIB\*.C.C:\B
00000180  4F 52 4C 41 4E 44 43 5C  43 4C 49 42 5C 2A 2E 48  00 2A 2E 41 53 4D 00 2A  2E 50 41 53 00 2A 2E 43  ORLANDC\CLIB\*.H.*.ASM.*.PAS.*.C
000001A0  00 76 00 09 00 01 00 02  00 01 00 00 00 00 78 00  B4 00 0F 00 1E 00 90 00  00 00 0A 00 11 00 1A 00  .v........x....É......
000001C0  24 00 2D 00 34 00 3A 00  3F 00 4A 00 58 00 62 00  68 00 73 00 81 00 6D 61  78 63 6F 6C 75 6D 6E 00  $.-.4.:.?.J.X.b.h.s.ü.maxcolumn.
000001E0  6D 61 78 72 6F 77 00 77  6F 72 6C 64 74 6F 70 00  77 6F 72 6C 64 73 69 64  65 00 6D 61 78 73 74 61  maxrow.worldtop.worldside.maxsta
00000200  74 65 00 73 74 61 74 65  73 00 73 74 61 74 65 00  6E 61 6D 65 00 77 6F 72  6C 64 61 72 72 61 79 00  te.states.state.name.worldarray.
00000220  77 6F 72 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  worldfileName.worldfile.world.cl
00000240  65 61 72 57 6F 72 6C 64  00 64 6F 52 61 6E 64 6F  6D 57 6F 72 6C 64 00 77  72 69 74 65 57 6F 72 6C  earWorld.doRandomWorld.writeWorl
00000260  64 46 69 6C 65 00 79 00  AC 00 0F 00 1E 00 88 00  00 00 01 00 0D 00 17 00  1E 00 27 00 31 00 3A 00  dFile.y.¼...ê.......'.1.:.
00000280  40 00 45 00 50 00 5A 00  60 00 6B 00 79 00 00 52  61 6E 64 6F 6D 57 6F 72  6C 64 00 4D 61 78 43 6F  @.E.P.Z.`.k.y..RandomWorld.MaxCo
000002A0  6C 75 6D 6E 00 4D 61 78  52 6F 77 00 57 6F 72 6C  64 54 6F 70 00 57 6F 72  6C 64 53 69 64 65 00 4D  lumn.MaxRow.WorldTop.WorldSide.M
000002C0  61 78 53 74 61 74 65 00  53 74 61 74 65 00 4E 61  6D 65 00 57 6F 72 6C 64  41 72 72 61 79 00 57 6F  axState.State.Name.WorldArray.Wo
000002E0  72 6C 64 46 69 6C 65 00  57 6F 72 6C 64 00 43 6C  65 61 72 57 6F 72 6C 64  00 44 6F 52 61 6E 64 6F  rldFile.World.ClearWorld.DoRando
00000300  6D 57 6F 72 6C 64 00 57  72 69 74 65 57 6F 72 6C  64 46 69 6C 65 00 7A 00  14 00 02 00 04 00 0A 00  mWorld.WriteWorldFile.z.....
00000320  00 00 06 00 2A 2E 4F 42  4A 00 2A 2E 43 00 F4 01  4E 05 1E 00 00 19 00 00  0F 05 40 15 0F 05 40 15  ...*.OBJ.*.C.N....@§@§
00000340  04 00 20 20 95 05 00 00  0E 00 04 00 3D 00 2E 00  12 00 00 19 00 00 00 11  4F 17 00 11 4F 17 02 00  .  ò....=........O.O.
00000360  30 0D 34 00 01 19 00 01  00 01 4F 17 00 01 4F 10  00 00 00 00 01 00 4D 02  01 00 39 02 00 00 00 00  04...O.O.....M.9....
00000380  00 00 00 00 00 00 00 00  00 00 00 00 01 00 3D 02  01 00 44 02 00 00 55 00  00 19 00 00 01 02 4F 17  .............=.D..U....O
000003A0  00 01 4F 10 00 00 00 00  43 3A 5C 42 4C 53 50 5C  42 4F 4F 4B 4D 49 53 43  5C 54 4D 50 5C 57 4F 52  .O....C:\BLSP\BOOKMISC\TMP\WOR
000003C0  4C 44 32 44 2E 50 41 53  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  LD2D.PAS............
000003E0  00 01 00 01 00 01 00 01  00 00 00 51 00 00 19 00  00 01 02 4F 17 00 01 4F  10 00 00 00 00 43 3A 5C  .......Q....O.O....C:\
00000400  42 4C 53 50 5C 42 4F 4F  4B 4D 49 53 43 5C 54 4D  50 5C 4D 41 54 48 42 2E  43 00 02 00 63 02 01 00  BLSP\BOOKMISC\TMP\MATHB.C..c.
00000420  50 02 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 55 00 00 19  P..............U..
00000440  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
00000460  4D 50 5C 57 4F 52 4C 44  32 44 2E 50 41 53 00 01  00 3A 00 01 00 3A 00 01  00 01 00 01 00 01 00 01  MP\WORLD2D.PAS..:..:.....
00000480  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 00  00 51 00 00 19 00 00 01  02 4F 17 00 01 4F 10 00  ..........Q....O.O.
000004A0  00 00 00 43 3A 5C 42 4C  53 50 5C 42 4F 4F 4B 4D  49 53 43 5C 54 4D 50 5C  4D 41 54 48 42 2E 43 00  ...C:\BLSP\BOOKMISC\TMP\MATHB.C.
000004C0  01 00 5C 02 01 00 50 02  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  01 00 01 00 01 00 01 00  .\.P............
000004E0  00 00 51 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  ..Q....O.O....C:\BLSP\BOOK
00000500  4D 49 53 43 5C 54 4D 50  5C 4D 41 54 48 42 2E 43  00 16 00 61 02 01 00 50  02 01 00 01 00 01 00 01  MISC\TMP\MATHB.C..a.P...
00000520  00 01 00 01 00 01 00 01  00 01 00 5D 02 01 00 5D  02 00 00 52 00 00 19 00  00 01 02 4F 17 00 01 4F  ......].]..R....O.O
00000540  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 31 44  ....C:\BLSP\BOOKMISC\TMP\RULE1D
00000560  2E 43 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  .C...............
00000580  00 01 00 00 00 52 00 00  19 00 00 01 02 4F 17 00  01 4F 10 00 00 00 00 43  3A 5C 42 4C 53 50 5C 42  ....R....O.O....C:\BLSP\B
000005A0  4F 4F 4B 4D 49 53 43 5C  54 4D 50 5C 52 55 4C 45  32 44 2E 43 00 02 00 40  00 01 00 2D 00 01 00 01  OOKMISC\TMP\RULE2D.C..@..-..
000005C0  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 00 00 52  00 00 19 00 00 01 02 4F  .............R....O
000005E0  17 00 01 4F 10 00 00 00  00 43 3A 5C 42 4C 53 50  5C 42 4F 4F 4B 4D 49 53  43 5C 54 4D 50 5C 53 49  .O....C:\BLSP\BOOKMISC\TMP\SI
00000600  45 52 32 44 2E 43 00 02  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  ER2D.C.............
00000620  00 01 00 01 00 01 00 00  00 51 00 00 19 00 00 01  02 4F 17 00 01 4F 10 00  00 00 00 43 3A 5C 42 4C  ......Q....O.O....C:\BL
00000640  53 50 5C 42 4F 4F 4B 4D  49 53 43 5C 54 4D 50 5C  4D 41 54 48 42 2E 43 00  02 00 63 02 01 00 50 02  SP\BOOKMISC\TMP\MATHB.C..c.P
00000660  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 51 00 00 19 00 00  ..............Q....
00000680  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
000006A0  5C 4D 41 54 48 42 2E 43  00 01 00 5C 02 01 00 52  02 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  \MATHB.C..\.R.......
000006C0  00 01 00 5C 02 01 00 5C  02 00 00 51 00 00 19 00  00 01 02 4F 17 00 01 4F  10 00 00 00 00 43 3A 5C  ..\.\..Q....O.O....C:\
000006E0  42 4C 53 50 5C 42 4F 4F  4B 4D 49 53 43 5C 54 4D  50 5C 4D 41 54 48 42 2E  43 00 02 00 5C 02 01 00  BLSP\BOOKMISC\TMP\MATHB.C..\.
00000700  49 02 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 53 00 00 19  I..............S..
00000720  00 01 00 01 4F 17 00 01  4F 10 00 00 00 00 43 3A  5C 42 4C 53 50 5C 42 4F  4F 4B 4D 49 53 43 5C 54  ..O.O....C:\BLSP\BOOKMISC\T
00000740  4D 50 5C 57 4F 52 4C 44  32 44 2E 43 00 02 00 4D  00 01 00 39 00 01 00 01  00 01 00 01 00 01 00 01  MP\WORLD2D.C..M..9......
00000760  00 01 00 01 00 01 00 0D  00 01 00 0D 00 00 00 4F  00 00 19 00 00 00 01 4F  10 00 01 4F 10 00 00 00  .........O.....O.O...
00000780  00 43 3A 5C 42 4C 53 43  5C 42 4F 4F 4B 4D 49 53  43 5C 4D 41 54 48 42 2E  4F 42 4A 00 01 00 01 00  .C:\BLSC\BOOKMISC\MATHB.OBJ...
000007A0  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 12 00  .................
000007C0  00 19 00 00 00 11 4F 17  00 11 4F 17 08 00 00 01  4F 00 00 19 00 00 01 02  4F 10 00 01 4F 10 00 00  ....O.O..O....O.O..
000007E0  00 00 43 3A 5C 42 4C 53  43 5C 42 4F 4F 4B 4D 49  53 43 5C 57 4F 52 4C 44  32 44 2E 43 00 01 00 01  ..C:\BLSC\BOOKMISC\WORLD2D.C..
00000800  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 01 00 01  00 01 00 01 00 00 00 4F  .................O
00000820  00 00 19 00 00 00 01 4F  10 00 01 4F 10 00 00 00  00 43 3A 5C 42 4C 53 43  5C 42 4F 4F 4B 4D 49 53  .....O.O....C:\BLSC\BOOKMIS
00000840  43 5C 57 4F 52 4C 44 32  44 2E 43 00 01 00 42 00  01 00 42 00 01 00 01 00  01 00 01 00 01 00 01 00  C\WORLD2D.C..B..B.......
00000860  01 00 01 00 01 00 01 00  01 00 01 00 00 00 12 00  00 19 00 00 00 01 4F 0F  00 01 4F 0F 01 00 5C 42  .............O.O.\B
00000880  F6 01 5A 3C 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 52 4F  ÷Z<MATERIAL   TYPE    = MIRRO
000008A0  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 52 46  R   TEXTURE = SMOOTH   AMBRF
000008C0  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 30 0D  L  =    0.000    0.000    0.000
000008E0  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 
00000900  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 30 20     0.700   SPCRFL  =    0.300 
00000920  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 3D 20     0.300    0.300   GLOSS   = 
00000940  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 20 20    50.000MATERIAL   TYPE   
00000960  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 4F 54   = REDMIRROR   TEXTURE = SMOOT
00000980  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 30 30  H   AMBRFL  =    0.000    0.00
000009A0  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 37 30  0    0.000   DIFRFL  =    0.70
000009C0  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 20 20  0    0.000    0.000   SPCRFL  
000009E0  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 20 20  =    0.300    0.000    0.000  
00000A00  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 4C 0D   GLOSS   =   50.000MATERIAL
00000A20  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 54 45     TYPE    = GREENMIRROR   TE
00000A40  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  =    
00000A60  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
00000A80  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 30 30  FL  =    0.000    0.700    0.000
00000AA0  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 30 30     SPCRFL  =    0.000    0.300
00000AC0  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
00000AE0  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 45 4D  MATERIAL   TYPE    = BLUEM
00000B00  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 41  IRROR   TEXTURE = SMOOTH   A
00000B20  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 2E  MBRFL  =    0.000    0.000    0.
00000B40  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 2E  000   DIFRFL  =    0.000    0.
00000B60  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 30 2E  000    0.700   SPCRFL  =    0.
00000B80  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 53 20  000    0.000    0.300   GLOSS 
00000BA0  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 45 20    =   50.000MATERIAL   TYPE 
00000BC0  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 54 48     = CHROME   TEXTURE = SMOOTH
00000BE0  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 30     AMBRFL  =    0.100    0.100
00000C00  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 30 30      0.100   DIFRFL  =    0.100
00000C20  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 20 3D      0.100    0.100   SPCRFL  =
00000C40  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 20 20      0.800    0.800    0.800   
00000C60  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 41 4C  GLOSS   =   40.000MATERIAL
00000C80  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 52 45     TYPE    = BRASS   TEXTURE
00000CA0  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 30 30   = SMOOTH   AMBRFL  =    0.100
00000CC0  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 20 3D      0.100    0.100   DIFRFL  =
00000CE0  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 20 20      0.300    0.300    0.300   
00000D00  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 20 30  SPCRFL  =    0.600    0.500    0
00000D20  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 41 54  .250   GLOSS   =   30.000MAT
00000D40  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 54 45  ERIAL   TYPE    = WATER   TE
00000D60  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 30 2E  XTURE = GRIT   AMBRFL  =    0.
00000D80  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 46 4C  100    0.100    0.300   DIFRFL
00000DA0  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 0D 0A    =    0.100    0.300    0.300
00000DC0  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 20 20     SPCRFL  =    0.100    0.100  
00000DE0  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 0D 0A    0.400   GLOSS   =    3.000
00000E00  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 54 49  MATERIAL   TYPE    = PLASTICTI
00000E20  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 4D 42  LE   TEXTURE = CHECKER   AMB
00000E40  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
00000E60  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
00000E80  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 32 30  0    0.700   SPCRFL  =    0.20
00000EA0  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 20 20  0    0.200    0.200   GLOSS   
00000EC0  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 20 20  =    4.000CHECK   TILE1   
00000EE0  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 20 20  =    1.000    0.000    0.000  
00000F00  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 20 20   TILE2   =    0.200    0.200    
00000F20  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 41 54  0.200   TILE    =    0.02MAT
00000F40  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 42 4C  ERIAL   TYPE    = ITALIANMARBL
00000F60  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 4C 20  E   TEXTURE = WOOD   AMBRFL 
00000F80  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 0A 20   =    0.100    0.100    0.100 
00000FA0  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 20 20    DIFRFL  =    0.700    0.700   
00000FC0  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 20 20   0.700   SPCRFL  =    0.200   
00000FE0  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 20 20   0.200    0.200   GLOSS   =   
00001000  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 20 4F  10.000MATERIAL   TYPE    = O
00001020  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 41 4D  AKWOOD   TEXTURE = WOOD   AM
00001040  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 2E 32  BRFL  =    0.200    0.200    0.2
00001060  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 34  00   DIFRFL  =    0.700    0.4
00001080  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
000010A0  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 20 20  00    0.100    0.100   GLOSS  
000010C0  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 20 20   =    5.000MATERIAL   TYPE  
000010E0  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 20 20    = GRASS   TEXTURE = GRIT  
00001100  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 20 20   AMBRFL  =    0.200    0.200    
00001120  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 20 20  0.200   DIFRFL  =    0.600    
00001140  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 20 20  0.800    0.250   SPCRFL  =    
00001160  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
00001180  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 20 20  S   =    0.000MATERIAL  
000011A0  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 3D 20   TYPE    = CEMENT   TEXTURE = 
000011C0  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 20 30  GRIT   AMBRFL  =    0.200    0
000011E0  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 20 30  .200    0.200   DIFRFL  =    0
00001200  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 52 46  .800    0.800    0.800   SPCRF
00001220  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 30 0D  L  =    0.000    0.000    0.000
00001240  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 41 4C     GLOSS   =    0.000MATERIAL
00001260  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 20 54     TYPE    = BLACKCHROME   T
00001280  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 20  EXTURE = SMOOTH   AMBRFL  =   
000012A0  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 49 46   1.000    1.000    1.000   DIF
000012C0  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
000012E0  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 30 30  0   SPCRFL  =    0.000    0.00
00001300  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 30 30  0    0.000   GLOSS   =   40.00
00001320  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 30 30  0PYRAMID   LOC     = -200.00
00001340  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 20 20  0 9999.000    0.000   V1      
00001360  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 20 20  =  400.000    0.000    0.000  
00001380  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 20 20   V2      =    0.000  400.000    
000013A0  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 20 20  0.000   HEIGHT  = 1200.000  
000013C0  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 20 20   MATL    = BLACKCHROMELAMP  
000013E0  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 30 30   LOC     = 1000.000 -999.000 100
00001400  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 20 20  0.000   RADIUS  =  700.000  
00001420  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 20 20   INTENS  =    1.000    1.000    
00001440  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 30 2E  0.900aquamarine           0.
00001460  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 61 63  439216 0.858824 0.576471blac
00001480  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 30 30  k                0.000000 0.0000
000014A0  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 20 20  00 0.000000blue             
000014C0  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 0D 0A      0.000000 0.000000 1.000000
000014E0  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 39 20  blue_violet          0.623529 
00001500  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 20 20  0.372549 0.623529brown      
00001520  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 31 36            0.647059 0.164706 0.16
00001540  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 2E 33  4706cadet_blue           0.3
00001560  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 61 6C  72549 0.623529 0.623529coral
00001580  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 30 33                  1.000000 0.49803
000015A0  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 20 20  9 0.000000cornflower_blue   
000015C0  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 0A 09     0.258824 0.258824 0.435294
000015E0  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 20 31  cyan                 0.000000 1
00001600  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 20 20  .000000 1.000000dark_green  
00001620  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 38 34           0.184314 0.309804 0.184
00001640  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 33 30  314dark_olive_green     0.30
00001660  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 5F 6F  9804 0.309804 0.184314dark_o
00001680  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 37 38  rchid          0.600000 0.196078
000016A0  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 20 20   0.800000dark_slate_blue    
000016C0  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 09 09    0.419608 0.137255 0.556863
000016E0  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 30 2E  dark_slate_gray      0.184314 0.
00001700  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 67 72  309804 0.309804dark_slate_gr
00001720  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 39 38  ey      0.184314 0.309804 0.3098
00001740  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 33 39  04dark_turquoise       0.439
00001760  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 72 61  216 0.576471 0.858824dim_gra
00001780  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 
000017A0  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 20 20  0.329412dim_grey            
000017C0  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 09 66   0.329412 0.329412 0.329412f
000017E0  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 2E 31  irebrick            0.556863 0.1
00001800  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 20 20  37255 0.137255forest_green  
00001820  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 32 35         0.137255 0.556863 0.13725
00001840  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 30 30  5gold                 0.8000
00001860  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 72 6F  00 0.498039 0.196078goldenro
00001880  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 20 30  d            0.858824 0.858824 0
000018A0  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 20 20  .439216gray                 
000018C0  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 67 72  0.752941 0.752941 0.752941gr
000018E0  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 30 30  een                0.000000 1.00
00001900  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 20 20  0000 0.000000green_yellow   
00001920  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 31 36        0.576471 0.858824 0.439216
00001940  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 39 34  grey                 0.75294
00001960  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 72 65  1 0.752941 0.752941indian_re
00001980  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 30 2E  d           0.309804 0.184314 0.
000019A0  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 20 30  184314khaki                0
000019C0  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 69 67  .623529 0.623529 0.372549lig
000019E0  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 34 37  ht_blue           0.749020 0.847
00001A00  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 20 20  059 0.847059light_gray      
00001A20  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
00001A40  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 32 34  light_grey           0.658824
00001A60  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 65 65   0.658824 0.658824light_stee
00001A80  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 2E 37  l_blue     0.560784 0.560784 0.7
00001AA0  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 30 2E  37255lime_green           0.
00001AC0  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 67 65  196078 0.800000 0.196078mage
00001AE0  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 30 30  nta              1.000000 0.0000
00001B00  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 20 20  00 1.000000maroon           
00001B20  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 0D 0A      0.556863 0.137255 0.419608
00001B40  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 38 20  medium_aquamarine    0.196078 
00001B60  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 75 65  0.800000 0.600000medium_blue
00001B80  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 38 30            0.196078 0.196078 0.80
00001BA0  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 2E 34  0000medium_forest_green  0.4
00001BC0  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 69 75  19608 0.556863 0.137255mediu
00001BE0  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 36 34  m_goldenrod     0.917647 0.91764
00001C00  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 20 20  7 0.678431medium_orchid     
00001C20  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 0A 09     0.576471 0.439216 0.858824
00001C40  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 20 30  medium_sea_green     0.258824 0
00001C60  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 74 65  .435294 0.258824medium_slate
00001C80  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 30 30  _blue    0.498039 0.000000 1.000
00001CA0  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 34 39  000medium_spring_green  0.49
00001CC0  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 75 6D  8039 1.000000 0.000000medium
00001CE0  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 32 34  _turquoise     0.439216 0.858824
00001D00  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 20 20   0.858824medium_violet_red  
00001D20  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 09 09    0.858824 0.439216 0.576471
00001D40  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 30 2E  midnight_blue        0.184314 0.
00001D60  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 20 20  184314 0.309804navy         
00001D80  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
00001DA0  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 33 37  63navy_blue            0.137
00001DC0  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 65 20  255 0.137255 0.556863orange 
00001DE0  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 38 20                0.800000 0.196078 
00001E00  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 20 20  0.196078orange_red          
00001E20  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 09 6F   1.000000 0.000000 0.498039o
00001E40  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 2E 34  rchid               0.858824 0.4
00001E60  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 20 20  39216 0.858824pale_green    
00001E80  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 37 38         0.560784 0.737255 0.56078
00001EA0  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 37 32  4pink                 0.7372
00001EC0  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 20 20  55 0.560784 0.560784plum    
00001EE0  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 20 30               0.917647 0.678431 0
00001F00  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 20 20  .917647red                  
00001F20  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 73 61  1.000000 0.000000 0.000000sa
00001F40  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 32 35  lmon               0.435294 0.25
00001F60  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 20 20  8824 0.258824sea_green      
00001F80  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 30 38        0.137255 0.556863 0.419608
00001FA0  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 38 36  sienna               0.55686
00001FC0  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 65 20  3 0.419608 0.137255sky_blue 
00001FE0  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 30 2E              0.196078 0.600000 0.
00002000  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 20 30  800000slate_blue           0
00002020  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 70 72  .000000 0.498039 1.000000spr
00002040  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 30 30  ing_green         0.000000 1.000
00002060  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 20 20  000 0.498039steel_blue      
00002080  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 33 0D       0.137255 0.419608 0.556863
000020A0  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 32 34  tan                  0.858824
000020C0  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 20 20   0.576471 0.439216thistle   
000020E0  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 2E 38             0.847059 0.749020 0.8
00002100  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 30 2E  47059turquoise            0.
00002120  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 6F 6C  678431 0.917647 0.917647viol
00002140  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 34 33  et               0.309804 0.1843
00002160  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 20 20  14 0.309804violet_red       
00002180  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 0D 0A      0.800000 0.196078 0.600000
000021A0  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 39 20  wheat                0.847059 
000021C0  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 20 20  0.847059 0.749020white      
000021E0  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 39 38            0.988235 0.988235 0.98
00002200  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 2E 30  8235yellow               1.0
00002220  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 6C 6F  00000 1.000000 0.000000yello
00002240  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 30 30  w_green         0.600000 0.80000
00002260  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 68 61  0 0.196078typedef unsigned cha
00002280  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 20 69  r      Byte;typedef unsigned i
000022A0  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 66 61  nt       Word;typedef enum {fa
000022C0  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 74 72  lse, true} Boolean;typedef str
000022E0  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 6E 3B  uct{  Byte Red;  Byte Grn;
00002300  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 64 65    Byte Blu;}RGB;typede
00002320  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 0A 76  f RGB PaletteRegister[256];v
00002340  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 69 66  oid Set_Graphics_Mode(){  if
00002360  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 20 20  ((XRes<321) && (YRes<201))    
00002380  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 0D 0A  InitGraphics(19);  else  {
000023A0  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 29 29      if((XRes<641) && (YRes<351))
000023C0  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 20 65        InitGraphics(45);    e
000023E0  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 29 20  lse    {      if((XRes<641) 
00002400  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 34 36  && (YRes<481))InitGraphics(46
00002420  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 58 52  );      else      {if((XR
00002440  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 74 47  es<801) && (YRes<601))  InitG
00002460  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 61 70  raphics(48);else  InitGrap
00002480  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 0D 0A  hics(56);      }    }  }
000024A0  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 2B 62  }  Pic_File=fopen(P_Name, "w+b
000024C0  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 7B 0D  ");  for(y=0; y<7; y++);  {
000024E0  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 20 20      fputc(253, Pic_File);    
00002500  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 63 28  fputc(20, Pic_File);    fputc(
00002520  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 50 69  41, Pic_File);    fputc(14, Pi
00002540  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 65 29  c_File);    fputc(0, Pic_File)
00002560  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 20 20  ;    fputc(9, Pic_File);    
00002580  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 20 47  fputc(3, Pic_File);  }void G
000025A0  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 42 79  etSceneFile(){  int i;  By
000025C0  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 46 69  te x, y;  printf("\nEnter Fi
000025E0  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 0A 20  le Name -> ");  x=wherex(); 
00002600  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 29 3B   y=wherey();  gets(SceneFile);
00002620  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 29 29    if(!(strcmp(SceneFile, "")))
00002640  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 43 55    {    strcpy(SceneFile, "CU
00002660  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 20 20  BEPLAN");    gotoxy(x, y);  
00002680  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 73 28    puts(SceneFile);  }  puts(
000026A0  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 65 46  "");  for(i=0; i<strlen(SceneF
000026C0  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 6F 75  ile); i++)    SceneFile[i]=tou
000026E0  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 20 53  pper(SceneFile[i]);}void S
00002700  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 0D 0A  ave_Picture(){  Word x, y;
00002720  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 0D 0A    Byte d;  FILE *Out_File;
00002740  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 77 2B    Out_File=fopen("TEMP.TGA", "w+
00002760  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 7B  b");  for(y=0; y<7; y++);  {
00002780  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 20 20      putw(256, Out_File);    
000027A0  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 2C 20  putw(1, Out_File);    putw(0, 
000027C0  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 6C 65  Out_File);    putc(1, Out_File
000027E0  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 20 20  );    putc(24, Out_File);   
00002800  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 30 2C   putw(0, Out_File);    putw(0,
00002820  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 74 5F   Out_File);    putw(XRes, Out_
00002840  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 65 29  File);    putw(YRes, Out_File)
00002860  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 20 20  ;    putw(CRes, Out_File);  
00002880  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 0D 0A  }  for(y=0; y<256; y++)  {
000028A0  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 2C 20      fputc((PalArray[y].Blu)<<2, 
000028C0  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 79 5B  Out_File);    fputc((PalArray[
000028E0  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 75 74  y].Grn)<<2, Out_File);    fput
00002900  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 6C 65  c((PalArray[y].Red)<<2, Out_File
00002920  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 2D 29  );  }  for(y=YRes; y>0; y--)
00002940  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 2B 29    {    for(x=0; x<XRes; x++)
00002960  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 2D 31      {      d=GetPixel(x, y-1
00002980  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 0A 20  );      fputc(d, Out_File); 
000029A0  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 0D 0A     }  }  fcloseall();}
000029C0  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
000029E0  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 6C 75  s.h"#include "conio.h"#inclu
00002A00  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 63 72  de "defs.h"void Set_Text_Scr
00002A20  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 63 6F  een(int tc, int tb){  textco
00002A40  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 3B 0D  lor(tc);  textbackground(tb);
00002A60  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 69 76    clrscr();}installuserdriv
00002A80  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 0A 3B  er("SVGA256",DetectVGA256);;
00002AA0  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 69 6F   *********************** Functio
00002AC0  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 2A 2A  n storedac() *******************
00002AE0  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 72 65  *********;Function to Store
00002B00  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 2C 0D   the dacbox[][] array into VGA,
00002B20  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 6E 67  ;called from loaddac() durring
00002B40  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 72 6F   initialization.storedacpro
00002B60  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 74 65  cpushes; need ES == DS te
00002B80  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 09 70  mporarilypushds;  ...p
00002BA0  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 09 3B  opes;  ...movax,1012h;
00002BC0  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 62 78   get the old DAC valuesmovbx
00002BE0  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 74 68  ,0;  (assuming, of course, th
00002C00  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 2E 0D  ey exist)movcx,256;  ...
00002C20  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 0A 09  movdx,offset dacbox;  ...
00002C40  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 3B 20  int10h; do it.popes; 
00002C60  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 01 93   ...retstoredac endpÇ^ô
00002C80  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 65 72  extern int  XRes, YRes;exter
00002CA0  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 72 6E  n Word MaxXRes, MaxYRes;extern
00002CC0  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 65 61   Word MaxX, MaxY;extern Boolea
00002CE0  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 61 74  n PerspectivePlot;extern float
00002D00  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 6C 65     Mx, My, Mz, ds;extern Boole
00002D20  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 63 6C  an Draw_Axis_And_Palette;#incl
00002D40  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 22 0D  ude "stdio.h"#include "dos.h"
00002D60  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 67 6C  #include "defs.h"#include "gl
00002D80  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 23 69  obals.h"#include "mathb.h"#i
00002DA0  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 4E 55  nclude "graphb.h"MASM %1 %1 NU
00002DC0  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 4F 42  L NULIF ERRORLEVEL 1 GOTO PROB
00002DE0  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 4E 20  LEMLINK %1 @AUTOLINKEXE2BIN 
00002E00  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 4F 42  %1 %1.DRVDEL %1.EXEDEL %1.OB
00002E20  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 69 65  J:PROBLEM#define NumVerticie
00002E40  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 75 6D  sInFacet 4#define MaxVertexNum
00002E60  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 33 30  InFacet 4#define ScaleData 230
00002E80  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 2F 2A  00#define ScaleImage 100/*
00002EA0  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 20 20  #define MaxFacet 1678       
00002EC0  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 6E 0D      independant : MaxFacet  = n
00002EE0  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 20 20  #define MaxVertex 6712       
00002F00  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 2A 20      verticies   MaxVertex = 4 * 
00002F20  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 0D 0A  n*/#define MaxFacet 3600
00002F40  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 4C 61  #define MaxVertex 3721int La
00002F60  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 56 65  stVertex, LastFacet;int LastVe
00002F80  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 2C 20  rtexNumInFacet;int VertexNum, 
00002FA0  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 74 3B  FacetNum;int VertexNumInFacet;
00002FC0  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 74 61  TDIA Vertex[MaxVertex+1];sta
00002FE0  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 6E 76  tic int far *Facet;float Inv
00003000  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 65 64  ScaleData, InvScaleImage;typed
00003020  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 6D 65  ef char Name[20];Name FileName
00003040  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 20 20  ;typedef struct{  int x;  
00003060  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 64 65  int y;} PixelVector;typede
00003080  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 72 74  f PixelVector PixelArray[NumVert
000030A0  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 56 6F  iciesInFacet+2];typedef TDA Vo
000030C0  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 5D 3B  xelArray[NumVerticiesInFacet+1];
000030E0  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 6F 69  void InitVertexBuffer()voi
00003100  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 64 20  d LoadData(Name FileName)void 
00003120  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 50 75  SaveData(Name FileName)void Pu
00003140  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 65 20  tWireFacet(PixelArray Pts, Byte 
00003160  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 61 79  Color)void PutFacet(PixelArray
00003180  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 6E 73   Face2d, Byte Color, Byte Intens
000031A0  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 0D 0A  )void Get_ANI_File_Name(){
000031C0  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 4C 4C    Byte x, y;  textcolor(YELL
000031E0  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 0A 20  OW);  textbackground(BLUE); 
00003200  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 65 72   gotoxy(1, 8);  cprintf("Enter
00003220  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 29 3B   File Name -> ");  x=wherex();
00003240  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 48 49    y=wherey();  textcolor(WHI
00003260  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 50 48  TE+BLINK);  cprintf("%s", "SPH
00003280  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 0D 0A  RPLAN");  textcolor(YELLOW);
000032A0  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 69 74    gotoxy(x, y);  while(!(kbhit
000032C0  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 22 29  ()));  cprintf("            ")
000032E0  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 65 5F  ;  gotoxy(x, y);  gets(File_
00003300  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 65 2C  Name);  if(!(strcmp(File_Name,
00003320  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 22 53   "")))    strcpy(File_Name, "S
00003340  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 29 3B  PHRPLAN");  strupr(File_Name);
00003360  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 0D 0A    strcat(File_Name, ".ANI");
00003380  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 20 20    gotoxy(1, 8);  printf("     
000033A0  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 0A 20                            "); 
000033C0  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 74 6F   textcolor(WHITE+BLINK);  goto
000033E0  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 22 29  xy(1, 8);  cprintf("Loading ")
00003400  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 69 6E  ;  textcolor(YELLOW);  cprin
00003420  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 74 65  tf("%s", File_Name);}Palette
00003440  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 6C 65  _Register Pal;void Grey_Pale
00003460  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 20 20  tte(Palette_Register Pal){  
00003480  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 2B 29  Word i;  for(i=0; i<64; i++)
000034A0  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 50 61    {    Pal[i].Red=i;    Pa
000034C0  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 0D 0A  l[i].Grn=i;    Pal[i].Blu=i;
000034E0  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 6E 63    }}#include "stdio.h"#inc
00003500  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 68 22  lude "math.h"#include "defs.h"
00003520  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 61 72  #include "mathb.h"void Clear
00003540  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 0D 0A  Palette(PaletteRegister Color)
00003560  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 35 35  { Word i;  for(i=0; i<=255
00003580  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 30 3B  ; i++)  {    Color[i].Red=0;
000035A0  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 6F 72      Color[i].Grn=0;    Color
000035C0  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 63 72  [i].Blu=0;  }}void Get_Scr
000035E0  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 34 5D  een_Line(Word Line, char buf[64]
00003600  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 20 4F  ){  long L_Offset;  Word O
00003620  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 41 30  ffset, Page;  Word Screen=0xA0
00003640  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 6C 78  00;  Word Old_Page;  Word lx
00003660  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 59 52  , ly;  Byte d;  if(Line<YR
00003680  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 20 73  es)  {    Old_Page=0;    s
000036A0  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 48 69  witch(Res)    {      case Hi
000036C0  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 4C 69  gh_Res :   Offset=Pre_Calc_Y1[Li
000036E0  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 3C 3C  ne+Y_Off];Page=((Line>>6)<<
00003700  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 09 7B  4);if(Page!=Old_Page){
00003720  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 09 20    outpw(0x3CD, Page); 
00003740  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 64 61   Old_Page=Page;}moveda
00003760  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 62 75  ta(Screen, Offset, _DS, (Word)bu
00003780  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 73 65  f, XRes);break;      case
000037A0  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 09 66   Medium_Res : Line+=Y_Off;f
000037C0  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 6C 78  or(lx=X_Off; lx<(XRes+X_Off); lx
000037E0  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 2C 20  ++){  d=Get_Pixel(lx, 
00003800  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 0A 09  Line);  buf[lx]=d;}
00003820  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 73 65  break;case Low_Res  : Offse
00003840  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 09 6D  t=Pre_Calc_Y1[Line+Y_Off];m
00003860  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 57 6F  ovedata(Screen, Offset, _DS, (Wo
00003880  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 20 7D  rd)buf, XRes);break;    }
000038A0  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 5B 30    }}  while(!isdigit(c[0
000038C0  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 0D 0A  ]))  {    while(!kbhit());
000038E0  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 72 6E      c[0]=getch();  }  return
00003900  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 6F 69  (atoi(c));Byte b[1024];voi
00003920  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 7B 0D  d Get_Screen_Line(Word Line){
00003940  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 53 63    Word Offset, Page;  Word Sc
00003960  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 20 20  reen=0xA000;  Word lx, ly;  
00003980  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 7B 0D  Byte d;  if(Line<YRes)  {
000039A0  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 0A 20      for(lx=0; lx<XRes; lx++) 
000039C0  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 6E 65     {      d=Get_Pixel(lx, Line
000039E0  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 0D 0A  );      b[lx]=d;    }  }
00003A00  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 79 29  }void Write_PCX_Line(Word y)
00003A20  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 0A 0D  {  Word t=0;  Byte i=0;
00003A40  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 20 20    Get_Screen_Line(y);  do  
00003A60  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 3D 3D  {    i=0;    while((b[t+i]==
00003A80  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 69 3C  b[t+i+1]) && ((t+i)<XRes) && (i<
00003AA0  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 20 20  63))++i;    if(i>0)    {  
00003AC0  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 20 20      fputc(i|0xc0, Out_File);  
00003AE0  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 20 20      fputc(b[t], Out_File);    
00003B00  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 7B 0D    t+=i;    }    else    {
00003B20  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 0D 0A        if(((b[t])&0xc0)==0xc0)
00003B40  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 20 66  fputc(0xc1, Out_File);      f
00003B60  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 0D 0A  putc(b[t++], Out_File);    }
00003B80  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 69 64    }  while(t<XRes);}void
00003BA0  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 20 69   Save_PCX(){  Word y;  i
00003BC0  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 20 22  f((Out_File=fopen(File_Name_2, "
00003BE0  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 28 33  wb"))==NULL)  {    ungetch(3
00003C00  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 20 70  2);    Exit_Graphics();    p
00003C20  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 21 5C  rintf("Cannot open output file!\
00003C40  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 0A 20  n\nHit any key to exit...."); 
00003C60  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 0D 0A     getch();    exit(1);  }
00003C80  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 63 28    putc(0x0a, Out_File);  putc(
00003CA0  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 69 6C  5, Out_File);  putc(1, Out_Fil
00003CC0  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 75 74  e);  putc(8, Out_File);  put
00003CE0  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 5F 46  w(0, Out_File);  putw(0, Out_F
00003D00  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 29 3B  ile);  putw(XRes-1, Out_File);
00003D20  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 20 70    putw(YRes-1, Out_File);  p
00003D40  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 52 65  utw(XRes, Out_File);  putw(YRe
00003D60  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 3B 20  s, Out_File);  for(y=0; y<49; 
00003D80  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 70  y++)   putc(0, Out_File);  p
00003DA0  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 2C 20  utc(1, Out_File);  putw(XRes, 
00003DC0  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 29 3B  Out_File);  putw(2, Out_File);
00003DE0  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 74 63    for(y=0; y<58; y++)   putc
00003E00  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 52 65  (0, Out_File);  for(y=0; y<YRe
00003E20  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 3B 0D  s; y++)    Write_PCX_Line(y);
00003E40  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 72 28    putc(0x0C, Out_File);  for(
00003E60  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 63 28  y=0; y<256; y++)  {    putc(
00003E80  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 0A 20  ((Pal[y].Red)<<2), Out_File); 
00003EA0  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 5F 46     putc(((Pal[y].Grn)<<2), Out_F
00003EC0  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 3C 32  ile);    putc(((Pal[y].Blu)<<2
00003EE0  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 75 74  ), Out_File);  }  fclose(Out
00003F00  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 20 66  _File);}float MIN(float a, f
00003F20  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 6F 61  loat b)float MAX(float a, floa
00003F40  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 74 20  t b)float MIN3(float a, float 
00003F60  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 61 2C  b, float c)float MAX3(float a,
00003F80  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 28 66   float b, float c)float MIN4(f
00003FA0  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 74 20  loat a, float b, float c, float 
00003FC0  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 62 2C  d)float MAX4(float a, float b,
00003FE0  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 6E 28   float c, float d)void VecMin(
00004000  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 4D 61  TDA a, TDA b, TDA c)void VecMa
00004020  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 65 63  x(TDA a, TDA b, TDA c)void Vec
00004040  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 6C 6F  Negate(TDA A)void InitRand(flo
00004060  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 67 65  at Seed)int RandInt(Word Range
00004080  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 6C 5F  )float Rand()Byte Get_Pixel_
000040A0  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 74 64  2(Word x, Word y)#include "std
000040C0  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 75 64  io.h"#include "dos.h"#includ
000040E0  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 68 22  e "alloc.h"#include "string.h"
00004100  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 67  #include "defs.h"#include "g
00004120  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 0D  lobals.h"#include "mathb.h"
00004140  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 78 73  #define states 36#define maxs
00004160  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 73 74  tate states-1typedef Byte st
00004180  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 0D 0A  ate[36];typedef state rulei;
000041A0  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 65 66  typedef rulei rule[36];typedef
000041C0  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 6C 65   char name[33];name rulefile
000041E0  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 61 72  name;FILE *rulefile;rule far
00004200  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 3B 0D   *rules;Word i, j, k;int x;
00004220  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 75 6C  Byte o;Byte r;void writerul
00004240  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 7A 65  efile(){  fwrite(rules, size
00004260  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 6C 6F  of(rule), 36, rulefile);  fclo
00004280  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 65 66  se(rulefile);}  strcpy(rulef
000042A0  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 6C 65  ilename, "RULE.CA");  if((rule
000042C0  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 29 3D  file=fopen(rulefilename, "wb"))=
000042E0  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 6F  =NULL)  {    printf("can't o
00004300  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 20 20  pen file.\n");    exit(1);  
00004320  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 66 28  }  rules=farcalloc(36, sizeof(
00004340  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 7B 0D  rule));  if(rules==NULL)  {
00004360  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 21 5C      printf("can't get the mem!\
00004380  6E 22 29 3B 0D 0A 20 20  20 20 65 78 69 74 28 31  29 3B 0D 0A 20 20 7D 0D  0A 20 20 66 77 72 69 74  n");    exit(1);  }  fwrit
000043A0  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
000043C0  69 6C 65 29 3B 0D 0A 74  79 70 65 64 65 66 20 73  74 61 74 65 20 72 75 6C  65 69 3B 0D 0A 74 79 70  ile);typedef state rulei;typ
000043E0  65 64 65 66 20 72 75 6C  65 69 20 72 75 6C 65 5B  33 36 5D 3B 0D 0A 72 75  6C 65 73 3D 66 61 72 63  edef rulei rule[36];rules=farc
00004400  61 6C 6C 6F 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  alloc(36, sizeof(rule));  if(r
00004420  75 6C 65 73 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  ules==NULL)  {    printf("ca
00004440  6E 27 74 20 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  n't get the mem!\n");    exit(
00004460  31 29 3B 0D 0A 20 20 7D  0D 0A 20 20 0D 0A 76 6F  69 64 20 43 6C 65 61 72  5F 53 63 72 65 65 6E 28  1);  }  void Clear_Screen(
00004480  29 0D 0A 7B 0D 0A 20 20  53 65 74 5F 47 72 61 70  68 69 63 73 5F 4D 6F 64  65 28 31 36 30 2C 20 31  ){  Set_Graphics_Mode(160, 1
000044A0  30 30 29 3B 0D 0A 20 20  49 6E 69 74 5F 50 61 6C  65 74 74 65 28 50 61 6C  41 72 72 61 79 29 3B 0D  00);  Init_Palette(PalArray);
000044C0  0A 20 20 53 65 74 5F 50  61 6C 65 74 74 65 28 50  61 6C 41 72 72 61 79 29  3B 0D 0A 7D 0D 0A FF FF    Set_Palette(PalArray);}  
000044E0  00 00                                                                                               ..
[ RETURN TO DIRECTORY ]