78 lines
1.2 KiB
QBasic
78 lines
1.2 KiB
QBasic
_Title "Cop Chase 1.0"
|
|
|
|
Screen 12
|
|
|
|
|
|
rem A simple game that uses a randomizer to make the gane different "everytime"
|
|
|
|
rem declare variables
|
|
|
|
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
|
|
|
|
dim pname as string rem name of the player
|
|
|
|
|
|
rem create random number to randomize game scenario
|
|
|
|
|
|
RANDOMIZE timer
|
|
|
|
health = int(rnd * 100) + 1
|
|
|
|
pbullets = int(rnd * 10) + 1
|
|
|
|
shotloc = int(rnd * 6) * 1
|
|
|
|
situation = int(rnd * 3) + 1
|
|
|
|
|
|
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:
|
|
|
|
|
|
|
|
|
|
attic: |