2 PRINTCHR$(147)"WOULD YOU LIKE INSTRUCTIONS (Y/N)? 5 [161] A$: [139] A$[179][177] "Y" [175] A$[179][177]"N" [167] 5 8 [139] A$[178]"N" [167] 458 11 [153]"INSTRUCTIONS ON SCREEN OR PRINTER (S/P)? 14 GET B$: IF B$<> "S" AND B$<>"P" THEN 14 17 IF B$="S"THEN D=3 20 IF B$="P" THEN D=4 23 OPEN D,D 26 PRINT#D," 29 [152]D," 32 PRINT#D," 35 [152]D,"ISLANDS BY JOHN RYAN 38 PRINT#D,"RUN IT RIGHT: C-64; 2 JOYSTICKS 41 [152]D," 44 PRINT#D,"THOUGH THIS GAME IS INTENDED FOR TWO 47 [152]D,"PLAYERS, IT IS POSSIBLE TO PLAY ALONE, 50 PRINT#D,"WHICH IS HELPFUL WHEN LEARNING THE 53 [152]D,"CONTROLS.":[139] D[178]4 [167] 67 56 [152]D," 59 PRINT"PRESS A KEY TO CONTINUE" 62 GET DD$:IF DD$="" THEN 62 65 PRINT#D," 66 [152]D," 67 PRINT#D," 68 [152]D,"IN THIS GAME YOU MUST TRANSFORM YOUR 71 PRINT#D,"ISLAND INTO A VIABLE ECONOMIC AND 74 [152]D,"MILITARY ENTITY, EITHER BY TREACHERY 77 PRINT#D,"AGAINST THE NEIGHBORING COLONY OR BY 80 [152]D,"DEVELOPING YOUR NATURAL RESOURCES. IT 83 PRINT#D,"WILL TAKE CAREFUL PLANNING TO FEED, 86 [152]D,"HOUSE AND PROTECT YOUR SUBJECTS, OR YOU 89 PRINT#D,"WILL FACE REDUCED PRODUCTIVITY, REDUCED 92 [152]D,"REVENUE AND DANGEROUS SOCIAL UNREST. 95 PRINT#D,"YOU HAVE FIVE YEARS TO BUILD UP YOUR 98 [152]D,"ISLAND, AT THE END OF WHICH THE PLAYER 101 PRINT#D,"WITH THE MOST POINTS WINS. THE MAXIMUM 104 [152]D,"YOU CAN EARN EACH MONTH IS 260 POINTS 107 PRINT#D,"PLUS HOSPITAL BONUSES.":IF D=4 THEN 121 110 PRINT#D," 113 [153]"PRESS A KEY TO CONTINUE" 116 [161] DD$:[139] DD$[178]"" [167] 116 119 [152]D," 120 PRINT#D," 121 [152]D," 122 PRINT#D,"PLAYER ONE RULES THE NORTH ISLAND, KEY 125 [152]D,"ANTIGUA, WITH A JOYSTICK IN PORT 2. 128 PRINT#D,"PLAYER 2 CONTROLS THE SOUTH ISLAND, ST. 131 [152]D,"CHRISTOPHER, WITH A JOYSTICK IN PORT 134 PRINT#D,"1. TO THE RIGHT OF THE GAME SCREEN IS A 137 [152]D,"DISPLAY OF YOUR SCORE, THE DATE, 140 PRINT#D,"POPULATION, GOLD PIECES (GP) AND A 143 [152]D,"BOX THAT SHOWS WHAT ICON YOU HAVE 146 PRINT#D,"SELECTED. 149 [152]D," 152 PRINT#D,"USE THE ICONS TO PURCHASE GOODS AND 155 [152]D,"DEVELOP THE ISLAND. A MONTHLY REPORT 158 PRINT#D,"APPEARS AT THE BOTTOM OF THE SCREEN 161 [152]D,"SHOWING HOW MANY HOUSES (H), CROPS (C), 164 PRINT#D,"AND DEFENSES (D) YOU OWN. 167 [152]D," 170 PRINT#D,"MOVE YOUR CURSOR TO AN EDGE OF THE GAME 173 [152]D,"SCREEN TO ACTIVATE THE ICON SELECTION 176 PRINT#D,"BOX AND SCROLL THROUGH YOUR OPTIONS.":IF D=4 THEN 190 179 PRINT#D," 182 [153]"PRESS A KEY TO CONTINUE" 185 [161] DD$:[139] DD$[178]"" [167] 185 188 [152]D," 189 PRINT#D," 190 [152]D," 191 PRINT#D,"WHEN THE ICON YOU DESIRE APPEARS IN THE 194 [152]D,"SELECTION BOX, PRESS THE FIREBUTTON. 197 PRINT#D,"THEN MOVE YOUR CURSOR TO THE PLACE YOU 200 [152]D,"WANT TO PUT YOUR PURCHASE, AND PRESS 203 PRINT#D,"THE FIREBUTTON AGAIN. BOATS CAN ONLY BE 206 [152]D,"PLACED IN WATER, AND TROOPS CAN ONLY 209 PRINT#D,"BE PLACED ON YOUR OPPONENT'S ISLAND. 212 [152]D," 215 PRINT#D,"TROPICAL SHOWERS (CLOUDS) ROAM OVER 218 [152]D,"THE ISLANDS, IMPROVING YOUR FISHING AND 221 PRINT#D,"CROP HARVESTS, THEREBY INCREASING YOUR 224 [152]D,"INCOME. A STORMY SEASON, MAY-NOVEMBER, 227 PRINT#D,"BRINGS HURRICANES (FLASHING CLOUDS) AND 230 [152]D,"LESSER TROPICAL STORMS (BLACK CLOUDS). 233 PRINT#D,"FOR EACH PARCEL OF PROPERTY THAT IS 236 [152]D,"DESTROYED IN THESE SEVERE STORMS, A 239 PRINT#D,"PORTION OF THE POPULATION DIES.":IF D=4 THEN 253 242 PRINT#D," 245 [153]"PRESS A KEY TO CONTINUE" 248 [161] DD$:[139] DD$[178]"" [167] 248 251 [152]D," 252 PRINT#D," 253 [152]D," 254 PRINT#D,"SOME PARTS OF THE ISLAND GET MORE 257 [152]D,"PRECIPITATION, BUT SINCE THIS MEANS 260 PRINT#D,"THAT THEY ALSO BEAR THE BRUNT OF THE 263 [152]D,"DESTRUCTIVE STORMS, IT IS A MIXED 266 PRINT#D,"BLESSING. 269 [152]D," 272 PRINT#D,"TO ACTIVATE A BOAT FOR FISHING OR NAVAL 275 [152]D,"WARFARE, SELECT THE BOAT ICON AND PLACE 278 PRINT#D,"YOUR CURSOR ON THE BOAT THAT YOU WANT 281 [152]D,"TO ACTIVATE. PRESS THE FIREBUTTON ONCE 284 PRINT#D,"TO BEGIN MOVEMENT MODE, AND A SECOND 287 [152]D,"TIME TO END MOVEMENT MODE. TO SINK AN 290 PRINT#D,"ENEMY BOAT, MOVE YOUR BOAT ON TOP OF 293 [152]D,"THE ENEMY'S AND EXIT THE MOVEMENT MODE.":[139] D[178]4 [167] 307 296 [152]D," 299 PRINT"PRESS A KEY TO CONTINUE" 302 GET DD$:IF DD$="" THEN 302 305 PRINT#D," 306 [152]D," 307 PRINT#D," 308 [152]D,"HUNGER, CROWDING AND OVERWORK REDUCE 311 PRINT#D,"YOUR NATIONS'S PRODUCTIVITY AND ERODE 314 [152]D,"MORALE. BE SURE TO KEEP ENOUGH FOOD AND 317 PRINT#D,"SHELTER TO PROVIDE FOR YOUR GROWING 320 [152]D,"(HOPEFULLY!) POPULATION. PRODUCTIVITY 323 PRINT#D,"AND THEREFORE INCOME DECLINE AS MORALE 326 [152]D,"WEARS DOWN. REBELS, WHICH APPEAR WITH 329 PRINT#D,"SHIELD AND SPEAR ICON OF THE INVASION 332 [152]D,"TROOPS, WILL RISE UP AND DESTROY YOUR 335 PRINT#D,"PROPERTY. REBELS ARE ONLY ELIMINATED BY 338 [152]D,"ATTRITION.":[139] D[178]4 [167] 352 341 [152]D," 344 PRINT"PRESS A KEY TO CONTINUE" 347 GET DD$:IF DD$="" THEN 347 350 PRINT#D," 351 [152]D," 352 PRINT#D," 353 [152]D," 356 PRINT#D,"ICON COST(GP) INCOME(GP/MONTH) 359 [152]D,"--------------------------------- 362 PRINT#D,"HOUSE 50 0 365 [152]D,"CROPS 5 2+ 368 PRINT#D,"BOAT 25 5+ 371 [152]D,"FACTORY 35 10 374 PRINT#D,"MINE 100 15-20 377 [152]D,"HOSPITAL 75 0 380 PRINT#D,"FORT 60 0 383 [152]D,"INVASION 150 0 386 PRINT#D," TROOPS 389 [152]D,"--------------------------------":[139] D[178]4 [167] 401 392 [152]D," 395 PRINT"PRESS A KEY TO CONTINUE" 398 GET DD$:IF DD$="" THEN 398 401 PRINT#D," 404 [152]D," 405 PRINT#D," 406 [152]D," 407 PRINT#D,"HOUSE - ACCOMMODATES 500 PEOPLE 410 [152]D,"CROPS - ONE PLANTING FEEDS 400 PEOPLE 413 PRINT#D," CROPS THAT GET GOOD RAIN YIELD MORE 416 [152]D," INCOME. 419 PRINT#D,"BOAT - ACTIVE FISHING INCREASES INCOME. 422 [152]D," FISHING IN THE RAIN IS MORE LUCRATIVE. 425 PRINT#D,"FACTORY - INCOME VARIES WITH MORALE. 428 [152]D," WORK-RELATED DEATH INCREASE MORTALITY 431 PRINT#D," RATE. 434 [152]D,"MINE - SAME NOTES AS FACTORY. 437 PRINT#D,"HOSPITAL - INCREASES PRODUCTIVITY. 440 [152]D," INCREASES BIRTH RATE BY 10%. 443 PRINT#D," ADDS MONTHLY BONUS POINTS. 446 [152]D,"FORT - ADDS 10 DEFENSE POINTS. 449 PRINT#D,"INVASION TROOPS - ATTACK SPECIFIC 452 [152]D," TARGET ON THE OTHER ISLAND. 455 PRINT#D,"":CLOSED 458 PRINT"PRESS ANY KEY TO BEGIN..." 461 GET E$:IF E$="" THEN 461 464 CLR 466 N$="BOOT ISLANDS" 467 PRINT"" 468 PRINT"LOAD"CHR$(34)N$CHR$(34)","8" [145][145][145]" 470 A$="RUN" 472 A$=A$+CHR$(13) 473 POKE631,13:FORB=1TOLEN(A$):POKE631+B,ASC(MID$(A$,B,1)):NEXT:POKE198,10 474 NEW