Need help creating a Block Breaker game

Author

Message

Ad87am

19

Years of Service

User Offline

Joined: 4th Aug 2005

Location: England / London

Posted: 13th Aug 2005 17:53

Link

I have started on a block breaker game and it all went pear shaped so I decided to scrap it and start over again. I need some help with the menu system and linking to the main game.

http://www.Bevansfunbox.com

Back to top

Profile PM Email Website

Louiz ofRohr

20

Years of Service

User Offline

Joined: 11th Nov 2004

Location:

Posted: 13th Aug 2005 19:48 Edited at: 13th Aug 2005 19:49

Link

hehe

do you know what is a label?
hmm.. label is something you use to mark a line of you program..

+ Code Snippet

sync on : sync rate 0

gosub getOut

game:
DO
   set cursor 0,0 : print "YOU ARE IN THE GAME"
   sync
LOOP

getOut:
dne = 0
repeat
   set cursor 0,0 : print "YOU ARE EXITING THE GAME"
   dne = dne + 1
   sync
until dne=100

end

The command "gosub" makes the program jump to the definied label..
Try to change this:

+ Code Snippet

gosub getOut

into this:

+ Code Snippet

gosub game

And that is all the help I'll give you now.. because "you
can search in these forums for: "menu", "menu system" or
any other similar expression"...

good luck

The worst foe lies within the self...

Back to top

Profile PM

Ad87am

19

Years of Service

User Offline

Joined: 4th Aug 2005

Location: England / London

Posted: 13th Aug 2005 20:33

Link

Here is my cod so far,

REM Project: Block Breaker
REM Created: 07/08/2005 12:16:50
REM
REM ***** Main Source File *****
REM Created by Adam Bevan, 2nd Project

The_Menu:

`THE MENU--------------------------------------------------

Set Display Mode 800,600,32

`Load All Media---------------------------------------------

Load image "Background.bmp",1
Load image "New_Game.bmp",2
Load image "Enter_Password.bmp",3
Load image "How_To_Play.bmp",4
Load image "Quit.bmp",5
Load image "Loading.bmp",6
Load image "lvl1.bmp",7

`-----------------------------------------------------------
sync on
sync rate 40

Paste image 1,0,0
`Main Loop--------------------------------------------------

do
Paste image 2,50,275
Paste image 3,50,375
Paste image 4,50,475
Paste image 5,650,500

if mousex() => 50 and mousex() =< 50 and mousey() => 275 and mousey() =< 275
if mouseclick() = 1
wait 5000
Goto Maingame
endif
endif

sync
Loop
`------------------------------------------------------------

`Maingame----------------------------------------------------

Maingame:

Set display mode 800,600,32

Sync on
Sync rate 40

`Create Objects-----------------------------------------------
Make object Box 1,1,1,7
Make Object Sphere 2,1

`-------------------------------------------------------------

`Object Options-----------------------------------------------
Color Object 1, RGB(40,155,70)
Color object 2, RGB(246,238,7)
Turn object left 1,88
Position Object 1,0,-20,0

`-------------------------------------------------------------

`Main Loop----------------------------------------------------
Do

Position Camera 1,20,20
Point Camera 0,0,0

if rightkey()=1 then move object 1,1
if leftkey()=1 then move object 1,-1

Sync
Loop
`-----------------------------------------------------------

+ Code Snippet

REM Project: Block Breaker
REM Created: 07/08/2005 12:16:50
REM
REM ***** Main Source File *****
REM Created by Adam Bevan, 2nd Project

The_Menu:

`THE MENU--------------------------------------------------

Set Display Mode 800,600,32

`Load All Media---------------------------------------------

Load image "Background.bmp",1
Load image "New_Game.bmp",2
Load image "Enter_Password.bmp",3
Load image "How_To_Play.bmp",4
Load image "Quit.bmp",5
Load image "Loading.bmp",6
Load image "lvl1.bmp",7

`-----------------------------------------------------------
sync on
sync rate 40

Paste image 1,0,0
`Main Loop--------------------------------------------------

do
Paste image 2,50,275
Paste image 3,50,375
Paste image 4,50,475
Paste image 5,650,500

if mousex() => 50 and mousex() =< 50 and mousey() => 275 and mousey() =< 275
if mouseclick() = 1
wait 5000
Goto Maingame
endif
endif

sync
Loop
`------------------------------------------------------------



`Maingame----------------------------------------------------

Maingame:


Set display mode 800,600,32

Sync on
Sync rate 40

`Create Objects-----------------------------------------------
Make object Box 1,1,1,7
Make Object Sphere 2,1

`-------------------------------------------------------------


`Object Options-----------------------------------------------
Color Object 1, RGB(40,155,70)
Color object 2, RGB(246,238,7)
Turn object left 1,88
Position Object 1,0,-20,0

`-------------------------------------------------------------

`Main Loop----------------------------------------------------
Do

Position Camera 1,20,20
Point Camera 0,0,0

if rightkey()=1 then move object 1,1
if leftkey()=1 then move object 1,-1



Sync
Loop
`-----------------------------------------------------------

not sure how to make gosubs, also How do i define how for the object can go without it going out of the screen, so that it hits a wall or something

http://www.Bevansfunbox.com

Back to top

Profile PM Email Website

Louiz ofRohr

20

Years of Service

User Offline

Joined: 11th Nov 2004

Location:

Posted: 13th Aug 2005 21:26 Edited at: 13th Aug 2005 21:27

Link

ok..

Quote: "if mousex() => 50 and mousex() =< 50 and mousey() => 275 and mousey() =< 275"

this is your main problem..

look at this:

+ Code Snippet

.x1/y1         .
. CLICK AREA   .
.              .x2/y2

Notice that the click area is between the 1st point and the 2nd..
You are saying in your code that:
if mousex => 50 AND mousex =<50 (the same point?)
so there will be no space for the mouse click on.. =P

example:

+ Code Snippet

x1................... x2
50 ................. 150

y1 = 275
.
.
y2 = 310

now you have an interval from x1 to x2 (100)
and an interval from y1 to y2 (35)

so it is gonna bring you a imaginary button like this:

+ Code Snippet

       100
 -----------------
|                 |
|  AREA TO CLICK  |35
|                 |
 -----------------

so, the code could be:

+ Code Snippet

if ((mousex() => 50) and (mousex() =< 150) and (mousey() => 275) and (mousey() =< 310))
   `If the mouse is inside the imaginary box, then check if it clicks
   if (mouseClick()=1) THEN wait 1000 : gosub Maingame
endif

Programming is very easy.. the secret is to make a clear code..

The worst foe lies within the self...

Back to top

Profile PM

Louiz ofRohr

20

Years of Service

User Offline

Joined: 11th Nov 2004

Location:

Posted: 13th Aug 2005 21:32 Edited at: 13th Aug 2005 21:34

Link

About your other questions:
http://www.thegamecreators.com/?m=codebase
go there and search for "collision", "collision system",
"collisions".. and the search result will bring simple
examples to you..

HTH

The worst foe lies within the self...

Back to top

Profile PM

Ad87am

19

Years of Service

User Offline

Joined: 4th Aug 2005

Location: England / London

Posted: 14th Aug 2005 00:01

Link

Its just not working, I have got the rite values to put in but it does not work. I have done a screen dump and got it up on photoshop to get them, I got

x3.07-----------------x17.29
y16.92----------------y17.03
\ \
\ \
x3.07-----------------x17.29
y20.15----------------y20.26

I have attached the file that im using for the background, can you check if i have the rite coorordinates plz

http://www.Bevansfunbox.com

Attachments

Login to view attachments

Back to top

Profile PM Email Website

Louiz ofRohr

20

Years of Service

User Offline

Joined: 11th Nov 2004

Location:

Posted: 14th Aug 2005 01:05 Edited at: 14th Aug 2005 01:54

Link

Omg.. don't worry..

lets go:

+ Code Snippet

sync on : sync rate 0
color backdrop 0

load image "BackGround.jpg", 1


mainMenu:
sprite 1, 0,0, 1 : size sprite 1, screen width(),screen height()
set text size 10
DO
   set cursor 10,7 : print "_x: ";mousex()
   set cursor 10,20: print "_y: ";mousey()

   if ((mousex()=>46) and (mousex()=<240) and (mousey()=>228) and (mousey()=<260))
      if (mouseClick()=1)
         gosub newGame
      endif
   endif

   sync
LOOP



newGame:
delete sprite 1
make object cube 1, 50 : color object 1, RGB(250,0,0)
position object 1, 0,0,0
position camera 0,0,-100 : point camera 0,0,0
DO
   turn object right 1, 1

   set cursor 0,0 : print "PRESS SPACEBAR TO GO BACK TO MAIN MENU"

   if (spaceKey()=1) THEN delete object 1 : wait 1000 : goto mainMenu
   sync
LOOP

I maked an example for you =]
In the top left of the screen there are the cursor's coordinates..
You can just decorate them and use in your own clicks..
Example:
execute the program and position the mouse at the start of
the "EXIT" and decorate the x position of the cursor..
Then position mouse at the end of the "EXIT" and decorate the
current position..
So you have 2 x cordinades:
1st: the start x of the button
2nd: the end x of the button

Go to the code and place the coordinates you know..
Do the same for y..

a function to help you:

+ Code Snippet

function clickIn(x1,x2,y1,y2)
   if ((mousex()=>x1) and (mousex()=<x2) and (mousey()=>y1) and (mousey()=<y2))
      if (mouseClick()=1)
         clicked=1
        else
         clicked=0
      endif
   endif
endfunction clicked

to use this function you:
1st: Copy the function and paste some lines after the end of your code..

2nd: Call the function where you whant it.. but don't forget
to change "x1,x2,y1,y2" paramethers into your values..

example:

+ Code Snippet

sync on : sync rate 0

DO
   if (clickIn(46,240,228,260)=1) THEN wait 1000 : end
   `The same thing:
   `if ((mousex()=>46) and (mousex()=<240) and (mousey()=>228) and (mousey()=<260))

   sync
LOOP

function clickIn(x1,x2,y1,y2)
   if ((mousex()=>x1) and (mousex()=<x2) and (mousey()=>y1) and (mousey()=<y2))
      if (mouseClick()=1)
         clicked=1
        else
         clicked=0
      endif
   endif
endfunction clicked

And it is all..
This is the 2nd easier way to make menu systems..

[EDIT] Use the image in the attachment to see the utility of the
top left

[/EDIT]

Ok.. good luck, dude

The worst foe lies within the self..

Attachments

Login to view attachments

Back to top

Profile PM

Louiz ofRohr

20

Years of Service

User Offline

Joined: 11th Nov 2004

Location:

Posted: 14th Aug 2005 02:20

Link

LEVELS ARE OBJECTS, right?

Just the answer to your question in another thread =D
Of course you can make levels with 3D max.. because
Levels, Items, Characters, Trees, Weapons etc etc
are objects, ok?

The worst foe lies within the self..

Back to top

Profile PM

Ad87am

19

Years of Service

User Offline

Joined: 4th Aug 2005

Location: England / London

Posted: 14th Aug 2005 02:23

Link

I cant get the code to work, even tho I have got the background image in the same folder it is saying that it cant load it at "line 11" of the big code.

http://www.Bevansfunbox.com

Back to top

Profile PM Email Website

Louiz ofRohr

20

Years of Service

User Offline

Joined: 11th Nov 2004

Location:

Posted: 14th Aug 2005 07:09

Link

Se vira =]
Change the image into your own image blah blah blah
the important is that the image most to have that
black square on the top left =P

The worst foe lies within the self..

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / Need help creating a Block Breaker game

Attachments

Attachments