mirror of
https://github.com/coding-horror/basic-computer-games.git
synced 2025-12-24 20:10:15 -08:00
Added MiniScript version of 53_King. Also updated the king_variable_update.bas
with some additional variable tweaks for clarity.
This commit is contained in:
@@ -8,7 +8,7 @@
|
||||
11 IF Z$="AGAIN" THEN 1960
|
||||
12 PRINT:PRINT:PRINT
|
||||
20 PRINT "CONGRATULATIONS! YOU'VE JUST BEEN ELECTED PREMIER OF SETATS"
|
||||
22 PRINT "DETINU, RALLODS SMALL COMMUNIST ISLAND 30 BY 70 MILES LONG. YOUR"
|
||||
22 PRINT "DETINU, A SMALL COMMUNIST ISLAND 30 BY 70 MILES LONG. YOUR"
|
||||
24 PRINT "JOB IS TO DECIDE UPON THE CONTRY'S BUDGET AND DISTRIBUTE"
|
||||
26 PRINT "MONEY TO YOUR COUNTRYMEN FROM THE COMMUNAL TREASURY."
|
||||
28 PRINT "THE MONEY SYSTEM IS RALLODS, AND EACH PERSON NEEDS 100"
|
||||
@@ -66,7 +66,8 @@
|
||||
380 PLANTING_AREA=0
|
||||
390 MONEY_SPENT_ON_POLLUTION_CONTROL=0
|
||||
395 RALLODS=0
|
||||
399 GOTO 1000
|
||||
399 GOTO 600
|
||||
|
||||
400 RALLODS=INT(RALLODS-WELFARE)
|
||||
|
||||
410 PRINT "HOW MANY SQUARE MILES DO YOU WISH TO PLANT";
|
||||
@@ -88,7 +89,7 @@
|
||||
|
||||
490 MONEY_SPENT_ON_POLLUTION_CONTROL=0
|
||||
495 RALLODS=0
|
||||
499 GOTO 1000
|
||||
499 GOTO 600
|
||||
|
||||
500 RALLODS=RALLODS-MONEY_SPENT_ON_PLANTING
|
||||
|
||||
|
||||
Reference in New Issue
Block a user