!!!Atari Kingdom CX4102 ; Copyright (C) 1980 Atari, Inc. ; please use with BASIC cartridge inserted
Atari Kingdom CX4102 is one of the first simulation game from Atari with a short source code, easy to read and understand. It is a good choice to get a first view into simulations.
!!CAS-images
* [Kingdom_side_A_with_instructions.cas] ; CAS-image of Kingdom with instructions
* [Kingdom_side_B_without_instructions.cas] ; CAS-image of Kindom without instructions
!!ATR-image
* [Kingdom_with_DOS_2.0S_(complete_cassette_import).atr] ; Atari Kingdom CX4102 complete cassette import on an ATR-image with DOS 2.0S
!!Manual
* [Atari_Kingdom_Manual.pdf] ; size: 561 KB ; Atari Kingdom CX4102 manual, 4 pages
!!Video with voice, music and data
* [Atari Kingdom cassette-Dual Track with voice, music and data|Atari_Kingdom-Dual_Track.mp4] ; size: 14.4 MB ; MP4-file taken from Youtube; main start from minute 1:10
!!Box-Images
[{Image src='Atari_Kingdom_Cover_1.jpg' width=375 height=506 }]
Atari Kingdom CX4102 box cover \\
\\
[{Image src='Atari_Kingdom_Back_1.jpg' width=375 height=505 }]
Atari Kingdom CX4102 box back \\
\\
!!Screenshots
[{Image src='1.jpg' width=433 height=284 }]
Atari Kingdom CX4102 1st screen - beginning of loading \\
\\
[{Image src='2.jpg' width=408 height=276 }]
Atari Kingdom CX4102 2nd loading from cassette side A with instructions \\
\\
[{Image src='3.jpg' width=411 height=275 }]
Atari Kingdom CX4102 instruction side 1 of 2 \\
\\
[{Image src='4.jpg' width=404 height=269 }]
Atari Kingdom CX4102 instruction side 2 of 2 \\
\\
[{Image src='5.jpg' width=406 height=272 }]
Atari Kingdom CX4102 main screen - 1st start\\
!!Advertising
[{Image src='Advertising1.jpg' width=528 height=833 }]
Atari Kingdom CX4102 Advertising 1\\
\\
[{Image src='Advertising4.png' width=488 height=171 }]
Atari Kingdom CX4102 Advertising 2\\
\\
[{Image src='Advertising3.jpg' width=478 height=278 }]
Atari Kingdom CX4102 Advertising 3\\
!!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."\\