home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Exec 5 / CD_Magazyn_EXEC_nr_5.iso / Programy / Programowanie / BASIC / BallMasterSrc.lha / BallMasterSrc / shapes.asc < prev   
Encoding:
Text File  |  2000-12-29  |  3.0 KB  |  129 lines

  1. ;
  2. ; Ballmaster Shapes creator V1.2
  3. ; Copyright (C) 1997-2000  Damir Arh
  4. ;
  5. ; This program is Free software; you can redistribute it and/or modify
  6. ; it under the terms of the GNU General Public License as published by
  7. ; the Free Software Foundation; either version 2 of the License, or
  8. ; (at your option) any later version.
  9. ;
  10. ; This program is distributed in the hope that it will be useful,
  11. ; but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. ; MERCHANTABILITY OR FITNESS For A PARTICULAR PURPOSE.  See the
  13. ; GNU General Public License For more details.
  14. ;
  15. ; You should have received a copy of the GNU General Public License
  16. ; along with this program; if not, write to the Free Software
  17. ; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18. ;
  19. ;
  20. ; E-mail: damir.arh@telesat.si
  21. ;
  22. ; S-mail: Damir Arh
  23. ;         Titova 89
  24. ;         SI-4270 Jesenice
  25. ;         Slovenia
  26. ;
  27. ;
  28. ; $VER: shapes.bb2 V1.2 (29.12.2000)
  29. ;
  30.  
  31.  
  32. #ecs=0
  33.  
  34. ;nalozimo sliko
  35. CNIF #ecs=1
  36.   BitMap 0,320,256,6
  37.   LoadBitMap 0,"BallMaster_ecs.iff"
  38. CELSE
  39.   BitMap 0,320,256,8
  40.   LoadBitMap 0,"BallMaster_aga.iff"
  41. CEND
  42.  
  43. ;odprimo zaslon
  44. Use BitMap 0
  45. BitMapOutput 0
  46.  
  47. ;zacnimo s pobiranjem objektov
  48. GetaShape 47,0,193,11,11 :Handle 47,5,5
  49. GetaShape 0,17,193,10,10
  50. GetaShape 1,0,0,10,10
  51. GetaShape 2,0,11,10,10
  52. GetaShape 3,0,22,10,10
  53. GetaShape 4,0,33,10,10
  54. GetaShape 5,11,0,10,10
  55. GetaShape 6,0,44,32,16
  56. GetaShape 48,33,44,32,16
  57. GetaShape 49,66,44,32,16
  58. GetaShape 7,0,61,32,32
  59. GetaShape 8,0,94,32,32
  60. GetaShape 9,0,127,32,32
  61. GetaShape 10,0,160,32,32
  62. GetaShape 15,33,160,32,32
  63. GetaShape 12,66,160,32,32
  64. GetaShape 13,99,160,32,32
  65. GetaShape 14,132,160,32,32
  66. GetaShape 11,165,160,32,32
  67. GetaShape 16,12,193,4,4
  68. GetaShape 17,0,205,320,16
  69. GetaShape 18,0,228,15,14
  70. GetaShape 19,0,222,9,5
  71. GetaShape 20,10,222,9,5
  72. GetaShape 21,20,222,9,5
  73. GetaShape 22,30,222,9,5
  74. GetaShape 23,40,222,5,8
  75. GetaShape 24,46,222,5,8
  76. GetaShape 25,52,222,5,8
  77. GetaShape 26,58,222,5,8
  78. GetaShape 27,64,222,9,5
  79. GetaShape 28,74,222,9,5
  80. GetaShape 29,84,222,9,5
  81. GetaShape 30,94,222,9,5
  82. GetaShape 31,104,222,5,8
  83. GetaShape 32,110,222,5,8
  84. GetaShape 33,116,222,5,8
  85. GetaShape 34,122,222,5,8
  86. GetaShape 35,28,193,12,12
  87. GetaShape 36,41,193,12,12
  88. GetaShape 37,54,193,12,12
  89. GetaShape 38,67,193,12,12
  90. GetaShape 39,80,193,12,12
  91. GetaShape 40,93,193,12,12
  92. GetaShape 41,106,193,12,12
  93. GetaShape 42,119,193,12,12
  94. GetaShape 43,132,193,12,12
  95. GetaShape 44,145,193,12,12
  96. GetaShape 45,158,193,12,12
  97. GetaShape 46,171,193,12,12
  98. GetaShape 50,33,127,32,32
  99. GetaShape 51,12,198,4,4
  100. GetaShape 52,22,0,10,10
  101. GetaShape 53,22,11,10,10
  102. GetaShape 54,22,22,10,10
  103. GetaShape 55,22,33,10,10
  104. GetaShape 56,11,11,10,10
  105. GetaShape 57,33,0,10,10
  106. GetaShape 58,33,11,10,10
  107. GetaShape 59,33,22,10,10
  108. GetaShape 60,33,33,10,10
  109. GetaShape 61,11,22,10,10
  110. GetaShape 62,44,0,10,10
  111. GetaShape 63,44,11,10,10
  112. GetaShape 64,44,22,10,10
  113. GetaShape 65,44,33,10,10
  114. GetaShape 66,11,33,10,10
  115. GetaShape 68,66,127,32,32
  116. GetaShape 67,99,127,32,32
  117. GetaShape 69,132,127,32,32
  118.  
  119. ;pa shranimo vse skupaj
  120. CNIF #ecs=1
  121.   SaveShapes 0,69,"BallMaster_ecs.gfx"
  122. CELSE
  123.   SaveShapes 0,69,"BallMaster_aga.gfx"
  124. CEND
  125.  
  126. ;konec
  127. End
  128.  
  129.