I am a noob. I used to a lot better at DarkBASIC, but time away from it has reverted me to a noob. Can someone willing to take me on as a private student respond by saying "Help the noob."? Here is my offering to show that I will work hard:
rem ***********************
rem Sumo Monsters
rem ***********************
rem By Devin Smith-Purple Myst
rem ***********************
hide mouse
cls rgb(125,0,125)
print "To Keep You Busy During the Summer..."
print "Purple Myst Studios gladly presents..."
print "Purple Myst's First Graphical Game..."
print "This Class's First Multiplayer Game..."
print "An Originally Conceived Idea..."
print "SUMO MONSTERS!!"
print "The rules and controls are on the Hand-E Sheet."
print "PRESS ANY KEY TO RUMBLE!"
print "Note-Press escape during the fight to quit."
print "Thanks goes to The Game Creators for the music."
wait key
cls rgb(125,0,125)
load image "Sumostein.bmp", 1
sprite 1, sprite1xpos, sprite1ypos, 1
sprite1xpos = 100
sprite1ypos = 150
load image "Sumocula.bmp", 2
sprite 2, sprite2xpos, sprite2ypos, 2
load image "Sumocula Punch.bmp", 3
sprite 3, sprite2xpos, sprite2ypos, 3
hide sprite 3
load image "Sumostein Punch.bmp", 4
sprite 4, sprite1xpos, sprite1ypos, 4
hide sprite 4
load image "Sumostein Kick.bmp", 5
sprite 5, sprite1xpos, sprite1ypos, 5
hide sprite 5
load image "Sumocula Kick.bmp", 6
sprite 6, sprite2xpos, sprite2ypos, 6
hide sprite 6
load image "Enemy Destroy.bmp", 7
sprite 7, sprite1xpos, sprite1ypos, 7
hide sprite 7
sprite 8, sprite2xpos, sprite2ypos, 7
hide sprite 8
load music "Hades.mid", 1
loop music 1
load sound "whip.wav", 1
load sound "explode.wav", 2
sprite2xpos = 500
sprite2ypos = 150
playeronelives = 10
playertwolives = 10
mainloop:
do
cls rgb(125,0,125)
sprite 1, sprite1xpos, sprite1ypos, 1
sprite 2, sprite2xpos, sprite2ypos, 2
sprite 3, sprite2xpos, sprite2ypos, 3
hide sprite 3
sprite 4, sprite1xpos, sprite1ypos, 4
hide sprite 4
sprite 5, sprite1xpos, sprite1ypos, 5
hide sprite 5
sprite 6, sprite2xpos, sprite2ypos, 6
hide sprite 6
sprite 7, sprite1xpos, sprite1ypos, 7
hide sprite 7
sprite 8, sprite2xpos, sprite2ypos, 7
hide sprite 8
if upkey() = 1 then sprite1ypos = sprite1ypos -5
if downkey() = 1 then sprite1ypos = sprite1ypos +5
if leftkey() = 1 then sprite1xpos = sprite1xpos -5
if rightkey() = 1 then sprite1xpos = sprite1xpos +5
if controlkey() = 1 then gosub sumosteinpunch
if inkey$() = "/" then gosub sumosteinkick
if inkey$() = "w" then sprite2ypos = sprite2ypos -5
if inkey$() = "s" then sprite2ypos = sprite2ypos +5
if inkey$() = "a" then sprite2xpos = sprite2xpos -5
if inkey$() = "d" then sprite2xpos = sprite2xpos +5
if inkey$() = "x" then gosub sumoculapunch
if inkey$() = "c" then gosub sumoculakick
if escapekey() = 1 then end
if sprite1xpos =<0 then sprite1xpos = sprite1xpos +5
if sprite1xpos =>550 then sprite1xpos = sprite1xpos -5
if sprite1ypos =<0 then sprite1ypos = sprite1ypos +5
if sprite1ypos =>350 then sprite1ypos = sprite1ypos -5
if sprite2xpos =<0 then sprite2xpos = sprite2xpos +5
if sprite2xpos =>550 then sprite2xpos = sprite2xpos -5
if sprite2ypos =<0 then sprite2ypos = sprite2ypos +5
if sprite2ypos =>350 then sprite2ypos = sprite2ypos -5
loop
sumoculapunch:
hide sprite 2
show sprite 3
play sound 1
wait 250
if sprite collision(3, 1) = 1
playeronelives = playeronelives -1
if playeronelives = 0
delete sprite 1
play sound 2
show sprite 7
end
endif
endif
hide sprite 3
show sprite 2
gosub mainloop
sumoculakick:
hide sprite 2
show sprite 6
play sound 1
wait 250
if sprite collision(6, 1) = 1
playeronelives = playeronelives -1
if playeronelives = 0
delete sprite 1
play sound 2
show sprite 7
end
endif
endif
hide sprite 6
show sprite 2
gosub mainloop
sumosteinpunch:
hide sprite 1
show sprite 4
play sound 1
wait 250
if sprite collision(4, 2) = 1
playertwolives = playertwolives -1
if playertwolives = 0
delete sprite 2
play sound 2
show sprite 8
end
endif
endif
hide sprite 4
show sprite 1
gosub mainloop
sumosteinkick:
hide sprite 1
show sprite 5
play sound 1
wait 250
if sprite collision(5, 2) = 1
playertwolives = playertwolives -1
if playertwolives = 0
delete sprite 2
play sound 2
show sprite 8
end
endif
endif
hide sprite 5
show sprite 1
gosub mainloopmi keety tot mi gramer?
