**********************;* WORLD CONQUEST *X* *u* HOWARD CAMPBELL ** 3463 PIPER DRIVE * * NORTHWOOD, OHIO *!* 43619 *"* (419) 698-1195 * #********************** $:B 2RO%(51),CL%(51),SC(51),CO%(51),TR%(51),BO%(51,5)T <R(TI):MO0w Z"";:53280,0:53281,0:646,7 \6000:9100:I110:9500:I:30000:30000 ]"INSTRUCTIONS? Y OR N" ^A$:A$""94 bA$"Y"20000 c"";: 2000 dCOMPUTER'S SELECTION OF POA0 iP11:P20:CO2> lLAAT:F0e nB11:E150:S11:R(.):R.5E125 sR(.):R.5B150:E11:S11:R(.):R.5B125 xK0:L0:IB1E1S1:R(.) CO%(I)2150 R.3K1:BAI:IE1 I CO%(LA)2F0BALA:K1:1609 CO%(LA(LA50))2F0K1:BALA1:160d CO%(LA(LA1))2F0K1:BALA1:160s F1:J14 CO%(BO%(BA,J))7ATBO%(BA,J):L1 J:K0L0110 "";:33)"BASE "BA "";:33)" " R((.)21):TR%(BA)2R14 TR%(BA)TR%(AT)R2E R 200,300K i COMPUTER TROOP BUILD-UP "";:33)"DEPLOY" TP(TE%(P1).2):TP5TP5 TR%(BA)TR%(BA)TP 560 ,ATTACK MODE ."";:33)"ATT."AT 6SA(TR%(BA).2.5)C @CA%(0)((.)3):CA%(1)((.)3)M E9000 JTR%(BA)TR%(BA)CA%(1):TR%(BA)1TR%(BA)1:WIN1 TTR%(AT)TR%(AT)CA%(0):TR%(AT)0400: ^TR%(BA)SAP11320 h500: OCCUPATIONTR%(AT)(TR%(BA).5):TR%(BA)TR%(BA)TR%(AT)VPSC(AT):P,CO:P1,CO:P2,CO:P3,CO:P40,CO:P41,COP42,CO:P43,CO:P80,CO:P81,CO:P82,CO:P83,COCO%(AT)COTE%(P1)TE%(P1)1:TE%(P2)TE%(P2)1500:WIN1:POSITION AND PRINT "";:SC$(TR%(AT))(LE(SC$):SC$(SC$,LE1);CL%(AT)0540TI1CL%(AT):"";:mI1RO%(AT):"";:&" "SC$0"";:SC$(TR%(BA))5LE(SC$):SC$(SC$,LE1):CL%(BA)0580?I1CL%(BA):"";:DI1RO%(BA):"";: N" "SC$S,"1 2 3 4 "E" "^""w"5 6 7 8 "" """$"9 "." "8""B"10 11 12 13 " L" "9V""U`"14 15 16 17 26 qj" t"~"18 19 20 21 "" """"22 23 24 25 " " "$""<""20)"27 28 "Q20)" "f20)""{20)"29 30 "20)" "20)""20)"31 32 33 "20)" " 20)"" 20)"34 35 36 ""20)" ";(20)""]220)"37 38 39 45 ";<20)"  ";F20)"";P20)"40 41 42 43 44 ";Z20)" ";d20)"";)n20)"46 47 48 49 50 ";Lx20)" ";n20)""""28)"";28) " WORLD " ;28) " CONQUEST " ;28) "" ; "";:32)"COMPUTER";:34)"MOVES"!MAIN TRUNK+10001:;7000D100r TE%(1)50 4000:"COMPUTER WINS":96003000:5000 TE%(0)50 4000:"YOU WIN":9600* 2050 PLAYER SELECTION OF POA 4000:CO7:P10:P21( 198,0:"ENTER PLAYING POSITION ";:L2:C7:N1:297005 BA(A$)J BA1BA503000^ CO%(BA)23000 4000:10)"F1 - ATTACK":10)"F3 - DEPLOY":198,0 A$"":A$:A$""A$""3050 A(A$)132: A 3200,210 4000: PLAYER ATTACK MODEC 4000:"ENTER POSITION OF AREA UNDER ATTACK ";:L2:N1:WIN0W 29700:AT(A$)x K0:I14:ATBO%(BA,I)K1 I:K03200 4000 320:WIN1 4020:"CONTINUE ATTACK? Y OR N" A$:A$"Y"A$"N"3260 A$"Y"3240 4000 4ERASE BOTTOM AND POSITION PRINT> 924X"";:I122:"";:^MOMO1:""MO:"MOVES":pI150:CO%(I)7:TR%(I)5:zTE%(0)25:TE%(1)25I150 CL%(I),RO%(I),SC(I)J14:BO%(I,J):II9601022:A:I,A:P2040,15:V53248:V39,10:V28,1:V37,7:V38,0Vs 0 , 1,55296,0 ,0 ,5 ,2 4 , 1,55300,1 ,6 ,3 ,0 8 , 1,55304,2 ,7 ,4 ,0 12, 1,55308,3 ,8 ,0 ,0 0 , 4,55416,0 ,0 ,6 ,1 4 , 4,55420,5 ,0 ,7 ,2! 8 , 4,55424,6 ,9 ,8 ,3> 12, 4,55428,7 ,9 ,0 ,4Z 10, 7,55546,7,8,12,13w 0 ,10,55656,0 ,14,11,0 4 ,10,55660,10,15,12,0$ 8 ,10,55664,11,16,13,9. 12,10,55668,12,17,9 ,08 0 ,13,55776,0 ,18,15,10 B 4 ,13,55780,14,19,16,11(L 8 ,13,55784,15,20,17,12FV 12,13,55788,16,21,26,13d` 0 ,16,55896,0 ,22,19,14j 4 ,16,55900,18,23,20,15t 8 ,16,55904,19,24,21,16~ 12,16,55908,20,25,0 ,17 0 ,19,56016,0 ,0 ,23,18 4 ,19,56020,22,0 ,24,19 8 ,19,56024,23,0 ,25,206 12,19,56028,24,0 ,0 ,21S 16,13,55792,17,0 ,37,0o 20,1 ,55316,0,29,28,0 24,1 ,55320,27,30,0,0 20,4 ,55436,0,31,30,27 24,4 ,55440,29,32,0,28 20,7,55556,0,34,32,29 24,7,55560,31,35,33,30 28,7,55564,32,36,0,06 20,10,55676,0,37,35,31T  24,10,55680,34,38,36,32q 28,10,55684,35,39,0,33 20,13,55796,26,40,38,34( 24,13,55800,37,41,39,352 28,13,55804,38,42,0,36< 20,16,55916,0,46,41,37F 24,16,55920,40,47,42,38#P 28,16,55924,41,48,43,39@Z 32,16,55928,42,49,44,0]d 36,16,55932,43,50,0,45xn 36,13,55812,0,44,0,0x 20,19,56036,0,0,47,40 24,19,56040,46,0,48,41 28,19,56044,47,0,49,42 32,19,56048,48,0,50,43 36,19,56052,49,0,0,44= 0,0,0,24,0,128,0,0,64,1,130,2,128,1,9,96,104,36 24,4,144,6,98,64,1,145,0,0,84,0,170,101,85,85,86,170,1,148,0,6,1530,24,146,64,96,144,144,128,128,36,0,144,9,0,0,2,0,144,0,0,0,0XSELECT COMPUTER'S POSITIONSbI125 lR((.)501) vCO%(R)27020* CO%(R)2` PSC(R):P,2:P1,2:P2,2:P3,2:P40,2:P41,2 P42,2:P43,2:P80,2:P81,2:P82,2:P83,2 I BA150:560:BA  BA25:AT26 @SO54272 JSO,12:SO1,1:SO24,15!TSO5,15:SO6,252:SO4,129!^%!hSO54272D!rSO7,12:SO8,1:SO24,15h!|SO12,15:SO13,252:SO11,129n!!(#Y437.52(RO%(AT))!-#Y1437.52(RO%(BA))!2#X177.09(CL%(AT)3)!7#X1177.09(CL%(BA)3)!<#X255V16,1:XX255 "A#X1255V16,3:X1X1255%"F#V,X:V1,Y:V21,17"P#8000:V21,0Q"U#V,X1:V1,Y1:V21,1k"V#8040:V21,0:V16,0"Y#SO4,128:SO11,128"Z#"#"""#A$" Ϸ Ϸ ":10000:9500##A$" ̯ ":10000:9500>##A$" ":10000:9500v##A$" ̯¯ ̯ ̯ ":10000:9500##A$" ":10000##A$"Ϸ Ϸ Ϸ Ϸ Ϸ Ϸ з":10000:9500$#A$" ":10000:9500D$#A$" Ϸ ":10000:9500y$#A$"̯ ̯ ̯ ̯ ̯ ":10000:9500$#A$" ":10000:9500$#"":A$"WRITTEN BY:":10000:A$"HOWARD CAMPBELL II":10000$# %%RANDOM EXPLOSIONS%&%X(.)200500%0%Y(.)20050C%:%X1(.)20050V%D%Y1(.)20050`%N%9020f%X%~%%I1100:9500:I:%'A(A$):A2(A2)A$" "A$:10000%'I1A2:19I);(A$,I);(A$,I):"";%$'I::& N"THE REDS ARE INTENT ON WORLD DOMINATION.";D&*N"YOU ARE THE COMMANDER OF THE YELLOW "s&4N"ARMY WHOSE MISSION IS TO KEEP YOUR "&>N"WORLD FREE BY DEFEATING THE RED ARMY "&HN"IN ALL OF THE STATES ON YOUR WORLD'S "'RN"THREE CONTINENTS. "/'\N"EACH TURN YOU ARE GIVEN THE OPTION OF "`'fN"ATTACKING THE RED ARMY ON A DIRECT FRONT";'pN"OR BUILDING UP YOUR TROOPS IN A GIVEN "'zN"STATE. "'N"IF YOU CHOOSE TO ATTACK THE ENEMY YOU "(N"MUST HAVE OVER 1 TROOP IN THE ATTACKING"K(N"FRONT. IF YOU WIN, THE STATE WILL TURN "z(N"TO YOUR COLOR. "(N"THE NUMBER OF TROOPS IS GIVEN IN PINK "(N"IN THE CENTER OF EACH STATE. THE NUMBER"; )N"OF THE STATE IS IN THE UPPER LEFT "9)N"CORNER. "h)N"BEWARE!! THE ENEMY COMMANDER IS CLEVER ")N"AND SHOWS NO MERCY!!! HE MAY ATTACK YOU")N"OR BUILD UP TROOPS TO CARRY OUT HIS ")N"OWN PLAN TO DEFEAT YOUR ARMIES. "$*N"GOOD LUCK!!! "J*N8)"PRESS TO CONTINUE"`*NA$:A$"" 20210f*N*t251,L : INPUT LENGTH*tA$"" : INITIALIZE*t828 : ACTIVATE IRQ WEDGE*"t646,C : SET INPUT COLOR*,t1,0:1,A$:1*6tA$""29040+;tF0,+@tI1(A$) : CHECK NUMERIC INPUTV+JtN1((A$,I))48((A$,I))57F1]+TtIl+YtF129740+^t 911 : DEACTIVATE IRQ WEDGE+ht+0uL :START POSITION OF ML ROUTINE+:uA$:A$"*"+DuCONVERT HEXADECIMAL TO DECIMAL,NuA(A$)48:B((A$,1))483,XuNB7(B9)(16(A7(A9)))I,buL,N:LL1:30010R,lu828,vu38,20,F0,FF,86,FD,84,FE,18,A5,FE,65,FB,85,FC,A6,FB,A9,11,20,D2,FF,uA9,B7,20,D2,FF,CA,D0,FA,20,86,03,u78,A9,6A,8D,14,03,A9,03,8D,15,03,58,602-u38,20,F0,FF,C4,FC,90,03,20,86,03,C4,FE,B0,03,20,86,03,E4,FD,F0,03d-u20,86,03,4C,31,EA,18,A6,FD,A4,FE,20,F0,FF,60-u78,A9,31,8D,14,03,A9,EA,8D,15,03,58,60,*-u 924-u A0,50,A9,20,99,6F,07,88,D0,FA,60,*-`I2048(45)(46)256.j(I)143(I1)32I1,18.t