' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]浍 x m浅DeCE `m浅maDLi 鷎귭෍ᷩ췩緈JJJJx L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"8 흠 BȱBȄ  ȿL߼  !"#$%&'()*+,-./0123456789:;<=>? $ 5+"  * &  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0+(/;-%-%';-24<2/)(:-:::UB ;;x8+0 #,!01 pH !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌` ﷕AC ȿLHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`  巬 LҦcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e< 8浅`JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\ HH ^hh`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?Lˆʆ8L õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-( @跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I "`  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLȵCǵB`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(`"# dР"z# u`"     0 C1 03 A2 67 20 C1 03 A2 79 20 C1 03 A5 B9 C9 02 F0 05 A2 B8 20 C1 03 A5 67 A4 68 85 5E 84 5F A0 00 38 B1 5E 65 50 91 5E AA C8":10010:1448'HEX$"03B0: B1 5E F0 0A 65 51 91 5E 86 5E 85 5F 90 E7 4C 6C D6 38 B5 00 65 50 95 00 B5 01 65 51 95 01 60 FF 4CA9 03 8D F7 03 60 A9 A4 20 C0 DE 20 67 DD 20 52 E7 A5 67 85 96 A5 B0 85 97 C6 96 38 A5 50 85 94 E5 67 85 50 A5 51 85 95 E5 68 85 51 A5 AF E5 67 A8 A5 B0 E5 68 AA":10010:144.'HEX$"0370: 18 65 95 85 95 C8 D0 01 E8 E8 C8 20 C3 D3 A2 69 20 C1 03 A2 AF 28::72,0:' THANKS TO DARRELL AND RON ALDRICH FOR THEIR "&LOMEM:" ROUTINE, APPEARING IN THE HI- RES CHARACTER GENER- ATOR AS OBTAINED FROM CALL -A.P.P.L.E.. $'HEX$"0330: A9 4C 8D F5 03 A9 40 8D F6 03 6,08'18:"LOADING SANTA PARAVIA REV.1B":"RUNLAND"' THANKS TO S.H. LAM FOR HIS "MONITOR STRING WRITER" ROUTINE AS PUBLISHED IN CALL -A.P.P.L.E.. 'HEX$HEX$" N D823G":I1(HEX$):511I,((HEX$,I,1))1260,B1:61,B2:62,E1:63,E2:66,0:67,81817:9::" PLEASE WAIT WHILE MAIN PROGRAM LOADS. THIS WILL REQUIRE ABOUT FIVE SECONDS. "::8192,0,HEX$"2001<2000.3FFEM N D823G":I1(HEX$):511I,((HEX$,I,1))128::72,0:144@21255(I255))2551PS0,I2551:3,(Q255(Q255))2551:2,Q2551:16194:ud::12:"PLEASE WAIT...":10020n816:16384xPE(175)(176)256:BBPE1631:B1BB(BB256)256:B2(BB256):E1(175):E2(176)232,0:233,820020(5,208,250,165,4,233,1,133,4,208,240,165,0,133,4,165,1,133,5,198,7,208,225,165,3,165,6,233,1,133,6,208,215,96rEQQ32767(40I)M:0,(I255(I255))2551:1,I2551:4,(Q255(Q255))2551:5,Q2551:768:RI(26I)19:Q32767(16I)M:1,(I33,1,133,1,208,5,165,0,76,12,3,165,2,233,1,133,2,208,235,173,48,192,165,0,133,2,165,7,233,1,133,7,208,220,165,5,133,7,165,6,233,1,133,6,208,208,96CZ1619416251:Y:Z,Y:lD165,0,133,4,165,1,133,5,165,2,133,6,165,3,133,7,173,48,192,165,5,233,1,133,8I137:V82,81#9I130:V82,816:I122:V82,81I;I110:V82,81[<I97:V82,81n=I123:V82,81>I82:V82,81?I110:V82,81@I90:V82,81AZ768833:Y:Z,Y:B165,5,133,7,165,4,133,6,165,0,133,2,133,1,173,48,192,165,1,222:_ ."**** COPYRIGHT (C) 1979, ******** INSTANT SOFTWARE, INC. (P) ****";e /x 0I250:V82,81 1I220:V82,81 2I200:V82,81 3I185:V82,81 4I175:V82,81 5I165:V82,81 6I145:V82,81 7I145:V82,8129,33244 %10,1427:10,1435:26,2727:26,2735b &18,30:20,33:25,28:28,28:25,34:28,34h ' (::7::41);:BDR$(32):I18:BDR$;:40:BDR$;::41): )10:15:"SANTA PARAVIA"; *12:20:"AND"; +14:17:"FIUMACCIO"; , -710:9,5E 13,154:13,158:13,156:13,5:15,7:17,194:6,818 18,5:22,234:21,246:5,821:5,824:4,826:6,728:4,829:27,5 !31,334:4,832:15:0,3912 " #3 $27,3512:27,3516:28,2917:31,3219:34,3521:27,3522:32,20:31,19:32,17:35,18:17,2024:17,2027:16,2029:16,2034 25,2616:25,2618:30,3116:30,3118:35,3616:35,3620:35,18:15:0,3924  :15:0,390:0,3939:0,390:0,3939: 9 4,64:4,68:5,75:4,88:4,811:6,M20:48:53:M120:61 40G 54:II70:V82,81:II68:45:61P 100X 13 2,416:2,418:2,420:2,17:4,19:16,206:16,208:7,16:7,20 11,1216:11,18:16,2010:14,1616:17,2015:16,2018:17,1820:16,2022:19,19:21,19E  100:%65:V11:V22-286VV1QM35:48:53:M120:61ZVV2yM5:48:M10:53:M140:61VV1 M45 29 48:61:M90:56 M12:VV2 48:61:M24:5622M45:VV163:56:53:4935           --8????????(--------8????????(--------8????????H $,,%--.5566'$$666'$$666>$$$666>$$666'$$$,%,,.6-6>??$ 6$$ 66$ 6ID$$$$$%%$%$$)ݤ56666.6666$$$$$$$$$$$766666666$$$$$$$6666666IICCCCCCCCC%-.67?<$-5$2II$$$$$$,56666$$$$$$$$$-*%-*%-*%-*%-26666?????????(--------8????????(------$$$$ 6666$$$$,6666$$$$ 6666$$$$ 6666$$$$ 6666.$$$$ 6666$$$$$-'["-'R ,--56$,$*6$IIII ---$$$$$$$??7667666v$$$$D666666v$$$$$$d666666v$$$$$$$$??v$$,56$$$$$)ݤI ???$$ -<$g.>%%,$%%555666'$$7---$$$$>~$$$$H66$$$CC3vm<7 -$$7(8I?(-sF(,,ݚ--$ M-)-m???---?TJ xH5F<#-------$$$$7>?>76?<6>'?$'<'$%,,*m >??.-------;?????W)---???---?$$$$$$$$-6.%$-6.%$-6.%$-6.%$-6.%$-666666666??????????$$$$$$$$d66266v$$$$$$$ 26666v$$$$$$$$d6666666$$$$$dCd6666CC$$$$d666$$$ 666$$$$d6666$$$$$dCd6666666$$$$$$$$d26666v$$$$$$$ 66266v$$$$$$$$$8<<$$'$$-6-$-6>7666 $$$ $AM. ** ********************** :S,1h8v!=]m~ B$$$$$$$$$-6.%$-6.%$-6.%$-666666666??????$$$$$$$$d6666666$$$$$$$ 6666666$$$$$$$$d6666666$$$$$$$ 6666666$$$$$$$$d6666666$$$$$$$ 6666666$$$$$$$$$$41 C6 40 A5 3D C5 3F D0 E2 A5 3C C5 3E D0 DC 60 D8 A0 00 4C 2C FE 8D F6 03 A9 03 8D F7 03 60":10010:144>NHEX$"0340: A9":10010:144HN150)RN ********************** ** YOU JUST THINK ** ** THIS IS ALL OF ** ** THE PROGR BF":10010:144B'110*N THANKS TO ROGER WAG- NER AND SOUTHWESTERN DATA SYSTEMS FOR THEIR "MOVE" SUBROUTINE. j4NHEX$"0300: A0 00 A5 3C C9 00 D0 02 C6 3D C6 3C B1 3E 91 40 A5 3E C9 00 D0 02 C6 3F C6 3E A5 40 C9 00 D0 02 C6 2P7ĺ" DUE TO CASTLE FIRE CAUSED BY ARSON. "f3P7ĺ" OF FOOD POISONING. "443:43:" ************************************* ":43:43::::O0:10:::185:::38:325Q(Q):6R(R):7S(S):8F(D)(F(D)) "@/P5ĺ" IN A SMALLPOX EPIDEMIC. "0P6ĺ" OF TYPHUS AFTER DRINKING CONTAMINATED ":" WATER. "1P4ĺ" AFTER BEING ATTACKED BY ROBBERS WHILE ":" TRAVELLING. "21300::43:43:24:H$:43:43:" HAS JUST DIED ":43:43:H%(D)1:P((1)9)1:24-E%(0)1450ĺ" OF OLD AGE AFTER A LONG REIGN. ":52 .P4ĺ" OF PNEUMONIA AFTER A COLD WINTER IN A ":" DRAFTY CASTLE. :"":E1720:24::" ":J150:J::E+24::" ":O1ım,O1::43:24:" ************************************* ":43:43:" VERY SAD NEWS ":E) "C$(A)" "D$(A)::I%(A);6);J%(A);11);K%(A);16);M%(A);21);(N(A));28);G(A);35);(A(F(A))):::10:::'F$" ":H$C$(D)" "D$(D)(N((39(H$))2):N2(N2)H$H$" ":40)H$(F$,N)H$(F$,N):(H$)39H$H$" "Q*H%(4)1)(H%(5)1)(H%(6)1)258?"DFD0:E%(0)E%(0)1:32S#E%(0)G%(D)32g$E%(0)G%(D)39%59:B((9)):95:138:120:B(0):185:::222:237:62450:32o&::"NBLS SLDS CLGY MCTS SRFS LAND TRSRY"::E139:"-";:::A1F::A"OURNEYMAN":12:"3. MASTER":12:"4. GRAND MASTER":::" SELECT LEVEL OF PLAY DESIRED : ";11:((B$)1(B$)4)ĺ"";:30H(0)(B$):7H(0):10::"*"::J1750::H(0)H(0)6.5 DD1:H%(D)1DD1 !(H%(1)1)(H%(2)1)(H%(3)1)(D$(A)D$(A)" OF "C$(A):B(A)25:C(A)10:D(A)5:E(A)3:G%(A)1420(1)401:F(A)1000:G(A)5000:A(A)2500:H%(A)1:H(A)1:I%(A)2:J%(A)15:K%(A)2:M%(A)15:N(A)1000:::A1F::EF%(A)H%(A):J1E:C$(A):J:A]:8:12:"1. APPRENTICE":12:"2. JE RULER OF "C$(A)" ?"z9::" NAME : .............<<<>>>"::9:9:"";D$(A):((D$(A))0(D$(A))13)ĺ"":2415:"IS "D$(A):"OF "C$(A):"A MAN OR A WOMAN ";11:(B$"M"B$"W")Ė(36)1:26F%(A)0:A$B$:(A$,1)"W"F%(A)8"TORRICELLA","MOLINETTO","FONTANILE","ROMAGNA" ::5::" SANTA PARAVIA AND FIUMACCIO "::34,2::A116:A$::6:"HOW MANY PEOPLE WILL BE PLAYING ? "; 11:(B$"1"B$"6")ĺ"";:22B$:F(B$):E1300:::6:A1F:C$(A):6:"WHO IS TH: A(M)(M100.5)100:E%(0)1400: "SIR","BARON","COUNT","MARQUIS","DUKE","GRAND DUKE","PRINCE","*H.R.H. KING", "LADY","BARONESS","COUNTESS","MARQUISE","DUCHESS","GRAND DUCHESS","PRINCESS","*H.R.H. QUEEN". "SANTA PARAVIA","FIUMACCIO", 16384,128:16368,0:B$((16384)):q C(0):A$"":A$C$(D)" "D$(D):(((39(A$))2))::" "A$" ":: 3E3:22:"";E$: 0:HE1E1:IJ1J1:KH,I:I,H: 0:HE1E1:KH,J:: 0:IJ1J1:KE,I:: 3 KE,J0:60,0:61,150:62,254:63,191:66,1:67,150:71,0:58,44:59,254:327:1010,3:1011,224:1012,69m :: PAGE1:271:265 264:::B((9)):19 24:7::" PRESS RETURN TO CONTINUE ";::11 24:7::" PRESS ANY KEY TO CONTINUE ";:*ION BY **** **** MURRAY R. SUMMERS ** ** *********************************** 49151:BYE-BYE DOS!c 3:(21):38400,RX (C) 1980, ISI (P) ALL RIGHTS RESERVED *********************************** **** SANTA PARAVIA VERS. 21480 **f ** APPLE VERS                           :135&{E124,127,129,131:&|13:E(E$):E100E100G&}E0E0W&~B(D)E:120y&13:E(E$):(E50)(E0)E5&C(D)E:120&13:E(E$):(E0)(E25)E0&D(D)E:120G'34,14::"JUSTICE OPTIONS : 1. VERY FAIR":24:"2. MODERY"PE(D)1:F(D)F(D)5000"%w109%x34,2::85::16:"SELECT :"::8:"1. CHANGE CUSTOMS DUTY":8:"2. CHANGE SALES TAX":8:"3. CHANGE INCOME TAX":8:"4. CHANGE JUSTICE, OR"%y9:((B$"1"B$"4")(B$)13)ĺ"";:121&z34,16:E(B$):E0ĉ:(D)Q:F(D)F(D)(QL):109$s:PE(D)ĺ"YOU ALREADY HAVE ONE! WHAT ARE YOU TRYING TO DO? BLOW ALL YOUR MONEY?":E12000:E:109$t"BUY LAND PERMIT TO OWN MORE THAN 7500 HECTARES FOR 5000 FL ? ";$uE$:E$"Y"E$"N"ĺ"";:117%vE$"::1101#oF(D)F(D)(QG1000):A(D)A(D)Q:109#p:"BUY HOW MANY HECTARES ?";:"";E$:Q(E$):G(D)G(D)Q:F(D)F(D)(QL):109#q:"SELL HOW MANY HECTARES ?";:"";E$:Q(E$):Q(G(D)2500)ĺ"YOU CAN'T SELL THAT MUCH!":E12000::113$rG(D)GĺB$;!"jQ(B$):Q0Ĺ34,20::E"k34,16::Q108,110,112,113,115"l:"BUY HOW MUCH GRAIN ?";:"";E$:Q(E$):F(D)F(D)(QG1000):A(D)A(D)Q"m34,7::80:102#n:"SELL HOW MUCH GRAIN ?";:"";E$:Q(E$):QA(D)ĺ"YOU DON'T HAVE IT!":E12000OGETHER!)":F(D)(F(D))Z.!e10:8:958:80!f18::"SELECT :";::" 1. BUY GRAIN":11:"2. SELL GRAIN":11:"3. BUY LAND":11:"4. SELL LAND":11:"5. BUY LAND PERMIT, OR"!g49168,0!h9:((B$"1"B$"5")(B$)13)ĺ"";:104"i(B$)13))1102R c17:Z((1)F(D).75):"DARN! ";:(0).5ĺ"NO...DOUBLE DARN!";!d:"YOU WERE BEATEN UP BY ROBBERS AND ROBBEDOF "Z" FLORINS. IT'S GOING TO TAKE":"SOME TIME FOR THAT BLACK EYE OF YOURS":"TO HEAL. (YOU'D BETTER GET YOUR GUARDS'ACT TQ;::" GOLD FLORINS"::"CUSTOMS DUTY :"B(D)"%":R" FL"::"SALES TAX :"C(D)"%":S" FL"::"INCOME TAX :"D(D)"%":Q" FL"::"JUSTICE :"J$:J" FL"::_::2:12:75`(1).25102aE%(0)1400102 b(F(D80K%(D)75M%(D)20)(P100)H(D)100:S(I%(D)50M%(D)75H(D)10)(P100)(5E(D))2:QI%(D)250H(D)20(10E(D)I%(D))(P100):RRB(D)100:R32760İ54\SSC(D)100:S32760İ55]QQD(D)100:Q32760İ53^:"STATE REVENUES ";::JRSEASURY (FLORINS) :";:X(A(F(D)))::84::NTA$(X):(38(A$)):A$:{UJ(E(D)300500)H%(D):E(D)86,87,88,89VJ$"VERY FAIR":90WJ$"MODERATE":90XJ$"HARSH":90YJ$"OUTRAGEOUS"ZP150B(D)C(D)D(D):P1P1[R(I%(D)1A(A(D))):84:"GRAIN DEMAND (STERES) :";:X(A(W)):84:"GRAIN PRICE (1000 ST) :";:XA(G):84:"LAND PRICE (HECTARE) :";:XA(L):84:"LAND OWNED (HECTARE) :";:X(G(D)):84R"LAND PERMIT (7500+HA) :";:36:"NO";:PE(D)Ė35:"YES";0S:"TRE! "Z100"% WAS SET AFIRE,":"COSTING YOU "(A(D)Z).5" FL TO PUT IT OUT.":A(D)(A(D)A(D)Z):F(D)F(D)(A(D)Z).5N10:6:958:5:OI$:A$((V)):A$"("A$" STERES)":38(A$));A$P:F(D)32766İ56Q"GRAIN RESERVE (STERES) :";:X(HLLP:L(L10):LL10:T6UPIG(T3((1)51)((1)51))5P20:G173VJK:"RATS ATE "(A(M))"% OF YOUR GRAIN RESERVES!"::(1).0579LE%(0)140079wMZ((1)50)100:6:"BAD NEWS! ARSONISTS SET FIRE TO YOUR GRAIN RESERVA(D)100A(D)M)100:BG(D):P(N(D)D%(D)100)5:P0P0FCPBBP\DPA(D)2:PBBPEPU.5:VBP:A(D)A(D)V:WI%(D)100K%(D)40M%(D)30J%(D)10N(D)5:L(3U(((1)6)1)(((1)6)1)10)10:V1P2:71FPWV:P2P2GP.8P.8 FAMINE THREATENS":66P>I$"BAD WEATHER POOR HARVEST":66?I$"NORMAL WEATHER AVERAGE HARVEST":66@I$"GOOD WEATHER FINE HARVEST":66AI$"EXCELLENT WEATHER GREAT HARVEST"9BM(((1)75)1):A(D)(:R9T(((1)A)1)N(D)100:O%T:O%;" SERFS BORN THIS YEAR.":N(D)(N(D)O%)::T(((1)A)1)N(D)100:O%T:O%;" SERFS DIE THIS YEAR.":N(D)(N(D)O%):;U((((1)5)1)(((1)6)1)2):U(U):U559<U61,62,63,64,65=I$"DROUGHT 1F10:K21:E200:J100:0:18:K23:6:18:K24:5:18N6TB%(D)2:T02106T10K28:E146:J113:14:17:E175:14:17:E160:J110:14:176T8T9:K28:E159:J112:14:17:E161:17;7K25:J120:E1622T1642T2:16:17::0:A1632TC%(D)1:T7T745T206,205,204,203,202,201,200=5F11Z5K20:E200:J100:14:17w5K19:E201:J100:14:175K22:E200:J76:15:175K18:E201:J91:15:1776K17:E200:J100:14:17:16:K12:E205:J98:16:E212:16:0:12207,90:F1B(2B)3:E,3PE,160:54(J%(D)5)G(D)1000198}4K1:E2B:J3P10:17:(J%(D)2)(G(D)1000)K4:EE7:0:18:1984E2B:K26:0:18:K2:14:17:K3:16:17:EE8:K13:16:17:3:2B1,3P122B1,3P22:2B7,3P20:2B1,3P185T80:P27(L%10):19473L%50B60:P27(L%30):194Y3L%70B40:P27(L%50):194{3L%90B20:P27(L%70):1943L%110B1:P27(L%90):1943B1:P741:E3P160:B2,E279,E::16304,0:3:E3P3P3:B2,E279,E::E1E3:E2),((1)1601)::1:A((1)C11):E1A:6((1)2791),((1)1601)::1:A((1)B11):E1A:A4:5((1)2791),((1)1601)::025:A((1)Y1):E1A:8((1)2791),((1)1601):2L%(G(D)1000):L%10B80:P27:1943L%30B(D)7::"YOU PAID YOUR SOLDIERS "T" FLORINS.":F(D)F(D)T:(G(D)750)J%(D)249j1(G(D)500)J%(D)184~1A1F:AD1831J%(A)J%(D)22491110:216297,0:62450:1:0:B124:C118:D112:Y38:1:A((1)D11):E1A:7((1)27910:B0"0A3:57:AP%8:58:170u0::TA%(D)75:F(D)F(D)T:T0ĺ"YOUR MARKET EARNED "(A(T))" FLORINS RENT."0N(D)32766SN(D):55:N(D)S0TD%(D)(55((1)2501)):T0F(D)F(D)T::"YOUR WOOLEN MILL EARNED "(A(T))" FLORINS."P1TJ%CITY":N(D)(N(D)T):O%T5:T(1)O%1:T50T50`/M%(D)M%(D)T:I%(D)I%(D)1:K%(D)K%(D)2p/E(D)3172/ZN(D)80E(D)E(D):Z(1)Z1:Z(Z):N(D)(N(D)Z):Z" SERFS FLEE HARSH JUSTICE"/176/B(WY)W1009:P%B:B65B650B0P%8:(B(D)C(D))35M%(D)M%(D)((1)41)h.D(D)((1)201)I%(D)I%(D)((1)2):K%(D)K%(D)((1)3)|.Y(WW.3)170.O%N(D)1000:T(YW)W10:TTO%((1)251)((1)401):T32000T320002/O%T:T(1)O%1:T(T):7:T" SERFS MOVE TO THE B$"B"PE(D)1:F(D)F(D)5000W-B$"G"G(D)G(D)(G(D)7500):G(D)2500G(D)2500a-::w-T.25TT10.25-O%50B(D)C(D)D(D):O%0O%O%E(D)-O%O%10:O%0O%O%3E(D)-TT(O%10):T.5T.5-Y(W1)173(.A7:57:A3:5ALID THROUGHOUT THE GAME. DO YOU WISH TO BUY THE PERMIT OR WOULD YOU LIKE TO GIVE UP THE DIFFERENCE";,"IN HECTARES OF LAND?":::"SELECT :";::" B) BUY PERMIT (5000 FL.)":11:"G) GIVE UP ";(G(D)7500);" HECTARES",11:B$"B"B$"G"ī156 -12000::139=+34,2::::A(D)A(D)Y:TYW1:T0TT2V+PE(D)G(D)7501159+G(D)7500Ģ6:"SINCE YOU HAVE MORE THAN 7500 HECTARES OF LAND, YOU ARE REQUIRED TO HAVE A LAND";f,"PERMIT, WHICH WILL COST YOU 5000 FL. THE PERMIT WILL BE V*G$"Z"Y(A(D)5):150>*G$"X"Y(A(D)A(D)5):150V*G$"D"Y(W):148h*Y(G$):G$""*Y(A(D)5)ė:"YOU MUST RELEASE AT LEAST 20% OF YOUR RESERVES!":E12000::139+Y(A(D)(A(D)5))ė:"YOU MUST KEEP AT LEAST 20%":E" OR A NUMBER BETWEEN "(A(D)5)1" AND "(A(D).8)1::"YOUR CHOICE :";:)11:(B$"Z"B$"X"B$"D"((B$)0E0))ĺ"";:141)(B$"Z"B$"X"B$"D")G$B$:G$:144)(B$)13ĺB$;:G$G$B$:E1:141(34,15:::"YOU MUST RELEASE BETWEEN 20% AND 80% OF YOUR RESERVES. ";:::"PLEASE TYPE : "(34)"Z"(34)" FOR THE MINIMUM":" "(34)"X"(34)" FOR THE MAXIMUM"p)" "(34)"D"(34)" FOR THE DEMAND ":ATE":24:"3. HARSH":24:"4. OUTRAGEOUS"::::14:"YOUR CHOICE ?";m'11:(B$"1"B$"4")ĺ"";:132'E(B$):(E4)(E1)E1'E(D)E:34,16:120'F(D)F(D)RSQJ:F(D)0F(D)F(D)1.5'F(D)(10000H%(D))247''E0:G$""IC1)4:B1E1:E1B11(B10)256:E2B23(B10)AF60,B1:61,B2SF62,E1:63,E2hF66,0:67,4PAGErF1912xF~Fՠ̠ŠҠӮŠŮƠ̠ӠŠŠ THANKS TO ROGER WAGNER AND SOUTHWESTERN DATA SYSTEMS FOR THIS SUBROUTINE!_E DISPLAY 1 PICE PARAMETERS: PAGE=1 OR 2;PIC=1 TO NPE(PAGE2)PAGE1E1912,216:1913,160:1914,0:1915,76:1916,44:1917,254/FE1(175):E2(176):B2E2(NPPAD256)256:176,(AD256):PD :12:"DO YOU WISH TO SEE THE INSTRUCTIONS ?"|D 11:(B$"Y"B$"N")ĺ"";:38:266D (B$,1)"Y"PIC4:272:11:D PIC14:272:11D DJENP05:: NP=NUMBER OF PICS APPENDED TO THIS PROGRAM ;J%(D)T:10:CF1İ38IC2:5:"WOULD YOU LIKE TO PLAY AGAIN ?";wC11:(B$"Y"B$"N")ĺ"":(36)1:260CB$"N"263C:5:"THANKS FOR THE GAME.":1012,0:1438C::19DAD(121)256(122):AD1,0:AD2,0:ADAD3:175,AD(:10::"*** URGENT NEWS FROM THE FRONTIER ***":::A1(A1):C$(T)" "D$(T):"INVADES AND SEIZES :"A1:"HECTARES OF LAND!":G(T)G(T)A1:G(D)G(D)A1:T(1)401:T(J%(D)15)TJ%(D)15CT(T):::C$(D)" "D$(D):"LOSES "T" SOLDIERS IN BATTLE.":J%(D)2500:AT0:A1F:AD2533AJ%(A)J%(D)253TAJ%(A)(1.2(G(A)1000))253iAJ%(A)J%(T)TAA:T0C$(0)"BARON ":D$(0)"PEPPONE OF MONTERANA":A1(1)90001001:255AA1J%(T)1000G(T)3AA1G(D)5000A1(G(D)5000)2B"":(D)" "D$(D)" WINS":E11000::187:38:259@@E11000:@:5:C$(D)" "D$(D)" IS BANKRUPT."::"CREDITORS HAVE SEIZED MUCH OF YOUR ASSETS."::10:A%(D)0:B%(D)0:C%(D)0:D%(D)0:H(D)1:F(D)0:M%(D)M%(D)2:A(D)2500AG(D)2500G(D)D)(A)242B?H%(D)A::E1(H%(D)F%(D)):C$(D)::H%(D)8245?:8:" A NEW TITLE HAS BEEN AWARDED"::E11500::"YOU ARE NOW A "C$(D)",":D$(D):10??A10A10?A(A):TTA:0@:5:" GAME OVER!":E1500:::C$0:AA%(D):243:AB%(D):243:AC%(D):243:AD%(D):243:AF(D)5000:243:AG(D)6000:243:AM%(D)50:243:AI%(D)5:243:AJ%(D)50:243:AK%(D)10:243:AN(D)2000:243:AH(D)5:243:ATH(0)E(D):A(A):A8A8>(E%(0)2)G%(D)H%(D)H%(D)1 ?H%(F(D)3000:H(D)H(D).3:234e=C%(D)C%(D)1:K%(D)K%(D)(1)61:F(D)F(D)5000:H(D)H(D).75:234=J%(D)J%(D)20:N(D)(N(D)20):F(D)F(D)500=K$((F(D)))=(K$)(A$)K$" "K$:235=8:15::K$;::J1200::11E:1:" ":224>T::"*"::J1500::E6İ38:222C<E7ė:16304,0:195::221^<E230,229,231,232,233<D%(D)D%(D)1:F(D)F(D)2000:H(D)H(D).15:234<A%(D)A%(D)1:M%(D)M%(D)5:F(D)F(D)1000:H(D)H(D).05:234=B%(D)B%(D)1:I%(D)I%(D)(1)21:F(D)PARTIAL)..5000 FLORINS":" 5. ARM 1 PLATOON SERFS...500 FLORINS":" 6. COMPARE STANDINGS":" 7. REDRAW MAP, OR":F(D)4000246;9:(B$"1"B$"2"B$"3"B$"4"B$"5"B$"6"B$"7"(B$)13)ĺ"";:224;E(B$):E1ė:"<11E:1ASES ***"::A$((F(D))):::" YOU HAVE ";::(F(D));::" GOLD FLORINS."::7::"SELECT :":::" 1. MARKETPLACE..........1000 FLORINS":" 2. WOOLEN MILL..........2000 FLORINS";" 3. PALACE (PARTIAL).....3000 FLORINS":" 4. CATHEDRAL (B20)6(B1)T156(B80)6(B60)6(B40)6(B20)6(B1)9A2556T2546:K10:EA:J154:14:17:K11:EA1:J146:14:17:91:21:"YEAR ";:E%(0):22:C$(D)" "D$(D):49168,0:10::9A$((F(D)))::2:12::" *** STATE PURCH7:K16:E230:14:17:TA%(D):T02178T156(B80)6(B60)6(B40)6(B20)6(B1)T156(B80)6(B60)6(B40)6(B20)6(B1)8K9:J130:E2B4((2B4)T6)16:14:6:18:8TD%(D):T0220>9T156(B80)6(B60)6(B40)6(1652T3:12A,114::12164,118:H%(D)1T(E14)3:214Y7TN(D)D%(D)100:T1T1x7TT5G(D)101:T10T107T(T10)(45P):T(47T):3TE1421475:EE13(3T)22:236,E257,E:%8K14:E253:J(3T)4:14:17:K15:E242:14:1       : @ŠΡ``         (       $ǠŠР̬ΠՠĠŠӠάŠƠҠŠ`ƠŠŠĠΠŠԠΠŠ͠ĮƠՠɭԠנΠàȮ`         ŠƠՠŠŠΠȠŮȠӠŠ٬(       BŠӬϠ̠ŠϠҠ̠ŬĠՠ̠ŠȠ ҠŮŠŠƠŠĠŠĠΠŠǠŠР`ŠҠ̠נРƠӬРŠӡƠŠ`         ٠ƠҠӮƠŠҠ(       LΠŠҠԠҠӠŠŭ̬̠ҠĠӠΠήΠ٭ŮƠՠŠ̬Ϡՠ٠ԠŠ̠ŠĠƠŠ`ՠŠŠҠƠȠӮŠ٠ΠӠƬȠŠԠŠӡ`         ԠҠϠŠǠҠΠӠǠҠάΠŠŠ(ݠݠݠݠ`ݠ`ݠ   ݠ("z#ĠT