home *** CD-ROM | disk | FTP | other *** search
/ The Equalizer BBS / equalizer-bbs-collection_2004.zip / equalizer-bbs-collection / DEMOSCENE-STUFF / INCOMSRC.ZIP / SHIP6.INC < prev    next >
Text File  |  1995-02-27  |  3KB  |  168 lines
  1.  
  2. points_num_sh equ 66 ;32+2+16*2
  3. faces_num_Sh equ 60  ;8*4+6+9*2+4
  4.  
  5. xyz0_sh label word
  6. dw -14,-24,+08       ;0
  7. dw +14,-24,+08
  8. dw -20,-08,+12       ;2
  9. dw +20,-08,+12
  10. dw -18,+12,+11       ;4
  11. dw +18,+12,+11
  12. dw -08,+28,+04       ;6
  13. dw +08,+28,+04
  14. ;-)
  15. dw -14,-24,-08       ;8
  16. dw +14,-24,-08
  17. dw -20,-08,-12       ;10
  18. dw +20,-08,-12
  19. dw -18,+12,-11       ;12
  20. dw +18,+12,-11
  21. dw -08,+28,-04       ;14
  22. dw +08,+28,-04
  23. ;-[
  24. dw -19,-25,+02       ;16
  25. dw +19,-25,+02      
  26. dw -28,-07,+03       ;18
  27. dw +28,-07,+03
  28. dw -24,+13,+03       ;20
  29. dw +24,+13,+03
  30. dw -10,+31,+02       ;22
  31. dw +10,+31,+02
  32. ;-)
  33. dw -19,-25,-02       ;24
  34. dw +19,-25,-02       
  35. dw -28,-07,-03       ;26
  36. dw +28,-07,-03
  37. dw -24,+13,-03       ;28
  38. dw +24,+13,-03
  39. dw -10,+31,-02       ;30
  40. dw +10,+31,-02
  41. ;-<
  42. dw -04,+34,+00       ;32
  43. dw +04,+34,+00
  44.  
  45. dw -41,-34,-06       ;34
  46. dw -47,-13,-08
  47. dw -47,+15,-08
  48. dw -38,+45,-05
  49. ;->
  50. dw -39,-30,-15       ;38
  51. dw -43,-14,-18
  52. dw -43,+16,-18
  53. dw -35,+41,-14
  54. ;---- 
  55. dw -41,-34,+06       ;42
  56. dw -47,-13,+08
  57. dw -47,+15,+08
  58. dw -38,+45,+05
  59. ;-> 
  60. dw -39,-30,+15       ;46
  61. dw -43,-14,+18
  62. dw -43,+16,+18
  63. dw -35,+41,+14
  64.  
  65. dw +41,-34,-06       ;50
  66. dw +47,-13,-08
  67. dw +47,+15,-08
  68. dw +38,+45,-05
  69. ;->
  70. dw +39,-30,-15       ;54
  71. dw +43,-14,-18
  72. dw +43,+16,-18
  73. dw +35,+41,-14
  74. ;----
  75. dw +41,-34,+06       ;58
  76. dw +47,-13,+08
  77. dw +47,+15,+08
  78. dw +38,+45,+05
  79. ;->
  80. dw +39,-30,+15       ;62
  81. dw +43,-14,+18
  82. dw +43,+16,+18
  83. dw +35,+41,+14       ;65
  84.  
  85. facecolors_sh label byte
  86. db 14 dup (32)
  87. db 32;64
  88. db 7 dup (32)
  89. db 32; 64
  90. db 7 dup (32)
  91. db 32;64
  92. db 32,32,32,32,32,32,32
  93. db 6+6+6 dup (64)
  94. db 4 dup (96)
  95.  
  96. faces_sh label word
  97. dw 06,07,33,32
  98. dw 14,15,33,32
  99. dw 06,22,32,06
  100. dw 07,23,33,07
  101. dw 14,30,32,14
  102. dw 15,31,33,15
  103. dw 22,30,32,22
  104. dw 23,31,33,23
  105. ;-<
  106. dw 00,01,03,02
  107. dw 02,03,05,04
  108. dw 04,05,07,06
  109. dw 08,09,11,10
  110. dw 10,11,13,12
  111. dw 12,13,15,14
  112. ;-[
  113. dw 00,01,17,16
  114. dw 01,03,19,17
  115. dw 03,05,21,19
  116. dw 05,07,23,21
  117. dw 07,06,22,23
  118. dw 06,04,20,22
  119. dw 04,02,18,20
  120. dw 02,00,16,18
  121. ;
  122. dw 08,09,25,24
  123. dw 09,11,27,25
  124. dw 11,13,29,27
  125. dw 13,15,31,29
  126. dw 15,14,30,31
  127. dw 14,12,28,30
  128. dw 12,10,26,28
  129. dw 10,08,24,26
  130. ;-}
  131. dw 16,17,25,24
  132. dw 17,19,27,25
  133. dw 19,21,29,27
  134. dw 21,23,31,29
  135. dw 23,22,30,31
  136. dw 22,20,28,30
  137. dw 20,18,26,28
  138. dw 18,16,24,26
  139.  
  140. dw 18+16,19+16,27+16,26+16
  141. dw 19+16,20+16,28+16,27+16
  142. dw 20+16,21+16,29+16,28+16
  143. ;-
  144. dw 18+16,19+16,23+16,22+16
  145. dw 19+16,20+16,24+16,23+16
  146. dw 20+16,21+16,25+16,24+16
  147. ;+
  148. dw 26+16,27+16,31+16,30+16
  149. dw 27+16,28+16,32+16,31+16
  150. dw 28+16,29+16,33+16,32+16
  151.  
  152. dw 34+16,35+16,43+16,42+16
  153. dw 35+16,36+16,44+16,43+16
  154. dw 36+16,37+16,45+16,44+16
  155. ;-
  156. dw 34+16,35+16,39+16,38+16
  157. dw 35+16,36+16,40+16,39+16
  158. dw 36+16,37+16,41+16,40+16
  159. ;+
  160. dw 42+16,43+16,47+16,46+16
  161. dw 43+16,44+16,48+16,47+16
  162. dw 44+16,45+16,49+16,48+16
  163.  
  164. dw 18,20,44,43
  165. dw 26,28,36,35
  166. dw 19,21,60,59
  167. dw 27,29,52,51
  168.