home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_88-12_1988_-_de_Side_B.d64 / con.inst (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  14KB  |  316 lines
  1. 1 v=53248:pokev+33,0:pokev+32,0:d$="":print"[147]"d$
  2. 3 printchr$(8)chr$(142)spc(7)"[158][198][162][162][162][162][162][162][162][162][162][162][162][162][146][184][184][184][184][184][184][183][183][183][183][163][163]
  3. 4 [151]650,255:[153][166]7)" getrndrndgetnewrndgetnewnewgetnewrndgetnewrndwaitlogrndnewgetnewrndgetnewrnd
  4. 5 printspc(7)" [161][161][161][161][162][162][161][162][146][190][161][187][162][161][162][187][161][161][161][161][187][162]
  5. 6 [153][166]7)" waitloglogloglog  lognewnewwaitloglognewwaitlog log lognewwaitlognewnewwaitloglogrnd
  6. 7 printspc(7)"[175][146] s  o  f  t  w  a  r  e[158][161]
  7. 8 [153][166]7)"newnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnew
  8. 9 fori=1to18:b$=b$+" ":next:fori=0to17:print:fork=0to9:nextk,i:print"
  9. 10 u$[178]"newnewnewnewnewnewnewnewnewnewnewnewnewposandto          toandpos
  10. 11 j$="[146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146][163][146][183][146][184][162][185][175][164] [164][175][185][162][146][184][146][183][146][163]"
  11. 12 fori=1to13:print""spc(7)mid$(u$,i,13)mid$(u$,32-i)
  12. 13 printspc(7)mid$(j$,i+i,26)mid$(j$,77-i-i):next
  13. 14 u$="        p r e s e n t s":fori=1to8
  14. 15 print""spc(11)mid$(u$,i,9)mid$(u$,25-i):forj=0to99:nextj,i
  15. 20 printspc(5)"[159]i n s t r u c t i o n s   f o r
  16. 22 [151]198,0:[153]"(NULL)str$right$            right$ (NULL)    right$right$    (NULL)str$right$
  17. 23 print"[158][199][202][203][213][203][178][201][213][201][201][201][213][201][213][201][219] [219][213][203][201][203][219][221][201][213][201] [199][202][203][201][203][213][203][201][201][201][178][201]
  18. 24 [153]"defonchr$ closechr$left$(NULL)(NULL)chr$(NULL)(NULL)left$chr$(NULL)mid$right$chr$ (NULL)chr$left$left$ chr$(NULL)(NULL)chr$(NULL) chr$  left$ chr$left$left$left$left$(NULL)(NULL)
  19. 25 print"[145][202][198][203][202][203][202][202][202][221][202][203][202][203][202][203][202] [203][202][203][203] [202][202][202][202][203] [202][198][203][203] [202][203][202][202][203][202][202]
  20. 30 [153]"      def f1 wait cont- output on screen
  21. 32 print"      [150] f3 [146] [154]- output on printer
  22. 34 [153]"      def f7 wait cont- load game
  23. 40 getu$:ifu$<>"[133]"andu$<>"[134]"andu$<>"[136]"goto40
  24. 50 pokev+21,0:print"[147]";:ifu$="[134]"goto500
  25. 60 ifu$="[133]"goto100
  26. 70 print"[147][144]p[207]43,1:p[207]44,18:p[207]4608,0:l[207]"chr$(34)"con.boot"chr$(34)",8
  27. 80 [129]i[178]0[164]9:[153]"r(NULL)":[130]:[153]"":[151]631,13:[151]632,13:[151]633,13:[151]198,3:[162]
  28. 100 [153]"load"[199](14):[129]i[178]1[164]15
  29. 102 [153]"defloadsys * len(NULL)(NULL)(NULL)(NULL)val(NULL)(NULL) asc(NULL)(NULL) (NULL)left$val len(NULL)(NULL)(NULL)(NULL) * instructionswaitprint";
  30. 103 [129]j[178]1[164]21:[135]u$:[139]u$[178]"*"[137]108
  31. 105 [139]u$[178]"@"[167][153]:[137]107
  32. 106 [153]u$
  33. 107 [130]
  34. 108 [153]d$"def [asc7] next page   [asc1] start   [asc8] end":[151]2023,160
  35. 109 [161]u$:[139]u$[178]"input"[167][138]
  36. 110 [139]u$[178]"restore"[167][153][199](142):[137]70
  37. 120 [139]u$[179][177]"let"[137]108
  38. 130 [130]i:[138]
  39. 500 [153]"loadstopr(NULL)"[200](d$,8)"systhe whole text will be printed":[153]"continously
  40. 502 print"[150]if you use single sheets after paper is
  41. 504 [153]"ejected you only have to insert a new
  42. 506 print"piece of paper an to switch the printer
  43. 508 [153]"to 'on-line' and the printer will go on.
  44. 510 print"[158]  prepare your printer and press a key
  45. 512 [151]198,0:[146]198,1:[151]631,19:[151]632,13:[151]198,2
  46. 513 [153][166]12)"contokay, printing":[159]1,4,7
  47. 514 [152]1,"                       right$ (NULL) (NULL) (NULL) (NULL) (NULL) len (NULL) right$ (NULL) (NULL) (NULL)   asc (NULL) (NULL)":[152]1
  48. 515 [152]1,"  ***                          *     ** ";
  49. 516 [152]1,"      *  *          **
  50. 517 print#1," *   *                        ***  ***  ";
  51. 518 print#1,"     *** *         *  *
  52. 519 [152]1,"*       *  **   ** * *  *   ** *    *  *";
  53. 520 [152]1,"   *  *  **   *   *      *  *  *   * **
  54. 521 print#1,"*      * * * * * * * * * * *   *    * * ";
  55. 522 print#1,"* *   *  * * * *  *     *  * * * * * * *";
  56. 523 print#1,"*      * * * * * * * * ***  *  *    * * ";
  57. 524 print#1,"* *   *  * * ***  *     *  * * * * * * *";
  58. 525 print#1," *   * * * * * * * * * *     * *    * * ";
  59. 526 print#1,"* *   *  * * *     *  * *  * * * * * * *";
  60. 527 print#1,"  ***   *  * *  **  **  ** **   *   *  *";
  61. 528 print#1,"  *    * * *  **    **  *   *   * *  * *";
  62. 529 print#1,"                 *":print#1:print#1
  63. 530 readu$:ifu$="@"thenprint#1:goto530
  64. 550 ifright$(u$,1)="-"thenprint#1,left$(u$,len(u$)-1);:goto600
  65. 560 print#1,u$" ";
  66. 600 readu$:ifleft$(u$,2)=" [211]"thenprint#1:print#1,u$:print#1:close1:run
  67. 610 ifu$="@"thenprint#1:print#1:goto530
  68. 620 print#1,u$:goto530
  69. 1000 data"[207]nce a point of time there was a king-
  70. 1010 [131]"dom on a small continent of a fantasy
  71. 1020 data"world. [212]he living standart was similar
  72. 1030 [131]"to our middle-age but the people were
  73. 1040 data"quite happy because their king was wise
  74. 1050 [131]"and full of justice. left$e ended war by
  75. 1060 data"overrunning the other small countries
  76. 1070 [131]"but without any battle.
  77. 1080 data@,"[200]e forced the other kings only with the
  78. 1090 [131]"presence of his mighty army to include
  79. 1100 data"their countries into his kingdom as
  80. 1110 [131]"provinces and allowed them to be the
  81. 1120 data"lords of thoose territories.
  82. 1130 [131]@,"(NULL)he kings were angry but they agreed
  83. 1140 data"because they thought that it is better
  84. 1150 [131]"to loose some of their power and avoid
  85. 1160 data"a war than to be defeated in a battle
  86. 1170 [131]they could not win.,@,"(NULL)ith this method the king brought the
  87. 1180 data"whole continent under his power. [217]ears
  88. 1190 [131]"of peace and freedom were going through
  89. 1200 data"the land. [212]he lords accepted all the
  90. 1210 [131]"king's orders but they were dissatis-
  91. 1220 data"fied and waiting for their opportunity.
  92. 1230 [131]@,"(NULL)ne day of a cold december an assassin
  93. 1240 data"creeped into the castle an took the
  94. 1250 [131]"king's life. (NULL)he murderer was slain by
  95. 1260 data"the guards in a fiercy battle before he
  96. 1270 [131]"could say who had sent him. str$uring this
  97. 1280 data"fight flames suddenly rose up in the
  98. 1290 [131]"hall and fire lit from room to room in
  99. 1300 data"the castle. [204]ike his home the peace the
  100. 1310 [131]"king brought was burned into ashes.
  101. 1320 data@,"[212]he lords now saw their chance to take
  102. 1330 [131]"over the power of the whole kingdom and
  103. 1340 data"called their knights. [212]he king's men
  104. 1350 [131]"were slain or throwed out of the pro-
  105. 1360 data"vinces ruled by the lords again. [212]he
  106. 1370 [131]"armies were prepared for battle and are
  107. 1380 data"now waiting for orders from their
  108. 1390 [131]lords.,@,"atnt this point the game starts. (NULL)he
  109. 1400 data"players represent thoose lords. [212]he
  110. 1410 [131]"winner is who defeats all the other
  111. 1420 data"players and rules the whole continent.
  112. 1430 [131]@,"right$n this tactical game of conquest up to
  113. 1440 data"eight players may fight against each
  114. 1450 [131]"other and reach for the crown. (NULL)he game
  115. 1460 data"is steered by a joystick plugged in
  116. 1470 [131]"controlport #2. (NULL)henever a flashing
  117. 1480 data"sword appears you can move it over the
  118. 1490 [131]"the screen and point it on the selected
  119. 1500 data"option. [201]f there is no sword but num-
  120. 1510 [131]"bers are requested you can change them
  121. 1520 data"by one by moving the joystick left or
  122. 1530 [131]"right and by ten by moving the stick up",or down.
  123. 1531 [131]@,"(NULL)ote one thing: (NULL)he hexagons used as
  124. 1532 data"provinces have only space for three
  125. 1533 [131]"characters. right$f the number of soldiers
  126. 1534 data"in a territory passes 999 only the left
  127. 1535 [131]"three numbers will be shown but this
  128. 1536 data"numbers will appear in red.
  129. 1540 [131]@,"peekefore the game starts you will be
  130. 1550 data"asked if you want to begin a new game
  131. 1560 [131]"or to resume an old one. right$f you want to
  132. 1570 data"continue an old game just follow the
  133. 1580 [131]"instructions shown on the screen.
  134. 1590 data@,"[193]t the beginning of a new game you may
  135. 1600 [131]"build a continent by yourself or let
  136. 1610 data"the computer do this for you by random.
  137. 1620 [131]"ascor each province a hexagon is set on
  138. 1630 data"that position of the screen where you
  139. 1640 [131]"point the sword. atnll eight directions
  140. 1650 data"of the joystick may be used to position
  141. 1660 [131]"the sword. atnny next territory must be
  142. 1670 data"adjacted to another hexagon. [201]f your
  143. 1680 [131]"continent is ready press the space bar.
  144. 1690 data"[212]he allowed number of provinces is
  145. 1700 [131]"between ten and forty. right$f the continent
  146. 1710 data"is built the computer will ask you
  147. 1720 [131]"wether you accept it or not.
  148. 1730 data@,"[193]fter that you can decide how the
  149. 1740 [131]"soldiers of the dead king will act
  150. 1750 data"during the game. [201]f you make them
  151. 1760 [131]"friendly they will accept you as their
  152. 1770 data"lord, give you their provinces when
  153. 1780 [131]"your army marches in and follow you. right$f
  154. 1790 data"you decide them to be hostile they will
  155. 1800 [131]"defend their provinces against occupa-
  156. 1810 data"tion. [212]heir number will increase after
  157. 1820 [131]"each game turn if you want that. (NULL)ou
  158. 1830 data"also can make them beeing agressive.
  159. 1840 [131]"(NULL)his means that they will attack and
  160. 1850 data"occupate the player's provinces if they
  161. 1860 [131]"have a chance to. right$f you make them very
  162. 1870 data"agressive they will organise themselve
  163. 1880 [131]"and attack from every direction to-
  164. 1890 data"gether. [212]his is hard to play.
  165. 1900 [131]@,"(NULL)hen you may set the beginning number
  166. 1910 data"of the king's men and the villages of
  167. 1911 [131]"the provinces or let them be random.
  168. 1912 data@,"[217]ou then may select the maximum number
  169. 1913 [131]"of villages which can be built on one",hexagon.,@
  170. 1914 [131]"right$f you have chosen the king's men to be
  171. 1915 data"agressive, you will be asked wether
  172. 1916 [131]"they shall be able to spread their
  173. 1917 data"forces or not. [212]his means that after
  174. 1918 [131]"their combat-phase their number will be
  175. 1919 data"quite equal in each of their provinces.
  176. 1920 [131]"peekut this will allow them another method","of attacking. (NULL)hich? (NULL)ry it!
  177. 1921 data@,"[212]hen you may decide wether the dead
  178. 1922 [131]"king shall have a brother or not. right$f
  179. 1923 data"yes, he is on crusade in the holy land.
  180. 1924 [131]"peekut after a few years - how many is
  181. 1925 data"your decision - his mighty army is
  182. 1926 [131]"expected to return and support the
  183. 1927 data"king's men. [194]eware of him and defeat
  184. 1928 [131]"all the king's provinces before his
  185. 1929 data"brother arrives...
  186. 1930 [131]@,"(NULL)ou then have to decide wether random
  187. 1931 data"things shall happen to the players
  188. 1932 [131]"during the game or not. (NULL)his is to make
  189. 1933 data"the game more interesting.
  190. 1939 [131]@,"atnfter that the number of players is
  191. 1940 data"requested. [212]he computer will then ask
  192. 1950 [131]"each player for his name up to ten
  193. 1960 data"letters. [212]he computer will try to guess
  194. 1970 [131]"wether the player is male or female
  195. 1980 data"because of his name but it will be
  196. 1990 [131]"carefully asked if this decision is
  197. 2000 data"right. [217]ou may then select your colour
  198. 2010 [131]"and your coat of arms.
  199. 2020 data@,"[217]ou now have to place the players home
  200. 2030 [131]"castles on the continent or let the
  201. 2040 data"computer do this. [197]ach player will get
  202. 2050 [131]"ten knights for his army and 2(NULL) pieces
  203. 2060 data"of gold as treasure. [197]ach knight stands
  204. 2070 [131]"for a small group of knights and their
  205. 2080 data"vasalls. [212]he computer decides now which
  206. 2090 [131]"player gets which province. (NULL)hen the
  207. 2100 data"game will start.
  208. 2110 [131]@,"(NULL)he game turns are devided in months.
  209. 2120 data"[193]t the beginning of each game turn you
  210. 2130 [131]"will get taxes from your provinces.
  211. 2140 data"[197]ach village will pay one piece of gold
  212. 2150 [131]"to your treasure. (NULL)ou also get a piece
  213. 2160 data"of gold for every player coming before
  214. 2170 [131]"you in the player order. (NULL)his is to
  215. 2180 data"avoid disadvantages from players late
  216. 2181 [131]in the order.,@,"right$f you have any gold left from the last
  217. 2182 data"month it will increase by ten percent.
  218. 2190 [131]@,"right$n the combat-phase you have the oppor-
  219. 2200 data"tuninty to invade and conquer other
  220. 2210 [131]"provinces. right$f you want to attack a
  221. 2220 data"territory select [201][206][214][193][196][197] and point the
  222. 2230 [131]"sword on the enemy's province. (NULL)he
  223. 2240 data"computer will then examine all the
  224. 2250 [131]"surrounding territories. right$f you are
  225. 2260 data"able to attack from there you will be
  226. 2270 [131]"asked if you want to. right$f armies are
  227. 2280 data"avaiable battle occurs.
  228. 2290 [131]@,"(NULL)ow the scenario changes and shows the
  229. 2300 data"invaded province and the symbolic
  230. 2310 [131]"armies. valach men on the screen stands
  231. 2320 data"for up to twenty of your knights.
  232. 2330 [131]@,"(NULL)ote that the invaders come over open
  233. 2340 data"field and the defenders have the first
  234. 2350 [131]"strike. right$f the defender is on an tower
  235. 2360 data"his number of men is double effective
  236. 2370 [131]"than on the field and in a castle it
  237. 2380 data"counts for three. [206]ormally in a real
  238. 2390 [131]"battle of swordsmen a low number of
  239. 2400 data"warriors will be surrounded from a
  240. 2410 [131]"higher number of enemies and have lower
  241. 2420 data"chances to defend themselve or to
  242. 2430 [131]"defeat some of their opponents. (NULL)his is
  243. 2440 datareflected in the game.,@,"[196]uring the fight you can watch the
  244. 2450 [131]"number of men of both sides becoming
  245. 2460 data"lower. [201]f you think it would be useless
  246. 2470 [131]"to continue fighting you may press the
  247. 2480 data"firebutton to retreat your soldiers.
  248. 2481 [131]@,"(NULL)he defender may retreat his troops by
  249. 2482 data"pressing any key. [206]ote that during
  250. 2483 [131]"fleeing - attacker or defender - both
  251. 2484 data"sides have a strike left. [212]he fugitives
  252. 2485 [131]"before running away and the winners by
  253. 2486 data"following them and slashing at their
  254. 2487 [131]"backs. (NULL)ou cannot flee from your home-","castle, of course.
  255. 2490 data@,"[201]f nobody flees the battle will be over
  256. 2500 [131]"if either your men were slain or all
  257. 2510 datathe enemies were wiped out.,@,"[201]f you have won, you occupate the
  258. 2520 [131]"territory and the province with all in
  259. 2530 data"it belongs to you. [201]f you manage to
  260. 2540 [131]"capture another player's home-castle he
  261. 2550 data"is out of the game and all his provin-
  262. 2560 [131]"ces and men will fall to you.
  263. 2570 data@,"[193]fter the won combat your knights will
  264. 2580 [131]"be spread over the engaged provinces in
  265. 2600 data"equal numbers. [217]ou can attack another
  266. 2610 [131]"territory then but all your soldiers
  267. 2620 data"who were engaged in war this month
  268. 2630 [131]"cannot strike again.
  269. 2640 data@,"[193]fter leaving the combat-phase you can
  270. 2650 [131]"move your men in the transfer-phase. right$f
  271. 2660 data"you select [205][207][214][197] you can point the sword
  272. 2670 [131]"on a province and then on an adjacted
  273. 2680 data"destiny. [212]ransfer the men between both
  274. 2690 [131]territories by moving the joystick.
  275. 2691 [131]"(NULL)ou can transfer all men at once by
  276. 2692 data"pressing any key.
  277. 2700 [131]@,"right$n the build-phase you can recruit new
  278. 2710 data"knights. [197]ach men costs you one piece
  279. 2720 [131]"of gold and appears in your home-castle
  280. 2730 datafor exercises.,@,"[217]ou can also build up a tower for
  281. 2740 [131]"twenty pieces of gold to increase your
  282. 2750 data"defense in a province.
  283. 2760 [131]@,"(NULL)o develop your economy you can build
  284. 2770 data"new villages in your provinces for four
  285. 2780 [131]"pieces of gold. (NULL)emember that every new
  286. 2790 data"town will pay taxes in future. [197]ach
  287. 2800 [131]"province holds enough space for up to
  288. 2801 datathe number you allow at the parameter-,setting.
  289. 2810 data@,"[204]eaving this phase the game turn ends
  290. 2820 [131]"and the next player can act. atnfter
  291. 2830 data"that - if choosen - the king's men will
  292. 2840 [131]"attack the players if they think their
  293. 2850 data"chance to win is fair.
  294. 2851 [131]@,"right$f you have chosen - they will then
  295. 2852 dataspread their forces to hold their,balance of power.
  296. 2858 data@,"[212]hey will then increase their forces.
  297. 2859 [131]"left$ow much depends on the number of
  298. 2860 data"villages in the province.
  299. 2862 [131]@,"right$f the number of the king's men is
  300. 2870 data"fifty or more they will build up a
  301. 2880 [131]tower.,@,"(NULL)ometimes they will add a new",village.,@
  302. 2890 [131]"atnt the end of each game turn you can
  303. 2900 data"select between continue, save or end
  304. 2910 [131]"the game. right$f you continue the next
  305. 2920 data"month will begin.",@,"[212]o save a game you need another disk.
  306. 2930 [131]"(NULL)ou can format it if it is necessary.
  307. 2940 data"[211]elect a number between one and nine to
  308. 2950 [131]"save it. (NULL)ou can resume that game by
  309. 2960 data"typing this number in the load mode at
  310. 2970 [131]"the start. (NULL)ith this method you can
  311. 2980 data"save nine different games on the same
  312. 2990 [131]disk.,@,"right$f you decide to end the game make sure
  313. 3000 data"[212]hat you have saved it because all the
  314. 3010 [131]game data will be lost.,@,"(NULL)e wish you many amazing hours.
  315. 3020 data@,"[201] [205] [208] [197] [210] [193] [212] [207] [210]",," [211] [207] [198] [212] [215] [193] [210] [197]",*
  316.