THE RAT Y Y[ U0:0:0::"":1:1:14,0;:1:"" the RAT @??#?  @ 0 < ??????????????????????????????????????????????/_?????????oO??????????G@?'??C???????G ???a@ P"???????~?' ?   0???????8߀  ÃÌ ?   0#    # S` | `G ` < }???  >|??   ? ?A3?}??6p9 <??;? ǟ0?`s ?? 0?`?Ϙ? 0x??x?????????????0px10<???0/<10?OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOHHHHHHHHHHOOOHOOOOOOOOOOOOOOKOOKNNLLLLLOOHOOOHOOOOOOOLLLLLNNKOOONLLLLLLLNNNNNHNNNNNNLLLLLLOOKOOKLLLLLLLLNNNNNHOOOOOOLLLLLLLOKOOOLLLLLLNNNNNNNNNNNNNNNNLLLLLOOOONNNNNNNNNNNNNNNNNNNNNNNOOKKKKKOONNNNNNNNIOOOOOOOOOOOMKKKKKKKKKKOHHHHHHHHHHHHHHHHHHHHIyyyyyyyKKKOOOOOOOOOOOOOOOMOOOOMyyyyyyyyKKKMKMMMMMMMMMMMMMMMMOOMyyyyyyyyKKKMMMMMMMMMMMMMMMMMMMMMyyyyyyyyKKKMKMMMMMMMMMMMMMMMMMMMyyyyyyyyKKJMKMMMMMMMMMMMMMMMMMMMyyyyyyyyKJVMKKKMMMMMMMMKMMMMMMMMyyyyyyyyJVtMKKKKKKMMKNNMMMMMMMMNyyyyyyyJVteMMMMMMMMMMMMMMMNNNNNNyyyyyyJVteiyZ d 101e d)"14",ç;ܰ"1";:"":64549%:"" e+ç:236066\,"38":236077\,"251" ."23658","8":BORD="1":PAP="1":INK="7" MRATH="8":RATM="3":RATE="4":RATV="3":RATI="8":RATC="5":RATT="3" MRUSH="3":RUSM="8":RUSE="6":RUSV="9":RUSI="6":RUSC="8":RUST="7" MMCDH="9":MCDM="5":MCDE="5":MCDV="2":MCDI="9":MCDC="4":MCDT="8" NTROH="2":TROM="9":TROE="4":TROV="3":TROI="5":TROC="8":TROT="10" OZAXH="10":ZAXM="7":ZAXE="8":ZAXV="5":ZAXI="10":ZAXC="7":ZAXT="1" $MSIDH="8":SIDM="9":SIDE="4":SIDV="8":SIDI="4":SIDC="5":SIDT="3" .MANTH="7":ANTM="8":ANTE="3":ANTV="3":ANTI="3":ANTC="5":ANTT="4" 8MFREH="8":FREM="9":FREE="7":FREV="7":FREI="7":FREC="8":FRET="3" L=G("50","9"):F="1"̰"50":N="1"̰"9":G(F,N)="0":N:F V9"1120":G$("50","29"):F="1"̰"50":Q$:G$(F)=Q$:F `"BACK TO THE FUTURE","BALLBLAZER","BATMAN","CYBERUN","GREEN BERET","HOCUS FOCUS","MAX HEADROOM","PING PONG","SAM FOX STRIP POKER","SAI COMBAT","STARSTRIKE II","TURBO ESPRIT" j"WAY OF THE TIGER","WHO DARES WINS II","SPINDIZZY","KNIGHT TYME","SPIKY HAROLD","REDHAWK","ALIEN HIGHWAY","KIREL","V","CORE","RASPUTIN","SUPERBOWL" t"BIGGLES","DYNAMITE DAN II","MOVIE","BOMBJACK","GHOSTS AND GOBLINS","PAPERBOY","HEAVY ON THE MAGICK","DESERT RATS","LEGEND OF THE AMAZON WOMEN","BOUNCES","MUGSY'S REVENGE","QUAZATRON" ~"THE YOUNG ONES","TANTALUS","FRIDAY THE 13TH","BOUNDER","PENTAGRAM","THE COMET GAME","SKYFOX","WINTER GAMES","SWEEVO'S WORLD","ENIGMA FORCE","BOBBY BEARING","ESCAPE FROM COLDITZ !","YOUR ATTENTION PLEASE","YOMP" *"1170":F="1"̰"50":N:G(F,"9")=N:F -"12","18","23","22","22","18","21","21","17","17","24","20","20","14","22","21","18","19","20","20","18","17","17","14","18","18","19","19","21","21","20","20","17","16","16","23","16","19","12","18","20","16","17","19","19","15","21","22","24","28" GEND=ç:WG="0":JOB="0":PRI="1":NEWTECH="0":CRIME="0":JMC="0":NICE="3":FIT="30":CLS=JMC:POCKET=:CATCH=PRI:POP="100":GRASS=0.1}L:WEND=JMC:OF=JMC:NAME=PRI:PINS=JMC:B$="NO":CATCH=JMC:AVOID=JMC:COPIER="16":BIRTHDAY=JMC:CAUGHT=JMC:DAYS=JMC:OVERDRAFT=JMC:ACCOUNT=JMC:INTRATE="8":O("50"):F="1"̰"50":O(F)=JMC:F:CASH="10":INTEREST=JMC:WEEK=PRI:BANKBAL=JMC:GAMES=PRI !W$="WALKING ALONG THE STREET, "  S("50") F="1"̰"50":S(F)=JMC:F -F=(*"50")+"1":G(F,"9")>"18""1210"  O(F)=PRI &N="1"̰"5":S((*"45")+"1")="1" N *******MAIN LOOP******* WEND="1""3000" aCOL=ç:INCO=(*5)+2:COL:COL:INCO:INCO=5COL=1INCO=9 :INCO ?:NICK=ç:WAIT=ç:OF=ç:WEEK42*BIRTHDAY=ç"4090" CASH=(CASH*"100")/"100" QDAYS=DAYS+"1":DAYS="7"DAYS=ç:WEEK=WEEK+"1":CASH=CASH+POCKET:WEND="1" 9WEEK/"5"=(WEEK/"5")(DAYS=DAYS="4")INTEREST=ç ׌INTEREST=çWEEK/"4"=(WEEK/"4")BANKBAL>çBANKBAL=BANKBAL+(BANKBAL*(INTRATE/"100")):BANKBAL=(BANKBAL*"100")/"100":INTEREST="1" ؛INTEREST=çWEEK/"4"=(WEEK/"4")OVERDRAFT>çOVERDRAFT=OVERDRAFT+((OVERDRAFT/INTRATE)*1.5@):OVERDRAFT=(OVERDRAFT*"100")/"100":INTEREST="1" FITç"4140" POPç"4160" WEEKȰ"53""6900" WEEKȰ"50""6500" <.1}L"4000" 1:7:ݰ"1":"8","26";"";"9","23";"";"10","25";"";"11","24";"";"12","25";"";"13","24";"";"14","26";"":ç:ç,ç; $"======== T H E R A T =========" : $"=========== OPTIONS ============" INCO: :"1...BUY GAME"  :"2...GO TO BANK" :"3...READ OFFERS"  :"4...COMMUNICATE" *:"5...SPECIAL OPTIONS" 4:"6...STEAL GAME" >:"7...SPOIL GAME + RETURN" H<0:7:"6090":INCO:CLS="1"CLS=ç:"2000" MI$=:I$="""2120" R$(I$<"1"I$>"7")I$"S"2120H S>WAIT=ç:.1}L,"6":CHA=(*"7")+"1":CHA:CHA:ٰ"9": TI$="S"7000X -I=I$:I=I+"2":I=I*"100":(2000+I)  6405 ::" BUY GAME --------" 9:" OPTIONS -------" I::"1...BUY GAME FROM HOME SUPPLIER"::"2...TRAVEL TO DIFFERENT TOWN" $6090:="1"2350. )="2"2370B , 2340$ .:" BUY GAME FROM HOME SUPPLIER ---------------------------"::" THIS WEEK'S BEST OFFERS -----------------------" /&RAND="45":R="4":"2352":"2361" 0P("7"):Q("7"):N=(*R)+"1":F="1"N:Q(F)=(*(RAND-20))+"21"::F;"...";G$(Q(F),̰"28"):" `";:P(F)=(G(Q(F),"9")*"1500"/"28")/"100":P(F):F 2A"21",ç;"DO YOU WISH TO BUY ONE OF THESE?":="N"2000 3="Y"23608 4 23542 8<21,0;"WHICH ONE ? (1-";N;") ": 9"2362"+("4"-N) :="4"I$="4":2367? ;="3"I$="3":2367? <="2"I$="2":2367? =="1"I$="1":2367? > 23619 ?YCASH"4"2371C D="1"2380L E="2"2382N F="3"2384P G="4"2386R I 2371C L]CASH<1.30&fff"21",ç;"TOO EXPENSIVE ! ":F="1"̰"100":F:2000 M}RAND="48":CASH=CASH-1.30&fff:R="6"::" DULLSVILLE ----------":23520 :2389U N]CASH<1.75`"21",ç;"TOO EXPENSIVE ! ":F="1"̰"100":F:2000 O|RAND="49":CASH=CASH-1.75`:R="7"::" SLUMLANDS ---------":23520 :2389U P]CASH<0.85Y"21",ç;"TOO EXPENSIVE ! ":F="1"̰"100":F:2000 Q}RAND="46":CASH=CASH-0.85Y:R="3"::" NEW NIRVANA -----------":23520 :2389U R]CASH<0.95s333"21",ç;"TOO EXPENSIVE ! ":F="1"̰"100":F:2000 S~RAND="47":CASH=CASH-0.95s333:R="4"::" NOWHERE CITY ------------":23520 :2389U U"2390"+("7"-N) V="7"I$="7":2398^ W="6"I$="6":2398^ X="5"I$="5":2398^ Y="4"I$="4":2398^ Z="3"I$="3":2398^ [="2"I$="2":2398^ \="1"I$="1":2398^ ] 2389U ^YCASH"3"2420t uS="1"ACCOUNT="1":"YOU ALREADY HAVE AN ACCOUNT":F="1"̰"100":F:2000 v"1"2440 yF="1"ACCOUNT=çACCOUNT="1"::" OPEN A BANK ACCOUNT -------------------":::"INTEREST IS PAID OR DEDUCTED ON THE FIRST DAY OF EVERY MONTH. DEPOSITS ACCEPTED IN INCREMENTS OF ONE POUND ONLY. MINIMUM OPENING BALANCE IS `5. OVERDRAFTS AVAILABLE AT 1.5 TIMES THE NORMAL INTEREST RATE." ~y:"12",ç;"HOW MUCH DO YOU WISH TO OPEN YOUR ACCOUNT WITH ?":I$:I$ɺI$ŰI$<0ŰI$<"5"I$=""2430~ I$="0"2000 6ACCOUNT="1":CASH=CASH-I$:BANKBAL=I$:2000 ="3"2450 IACCOUNT=ç:"YOU DON'T HAVE AN ACCOUNT":F="1"̰"100":F:2000 D"HOW MUCH DO YOU WANT TO DEPOSIT?";I$:I$=""I$>CASH2442 #I$=""űI$>"3"ŰI$<ç2442 !I=I$:OVERDRAFTç2447 =OVERDRAFT>IOVERDRAFT=OVERDRAFT-I:CASH=CASH-I:2000 <BANKBAL=I-OVERDRAFT:OVERDRAFT=ç:CASH=CASH-I:2000 ,BANKBAL=BANKBAL+I:CASH=CASH-I:2000 IACCOUNT=ç:"YOU DON'T HAVE AN ACCOUNT":F="1"̰"100":F:2000 7"HOW MUCH TO WITHDRAW ?";I$:I$>BANKBAL2460 0BANKBAL=BANKBAL-I$:CASH=CASH+I$:2000 :"DO YOU WISH AN OVERDRAFT ?" =""("Y"Ʀ"N")2462 ="N"2000 ="Y"2468 2000 NI$-BANKBAL>"100":"MAXIMUM OVERDRAFT `100":F="1"̰"100":F:2000 GOVERDRAFT=I$-BANKBAL:BANKBAL=BANKBAL-I$:CASH=CASH+I$:2000 6405 6OF="1":NAME=(*"15")+"1":NAME>"8"2509 6150:2510 }:" READ OFFERS -----------"::" THERE ARE NO OFFERS TODAY ":F="1"̰"60":F:2000 cN=(*"49")+"1":N$="TROTTER"G(N,"9")<("20"-("10"*(PRI=ç))+("20"*(PRI="2")))2510 S(N)=ç2510 i:" READ OFFERS":" -----------"::N$;" OFFERS YOU A NEW GAME"::N;".";G$(N,̰"29") :"DO YOU WANT IT ?" =""("Y"Ʀ"N")2515 ;="N":"SUIT YOURSELF...":F="1"̰"100":F:2000 o"20",ç;:"WHAT DO YOU OFFER ? (ENTER NO.)";I$:I$="0"I$="":"NO DEAL !":F="1"̰"100":F:2000 I$>"2"2517 ׁO(I$)=ç:"21",ç;"YOU HAVEN'T GOT THAT ONE !":F="1"̰"100":F:"21",ç;" ":2517 YG(I$,"9")>COPIER"21",ç;"YOU CAN'T COPY THAT ONE !":F="1"̰"100":F:2517 VS(I$)="1""21","0";"I'VE ALREADY GOT THAT ONE !":F="1"̰"100":F:2517 ^POP<"50"ƥ<(("100"-POP)/"10")"21",ç;"GET LOST, WORM !":F="1"̰"100":F:2000 iN$="TROTTER"G(I$,"9")<"20""21",ç;"I DON'T WANT JUNK LIKE THAT !":F="1"̰"100":F:2517 SG(N,"9")-G(I$,"9")>"4""21",ç;"NO THANKS !":F="1"̰"100":F:2517 I"5"26124 6I$= 8I$<"5"2630F :!NAME=(*"8")+"1":6150 ;(F=(*"48")+"1":S(F)=ç2619; N="1"̰"100":N::"YOU ACCEPT IT GRATEFULLY AND TELL HIM TO GET LOST...":GAMES=GAMES+"1":POP=POP-(G(F,"9")):N="1"̰"100":N ?O(F)çGAMES=GAMES-"1" @O(F)="2":2000 FI$<"4"2640P G!NAME=(*"8")+"1":6150 H+Q="1"̰"50":O(Q)çS(Q)=ç2635K IQ JV:"YOU ARE NOT IN A POSITION TO BE NICE TO ANYBODY...":F="1"̰"100":F:2000 KNICE=NICE+"1"::"YOU TAKE A WALK TO GO AND SEE":N$;". YOU DECIDE TO GIVE":"HIM A FREE COPY OF ":G$(Q,̰"29"):S(Q)="1":POP=POP+G(Q,"9")::F="1"̰"50":F::"HE ACCEPTS YOUR GIFT GRATEFULLY.":F="1"̰"50":F:2000 PI$<"3"2650Z RXCASH<"20""21",ç;"YOU CAN'T AFFORD IT ! ":F="1"̰"100":F:26102 UF=(*"10")+"5"::WEEK=WEEK+"1":"YOU GO TO A HEALTH CLUB FOR A WEEK. IT COSTS YOU `20 BUT YOURFITNESS GOES UP BY ";F;"%":CASH=CASH-"20":FIT=FIT+F:F="1"̰"200":F:2000 ZI$="1"2670n [)"WHICH GAME ?";I$:I$>"2"2652\ \I$=""I$="0"2000 ]MS(I$)=ç:"NOBODY HAS A COPY OF THAT YET.":F="1"̰"100":F:2000 ^NAME=(*"8")+"1":6150:S(I$)="1":N$;" HAS A COPY OF THAT.":"HE SAYS HE WILL LET YOU HAVE IT IF YOU GIVE HIM FIVE GAMES FOR IT IN RETURN."::"DO YOU AGREE ?" _"Y"Ʀ"N"2655_ `G="N".1}L,"6"::"SUIT YOURSELF":F="1"̰"100":F:2000 a.1}L,"6":N="1"̰"5" b+F="1"̰"50":O(F)çS(F)=ç2662f cF dV:N$;" SAYS YOU DON'T HAVE":"FIVE GAMES WORTH TAKING":F="1"̰"100":F:2000 fS(F)="3":N gO"IT'S A DEAL !":F="1"̰"50":S(F)="3"S(F)=ç:F:O(I$)="2":2000 hF iO(I$)="2":2000 nw:"YOU DECIDE TO TAKE A WALK DOWN THE STREET AND KICK THE SHIT OUTOF THE FIRST PERSON YOU MEET...":F="1"̰"200":F p*OF="1":NAME=(*"8")+"1":6150 r0:"THAT PERSON IS ";N$;"...":F="1"̰"150":F tFIT<(V*9.5):"YOU PICKED THE WRONG PERSON.":F="1"̰"100":F::HOS=(((V*9.5)-FIT)/"10"):"YOU FIND THE HOSPITAL FOOD VERY TASTY OVER THE NEXT ";HOS;" WEEKS.":F="1"̰"200":F:WEEK=WEEK+HOS:FIT=FIT-"10":POP=POP-(V*"2"):2000 vk:"YOU BEAT ";N$;" UP SEVERELY.":"(YOU VICIOUS BASTARD)":F="1"̰"150":F:POP=POP+(V*"3"):2000 6405 =:" SPECIAL OPTIONS ---------------" ::"1...BUY NEW COPIER"::"2...BUY BACK-UP BOARD"::"3...GAMBLE"::"4...INFORM ON SOMEONE"::"5...GET VIOLENT"::"6...CHECK OTHER LISTS" *6090:=""Ŧ<"1"Ŧ>"6"2714 >"3"I$=:5000 ="1"2720 ="2"2740 ="3"2750 :" BUY NEW COPIER --------------":::"1...THE KEY `3.00"::"2...LINK OO5 `4.50"::"3...007 SPY `6.50"::"4...LERM V4.6 `8.00"::"5...McD COPIER V3.0 `10.00" *6090:=""Ŧ<"1"Ŧ>"5"2721 I=:2721 +(I*"2") "COS="3":COPI="18":2735 'COS=4.5:COPI="19":2735 "COS="6":COPI="21":2735 'COS=7.5p:COPI="22":2735 #COS="10":COPI="24":2735 2721 VCASH"3"2815 ="1"2820 ="2"2830 ="3"2840  2815 CHOICE="5":AVOID="15"  2845 CHOICE="15":AVOID="5"  2845 CHOICE="10":AVOID="10" GET=(*"20"):CATCH=(*"20"):GET>CHOICE:"YOU FAIL TO SNATCH A GAME AND GOHOME IN A BAD MOOD.":"1":"100":2000 :"YOU MANAGE TO GRAB A GAME...":F="1"̰"250":F:CATCH"2"2905Y [&I$<"1"ŰI$>"50"I$=""2906Z \IO(I$)=ç:"YOU HAVEN'T GOT THAT ONE !":F="1"̰"100":F:2000 ]QO(I$)="2":"YOU'VE ONLY GOT A COPY OF THAT !":F="1"̰"100":F:2000 bx:" SPOIL GAME AND RETURN ---------------------"::" METHOD ------" c:"1...KNOT TAPE (CERTAIN SPOIL BUT EASILY DETECTED"::"2...CRUMPLE TAPE (LIKELY SPOIL, HARDER TO DETECT)"::"3...DEMAGNETIZE (VERY LIKELY SPOIL, MEDIUM RISK)"::"4...ALTER PROGRAM (CERTAIN SPOIL BUT RISKY i.e. CAN YOU HACK THE LOADER SAFELY ?)" h*6090:=""Ŧ<"1"Ŧ>"4"2920h m/="1"SPOIL="1":RISK=0.73333:2950 r4="2"SPOIL=0.5:RISK=0.3:2950 w4="3"SPOIL=0.8L:RISK=0.5:2950 |4="4"SPOIL=0.9ffff:RISK=0.6:2950 ]:G(I$,"9")O(I$)="2":GAMES=GAMES+"1":2000 NICK="1"2000 a"RIGHT, THAT'S IT ! THAT WAS YOUR VERY LAST CHANCE ! I'M CALLING IN THE LAW !":F=1200:F::"YOU HAVE BEEN ARRESTED FOR REPEATED ATTEMPTED FRAUD. YOU ASK FOR 359 OTHER OFFENCES TO BE TAKEN INTO CONSIDERATION...":F=1200:F::"YOU HAVE BEEN THROWN INTO JAIL."::"GAME OVER":F=1200:6900 FF="1"̰"5":.01z# =,F*"2":.01z# =,F*"3":.01z# =,F*"4":F WN=ç:WEND=ç N=(*"45")+"1":S(N)="1" !CHA=(*"5"):CHA:CHA:ٰ"9": %"7","10";ç;ٰ"9";"WEEKLY NEWS" WE=(*"30")+"1" 0AF="8"̰"12":F,ç;ڰ"6";" ":F 5JF="1"̰"3":O="1"̰"2":O:.006yD,30:.006yD,40(:F :.ڰ"6":ٰ"2":"9",ç;:3200 +(WE*"10") 9"10",ç;" MIDWEEK CUP MATCH MAKES `24576":3600 O(491)=çƥ<.73333CASH>"5"GAMES=GAMES+"1":" A SHADY-LOOKING CHARACTER FROM SCORPION SELLS YOU A PRE-PROD COPY OF 'YOUR ATTENTION PLEASE'":CASH=CASH-"5":O("49")="2":3600 "8",ç;"YOU GO TO A SIGUE SIGUE SPUTNIK GIG. THE DRUMMER HITS YOU WITH ABOTTLE AND YOU HAVE TO STAY IN HOSPITAL FOR A WEEK HAVING YOUR WOUNDS SEEN TO...":WEEK=WEEK+"1":3600 CASH>"10""8",ç;"YOU GO OUT ON THE TOWN AND GET BLIND DRUNK. YOU DECIDE IT WOULDBE WISE TO LIE LOW FOR A DAY OR TWO UNTIL THE WORLD TURNS THE RIGHT WAY UP AGAIN...":CASH=CASH-"10":WEEK=WEEK+"1":FIT=FIT-"5":3600 KCASH>"5""10",ç;" DUCK BILL - `5":CASH=CASH-"5":3600 ƄPOCKETȰ"1"" DUE TO RAMPANT INFLATION, THE VALUE OF YOUR POCKET MONEY HAS BEEN REDUCED BY `1":POCKET=POCKET-"1":3600 І" YOU MANAGE TO NEGOTIATE A LONG- OVERDUE RISE IN POCKET MONEY FROM `";POCKET;" TO `";POCKET+"1":POCKET=POCKET+"1":3600 ڮ"8",ç;"A NEW ANTI-PIRACY TECHNIQUE HAS BEEN DEVELOPED, WHICH REDUCES YOUR PRESENT COPIER'S EFFICIENCYBY APPROXIMATELY 9%":COPIER=COPIER-"2":NEWTECH="1":3600 NEWTECH="1""THE LAST NEW ANTI-PIRACY DEVICE HAS BEEN CRACKED, MAKING YOUR COPIER MORE EFFECTIVE AGAIN.":COPIER=COPIER+"2":NEWTECH=ç:3600 O("48")=çƥ<.73333CASH>"1"GAMES=GAMES+"1":"SINCLAIR USER MAGAZINE PUBLISHESTHE LISTING OF SCORPION SOFTWAREBLOCKBUSTER ESCAPE FROM COLDITZ.":WEEK=WEEK+"1":CASH=CASH-"1":O("48")="2":3600 g"MATTHEW SMITH SAYS YOU'RE GREAT-YOU ISSUE OFFICIAL STATEMENT- ""PISS OFF, WANK-PUSS""":3600 kGAMES<"49""YOU REPLY TO AN ADVERTISEMENT INA COMPUTER MAGAZINE AND MANAGE TO MAKE A SUCCESSFUL SWAP." (F=(*"49")+"1":O(F)ç3331 3GAMES=GAMES+"1":O(F)=(*"2")+"1":3600 CASH>"10"" A PARTICULARLY SUCCESSFUL BOUT OF COPYING REQUIRES YOU TO BUY SOME NEW BLANK TAPES FOR `10":CASH=CASH-"10":3600 CASH>"6""8",ç;" AFTER CAMPING OUTSIDE THE SHOP FOR A WEEK, YOU FINALLY MANAGE TO GET THE NEW LP BY THE JESUS AND MARY CHAIN WHICH COSTS YOU `6 (CHEAP AT TWICE THE PRICE)":WEEK=WEEK+"1":CASH=CASH-"6":JMC=JMC+"1":3600 9"10",ç;" NEW COPYRIGHT LAW - WHO CARES?":3600 *p"YOU WIN SECOND PRIZE IN A BEAUTYCONTEST. COLLECT `1 FROM ALL THEOTHER PLAYERS...":CASH=CASH+"8":3600 4x"YOU WIN A BULLWORKER AS PRIZE INA PETE LEVY LOOKALIKE CONTEST. YOUR FITNESS RISES BY 15%":FIT=FIT+"15":3600 >{PINS>ç"AN ECCENTRIC HISTORIAN BUYS UP YOUR ENTIRE RARE PIN COLLECTION FOR `20.":PINS=ç:CASH=CASH+"20":3600 G 3410R Hw<.5GAMES<"45"WG=ç:"YOUR COUSIN DIES UNEXPECTEDLY OFBUBONIC PLAGUE AND LEAVES YOU 3 GAMES IN HIS WILL." I(Q=(*"49")+"1":O(Q)ç3401I J>GAMES=GAMES+"1":O(Q)="1":WG=WG+"1":WG>"2"3600 L 3401I R<.2~LACCOUNT=ç:"THE BANK UNEXPECTEDLY GOES BUST AND TAKES WITH IT ALL YOUR HARD-EARNED SAVINGS OF `";BANKBAL:BANKBAL=ç:OVERDRAFT=ç:3600 fPRI>ç"A SUDDEN MASSIVE SLUMP IN DEMANDCAUSES ALL RETAIL PRICES TO DROPBY 50%":F="1"̰"50":G(F,"9")=G(F,"9")/"2":F:PRI=PRI-"1":"1":"1":3610 zPRI<"2""A SUDDEN MASSIVE BOOM IN DEMAND CAUSES ALL RETAIL PRICES TO INCREASE BY 100%":F="1"̰"50":G(F,"9")=G(F,"9")*"2":F:PRI=PRI+"1":"1":"1":3610 BIRTHDAY="1""YOUR JOHNSON MATTHEY BANK SHARESPAY OUT A DIVIDEND OF `20 (ON THE HISTORICAL INTEREST MARKET)":CASH=CASH+"20":3600 :"10",ç;"PECUNIAM HABERE NOBIS NECESE EST":3600 JOB=ç" YOU GET A JOB DOING A PAPER ROUND WHICH GIVES YOU AN EXTRA `3 A WEEK.":POCKET=POCKET+:JOB="1":3600 JOB="1""UNEMPLOYMENT'S RISING IN THE CHIGLEY END OF TOWN, SO YOU GET THE SACK FROM YOUR PAPER ROUND.":JOB=ç:POCKET=POCKET-:3600 :"10",ç;"NOTHING VERY EXCITING HAPPENS...":3600 F="1"̰"5":F:"1":"250" !WN=WN+"1":WN>"2"2000 $ 3100  2000 MN=-9 ̰"57"Ͱ"3":"3":.005y# =,N:"5":.005y# =,N+"3":"1":N Pç:ç:(*5)+3:RANDEV=(*"20")+"1":4090+(RANDEV*"10") Q="200"::"IT'S YOUR BIRTHDAY !!! YOU RECEIVE 4 TIES, 3 VIC-20 GAMES, A CUDDLY RABBIT, A D-I-Y YAHTZEEKIT (5 DICE AND A SHEET OF BLANKPAPER), 100 JOHNSON MATTHEY BANKSHARES AND `16.40 IN CASH !!!":CASH=CASH+16.40333:F=1Q:F:BIRTHDAY=1:2000 Q="200"::"YOU THROW A PARTY AT YOUR HOUSE.THE RAT IS VIOLENTLY SICK ALL OVER THE PLACE AND YOUR MOTHER KEEPS YOU IN FOR A WEEK UNTIL IT'S ALL CLEANED UP...":WEEK=WEEK+1:F=1Q:F:2000 Q="200"::"YOU THROW A PARTY AT A FRIEND'S HOUSE. THE RAT IS VIOLENTLY SICK ALL OVER THE PLACE AND YOU SPEND THE NEXT WEEK TRYING TO GET YOUR FRIEND TO TALK TO YOU AGAIN...":F=1Q:F:WEEK=WEEK+1:2000 Q="200"::"YOU THROW A PARTY AT A LOCAL DISCO. THE RAT IS VIOLENTLY SICK ALL OVER THE PLACE AND YOU HAVE TO PAY FOR THE DISCO TO GETALL THE MESS CLEANED UP...":F=1Q:F:CASH>10 CASH=CASH-10 :2000 CASH=ç:2000 "CQ="200"::W$;"YOU SUDDENLY SPY A `10 NOTE AND PICKIT UP.":F=1Q-502:F:"JUST THEN, A 7-FOOT, 25-STONE WRESTLER TAPS YOU ON THE ARM, SAYS ""EXCUSE ME, THAT'S MINE"" AND BREAKS BOTH YOUR LEGS. YOU SPEND THE NEXT FORTNIGHT IN HOSPITAL RECOVERING...":F=1Q:F:WEEK=WEEK+2:2000 ,z:W$;"YOU UNEXPECTEDLY SUFFER A MASSIVE HEART ATTACK AND DIE...":F=1200:F::"GAME OVER.":6900 6:W$;"YOU ARE UNEXPECTEDLY HIT BY A GRAND PIANO FALLING FROM A 27TH FLOOR WINDOW...":F=1200:F::"GAME OVER.":6900 @v:W$;"YOU ARE UNEXPECTEDLY SHOT DEAD BY A LIBYAN TERRORIST...":F=1200:F::"GAME OVER.":6900 J:W$;"YOU ARE UNEXPECTEDLY STABBED TO DEATH BY A SCHOOL OF KILLER GOLDFISH ON STILTS WHISTLING DIXIE AND BALANCING BILLIARD BALLS ON THEIR NOSES (SURREAL !)":F=1300,:F::"GAME OVER.":6900 Tw:W$;"YOU SEE A PIN AND PICK IT UP. ALL DAY LONG YOU HAVE A PIN...":PINS=PINS+"1":F="1"̰"150":F:2000 GRASS.3WEEK=WEEK+2::"YOU HAVE BEEN INFORMED ON. THE COURT PROCEEDINGS TAKE 2 WEEKS.":F=1200:F GRASS<.34250 JAIL=0:"6"2000 I$="5"5300 I$="4"5150 QI$="6":" OTHER GAMES IN CIRCULATION --------------------------": D23692\,"255":F="1"̰"50":S(F)="1"F;".";G$(F,̰"29"):F F A:"21",ç;"PRESS ANY KEY FOR MAIN MENU":"2":ç:2000 V:" INFORM ON SOMEONE -----------------":5151:5152  ~:"1...THE RAT"::"2...RUSTY"::"3...McD"::"4...TROTTER"::"5...CAPT. ZAX"::"6...SID"::"7...ANTS"::"8...FREAKY":  "20",ç;"WHICH ONE ?" #36090:I$=:I$=""I$<"1"I$>"8"5155# %*INF=I$:INF=INF*"10":(6000p+INF) (e:"THE COURT CASE COMES UP. THE PROCEEDINGS TAKE TWO WEEKS...":F="1"̰"200":F:WEEK=WEEK+"2" 2#CONV=("2"*H)+("3"*I)+C+("2"*M) 3GRASS>"1"5180< 44CONVTOT=(*"40")+"20":CONVGRASS>0.55190F @<0.35190F BU:"FORTUNATELY, THIS TIME YOU AVOIDBEING DISCOVERED.":F="1"̰"100":F:2000 F:POP=POP-(("11"-T)*"10"):N$;" DISCOVERS THE GRASS...":F="1"̰"150":F::"THE RESULTING FRACAS PUTS YOU INHOSPITAL FOR ";V;" WEEKS.":WEEK=WEEK+V:F="1"̰"150":F:2000 P:"THE CONVICTION WAS SUCCESSFUL !":N$;" WAS HEAVILY FINED."::"YOU GET YOUR `20 BLOOD MONEY (YOU MERCENARY SCUM)":GRASS=GRASS+.15~:CASH=CASH+"20":F="1"̰"150":F:2000 Z:" GET VIOLENT WITH SOMEONE ------------------------":5151:5310 "20",ç;"WHICH ONE ?" *6090:=""Ŧ<"1"Ŧ>"8"5155#  VIO=(*"10"):6000p+VIO OCASH502SUCK=SUCK+5 &BANKBAL>100dSUCK=SUCK+5 $CASH>100dSUCK=SUCK+10  JMC0SUCK=SUCK+1 *CRIME<4SUCK=SUCK+(4-CRIME) #WEEK<524SUCK=SUCK-20 )OVERDRAFT>0SUCK=SUCK-OVERDRAFT  SUCK<0SUCK=0 !@SUCK100dSUCK=100d:JMC=0SUCK=SUCK-1 &::"YOUR SCORE = ";SUCK;"%" W21,2;"PRESS ANY KEY TO PLAY AGAIN":10 :0:.1}L,6:21,0;" ";21,10 ;1;"PLEASE WAIT.":0 bLDAYS=DAYS-1::" STATUS ------" lt:"CASH IN HAND = `";CASH:"BANK BALANCE = `";BANKBAL:"GAMES OWNED = ";GAMES:"WEEKS PLAYED = ";WEEK-1 t+COPIER>28COP=28:7030v u(COP=COPIER:COP>30COP=30 vp"COPIER POWER = ";(COP*100d/28);"%":"BACK-UP BOARD - ";B$:PINS>0"PINS = ";PINS POP>100dPOP=100d "POPULARITY = ";POP;"%" FIT>100dFIT=100d "FITNESS = ";FIT;"%" JMC0"JESUS AND MARY CHAIN LP";:236066\,0:236077\,60<:"s = ";:236066\,38&:236077\,251:JMC GEND=1 321,0;" PRESS V TO VIEW GAMES OWNED" =""7110 ="V"7200   2000  :23692\,255:"GAMES OWNED (INVERSE=COPY) ----------- --------------"::F=1502:O(F)=1F;".";G$(F,29):F $F<513END=F %MF<513O(F)=21;F;".";G$(F,((28+1)-END)):F *F 45:21,0;" PRESS ANY KEY FOR MAIN MENU" >1:0:2000 @28010J:F="1"̰"18":DU,PI:DU/"2",PI:F: J.4L,"7",.4L,"7",.8L,"12",.4L,"11",.4L,"12",.8L,"14",.4L,"12",.4L,"14",.4L,"16",.4L,"16",.4L,"17",.4L,"16",.8L,"9",.4L,"14",.4L,"14",1.6L,"12",1.6L,"11",3.2L,"12" 18110:F="1"̰"8":DU,PI:DU/"2",PI:F: {.4L,"14",.2~L,"14",.2~L,"14",1.2,"14",.4L,"16",.4L,"12",.4L,"16",3.2L,"19" 18210 :F="1"̰"8":DU,PI:DU/"2",PI:F: 9.2~L,"8",.4L,"5",.2~L,"5",.2~L,"6" <.2~L,"8",.4L,"17",.4L,"17",.8L,"13" !>8200 : !H$"====== CONGRATULATIONS !!! =====" !R#:" YOU'VE FINISHED THE GAME !!!"::"(AT THIS POINT THERE OUGHT TO HAVE BEEN INCREDIBLE GRAPHIC DISPLAYS, FLASHING COLOURS, ASTOUNDING SOUND EFFECTS AND GENERALLY AMAZING THINGS. UNFORTUNATELY, THERE WERE ONLY 437 BYTES LEFT, SO YOU'LL HAVE TO MAKE DO WITH THIS...)" !WF=1300,:F !\ 8100 !f7:0:0::S=123{:T=83S:N=10 130:N/20:X=*123{:Y=*83S:S,T:X,Y:S,T:X,-Y:S,T:-X,Y:S,T:-X,-Y:N !pp10 ,8;6;2;"CONGRATULATIONS";11 ,13 ;" ";12 ,11 ;"KING RAT!" !z921,7;0;7;"PRESS S FOR SCORE" !'1:500:"S"8550f! ! 6900 A X:ת?_烃???=8;q#ߟ?Ó;(X &"$$66666 ?h> ~`f 0f8ll8mf; 0 000 0 0~<~~0~ 0` 80 0`0 ~~0  0 l8flxpxlf``````~cwkkccffv~nff>f>``|fff|fff>ff><``|ffff8<8p``flxlf8<6kkc|ffff