Little Help Anyone? - GameCreators Forum

Author

Message

Ad87am

19

Years of Service

User Offline

Joined: 4th Aug 2005

Location: England / London

Posted: 4th Aug 2005 23:13

Link

I am new to Dark Basic, but i have already learnt a small amount and been able to make a pong game with the help of a tutorial. I want to start a 3rd person shooter project and need a bit of help. First off I was wondering if its actually possible to make a menu screen at the start of the game. I have not seen any in tutorials and didnt know if it is possible. Also i was wondering if someone could give me a rough guide to the core structures for creating maps, people, and other various elements in a game.

Many Thanks

Back to top

Profile PM Email Website

master programmer

19

Years of Service

User Offline

Joined: 30th May 2005

Location: 3D Space

Posted: 5th Aug 2005 05:35

Link

Yes its possible. I do for all of my games. You should use some sprites and some 2D media to make buttons and backgrounds. Then, use a command like if mousey()=>640 then paste image 5,0,0 whcih if the picture is in the right spot and the image is loaded, would change the picture of an image into another one, like a hover button on a web page.

I don't know where to start telling you how to make it. I guess you just have to be a little more experienced with DB. I'll try to get a tutorial.

__________________________________________
<<<<<Check out my sites>>>>>
www.rhettgames.tk | www.slayerbattletanks.tk

Back to top

Profile PM Email Website

master programmer

19

Years of Service

User Offline

Joined: 30th May 2005

Location: 3D Space

Posted: 5th Aug 2005 05:42 Edited at: 5th Aug 2005 05:44

Link

OK.....this isn't really a tutorial, its more just a pice of code from my main menu off of my game *notice I didn't mention the name of my game for you David R.

rem  MAIN  MENU************------------------*******************************************
_main_menu:
load image "play_game.jpg",401
load image "play_game_click.jpg",402
load image "store_button.jpg",403
load image "store_button_click.jpg",404
load image "controls_button.jpg",405
load image "controls_button_click.jpg",406
load image "help_button.jpg",409
load image "help_button_click.jpg",410
load image "more_button.jpg",411
load image "more_button_click.jpg",412

load image "screenshots_button.jpg",413
load image "screenshots_button_click.jpg",414
load image "upload_button.jpg",415
load image "upload_button_click.jpg",416
load image "save_button.jpg",417
load image "save_button_click.jpg",418

load image "back_button.jpg",424
load image "back_button_click.jpg",425
`set the rest of the variables
ink rgb(250,0,0),1
show mouse
position mouse 150,60
cls
wait 300
`do menu
sync on
do
paste image 400,0,0
paste image 401,50,5
paste image 403,50,70
paste image 405,50,135
paste image 407,50,200
paste image 409,50,265
paste image 411,50,330

`play game
if mousey()=>5 and mousey()=<60 and mouseclick()=1 then paste image 402,50,5 : play sound 17 : gosub _play_game
if mousey()=<5 and mousey()=>0 and mouseclick()=1 then paste image 402,50,5 : gosub _play_game
if mousey()=>5 and mousey()=<60 and mouseclick()=0 then paste image 402,50,5
if mousey()=<5 and mousey()=>0 and mouseclick()=0 then paste image 402,50,5

`store
if mousey()=>70 and mousey()=<130 and mouseclick()=1 then paste image 404,50,70 : play sound 17 : gosub _store
if mousey()=<70 and mousey()=>65 and mouseclick()=1 then paste image 404,50,70 : play sound 17 : gosub _store
if mousey()=>70 and mousey()=<130 and mouseclick()=0 then paste image 404,50,70
if mousey()=<70 and mousey()=>65 and mouseclick()=0 then paste image 404,50,70

`controls
if mousey()=>135 and mousey()=<155 and mouseclick()=1 then paste image 406,50,135 : play sound 17 : gosub _controls
if mousey()=<135 and mousey()=>130 and mouseclick()=1 then paste image 406,50,135 : play sound 17 : gosub _controls
if mousey()=>135 and mousey()=<155 and mouseclick()=0 then paste image 406,50,135
if mousey()=<135 and mousey()=>130 and mouseclick()=0 then paste image 406,50,135

`load game
if mousey()=>200 and mousey()=<260 and mouseclick()=1 then paste image 408,50,200 : play sound 17 : gosub _load_game2
if mousey()=<200 and mousey()=>155 and mouseclick()=1 then paste image 408,50,200 : play sound 17 : gosub _load_game2
if mousey()=>200 and mousey()=<260 and mouseclick()=0 then paste image 408,50,200
if mousey()=<200 and mousey()=>155 and mouseclick()=0 then paste image 408,50,200

`help
if mousey()=>265 and mousey()=<325 and mouseclick()=1 then paste image 410,50,265 : play sound 17 : gosub _help
if mousey()=<265 and mousey()=>260 and mouseclick()=1 then paste image 410,50,265 : play sound 17 : gosub _help
if mousey()=>265 and mousey()=<325 and mouseclick()=0 then paste image 410,50,265
if mousey()=<265 and mousey()=>260 and mouseclick()=0 then paste image 410,50,265

`more
if mousey()=>330 and mousey()=<390 and mouseclick()=1 then paste image 412,50,330 : play sound 17 : gosub _more
if mousey()=<330 and mousey()=>325 and mouseclick()=1 then paste image 412,50,330 : play sound 17 : gosub _more
if mousey()=>330 and mousey()=<390 and mouseclick()=0 then paste image 412,50,330
if mousey()=<330 and mousey()=>325 and mouseclick()=0 then paste image 412,50,330

sync
loop

+ Code Snippet

rem  MAIN  MENU************------------------*******************************************
_main_menu:
load image "play_game.jpg",401
load image "play_game_click.jpg",402
load image "store_button.jpg",403
load image "store_button_click.jpg",404
load image "controls_button.jpg",405
load image "controls_button_click.jpg",406
load image "help_button.jpg",409
load image "help_button_click.jpg",410
load image "more_button.jpg",411
load image "more_button_click.jpg",412

load image "screenshots_button.jpg",413
load image "screenshots_button_click.jpg",414
load image "upload_button.jpg",415
load image "upload_button_click.jpg",416
load image "save_button.jpg",417
load image "save_button_click.jpg",418

load image "back_button.jpg",424
load image "back_button_click.jpg",425
`set the rest of the variables
ink rgb(250,0,0),1
show mouse
position mouse 150,60
cls
wait 300
`do menu
sync on
do
paste image 400,0,0
paste image 401,50,5
paste image 403,50,70
paste image 405,50,135
paste image 407,50,200
paste image 409,50,265
paste image 411,50,330

`play game
if mousey()=>5 and mousey()=<60 and mouseclick()=1 then paste image 402,50,5 : play sound 17 : gosub _play_game
if mousey()=<5 and mousey()=>0 and mouseclick()=1 then paste image 402,50,5 : gosub _play_game
if mousey()=>5 and mousey()=<60 and mouseclick()=0 then paste image 402,50,5
if mousey()=<5 and mousey()=>0 and mouseclick()=0 then paste image 402,50,5

`store
if mousey()=>70 and mousey()=<130 and mouseclick()=1 then paste image 404,50,70 : play sound 17 : gosub _store
if mousey()=<70 and mousey()=>65 and mouseclick()=1 then paste image 404,50,70 : play sound 17 : gosub _store
if mousey()=>70 and mousey()=<130 and mouseclick()=0 then paste image 404,50,70
if mousey()=<70 and mousey()=>65 and mouseclick()=0 then paste image 404,50,70

`controls
if mousey()=>135 and mousey()=<155 and mouseclick()=1 then paste image 406,50,135 : play sound 17 : gosub _controls
if mousey()=<135 and mousey()=>130 and mouseclick()=1 then paste image 406,50,135 : play sound 17 : gosub _controls
if mousey()=>135 and mousey()=<155 and mouseclick()=0 then paste image 406,50,135
if mousey()=<135 and mousey()=>130 and mouseclick()=0 then paste image 406,50,135

`load game
if mousey()=>200 and mousey()=<260 and mouseclick()=1 then paste image 408,50,200 : play sound 17 : gosub _load_game2
if mousey()=<200 and mousey()=>155 and mouseclick()=1 then paste image 408,50,200 : play sound 17 : gosub _load_game2
if mousey()=>200 and mousey()=<260 and mouseclick()=0 then paste image 408,50,200
if mousey()=<200 and mousey()=>155 and mouseclick()=0 then paste image 408,50,200

`help
if mousey()=>265 and mousey()=<325 and mouseclick()=1 then paste image 410,50,265 : play sound 17 : gosub _help
if mousey()=<265 and mousey()=>260 and mouseclick()=1 then paste image 410,50,265 : play sound 17 : gosub _help
if mousey()=>265 and mousey()=<325 and mouseclick()=0 then paste image 410,50,265
if mousey()=<265 and mousey()=>260 and mouseclick()=0 then paste image 410,50,265

`more
if mousey()=>330 and mousey()=<390 and mouseclick()=1 then paste image 412,50,330 : play sound 17 : gosub _more
if mousey()=<330 and mousey()=>325 and mouseclick()=1 then paste image 412,50,330 : play sound 17 : gosub _more
if mousey()=>330 and mousey()=<390 and mouseclick()=0 then paste image 412,50,330
if mousey()=<330 and mousey()=>325 and mouseclick()=0 then paste image 412,50,330

sync
loop

I don't know how much that will help you.

You really have to make your own media for it to work and you have to create your own gosubs and labels and stuff to fit your game.

__________________________________________
<<<<<Check out my sites>>>>>
www.rhettgames.tk | www.slayerbattletanks.tk

Back to top

Profile PM Email Website

Zotoaster

19

Years of Service

User Offline

Joined: 20th Dec 2004

Location: Scotland

Posted: 5th Aug 2005 17:51

Link

Your code has too much media and i dont think gosubs are really necesarry, besides, i dont think he knows what gosubs are since he's only made one game..

here's a menu that i made, it doesnt have any media which means you can just copy and paste the code, and it doesn't use the mouse, its the up and down keys..

`Place the name of your game here
gamename$=" 3rd Person Shooter "

`setup
sync on
sync rate 0
hide mouse

`variables
sel=1

`menu loop
do

`Show game name
set text font "arial black"
set text to bold
set text size 40
ink rgb(0,0,255),0
center text 319,79,"-"+gamename$+"-"
center text 321,79,"-"+gamename$+"-"
center text 319,81,"-"+gamename$+"-"
center text 321,81,"-"+gamename$+"-"
ink rgb(255,255,255),0
center text 320,80,"-"+gamename$+"-"

`change selection
if upkey()=1 then inc holdu
if downkey()=1 then inc holdd
if holdu>10 then dec sel : holdu=0
if holdd>10 then inc sel : holdd=0
if sel<1 then sel=3
if sel>3 then sel=1

`show selection
set text font "comis sans ms"
set text to bold
if sel=1
ink rgb(255,255,0),0
set text size 30
center text 320,145,"Play Game"
ink rgb(255,0,0),0
set text size 20
center text 320,180,"Load Game"
ink rgb(255,0,0),0
set text size 20
center text 320,210,"Exit"
endif
if sel=2
ink rgb(255,0,0),0
set text size 20
center text 320,150,"Play Game"
ink rgb(255,255,0),0
set text size 30
center text 320,175,"Load Game"
ink rgb(255,0,0),0
set text size 20
center text 320,210,"Exit"
endif
if sel=3
ink rgb(255,0,0),0
set text size 20
center text 320,150,"Play Game"
ink rgb(255,0,0),0
set text size 20
center text 320,180,"Load Game"
ink rgb(255,255,0),0
set text size 30
center text 320,205,"Exit"
endif

`end menu loop
sync
cls rgb(0,0,50)
loop

+ Code Snippet

`Place the name of your game here
gamename$=" 3rd Person Shooter "

`setup
sync on
sync rate 0
hide mouse

`variables
sel=1

`menu loop
do

`Show game name
set text font "arial black"
set text to bold
set text size 40
ink rgb(0,0,255),0
center text 319,79,"-"+gamename$+"-"
center text 321,79,"-"+gamename$+"-"
center text 319,81,"-"+gamename$+"-"
center text 321,81,"-"+gamename$+"-"
ink rgb(255,255,255),0
center text 320,80,"-"+gamename$+"-"

`change selection
if upkey()=1 then inc holdu
if downkey()=1 then inc holdd
if holdu>10 then dec sel : holdu=0
if holdd>10 then inc sel : holdd=0
if sel<1 then sel=3
if sel>3 then sel=1

`show selection
set text font "comis sans ms"
set text to bold
if sel=1
ink rgb(255,255,0),0
set text size 30
center text 320,145,"Play Game"
ink rgb(255,0,0),0
set text size 20
center text 320,180,"Load Game"
ink rgb(255,0,0),0
set text size 20
center text 320,210,"Exit"
endif
if sel=2
ink rgb(255,0,0),0
set text size 20
center text 320,150,"Play Game"
ink rgb(255,255,0),0
set text size 30
center text 320,175,"Load Game"
ink rgb(255,0,0),0
set text size 20
center text 320,210,"Exit"
endif
if sel=3
ink rgb(255,0,0),0
set text size 20
center text 320,150,"Play Game"
ink rgb(255,0,0),0
set text size 20
center text 320,180,"Load Game"
ink rgb(255,255,0),0
set text size 30
center text 320,205,"Exit"
endif

`end menu loop
sync
cls rgb(0,0,50)
loop

though i advise you that since you've only made one game, and a very simple one at that, and you learned it from a tutorial, i don't think you're quite ready to make a 3rd person shooter, but thats not for me to decide, i was just helping out with your menu system

p.s. if you want your menu to look nicer id suggest using master programmers idea

Your signature has been erased by a mod because it's larger than 600x120...

Back to top

Profile PM Email

Ad87am

19

Years of Service

User Offline

Joined: 4th Aug 2005

Location: England / London

Posted: 5th Aug 2005 21:25

Link

Thank you for helping, i will see what i can make of the scripts. I have been reading alot of stuff on the fourms and found out that it will be very hard to just jump into a project such as the 3rd person shooter. I have decided to make some more simple game in the hope that i will learn a bit more of what is needed and about the commands. I have decided to make a block breaker game, jsut like the old "Alley Way."
Thanks again for the help.

Back to top

Profile PM Email Website

Heckno

20

Years of Service

User Offline

Joined: 8th Sep 2004

Location: Palm Coast, FL

Posted: 6th Aug 2005 04:05

Link

when you say 3rd person shooter do you really mean 1st person, cause i am not grasping the whole 3rd person shooter concept.....

There is a 1st person shooter tut (DBC style) on this website that would be more beneficial to run through than trying to create a block breaker game out of thin air....

Back to top

Profile PM Email

Zotoaster

19

Years of Service

User Offline

Joined: 20th Dec 2004

Location: Scotland

Posted: 6th Aug 2005 13:17

Link

3rd person shooter is when you can see your character shooting

Your signature has been erased by a mod because it's larger than 600x120...

Back to top

Profile PM Email

Me!

19

Years of Service

User Offline

Joined: 26th Jul 2005

Location:

Posted: 6th Aug 2005 18:24

Link

tombraider third person
doom first person

from the programming point of veiw 1st person is easier since you just use the camera veiwpoint and model weapons (and maybe hands), with third person you have to animate the player avatar and its reactions to world events as well as provide the weapons, more work.

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / Little Help Anyone?