1 PRINT TAB(33);"COMBAT" 2 PRINT TAB(15);"CREATIVE COMPUTING MORRISTOWN, NEW JERSEY" 3 PRINT: PRINT: PRINT 4 PRINT "I AM AT WAR WITH YOU.": PRINT "WE HAVE 72000 SOLDIERS APIECE." 5 PRINT:PRINT "DISTRIBUTE YOUR FORCES." 6 PRINT ,"ME"," YOU" 7 PRINT "ARMY",30000, 8 INPUT A 9 PRINT "NAVY",20000, 10 INPUT B 11 PRINT "A. F.",22000, 12 INPUT C 13 IF A+B+C>72000 THEN 5 14 D=30000 15 E=20000 16 F=22000 17 PRINT "YOU ATTACK FIRST. TYPE (1) FOR ARMY; (2) FOR NAVY;" 18 PRINT "AND (3) FOR AIR FORCE." 19 INPUT Y 20 PRINT "HOW MANY MEN" 21 INPUT X 22 IF X<0 THEN 20 23 ON Y GOTO 100,200,300 100 IF X>A THEN 20 105 IF XB THEN 20 210 IF XC THEN 20 310 IF XA THEN 1030 1610 IF TB THEN 1030 1710 IF TC THEN 1030 1810 IF T>F/2 THEN 1830 1820 GOTO 1850 1830 PRINT "MY NAVY AND AIR FORCE IN A COMBINED ATTACK LEFT" 1831 PRINT "YOUR COUNTRY IN SHAMBLES." 1835 A=A/3 1837 B=B/3 1840 C=C/3 1845 GOTO 2000 1850 PRINT "ONE OF YOUR PLANES CRASHED INTO MY HOUSE. I AM DEAD." 1851 PRINT "MY COUNTRY FELL APART." 1860 GOTO 2010 2000 PRINT 2001 PRINT "FROM THE RESULTS OF BOTH OF YOUR ATTACKS," 2002 IF A+B+C>3/2*(D+E+F) THEN 2010 2005 IF A+B+C<2/3*(D+E+F) THEN 2015 2006 PRINT "THE TREATY OF PARIS CONCLUDED THAT WE TAKE OUR" 2007 PRINT "RESPECTIVE COUNTRIES AND LIVE IN PEACE." 2008 GOTO 2020 2010 PRINT "YOU WON, OH! SHUCKS!!!!" 2012 GOTO 2020 2015 PRINT "YOU LOST-I CONQUERED YOUR COUNTRY. IT SERVES YOU" 2016 PRINT "RIGHT FOR PLAYING THIS STUPID GAME!!!" 2020 END