""?6,5:5,1:25)"DO YOU WISH INSTRUCTIONS?": IN$T IN$"Y" 4000m BO9:CH1:3100:"":3110:FG0:20)"OW LONG WILL YOU MANAGE YOUR FARM";QQ$:QQ(QQ$):QQ02930(FG0202ZZ1QQ:2110:2150:ZZ12190<BO7:BG6:CH1:3100KF"YEAR:";ZZ:"LANTING SEASON SELECTION:"lP20)"F1 KEY...ARKET NEWSZ20)"F3 KEY...OUR FINANCIAL STATUS"d20)"F5 KEY... LANTING"n20)"F7 KEY... ELL CROPS ON FUTURES"x23)"HAT IS YOUR SELECTION" 2950'I18:1,(1132):@I18:3,(1133):YI18:5,(1134):rI18:7,(1135): (A$)133(A$)136 130AA(A$)132:AA1150,1370,1520,1890AA318060BO7:CH6:3100"":25)"OUR CROPS ARE GROWING."OFX0:J13:FXFX(TS(J)((BP(J)FP(J))100.5)100):lFX(FX100.5)100:SB0J13:SBSR(J)SB:J13:SR(J)SR(J)TS(J):2200:2360GT0:J13:GTGT(TY(J)(YP(J)100.5)100):% PT0:J13:PT(FU(J)TA(J))PT::PT(PTGA100.5)1009 BO2:CH1:3100g "":20)"ARVEST IME ON THE ARM " "3020:20)"ROP ELLING PRICE EILD" ,J13:RRTA(J):RR0RR1 6TMYP(J):3030:YP$TM$:YP(J)(TM$) !@TMTY(J):3030:TY$TM$:TY(J)(TM$):!J20)N$(J);33)YP$;53(TY$))(TY(J)):!T10)"T IS NOW TIME TO PAY YOUR BILLS AND TO SELL YOUR CROPS."!Y3010!^"URRENT ANK ALANCE";:TMBA:3030:BA$TM$:BA(TM$)!h33(BA$))BA$"r"UTURES ROP HECK";:TMFX:3030:FX$TM$:33(FX$))FX$I"|"OTAL EILD";:TMGT:3030:GT$TM$:GT(TM$)]"33(GT$))GT$""OAN AYMENT UE";:TM((LO3)100.5)100:3030"33(TM$))TM$:LP((TM$)100.5)100""ARVESTING OSTS";:TMHV:3030:HV$TM$:33(HV$))HV$#HV((TM$)100.5)100Z#"OST FOR 200 CRES";:TM(CE100.5)100200:3030:CE$TM$n#33(CE$))CE$#"UEL XPENSE";:TMPT:3030:PT$TM$:PT((TM$)100.5)100#33(PT$))PT$$"VERHEAD XPENSE";:TMOV:3030:OV$TM$:33(OV$))OV$$OV((TM$)100.5)100U$"ROP TORAGE EES";:TM(12SB0.015):3030:SB$TM$q$SB((TM$)100.5)100$33(SB$))SB$:3010$"OTAL SSETS=";:TMBAFXGT:3030:AA$TM$$33(AA$))AA$$&"OTAL EBITS="; %0TMLPHVOVPTSB(CE200):3030:DT$TM$:DT(TM$):%:33(DT$))DT$:2940R%DJ13:TY(J)0730%N"OW MANY BUSHELS OF " ;N$(J); " DO YOU WISH":"TO SELL?"%X"OU HAVE A MAXIMUM OF ";TY(J);"TO SELL."%bFG0:X$"":X$:X$""590%lX(X$)$&vXTY(J) "OU DON'T HAVE ";X;"BUSHELS!":3000:590h&X;"BUSHELS OF ";N$(J);" WOULD SELL":"FOR $";:TMXYP(J):3030w&TM$:3020&"S ";X;"BUSHELS OF ";N$(J);" OKAY?&"RESS F1 TO CHANGE, F3 TO SELL&2950& A$(133)590&A$(134)680'BABA((XYP(J)100.5)100)8'SR(J)(TY(J)XSR(J))>'['BA((BAFX)100.5)100i'LO0850'"OW MUCH OF YOUR LOAN DO YOU WISH TO PAY OFF? INIMUM PAYMENT"' "IS $";:TM((LO3)100.5)100:3030:TM$(20)"OU OWE A TOTAL OF $";:LO(LO100.5)100:LO&( FG0:A5(*ATM760D(4ALOALO(>BA((BAA)100.5)100:LO(LOA)1.12::LO(LO100.5)100(HLO0LO0(RBABA(CE200100.5)100(\BABA(OV100.5)100(fBABA(HV100.5)100)pBABA(PT100.5)100)zBABA(SB100.5)100.)BA02620C)J13:TY(J)0:Z)J13:TS(J)0::)"":25)" ND OF AME ALLY ")20)"URRENT ANK ALANCE= $";:TMBA:3030:TM$)BA(TM$))3010)20)"ROPS IN TORAGE:"*20)" ROP USHELS IN TORAGE ""*XX0>*J13:SR(J)0SR(J)0^*20);N$(J);:TMSR(J):3030*22(TM$));(SR(J)):XXXXSR(J)YP(J):*20)"TORED ROP ASH ALUE:";:TMXX:3030*35(TM$));"$"TM$:XX(TM$):BABAXX+20)"MOUNT OWED TO ANK:";:TMLO:3030.+35(TM$));"$"TM$S+LO(TM$):BABA(LO100.5)100g+$BA20000ZZ1z+.BA20000ZZ2+820)"RAND OTAL IN ANK:";:TMBA:3030:BA(TM$)+B35(TM$));"$"TM$:+LZZ2780,2820,V20)"OULD YOU LIKE TO TRY AGAIN?",`2950:A$"Y"10,,jA$"N"11202,tK,~"":BO2:CH1:3100v,26)" ": 3020,IR$(((IR.999)100)),20)"EARLY NFALTION ATE: ";53)IR$;"%",TMGA:3030:GA$TM$:GA(TM$)-20)"UEL COST(PER GALLON) :";53P)"$"GA$5-TMHS:3030:HS$TM$:HS(TM$)f-20)"ERBICIDE COST PER UNIT:";53P)"$"HS$-TMIS:3030:IS$TM$:IS(TM$)-20)"NSECTICIDE COST PER UNIT:";53P)"$"IS$-TMOV:3030:OV$TM$:OV(TM$).20)"VERHEAD COSTS:";53P)"$"OV$.TMCE:3030:CE$TM$J.20)"OST PER ACRE:";53P)"$"CE$:3010f. 31)" EED RICES ".20)"RAIN SEED COST PER BUSHEL.J13:N$(J);":";:TMBS(J):3030:BS(J)(TM$).(33P)"$"TM$:::3010/228)" UTURES ARKET RICE ":,/<J13:N$(J);":";:TMBP(J)FP(J):3030B/F33P)"$"TM$::N/P2940:b/ZBO2:CH1:3100/d20)"  OUR INANCIAL TATUS ": 3010/nTMBA:3030:BA(TM$)/x20)"AVINGS CCOUNT ALANCE:";25P)"$"BA/TMLO:3030:LO(TM$)020)"OU OWE THE ANK:";20LO048)"------":1450D025P)"$"TM$0"":3010:20)"  ROPS PRESENTLY IN STORAGE "0:X0029)"ROP";40)"USHELS"0J13:SR(J)1.0SR(J)0028)N$(J);44)SR(J):XXSR(J): 120)"RAIN TORAGE EE: $";:TM(X.015):303071TM$" PER MONTH.D1 2940:X1BO5:CH1:31001"";25)" LANTING IME ON THE ARM "18)"OU HAVE 200 ACRES TO PLANT,DIVIDED INTO 5 FIELDS OF 40 ACRES EACH 215)"IELDS1-3 ARE AVERAGE OR ABOVE AVERAGE YIELDERSR2"10)"IELDS 4 AND 5 ARE SLIGHTLY LESS THAN AVERAGE PRODUCERS\2,3010l2664)"CROP"2@J15:20)"ROP TO BE PLANTED IN FIELD ";J2J" 1=HEAT  2=ORN  3=OYBEAN 3T 2950*3^ (A$)49(A$)512980:1620L3hFL(J)(A$):"";65)FL(J):3r20)"LL YOUR FIELDS ARE READY FOR PLANTING."3|20)"HE TOTALS ARE:":J13:X0:JJ153FL(JJ)JXX403:TA(J)X:X;"ACRES OF ";N$(J);" PLANTED.":84TM0:J13:TMTM(TA(J)BS(J)BB(J))::TM((TM.005)100)100u420)"EED OSTS: ";:3030:TM(TM$):30(TM$))"$"TM$4BHBA:20)"ANK ALANCE: ";:BABATM:TMBA:3030430(TM$))"$"TM$420)"S THIS OKAY? (/)"52950:A$"N"BABH:15305A$"Y"1740]515)"OW MANY UNITS PER ACRE OF INSECTICIDE DO YOU WISH TO APPLY?"w5X$"":X$:X$""17605(X$)48(X$)572930:17605X(X$)5BABA(X200IS):IN(((X)5)5)1615)"OW MANY UNITS PER ACRE OF HERBICIDE DO YOU WISH TO APPLY?"-6X$"":X$:X$""1810P6&(X$)48(X$)572930:1810\60X(X$)6:BABA(X200HS):HE((((X)4.4)5)1)6D20)"RESENT ANK ALANCE: $";:TMBA:3030:TM$:30006NBA026206X7b20)" RAIN UTURES ARKET ALES "Q7l10)"OU HAVE THE FOLLOWING AMOUNTS OF GRAIN PRESENTLY IN STORAGE."m7J13:SR(J)0SR(J)07N$(J),(SR(J));"BUSHELS"::3010720)"RAIN ARKET UTURES RICES"7J13:N$(J),"$";:TMBP(J)FP(J):3030:TM$:820)"HICH GRAIN WOULD YOU LIKE TO SELL?"e815)" F1 HEAT  F3 = CORN  F5 = OYBEANS  F7 = ONE"82950:(A$)133(A$)13619808J(A$)132:J48SR(J)020)"OU DON'T HAVE ANY ";N$(J);"!":1960/910)"OW MANY USHELS OF " ;N$(J); "DO YOU WANT TO SELL (UP TO";SR(J);" BUSHELS)?69Kq9KSR(J) 20)"OU DON'T HAVE THAT MUCH GRAIN!":20109SR(J)SR(J)K:SR(J)0SR(J)09 TS(J)K920)"OULD YOU LIKE TO SELL MORE GRAIN?"9 2960: A$"Y"18909*A$"N"208094:>X(((.)71))100&:HX.0521407:RIR1X:2150@:\IR1g:fJ13:BS(J)(BS(J)IR100)100::pGA(GAIR100.5)100:ISIS(IR.01):HSHSIR:OVOV(IR.01):HVHRIR:zCE(CE(IR.01)100.5)100:J13:BP(J)BP(J)(IR.01)::;J13:FP(J)1.05::+;X(.)(0.99.01).01E;X.45XX1.0X:2250[;X.80XXX:2250y;X.45X.5XX1.03:2250;XX1.0;X(.)(.99.01).01;X.1XXXX1X:2300;X.75XXXXX:2300;X.4X.5XXXX1.02:2300;XXXX1<XXXX2"< X.2ININ2:HEHE2;< SFIN:IN1.1SF1.1T< HFHE:HF1.1HF1.1i<$ J13:TY(J)0:<. J15:KFL(J):TY(K)(40FF(J)BY(K)XXHFSFTY(K))::<8 J13:2580:DM(J)XX:2580:DC(J)XX:2580:EM(J)XX XX1 > XXXX&> FC(J)1.1XX.8:2530C> FC(J).97XX1.09:2530L> XX1]> XXXX:XX3m> X1X1.03y> FP(J)X> X0> > X(.)(.99.01).01> X.45XXX1:>( X.70XXX:>2 XX1:?< " OU NEED TO BORROW MONEY TO KEEP FARMING "@?F 18)"OUR BALANCE IN THE BANK HAS DROPPED BELOW $0.?P 5)"O MEET YOUR PAUMENTS YOU WILL NEED TO BORROW SOME MONEY FROM?Z 30)"( $50,000)?d 10)"INIMUM LOAN PAYMENTS ARE ONE-THIRD OF LOAN DUE AT 12% INTEREST."@n 0BALO500002860Q@x 20)"OU WILL NEED TO BORROW AT LEAST: ":"$";0((BA100.5)100)@ 20)"OU CAN BORROW UP TO $";50000(LO100.5)100@ 20)"YOU OWE A GRAND TOTAL OF $";(LO100.5)100@ 20)"OW MUCH DO YOU WISH TO BORROW?" A X$:X(X$):(X$)02720EA LOX50000"ORRY YOUR CREDIT LINE IS $50,000":2710A X(0BA.005) "HAT WILL NOT BE ENOUGH,TRY AGAIN":2710A LOLOX:BA((BAX)100.5)100:LO0LO0A LOLO1.12:A BO7:CH1:31002B "ONGRATULATIONNS!! OU HAVE MANAGED THE NEARLY IMPOSSIBLE TASK OF MAKEING MONEY"pB 20)" AT FARMING.HE BANK CONSIDERS YOU A GOOD RISK.":B BO6:CH1:3100B "OU HAVE PROVEN YOURSELF A VERY POOR FARMER! OU LOST MONEY,AND YOUR FARM"C" 23)"MUST BE SOLD TO PAY YOUR CREDITORS!":EC, 3000:3000:" ORRY YOU ARE ANKRUPT. "C6 "OU HAVE MANAGED TO RUN YOUR CREDIT LINE TO THE LIMIT NOW YOU ARE BROKE.CJ "OU OWE CONSIDERABLE BACK TAXES AND YOUR FARM WILL BE SOLD AT A SHERRIFF'S "DT 20)"AUCTION,TO PAY YOUR DEBTS."D^ "": 1110[Dr FG1:24)"OU MUST ENTER A NUMBER HERE.":3000:D| 20)" RESS ANY KEY TO CONTINUE "D 198,0D A$:A$""2960D D 20)"OU MUST ENTER 1,2,OR 3 HERE. ":3000:E " ":%E T12000::|E "--------------------------------------------------------------------------------E E "E E TM$((TM100.5)100)F P0:A1(TM$),F (TM$,A,1)"."PA.999IF :P0TM$TM$(46):P1rF (TM$,((TM$)1.999),1)(46)3090F TM$TM$(48):3040F F 6,BO:5,CH:F& "";32)" F0 J13:N$(J)::J13:BP(J)::J13:FU(J):+G: J13:BY(J)::J13:BB(J)::J13:BS(J):ZGD BA:LO:GA:CE:J13:SR(J)0::IS:HSISGN J15:FF(J)::J13:DF(J)::J13:CF(J):GX J13:EF(J)::J13:OF(J)::OV:HV2OVGb BA$(BA):Hl "HEAT","ORN","OYBEANS",2.80,2.33,6.30,50,85,609Hv 62,100,31,1.5,.334,1.5,7,65,7.25,20000,0,1,70fH 1,1.1,1.03,1,.98,.9,.8,1.1,.82,1,1.1,1H 1,.5,1.1,.6,.25,1.12,2000H"":6,10:5,1H""H7) " HE FARM GAME IS A SIMULATION BASED ON REAL DECISONS MADE"9I7) "BY A FARMER.OU OWN 5 FIELDS EACH TO BE PLANTED WITH WHEAT,CORN,"I7)"OR SOYBEANS.NFLATION EFFECTS THE COST OF EVERYTHING AND THE PRICES"I7)"PAID FOR YOUR CROPS WILL VARY WITH THE CHANGEING MARKET CONDITIONS."#J7)"HE PROGRAM IS DIVIDED INTO 2 PARTS:LANTING TIME AND ARVEST TIME."pJ7)"PPLYING THE RIGHT AMOUNT OF HERBICIDE AND INSECTICIDE ARE CRUCIAL"J7)"IN DETERMINING YOUR CROPS SUCCESS.SUALLY 15-35 UNITS PER ACRE"J7)"GETS THE BEST RESULTS,BUT NOT ALWAYS."8K:7)" F YOU RUN LOW IN MONEY YOU WILL HAVE TO BORROW MONEY TO KEEP"K7)"FARMING.HE BANKERS ARE VERY FRIENDLY IN YOUR TOWN AND CREDIT IS AS "K7)"SIMPLE AS SIGNING YOUR NAME.EEP YOUR LOAN PAYMENTS UP AND MANAGE YOUR "+L7)"FARM PROPERLY YOU WILL PROSPER.UT IF YOU DEFAULT ON YOUR LOAN,WELL..."[L7)" LETS JUST SAY BANKERS HAVE TO EAT TO.nL"": 2940: