Mariner ddof 0:0:0: "" 6:6:1 #12 ,0:"" screen @d~B<|~<|BB<<~~<|~~~~~~~~`f`ff`|f|ff|?>f|f||f`~|`~~`~~f~?|<`fff~<``fB!! <@<~~|!!B@Bb@~~x$B@BR<`~~x!~~@~J`~~|!!B@BFB``fBB~BB><`|f<`|fZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvqqqqqqqqqqqqqqqqqqqqqqvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvrrrrrrrrrvvrrvrrrrrrrrrrrrvvvvvvrrrrrrrrrvrrrrrrrrrrrrrrrrvvvvvvrrrrrrvrrvrrrrrrrrrrvrrrvvvvvvvvrrrrrrvrrvrrrrrrrrrrvrrrrrvvvvvvrrrrrrvrrvrrrrrrrrrrvrrrrrvvvvvvrrrrrrvrrrrrrrrrrrrrvrrrrrvvvvvvrrrrrrvrrrrrrrrrrrrrvrrrrrvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvrrrrrrrrvvvvvvpppppvppppppppvvvvrrrrrrrvvvvvvvvvvvvvvvvvvvvvvvvvrrrrrrrvvvvllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvINTRO > >z>I  ANDY MORGAN 1984   ATLANTIS SOFTWARE LTD.  23658j\,8 0:0:7::9 ,4;" STOP YOUR TAPE RECORDER ";8,4;" ";10 ,4;" " 11 ,4;" ";12 ,4;" ** AND PRESS ANY KEY ** ";13 ,4;" " `4,9 ;"MASTER MARINER":18,0;" ATLANTIS COMPUTER SOFTWARE LTD" 9.1}L,25:.1}L,30:.1}L,35# =""6 *7:7:2:0: 6:0,3;" WELCOME TO MASTER MARINER " W6,5;"DO YOU WISH TO READ THE";8,7;"INSTRUCTIONS {Y/N}" =""14 ="N"2000 "Y"Ʀ"N"14 `1;12 ,0;"WOULD YOU LIKE THE SHORT VERSION",," OR THE COMPLETE STORYLINE?" '''" (S)hort or (L)ong?" =""24 ="S"1000 ="L"100d "S"Ʀ"L"24 d 100d: i2:(0834 811238) n3,0;"IT'S A COLD GREY MISTY MORNING IN EARLY SPRING. AS YOU WALK DOWN THE QUAYSIDE YOU STOP AND LOOK UP AT THE SEAGULLS WHEELINGHIGH ABOVE THE DOCKYARD." ,'"IN THE DISTANCE ABOVE THE NOISE OF THE HUNGRY GULLS A SHIPS BELLCAN BE HEARD TOLLING SIX BELLS. YOU QUICKEN YOUR STEP, HIGH TIDEIS ONLY THREE HOURS AWAY AND YOUHAVE TO BE AWAY BY THEN, OR YOU WON'T HAVE THE ADVANTAGE OF THE EBB TIDE ON THE PASSAGE DOWN SOUTHAMPTON WATER AND OUT OF THESOLENT." 1600@ 1,0;"FOR A WHILE YOUR THOUGHTS DRIFT BACK TO WHEN YOU WHERE MASTER OFAN OCEAN GOING SCHOONER ROUNDINGCAPE HORN IN HOWLING GALES, AND OF ALL THE EXOTIC PORTS AROUND THE WORLD YOU HAVE VISITED." {'"BUT NOW THINGS ARE DIFFERENT, ASYOU HAVE PUT YOUR LIFE SAVINGS PLUS A LARGE LOAN INTO BUYING A 100ft. SAILING BARQUE." '"NOW YOUR CHANCE HAS COME TO JOINTHE WORLD OF HIGH FINANCE, WHEREDREAMS CAN TURN INTO NIGHTMARES OF WORRY. BUT, WHO KNOWS, MAYBE LADY LUCK WILL RUN WITH YOU." 1600@ 1,0;"A VOICE BRINGS YOU OUT OF YOUR DAYDREAMS, BACK TO THE REALITY OF THIS COLD BRISK MORNING. THE BOSUN OF ""TITAN TRADER"" SCURRIESTOWARDS YOU ACROSS THE DOCKSIDE." 1 m'"JIM TWODIN, THE BOSUN, AND GOOD FRIEND OF OLD INFORMS YOU THAT ALL IS SHIPSHAPE AND BRISTOL FASHION." ҽ'"YOU TELL HIM THAT WE SAIL ON THETIDE. WITH A CHEERY WAVE AND A SMILE HE SCUTTLES BACK TOWARDS THE SHIP TO MAKE PREPARATIONS TOGET UNDERWAY, LEAVING YOU TO RETURN TO YOUR THOUGHTS." 1600@ 1,0;"A FRESH BREEZE FROM THE NORTH BLOWS THROUGH THE DOCKLANDS, ANDGENTLY CARESSES THE SHROUDS AND HALYARDS OF A TEA CLIPPER MOOREDAT THE QUAY. STEVEDORS ALREADY BUSY UNLOADING HER CARGO FROM INDIA STOWED DEEP DOWN IN THE BOWELS OF HER HOLD." '"AS YOU STROLL BY YOU STOP AND GAZE AT THE FIGUREHEAD, PERHAPS SOON YOU'LL BE ABLE TO AFFORD TOHAVE ONE MADE TO GRACE THE BOWS OF ""TITAN TRADER"". YES, THAT WOULD BE NICE, BUT THERE'S MORE IMPORTANT THINGS TO CONSIDER BEFORE YOU CAN ALLOW YOURSELF A FOLLY SUCH AS THAT."  1600@  2 1,0;"TOO MANY THINGS CAN HAPPEN THAT WILL DESTROY A PERSONS DREAMS OFWEALTH AND PROSPERITY WHERE THE SEA IS CONCERNED." "'"THERE ARE THE RAGING STORMS THATCOME UP FROM NOWHERE TO CATCH ANUNWARY SHIP. SOMETIMES IT EVEN MEANS THE JETTISONING OF SOME ORALL OF THE VALUABLE CARGO JUST TO STAY AFLOAT AND MAKE THE NEXTPORT OF CALL." ,'"THE COAST OF GREAT BRITAIN IS LITTERED WITH THE SAD REMAINS OFONCE PROUD SHIPS, NOW TORN APARTBY THE FORCE OF THE CRUEL SEA. ATOMB FOR MANY A BRAVE SEAMAN." 6 1600@ J"1,0;"SEA MISTS ARE A VERY DANGEROUS HAZARD TO VESSELS AT SEA, THEY CAN SPRING UP OUT OF NOWHERE ANDA VESSEL IS LEFT TOTALLY BLIND, TRYING TO FEEL ITS WAY THROUGH. MANY VESSELS COLLIDE IN MISTS CAUSING UNTOLD DAMAGE, EVEN SINKING THE UNLUCKY VESSELS IN ALOT OF CASES." T'"IF THE COLLISION ISN'T SERIOUS THE VESSEL MAY BE DISABLED AND REQUIRE A TOW INTO PORT TO CARRYOUT REPAIRS. THESE DAYS A TOW WILL COST A CONSIDERABLE AMOUNT OF MONEY, AND YOU HAVE NO CHOICEBUT TO TAKE ONE IF YOU WISH TO REACH THE NEXT PORT." ^ 1600@ rd1,0;"ONE THING A SEAMAN STILL HAS TO KEEP A WEATHER EYE OPEN FOR IS THE DANGER OF PIRATES. THEY WILLWAYLAY A VESSEL AND PLUNDER THE VALUABLE CARGO, THEY WILL STOP AT NOTHING. ONE OF THEIR TRICKS IS TO HEAVE TO, SO A PASSING VESSEL WILL DRAW ALONGSIDE TO TAKE THE VESSEL IN TOW TO CLAIM SALVAGE, ONLY TO BE OVERPOWERED BY THE PIRATES." |'"THE ONLY SOLUTION TO THE PIRATESIS TO ARM YOUR VESSEL AGAINST THEM. THEN YOU STAND A BETTER CHANCE OF FIGHTING THEM OFF IF YOU FALL FOUL OF THEM."  1600@ 1,0;"BEWARE OF PEOPLE SUCH AS SHADY BACKSTREET WEAPON STORE OWNERS LIKE ""HONEST"" JACK. WELL KNOWN FOR HIS GIVEAWAY BARGAINS, SOME OF HIS BARGAINS ONLY WORK ONCE OR TWICE, WHILE OTHERS HAVE BEENKNOWN TO FAIL THE FIRST TIME." m'"OTHER SHADY CHARACTERS YOU MAY MEET ARE CROOKED DOCK MANAGERS, WHO CAN BE VERY AWKWARD IF THEY WANT TO." '"DOCK MANAGERS HAVE THE POWER TO STOP VESSELS SAILING IF THEY OWEMONEY FOR HARBOUR DUES. ANYONE WHO HASN'T ENOUGH MONEY MAY FINDTHEMSELVES AT THE MERCY OF THESE""LORDS OF THE DOCKLANDS""."  1600@ 1,0;"A PRIVATEERS LIFELINE IS THE FINANCE COMPANY, FROM WHOM HE TRIES TO GET A LOAN. WITHOUT THEHELP OF A COMPANY, IT'S UNLIKELYTHAT ANYONE WILL SURVIVE EVEN A MONTH IN THIS VERY RISKY LINE OFBUSINESS." '"THE INTEREST ON SUCH LOANS IS VERY HIGH. IT RISES BY 12% EACH WEEK!. TRYING TO PAY OFF A LOAN CAN PUT ANY BUSINESS ""ON THE ROCKS"" AS SURE AS ANY HURRICANE AND GREAT CARE MUST BE TAKEN IN MAKING SURE YOUR LOAN DOES NOT EXCEED THE `25,000 LIMIT." 4'"IF IT DOES, THEN YOU'RE ON THE BEACH FOR SURE."  1600@  1,0;"TAX EVASION IS A SERIOUS CRIME, THEY SAY CRIME DOEN'T PAY, AND IF YOUR CAUGHT DODGING TAXES YOUWILL END UP IN PRISON IF YOU FAIL TO PAY UP . SENTENCES CAN RANGE FROM 3 TO 18 MONTHS, AND YOU STILL HAVE TO PAY STORAGE FEES FOR YOUR VESSEL." 0'"EVEN IF YOU SURVIVE A STRETCH INPRISION YOUR TROUBLES ARE BY NO MEANS OVER. YOU STILL HAVE TO PAY OFF YOUR OUTSTANDING TAXES, WHICH MAY BE QUITE A LARGE SUM, AND, YOU WILL HAVE A LIMITED TIME IN WHICH TO PAY THEM OFF. FAILURE WILL MEAN THE LOSS OF YOUR SHIP, AND WITH IT YOUR LIVELIHOOD."  1600@ s0,0;"ANOTHER WORRY ARE THE GENERAL OVERHEADS, SUCH AS CREW WAGES, PILOT FEES AND SHIP STORES. THE BILL FOR THESE IS A MONTHLY ONE AND THESE CREDITORS WILL NOT BE AT ALL INTERESTED IN SAD STORIESOF POOR CARGO PRICES OR STORMS CAUSING LOSS OF CARGO. IF YOU ARE UNABLE TO PAY AT THE PROPER TIME, YOU WILL BE IN BIG TROUBLEFROM WHICH THERE IS NO ESCAPE." "ALSO, THERE IS THE MATTER OF THECREW WANTING A RISE IN WAGES. THERE WAS A TIME WHEN MEN WOULD WORK AND NEVER EVEN THINK OF ASKING FOR A RISE. BUT NOW, THEIR WAGE DEMANDS CAN CRIPPLE A SMALL COMPANY, OR YOU MAY LOSEYOUR CREW IF YOU DON'T MEET THEIR DEMANDS."  1600@ 1,0;"NO VESSEL MAY PUT TO SEA IF IT IS NOT COVERED BY INSURANCE. THEINSURANCE MUST COVER THE CARGO, THE VESSEL AND ALSO THE CREW. ITIS WELL KNOWN THAT COMPANIES ARECHARGING RIDICULOUSLY HIGH RATESFOR SMALL VESSELS, DUE TO THE RISK OF PIRATES." &B'"NO VESSEL WILL STAY SEAWORTHY WITHOUT ANY MAINTENANCE, SO A VISIT TO A BOATYARD FOR REPAIRS WILL BE NECESSARY EVERY ONCE IN A WHILE. ALSO IF YOUR VESSEL IS IN COLLISION, IT WILL NEED TO BEREPAIRED. WITH THE COST OF THE MATERIAL AND LABOUR RISING ALL THE TIME, THESE VISITS TO THE BOATYARD WILL NOT COME CHEAP." 0 1600@ :n1,0;"WITH THE RISING COST OF RUNNING A VESSEL, MANY CAPTAINS TAKE TO CARRYING ILLEGAL CARGOES." D'"THE ILLEGAL CARGOES ARE ARMS ANDBULLION. YOU REQUIRE A SPECIAL LICENCE TO CARRY THEM, AND IT ISNOT POSSIBLE TO OBTAIN ONE IF THE VESSEL IS UNDER 170ft. IN LENGTH." N'"EVEN SO IT IS STILL POSSIBLE TO BUY THESE CARGOES QUITE EASILY ON THE BLACKMARKET, BUT IF YOU ARE CAUGHT WITH THEM YOU WILL FACE A VERY LARGE FINE WHICH WILL MORE THAN LIKELY BANKRUPT THE PRIVATEER IN MOST CASES." X 1600@ b1,0;"THESE DAYS NOBODY IS COMPLETELY TRUSTWORTHY, THERE IS ALWAYS THEFEAR OF SOMEONE INFORMING THE CUSTOMS AND EXCISE OF YOUR ILLEGAL CARGO." l'"IF THIS HAPPENS, THE FIRST YOU WILL KNOW OF IT IS WHEN A LAUNCHFULL OF CUSTOMS MEN BOARD YOU TOMAKE A SEARCH. IF YOU ARE LUCKY,YOU MAY MANAGE TO STEER THEM AWAY FROM THE HOLD AND TALK YOURWAY OUT OF TROUBLE." v'"IF YOU HAVE A COLLISION WHILE CARRYING CONTRABAND, YOU WILL HAVE TO JETTISON ALL OF IT AS THE PORT AUTHORITIES WILL WANT TO INSPECT THE DAMAGE."  1600@  1 1,0;"ALL TOLD, IT'S NOT AN EASY LIFE ON THE HIGH SEAS. BUT, IF LUCK IS ON YOUR SIDE THEN THERE IS NOTELLING WHAT YOU MIGHT ACHIEVE." '"YOUR THOUGHTS RETURN TO MORE IMPORTANT MATTERS. THE TIME IS GOING ON, AND YOU STILL HAVE TO MAKE THAT TIDE. YOU ROUND THE CORNER OF A SHIP CHANDLERS, AND THERE IN FRONT OF YOU IS YOUR PRIDE AND JOY, ""TITAN TRADER""." '"ALREADY, THE VESSEL IS A HIVE OFACTIVITY, SAILORS BUSY CHECKING RIGGING AND HATCH COVERS, WHILE STEVEDORS LOAD SHIP STORES. YOU MAKE YOUR WAY UP THE GANGPLANK AND DOWN BELOW TO YOUR CABIN."  1600@ i1,0;"WITH A FEW LAST MINUTE JOBS TO BE DONE BEFORE YOU SAIL THE MORNING SOON PASSES." '"THEN THE TIME YOU HAVE WAITED MANY YEARS TO SAVOUR. THE TIME WHEN YOU FINALLY SET SAIL IN A VESSEL OF YOUR OWN. AT LAST FREETO MAKE YOUR OWN DECISIONS ON WHAT CARGO TO BUY AND SELL, FREETO DECIDE ON WHICH PORT TO SAIL TO NEXT." Ƴ'"FREE... THAT IS IF YOU CAN PAY OFF THE LOAN FROM THE FINANCE COMPANY. IF YOU CAN PAY OFF YOURTAXES. IF YOU CAN FIND A CHEAP CARGO. IF YOU CAN FIND A GOOD SELLING PRICE."  1600@ y8,0;"FINALLY YOUR CLEAR OF THE DOCK AND MAKING YOUR WAY OUT INTO SOUTHAMPTON WATER, AND THE OPEN SEA."  2 '''"OUT TO YOUR DESTINY."  1  1600@  1410 100d:3: 1,0;" STORMS " 8,0;"STORMS CAN CAUSE YOU TO LOSE PART OR ALL OF YOUR CARGO.",,,"YOU MAY BE LUCKY AND RIDE OUT THE STORM."  1600@ "1,0;" SEA MISTS " 6,0;"SEA MISTS WILL INCREASE THE RISKOF A COLLISION. IN THE EVENT OF A COLLISION, ALL CONTRABAND IS JETTISONED DUE TO AN INSPECTION BY PORT AUTHORITIES.",,,"YOU WILL ALSO REQUIRE A TOW TO REACH PORT FOR REPAIRS.",,,"BEWARE TOWS ARE EXPENSIVE." $ 1600@ ) 4 . 1,0;" PIRATES " 88,0;"PIRATES WILL LIE IN WAIT FOR AN UNWARY VESSEL TO PLUNDER.",,,"IF ANY CREW MEMBERS ARE INJURED WHILE FIGHTING WITH THE PIRATES YOU WILL HAVE TO PAY THE DOCTORSFEES FOR THEIR TREATMENT." B 1600@ L(1,0;" ""HONEST"" JACK " V8,0;"""HONEST"" JACK IS THE OWNER OF A SECOND HAND WEAPONS STORE. SOME OF HIS CANNONS ARE NOT BAD, AND OTHERS ARE LIABLE TO BLOW UP IN YOUR FACE THE FIRST TIME YOU TRYTHEM." ` 1600@ j52;1,0;" THE FINANCE COMPANY " o 2 t6,0;"THE FINANCE COMPANY, SITUATED INSOUTHAMPTON, WILL LEND YOU MONEYIF NEEDED. YOU MAY ONLY VISIT ITONCE WHILE IN PORT.",,,"THE INTEREST ON THE LOAN WILL INCREASE BY 12% EACH WEEK." ~d'"IF THE LOAN REACHES `25,000 THE FINANCE COMPANY WILL REPOSSESS YOUR VESSEL. SO BE WARNED !"  1600@ 1,0;" TAXES " 5,0;"YOU WILL HAVE TO PAY INCOME TAX AT THE RATE OF 33.3% ON ALL OF YOUR PROFITS."''"FAILURE TO PAY TAXES WILL RESULTIN A PRISON SENTENCE OF UP TO 18 MONTHS." '"IF YOU ARE SENT TO PRISON YOUR VESSEL WILL BE PUT INTO STORAGE FOR YOU. MONTHLY STORAGE FEES WILL BE CHARGED FOR THE DURATIONOF THE SENTENCE."  1600@  0 .1,0;" MONTHLY RUNNING COSTS " Ģ7,0;"EACH MONTH A BILL FOR THE DAY TODAY RUNNING OF THE VESSEL HAS TOBE PAID. THESE COSTS INCLUDE CREWS WAGES, PILOTAGE FEES AND SHIPS STORES." O'"AGAIN, FALIURE TO PAY UP ON TIMEWILL INCUR THE WRATH OF YOUR CREDITORS."  1600@ #1,0;" WAGE RISES " 5,0;"YOUR CREW MAY COME TO YOU AND DEMAND A RISE IN WAGES. IT IS UPTO YOU TO MAKE AN OFFER. BUT, IFTHE CREW REFUSE YOUR OFFER THEY WILL SAY HOW MUCH THEY ARE WILLING TO SETTLE FOR." '"YOU HAVE THE OPTION OF AGREEING TO THEIR DEMANDS. BUT, IF YOU REFUSE TO AGREE TO THEIR DEMANDSTHEY MAY EITHER ACCEPT YOUR INITIAL OFFER, OR THEY MAY WALK OFF, LEAVING YOU WITHOUT A CREW."  1600@  1 *1,0;" INSURANCE COMPANY " 9 ,0;"INSURANCE IS ESSENTIAL, AS YOU HAVE TO BE INSURED BY MARITIME LAW. IF YOU CAN'T AFFORD TO PAY THE PREMIUM YOU WILL LOSE YOUR SHIP." ( 1600@ 2)1,0;" CUSTOMS & EXCISE " <7,0;"IF YOU ARE CARRYING ANY ILLEGAL CARGO, YOU MAY BE BOARDED BY A ""RUMMAGE SQUAD"" WHO HAVE BEEN TIPPED OFF ABOUT THE CONTRABAND ABOARD." FP'"IF YOU ARE CAUGHT CARRYING ANY CONTRABAND YOU WILL FACE A VERY HEAVY FINE." P 1600@ Z 2 d-1,0;" KELPIE BOAT SERVICES " n7,0;"ALL VESSELS NEED MAINTAINANCE, AND THE LARGER JOBS WILL NEED TOBE CARRIED OUT BY EXPERIENCED SHIPWRIGHTS."''"ALSO, IF YOUR IN A COLLISION AT SEA, THE SERVICES OF KELPIE WILLBE REQUIRED TO REPAIR THE DAMAGEAFTER BEING TOWED INTO PORT." p 1600@ r)1,0;" VESSELS ADRIFT " tO3;6,0;"YOU MAY COME ACROSS A VESSEL ADRIFT DURING YOUR VOYAGES. YOU HAVE THE CHOICE OF WETHER TO TAKE THE VESSEL IN TOW TO THE NEXT PORT. YOU WILL BE AWARDED SALVAGE MONEY ON THE VALUE OF THE VESSEL AND THE CARGO."''"IT MAY ALSO BE AN AMBUSH SET BY PIRATES TO LURE YOU ALONGSIDE TOPLUNDER YOUR VESSEL." x 1600@ &1,0;" CARGO DETAILS " 03,0;"""TITAN TRADER"" CAN CARRY UP TO AMAXIMUM 50 UNITS OF CARGO. YOU MAY CHOOSE FROM 5 DIFFERENT TYPES OF CARGO."''"THE PRICES RANGE :-"''"GENERAL : ` 1 TO ` 25"'"ARMS : ` 50 T0 ` 250"'"COAL : ` 300 TO ` 990"'"WHISKEY : ` 500 TO ` 4000"'"BULLION : `1000 TO `10000" *''"YOU MAY NOT HAVE CARGO ON CREDIT"  1600@  3 &1,0;" PORTS OF CALL " 5,0;"YOU CAN SAIL BETWEEN 5 PORTS, THESE ARE :-"''" 1. SOUTHAMPTON"'" 2. SWANSEA"'" 3. LIVERPOOL"'" 4. LONDON"'" 5. NEWCASTLE" '"YOUR HOME PORT IS SOUTHAMPTON. IT TAKES 1 WEEK FOR A TRIP, THISINCLUDES THE TIME SPENT IN EACH PORT LOADING, OR UNLOADING."  1600@ 5,0;"YOUR ULTIMATE AIM IS TO MAKE A PROFIT OF `1,000,000 AND RETIRE.";'';"AS YOU HAVE READ, THERE ARE MANYHAZARDS TO OVERCOME BEFORE YOU CAN HANG UP YOUR OILSKINS AND SEABOOTS FOR GOOD." <'"MAY THE ELEMENTS BE KIND, ANDFORTUNE SMILE UPON YOU."  1600@ I4,0;"DO YOU WISH TO READ THROUGH THE INSTRUCTIONS AGAIN ?" =""1510 ="Y"20 ="N"2000 "Y"Ʀ"N"1510 @O21,5;" ANY KEY TO CONTINUE ":0:.5,35#:: з0:0:7:1::.5,30:.5,35#:F=0502:F:10 ,1;"PLEASE START YOUR TAPE RECORDER"''" AND PRESS ENTER "  0 0:0:0: 4"" 32 dmode  * *=\#6+6+6+6v+6+6Q>0890 0(23636T\*256+23635S\+7) :"Loading in 48k mode" ("" sloader  A  Andy Morgan 1984 Happy Computing Everyone 0:0:0: f=010 .05|L,20 (f 2l64597U:11 ,0:"":11 ,0:"":11 ,0:"":11 ,0:"" Nscreen @ <???B??"?????"????????????"?B???<?????"? ?~~~~~~~~~~~~~~~~~?"??<<<<<<<<<<<<<<<<<????$????"?D?????"?~?????????????????????????<@<<<~B<|~@>B>~xB@Bb@@B@BBB@ @f@D B@BR<<<<@$BB~~>B>~x~~~~~~~~~~~~~~~~~GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGBBBBBBBBBBBBBBBBBBBBBBBBBBBGGGGGBBBBBBBBBBBBBBBBBBBBBBBBBBBGGGGBGGDDDDDDDDDDDDDDDDDDDDDDGBGGGGBGGDDDDDDDDDDDDDDDDDDDDDDGBGGGGGBGGEEEEEEEEEEEDEEDEEEEEEGGBGGGGBGGEEEEEEEEEEEDEEDEEEEEEGGBGGGGGBGGGGGGGGGGGGGGGGGGGGGGGGGBGGGGBGDDDDDDDDDDDDDDDDDDDDDDDGBGGGGGBGDDDDDDDDDDDDDDDDDDDDDDDGBGGGGGBGEEEEEEEEEEEEEEEEEEEEEEEGBGGGGBGEEEEEEEEEEEEEEDEEEEEEEEGBGGGGBBBBBBBBBBBBBBBBBBBBBBBBBBBGBGGGGGGGGGGGGGGGGGGGGGGGGGGGGGBVGGGGBGGGGGGGGGGGGGGGGGGGGGGGBBVtGGpppppppppppppppppppGGGGGGGBVteGGprrrrrrrrvrrrrrrrrpGGGGGGBVtehGGpwwwwtttttttttwwwwpGGGGGBVtehGGGpppppvrrrrrrrvpppppGGGGBVtehGGGGpppppppppppppppppppGGGBVtehGGGGGGGBGGGGGGGGGGGGGGGGGGBVtehGGGGZ [>O@gygyo>Б А<_:A[C#R8 ('G ˾|w|;; *=\s#rv͎{ ::\ ( ((<2\6!%"B\!"D\;;}X AC!X!X\\X|<<<<<<<66678<<|llll~UU P UUUU ټx1cG?UUUUfffffff66<<<<<<<<?!X!X??Ͷ??????<~BBBB~{ҵYL8Wq/uv>\\X|<<<<<<<66678<<|llll~UU P UUUU ټx1cG?UUUUfffffff66<<<<<<<<?jMM 7098 ANDY MORGAN 1984 ATLANTIS SOFTWARE LTD.  "23411":SCR="0":HSCR="0" "0":ڰ"0":ٰ"7": }"23609","100":"23658","8":"10","3";ٰ"6";ܰ"1";"M A S T E R M A R I N E R";"19","9";"By ANDY MORGAN":"9980" F="-10"̰"15":װ".02",F:F ("12","4";"With whom am I playing ?" n$:n$>"18""11" n$="1510541441""9998" "12" j"15","1";"NAME TOO LONG MAX. 18 LETTERS.":"150":"15","1";" ":"6" n$="""6" "9600" n=(("32"-(n$+"13"))/"2")  "7":ڰ"7":ٰ"0":"20":"37" "6":ڰ"7":ٰ"0"::"1",n;n$;" SHIPPING CO.":"0","152":"255","0":"0","0":"0","175":"255","0":"0","175":"0","0":"255","0":"0","80":"255","0":"0","175":"255","0" "4","1";ٰ"0";"BANK `";"6","1";ٰ"1";"FIN CO. `";"8","1";ٰ"2";"UNITS :";"10","1";ٰ"3";"LOCATION: " "4","20";ٰ"0";"General";"5","20";ٰ"1";"Arms";"6","20";ٰ"2";"Coal";"7","20";ٰ"3";"Whiskey";"8","20";ٰ"4";"Bullion": %AAA="0":Y$="":LL="1":RI="0":RC="4":S1="0":S2="0":S3="0":S4="0":S5="0":XXX="0":REP="0":CAN1="0":INJ1="0":INJ="0":CAN="0":T3="0":BK4="0":BK5="0":FC="0":IN1="0":IN2="0":IN="0":BK2="0":BK1="0":W1="0":W2="1":MT="1":SF="0":PS="0":tot="0":bk1="0":HL="0":dk="0":sg="0":ms="0":dks="0":NOPROF="0":PROF="0":W$="???":Z$="":VI="0":t="0":u="50":G="0":A="0":C="0":W="0":B="0":l="1" &1BK="25"*(*"25"):BK<"250"BK>"700""38" '6fi="100"*(*"110"):fi<"5000"fi>"10000""39" Z "9900" \ "9800" d"4","10";ٰ"7";" ";"4","10";ٰ"0";BK;"6","10";ٰ"7";" ";"6","10";ٰ"0";fi;"8","10";ٰ"7";" ";"8","10";ٰ"0";u f"10","10";L$ i"4","29";ٰ"7";" ";"4","29";ٰ"0";G;"5","29";ٰ"7";" ";"5","29";ٰ"0";A;"6","29";ٰ"7";" ";"6","29";ٰ"0";C;"7","29";ٰ"7";" ";"7","29";ٰ"0";W;"8","29";ٰ"7";" ";"8","29";ٰ"0";B x"13","1";ٰ"2";"OPTIONS:";"15","1";"1. Buy";"16","1";"2. Sell";"17","1";"3. Sail";"18","1";ٰ"0";"4. Pay your tax":L="1""19","1";ٰ"2";"5. ";ٰ"1";"Visit the";"20","4";"Finance Co." "13","17";ٰ"0";"PRICES:";"15","17";ٰ"0";"General ";"16","17";ٰ"1";"Arms ";"17","17";ٰ"2";"Coal ";"18","17";ٰ"3";"Whiskey ";"19","17";ٰ"4";"Bullion " "15","25";ٰ"0";"`";"15","26";" ";"15","26";P("1");"16","25";"`";"16","26";" ";"16","26";P("2");"17","25";"`";P("3");"18","25";"`";"18","26";" ";"18","26";P("4");"19","25";"`";"19","26";" ";"19","26";P("5") 1M$:M$"1"M$"2"M$"3"M$"4"M$"5""150" Lɰ"1"M$="5""150" M$="1""1000" M$="2""2000" M$="3""3000" M$="4""1400" M$="5""4000"  "9950" [U="0""14","1";ٰ"0";"You have a";"15","1";"full cargo":"1260":"9950":"120" ="14","1";ٰ"1";"What do you";"15","1";"wish to buy ?" "17","2";ٰ"2";"G/A/C/W/B" 2P$:P$"G"P$"A"P$"C"P$"W"P$"B""1250" P$="G"P=P("1") P$="A"P=P("2") P$="C"P=P("3") P$="W"P=P("4") P$="B"P=P("5")  "9950" $H"14","1";ٰ"2";"You can afford";"15","1";"to buy ";ٰ"0";(BK/P) .="17","1";ٰ"1";"How many do";"18","1";"wish to buy ?" /U$ 03F="1"̱U$:U$(F)<"48"ůU$(F)>"57""1071":F 4 Q=("0"+U$) 8Q>U"1200" =Q*P>BK"1300" BU=U-Q:BK=BK-(Q*P) LP$="G"G=G+Q NP$="A"A=A+Q PP$="C"C=C+Q RP$="W"W=W+Q TP$="B"B=B+Q V "9950" `cc="0":>".7""6170" j"100" ~ "9950" G"14","1";ٰ"3";"You only have";"15","1";"space for ";u:"1260" "50":"9950":"1060" M"9950":"14","1";ٰ"1";"You only have ";"15","1";"room for ";ٰ"0";U #"1260":"100":"9950":"1060" Y"19","2";ٰ"0";ݰ"1";"PARDON ?":"100":"19","2";ٰ"7";ݰ"0";" ":"1010" ,F="0"̰"9":װ".1","25":װ".1","35":F: "9950":X="14"̰"20":X,"1";ٰ"2";۰"1";" ":X:"16","2";ٰ"2";ݰ"1";"NO CREDIT IS";"18","2";" AVAILABLE. " !"1260":"50":"9950":"120" ܉W2=T:"7":ڰ"7":ٰ"2":ܰ"1"::"1","3";ڰ"2";ٰ"7";" H. M. INSPECTOR OF TAXES ":"3","7";N$;"5","7";"WEEK ";W1;" TO WEEK ";W2 BK2=BK2+BK1/"100"*"33.3" BK2="0"BK1="0" F"7","6";"TAX DUE ON PROFITS";"5";"FROM WEEK ";W1;" TO WEEK ";W2 n"10","7";ٰ"0";"PROFITS = `";BK1;"12","7";"TAX DUE = `";BK2;"14","7";"BANK = `";BK:װ"2","0" lBK1="0"۰"1";"17","2";"YOUR TAX IS PAID UP TO DATE":װ"2","12":"200":۰"0":ܰ"0"::"20":"100" 8"17","1";"How much do you";"1";"wish to pay off?" U$ 3F="1"̱U$:U$(F)<"48"ůU$(F)>"57""1525":F BK3=("0"+U$) $BK3ɺBK3BK3<"0"BK3>BK2"1525" BK3="0""1650" BK3>BK"1600" BK=BK-BK3:XXX="1" BK1=BK1-(BK3/"33.3"*"100")  BK2="0":BK3="0"  %(BK1/"100"*"33.3")="0""1700"  P"20","1";"YOU STILL OWE ";ٰ"0";"`";(BK1/"100"*"33.3");ٰ"2";" IN TAXES"  F="0"̰"20":װ".035","20":F "100":ܰ"0"::"20":"100" @`"17","1";" YOU DONT HAVE ";"1";" ENOUGH MONEY. ":װ".5","0":װ"1",-"5":"50":"1520" r8"17","1";"Are you sure ";"1";"about that ? " wm$:m$="N"M$="NO""1520" |ܰ"0"::"20":"100" W1=W2:"17","1";"YOUR TAX IS PAID";"18","1";" UP TO DATE NOW ":װ".5","2":װ".5","4":װ".5","6":װ".5","8":"100":ܰ"0"::"20":"100"  "9950" _U="50""14","1";ٰ"0";"You have no";"15","1";"cargo aboard":"1260":"9950":"120" >"14","1";ٰ"3";"What do you";"15","1";"wish to sell ?" "17","2";ٰ"1";"G/A/C/W/B" P$ -P$"G"P$"A"P$"C"P$"W"P$"B""2010"  "2150" P$="W"ƥ>".75""2250" P$="B"ƥ>".75""2280" P$="G"P=P("1") P$="A"P=P("2") P$="C"P=P("3") P$="W"P=P("4") P$="B"P=P("5")  "9950"  B"14","1";ٰ"1";"How many do you";"15","1";"wish to sell ?"  U$ 0F="1"̱U$:U$(F)<"48"ůU$(F)>"57""2061" F  Q=("0"+U$) P$="G"Q>G"2330" P$="A"Q>A"2330" P$="C"Q>C"2330" P$="W"Q>W"2330" P$="B"Q>B"2330" !PROF="0""2088" "PR1="1""2088" # "9950" $h"14","1";"51% OF THE";"15","1";"PROFITS HAVE";"16","1";"BEEN PAID TO";"17","1";O$:"1260" &"50":"9950" 'PROF>"0""2122" (!BK=BK+P*Q:bk1=bk1+(P*Q):U=U+Q *P$="G"G=G-Q ,P$="A"A=A-Q .P$="C"C=C-Q 0P$="W"W=W-Q 2P$="B"B=B-Q 4BKȰ"1000000""9200" > "9950" Hcc="1":>".7""6170" I"100" JBK=BK+P*Q/"2":U=U+Q L "2090" fP$="G"G="0""2200" hP$="A"A="0""2200" jP$="C"C="0""2200" lP$="W"W="0""2200" nP$="B"B="0""2200" pZ$="""2038" r "2300" P$="G"Z$="General" P$="A"Z$="Arms" P$="C"Z$="Coal" P$="W"Z$="Whiskey" P$="B"Z$="Bullion"   "9950" Ԑ"14","1";"YOUR ";W;" UNITS";"15","1";"OF WHISKEY ARE";"16","1";"BOTTLES OF";"17","1";"COLOURED WATER";"19","1";"SORRY, NO DEAL" 1"1260":"300":"9950":U=U+W:W="0":"100"  "9950" "14","1";"YOUR ";B;" UNITS";"15","1";"OF BULLION ARE";"16","1";"PAINTED BARS OF";"17","1";"LEAD !!";"19","1";"SORRY, NO DEAL" 1"1260":"300":"9950":U=U+B:B="0":"100"  "9950" O"14","1";ٰ"1";"You have no";"15","1";ٰ"2";Z$;ٰ"1";" aboard":"1260" "9950":Z$="":"120" j"9950":"14","1";ٰ"2";"You don't have";"15","1";ٰ"1";Q;ٰ"2";" aboard":"1260":"50":"2060" t=t+"1":VI="0" Y$=L$ "9950" #"14","1";ٰ"2";"DESTINATION ?" ֋"16","1";ٰ"1";"1. SOUTHAMPTON";"17","1";"2. SWANSEA";"18","1";"3. LIVERPOOL";"19","1";"4. LONDON";"20","1";"5. NEWCASTLE" "15"+L,"1";" " U$:L=U$ 0F="1"̱U$:U$(F)<"49"ůU$(F)>"53""3036" F L=("0"+U$) L=LL"3200" LL=L L="1"S1=S1+"1" L="2"S2=S2+"1" L="3"S3=S3+"1" L="4"S4=S4+"1" L="5"S5=S5+"1" PROF="0""3055" PROF=PROF-"1" (fi=("1.12"*fi):fiȰ"25000""3500" PR1="0" "9900" T3="0"ƺBK4>"1""3300" T3>"0""3330" )T="5"T="10"T="15"T="20""8000" RC=RC-"1":RC="0""6305" "8200" >".95""4500" >".9""5000" >".85""5500" >".8""6000" >".75""6500" >".7""9000" >".65""4300" >".6""7000" >".55""7500" >".5""8500" >".25""3067"  8200 XXX="0":ܰ"0":"20"  "9950" "92" "9950" V"14","1";"YOU ARE IN";"16","1";L$:װ"1","-5":װ"1","-9":"25":"3010" !BK=BK-BK4:"0":ڰ"0":ٰ"6"::"1","3";" H. M. INSPECTOR OF TAXES ";"8","0";"YOU HAVE FAILED TO PAY OFF YOUR OUTSTANDING TAX BILL FOR WHICH YOU WERE SENT TO PRISION. THIS LEAVES NO OPTION TO US EXCEPT THE CONFISCATION OF YOUR VESSEL AND ALL CARGO":װ"2",-"10":"500":"9700"  T3=T3-"1" BK4="0""3064" :"10","0";"DO YOU WISH TO PAY SOME OF YOUR OUTSTANDING TAX BILL OFF ?";"13","0";"YOUR BANK ACCOUNT IS `";BK;"15","0";"AND YOU STILL OWE `";BK4;" FROM";"0";"WHEN YOU WERE SENT TO PRISON":'"[Y/N]" &T3="1"'"THIS IS YOUR LAST CHANCE" M$:M$="N"M$="NO""3064" "How much ? ";U$ 3F="1"̱U$:U$(F)<"48"ůU$(F)>"57""3350":F BK5=("0"+U$) $BK5ɺBK5BK5<"0"BK5>BK4"3350" BK4=BK4-BK5 % BK=BK-BK5 *BK4="0"T3="0" 4 "3065" C"0":ڰ"0":ٰ"1"::F="0"̰"15":E="0"̰"7":E:װ".009",E:E:F "2":ڰ"2":ٰ"6"::"1","0";"EASYMONEY INTERNATIONAL FINANCE";"4","0";ٰ"7";"YOU HAVE EXCEEDED YOUR LIMIT OF `25000, AND IT IS WITH REGRET WEMUST FORECLOSE ON YOUR LOAN." "8","0";ٰ"7";"OUR LEGAL DEPARTMENT HAVE ISSUEDA DIRECTIVE TO THE EASYMONEYBAD DEBT RECOVERY OFFICER WHO ISAUTHORISED TO TAKE POSSESION OF ""TITAN TRADER"" AND ANY CARGO ABOARD AND DISPOSE OF BOTH THE VESSEL AND ANY CARGO TO RECOVER THE OUTSTANDING MONIES OWING TO" /"16","0";"EASYMONEY INTERNATIONAL FINANCE" 6F="7"̰"0"-"1":F:װ".25",F:F:"2":װ"3",-"15" <AAA="1":"21","6";"ANY KEY TO CONTINUE":"0":"9700"  "9950" U"14","1";ٰ"3";"Do you wish to";"15","1";"BORROW/REPAY ?";"16","1";"(B/R)" C$ C$"B"C$"R""4020" C$="B""4100" L"9950":"14","1";ٰ"1";"How much do you";"15","1";"wish to repay ?" V VɺVV>fiV>BK"4052" fi=fi-V:BK=BK-V:"9950" "100" VI=VI+"1":VI>"1""4250"  M"9950":"14","1";ٰ"2";"How much do you";"15","1";"wish to borrow ?"  Z  ZɺZ"4106"  Z>"7000""4112"  >".5""4128" 3X="100"*(*"75"):X<"1500"X>"7000""4112" ZXZ=X  "4200"  fi=fi+Z:BK=BK+Z:"9950" ""100" h_"9950":"14","1";ٰ"2";"SORRY, Your";"15","1";"limit is ";Z:"1260":"9950":"4128" "9950":"14","1";ٰ"2";"You have had";"15","1";"one loan and";"16","1";"as funds are";"17","1";"low we will";"18","1";"not be able";"19","1";"to give you";"20","1";"this advance" Be="0"̰"7":f="20"̰"0"-"1":װ".01",f:f:e:"9950":"120" ѯ"5":ڰ"5":ٰ"9"::"YOUR CREW ARE ASKING FOR A RISE IN WAGES":װ"1","20":"150":'"YOU HAVE 25 CREW, HOW MUCH PER MONTH ARE YOU WILLING TO GIVE EACH MAN ?":װ"1","25" U$ 0F="1"̱U$:U$(F)<"48"ůU$(F)>"57""4310" F  F=("0"+U$) RI1=F ݂RI1<"6""20","0";"YOU'VE GOT TO BE KIDDING !!!":"100":"21","0";"DO YOU WANT A MUTINY !!!":װ"1","0":"150":"4485" RI1<"6""4310" A"20","0";"THE CREW ARE REVIEWING THE OFFER":"150":"4485" ZZZ=(*"50")+"5" RI1"0""4707" bF,,"GIVE US 51% OF YOUR PROFITS FROMTHE NEXT ";PR;" PORTS (PROF)" cDB>"0",,"OR GIVE US ALL THE BULLION YOU HAVE ABOARD (GIVE)" d4X$:"20":X$"LOAN"X$"PROF"X$"GIVE""4708" eB<"1"X$="GIVE""4705" fX$="LOAN""4720" gX$="PROF""4750" hX$="GIVE""4800" i "4720" jB="0""4718" kS,,"WELL, YOU DIDN'T HAVE MUCH LUCK WITH THE LOAN DID YOU",,,"WHAT NOW ?":"4706" nW,,"I SEEMS YOU HAVE NO CHOICE NOW BUT TO GIVE US THE 51% FROM YOURNEXT ";PR;" PORTS" o,F="0"̰"20":װ".01",F:F:"200":"4750" p"2":ڰ"2":ٰ"9"::"1","0";"EASYMONEY INTERNATIONAL FINANCE":"150":"4","0";"WE HAVE REVIEWED YOUR RECENT APPLICATION FOR A LOAN TO COVER YOUR UNFORTUNATE SITUATION. DUE TO THE RECENT ECONOMIC RECESSIONFUNDS HAVE BEEN LIMITED." r>".5" "4730" x"400":"10","0";"THEREFORE WE ARE UNABLE TO GRANTYOUR LOAN OF `";HD:F="0"̰"4":E="25"̰"0"-"1":װ".003",E:E:F:"300"::PROF>"0""9850" y "4714" zfi+HDȰ"25000""4728" |"400":"10","0";"BUT UNDER THE CIRCUMSTANCES WE THINK AN ADVANCE OF `";HD;" IS","IN ORDER":f="0"̰"4":e="0"̰"25":װ".003",e:e:f:fi=fi+HD:"250" ~ "4556" "6":ڰ"6":ٰ"0"::"1",NN;L$;" DOCK COMPANY",,,"WELL CAPTAIN, I SEE YOU WISH TO PAY OFF YOUR HARBOUR DUES THIS WAY, I KNOW IT IS EXPENSIVE THISWAY BUT I HAVE TO HAVE MY CUT FOR STICKING MY NECK OUT FOR YOU" r,,,,"YOU SEE I'M DUE TO RETIRE IN THEVERY NEAR FUTURE AND I'M TRYING TO GET A LITTLE NEST EGG FOR MY WIFE AND I" ,"17","10";"MANY THANKS";"19","10";M$ F=-"25"̰"45":װ".025",F:F PROF=PROF+PR O$=M$:PR1="1" "400":"3080" "3":ڰ"3":ٰ"7"::"1",NN;L$;" DOCK COMPANY";"4","0";"OUR STEVEDORS ARE NOW UNLOADING THE ";B;" UNIT";("S"B>"1");" OF BULLION" @,,,,"A WISE DECISION CAPTAIN, WE HOPEWE CAN DO BUSINESS AGAIN" !G="0"̰"35":װ".05",G+"10":G B="0" "300":"3080" O"6":ڰ"6":ٰ"1"::"2","0";"ATTENTION ALL SHIPS GALE WARNING" <".9"M$="NORTHERLY" <".8"M$="EASTERLY" <".7"M$="SOUTHERLY" <".6"M$="WESTERLY" <".5"M$="NORTH-EASTERLY" <".4"M$="NORTH-WESTERLY" <".3"M$="SOUTH-EASTERLY" <".2"M$="SOUTH-WESTERLY" !FC=(*"13"):FC<"8""5025" FC="8"K$="GALE" FC="9"K$="SEVERE GALE" FC="10"K$="STORM" FC="11"K$="SEVERE STORM" FC="12"K$="HURRICANE" Y"6","3";"DIRECTION - ";M$;"8","3";"SEVERITY - ";K$;"10","3";"FORCE - ";FC #HR=(*"23")+"1":SC=(*"61") "12","3";"ISSUED AT - "; HR<"10""12","15";"0"; HRȰ"10""12","15";HR; HR<"10""12","16";HR; "12","17";":"; SC<"10""12","18";"0";SC SCȰ"10""12","18";SC "12","21";"HOURS GMT" #f="0"̰"6":װ".5","0":"25":f  "250": U>47/"5100" >".5""5200" #"9","0";"THE ";K$;" HAS EASED" j"11","0";"YOUR VESSEL IS NOW SAFE TO CARRYON IT'S VOYAGE ";N$:װ"1","5":װ"1","10":"250":"3080" PU="50""5100" Z"1":ڰ"1":ٰ"7"::"5","0";"YOUR VESSEL IS SHIPPING WATER":װ"1","20":"150":"8","0";"YOU WILL HAVE TO JETTISON ";(("SOME"FC<"12")+("ALL"FC="12"));"9","0";"OF YOUR CARGO TO RIDE OUT THE STORM":װ"1","25":"200" dFC="8"FC="9""5300" nFC="10"FC="11""5350" xFC="12""5400" TU="50":G=G-(G/"4"):A=A-(A/"4"):C=C-(C/"4"):W=W-(W/"4"):B=B-(B/"4") U=U-G-A-C-W-B "13","0";"YOU NOW HAVE :-";"15","8";"GENERAL - ";G;"16","8";"ARMS - ";A;"17","8";"COAL - ";C;"18","8";"WHISKEY - ";W;"19","8";"BULLION - ";B:F="20"̰"50":װ".025",F:F:"300":"3080" TU="50":G=G-(G/"2"):A=A-(A/"2"):C=C-(C/"2"):W=W-(W/"2"):B=B-(B/"2") U=U-G-A-C-W-B:"5320" 1U="50":G="0":A="0":C="0":W="0":B="0" "J"14","0";"YOU NOW HAVE NO CARGO ABOARD":װ"2",-"15":"100":"3080" }XXX="1""3080" ~BK1<"500""3080" "7":ڰ"7":ٰ"2":ܰ"1": 5"1","3";ڰ"2";ٰ"6";" H. M. INSPECTOR OF TAXES " "4","1";N$;" SHIPPING CO." $W1=W2:BK2=BK2+BK1/"100"*"33.3" m"6","1";"WE MUST INFORM YOU THAT YOU OWE A TOTAL OF ";ٰ"0";"`";BK2;ٰ"2";" IN";"1";"BACK TAXES." "10","1";"FAILURE TO SETTLE THIS DEMAND WILL INCURE ";ٰ"0";۰"1";"IMPRISIONMENT";ٰ"2";۰"0";" FOR A PERIOD OF UP TO 18 MONTHS" 2"17","16";"H. M. INSPECTOR";"19";"OF TAXES" H="0"̰"8":װ".025","30":H "500" bk".5""6100" g"14","2";"ALL CLEAR THE MIST HAS LIFTED":װ".5","5":"20":װ".5","5":"150":"3080" ԑ:"1","0";"YOU HAVE COLLIDED WITH ANOTHER VESSEL IN THE MIST AND WILL NEEDA TOW TO GET TO PORT TO CARRY OUT REPAIRS":װ".5","30":"150" ޵B>"0"A>"0",,"AS YOU ARE CARRING CONTRABAND YOU WILL HAVE TO JETTISON ANY ARMS AND BULLION ABOARD AS THE HARBOUR AUTHORITIES WILL WANT TOINSPECT THE DAMAGE TO THE VESSEL" U=U+A+B:A="0":B="0" TOW=(*"500"+"100")*T /"100":,,"A TOW WILL COST YOU `";TOW:"200" TOW>BK"6300"  BK=BK-TOW Q,,"YOU HAVE BEEN TAKEN IN TOW TO KELPIE BOAT SERVICES":"150":"7504" REP="0":"6":ڰ"6":ٰ"0"::"0","4";ܰ"1";"KELPIE BOAT SERVICES LTD";ܰ"0";"4","0";"WE HAVE CARRIED OUT THE REPAIRS TO YOUR VESSEL, AND SHE IS NOW READY FOR SEA AGAIN"  "64958" "0":ڰ"5":ٰ"0": $?f="8"̰"12":f,"0";" ":f )@f="13"̰"17":f,"0";" ":f .@f="18"̰"21":f,"0";" ":f 3ڰ"2";"10","20";"";"11","20";"";"12","21";"";ڰ"4";"13","22";"";"14","23";"";"15","24";"";"16","24";"";"17","0";" " 8;ڰ"5":ٰ"9":"6","0";" " =/"7","0";"" B$ڰ"2":ٰ"7":"9","2";L$;" DOCKS" G!"12","0";"" L"13","14";" " Qcc="1""6250" VF="0"̰"12" [Oڰ"4":ٰ"0":"14",F;" ";"15",F;ٰ"1";" ";"16",F;" " `װ".007","-20":"5":F e"50":"20" f"100" jF="12"̰"0"Ͱ"-1" oOڰ"4":ٰ"0":"14",F;" ";"15",F;ٰ"1";" ";"16",F;" " yװ".007","-20":"5":F ~"50":"20" "100" AAA=1::"10","0";"YOU DO NOT HAVE ENOUGH MONEY TO ";"12","0";"PAY FOR A TOW AND YOUR VESSEL ";"14","4";"HAS SUNK FROM THE DAMAGE":F="10"-"20"-"1":װ".025",F:F:"100":"9700"  "8200" aCW="0":FB="0":PF="0":"7":ڰ"7":ٰ"9":ܰ"1"::"2","4";" MONTHLY RUNNING COSTS " UPF=((*"100")+"250")*T/"2":CW="1000"+(RI*"25"):FB=(*"300")+"100"+"8"*T ^'''';"6";"CREWS WAGES `";CW:';"6";"SHIPS STORES `";FB:';"6";"PILOTAGE FEES `";PF .'"6";"TOTAL.........`";(FB+PF+CW) F'''"4";"TO BE PAID IMMEDIATELY.","4";"_______________________" (F="0"̰"20":װ".005","25":F:"150" (FB+PF+CW)>BK"6450" `BK=BK-(CW+FB+PF):RC="4"::"10","7";"THANK YOU CAPTAIN":װ"2","20":"50":ܰ"0":"3080" 2:'''''"2";"YOU DON'T HAVE ENOUGH MONEY!":F="0"̰"20":װ".025","-10":F:"100":'''"2";"YOUR CREDITORS ARE ANGRY AND"'"1";"HAVE THROWN YOU OFF YOUR SHIP!" <`F="25"̰"-10"Ͱ"-1":װ".02",F:F:"20":װ"1","-19":"200":ܰ"0":BK=BK-(FB+PF+CW):"9700" eA"2":ڰ"2":ٰ"9"::"0","2";"THE SEAGULL STAR INSURANCE CO." f IN3="0" np"3","0";"Dear ";N$;"5","0";" We have to inform you that theinsurance for your vessel is duefor renewal" x:"9","0";"Your premium for ""TITAN TRADER"" is now :-" zTU=T |TU>"10"TU="10" tIN=((*"100")+"30")*TU*(T/2):IN1=((*"100")+"20")*(G+A+C+W+B):IN2=((*"130")+"10")*TU*(T/2) y"12","8";"VESSEL `";IN:װ"1","5":"13","8";"CARGO `";IN1:װ"1","10":"14","8";"CREW `";IN2:װ"1","15" =IN3=IN3+IN+IN1+IN2:"16","8";"TOTAL `";IN3:װ"2","20" "18","0";" This bill is overdue and must be settled at once, failure to comply with this will force the company to take legal action";"19","11";ް"1";"__ ____":"200" IN3BK"6750" ;:"4","1";"The Seagull Star Insurance Co.";"8","0";" As your bank account is only `";bk;" and your bill is `";in3;"10","0";"we have to take steps to recoverthe outstanding premium, a writ has been served on your vessel, which will be sold - along with any cargo aboard - to recover the money owing" wBK=BK-IN3:"18","0";"Let me offer my condolences on your bad luck ";n$:װ".5",-"5":װ"1","10":"750":"9700" ^:"1","1";"THE SEAGULL STAR INSURANCE CO.";"4","0";" Thank you very much for the speedy settlement of your bill";"7","0";" We enclose a receipt for your convenience":"200" cDf="11"̰"21":f,"0";ڰ"7";" ":f hEٰ"1":"3","3":"249","0":"0","82":-"249","0":"0",-"82" rڰ"7":ٰ"0":"12","3";"Seagull Star Insurance Co";"15","3";"Received in respect of :-";"17","8";"""TITAN TRADER""";"19","7";"The sum of `";in3 |*װ"1.5","25":BK=BK-IN3:"350":"3080" ]INJ1="0":"4":ڰ"4":ٰ"9"::"6","0";"PIRATES ON THE PORT BOW CAPTAIN":װ"1",-"5":"150":"9","0";" LONG JOHN QUICKSILVA AND HIS VICIOUS BAND OF CUT-THROATS ARE TRYING TO BOARD YOUR VESSEL TO PLUNDER YOUR CARGO":װ"1",-"10":"300" ba"15","0";"CALL OUT YOUR CREW, STAND-BY TO";"16","8";"REPEL BOARDERS":װ"1",-"15":"200" g:CAN="1""7400" l>".55""7200" v"8","0";"AFTER A BLOODTHIRSTY BATTLE WITHLONG JOHN QUICKSILVA YOUR TRUSTYCREW HAVE REPELLED THE BOARDERS AND YOUR VESSEL IS SECURE AGAIN":F="0"̰"20":װ".025",F:F:"200":"3080" AAA=1::"6","0";"YOU DON'T HAVE ENOUGH MONEY TO PAY THE MEDICAL BILL SO YOUR CREW HAVE MUTINIED AND THROWN YOU OVERBOARD";"12","0";"TOUGH LUCK ";N$:F="20"-"15"-"1":װ".025",F:F:"150":"9700"  s"2","0";"YOUR CREW HAVE BEEN CAUGHT OFF GUARD, AND ARE SOON OVERWHELMED BY THE PIRATES":װ"1.5","15":"200" "U="50"'"THE PIRATES ARE ANGRY BECAUSE YOU HAVE NO CARGO ABOARD. LONG JOHN QUICKSILVA PRODS YOU IN THEBELLY WITH HIS SABRE AND SAYS HEWILL GET YOU NEXT TIME !":"200":װ"1","20":"7220" *"6","0";"THE PIRATES ARE TRANSFERRING ALLOF THE CARGO TO THEIR VESSEL":װ"2","25":"200":U="50":G="0":A="0":C="0":W="0":B="0" 4INJ=(*"12")+"1":'"DURING THE BATTLE ";INJ;" OF YOUR","CREW WERE INJURED AND WILL NEED MEDICAL ATTENTION AS SOON AS YOUREACH ";L$:װ"2.5","30":"200" 9MED=(*"150")+"30":'"THIS WILL COST YOU :-"'"`";MED;" FOR ";("EACH OF "INJ>"1");"THE ";INJ;" INJURED ";"0";"CREW";("MAN"INJ="1")+("MEN"INJ>"1"):װ"2.5","35":"100" >9INJ1=INJ1+INJ*MED:'"THAT MAKES A TOTAL BILL OF `";INJ1 C"200" HINJ1>BK"7100" R BK=BK-INJ1:INJ1="0":"3080" v"1":ڰ"1":ٰ"6"::"10","0";"YOUR CREW ARE MANNING THE CANNONYOU BOUGHT FROM ""HONEST"" JACK":װ"1","5":"150" >".66""7450" :"7","0";"THE CANNON SPITS FIRE!":װ"1","10":"50":"9","0";"LONG JOHN QUICKSILVA'S SHIP HAS BEEN HIT AND THEY ARE TURNING AWAY":װ"1","15":"100":"13","0";"THE BATTLE IS OVER, GIVE YOUR CREW A TOT OF RUM!":װ"1","20":"250"  "3080" l:CAN="0":"8","0";"THE CANNON FAILED TO FIRE":F=016:װ".02","45":F:"150"::"7200" P"6":ڰ"6":ٰ"0"::"0","4";ڰ"2";ٰ"7";ܰ"1";"KELPIE BOAT SERVICES LTD";ܰ"0";"2","3";ڰ"6";ٰ"0";"FOR THE FOLLOWING REPAIRS TO YOUR VESSEL :-" Q "7600" V;F="5"̰"17":F,"4";ڰ"7";" ":F [E"6","5";ڰ"7";ٰ"2";"Hull ";ٰ"0";"`";hl;"8","5";ٰ"2";"Deckhouse ";ٰ"0";"`";dk;"10","5";ٰ"2";"Steering Gear ";ٰ"0";"`";sg;"12","5";ٰ"2";"Masts & Sails ";ٰ"0";"`";ms;"14","5";ٰ"2";"Decks ";ٰ"0";"`";dks;"16","5";ٰ"1";"TOTAL ";ٰ"0";"`";hl+dk+sg+ms+dks `h"20","0";ڰ"2";ٰ"7";ܰ"1";۰"1";"THIS ACCOUNT IS OVERDUE AND MUST BE SETTLED AT ONCE " e-f="15"̰"25":װ".05",f:f:"400":"7650" )HL="5"*(*"28")*t:HL<"50""7600" )dk="5"*(*"24")*t:dk<"30""7605" )sg="5"*(*"18")*t:sg<"20""7610" /ms="5"*(*"19")*t/".5":ms<"20""7615" 1dks="5"*(*"22")*t/".5":dks<"30""7620"  :tot=tot+hl+dk+sg+ms+dks bkK$:K$"N"K$"Y""8510" !HK$="N""8700" !R<".5""8600" !W9"150":'''" IT'S A TRICK! ":װ".5","25":"150" !\G''"YOU'VE BEEN AMBUSHED BY PIRATES":װ".2","30":װ".2","35":"200" !f"200"::"7200" ! "8950" !"200":,,,,"YOU HAVE ARRIVED AT ";L$::"100":"YOUR CLAIM FOR SALVAGE IS BEING DEALT WITH":"150":,,"YOU HAVE BEEN AWARDED `";SAL:F="20"̰"40":װ".02",F:F !BK=BK+SAL:"3080" !@,,"ANOTHER SHIP HAS GONE TO THE AIDOF THE STRICKEN VESSEL...." "<".7""8800" " "8950" "q"100":,,"THEY HAVE TAKEN HER IN TOW TO",L$;,,,,"THEY HAD `";SAL;" SALVAGE MONEY":װ"1","20":"200":"3080" "`"100":,,"IT WAS A TRICK....":"100":,,"IT WAS LONG JOHN QUICKSILVA AND HIS BAND OF CUT-THROATS!":װ"1",-"15":"200":"3080" "!SAL="100"*(*"251")+"500": #,A="0"B="0""3080" #-"0":ڰ"0":ٰ"5"::ٰ"6";"1","0";" A CUSTOMS LAUNCH APPEARS ON THE HORIZON, AND SOON CLOSES TO WITHIN HAILING DISTANCE":"100":װ"1","0":װ"1.5","5":"150" #2"5","0";"AHOY CAPTAIN ! STOP YOUR VESSEL WE'RE COMING ABOARD":"200":"8","0";"WE HAVE HAD A TIP OFF THAT YOU ARE CARRYING ";("ARMS"A>"0")+(" AND "A>"0"B>"0")+("BULLION"B>"0") #4"200":>".5""9100" #<ٰ"6";"11","0";" THE ""RUMMAGE SQUAD"" START TO SEARCH THROUGH YOUR CARGO HOLD AND WITHIN MINUTES HAVE LOCATED THE ILLEGAL CARGO":װ".75",-"5":װ"1.5",-"10" #FEFINE="1000"*(A+B)*((*"3")+"1"):FINE>"200000"FINE="200000" #P"250":"16","0";" YOUR VESSEL IS UNDER ARREST FOR CARRING CONTRABAND, AND YOU WILL HAVE TO APPEAR IN COURT TO ANSWER THE CHARGES AGAINST YOU":װ"2",-"20":"350" #Zz:"10","2";"YOU HAVE BEEN FOUND GUILTY OF CARRYING CONTRABAND AND WE FINE YOU A TOTAL OF `";FINE:װ"2",-"10":"250" #_FINEBK"9070" #dB'''"TOUGH LUCK CAPTAIN YOU'RE BROKE":1,5:250 #iBK=BK-FINE:"9700" #nT'''"NOW LET THAT BE A LESSON TO YOU":BK=BK-FINE:U=U+A+B:A="0":B="0":"3080" #ٰ"7";"11","0";"THE ""RUMMAGE SQUAD"" SEARCH YOUR VESSEL, BUT YOU MANAGE TO STOP THEM FINDING ANYTHING SUSPICIOUS":"150":'"THE CUSTOMS MEN BID YOU GOODBYE AND LEAVE YOU TO CARRY ON WITH YOUR VOYAGE TO ";L$:װ".5","20":"300":"3080" #NN=(("32"-(N$+"10"))/"2") $"6":ڰ"6":ٰ"9"::F="0"̰"21":F,NN;"WELL DONE ";N$:װ".005",F+"20":F:"10":F="21"̰"1"-"1":F,"0";" ":F $F="1"̰"21":F,"5";"YOU'VE MADE A MILLION!":װ".005",F+"30":F:"10":F="21"̰"2"-"1":F,"5";" ":F $װ"1","15":"3","0";"YOU CAN NOW RETIRE A WEALTHY MAN":"100":,,"IT TOOK YOU ";T;" WEEKS TO MAKE A","GRAND TOTAL OF `";BK:װ"1","20" $",,"YOU SAILED TO :-";"10","7";"SOUTHAMPTON ";S1;" TIMES";"11","7";"SWANSEA ";S2;" TIMES";"12","7";"LIVERPOOL ";S3;" TIMES";"13","7";"LONDON ";S4;" TIMES";"14","7";"NEWCASTLE ";S5;" TIMES" $,Zװ"1","25":,,"NOW HAVE ANOTHER TRY AND SEE IF YOU CAN DO IT IN LESS TRIPS! " $.5װ"1","35":SCR=BK-("12345"*T):SCR>HSCRHSCR=SCR $/>'"SCORE: ";SCR;" HI SCORE: ";HSCR:װ"1","30":"1260" $0"100":"9980" $6"9740" %_۰"1":ܰ"1":"6":ڰ"2":ٰ"7"::"10","7";"NAUGHTY ! NAUGHTY !":"200":ܰ"0":۰"0"::"2" %R:"150":"5";"WELCOME ABOARD CAPTAIN"''"2";"YOUR VESSEL IS READY FOR SEA" %"200":''''" LET ME TAKE THIS OPPORTUNITY TO"''" WISH YOU AND YOUR HEARTY CREW A"''" SAFE AND FRUITFUL FUTURE WITH"''"9";"""TITAN TRADER""" %"250":'''" GOD BLESS HER, AND ALL WHO SAIL"''"13";"IN HER":"21","1";"AND DON'T FORGET YOUR SEA-LEGS!":װ"1","20":"10":װ"1","20":"200":"6":ڰ"7":ٰ"0":ܰ"0":"14" %"0":ڰ"0":ٰ"4": %T"4","0";ٰ"6";"DUE TO YOUR CIRCUMSTANCES YOU ARE FORCED TO CONCEDE THE GAME." %f"7","0";ٰ"6";"I HOPE YOU WILL HAVE ANOTHER TRYTHOUGH I DOUBT YOU WILL FARE ANYBETTER NEXT TIME." %T<"5"K$="PATHETIC" %TȰ"5"T<"10"K$="USELESS" % TȰ"10"T<"15"K$="TERRIBLE" %!TȰ"15"T<"20"K$="VERY POOR" &TȰ"20"T<"30"K$="UNLUCKY" &TȰ"30"K$="VERY UNLUCKY" &H"11","0";"YOUR RATING AS",,"A BUSINESSMAN :- ";ٰ"6";۰"1";K$;۰"0" &a''"YOU MANAGED TO STAY IN BUSINESS FOR A TOTAL OF ";T;" WEEK"+("S"T>"1"):AAA="1""9738" & ='"BUT ENDED UP WITH DEBTS";0;"TOTALING TO `";BK & "9985" & 3"21","6";"ANY KEY TO CONTINUE":"0" &":"8","10";"TITAN TRADER" &,,,,,"DO YOU WISH TO HAVE ANOTHER GO ?" &)" {PLEASE ENTER Y/N} ",,S$ &S$"Y"S$"N""9750" &S$="Y""2" & "8200" & "9997" &*."20",NN+"1";"GOODBYE ";N$:"500" &4"0" &H P("5") &M+P("1")=(*"26"):P("1")<"1""9805" &R2P("2")="10"*(*"26"):P("2")<"50""9810" &W4P("3")="10"*(*"100"):P("3")<"300""9815" &\4P("4")="100"*(*"41"):P("4")<"500""9820" &a6P("5")="100"*(*"101"):P("5")<"1000""9825" &f &zAAA="1":"5":ڰ"5":ٰ"0"::"10","0";"AS YOU ARE ALREADY PAYING 51% OFYOUR PROFITS TO ";O$;" WE","THINK YOUR LUCK HAS JUST JUMPED OVERBOARD" &;F="0"̰"10":װ".2","10":װ".2","6":F:"200":"9700" &L="1"L$="SOUTHAMPTON" &L="2"L$="SWANSEA" &L="3"L$="LIVERPOOL" &L="4"L$="LONDON" &L="5"L$="NEWCASTLE" & &.X="13"̰"20":X,"1";" ":X & &1/7,10 :1/7,10 :1/7,15:1/7,15:1/3,15:1/5,17:1/2,19:8:1/7,19:1/7,19:1/7,19:1/7,19:1/5,19:1/3,20:1/5,19:1/2,17:8:1/5,14:1/3,10 :1/5,14:1/3,17:1/5,19:1/2,20:8:1/5,24:1/6,24:1/7,22:1/5,20:1/3,19:1/6,17:1/3,15 &": ANDY MORGAN, Saundersfoot ' F=-"10"̰"35":װ".025",F:F: ' NN=(("32"-(N$+"9"))/"2"): ' !NN=(("32"-(L$+"13"))/"2"): '9"7":ڰ"7":ٰ"0"::"10","1";"PROGRAM READY TO SAVE" '5"Z""23296","187":"X""64958","577":"MM"ʰ"1" cscN 1510541441v