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:
JoeStrout
2023-09-07 12:49:54 -07:00
parent 06caa5085b
commit e8688935bb
4 changed files with 419 additions and 9 deletions

View File

@@ -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"
@@ -219,7 +219,7 @@ REM I think tourism calculations are actually wrong in the original code!
1505 IF COUNTRYMEN<343 THEN 1700
1510 IF (ORIGINAL_RALLODS/100)>5 THEN 1800
1515 IF FOREIGN_WORKERS>COUNTRYMEN THEN 1550
1520 IF YEARS_REQUIRED-1=X5 THEN 1900
1520 IF YEARS_REQUIRED-1=YEAR THEN 1900
1545 GOTO 2000
1550 PRINT
1552 PRINT
@@ -277,9 +277,9 @@ REM I think tourism calculations are actually wrong in the original code!
1950 GOTO 1590
1960 PRINT "HOW MANY YEARS HAD YOU BEEN IN OFFICE WHEN INTERRUPTED";
1961 INPUT X5
1962 IF X5<0 THEN 1590
1963 IF X5<8 THEN 1969
1961 INPUT YEAR
1962 IF YEAR<0 THEN 1590
1963 IF YEAR<8 THEN 1969
1965 PRINT " COME ON, YOUR TERM IN OFFICE IS ONLY";YEARS_REQUIRED;"YEARS."
1967 GOTO 1960
1969 PRINT "HOW MUCH DID YOU HAVE IN THE TREASURY";
@@ -300,7 +300,7 @@ REM I think tourism calculations are actually wrong in the original code!
1997 PRINT " AND 10,000 SQ. MILES OF FOREST LAND."
1998 GOTO 1990
2000 X5=X5+1
2000 YEAR=YEAR+1
2020 DEATHS=0
2040 GOTO 100
2046 END