Sorry your browser is not supported!

You are using an outdated browser that does not support modern web technologies, in order to use this site please update to a new browser.

Browsers supported include Chrome, FireFox, Safari, Opera, Internet Explorer 10+ or Microsoft Edge.

DarkBASIC Professional Discussion / DBPro game making commands

Author
Message
levent
21
Years of Service
User Offline
Joined: 2nd Nov 2002
Location: United States
Posted: 17th Dec 2002 07:51
Below is the shortest game ever written in DBPro

input "Enter game title : ",title$
input "Enter you name : ", name$
input "Enter your enemy's name: ",enemy$
input "Enter your mission : ", mission$
make game title$, name$, enemy$, mission$
play game
end game

--levent
Kangaroo2
21
Years of Service
User Offline
Joined: 26th Sep 2002
Location: United Kingdom
Posted: 17th Dec 2002 11:34
Here is an even shorter game I wrote for Crash! (Spectrum Magazine) back in the 80's, as a tribute to their pages and pages of text which you would copy out hoping it would be a cool game...

1 print "Syntax Error"
2 goto 1

and now, exclusivly for this forum, the all new DBPro version!

start:
print "Syntax Error"
goto start

lol ahh the good old days

* If the apocalypse comes, email me *
Kentaree
21
Years of Service
User Offline
Joined: 5th Oct 2002
Location: Clonmel, Ireland
Posted: 17th Dec 2002 13:58
First prog I ever wrote in QBasic:

Input "Name"; Name$
Print "Hello "; Name$

I'm getting all teary eyed. *sniff*

Whatever I did I didn't do it!
ICERGB
21
Years of Service
User Offline
Joined: 8th Nov 2002
Location: Canada
Posted: 17th Dec 2002 16:09
Needs rules

randomize rnd(100)
a=rnd(10)

do
print "pick a number between 1 and 10"
input num
if num=a then print "You win!": wait key: end
if num<>a then print "try again!"
inc b : if b>8 then cls 0 :b=0
loop
ICERGB
21
Years of Service
User Offline
Joined: 8th Nov 2002
Location: Canada
Posted: 17th Dec 2002 16:26
dang that randomize function

Here;
t=timer()
tt$=str$(t)
ttt=val(right$(tt$,1))
randomize rnd(ttt)
a=rnd(10)

do
print "pick a number between 1 and 10"
input num
if num=a then print "You win!": wait key: end
if num<>a then print "try again!"
inc b : if b>8 then cls 0 :b=0
loop
vivi
21
Years of Service
User Offline
Joined: 28th Nov 2002
Location: United Kingdom
Posted: 19th Dec 2002 16:20
do
print "shortest game EVER!"
loop

now thats a short game......

WHY WAIT FOR GAMES.......MAKE THEM COME TO YOU
>>>>>>>>>>>www.shark-software.20m.com<<<<<<<<<<<
MrTAToad
21
Years of Service
User Offline
Joined: 26th Aug 2002
Location: United Kingdom
Posted: 19th Dec 2002 17:54
No, this is : print "Well done, you've won"

Good news everyone! I really am THAT good...
Oh my, yes...
The Darthster
21
Years of Service
User Offline
Joined: 25th Sep 2002
Location: United Kingdom
Posted: 20th Dec 2002 00:31
Benjamin
21
Years of Service
User Offline
Joined: 24th Nov 2002
Location: France
Posted: 20th Dec 2002 00:52
a game is something that you play, not watch

xxxpetratxxx
B. R. W
Drunken Fingers
21
Years of Service
User Offline
Joined: 2nd Oct 2002
Location: United States
Posted: 20th Dec 2002 03:23
What was that 80s arcade game with Dirk the Daring? Dungon something. Now that game you watched.
IanM
Retired Moderator
21
Years of Service
User Offline
Joined: 11th Sep 2002
Location: In my moon base
Posted: 20th Dec 2002 21:42
Do you mean 'dragons lair'? That was the most pointless game ever!
vivi
21
Years of Service
User Offline
Joined: 28th Nov 2002
Location: United Kingdom
Posted: 21st Dec 2002 00:00
Im gonna go with it so so i dont look like a fool posting my last message


WHY WAIT FOR GAMES.......MAKE THEM COME TO YOU
>>>>>>>>>>>www.shark-software.20m.com<<<<<<<<<<<
Kangaroo2
21
Years of Service
User Offline
Joined: 26th Sep 2002
Location: United Kingdom
Posted: 21st Dec 2002 00:56
Dragon's Lair was the first Laser Disc game, in the 80s. It couldn't be the shortest game because it was actually quite long - it took about 2 hours to complete. Trouble was you basically just watched a pre recorded cartoon, and pressed a random button every now and again - no real control or interaction. Sequels included Space Ace and Brain Dead 13, which contained slightly more interaction but were basically more of the same.

The animations were great, made by Don Bluth productions of Land Before Time and American Tail fame (plus also used to work for Disney) - but the games themselves stank! They got a re-release with the advent of CD rom, with Versions For Sega Mega-CD, Philips CDi and Amiga CD32. All 3 systems failed, probably cos rubbish games like these were released on them! The games later came out for MSDOS/6 PC, and even later got released as DVD's playable on a standard DVD player, PC or PS2.

They. Were. Poo.



* If the apocalypse comes, email me *
Nikkoz
21
Years of Service
User Offline
Joined: 31st Aug 2002
Location: Sweden
Posted: 21st Dec 2002 09:55
I hate pooh!
Kangaroo2
21
Years of Service
User Offline
Joined: 26th Sep 2002
Location: United Kingdom
Posted: 21st Dec 2002 22:01
lol that has to be the strangest post I've ever seen...?

* If the apocalypse comes, email me *
Attreid
21
Years of Service
User Offline
Joined: 27th Nov 2002
Location:
Posted: 22nd Dec 2002 00:24
My shorter and stupidier programm :

end

I'm following John, but I'm not john.
Lol, it is funnier in french
Attreid
21
Years of Service
User Offline
Joined: 27th Nov 2002
Location:
Posted: 22nd Dec 2002 00:39
oops, TheDarthster already said it, but I didn't see it, sorry

I'm following John, but I'm not john.
Lol, it is funnier in french
Kangaroo2
21
Years of Service
User Offline
Joined: 26th Sep 2002
Location: United Kingdom
Posted: 22nd Dec 2002 03:02
My french isn't as hot as it should be - but, to follow is "suivez" right? So "I'm following John, but I'm not John" should be "Je suis John, mais je ne suis pas John" - Which literally translated back into English means "I AM John, but I'm NOT John"...

Is that why its funny? Do I win a prize?

* If the apocalypse comes, email me *

Login to post a reply

Server time is: 2024-05-04 21:32:25
Your offset time is: 2024-05-04 21:32:25