I'm currently working on a 2d tut for newcomers and it's teaching me some stuff too anyways, my program freezes some point in code. You've been warned if you excute it.
`Street Kombat
`A simple 2d fighting game
`By Jonathan Skinner
`Setup Screen Rate
Sync on
Sync rate 40
`Hide the mouse
hide mouse
`A Basic Introduction
`Load music - this is a rip not my music
load music "Title.mid",1
play music 1
loop music 1
`W/Banner
load image "banner.bmp",1
paste image 1,200,200
wait key
cls
`Introduction text
ink rgb(0,255,255),1
text 1,1,"The Back Story of Street Kombat"
text 1,20,"All your life you want to be a fighter."
text 1,40,"Travelling the world you became a legend."
text 1,60,"Now, faith has interceeded, your twin brother."
text 1,80,"Joe 'The Dragon' Clobber wants your title as the world's best."
text 1,100,"You must fight for your glory..."
text 1,120,"1>Player"
text 1,140,"2>Players"
`Start a feedback loop
do
if inkey$() = "1" then oneup = 1:exit
if inkey$() = "2" then twoup = 1:exit
loop
`1up
if oneup = 1
cls
text 1,1,"Controls"
text 1,20,"A>Throw A Punch"
text 1,40,"S>Throw A Low Kick"
text 1,60,"D>Throw A High Kick"
text 1,80,"F>Block"
text 1,100,"Q>Left Movement"
text 1,120,"W>Right Movement"
text 1,140,"E>Duck"
text 1,160,"Z>Jump"
endif
`2up
if twoup = 1
endif
Programming is fun with DarkBASIC!
