Top 10k strings from sonarsal.tap in <root> / bin / z80 / software / ZxTapGames.zip / games /
Back to the directory listing
3 z$=x$+x$+x$+x$:
3 z$="you have `"+
3 ;"Equip expedition";
2 z$="you buy "+
2 z$="you "+("decide not to "
2 z$="the weather is too poor for a dive"+r$:
2 z$="You have `"+
2 ;f$(n);t(n):
2 """"""""""""""
1 z$=z$+"you've lost the ship and all your gear"+k$+"The insurance costs come to `1000"+x$:
1 z$=z$+"the tug captain charged you `500 "+k$+"for the priviledge !!"+x$:
1 z$=z$+"fuel "+
1 z$=z$+"bearing "+
1 z$=x$+x$+"Select which item you wish to auction"+k$+"or press q to quit"+r$:
1 z$=("you have stayed in the bay too long"
1 z$=("frogmen"
1 z$=("divers"
1 z$=("a private collector is"
1 z$=("Engines stopped"
1 z$="you've run aground"+r$:
1 z$="you've hit the coastline"+
1 z$="you wish to auction item "+
1 z$="you wait one hour"+x$:
1 z$="you turn on the distress beacon"+r$:
1 z$="you now have `"+
1 z$="you hire the "+("large cruiser"
1 z$="you hire "+y$+" "+
1 z$="you hire "+
1 z$="you have run out of fuel."+r$:
1 z$="you have nothing to auction."+x$:
1 z$="you have found "+
1 z$="you have `"+
1 z$="you cannot dock when you are not"+k$+"in the port"+r$:
1 z$="you cannot afford to refuel"+x$:
1 z$="you can't send down a frogman without"+k$+"dropping anchor"+r$:
1 z$="you can't send down a diver without"+k$+"dropping anchor"+r$:
1 z$="you are in port Carello. time "+t$+k$+"press:-"+k$+("e to hire a boat "
1 z$="weather report "+w$(weather)+r$:
1 z$="too deep for frogmen"+r$:
1 z$="too dark to send down a frogman"+r$:
1 z$="too dark to send down a diver"+r$:
1 z$="the automatic distress beacon goes on"+r$:
1 z$="the automatic distress beacon goes on"+k$:
1 z$="please wait while game is set up":
1 z$="or press i for instructions":
1 z$="old document that showns that several"+k$+"galleons sank here and thousands of"+k$+"pounds worth of Aztec Gold may well be"+k$+"lying at the bottom of the bay !."+x$:
1 z$="ok . "+f$(g(fi))+k$+" safely on board"+r$:
1 z$="no"+r$:
1 z$="no frogmen or divers down"+r$:
1 z$="no frogmen on board"+r$:
1 z$="no divers on board"+r$:
1 z$="max speed 1/4 due to engine fault"+r$:
1 z$="local fishermen and search the bay"+k$+"or try to raise cash for your"+k$+"expedition by selling any treasures"+k$+"you have found to local collectors"+k$+"or museums."+x$:
1 z$="it's too heavy to bring up without a winch"+r$:
1 z$="it's too heavy for one man to bring up"+r$:
1 z$="help is on it's way"+x$:
1 z$="frogman sent down"+r$:
1 z$="docking....."+k$+x$:
1 z$="do you want to bring "+
1 z$="diver sent down"+r$:
1 z$="distance from port "+
1 z$="d send down a diver f send down frogman"+k$+"r recall divers and frogmen"+k$+"s status report o distress beacon"+k$+"w weather report (press c continue)":
1 z$="a tug pulls out and takes you back to"+k$+"the port"+k$:
1 z$="You have 10 days to search for the lost"+k$+"treasure."+x$+"Each day you can hire a boat,together"+k$+"with frogmen and divers from the"+k$:
1 z$="You cannot afford that !!"+k$:
1 z$="You can't weigh anchor"+r$:
1 z$="You are at full ahead already"+r$:
1 z$="You are a salvage merchant and have"+k$+"arrived in Carello ,a small island port"+k$+"in the carribbean with `2000 and an"+k$:
1 z$="What about the "+(
1 z$="The crew report a fault in the "+k$+("Engines. Maximum speed is now 1/4 ahead"
1 z$="The auction room is closed."+x$:
1 z$="Status":
1 z$="Status Report: time="+t$+k$
1 z$="Select level 1=easy 3=difficult":
1 z$="SONAR":
1 z$="SALVAGE":
1 z$="Press a key to start day "+
1 z$="Oh dear. You just went broke !!!!!"+x$+x$:
1 z$="Not a good idea with the anchor down !!"+r$:
1 z$="No fuel."+r$:
1 z$="Level "+
1 z$="Item"+("s"
1 z$="It's too late to set off from bay"+x$:
1 z$="In the bay."+x$+"Press h for help"+r$:
1 z$="Help. You can use these keys."+k$+"5 turn ship left 8 turn ship right"+k$+"7 increase speed 6 decrease speed"+k$+"a raise/drop anchor p dock at port"+k$:
1 z$="GAME OVER ."+x$:
1 z$="Fault in Oxygen equipment"+k$+"you cannot sent any frogmen down"+r$:
1 z$="Fault in Oxygen equipment"+k$+"you cannot sent any divers down"+r$:
1 z$="Engines already stopped"+r$:
1 z$="End Of Game Report":
1 z$="Catalogue finds":
1 z$="Auction finds":
1 z$="Anchor up"+r$:
1 z$="Anchor dropped"+r$:
1 z$=" **** press a key ****"+k$:
1 y=y+(d(dir,2
1 y$="y")+("no"
1 y$="w")+(7900
1 y$="s")+(7600
1 y$="n")+x$:
1 y$="l")+(7200
1 y$="e")+(7500
1 y$="d")+(8000
1 y$="c")+(7700
1 y$="a")+(7800
1 x=x+d(dir,1
1 winch=(y$="y"):
1 winch)+("pilot "
1 winch)+"hire a winch"+x$:
1 weather>10
1 weather=weather+a:
1 weather+dark
1 wait 1 hour
1 vis=(ddown+fdown)*(12
1 val=val+f(n,2
1 val=f(count,2
1 v(n,m)=v(n+2
1 time=time+60
1 time=time+50
1 time=time+5
1 time=time+45
1 time=time+30
1 time=time+2.5
1 time=time+15
1 t(n)=t(n)+n(n):
1 t(count)>1
1 t(count)=1
1 t(count)=0
1 t$=a$+"."+b$+" hours":
1 speed=speed+(y$="7")-(y$="6"):
1 sonar salvage by pete cooke.
1 search routine
1 salvage
1 s3
1 s2
1 s1
1 s(move,speed+1
1 possible moves
1 pilot=y$="y":
1 pilot=(y$="y"):
1 pilot)+"hire a pilot."+x$:
1 p$(g(fi))+f$(g(fi))+" "+k$:
1 offer>1000
1 offer+" for th"+("is "
1 nowfinds=nowfinds+no:
1 nowfinds+k$
1 new weather
1 n=(count>7
1 n)+("the national museum are"
1 n)+" prepared to offer"+k$+"`"+
1 n(g(fi))=n(g(fi))+no:
1 move=move+1
1 min=time-60
1 max+")"+k$:
1 m$(no+(g(fi)=12
1 hr=time/60
1 getting dark
1 g((address/2
1 fuel=fuel-(speed/40
1 frogmen=frogmen-1
1 frogmen=frogmen+fdown:
1 frogmen=a:
1 frogmen+" "+
1 finds=finds-t(count):
1 finds=finds+nowfinds:
1 finds)+"s for status report "+("f to refuel "
1 fi=(fiadd/2
1 fdown=fdown+1
1 fdown)+("divers"
1 fdown)+(" and "
1 f$(frogmen);
1 f$(frogmen)+" on board"+k$
1 f$(frogmen)+" at `50 for the day"+x$:
1 f$(fdown)+" searching"+k$:
1 excellentgood fair poor
1 equip)+("c catalogue finds ")+("a auction finds "
1 equip)+"w to wait one hour "+"d wait till next day "+"q to give up search"+r$:
1 end of game ...............
1 divers=divers-1
1 divers=divers+ddown:
1 depthroutine
1 depth+" fathoms"+k$
1 ddown=ddown+1
1 ddown+fdown=1
1 ddown)+r$:
1 ddown)+("frogmen"
1 ddown)+" report visibility "+v$(1
1 ddown)+" recalled"+r$:
1 d$(divers)+x$:
1 d$(divers)+" and "+
1 d$(divers)
1 d$(ddown)+" and "+
1 count=count+1
1 change speed
1 catalogue finds
1 cash=cash-500
1 cash=cash-50
1 cash=cash-1e3
1 cash=cash-150
1 cash=cash-100
1 cash=cash-.8
1 cash=cash-(80
1 cash=cash-(50
1 cash=cash-((3
1 cash=cash+offer:
1 cash+x$+x$:
1 cash+x$+"which do you want to hire? 1 or 2"+x$:
1 cash+k$+"do you wish to hire a winch ? press y or n"+k$:
1 cash+k$+"do you wish to hire a pilot ? press y or n"+k$:
1 cash+k$+"How many divers do you want to hire"+k$+"(max "+
1 cash+" do you want"+k$+" 1 a full tank 2 3/4 tank"+k$+" 3 1/2 tank 4 1/4 tank"+k$+" 5 no fuel (press 1 to 5)"+k$:
1 cant afford it
1 cannon figurehead old sea chest silver dubloons pieces of eight gold goblet gold candlestick broken spar armour compass earthware jar bones copper nails planking
1 bright clear fine fair poor windy showers rainy stormy gales
1 adfuel+" gallons of fuel"+k$+"costing `"+
1 address=address+2
1 address=62000
1 address,(a+dis*
1 Z$="SONAR SALVAGE":
1 VkGyLrM|Nv
1 ???????????
1 ;frogmen;" ";
1 ;divers;" ";
1 ;("winch "
1 ;"you found ";
1 ;"weather ";w$(weather);
1 ;"time ";t$;
1 ;"level ";level;
1 ;"finds ";finds;
1 ;"day ";day;
1 ;"cash `";cash
1 ;"Your finds are valued at `";
1 ;"Your boat can carry ";250
1 ;"You have not found anything yet":
1 ;"You can hire frogmen, complete"'"with equipment for `50 per day"'"per man"
1 ;"You can hire divers"'"and equipment for `100 per day"'"per man."
1 ;"You can hire a winch for the"'"cruiser for `80 for the day.":
1 ;"You can hire a pilot from the port to help navigation for `50 per day."
1 ;"The port has 2 boats for hire"'"1 a large cruiser"'" costing `500 per day and"'" capable of carrying 4 frogmen"'" or 2 divers or"''"2 a small launch"'" costing `150 per day and"'" capable of carrying 2 frogmen"
1 ;"Please wait while the finds"'"are valued";
1 ;"Of the ";(address-62000
1 ;"Giving a total score of";
1 ;"Equipment hired:-"
1 ;"Equip Expedition"
1 ;"At the end of ";day;" days searching"'" You have :-"''" `";cash;" cash and ";finds;" find"+("s"
1 ;" objects in the bay";
1 ;" ";:
1 ;" ";:
1 88888888888888
1 08.30 hoursx
1 -weather)/60
1 -ship)'"gallons of fuel for a full tank."'"fuel costs `0.80p per gallon."
1 ,,,,,,(,,,,,,,,,,,,,,,,,,,,,,,,,,,,,(,,,,,,,,,,,(,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
1 +y)+x$+"please wait while bids are made."+x$:
1 +"the ship is beginning to sink"+
1 +"How many frogmen do you want to hire"+
1 *weather)+k$+"searching....."+r$:
1 *fuel))+" gallons depth "+
1 *frogmen<0
1 *f(g(fi),3
1 *f(g(fi),1
1 )=" frogm"+("an"
1 )=" diver"+("s"
1 )+x$+"Do you accept ? (y/n)"+r$:
1 )+k$+"You will need to return to port to"+k$+"get this repaired"+r$:
1 )+(("Oxygen equipment."+k$+"You cannot send any divers or frogmen down")
1 )+("the sun is setting"
1 )+("priceless "
1 )+("launch"
1 )+("l to leave port "
1 )+("its gone pitch black"
1 )+("it's getting dark"
1 )+("full ahead"
1 )+("Sonar. The machine is not working"
1 )+("Small launch"
1 )+("3/4 speed"
1 )+("1/4 Speed"
1 )+("1/2 Speed"
1 )+"relic"+("s"
1 )+" sold"+x$:
1 )+" km finds "+
1 )+" gallons of fuel"+x$:
1 )*t(count):
1 ))+("some"
1 ))+" up ? (y/n)"+r$:
1 ))+" degrees speed "+"0 1/4 1/2 3/4 full"(4
1 (val+cash);" **"
1 (frogmen/2
1 (frogmen)+
1 (adfuel*.8
1 (address+1
1 ("Large cruiser"
1 "$"""""""""#
1 """""""""""""
1 **** press a key ****
1