Qbasicnews.com

Full Version: A fresh challenge for you all
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Pages: 1 2
I don't really know how to play either, but you roll a somewhat heavy balll down the lane. You have to knock over i think 9 pins, in two throws. The more pins you knock over and the least amount of throws it takes gives your more points. The person with the highest score wins.
Plain old bowling is pretty boring, but not if you add some flair... Like, maybe if you launch a cannonball and see how many pins you can destroy! :lol:


Anyway, here's a Flash game...
http://www.flasharcade.com/game.php?bowling
XD^ sounds like fuN!
Quote:I've never played to a bowling game. Can someone explain how is it? I mean, the game mechanics.
You never played blowling :o
I meant in a videogame. You know, you can't throw a ball to the screen... Well, you can, but you shouldn't.
I thought this elf bowling game was fun for half a minute, I D/L it a few years back. Here's the site I believe when I googled Elf Bowling...

[url]
http://www.freechristmasscreensavers.com/elfbowling.htm
[/url]

Seems they now have an updated version for download too.
I Didn't play the new version yet, probablly never will, (I'm real busy working on my new console style + mouse control, QBRPG...
Awakened :evil: )

Cya,

Nemesis
You don't play bowling, you bowl.

Bowling video games are horrible.

Too bad this compo is only for QB.

I might have tried something in VB.

Anyway, laters.
Code:
cls
randomize timer
input "Throw the ball? Y/N", $ballthrow

If $ballthrow = "Y" then
print "Ball thrown. "
pinsknockedover = int(rnd*9) + 1
print "You have knocked over ", pinsknockedover, "pins."
if pinsknockedover > 8 print "Good throw"
if pinsknockedover < 9 print "Bad throw"
if pinsknockedover < 1 print "Gutter Ball"
end

else if $ballthrow = "N" then
print "Ball not thrown. Why didn't you throw the ball? You suck. You lose."
end

else print "Bad input. You lose."
end

end if

Done Big Grin

I win. Forgive the horid code, I haven't coded qb in...a long long time. Not even sure if that is valid syntax there :oops:
:lol:

The only thing I see is it should be BallThrow$, instead of $BallThrow. Wink
and you forgot THEN


anyways I've improved it becuase I'm bored out of my mind.

[syntax="QBASIC"]CLS
RANDOMIZE TIMER
numberofpins = 10
DO
try = try + 1
IF try = 3 THEN PRINT "You lose."; numberofpins; "pins left.": END
INPUT "Throw the ball? Y/N ", ballthrow$
IF LCASE$(ballthrow$) = "y" THEN
PRINT "Ball thrown. "
pinsknockedover = INT(RND * numberofpins)
numberofpins = numberofpins - pinsknockedover
SELECT CASE pinsknockedover
CASE numberofpins:
IF try = 1 THEN PRINT "Strike! You win." ELSE PRINT "Spare. You win"
END
CASE 0: PRINT "Gutterball"
CASE ELSE: PRINT "You have knocked over"; pinsknockedover; "pins."
END SELECT
ELSEIF LCASE$(ballthrow$) = "n" THEN
PRINT "Ball not thrown. Why didn't you throw the ball? You suck. You lose."
ELSE
PRINT "Bad input. You lose."
END
END IF
LOOP[/syntax]
Pages: 1 2