Lighthouse Adventure
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Lighthouse Adventure
Hello, this is from a type-in listings book The Rainbow Book of Adventures. The blurb reads:
"Like everyone else, you've listened to the rumours about the old smugglers hideout
somewhere on the peninsula but, unlike everyone else, you're going to find it!
All you have to do is find the gold......"
I am stuck in the first 6 or so rooms (The peninsula and the lighthouse itself) I can't figure out how to progress after Examine Generator, Examine Hole, etc etc... I have checked the listing but it could still be a bug I introduced when I typed it in from the book.
"Like everyone else, you've listened to the rumours about the old smugglers hideout
somewhere on the peninsula but, unlike everyone else, you're going to find it!
All you have to do is find the gold......"
I am stuck in the first 6 or so rooms (The peninsula and the lighthouse itself) I can't figure out how to progress after Examine Generator, Examine Hole, etc etc... I have checked the listing but it could still be a bug I introduced when I typed it in from the book.
- Attachments
-
- Lighthouse_Adventure.ssd
- (12.5 KiB) Downloaded 107 times
-
- Lighthouse_Adventure.txt
- Help
- (14.66 KiB) Downloaded 127 times
Re: Lighthouse Adventure
There's a typo on line 119 (zero for capital O). Here's what I think is the corrected version:b_b_c_m_i_c_r_o_2 wrote: ↑Sat Jul 07, 2018 12:12 pmI am stuck in the first 6 or so rooms (The peninsula and the lighthouse itself) I can't figure out how to progress after Examine Generator, Examine Hole, etc etc... I have checked the listing but it could still be a bug I introduced when I typed it in from the book.
Code: Select all
119IFOB=6THENPRINT"A secret panel slides open.":D(8,1)=16:GOTO31
Code: Select all
@%=3:F.Y=1TO21:F.X=1TO6:IFD(Y,X)P.Y,D(Y,X);" ";D$(X):N.,EL.N.,
Code: Select all
>@%=3:F.Y=1TO21:F.X=1TO6:IFD(Y,X)P.Y,D(Y,X);" ";D$(X):N.,EL.N.,
1 3 north
1 2 south
1 2 east
1 2 west
2 2 north
2 2 south
2 2 east
2 1 west
3 1 south
3 4 up
3 6 down
4 5 up
4 3 down
5 4 down
6 3 up
7 9 south
7 12 east
7 8 west
8 7 east
9 7 north
10 9 north
10 11 east
11 10 west
12 7 west
13 11 south
14 15 north
15 14 south
15 16 west
16 8 south
16 15 east
17 16 south
18 17 east
18 19 west
19 18 east
20 19 east
20 21 west
21 20 east
>

Last edited by lurkio on Sat Jul 07, 2018 7:41 pm, edited 7 times in total.
Re: Lighthouse Adventure
There was also a typo on line 103. Here's the corrected version:b_b_c_m_i_c_r_o_2 wrote: ↑Sat Jul 07, 2018 12:12 pmI am stuck in the first 6 or so rooms (The peninsula and the lighthouse itself) I can't figure out how to progress after Examine Generator, Examine Hole, etc etc... I have checked the listing but it could still be a bug I introduced when I typed it in from the book.
Code: Select all
103IFOB=32ANDO(33)=0THENPRINT"I see something!":O(33)=L:GOTO31
Btw, for anyone who's curious, here's the book:

Last edited by lurkio on Sat Jul 07, 2018 8:01 pm, edited 10 times in total.
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Me and my typing ! That explains why I was so perplexed!
There were in fact a number of errors in the listing in the book. There appeared to be something off with ELSE statements, so I rewrote the two in question so it was clear what was intended.
Also I discovered you can GET FLINT from the ROCK.
There were in fact a number of errors in the listing in the book. There appeared to be something off with ELSE statements, so I rewrote the two in question so it was clear what was intended.
Also I discovered you can GET FLINT from the ROCK.
Re: Lighthouse Adventure
I found one ELSE that you rewrote, but not the other.b_b_c_m_i_c_r_o_2 wrote: ↑Sun Jul 08, 2018 9:04 amThere were in fact a number of errors in the listing in the book. There appeared to be something off with ELSE statements, so I rewrote the two in question so it was clear what was intended.
The one I found was on line 124. Here's line 124 from the original book:
Code: Select all
124IFOB=39THENPRINT"The platform starts to rise.":IFT=1THEN125 ELSE31
You've rewritten line 124 as follows:
Code: Select all
124IFOB=39THENPRINT"The platform starts to rise.":IFT=1THEN125 ELSE IFOB=39THENGOTO31
Code: Select all
124IFOB=39THENPRINT"The platform starts to rise.":GOTO-(T=1)*125-(T<>1)*31
Code: Select all
124REPEAT IFOB<>39 UNTIL1 ELSE PRINT"The platform starts to rise.":IFT=1 UNTIL1:GOTO125 ELSE UNTIL1:GOTO31

EDIT: I've only just realised that that last line of code can be improved by using an IF..THEN..ELSE statement with an "empty" THEN, as follows:
Code: Select all
124 IF OB<>39 THEN ELSE PRINT"The platform starts to rise.":IF T=1 GOTO125 ELSE GOTO31

Last edited by lurkio on Thu Dec 13, 2018 12:02 pm, edited 7 times in total.
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Afternoon,
I found the other errors I had introduced with my typing:
Have needed to change from this:
To this:
I found the other errors I had introduced with my typing:
Have needed to change from this:
Code: Select all
10L=1:IN=0:C=0:F=0:T=0
109IFOB=2OROB=8OROB=9OROB=16THEN110 ELSE PRINT"How can I read that?":GOTO31
117IFOB=4THENPRINT"Nothing seemed to happen.":IFR=0THEND(7,5)=0:O(38)=0:R=1:GOTO31
118IFOB=4THEND(7,5)=6:O(38)=7:R=0:GOTO31
173UFF=0ANDFT=1THENPRINT"You shot down the door.":F=1:D(16,1)=17:O(27)=0:GOTO31
188IFLEFT$(P$,3)="TRO"THENPRINT"OK.":O(250=-1:D(6,5)=0:GOTO31
Code: Select all
10L=1:IN=0:C=0:F=0:T=0:R%=0
109IFOB=2OROB=8OROB=9OROB=16OROB=20THEN110 ELSE PRINT"How can I read that?":GOTO31
117IFOB=4THENPRINT"Nothing seemed to happen.":IFR%=0THEND(7,5)=0:O(38)=0:R%=1:GOTO31
118IFOB=4THEND(7,5)=6:O(38)=7:R%=0:GOTO31
173IFF=0ANDFT=1THENPRINT"You shot down the door.":F=1:D(16,1)=17:O(27)=0:GOTO31
188IFLEFT$(P$,3)="TRO"THENPRINT"OK.":O(25)=-1:D(6,5)=0:GOTO31
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Evening,
Here are some clues:
Search the dead smuggler.
Don't drink from the bottle.
The gun only needs to be used once.
You can't cut anything.
Who is Marple?
The treasure chest is too heavy to "GET".
Examine the fireplace twice.
The "SEARCH" command is a bit confusing. In all cases except one "SEARCH" and "EXAMINE" are interchangable. Maybe better to just have the one "EXAMINE" command.
I am stuck trying to sort out the treasure chest. I don't know what the "TRO" in line 188 is and why I need to shoot it.
Here is the version with the corrections to the errors described in my post previous to this one:
Here are some clues:
Search the dead smuggler.
Don't drink from the bottle.
The gun only needs to be used once.
You can't cut anything.
Who is Marple?
The treasure chest is too heavy to "GET".
Examine the fireplace twice.
The "SEARCH" command is a bit confusing. In all cases except one "SEARCH" and "EXAMINE" are interchangable. Maybe better to just have the one "EXAMINE" command.
I am stuck trying to sort out the treasure chest. I don't know what the "TRO" in line 188 is and why I need to shoot it.
Here is the version with the corrections to the errors described in my post previous to this one:
Last edited by b_b_c_m_i_c_r_o_2 on Sun Jul 08, 2018 6:35 pm, edited 1 time in total.
Re: Lighthouse Adventure
b_b_c_m_i_c_r_o_2 wrote: ↑Here is the version with the corrections to the errors described in my post previous to this one
Weird thing for a guard to say:
Here are the corrected versions of some of the lines of code:
Code: Select all
10L=1:IN=0:C=0:F=0:T=0:R%=0:FT=0:G=0
13DATAIn a large dining hall,In the guard room,In the chart room,In the captains room,In the store room,In a metal storage cabinet,In an enormous vaulted chamber
94IFOB=17THENPRINT"There's a liquid in it.":O$(17)="BOTTLE WITH LIQUID":GOTO31
133IFOB=21THENPRINT"I see some bullets.":O(24)=L:GOTO31
140IFO(41)<>-1 THENPRINT"I don't have anything to light it with.":GOTO31
145PRINT"It fits well.":G=1:GOTO31
181IFOB=4OROB=39 THENPRINT"It seems to be a very strong rope. I can't cut it.":GOTO31
193IFL=18 OR L=19 OR L=20 THEN194 ELSE PRINT"It sounds beautiful.":GOTO31
198IFL=17THENL=18:O(30)=19:GOTO27
201IFOB=3THENPRINT"How murderous. Unfortunately it did no good.":GOTO31
205IFOB=42THENPRINT"He smiles and says, ""Good to see you"'"again, Cap'n."" ... and dissapears!":O(3)=0:D(9,2)=10:GOTO31
Line 201 just has an extra space before "good" to correct the word-wrapping.
Here are the corrected versions of some typos that were in the original listing in the book:
Code: Select all
83IFOB=3THENPRINT"Looks like a tough guy. He says ""What'sthe password?>""":GOTO31
84IFOB=4THENPRINT"It looks like a bell-pull.":GOTO31
92IFOB=15THENPRINT"It looks like an antique.":GOTO31
97IFOB=25THENPRINT"It looks very utilitarian.":GOTO31
98IFOB=26THENPRINT"It looks like a good one.":GOTO31
101IFOB=30THENPRINT"It looks terribly ferocious!":GOTO31

Last edited by lurkio on Mon Jul 09, 2018 7:26 pm, edited 13 times in total.
Re: Lighthouse Adventure
Have you typed in -- or are you planning to type in -- any of the other listings from that book?b_b_c_m_i_c_r_o_2 wrote: ↑Sat Jul 07, 2018 12:12 pmHello, this is from a type-in listings book The Rainbow Book of Adventures.
I've found the disk-image with the listings already typed in and I've worked out how to export the listings to a text file via a (rather old) TRS-80/CoCo emulator. Let me know if you want a particular listing. I've only exported One Room so far.
EDIT: Get the disk-image for The Rainbow Book Of Adventures here (you'll have to extract it from the zip archive):
Then upload the disk-image to the online CoCo emulator here (click "Local File"):
Type DIR. Then type LOAD "filename". Then RUN to run the game, or LLIST to send the listing to the printer, which, in this case, is the Javascript console of your web-browser.

Last edited by lurkio on Tue Jul 10, 2018 12:32 am, edited 3 times in total.
Re: Lighthouse Adventure
b_b_c_m_i_c_r_o_2 wrote: ↑Sun Jul 08, 2018 6:34 pmI am stuck trying to sort out the treasure chest. I don't know what the "TRO" in line 188 is and why I need to shoot it.
You don't!
Here's my latest version of the listing, incorporating the changes from my earlier post, above:

- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Hi Lurkio, thanks for all this - lots of typos from me in there. O vs 0 and 0OR errors !!! Have you got the ssd of the latest version?
Also have you got a small clue about how how I begin to move the treasure chest?
Also have you got a small clue about how how I begin to move the treasure chest?
Last edited by b_b_c_m_i_c_r_o_2 on Tue Jul 10, 2018 11:50 am, edited 1 time in total.
Re: Lighthouse Adventure
I'll post a .SSD once I've checked there aren't any more typos. Meanwhile, you can just take the listing attached to my previous post, and copy and paste it into BeebEm.b_b_c_m_i_c_r_o_2 wrote: ↑Tue Jul 10, 2018 11:49 amlots of typos from me in there. O vs 0 and 0OR errors !!! Have you got the ssd of the latest version?
Just roll with it.b_b_c_m_i_c_r_o_2 wrote: ↑Tue Jul 10, 2018 11:49 amAlso have you got a small clue about how how I begin to move the treasure chest?

Last edited by lurkio on Tue Jul 10, 2018 12:40 pm, edited 2 times in total.
Re: Lighthouse Adventure
Cleaned the text up a bit more.
Play online:
Here's the latest .SSD:
Listing:

Play online:
Here's the latest .SSD:
Listing:

Last edited by lurkio on Sun Aug 26, 2018 3:00 pm, edited 3 times in total.
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Fantastic! --- I didn't quite manage to solve it yesterday.
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
I haven't typed any other in so far. Of the others, the two that interested me were "Escape from Sparta" and "The Door"lurkio wrote: ↑Mon Jul 09, 2018 1:58 pm
Have you typed in -- or are you planning to type in -- any of the other listings from that book?
I've found the disk-image with the listings already typed in and I've worked out how to export the listings to a text file via a (rather old) TRS-80/CoCo emulator. Let me know if you want a particular listing. I've only exported One Room so far.
If we have the listing as a text file is it not possible to put the text file onto an .ssd and then to *SPOOL the listing from that disk into the BBC?
Re: Lighthouse Adventure
Ah. The one that caught my eye was One Room! I'm just finishing up the Beeb port now.b_b_c_m_i_c_r_o_2 wrote: ↑Thu Jul 12, 2018 1:43 pmI haven't typed any other in so far. Of the others, the two that interested me were "Escape from Sparta" and "The Door"
Yes, of course. Or you can simply copy and paste the listing into BeebEm. Once I've exported the listing from a CoCo emulator, I tend to edit the listing in a modern text editor, and then copy and paste the whole listing into BeebEm whenever I want to test my edits.b_b_c_m_i_c_r_o_2 wrote: ↑Thu Jul 12, 2018 1:43 pmIf we have the listing as a text file is it not possible to put the text file onto an .ssd and then to *SPOOL the listing from that disk into the BBC?

Last edited by lurkio on Thu Jul 12, 2018 4:51 pm, edited 5 times in total.
Re: Lighthouse Adventure
Okay, here's One Room by Jorge Mir, a room-escape text adventure game from the same book as Lighthouse Adventure (above): The Rainbow Book Of Adventures. You'll need some distinctly American vocab in places. (N.B. The original listing was quite buggy, and some bugs still remain, but the game is winnable.)
Play online or download the latest .SSD disc-image:
Listings:
- Full(ish) changelog for oneroom.bas, on Github. The ordering of early checkins is a bit iffy. Checkin dates are inaccurate.
Walkthrough, which you can copy and paste into BeebEm:
EDIT: Here's a writeup of the original TRS-80/CoCo version: http://gamingafter40.blogspot.com/2014/ ... nture.html
EDIT 2: Updated program to try to correct LOAD/SAVE routines. Uploaded new .SSD and new listing.
EDIT 3: Minor bugfix (re the printing of messages after a certain avian event). I don't think I'm gonna fix any more bugs because there are too many of them!
EDIT 4: Except for that bug on line 85 that I myself introduced, which I've just fixed in beta7.
EDIT 5: Bugfix for LOAD/SAVE. Aaargh. See beta8.
EDIT 6: Evidently I lied about not fixing any more bugs. Bugfixes for various bird/cage/seed/exit/entry problems; and for floorboard/box/hole problems; and for CB appearance/gettability problems; and to implement PUSH SWITCH as a synonym for TURN SWITCH: see beta12, in this post (above).
EDIT 7: Another bugfix for LOAD/SAVE. Grrr.
EDIT 8: Added titles and instructions to disc-image. Corrected size of flags array F%(). See beta14.
EDIT 9: Removed some redundant code. Changed ending so game restarts on win. See beta15.
EDIT 10: Minor. beta16.
EDIT 11: Fixed bug where direction commands (N, S, etc.) could be used, even before blindfold had been removed! See beta17.
EDIT 12: Corrected typo. Improved SAVE error-handling. See beta18.
EDIT 13: Corrected line 186. The contrived REPEAT construction. Needs replacing passim, really.
EDIT 14: Removed contrived REPEAT..UNTIL1 construction; replaced with "empty THEN" as in IF c THEN ELSE a.
EDIT 15: Removed leading and trailing spaces from input. Added X for EXAM. Added I for INV. Added L for LOOK. Trapped HELP {word}. Prevented LOOK/EXAM {direction} from working when blindfolded!
EDIT 16: Expanded entire listing -- no more abbreviated BASIC keywords! Had to change line 192 to fit into 256 chars and incidentally compacted its IF/ELSE logic. See beta22.
EDIT 17: Improved the trimming of extraneous spaces from user-input. See beta23.
Last edited by lurkio on Sat Jan 04, 2020 2:02 pm, edited 35 times in total.
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Yes I have completed it now..... a couple of comments:lurkio wrote: ↑Mon Jul 09, 2018 7:22 pmb_b_c_m_i_c_r_o_2 wrote: ↑Sun Jul 08, 2018 6:34 pmI am stuck trying to sort out the treasure chest. I don't know what the "TRO" in line 188 is and why I need to shoot it.
You don't!
1.png
Here's my latest version of the listing, incorporating the changes from my earlier post, above:
- Lighthouse_Adventure.txt
![]()
I wonder if PUT and LOAD caused a bit of confusion to potential players as one could imagine trying "LOAD CHEST" instead of "PUT CHEST"
There was one thing that is peculiar - I got stuck underneath the lighthouse after dropping the treasure chest off the top of the lighthouse:- Although I had PUT the CHEST in the HOLE, when I went down to the generator room the "UP" exit was not available. This is because when you PUT CHEST -> TROLLEY, then DROP CHEST the line 78 should be:
78IFOB=25 AND L=5 THEN PRINT"The chest crashes down to the rocks below and smashes open!":O(25)=1:O(40)=1:D(6,5)=3:GOTO31
(because when you load the chest onto the trolley in line 188 it disables the up exit from the generator room)
- b_b_c_m_i_c_r_o_2
- Posts: 272
- Joined: Sun Jun 25, 2006 11:15 pm
- Contact:
Re: Lighthouse Adventure
Thinking it through this is the change that is required to cover the case where the chest is dropped somewhere other than onto the rocks:
78IFOB=25 THEN D(6,5)=3:IF L=5 THEN PRINT"The chest crashes down to the rocks below and smashes open!":O(25)=1:O(40)=1:GOTO31
78IFOB=25 THEN D(6,5)=3:IF L=5 THEN PRINT"The chest crashes down to the rocks below and smashes open!":O(25)=1:O(40)=1:GOTO31
Re: Lighthouse Adventure
Having enjoyed reading all of this I got to searching and found a pdf copy of the Second Book of Rainbow Adventures, but sadly not the third or fourth. Not sure how to attach the 2nd book pdf to this post though?
I got the disk images for all 4 volumes but can't load some of the adventures into the CoCo Emulator where the filesize is over 10kb getting an ?OM error (Out of Memory). Is there some trick to persuade CoCo to release some memory? Otherwise it means a lot of typing and debugging..
I got the disk images for all 4 volumes but can't load some of the adventures into the CoCo Emulator where the filesize is over 10kb getting an ?OM error (Out of Memory). Is there some trick to persuade CoCo to release some memory? Otherwise it means a lot of typing and debugging..
Last edited by RonBate on Sun Aug 26, 2018 11:33 am, edited 1 time in total.
Re: Lighthouse Adventure
Hi,b_b_c_m_i_c_r_o_2 wrote: ↑Sat Aug 25, 2018 6:50 pmThinking it through this is the change that is required to cover the case where the chest is dropped somewhere other than onto the rocks:
78IFOB=25 THEN D(6,5)=3:IF L=5 THEN PRINT"The chest crashes down to the rocks below and smashes open!":O(25)=1:O(40)=1:GOTO31
Is it possible to update the SSD in the first post with all the fixes.
It saves me getting it wrong

If it is definitely completeable I will upload it to bbcmicro.co.uk as soon as possible...
Oh! and thanks for playing this through

Lee.
Re: Lighthouse Adventure
Am working on it.

Re: Lighthouse Adventure
Ta Lurkio.
Lee.
Lee.
Re: Lighthouse Adventure
Thanks. I've incorporated the change into the .SSD disc-image.b_b_c_m_i_c_r_o_2 wrote: ↑Sat Aug 25, 2018 6:50 pmThinking it through this is the change that is required to cover the case where the chest is dropped somewhere other than onto the rocks:Code: Select all
78 IFOB=25 THEN D(6,5)=3:IF L=5 THEN PRINT"The chest crashes down to the rocks below and smashes open!":O(25)=1:O(40)=1:GOTO31
You can play it online here:
You can download the .SSD here:
- http://bbcmicro.co.uk/game.php?id=2883
(Previously, the .SSD had been attached here and was downloaded 77 times)

EDIT: Bugfixed the listing and the disc-image
Last edited by lurkio on Thu Jan 02, 2020 6:44 pm, edited 5 times in total.
Re: Lighthouse Adventure
See the "Attachments" tab below the edit-window when you're composing a post. The filesize might be too big though. Can't remember exactly what the limit is on Stardot.
The Second Rainbow Book of Adventures is available online here:
And the third is here:
Dunno! I'm not very good with the TRS-80 (any of them).RonBate wrote: ↑Sun Aug 26, 2018 11:31 amI got the disk images for all 4 volumes but can't load some of the adventures into the CoCo Emulator where the filesize is over 10kb getting an ?OM error (Out of Memory). Is there some trick to persuade CoCo to release some memory? Otherwise it means a lot of typing and debugging..

Last edited by lurkio on Sun Aug 26, 2018 10:41 pm, edited 1 time in total.
Re: Lighthouse Adventure
lurkio wrote: ↑Sun Aug 26, 2018 3:21 pmDunno! I'm not very good with the TRS-80 (any of them).RonBate wrote: ↑Sun Aug 26, 2018 11:31 amI got the disk images for all 4 volumes but can't load some of the adventures into the CoCo Emulator where the filesize is over 10kb getting an ?OM error (Out of Memory). Is there some trick to persuade CoCo to release some memory? Otherwise it means a lot of typing and debugging..
Did some research. Try typing the following command before you load the big program:
Code: Select all
PCLEAR 1

Re: Lighthouse Adventure
Thanks lurkio, the CoCo memory tip works a treat. Also thanks for tracking down the Third Rainbow book - I managed to track down a website that claimed to have the fourth book available to download for free all I had to do was register and enter my credit card details (they promised not to debit any charges!!!) Not going to risk it so will keep looking. Some of the programs on the disks listings have errors/bits missing so the printed listings help.
I have converted a few of the adventures to BB4W from which I can move them to BeebEm for final testing and create an SSD. I'm not very good with music so I am chopping out all the sound effects unless someone is able to help? Also there are graphics in some of the originals which will be removed.
I have converted a few of the adventures to BB4W from which I can move them to BeebEm for final testing and create an SSD. I'm not very good with music so I am chopping out all the sound effects unless someone is able to help? Also there are graphics in some of the originals which will be removed.
Last edited by RonBate on Mon Aug 27, 2018 8:45 pm, edited 1 time in total.
Re: Lighthouse Adventure
You're welcome!
Maybe leave placeholders for the sound code in the listing, and then someone might pitch in (pun unintended) with some SOUND/ENVELOPE commands -- probably not me though because I have a very poor understanding of sound and music on the Beeb!
I understand graphics even less!

Re: Lighthouse Adventure
I've continued to try to improve One Room (above) in tiny, almost imperceptible ways, with the aim of making it as playable as possible without deviating from the line-numbering of the original TRS-80 listing. Not sure why exactly, but there you go.

Re: Lighthouse Adventure
I think I've found a bug in Lighthouse Adventure. Going to have a few more plays just to make sure, then I'll post a fix.