home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / games / vmsnet / vmstrek / part18 < prev    next >
Encoding:
Text File  |  1992-11-13  |  14.8 KB  |  358 lines
  1. Newsgroups: vmsnet.sources.games
  2. Path: uunet!stanford.edu!agate!usenet.ins.cwru.edu!magnus.acs.ohio-state.edu!zaphod.mps.ohio-state.edu!rpi!usenet.coe.montana.edu!news.u.washington.edu!raven.alaska.edu!acad2.alaska.edu!asdmf
  3. From: asdmf@acad2.alaska.edu
  4. Subject: Vmsnetrek 18/47
  5. Message-ID: <1992Nov13.134453.1@acad2.alaska.edu>
  6. Lines: 345
  7. Sender: news@raven.alaska.edu (USENET News System)
  8. Nntp-Posting-Host: acad2.alaska.edu
  9. Organization: University of Alaska
  10. Date: Fri, 13 Nov 1992 17:44:53 GMT
  11. Xref: uunet vmsnet.sources.games:504
  12.  
  13. -+-+-+-+-+-+-+-+ START OF PART 18 -+-+-+-+-+-+-+-+
  14. X   0x00, 0x1f, 0x00, 0x80, 0x07, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00`12
  15. V5,
  16. X`123
  17. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x0f, 0x00,
  18. X   0xf8, 0x7f, 0x00, 0x6c, 0xc1, 0x00, 0x60, 0x03, 0x00, 0x30, 0xf2, 0x00,
  19. X   0x9c, 0xc6, 0x01, 0xfe, 0xff, 0x03, 0xfe, 0xff, 0x03, 0x9c, 0xc6, 0x01,
  20. X   0x30, 0xf2, 0x00, 0x60, 0x03, 0x00, 0x6c, 0xc1, 0x00, 0xf8, 0x7f, 0x00,
  21. X   0xf0, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  22. V5,
  23. X`123
  24. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x03, 0x00, 0x00, 0x0f, 0x00,
  25. X   0xc0, 0x3f, 0x00, 0x78, 0xfc, 0x00, 0x3c, 0x8d, 0x01, 0xfc, 0x05, 0x03,
  26. X   0xfc, 0x0f, 0x00, 0xd8, 0x4f, 0x00, 0x50, 0x9f, 0x00, 0x10, 0xff, 0x01,
  27. X   0xbc, 0xf1, 0x03, 0xfc, 0xc0, 0x03, 0x78, 0xf0, 0x03, 0xe0, 0x01, 0x00,
  28. X   0x80, 0x0f, 0x00, 0x00, 0x1c, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  29. V5,
  30. X`123
  31. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0f, 0x00, 0x00, 0x1c, 0x00,
  32. X   0xe0, 0x3c, 0x00, 0xf0, 0x7f, 0x00, 0xf0, 0xf6, 0x00, 0xf0, 0xd1, 0x00,
  33. X   0xa4, 0x9b, 0x01, 0x64, 0x1f, 0x03, 0x7c, 0x4e, 0x02, 0x38, 0x9f, 0x00,
  34. X   0xf8, 0xbb, 0x00, 0x70, 0xf0, 0x01, 0xe0, 0xe4, 0x01, 0xc0, 0xf9, 0x01,
  35. X   0x00, 0xe3, 0x01, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  36. V5,
  37. X`123
  38. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xc0, 0x31, 0x00, 0xe0, 0x73, 0x00,
  39. X   0xe0, 0x7f, 0x00, 0xe0, 0xf1, 0x00, 0xb0, 0xe7, 0x00, 0x94, 0xb3, 0x01,
  40. X   0xdc, 0x9f, 0x01, 0x1c, 0x0f, 0x01, 0xf8, 0x0f, 0x03, 0x78, 0x0f, 0x02,
  41. X   0x30, 0x5c, 0x02, 0x30, 0x58, 0x00, 0x20, 0x7a, 0x00, 0x60, 0x7c, 0x00,
  42. X   0xc0, 0x78, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  43. V5,
  44. X`123
  45. X   0x00, 0x00, 0x00, 0x00, 0x06, 0x00, 0x20, 0x4f, 0x00, 0x30, 0xcf, 0x00,
  46. X   0x98, 0x9f, 0x01, 0xf8, 0xf6, 0x01, 0x78, 0xe6, 0x01, 0x18, 0x8f, 0x01,
  47. X   0x78, 0xe6, 0x01, 0xd8, 0xbf, 0x01, 0x18, 0x8f, 0x01, 0x18, 0x86, 0x01,
  48. X   0x90, 0x96, 0x00, 0x90, 0x96, 0x00, 0xb0, 0xdf, 0x00, 0xa0, 0x5f, 0x00,
  49. X   0x00, 0x0f, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  50. V5,
  51. X`123
  52. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xc0, 0x38, 0x00, 0xe0, 0x7c, 0x00,
  53. X   0xe0, 0x7f, 0x00, 0xf0, 0x78, 0x00, 0x70, 0xde, 0x00, 0xd8, 0x9c, 0x02,
  54. X   0x98, 0xbf, 0x03, 0x08, 0x8f, 0x03, 0x0c, 0xff, 0x01, 0x0c, 0xef, 0x01,
  55. X   0xa4, 0xc3, 0x00, 0xa0, 0xc1, 0x00, 0xe0, 0x45, 0x00, 0xe0, 0x63, 0x00,
  56. X   0xe0, 0x21, 0x00, 0xe0, 0x30, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  57. V5,
  58. X`123
  59. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0e, 0x00, 0x80, 0x03, 0x00,
  60. X   0xc0, 0x73, 0x00, 0xe0, 0xff, 0x00, 0xf0, 0xf6, 0x00, 0xb0, 0xf8, 0x00,
  61. X   0x98, 0x5d, 0x02, 0x8c, 0x6f, 0x02, 0x24, 0xe7, 0x03, 0x90, 0xcf, 0x03,
  62. X   0xd0, 0xfd, 0x01, 0xf8, 0xe0, 0x00, 0x78, 0x72, 0x00, 0xf8, 0x39, 0x00,
  63. X   0x78, 0x0c, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  64. V5,
  65. X`123
  66. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x1c, 0x00, 0x00, 0x0f, 0x00,
  67. X   0xc0, 0x3f, 0x00, 0xf0, 0xe3, 0x01, 0x18, 0xcb, 0x03, 0x0c, 0xfa, 0x03,
  68. X   0x00, 0xff, 0x03, 0x20, 0xbf, 0x01, 0x90, 0xaf, 0x00, 0xf8, 0x8f, 0x00,
  69. X   0xfc, 0xd8, 0x03, 0x3c, 0xf0, 0x03, 0xfc, 0xe0, 0x01, 0x00, 0x78, 0x00,
  70. X   0x00, 0x1f, 0x00, 0x80, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  71. V5,
  72. X`123
  73. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0x00,
  74. X   0xe0, 0xff, 0x01, 0x30, 0x68, 0x03, 0x00, 0x6c, 0x00, 0xf0, 0xc4, 0x00,
  75. X   0x38, 0x96, 0x03, 0xfc, 0xff, 0x07, 0xfc, 0xff, 0x07, 0x38, 0x96, 0x03,
  76. X   0xf0, 0xc4, 0x00, 0x00, 0x6c, 0x00, 0x30, 0x68, 0x03, 0xe0, 0xff, 0x01,
  77. X   0x00, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  78. V5,
  79. X`123
  80. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x03, 0x00, 0x00, 0x1f, 0x00,
  81. X   0x00, 0x78, 0x00, 0xfc, 0xe0, 0x01, 0x3c, 0xf0, 0x03, 0xfc, 0xd8, 0x03,
  82. X   0xf8, 0x8f, 0x00, 0x90, 0xaf, 0x00, 0x20, 0xbf, 0x01, 0x00, 0xff, 0x03,
  83. X   0x0c, 0xfa, 0x03, 0x18, 0xcb, 0x03, 0xf0, 0xe3, 0x01, 0xc0, 0x3f, 0x00,
  84. X   0x00, 0x0f, 0x00, 0x00, 0x1c, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  85. V5,
  86. X`123
  87. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, 0x00, 0x78, 0x0c, 0x00,
  88. X   0xf8, 0x39, 0x00, 0x78, 0x72, 0x00, 0xf8, 0xe0, 0x00, 0xd0, 0xfd, 0x01,
  89. X   0x90, 0xcf, 0x01, 0x24, 0xe7, 0x03, 0x8c, 0x6f, 0x02, 0x98, 0x5d, 0x02,
  90. X   0xb0, 0xf8, 0x00, 0xf0, 0xf6, 0x00, 0xe0, 0xff, 0x00, 0xc0, 0x73, 0x00,
  91. X   0x80, 0x03, 0x00, 0x00, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  92. V5,
  93. X`123
  94. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x10, 0x00, 0xe0, 0x31, 0x00,
  95. X   0xe0, 0x63, 0x00, 0xe0, 0x45, 0x00, 0xa0, 0xc1, 0x00, 0xa4, 0xc3, 0x00,
  96. X   0x0c, 0xef, 0x01, 0x0c, 0xff, 0x01, 0x08, 0x8f, 0x03, 0x98, 0xbf, 0x03,
  97. X   0xd8, 0x9c, 0x02, 0x70, 0xde, 0x00, 0xf0, 0x78, 0x00, 0xe0, 0x7f, 0x00,
  98. X   0xe0, 0x7c, 0x00, 0xc0, 0x38, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00`12
  99. V5`125;
  100. X/* ATM */
  101. X#define att_width 20
  102. X#define att_height 20
  103. Xstatic char att_bits`091VIEWS`093`09160`093 = `123`123
  104. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  105. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  106. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  107. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  108. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  109. V5,
  110. X`123
  111. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  112. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  113. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  114. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  115. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  116. V5,
  117. X`123
  118. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  119. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  120. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  121. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  122. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  123. V5,
  124. X`123
  125. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  126. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  127. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  128. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  129. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  130. V5,
  131. X`123
  132. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  133. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  134. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  135. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  136. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  137. V5,
  138. X`123
  139. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  140. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  141. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  142. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  143. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  144. V5,
  145. X`123
  146. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  147. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  148. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  149. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  150. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  151. V5,
  152. X`123
  153. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  154. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  155. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  156. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  157. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  158. V5,
  159. X`123
  160. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  161. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  162. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  163. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  164. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  165. V5,
  166. X`123
  167. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  168. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  169. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  170. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  171. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  172. V5,
  173. X`123
  174. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  175. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  176. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  177. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  178. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  179. V5,
  180. X`123
  181. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  182. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  183. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  184. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  185. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  186. V5,
  187. X`123
  188. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  189. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  190. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  191. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  192. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  193. V5,
  194. X`123
  195. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  196. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  197. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  198. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  199. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  200. V5,
  201. X`123
  202. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  203. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  204. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  205. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  206. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  207. V5,
  208. X`123
  209. X   0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0xfc, 0xff, 0x03,
  210. X   0x00, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00,
  211. X   0xfe, 0x0f, 0x00, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0xf8, 0x03, 0x00,
  212. X   0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0x03,
  213. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0x00`12
  214. V5`125;
  215. $ CALL UNPACK BITMAPS.H;1 1060438775
  216. $ create/nolog 'f'
  217. X/* colors.c
  218. X *`032
  219. X * Kevin P. Smith  6/11/89
  220. X */
  221. X#include "copyright2.h"
  222. X#include <stdio.h>
  223. X#include <string.h>
  224. X#include "Wlib.h"
  225. X#include "defs.h"
  226. X#include "data.h"
  227. X
  228. X#define TRUE  1
  229. X#define FALSE 0
  230. X
  231. XgetColorDefs()
  232. X`123
  233. X    borderColor=W_Grey;
  234. X    backColor=W_Black;
  235. X    foreColor=W_White;
  236. X    textColor=W_White;
  237. X    shipCol`0910`093=W_Grey;
  238. X    shipCol`0911`093=W_Yellow;
  239. X    shipCol`0912`093=W_Red;
  240. X    shipCol`0913`093=W_Green;
  241. X    shipCol`0914`093=W_Cyan;
  242. X    warningColor=W_Red;
  243. X    unColor=W_Grey;
  244. X    rColor=W_Red;
  245. X    yColor=W_Yellow;
  246. X    gColor=W_Green;
  247. X    myColor=W_White;
  248. X`125
  249. X
  250. $ CALL UNPACK COLORS.C;1 1913602758
  251. $ create/nolog 'f'
  252. X/*
  253. X`009Copyright (c) 1986 `009Chris Guthrie
  254. X
  255. XPermission to use, copy, modify, and distribute this
  256. Xsoftware and its documentation for any purpose and without
  257. Xfee is hereby granted, provided that the above copyright
  258. Xnotice appear in all copies and that both that copyright
  259. Xnotice and this permission notice appear in supporting
  260. Xdocumentation.  No representations are made about the
  261. Xsuitability of this software for any purpose.  It is
  262. Xprovided "as is" without express or implied warranty.
  263. X
  264. X`009Copyright 1989`009`009Kevin P. Smith
  265. X`009`009`009`009Scott Silvey
  266. X
  267. Xditto.
  268. X*/
  269. $ CALL UNPACK COPYRIGHT.H;1 1560639129
  270. $ create/nolog 'f'
  271. X/*
  272. X`009Copyright 1989`009`009Kevin P. Smith
  273. X`009`009`009`009Scott Silvey
  274. X
  275. XPermission to use, copy, modify, and distribute this
  276. Xsoftware and its documentation for any purpose and without
  277. Xfee is hereby granted, provided that the above copyright
  278. Xnotice appear in all copies.
  279. X*/
  280. $ CALL UNPACK COPYRIGHT2.H;1 35328096
  281. $ create/nolog 'f'
  282. X/*
  283. X * coup.c
  284. X */
  285. X#include "copyright.h"
  286. X
  287. X#include <stdio.h>
  288. X#include <types.h>
  289. X#include "Wlib.h"
  290. X#include "defs.h"
  291. X#include "struct.h"
  292. X#include "data.h"
  293. X
  294. X/* throw a coup */
  295. X
  296. Xcoup()
  297. X`123
  298. X    register int i;
  299. X    register struct planet *l;
  300. X
  301. X    if (me->p_kills < 1.0) `123
  302. X`009warning("You must have one kill to throw a coup");
  303. X`009return;
  304. X    `125
  305. X    if (!(me->p_flags & PFORBIT)) `123
  306. X`009warning("You must orbit your home planet to throw a coup");
  307. X`009return;
  308. X    `125
  309. X    for (i = 0, l = &planets`091i`093; i < MAXPLANETS; i++, l++) `123
  310. X`009if ((l->pl_owner == me->p_team) && (l->pl_armies > 0)) `123
  311. X`009    warning("You already own a planet!!!");
  312. X`009    return;
  313. X`009`125
  314. X    `125
  315. X    l = &planets`091me->p_planet`093;
  316. X
  317. X    if ((!(l->pl_flags & PLHOME)) `124`124 ((l->pl_flags & ALLTEAM) != me->p
  318. V_team)) `123
  319. X`009warning("You must orbit your home planet to throw a coup");
  320. X`009return;
  321. X    `125
  322. X
  323. X    if (l->pl_armies > 4) `123
  324. X`009warning("Too many armies on planet to throw a coup");
  325. X`009return;
  326. X    `125
  327. X
  328. X    if (l->pl_couptime > 0) `123
  329. X`009warning("Planet not yet ready for a coup");
  330. X`009return;
  331. X    `125
  332. X
  333. X    if (l->pl_flags & PLCOUP) `123 /* Avoid race conditions */
  334. X`009return;
  335. X    `125
  336. X
  337. X    /* the cases are now met.  We can have a coup. */
  338. X
  339. X    l->pl_flags `124= PLCOUP;
  340. X`125
  341. $ CALL UNPACK COUP.C;1 1360402150
  342. $ create/nolog 'f'
  343. X/*
  344. X * data.c
  345. X */
  346. X#include "copyright.h"
  347. X
  348. X#include <stdio.h>
  349. X#include "Wlib.h"
  350. X#include "defs.h"
  351. X#include "struct.h"
  352. X#include "data.h"
  353. X
  354. Xstruct player *players;
  355. Xstruct player *me=NULL;
  356. Xstruct torp *torps;
  357. +-+-+-+-+-+-+-+-  END  OF PART 18 +-+-+-+-+-+-+-+-
  358.