Advertisement
plirof2

ZX UNIVERSE CONQUEST Basic -ok SEND 2022CSSCGC

Nov 10th, 2022 (edited)
336
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.69 KB | None | 0 0
  1. Manual
  2.  
  3. ZX Universe Conquest 2022
  4. By Firelord Quality Games - Strategy Department
  5.  
  6. Introduction
  7. ------------
  8. Thank you for buying "ZX Universe Conquest!".
  9. This is an amazing strategy game that will give you many days of exciting strategy action!
  10. There was huge ammount of effort to create this game since this morning where it was conceived as an idea!
  11.  
  12. The story so far
  13. ----------------
  14. In "ZX Universe Conquest!" you are Ken Jake-un . A guy that started his life in the mines of Caprica DL234-5 planet. He was always in fighting mood because each day he had to fight with the Caprica Rats just to eat.
  15. As the year passed he joined the army and now is the General of one of the strongest armies in the universe. His amazing strategy skills made him one of the most famous persons in all galaxies.
  16. As all generals he has one goal : To win everyone and become the Supreme Commander!!!
  17.  
  18.  
  19. Game
  20. ----
  21. In "ZX Universe Conquest!" you start with an army of 500000 spaceships. You must conquer all the planet in the known universe to become the supreme commander.
  22. Each planet has it's own strengths and weaknesses and you must choose the correct strategy to conquer it! If you loose it will cost you in speceships.If you run out of spaceships then... GAME OVER...
  23.  
  24.  
  25. Features
  26. --------
  27. -10000+ different and unique planets!
  28. -More than 2 strategy options to conquer each planet!
  29. -You can be aggresive or a diplomat by offering bribes
  30. -Each planet has it's own characteristics. Attack, Defence and Sexiness!
  31.  
  32. Known Issues
  33. ------------
  34. -I didn't write this game in the 80s!
  35. -All other issues have moved in the "features" section.
  36. -Unknown issue.
  37.  
  38. Spoilers/Hints
  39. --------------
  40. -Just be yourself!
  41.  
  42.  
  43.  
  44.  
  45.  
  46. --------------------------------
  47. 10 REM LOADER
  48. 100 PAPER 0 : INK 2 :BORDER 0: CLS
  49. 9000 PRINT AT 5,8;FLASH1 ;"UNIVERSE CONQUEST";FLASH 0
  50. 9010 PRINT '"THE STRATEGY GAME OF THE CENTURY"
  51. 9011 PRINT
  52. 9020 PRINT INK 1;"CAN YOU BECOME THE "
  53. 9030 PRINT " ";INK 5;"SUPREME COMMANDER"'" OF THE UNIVERSE?"
  54. 9220 PRINT "FEATURING MORE LEVELS THAN "'"SENTINEL!!!!";INK 2
  55. 9500 PRINT ''"AN EXCITING & THRILLING GAME BY"
  56. 9900 PRINT FLASH 1;"- - -FIRELORD QUALITY GAMES- - -"
  57. 9999 LOAD ""
  58. --------------------
  59. 10 REM START
  60. 20 GOSUB 8000: REM INIT VARIABLES
  61. 30 GOSUB subintro: REM INTRO
  62. 40 PAPER colpaper:INK colink: BORDER colborder
  63.  
  64. 100 GOSUB subnewplanet : REM -
  65. 120 PRINT '"AVAILABLE STRATEGIES ARE:"
  66. 130 PRINT "1.DIRECT ATTACK": PRINT "2.SURROUND PLANET ATTACK":PRINT "3.BRIBE GOVERMENT TO SURRENDER"
  67. 500 REM CHECK WIn OR LOOSE
  68. 510 LET WIN=1+planetid-attoptions*INT(planetid/attoptions)
  69. 511 IF DEBUG THEN PRINT "DEBUG win=";WIN; ",planet=";planetid
  70. 530 INPUT "PLEASE SELECT CONQUEST STRATEGY:"; A
  71. 540 IF A>attoptions OR A<0 THEN PRINT AT 12,1;INK 2;"PLEASE ENTER 1-";attoptions;INK colink :GOTO 140
  72. 560 IF A=WIN THEN GOSUB subwon
  73. 580 IF A<>WIN THEN GOSUB sublost
  74. 600 GOTO 100
  75.  
  76. 2999 STOP
  77. 3199 REM ---NEW PLANET INIT STATUS----
  78. 3200 CLS
  79. 3205 LET planetid=planetid+1
  80. 3210 PRINT AT 1,0;"CONQUERED PLANETS: ";SCORE
  81. 3220 PRINT AT 2,0;"ARMY :";ARMY
  82. 3250 PRINT "You are approaching Planet ";
  83. 3275 PRINT AT 4,10 ;INK 1;"T-";INT(planetid*(RND*100));"-";INT(RND*990);INK colink
  84. 3290 PRINT "of the planetary system :"
  85. 3300 PRINT AT 6,10;INK 1;"GL-";INT(planetid*10);"-";INT(RND*100);INK colink
  86. 3340 PRINT "STATS:";AT 7,6;INK 5;"ATT:";INT (RND*10);",DEF:";INT (RND*10);",SEX:";INT(RND*10)
  87. 3400 RETURN
  88.  
  89. 4000 REM ----WON----
  90. 4020 LET WONFIGHT=0
  91. 4030 LET SCORE=SCORE+1
  92. 4050 PRINT FLASH 1;"WON";FLASH 0
  93. 4450 IF SCORE>=ENDSCORE THEN GOSUB subgamewon
  94. 4490 PAUSE 0
  95. 4499 RETURN
  96.  
  97. 4500 REM ----LOST----
  98. 4520 LET ARMY=ARMY-INT(RND*10000)
  99. 4550 PRINT FLASH 1;"LOST";FLASH 0
  100. 4600 IF ARMY<1 THEN GOSUB subgameover
  101. 4990 PAUSE 0
  102. 4999 RETURN
  103.  
  104. 5500 REM ----GAME OVER----
  105. 5510 CLS: BORDER 1: PAPER 1 :INK 0
  106. 5530 PRINT FLASH 1;"GAME OVER";FLASH 0
  107. 5550 PRINT " YOU FAILED!!!!!!!!!!"
  108. 5990 PAUSE 0: GOTO 10
  109. 5999 RETURN
  110.  
  111. 6500 REM ----GAME WON TOTAL UNIVERSE RULER!!!----
  112. 6510 CLS: BORDER 1: PAPER 1 :INK 0
  113. 6530 PRINT FLASH 1;"CONGRATULATION!!!";FLASH 0
  114. 6550 PRINT " YOU ARE THE SUPREME RULER"'"OF THE UNIVERSE !!!!"
  115. 6990 PAUSE 0:PRINT "PRESS ANY KEY":PAUSE 0: GOTO 10
  116. 6999 RETURN
  117.  
  118. 7999 REM ----Variable init----
  119. 8000 LET planetid=1: LET WONFIGHT=0
  120. 8010 LET SCORE=0: LET ARMY=500000 : LET attoptions=3
  121. 8020 LET ENDSCORE=10010
  122. 8030 LET colpaper=0: LET colink=6: LET colborder=0
  123. 8040 LET sublost=4500 : LET subwon=4000
  124. 8045 LET subgameover=5500 : LET subgamewon=6500
  125. 8050 LET subintro=9000 : LET subnewplanet=3200
  126. 8060 LET DEBUG=0
  127.  
  128. 8499 RETURN
  129. 8999 REM ----INTRO----
  130. 9000 PRINT FLASH1 ;"UNIVERSE CONQUEST";FLASH 0
  131. 9010 PRINT "THE STRATEGY GAME OF THE CENTURY"
  132. 9020 PRINT "FEATURING MORE LEVELS THAN SENTINEL!!!!"
  133. 9499 RETURN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement