Text Only | Text with Attachments

QB64.org Forum

Active Forums => QB64 Discussion => Topic started by: EricE on February 26, 2020, 01:40:44 am

Title: QB games found on archive.org
Post by: EricE on February 26, 2020, 01:40:44 am
I found this recently at archive.org.

https://archive.org/details/QbMissle (https://archive.org/details/QbMissle)

It is a 1997 clone of the classic Missile Command game written in QBasic.

The source code runs in QB64 without any modifications.
Title: Re: QB Missile from 1997
Post by: johnno56 on February 26, 2020, 02:52:40 am
As I run with Linux my machine had a problem resolving the "case" of the filenames. Once modified all ran very well... Fast little game... barely survived level 1... lol

Nice find!
Title: Re: QB Missile from 1997
Post by: EricE on February 26, 2020, 03:13:12 am
Hi johno56,
Archive.org also has QB Invaders (Space Invaders clone),
https://archive.org/details/QbInvaders (https://archive.org/details/QbInvaders)

and QB Roids (Asteroids clone),
https://archive.org/details/QbRoids (https://archive.org/details/QbRoids)
but I have not yet tried running them using QB64.
Title: Re: QB Missile from 1997
Post by: johnno56 on February 26, 2020, 08:07:23 am
In qbinvaders, FadePal subroutine, "element not defined" (both versions of qb64 - 1.3 and 1.4) I don't know enough about qb64 to fix it...

In qbroids, "case" of filenames had to be altered but when it played, it was way too fast. The 'ship' was 'smooshed' before I could get to the controls... Oh, the curse of a quad-core cpu... lol

I suppose I could try them using Dosbox... who knows, maybe I'll survive long enough to kill a few baddies... lol
Title: Re: QB Missile from 1997
Post by: bplus on February 26, 2020, 12:20:14 pm
Quote
In qbroids, "case" of filenames had to be altered but when it played, it was way too fast. The 'ship' was 'smooshed' before I could get to the controls... Oh, the curse of a quad-core cpu... lol

Yeah a fair amount of the samples in QB64 download are like that! They need to be refreshed, replaced or separated from download to save time and space.
Title: Re: QB Missile from 1997
Post by: johnno56 on February 26, 2020, 05:50:53 pm
"They need to be refreshed, replaced or separated"

Any brave volunteers?
Title: Re: QB Missile from 1997
Post by: EricE on February 26, 2020, 07:09:24 pm
QBasic Pac-Man!

https://archive.org/details/Pac-manqbasicGame (https://archive.org/details/Pac-manqbasicGame)

It runs in QB64, but has the same "runs too fast" problem!
Title: Re: QB Missile from 1997
Post by: EricE on February 26, 2020, 07:21:06 pm
QB Defender

https://archive.org/details/QbDefender (https://archive.org/details/QbDefender)

This one needs some source code changes in order to compile with QB64
Title: Re: QB Missile from 1997
Post by: EricE on February 26, 2020, 07:36:20 pm
I was looking for a Lunar Lander type of QBasic game, and I found one at Archive.org named Probe.

https://archive.org/details/Probe_601 (https://archive.org/details/Probe_601)

There is not one but three source code files for the game, as well as a DOS Help file QBASIC.HLP which I have to find some way to open. Another project to work on.

Some work will be required to get this game to run in QB64.
Title: Re: QB Missile from 1997
Post by: bplus on February 26, 2020, 09:06:09 pm
InForm Lander Project:
https://www.qb64.org/forum/index.php?topic=249.0


Or there is this ;-))
Code: QB64: [Select]
  1. DEFINT A-Z
  2. SCREEN _NEWIMAGE(800, 640, 12)
  3. DIM g(100)
  5.     CLS
  6.     h = 30: dx = 1: x = 3: y = 2: u = x: v = y
  7.     FOR i = 1 TO 100
  8.         h = h + (RND * 3) \ 1 - 1
  9.         IF h > 39 THEN h = 39
  10.         IF h < 25 THEN h = 25
  11.         LOCATE h, i: PRINT "W";: g(i) = h
  12.     NEXT
  13.     WHILE 1
  14.         l v - 1, u, " ": l v, u - 1, "   "
  15.         l y - 1, x, "O": l y, x - 1, "/ \"
  16.         IF y > g(x - 1) OR y > g(x + 1) OR x < 2 OR x > 78 THEN l 2, 46, "CRASH": EXIT WHILE
  17.         IF y = g(x - 1) - 1 AND y = g(x + 1) - 1 THEN l 2, 46, "Landed": EXIT WHILE
  18.         u = x: v = y
  19.         k$ = INKEY$
  20.         IF LEN(k$) = 2 THEN
  21.             IF ASC(RIGHT$(k$, 1)) = 75 THEN dx = dx - 1
  22.             IF ASC(RIGHT$(k$, 1)) = 77 THEN dx = dx + 1
  23.             IF ASC(RIGHT$(k$, 1)) = 72 THEN y = y - 5
  24.         END IF
  25.         x = x + dx: y = y + 1
  26.         IF y = 40 THEN END
  27.         _LIMIT 2
  28.     WEND
  29.     _DELAY 2
  31. SUB l (r, c, s$)
  32.     LOCATE r, c: PRINT s$;
  34.  
  35.  
Title: Re: QB Missile from 1997
Post by: johnno56 on February 27, 2020, 01:36:20 am
Cool. Pure text!

Strange thing... ran the game and did nothing, no key press just for giggles, and the probe landed. It restarted. Landscape would change. Landed. Restarted... etc...  I'm sure that someone could possibly make the game, let's say, a little more challenging? Nudge. Nudge. Wink. Wink. lol
Title: Re: QB Missile from 1997
Post by: bplus on February 27, 2020, 09:36:50 am
Quote from: johnno56 on February 27, 2020, 01:36:20 am
Cool. Pure text!

Strange thing... ran the game and did nothing, no key press just for giggles, and the probe landed. It restarted. Landscape would change. Landed. Restarted... etc...  I'm sure that someone could possibly make the game, let's say, a little more challenging? Nudge. Nudge. Wink. Wink. lol


;-))
https://www.qb64.org/forum/index.php?topic=2219.msg114875#msg114875

Quote
Nudge. Nudge. Wink. Wink. lol
Title: Re: QB games found on archive.org
Post by: Cobalt on February 27, 2020, 10:35:04 am
If you want to see a commercial QB45 game, "Reaping The Dungeon" (aka "Dungeon Rogue", for a short time) was coded in QB45. and sold for a time in the mid 90s.
Text Only | Text with Attachments