Just , G!H >7V!a N>7V!ȯ8P>7V1IG!H![>7V B"24899":"0":ڰ"0":ٰ"0"::("23635"+"256"*"23636"+"5") "OV VH,?6fr!:\DJ"NEL LAWSON HIS DUE...TAX":M="24"'''"THIS YEAR'S BILL IS QUITE LARGE" nYTA=(CURB-CUS)/3:18,Q;"THE TAX BILL IS `";TA:21015:MISC=MISC+TA: 2:6:2::'''"ADVERTS COST ` ";ADCOST;" EACH."'''''"HOW MANY ADS WILL YOU PLACE FOR"''M$(W);" ? (0-5)" "70":Z$>"5"250 CURB"6"3106 @*Z$="1"4000:TAT=TAT-L:300, E)Z$="2"200:TAT=TAT-L:300, J&Z$="3""2E3":TAT=TAT-L:300, O4Z$="4"CCFL"4300":TAT=TAT-L:CCF=L:300, T4Z$="5"CCHL"2800":TAT=TAT-L:CCH=L:300, ^ Z$="0" a'Z$="6""9600":TAT=TAT-L:300, c 300, F6:6:2::';L;"EMERGENCY..EMERGENCY..EMERGENCY." fX=L10 :.3,20:7:.3,16:2:X:ILL>3HI=Q475 '''"YOU HAVE HAD A HEART ATTACK"''''"THIS IS DUE TO THE PRESSURES OF"'"HARD WORKING CONDITIONS."'''"YOU SURVIVED....THIS TIME"'';11 ;"BE CAREFUL":Y:ILL=ILL+L:HI=Q450  ª:'"YOU CLEARLY HAVE A WEAK HEART."''''"DUE TO NHS CUTS, YOUR CHANCES"'"OF SURVIVAL ARE GREATER WITH"'"PRIVATE INSURANCE."''''"THIS COSTS `10000"''"DO YOU WANT IT? Y/N" /60<:Z$="Y"HI=L:MISC=MISC+10000'  ۨQ:Q:7::.4L,Q:.3,Q:.25~,Q:.3,Q:.4L,3:.4L,2:.4L,Q:.4L,L:.4L,Q:.4L,Q:.4L,-L:L,Q '''''"THE HEART ATTACK HAS KILLED YOU."'''''"YOU WERE TOO PRESSURISED."'"I TRUST YOU HAD A GOOD LIFE."'"NEXT TIME- BE MORE CAREFUL":Y:3600 >7:7:3::''"YOU NEED FLASHY ARTWORK" '" WHICH ARTIST WOULD YOU LIKE?"''" 0) ----- NO ARTWORK -----"'" 1) MAD MAGGI.........`250"'" 2) POXY PAUL.........`500"'" 3) COSTLY CHRIS......`750" D$70F:Z$<"0"Z$>"3"580D EJMISC=MISC+250*Z$:M(PN)=M(PN)+2*Z$:.15~,12 :: L:L:7::'''"WHAT PACKAGING DO YOU WANT?"'''"1) NORMAL CASES...FREE"''"2) CARD CASES...10p EACH"''"3) VIDEO-CASES..15p EACH"''"4) PLASTIC CASES..20p EACH" I21,Q;"PRESS A KEY (1 TO 4)":70F:Z$>"4"Z$<"1"1010 6M(PN)=M(PN)+3*(Z$-L):H(PN)=5*(Z$-L): 2:2:6::'"MARKETING HYPE CAN BOOST SALES"'''"There are 2 PR consultants who solve intermediate problems:" 7'''" 1) BRUTE EVEREST..."''" RELIABLE BUT EXPENSIVE" T''" 2) DODGY DAVE..."''" CHEAPER...BUT RELIABLE ??"'''''"PLEASE ENTER 0, 1, OR 2" 2""70":Z$<"0"Z$>"2"13302 F Z$=Q: PZ$=21750 &:''"BRUTE EVEREST CAN OFFER YOU..." X=Q2:.2~L,18:.2~L,14:.2~L,10 :.2~L,14:.2~L,10 :.2~L,14:.3,18:.5,18:X:.6,20:L,24 ,%''"1) A PRESS CONFERENCE.....`2500" 6$'"2) A T.V. INTERVIEW.......`5000" @h'"3) PUBLIC FREEBIES........`7500"''"4) BUY A STAR'S NAME TO PROMOTE YOUR LATEST GAME..........`10000" J%'"5) A NATIONWIDE BUS TOUR..`15000" T)''''"WHICH WOULD YOU LIKE('0'TO PASS)" ^70F:Z$>"5"1630^ h`MARF=MARF+3*Z$:MARCOST=2500 *Z$:Z$="5"MARCOST=15000::MARF=MARF-20 m I4:4:Q::"",," DODGY DAVE CAN HELP YOU BY...",,,"" X=Q2:.05|L,12 :.05|L,8:.5,6:X:.1}L,Q:.1}L,2:.1}L,4:.3,6:.353333,16:.5,18 &''"0) ------------NONE-------------" )'"1) BRIBING A GAME REVIEWER..`500" :'"2) PLACING YOUR GAME IN"'"A GAMES CHART ...`1000" I'"3) SABOTAGING A RIVAL COMPANY'S DUPLICATING EQUIPMENT......`1500" &H'"4) PAYING PIRATES TO CEASE"'"COPYING OF YOUR GAME.......`2000" 0I'"5) CONVINCING A MAJOR PUBLISHER TO SELL YOUR GAME..........`5000" :<21,2;7;"TYPE NUMBER OF DESIRED OPTION" D70F:Z$>"5"1860D IRMARF=MARF+3*Z$:MARCOST=MARCOST+500*Z$:Z$="5"MARCOST=5000 NZ$="1"MARF=MARF+2 m(L:L:7:*5L1920 o*5L1925 q*5L1950 v }3:3:7::''''"DODGY DAVE HAS BEEN ARRESTED-"''''"YOUR POPULARITY FALLS BADLY":Y:MARF=MARF-8:: _:'''''"DODGY DAVE HAS MESSED UP YOUR WORK."''''"YOUR IMAGE DROPS.":Y:MARF=MARF-5: :'''"DAVE TURNS SUPERGRASS & REPORTS YOU TO THE PRESS & POLICE"''''"YOU ARE FINED `5000 & YOUR POPU-LARITY WITH THE PUBLIC PLUNGES":Y:MISC=MISC+"5E3":MARF=MARF-9 : 13:3:7::P(W)=Q2020 ڇ'''"AT THE MOMENT YOU CHARGE `";P(W);'"FOR THIS GAME."''''"DO YOU WISH TO CHANGE THE PRICE OF ";M$(W);"?":60<:Z$="N" '''"YOU CAN NOW SET THE PRICE OF"'"YOUR GAME."''"HIGHER PRICES CAUSE LOWER SALES"''''"YOU CAN CHARGE ANYTHING BETWEEN"'"`0.75 AND `15.00"''"PLEASE ENTER THE PRICE IN PENCE." 380P:R$<75KŰR$>15002042 _P(W)=R$/100d:P(W)Ȱ"14.5":M(W)=M(W)-5:'''''" YOU GREEDY SWINE!":Y: %P(W)<3M(W)=M(W)*1.5@: *Y*3.1}L,12 : f6:6:Q::'''"YOUR FIRM HAS BEEN QUITE"'"SUCCESSFUL, AND HAS BEEN INVITEDTO JOIN B.O.S.H.:"''"the Boring Old Software Houses."'''''"Membership costs `25,000 but"'"sets your s/w house up as one ofthe market leaders."''"WILL YOU ACCEPT ? (Y/N)":61= p Z$="N" uCURB=CURB-"25E3":GOS=L::'''"CONGRATULATIONS AND WELCOME"'''''"YOU WILL BE INFORMED OF BOSH"'"ACTION WHEN IT HAPPENS.":Y: !L:L:7::"2191+(*4)" y'''"BOSH HAVE MADE A PRESS STATEMENTDEPLORING PIRACY."'''"YOUR COMPANY HAD FREE PUBLICITY.":MARF=MARF+2:Y: '''"BOSH HAVE CRITICISED THE NEW"'"BUDGET SOFTWARE HOUSES AS"'"FAST BUCK MERHANTS AND YOUR"'"NAME APPEARS IN THE MAGS.":Y:MARF=MARF-2: '''"BOSH HAS BEEN ATTACKED FOR BEINGAN IDLE, USELESS ORGANISATION"'''"YOU WILL SUFFER FROM THE ADVERSEPUBLICITY":MARF=MARF-5:Y: |'''"INTERNAL LEGAL BATTLES WITHIN"'"BOSH MAKE YOUR FIRM, AMONGST THEOTHERS, A LAUGHING STOCK.":Y:MARF=MARF-5: RS=Q:4:4:7::'''"PLEASE ENTER YOUR OFFER FOR THIS"'"GAME (A ROYALTY, 1-100%)"'''"YOU WILL LOSE THE PROGRAM IF THERATE IS TOO LOW..." +80P:R$100d2500 "ROY=R$:ROY<52600( ROYȰ"20"2525 ,*(ROY+92\-Q(OF))<62600( ݇"63684","11":"63686","80":"63726","43":"63727","80":PN=PN+L:R(PN)=ROY/100d:RS=L::"57052",3:USR="57050" pw=L10 :USR="63670":X=L5:X:USR="63712":W:18,Q;" DEAL SIGNED & SEALED ":Y: Y: (Q:Q:7: 2BX=-6-16-2:.3,X:X:.5,-18 CHCH=S(D):L(L)=D:DPNWI=L oD:X:''T$((*3)+L):X=25:CH=Q:D=LPN+10 :S(D)>CHS(D)PN'" ";X;" ";D$(L(X)-PN);" ":X:2708 .3,6:.4L,10 :.15~,6:.15~,10 :.5,14:NC=NC+L:'" ";X;" ";M$(L(X));" ";"":X NC=PN2715 16,Q;"SEARCHING FOR YOUR TITLES":CG=Q:CC=5:X=S(L(5))Q-45-:D=LPN:S(D)XS(D)CGCG=S(D):X=Q:TN=D D:CC=CC+L:CC>30X=Q AX:CC3016,Q;"";M$(TN);" = No. ";CC;"", 6CC>3016,Q;"NOT IN TOP 30 THIS MONTH", A18,Q;"",,"CHART CREATED BY DODGY DAVE & CO",,:Y: CCK=(*5):CC=Q:L:L:7::'''"YOU CAN HAVE THIS PROGRAM CODED FOR OTHER COMPUTERS"''''"THE PROGRAMMER WILL CONVERT THISTITLE FOR AN OUTRIGHT SUM."''"HOW MUCH WILL YOU PAY?":80P *CON=(*5000):R$CON2900T q:'''"I AM SORRY TO REPORT...":N=L3:.5,Q+N:N:'''"THAT THIS IS FAR TOO LOW":CCQ:'''"YOU NEED MONEY VERY URGENTLY"''''"YOU MUST TRY TO RAISE SOME BY"'"SELLING OFF YOUR GAMES OUTRIGHT.":Y:"3840":3350 CURB<-25000a3500 +CURB>"10E4"GOS=QM>202150f  xCURB<-"25E3"PN>Q:'''"YOU STILL NEED MORE CASH."'''''"YOU MUST SELL OFF MORE PROGRAMS.":Y:3840:3350 mCURB<"-25E3":'''"UNFORTUNATELY YOU HAVEN'T RAISEDENOUGH CASH, AND HAVE NO MORE"'"PROGRAMS.":Y:"35E2" u:''''"WELL DONE!!!"''''"YOU HAVE RAISED SUFFICIENT CASH TO CONTINUE IN BUSINESS."''''" FOR NOW, AT LEAST...":Y: Q:Q::2,-12 '''"OH, DEAR. YOU HAVE A SLIGHT PRO-BLEM. YOU OWE MORE THAN `25000 SO YOU MUST CALL THE RECEIVERS IN"'',"'BYE":X=18-6-2:.25~,X:X:Y:"3600":10 8Q:7:2::2,9 ;"YOUR RATING:" 5CURBQ'''''''" SOFTWARE VIRGIN":3690j @CURBǰ"10E3"''''''"NOT YET A MASTER OF THE CODE":3690j 8<CURBǰ"50E3"''''''" ADDICTIVE MANAGER":3690j B3CURBǰ"10E4"8,15;"ACE":3690j V!'''" NOT QUITE THE ULTIMATE" nY:19,Q;: tB2:2::Q:7:3,Q,,,,:"8020":2 6X=L6:Z=L8:.02{# =,Z+10 :Z:X 10 ,Q;,,"YOUR RATING:"''6;,," BEYOND THE GOLDEN FIREBIRD",,,:Y:19,Q;:Q:Q::10  DR=QDR=L Z=L3:Y(Z)=(*(4*Z*K(DR)*(9 -B(DR)))):Z:L:L:7::'''"THE FOLLOWING FIRMS WISH TO BUY"''M$(DR);" FROM YOU:"''''"1) DISINCENTIVE....`";Y(L)''"2) OVER THE EDGE...`";Y(2)''"3) CHEAP'N'AWFUL...`";Y(3)''''" PLEASE PRESS 1-3" %70F:Z$>"3"Z$<"1"3845  Y:"3990":CURB=CURB+Y(Z$) : <PN=Q >@:''"YOU NOW SELL THESE GAMES:":Z=LPN:Z;" ";M$(Z);"":Z F/''''"WHICH WOULD YOU LIKE TO DROP?":70F KZ$>PN3910F L Z$="0" QDR=Z$:3840: /PN=LT(L)=Q:P(L)=Q:M(L)=Q:B(PN)=Q:PN=Q: X=DR+LPN:U(X-L)=U(X):T(X-L)=T(X):D(X-L)=D(X):B(X-L)=B(X):C(X-L)=C(X):K(X-L)=K(X):A(X-L)=A(X):R(X-L)=R(X):T(X-L)=T(X):X(X-L)=X(X):P(X-L)=P(X):M(X-L)=M(X):M$(X-L)=M$(X):S(X-L)=S(X):X:P(PN)=Q:M(PN)=Q:T(PN)=Q:B(PN)=Q:PN=PN-1: 5:5:Q::"57052",l:usr="57050":17,q;"YOU CAN DUPLICATE SOME TAPES"'"YOU ALREADY HAVE ";T(W);" COPIES OF"'M$(W)'"HOW MANY MORE DO YOU WANT?"',"(0-30000)" )80P:R$"30E3"4040 R$=QX(W)=Q: ҃X(W)=R$:T(W)=T(W)+X(W):C(W)=60<+SUP+H(W):17,Q;,,,," OK- BEING COPIED NOW ",,,,:L,8:Y: SL=L4120 )6:6:Q::usr=63663  L,q;"YOU HAVE PROBABLY SUFFERED FROM PIRACY OVER RECENT MONTHS."'"NOW YOU CAN TRY TO REDUCE THIS.";18,Q;"DO YOU WISH TO JOIN SLOW? (`7500":60<:Z$="N" SL=L:MISC=MISC+7500L::'''"WELCOME."''"Your cash will be used to fund"'"research into ANTI COPYING dev- ices." Z''"DO YOU WISH TO USE THE LATEST"'"DEVICE ON YOUR TAPES NOW?":60<:Z$="N"IMP=Q: ":'''"The cost will be added to your tape duplicating costs."'''"You should now see a reduction in piracy of your tapes.":Y:imp=l: :FIL'''"WOE TO YOU!!"''''"YOUR STORE-ROOM HAS BEEN BURNT DOWN AND ALL YOUR STOCKS OF"'"TAPES LOST OR STOLEN."'''"YOU MUST BUILD UP NEW STOCKS"'"NEXT MONTH.":FI=L:X=LPN:T(X)=Q:X:Y: '''"THERE HAS BEEN A ROBBERY AT YOUROFFICES."'''''"ALTHOUGH NOTHING WAS STOLEN,"'"`5000 OF DAMAGE WAS DONE."''"YOU MUST REPAIR IT.":MISC=MISC+"5E3":Y: ̸2:2:6::''"YOU CAN IMPROVE THIS TITLE BY PAYING A PROGRAMMER TO REVAMP IT"''''" 1) STONY CROW"''" 2) EUGENE"''" 3) SANDY MIGHT"''''"PLEASE SELECT 0 TO 3" "70F:Z$>"3"Z$<"0""4305" ցMISC=MISC+500*Z$:N=L3:.4L,3*N:N:K(W)=K(W)*1.15333:'''" GAME BEING REVAMPED NOW! ":Y: 6:6:L::L;2,," SALES THIS MONTH:-",,,5,15;"MONTH";5,25;"THIS ";6,15;"TOTAL";6,25;"ORDER":X=LPN:7+X*2,L;M$(X):X PW=LPN:S(W)=(((M(W)/2+MARF/PN+C-(P(W)/25))*K(W))*W(MON)*D(B(W))) 6P(W)<4S(W)=(S(W)*(*K(W)/5)*.9ffff) ?PJ=QPIRP=QM>6ƥ*FLS(W)=(S(W)*.6):PIRCH=L S(W)>T(W)S(W)=T(W) S(W)T(W)I(W)=T(W) ƴ7+W*2,15;I(W);7+W*2,25;" ";7+W*2,25;(S(W)*F(X)):L+(*25):W:X:W=LPN:S(W)=I(W):I(W)=Q:T(W)=T(W)-S(W):W MPIRCH=L20,Q;L;" PIRACY GREATLY REDUCED SALES ":PIRCH=Q jADC=Q:ROYCO=Q:W=1PN:ADC=ADC+ADCOST*A(W):ROYCO=ROYCO+P(W)*R(W)*S(W)*.65&fff:W:ROYCO=ROYCO _TDC=Q:W=LPN:TDC=TDC+(C(W)*X(W)/100d):W:OVERH="((40*M/2)+(PN*1500)+2500+fc)":Y  M<"7"OVERH=(OVERH/2) 7TOCOST=MISC+TDC+OVERH+ROYCO+ADC+MARCOST:2700 : $ Y:"4520" 5:5:L::'''"CHOOSING A NAME IS A VERY IMPOR-TANT PART OF STARTING ANY FIRM"''"ENTER THE NAME OF YOUR SOFTWARE HOUSE":90Z:N$=R$ DPOSNA=((32 -N$)/2)-L:POSNA31POSNA=Q  |1WI=Q:PJ=Q:FACHECK=LRANCH=QBEN=Q5800 NF=4:3:3:7:Q::IMP=LSUP=SUP+9 :F=6 !SAX75KSAX=SAX+1.5@  M>8MARCH=MARCH+9 ,MARF>10 MARF=MARF-MARCH:5519 -MARF=4:M>18DIF=DIF+.25~ 2W=LPN:M(W)=M(W)/DIF:B(W)<9 B(W)=B(W)+L :W:FACHECK=Q:RANCH=Q:C>20M>8C=C-4 5:M=Q'"YOU HAVE SURVIVED THIS MONTH.":5543 "'"YOU HAVE LASTED ANOTHER MONTH" bX=Q4:Z=12 242:.05|L,Z:Z:X:CURBL7000X Y*2>L'''"NO NEWS OF ";N$'"THIS MONTH."''"TRY NEXT MONTH'S AD-PACKED ISSUE":Y: ] '''" DISASTER STRIKES SOFTWARE HOUSE"'POSNA;N$'''" FOR MORE DETAILS SEE INSIDE...":Y s7:7:Q::"",," HCGNW PAGE 2",,,"":FACHECK=QX=(*6.9\):62008+502*X 9X=Q3:Z=-6-16-L:.05|L,Z:Z:X =''''"YOU TOOK A STALL AT A MICRO FAIR, WITH THESE RESULTS:" 'X=(*3):X=36110 X=26110 X=L6100 *'"YOUR LATEST PROGRAMWENT DOWN BADLY" '"YOUR NEW RELEASE FLOPPED" L'"YOUR STALL COLLAPSED, HURTING 2 PEOPLE; YOU MUST PAY `1000 IN DAMAGES" +MISC=MISC+"1E3":MARF=MARF-15:Y: 8'''"This week has seen a fire at theoffices of ";n$''"Repairs cost `5000"''"Furthermore, its duplicating company has gone bust so costs will rise." B$MISC=MISC+"5E3":TACHECK=L:Y:: j'''"The offices of"'N$'"were burgled this week."'"All the hardware was smashed- replacements will cost `2000"'''"It is rumoured that the burglarsdid not like the games: they were returned hours later."'''" THIS REDUCES YOUR POPULARITY " t,MARF=MARF-5:MISC=MISC+"2E3":Y:: ''"The latest game from"'N$'"is the worst ever seen at HCGNW"''''"And bad news for advertisers:"''" ADVERTISING COSTS HAVE RISEN " 2ADCOST=ADCOST+90Z:MARF=MARF-8:Y:: ~'''N$'"are said to have severe staff problems currently"''"& can only do 2 tasks per title this month":TAS=2:Y:: '''"A small distributor has gone to the wall this month-",N$'"are the prime losers."'"They lost `3500 in bad debts":misc=misc+"3500":Y:: 2q''''"Leading software house POND haveslashed their prices"''"other firms' sales fall":marf=marf/4:Y:: dx'''posna;n$''"Have moved into new office spacein Yuppie Covent Garden. Their overheads will rise":fc="2500":Y:: vS'''" GOOD NEWS FOR SOFTWARE HOUSE"'POSNA;N$'''"PRESS ANY KEY TO FIND OUT MORE" U21026::" HCGNW PAGE 2 ",:FACHECK=LRANCH=QBEN=L:7210* !X=(*7):X=Q7050 (7250R+X*502) *'''"THE COMPUTER FAIR PROVED A HUGE SUCCES}:PS. IT RAISED YOUR PUBLIC IMAGE TREMENDOUSLY":FACHECK=Q:MARF=MARF+35#:Y:: z'''"Leading mag CRUSH has printed anarticle about"'N$'"which boosts their popularity":marf=marf+12 :Y:: :'''"AT LAST! WHAT EVERY SOFTWARE HOUSE DREAMS OF!..." x''''"International Distributor SNIDERhas signed one of your titles"''''"THIS WILL BOOST SALES":MARF=MARF+9 :Y: cQ:Q:2:L::''''"THE CHANCES OF GOOD SOFTWARE";7,9 ;"COMING FROM"'''POSNA;N$ .25~,8:.25~,10 :.25~,12 :.25~,8:.25~,10 :.25~,12 :.25~,8:.25~,10 :.25~,12 :.25~,8:.73333,10 ''"ARE A MILLION TO ONE, THEY SAID":.2~L,10 :.2~L,12 :.2~L,13 :.2~L,12 :.1}L,10 :.8L,10 p5:''"BUT STILL IT COMES...":.4L,14:.4L,13 :.4L,14:.8L,11 -L;7;'"GOOD REVIEWS IN THE PRESS !!" /2:Q:Y:Q::MARF=MARF+14:Q:: '''"The hit TV show KIDS RUN RIOT isto feature software from"'N$'"next week;sales are expected to leap up":marf=marf*2:Y:: L'''"This issue contains POKEs & mapsfor all titles of new wave firm ";N$'"which will boost their sales":marf=marf*1.5@:Y:: ~'''"Leading City financier Richard Bronson has expanded by buying an equity stake in"'posna;n$'"from its entrepeneur boss"'''"This boosts their reputation":marf=marf+6:Y: M<12 *5>L eQ:Q:7::W=816:Q;7;W,10 ;" ":W:usr=63663 lL,Q;"AN ANONYMOUS PHONE CALL INFORMS YOU THAT A FIRM IS SELLING"'"PIRATE COPIES OF YOUR SOFTWARE" U19,Q;"WILL YOU TAKE LEGAL ACTION?":60<:19,Q;::Z$="N" PICH=Q:5:5:Q::'''"",,"LEGAL CHARGES ARE: `2400 PER DAY",,"":''"EVERY DAY YOU PRESS YOUR CASE":'"ALSO COSTS YOU `100 IN LOST WORK" (X''"BUT YOU NEED TO STAMP OUT PIRACY":'''"PRESS ANY KEY TO ATTACK PIRATES":21026 .BPICH=PICH+L::''''''';"";L,," COURT IN SESSION NOW ",,, 2X=Q18:.075},X:.05|L,X-L:X:X=18-12 -L:.075},X:.05|L,X-L:X:X=-12 Q:.075},X:.05|L,X-L:X::*4<27800x F[''''"CONGRATULATIONS!!"''"YOU HAVE WON THE CASE!"''''"THIS WILL INCREASE YOUR SALES":Y ZIPJ=L:MISC=MISC+PICH*2500 :MARF=MARF+10 :.2~L,8: 3:3:7::''''"UNFORTUNATELY YOU HAVE NOT YET"''"CONVINCED A COMPUTER ILLITERATE"''"JUDGE THAT THE PIRATES ARE WRONG" '"",," SO FAR TOTAL COSTS ARE `";PICH*2500 ,,,""''''"DO YOU WANT TO FIGHT ON (Y/N)?":60<:Z$="N".2~L,8: &Z$="Y".2~L,8:7660 JY=21015:TAS=3:q=0:l=1:236066\,42*:236077\,218:Q:Q:7::"8020":"8021" Tr23675{\,92\:23676|\,218:3,10 ;" ";4,10 ;" ": U L;2;6;L,6;"";6,6;"";3,6;"";3,25;"";2,6;"";4,6;"";2,25;"";4,25;"";5,25;"";5,6;"" h320,Q;L;" PRESS ANY KEY TO START GAME " w8085:N=Q39' "":11 N=208080 N=34"8087 A,B:A,B:N:"8055" .2~L,4,.1}L,8,.2~L,11 ,.2~L,4,.1}L,8,.2~L,11 ,.2~L,10 ,.1}L,9 ,.2~L,10 ,.2~L,14,.4L,4 .2~L,4,.1}L,8,.2~L,11 ,.2~L,4,.1}L,8,.2~L,11 ,.2~L,10 ,.1}L,9 ,.8L,10 i.2~L,10 ,.1}L,8,.2~L,7,.15~,4,.1}L,3,.4L,4 !4J5:5:L::PN=L'''"YOU NOW PRODUCE 1 PROGRAM.":85048! !5}PN=Q'''"YOU DO NOT SELL ANY PROGRAMS"'''"SO THE NEXT THING TO DO IS FIND"'"ONE YOU CAN MARKET.":21015::8520H! !6''''"YOU NOW PRODUCE ";PN;" PROGRAMS." !8>''"DO YOU WISH TO RELEASE ANOTHER?":60<:Z$="N"PN>Q !9Z$"N"8510>! !:L,-12 :CURB=CURB-750:CURB-15000::'''''"YOU MUST TRY AGAIN UNTIL YOU"'"HAVE A GAME TO SELL."'''"THIS MONTH COSTS HAVE BEEN `750";:Y:"8500" !;Q:Q:7::'''''"ANOTHER ONE BITES THE DUST."''"THIS ONE DIDN'T EVEN TAKE OFF!!"'''"SORRY, YOUR MONEY'S RUN OUT.":Y:"8E3" !>l:PN=6CURB<"-10E3"PNL'''"IT IS FINANCIALLY UNWISE FOR YOUTO RELEASE ANOTHER PROGRAM NOW.":Y: !HQI1=(*6):I2=(*6):I3=(*6):(I1=QI2=QI3=Q)8520H! !MP:'''"YOU HAVE BEEN SENT THESE GAMES-"''"1- ";G$(I1)'"2- ";G$(I2)'"3- ";G$(I3) !RZ=13:Q(Z)=(*90Z)+L:Z:''''"THEIR CHANCES OF SUCCESS ARE:"''"1- ";Q(1);" %"'"2- ";Q(2);" %"'"3- ";Q(3);" %":''"WHICH,IF ANY, WILL YOU ACCEPT?" !\70F:Z$>"3"8540\! !`Z$="0"PN=Q8506:! !a Z$="0" !f8OF=Z$::'''''''"NOW YOU CAN BID FOR IT.":Y:"2400" !pRS=QPN=Q8506:! !uRS=Q !v:'''"PLEASE ENTER NOMEN LUDI"''" (THE NAME OF THE GAME) "'''''" (UP TO 10 CHARACTERS)":90Z:R$>10 "8566" !zIM$(PN)=R$:B(PN)=L:K(PN)=Q(OF)/3:RET=Q:1000:500: " "^3:3:7::Q=0:L=1:12 ,Q;" PLEASE WAIT":NP=L "-X=Q38&:.01z# =,X:.01z# =,X-L:X "jSUP=Q:ILL=Q:23692\,255:PRICE=Q:23658j\,8:236099\,100d:MARF=Q:MISC=Q #nQ:Q:Q:MONTH=Q:ADCOST=250:MARCOST=Q:A$="":ROY=20:RNDO=Q:RNDT=Q:ROYCO=Q:OVERH=Q:MISC=Q #( TAT=3:F=Q:FI=Q:SL=Q:IMP=Q:CUS=Q:GOS=Q:DIF=1.5@:Y(3):PJ=Q:H(6):HI=Q:M$(6,10 ):DR=Q:D(9 ):B(6):PIRP=Q:PIRCH=Q:NC=Q:T$(3,18):RET=Q:L(5):D$(10 ,10 ):X(6):C(6):S(16):T(6):RS=Q:R(6):K(6):A(6):P=1:PN=Q:G$(5,10 ):Q(3):M(6):P(6):G$(L)="ADVENTURE":G$(2)="ARCADE":G$(3)="STRATEGY":G$(4)="SIMULATION":G$(5)="UTILITY" #- MON=L:C=40(:T$(L)="SORRY FOR THE WAIT":T$(2)="DON'T BE IMPATIENT":T$(3)="NEARLY READY, NOW":9005-#:X=L10 :D$(X):X:"J IMAGINE","BOOBARIAN","BED PAN","TAI PIN","SWIZBALL","STAREARNER","WIMPSTARS","EXOLENT","NINJA ANTS","SCRIBBLE" #dfc=q:9060d#:X=L9 :Z$:D(X)=Z$:X:".75",".9","1.3","L","L",".8",".6",".4",".01":CM=L:TN=Q:BEN=Q:M=Q:TACHECK=Q:SAX=15:SUP=Q:TACOST=60<:CURB=2500 #I(6):E$(4,11 ):F(4):WI=Q:U(19):FACHECK=Q:RANCH=Q:MARCH=Q:w(12 ):x=l12 :z$:w(x)=(z$):x:"1.4","l","1.3","l",".8",".7",".5",".4","l","1.3","2","2.5" #F(L)=".25":F(2)=".25":F(3)=".2":F(4)=".1":E$(L)="OUTERSOFT":E$(2)="THUNDER...":E$(3)="MACRODEALER":E$(4)="GARYS GAMES" # 9500% $"5:4:Q::"57052",2:usr="57050":17,Q;"THERE IS A MICRO FAIR THIS MONTH"'"IT COSTS ` 2000 TO HIRE A STAND.";20,Q;"WILL YOU HIRE A STAND?" $'60<:Z$="Y""9260" $* $,sZ$="Y"16,Q;,,,,"YOU WILL FIND OUT HOW IT WENT LATER THIS MONTH.",,,:Y:FACHECK=L:.1}L,12 : %aF$(12 ,3):9505!%:X=L12 :F$(X):X:.4L,8:.4L,12 : %!I"JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC" % 2:2:7::''"TO MAXIMISE SALES YOU NEED TO WINE & DINE YOUR DISTRIBUTOR"'"REGULARLY. THIS COSTS `500"''"WHICH DO YOU WISH TO VISIT NOW?"'''" 1 ";E$(L)''" 2 ";E$(2)''" 3 ";E$(3)''" 4 ";E$(4)'''"PLEASE PRESS 0 TO 4 TO CHOOSE" %70F:Z$>"4""9610" % Z$="0" %n.5,16:F(Z$)=F(Z$)+.03{u\:F(L)+F(2)+F(3)+F(4)>LF(Z$)=F(Z$)-.03{u\ %.5,16:F(Z$)=F(Z$)+.03{u\:MISC=MISC+500:16,Q;"",,,,"DISTRIBUTOR TAKES YOUR POINT",,,"":Y: S y5aql'wa~Lb0:0: : |8|8|8Mdm3|8M3|8M33ף ص:[v->|<~~ llmmmmmmlll|99?33x@@@llllllll>X>|0f8l8vv0 000 0 0f<f<0 0`0 ~~`0 0`fff~fff~~ xflxlf```bf8ll8ff|``8lvff|lfff>|`lvff8<ff<`flxl8<lfffffff<ll8lfff>|~L2~pppv8DD8 |;;33R*~=(^#V@##~< ~w#~< ~w#~w~86~8686~ 6#~@WOF  |8|8\|8 P P  P  |8M|8 s,{\>v>|<~~ llmmmmmmlll|99?33x@@@llllllll>X>|0f8l8vv0 000 0 0f<f<0 0`0 ~~`0 0`fff~fff~~ xflxlf```bf8ll8ff|``8lvff|lfff>|`lvff8<ff<`flxl8<lfffffff<ll8lfff>|~L2~pppv8DD8 |;;33R*~=(^#V@##~< ~w#~< ~w#~w~86~8686~ 6#~@WOF  FF( CzW{ _zWQ>XWFK x 66V( y(~# ~G#~O#^ "" B@  $ ~~ UU @  UUBUU   UU UUUUUUUU_UWUUWUUWUU_ U U U U  U U U U U U U U U U U UW U UU U U U                               {  J_ AK ]u z ]u  ]u ]u Q<<|f<~fff<`ffqqq`f|>qqqff`qqq<<`<   P(&@} P(r@E P(r@E P(& P( P(a<<|fesf 0`0 !HHF~#~#~#~#~#~#~#~# x 9Z y ! >Bw#>w!> w#>Hw!:> w!G>w!N>w ! >w#>w!> w#>Pw!:> w!G>w!N>w [ͅ! >w#>w!> wP>Hw!:> w!G>w!N>w ! >w#>w!>+P#>Hw!:> w!G>w!N>w !~ Ͷ00000IIIIIIIIIIIIII? @!!!1>~o{ ?/? Ņ???? @@6d@H?| 0`C|<q"$@ @@< (,(8(6 0p*/` 0 ),6"$:2.@ @ 0 88 "`@B@Rb !!!B@@`0 4(4*0_ ,(!c  ` xn|9?8!@   $ƌ6dx~@|@@~~@|@@@>BB<DHpHDB@@@@@~BfZBBBBbRJFB12ƥ*82"400 #BW=LPN:TAT=TAS:CCH=Q:CCF=Q:300,:W:TAS=3:"6E3" $M>"20"ƥ*"5"L4100 %GOS=QM>"24""2150" &71300:7600:GOS=Lƥ*523M/12=(M/12)"100d +$M>25ƥ*5L4250 -.4500:3000 :5500|:30 2""502 3Z$=:Z$=""513 4.04|# =,12 : <#Q;Q,Q;"PLEASE PRESS Y OR N" =%502:Z$="Y"Z$="N"65A: > 60< A"": F#502:Z$<"0"Z$>"9"70F G PR$="" Q#Q;L,Q;R$;"C " R(502:Z$=13 ƱR$65A: S+Z$=12 ƱR$R$=R$(̱R$-L):81Q T%R$>6Z$<"0"Z$>"9"82R UR$=R$+Z$:81Q ZR$="" [#Q;L,Q;"";R$;"C " \(502:Z$=13 ƱR$65A: ]+Z$=12 ƱR$R$=R$(̱R$-L):91[ ^1R$>26((Z$<"A"Z$>"Z")Z$" ")92\ _R$=R$+Z$:91[ dQ:Q:7::'''"THE TIME HAS NOW COME FOR YOU TOPAY NIGD