Glutton is a puzzle game based on the game Greed. When I first read the description, I wasn't convinced it was even much of a game. I coded up a version in BASIC from scratch for the Dragon (should run fine on a Tandy too). Available on GitHub as usual.
The basics of the game are that moving onto a numbered square moves you n steps in that direction. You must stay on the board and cannot step on a square twice. Keep playing until you cannot make a move. Get a high a score as possible.
It's oddly addictive. My highest score is 251. Have fun!
SeptTandy is underway and I have had fun with this SFX tool. It's still a bit rough in places but the concept seems solid enough.
The asterisk is a selector you can move up and down to choose an attribute to modify. There's a list of keyboard controls which will be documented but it's pretty easy to modify a sound and play around with it.
SOUND at the top is the bank you are working on. You can have 10 sounds in total at once. I am going to add a soundboard mode where you can play with all the sounds at once. There'll also be an option to print the sounds to the printer. In my case this will be the XRoar file output. Still deciding whether to save to disk as an option.
The WIP code is on GitHub if you want an early look. Beep beep!
My recent type-in Death Valley is a favourite of mine. Games like it efficiently use the text screen auto-scrolling to great a fast action game in just a short bit of code. I thought it would be fun to write such a game from scratch and getting it going on the Dragon and the BBC.
It only takes a few lines, and with just minor changes it runs on the BBC too. With 40 columns rather than 32, the Beeb is slightly easier to get a higher score.
The Dragon version will, of course, run on the Coco but not the MC-10 which sadly lacks the STRING$ function and ELSE.
BBC Basic
10 L=0:R=39:D=16:S=0:CLS
20 PRINT STRING$(L+1,"X") + STRING$(D-(L+1)," ")+ "V"+ STRING$(R-(D+1)," ")+STRING$(40-(R),"X");
30 A$=INKEY$(0):IFA$="Q"THEND=D-1:IF D<1 THEN D=1
40 IFA$="P"THEN D=D+1:IF D>38 THEN D=38
50 IFRND(10)=1THEN L=L+1
60 IFRND(10)=1THEN R=R-1
70 S=S+1:IFD=L OR D=R THEN CLS:PRINT "CRASH!!":PRINT "SCORE:":PRINT S:STOP ELSE GOTO 20
Dragon / Tandy Coco
10 L=0:R=31:D=16:S=0:CLS
20 PRINT STRING$(L+1,"X") + STRING$(D-(L+1)," ")+ "V"+ STRING$(R-(D+1)," ")+STRING$(32-(R),"X");
30 A$=INKEY$:IFA$="Q"THEND=D-1:IF D<1 THEN D=1
40 IFA$="P"THEN D=D+1:IF D>30 THEN D=30
50 IFRND(10)=1THEN L=L+1
60 IFRND(10)=1THEN R=R-1
70 S=S+1:IFD=L OR D=R THEN CLS:PRINT "CRASH!!":PRINT "SCORE:":PRINT S:STOP ELSE GOTO 20
Might see if I can get this one running on other systems! Drive safely now...
