Jump to content
IGNORED

What is your favorite BASIC game ??


LYNXGUY

Recommended Posts

Mine would have to be "Oil Game" which I downloaded and "Medieval Combat" which I would love to download but I cannot find it, any ideas ?

 

Although I like "Dark Horse" (Presidential election) too, I can't find that either.

"Munchin' Climbin'" is a favorite of mine too.

Link to comment
Share on other sites

Telenguard!

 

But from the type-in games

Bats, Risky Rescue (was that basic?)

 

There was another type-in but I can't recall its name?

I think you had a Shamus like guy who had to get keys to unlock gold

(or doors to get to the gold) on a fixed screen map. The striking thing

was the colorful graphics of which it used an animated charset to rotate

the walls/flash jewels etc.

 

Regards,

Mark

Link to comment
Share on other sites

There was another type-in but I can't recall its name?

I think you had a Shamus like guy who had to get keys to unlock gold

(or doors to get to the gold) on a fixed screen map. The striking thing  

was the colorful graphics of which it used an animated charset to rotate

the walls/flash jewels etc.

Was it Creepy Caverns by Anthony Ramos?

 

I know I loved that game :thumbsup:

 

Some other favorites of mine were...

E-Racer by James Hague

Biffdrop by J.D. Casten

Rebound by J.D. Casten

Link to comment
Share on other sites

Well my favourite basic game is called Boersenspiel. You are on the stock market and there are 50 rounds to get the most of your given 10000 DM. I have an upgraded TurboBASIC version of this game with more features and a TOP 100 List!!! Up to 6 players can play together.

 

This better version can be downloaded from my internet site.

Link to comment
Share on other sites

I always liked this simple type-in from Compute! magazine called goldrush.

 

WRL

 


10 REM GOLDRUSH by Joseph Weber From COMPUTE! July 1982

100 REM Atari Goldrush

110 REM 

120 REM Custom Characters

130 DATA 56,56,16,56,84,16,40,68

140 DATA 170,85,170,85,170,85,170,85

150 DATA 0,28,60,110,126,62,28,0

160 DATA 129,66,36,24,24,36,66,129

170 DATA 128,64,32,16,8,4,2,1

180 DATA 1,2,4,8,16,32,64,128

190 DATA 16,16,124,16,16,16,56,124

200 DIM CHAR$(8),WHICH(3,2)

210 CHAR$="*+-=<>%":MINER=3

220 GRAPHICS 1+16:SETCOLOR 4,6,4:SETCOLOR 0,1,10:SETCOLOR 3,4,10

230 PRINT #6;"GOLDRUSH!":SETCOLOR 2,3,0

240 POSITION 9,0:PRINT #6;"please wait"

250 CHSET=(PEEK(106)-8)*256:CHORG=57344

260 IF PEEK(CHSET+9)<>0 THEN 340

270 FOR I=0 TO 511:POKE CHSET+I,PEEK(CHORG+I):NEXT I

280 FOR I=1 TO 7

290 CHPOS=CHSET+(ASC(CHAR$(I))-32)*8

300 FOR J=0 TO 7

310 READ A:POKE CHPOS+J,A

320 NEXT J:NEXT I

330 FOR I=32 TO 39:POKE CHSET+I,255-PEEK(CHORG+I):NEXT I

340 POKE 756,CHSET/256

350 POSITION 9,0:PRINT #6;"    ";CHR$(4);"       "

360 NUGGETS=0

370 FOR I=1 TO 22:FOR J=0 TO 19

380 IF RND(0)>0.4 THEN COLOR ASC(CHAR$(2))+128:PLOT J,I:GOTO 400

390 IF I>3 THEN COLOR ASC(CHAR$(3)):PLOT J,I:NUGGETS=NUGGETS+1

400 NEXT J:NEXT I

410 CHARGES=10:POSITION 9,23:PRINT #6;"CHARGES ";CHARGES

420 XPOS=11:YPOS=0:EMF=0:GOTO 590

430 REM Main Loop

440 ST=STICK(0):TR=STRIG(0)

450 IF PEEK(20)>15 THEN POKE 709,(INT(16*RND(0))*16+10):POKE 20,0

460 IF EMF THEN SOUND 1,T,10,8:T=T*(T<8)+2:TI=TI+1:IF TI>20 THEN SOUND 1,0,0,0:GOTO 1120

470 IF 1-TR THEN IF EMF=0 THEN 820

480 IF ST=15 THEN 440

490 V=-(ST=14)*(YPOS>0)+(ST=13)*(YPOS<22)

500 H=-(ST=11)*(XPOS>0)+(ST=7)*(XPOS<19)

510 COLOR 32:PLOT XPOS,YPOS

520 XPOS=XPOS+H:YPOS=YPOS+V

530 LOCATE XPOS,YPOS,WHAT

540 IF WHAT=32 THEN 590

550 IF WHAT=ASC(CHAR$(3)) THEN GOSUB 640:GOTO 590

560 IF WHAT=ASC(CHAR$(7)) THEN GOSUB 760:GOTO 590

570 IF WHAT=4 THEN GOSUB 670:REM Cash in

580 SOUND 0,100,12,8:FOR W=1 TO 20:NEXT W:SOUND 0,0,0,0:XPOS=XPOS-H:YPOS=YPOS-V:COLOR 138:PLOT XPOS,YPOS:GOTO 440

590 COLOR 138:PLOT XPOS,YPOS

600 IF EMF AND YPOS=0 THEN EMF=0:COLOR 32:PLOT XPOS,YPOS:SOUND 1,0,0,0:GOTO 410

610 FOR W=8 TO 0 STEP -1:SOUND 0,W*5,12,W:NEXT W

620 GOTO 440

630 GOTO 630

640 FOR W=15 TO 0 STEP -1:SOUND 0,20,10,W:NEXT W:GOLD=GOLD+1:NUGGETS=NUGGETS-1:IF NUGGETS<0 THEN NUGGETS=0

650 POSITION 0,23:PRINT #6;"gold ";GOLD;"  ";

660 RETURN 

670 REM Cash in !

680 SOUND 2,4,10,4

690 FOR W=10 TO 5 STEP -1:FOR I=15 TO 0 STEP -1:SOUND 0,W,10,I:NEXT I:NEXT W

700 SOUND 2,0,0,0

710 CASH=CASH+GOLD*CHARGES:GOLD=0

720 GOSUB 650

730 POSITION 14,0:PRINT #6;CASH

740 IF NUGGETS=0 THEN POP :GOTO 360

750 RETURN 

760 REM Get the gold from the dead miner

770 FOR I=3 TO 1 STEP -1

780 IF WHICH(I,0)=XPOS AND WHICH(I,1)=YPOS THEN 800

790 NEXT I:RETURN 

800 GOLD=GOLD+WHICH(I,2):GOSUB 650

810 RETURN 

820 REM Explosion

830 XP=XPOS+H:YP=YPOS+V:IF YP=0 THEN 440

840 RESTORE 850

850 DATA 0,0,-1,-1,1,1,-1,1,1,-1

860 FOR I=1 TO 5:READ A,B

870 IF XP+A>=0 AND XP+A<=19 AND YP+B>=1 AND YP+B<=22 THEN LOCATE XP+A,YP+B,ZZ:IF ZZ=45 THEN NUGGETS=NUGGETS-1

880 NEXT I:COLOR ASC(CHAR$(4))

890 IF XP>0 AND XP<20 THEN PLOT XP,YP

900 COLOR ASC(CHAR$(5)):IF YP>2 AND XP>0 THEN PLOT XP-1,YP-1

910 IF YP<22 AND XP<19 THEN PLOT XP+1,YP+1

920 COLOR ASC(CHAR$(6)):IF YP>2 AND XP<19 THEN PLOT XP+1,YP-1

930 IF YP<22 AND XP>0 THEN PLOT XP-1,YP+1

940 DL=PEEK(560)+256*PEEK(561):SV=PEEK(712)

950 FOR W=15 TO 0 STEP -0.5:SOUND 0,50,0,W:SW=1-SW:POKE 712,SW*(4*16+6):POKE DL,112*SW:NEXT W

960 POKE DL,112:POKE 712,SV

970 REM 

980 COLOR 32:PLOT XP,YP:IF YP>2 AND XP>0 THEN PLOT XP-1,YP-1

990 IF YP<22 AND XP<19 THEN PLOT XP+1,YP+1

1000 IF YP>2 AND XP<19 THEN PLOT XP+1,YP-1

1010 IF YP<22 AND XP>0 THEN PLOT XP-1,YP+1

1020 COLOR 138:PLOT XPOS,YPOS

1030 FOR I=1 TO 20

1040 RX=INT(20*RND(0)):RY=INT(22*RND(0)+1)

1050 LOCATE RX,RY-1,Z2

1060 LOCATE RX,RY,Z:IF Z=32 AND Z2=171 THEN COLOR 171:PLOT RX,RY

1070 IF Z=138 THEN 1130

1080 NEXT I

1090 CHARGES=CHARGES-1:POSITION 17,23:PRINT #6;CHARGES;" ";

1100 IF CHARGES>0 THEN 440

1110 TI=0:EMF=1:POSITION 9,23:PRINT #6;"get out";CHR$(1);"   ";:GOTO 440

1120 REM Dead miner

1130 FOR I=14 TO 0 STEP -0.5:SETCOLOR 3,4,I:SOUND 0,I,10,I:NEXT I:RESTORE 1190

1140 READ A,W:IF A>0 THEN SOUND 0,A,10,8:FOR I=1 TO W*2:NEXT I

1150 IF A>0 THEN SOUND 0,0,0,0:FOR W=1 TO 5:NEXT W:GOTO 1140

1160 COLOR ASC(CHAR$(7)):PLOT XPOS,YPOS:WHICH(MINER,2)=GOLD:GOLD=0:GOSUB 650

1170 WHICH(MINER,0)=XPOS:WHICH(MINER,1)=YPOS:MINER=MINER-1:IF MINER=0 THEN 1210:REM Game Over

1180 SETCOLOR 3,4,10:GOTO 410

1190 DATA 100,30,100,20,100,5,100,30,85,40,90,30,100,20,105,10,100,30

1200 DATA -1,0

1210 POSITION 0,0:PRINT #6;"game over"

1220 POKE 709,PEEK(53770)

1230 IF PEEK(53279)<>6 THEN 1220

1240 RUN 

post-188-1079995413_thumb.png

Link to comment
Share on other sites

Biffdrop and pretty much any game by J.D. Casten--the David Crane of Atari BASIC games.

 

I've tried to locate J.D. Casten but he's seemed to have dropped off the face of the earth. He's like the D.B. Cooper of Atari programmers.

 

Allan

Link to comment
Share on other sites

Any ideas where I might be able to download  "Medieval Combat" and "Dark Horse"(Presidential Election)and "Knights and Chalises" :?

 

I remember dark horse from an analog issue, sorry I cant remember

which one, but you can download the full set of programs plubish

in that magazine from internet.

 

devweb

Link to comment
Share on other sites

Any ideas where I might be able to download  "Medieval Combat" and "Dark Horse"(Presidential Election)and "Knights and Chalises" :?

 

I remember dark horse from an analog issue, sorry I cant remember

which one, but you can download the full set of programs plubish

in that magazine from internet.

 

devweb

 

From internet ??

What website ??

Link to comment
Share on other sites

Biffdrop and pretty much any game by J.D. Casten--the David Crane of Atari BASIC games.

 

I've tried to locate J.D. Casten but he's seemed to have dropped off the face of the earth. He's like the D.B. Cooper of Atari programmers.

 

Allan

 

The closest I came is putting John David Casten in google and finding a guy with that name in the computer department at San Francisco University (think that is the school.) I didn't have the guts to send an e-mail to see if it was actually him.

 

It is sad that a game design genius like him apparently disappeared.

Link to comment
Share on other sites

For me one from the best Basic game is "Hammurabi - feudal economy". It's text economy game about feudal economy in Europe. I have Polish version, but, I know, is German version in 100% and English in 90%. Another cool game is "Kolony" - space-economy game (Polish). I see at internet Czech version of Kolony, but i'nt see other versions.

Link to comment
Share on other sites

I have two favorite basic games:

 

first: Nerm of Bemer ... it is a well known game idea: a snake getting longer the more mushrooms it eats. When 5 mushrooms are eaten there are exit-ports on the playfield, and you can escape to the next level. Very cool game in basic.

 

second: this is a game called "Handel" ... it is in Dutch, written by Kees Beekhuis (this dutch guy wrote the Atari version of Into Eagles nest, and Dizzy Dice). The idea of this basic games is something like 'pirates of the barb. sea' .. just buy merchandise, sail away and try to sell it for more money on other places.

 

Marius

Link to comment
Share on other sites

Holy Cow :o I totally forgot about Nerm of Bemer :roll:

I really liked that game.

 

My best friend has an Atari 1200XL, 800 and an ST and I will be going to see him for 12 days at the end of May and I am looking forward to playing my favorite games again :cool:

Link to comment
Share on other sites

Well,

I have that "Dark Horse" game in my collection, the other games maybe also. E-mail me, when interested (amp#abbuc*de)...

 

My favorite Basic games?!? Well, I love the arcade-like games "Schatzhoehle" (treasure cavern) by Peter Bluemer, a type in listing from Happy Computer magazine; the Joust-clone "Straussenkampf" by Oliver Cyranka and "Hugojagd XL" by Stefan Dorndorf;

 

My favorite economy games in Basic are "Safryland", "Santa Paravia" and "Fuerstentum" (here in Germany all well-known as "Kaiser" clones, allthough some of them are much older than Kaiser)...

 

greetings, Andreas.

Link to comment
Share on other sites

Mine would have to be "Oil Game" which I downloaded and "Medieval Combat" which I would love to download but I cannot find it, any ideas ?

 

Although I like "Dark Horse" (Presidential election) too, I can't find that either.

"Munchin' Climbin'" is a favorite of mine too.

 

Well, my favourite is StripPoker. Amazing BAS/COM game.

 

F.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...