!!!Atari Kingdom CX4102



!!Messages from the source code
300 IF RND(0)<0.03 THEN GOSUB 250:? " A plague! Half the people died!!":P=INT(P/2)\\
320 GOSUB 90:PRINT "ACRES TO SELL";:GOSUB 920:IF BAD THEN 320\\
370 GOSUB 90:PRINT "ACRES TO BUY";:GOSUB 920:IF BAD THEN 370\\
430 GOSUB 90:PRINT "BUSHELS FOR THE PEOPLE";:GOSUB 920:IF BAD THEN 430\\
470 GOSUB 90:PRINT "ACRES TO PLANT";:GOSUB 920:IF BAD THEN 470\\
540 GOSUB 90:PRINT "You have only ";P;" people!":GOSUB 30:GOTO 470\\
660 GOSUB 250:PRINT "You starved ";S;" people this year!"\\
670 ? "Due to this extreme mismanagement,"\\
680 ? "you have been thrown out of office":? "and declared National Fink!":GOTO 890\\
690 GOSUB 90:PRINT "You've only ";B;" bushels of grain!";:GOTO 30\\
700 GOSUB 90:PRINT "You've only ";A;" acres of land!!":GOTO 30:RETURN \\
720 GOSUB 200:GOSUB 250:? "In ";Y;" years of office, ";P1;"% of the":? "population starved on the average."\\
730 ? D1;" people died in total starting":L4=INT(A/P)\\
740 ? "with 10 acres/person and ending":? "with ";L4;" acres/person.":GOSUB 50\\
810 GOSUB 250:? "A fantastic performance!":? "Charlemange, Disraeli, and "\\
820 ? "Jefferson combined could not have ":? "done better!!":GOTO 870\\
830 GOSUB 250:? "Your heavy-handed performance ":? "smacks of Nero and Ivan IV. The"\\
840 ? "people find you an unpleasant ruler":? "frankly hate your guts!":GOTO 870\\
850 GOSUB 250:? "You could have done better."\\
860 ? INT(P*0.8*RND(0));" people would like to see you":? "assassinated."\\