Voyage of the Beano and Tetroid with CF Card

Anything QL Software or Programming Related.
Post Reply
User avatar
ngcard
ROM Dongle
Posts: 19
Joined: Sat Aug 03, 2019 3:56 pm
Location: Venice, Florida
Contact:

Voyage of the Beano and Tetroid with CF Card

Post by ngcard »

I recently purchased a Tetroid Card which includes a Compact Flash Interface and Minerva and Qubide etc. I wanted to get "The Voyage of the Beano" adventure to run from the CF card, which I eventually did, but it wasn't easy and the documentation I found for this kind of thing was lacking, so in case anyone else is struggling, here's what I did.

I have a second partition set up on my CFCard, so in turn I have a win2_ drive. I created a directory on here called "Beano" and copied the game files into it.

To get the game to run, you need to use a substitution utility to fool the game into thinking it is running from a floppy disk. I found the usual DEV_USE tricks didn't work, in particular the DEV_USE flp didn't work on the Tetroid. What does work is the "SUB" device driver which can be found on Dilwyn's site http://www.dilwyn.me.uk/tk/sub.zip. So, I copied the sub_rext into the win1_SYS folder and added "LRESPR sys$&'sub_rext'" to my main boot file.

Then I edited the boot file in the win2_BEANO_ directory and added these lines...

Code: Select all

10 SUB_DRV win2
20 SUB_USE 1,BEANO
30 SUB_USE FLP
The 1st line tells the SUB driver to use the win2 drive. The 2nd line creates a drive called sub1_ and points it to the BEANO directory on win2. The 3rd line renames the sub drives to flp, so my sub1_ drive became flp1_. Now performing a dir flp1_ shows the contents of the BEANO directory on win2.

At this point if you do an "LRUN win2_beano_boot" the game runs and thinks it is running from its default configuration of flp1_.

My main boot file...

Code: Select all

100 WIN_DRIVE 2,1,2
110 LET dev$='win1_'
120 LET sys$=dev$&'SYS_'
130 addr=RESPR(250) : LBYTES sys$&'exists_bin',addr : CALL addr
140 :
150 IF NOT(EXISTS('TK2_EXT')) THEN
160   addr=RESPR(16876) : LBYTES sys$&'tk226_bin',addr : CALL addr
170 END IF
180 TK2_EXT
190 :
200 base=RESPR(3000) : LBYTES sys$&'vtkql_bin',base : CALL base
240 :
260 LRESPR sys$&'sub_rext'
540 LRESPR sys$&'history_cde'
550 HISTORY #0, 20
560 :
570 NEW
The Beano boot file with the lines I added at the top...

Code: Select all

[10 SUB_DRV win2
20 SUB_USE 1,BEANO
30 SUB_USE FLP
100 REMark BOOT FOR THE VOYAGE OF THE BEANO
110 REMark (C) 1990  A. PEMBERTON
120 RESTORE
130 MODE 4:OPEN#3,scr:WINDOW#3,512,256,0,0:PAPER#3,0:CLS#3
140 FOR r=1 TO 23:OPEN#(r+3),scr:WINDOW#(r+3),20,40,(r*20+20),0:PAPER#(r+3),0:INK#(r+3),7
150 x$="THE VOYAGE OF THE BEANO"
160 FOR r=1 TO 23:AT#(r+3),3,0:PRINT#(r+3),x$(r):BEEP 1000,r*RND(10 TO 50):PAUSE 3
170 a=RESPR(512):LBYTES flp1_font_cde,a:CALL a
180 LBYTES flp1_p0,131072+60*128:credits
185 play
190 FOR x=4 TO 9:wave -1,x,5:PAUSE 3
200 FOR x=4 TO 16:wave 1,x,5:wave -1,x+6,5
210 FOR x=17 TO 21:wave 1,x,5:wave -1,x+6,21-x
220 FOR x=22 TO 27:wave 1,x,27-x:PAUSE 3
230 INK#3,7:AT#3,24,27:PRINT#3,"PRESS ANY KEY TO GET UNDER WAY....":dummy$=INKEY$(-1):AT#3,24,15:CLS#3,4
240 EXEC_W flp1_BEANO_obj
250 :
260 DEFine PROCedure wave (direction,start,number)
270  FOR r=1 TO number
280   SCROLL#(start-1+r),direction*(6-r)
290  END FOR r
300 END DEFine wave
310 DEFine PROCedure credits
320  AT#3,21,0:INK#3,4:PRINT#3,,,"A GRAPHIC ADVENTURE BY ALAN PEMBERTON AND FRANCIS O'BRIEN"\,,,"    COPYRIGHT  1990  C G H  SERVICES"
330 END DEFine credits
340 DEFine PROCedure play
350  LOCal note$,dur,del,x,loop
355  REPeat loop
360  IF BEEPING:NEXT loop
370  IF EOF:EXIT loop
380  READ note$,dur,del
390  IF dur=0:RETurn
400  x=CODE(note$)
410  SELect ON x
420   =97:n=42
430   =98:n=37
440   =99:n=35
450   =100:n=70
460   =101:n=61
470   =102:n=56
480   =103:n=50
490   =67:n=170
500   =65:n=96
510  END SELect
520  BEEP 1000*dur,n
530  PAUSE 4*del
535  END REPeat loop
540 END DEFine play
550 DATA 'c',1,1,'b',1,1,'c',2,2.25,'C',2.25,2.25,'C',2.25,2.25,'g',.75,.75,'f',.75,.75,'e',.75,.75,'g',.75,.75,'c',.75,.75,'b',1,1,'c',2,2,'x',0,0


Neal
Derek_Stewart
Font of All Knowledge
Posts: 3928
Joined: Mon Dec 20, 2010 11:40 am
Location: Sunny Runcorn, Cheshire, UK

Re: Voyage of the Beano and Tetroid with CF Card

Post by Derek_Stewart »

Hi,

Well done in finding a solution with SUB.

The DEV device does work, the FLP device has to be changed first with the FLP_USE command.

i.e. FLP_USE "FDD"

The DEV device gets confused with FLP device being the same.


Regards,

Derek
User avatar
genetika
Over Heated PSU
Posts: 127
Joined: Thu May 05, 2011 5:38 pm
Location: Rome, ITALY
Contact:

Re: Voyage of the Beano and Tetroid with CF Card

Post by genetika »

Derek_Stewart wrote:Hi,

Well done in finding a solution with SUB.

The DEV device does work, the FLP device has to be changed first with the FLP_USE command.

i.e. FLP_USE "FDD"

The DEV device gets confused with FLP device being the same.
Hi Derek.
What is the complete command sequence in order to use DEV_USE ?

I tried without success the following sequence :

On Smsq/e, I wrote:

Dev_use 1, win1_sys_
Dev_use flp
Dir flp1_

Return:
Not found

I would like to try with FLP_USE

Which is the correct sequence?

Thanks in advance.
Regards,
Max


User avatar
dex
Gold Card
Posts: 286
Joined: Thu Dec 23, 2010 1:40 pm

Re: Voyage of the Beano and Tetroid with CF Card

Post by dex »

See THIS THREAD

FLP_USE FDD : REMark Temporary Device for FLP
DEV_USE 1,"win1_sys_" : REMark Point Dev1_ to sys directory
DEV_USE FLP : REMark DEV is now FLP


Derek_Stewart
Font of All Knowledge
Posts: 3928
Joined: Mon Dec 20, 2010 11:40 am
Location: Sunny Runcorn, Cheshire, UK

Re: Voyage of the Beano and Tetroid with CF Card

Post by Derek_Stewart »

Hi,

Just an echo of the prevoious messge...

You try reading this message thread:

viewtopic.php?f=12&t=1629

In that message thread, I detailed how to get the game running in QPC2.

But, try this:

FLP_USE FDD : REMark Temporary Device for FLP
DEV_USE 1,"win1_beano_" : REMark Point Dev1_ to beano directory
DEV_USE FLP : REMark DEV is now FLP

This should work on any system that uses the DEV device.

Or you could use the SUB device, which is really good and will probably work better in a non-SMSQ/E system.
Last edited by Derek_Stewart on Tue Mar 12, 2024 4:17 pm, edited 1 time in total.


Regards,

Derek
User avatar
genetika
Over Heated PSU
Posts: 127
Joined: Thu May 05, 2011 5:38 pm
Location: Rome, ITALY
Contact:

Re: Voyage of the Beano and Tetroid with CF Card

Post by genetika »

PERFECT !

THANKS

Max


nikosdoykas
Over Heated PSU
Posts: 134
Joined: Tue Oct 09, 2018 4:20 am

Re: Voyage of the Beano and Tetroid with CF Card

Post by nikosdoykas »

question.... ho i can install the sys and sub on my qubide?? i have the same problem on beano....
and another question sdk????


Derek_Stewart
Font of All Knowledge
Posts: 3928
Joined: Mon Dec 20, 2010 11:40 am
Location: Sunny Runcorn, Cheshire, UK

Re: Voyage of the Beano and Tetroid with CF Card

Post by Derek_Stewart »

nikosdoykas wrote:question.... ho i can install the sys and sub on my qubide?? i have the same problem on beano....
and another question sdk????
Hi,

I looked at the Startkit2 distribution which is suplied with all Tetroid devices with a QubATA interface.

There are some files missing in the Starterkit distribution, all the menus to define the files are displayed, but the actual files are missing.

I did make a image file with all this fixed, but I was having problems writing the image to the CF Card. However, I was reminded that the Habi Image editor can write Qubide Images.

I will see if I can get this done today, but I am going on holiday for 7 days tomorrow, tasting wine in Mallorca.


Regards,

Derek
Post Reply