cop-chase-1/cop-chase-1.bas

78 lines
1.2 KiB
QBasic
Raw Permalink Normal View History

2022-01-29 05:29:33 +00:00
_Title "Cop Chase 1.0"
Screen 12
2022-01-24 05:53:48 +00:00
rem A simple game that uses a randomizer to make the gane different "everytime"
2022-01-29 05:29:33 +00:00
rem declare variables
2022-01-24 05:53:48 +00:00
dim health as integer rem player health
dim pbullets as INTEGER rem nume of player bullets
dim cheststate as INTEGER rem state of the chest with bullets
dim cpullets as INTEGER rem number of bullets in the chest
dim shotloc as INTEGER rem where the criminal is shot
dim situation as INTEGER rem one of three situations of the game
2022-01-29 05:29:33 +00:00
dim pname as string rem name of the player
rem create random number to randomize game scenario
2022-01-24 05:53:48 +00:00
RANDOMIZE timer
health = int(rnd * 100) + 1
pbullets = int(rnd * 10) + 1
2022-01-29 05:29:33 +00:00
shotloc = int(rnd * 6) * 1
2022-01-24 05:53:48 +00:00
situation = int(rnd * 3) + 1
2022-01-29 05:29:33 +00:00
Print "Welcome to an expiramental game"
print
print "Enjoy"
print
print
sleep 3
cls
print
INPUT "Before we being, what is your named? ", pname rem The player picks a name
print
print "Thanks, " + pname ", Now let's being."
cls
start:
Print "Officer " pname ", we're recived a call from the Warden Criminal Hospital."
print "They said that the South-Side Strangler has escaoped. We've received hundreds of sightings."
print "Check out the house at 123 Maple. Be careful."
livingroom:
kitchen:
bedroom:
basement:
2022-01-24 05:53:48 +00:00
2022-01-29 05:29:33 +00:00
attic: