ball, dont want to move - GameCreators Forum

Author

Message

Slooper

21

Years of Service

User Offline

Joined: 13th Feb 2003

Location: Sweden

Posted: 15th Mar 2005 04:54 Edited at: 15th Mar 2005 05:30

Link

can someone please tell me why the ball doesn´t move at all?

(Attached the game to, becuse i use some own models)

Rem Project: pong
Rem Created: 2005-03-04 22:28:44

Rem ***** Main Source File *****

rem settings
settings()

rem load level
make_lvl()

rem load ball, players and settings
load_players()

rem included variabels
included_variabels()

do
rem player movvement code
players_movement()

rem ball movement code
ball_movement()

sync
loop

rem functions

function settings()
   sync on
   sync rate 70
   hide mouse
   make camera 1 : position camera 1,0,0,-50 : color backdrop 1,RGB(0,0,0)
endfunction

function make_lvl()
   load object "media/models/tak.3ds",4 : position object 4,0,25,0 : color object 4,RGB(0,0,255) : scale object 4,20,20,20 : rotate object 4,0,90,0
   load object "media/models/tak.3ds",5 : position object 5,0,-25,0 : color object 5,RGB(0,0,255) : scale object 5,20,20,20 : rotate object 5,180,90,0
   make object box 6,2,46.5,6
   position object 6,0,0,0
   ghost object on 6
   color object 6,RGB(0,128,255)
endfunction

function load_players()
   load object "media/models/hover.3ds",1 : color object 1,RGB(0,0,255) : position object 1,-32,0,0 : scale object 1,20,20,20 : rotate object 1,160,0,90
   load object "media/models/hover.3ds",2 : color object 2,RGB(0,0,255) : position object 2,32,0,0 : scale object 2,20,20,20 : rotate object 2,340,180,90
   make object sphere 3,1.5
endfunction

function included_variabels()
   inc p1mvu
   inc p1mvd
   inc p2mvu
   inc p2mvd
   inc bally
   inc ballx
   inc ballz
   inc ballyvelo
   inc ballxvelo
endfunction

function players_movement()
p1mvu=0
p1mvd=0
p2mvu=0
p2mvd=0

if upkey()=1 then p2mvu=1
if downkey()=1 then p2mvd=1
if keystate(17)=1 then p1mvu=1
if keystate(31)=1 then p1mvd=1

x#=object position x(1)
y#=object position y(1)
z#=object position z(1)
x2#=object position x(2)
y2#=object position y(2)
z2#=object position z(2)

if p1mvu=1
   y#=y#+0.5
endif
if p1mvd=1
   y#=y#-0.5
endif

if p2mvu=1
   y2#=y2#+0.5
endif
if p2mvd=1
   y2#=y2#-0.5
endif

rem makes the players to stay in screen

if y#>21 then y#=21
 if y#<-21 then y#=-21
 if y2#>21 then y2#=21
 if y2#<-21 then y2#=-21

position object 1,x#,y#,z#
position object 2,x2#,y2#,z2#
endfunction

function ball_movement()

ballx=object position x(3)
bally=object position y(3)
ballz=object position z(3)

rem making the ball move after shooting it

ballx=ballx+0.5
bally=bally+0.5

position object 3,ballx,bally,ballz

endfunction

+ Code Snippet

Rem Project: pong
Rem Created: 2005-03-04 22:28:44

Rem ***** Main Source File *****

rem settings
settings()

rem load level
make_lvl()

rem load ball, players and settings
load_players()

rem included variabels
included_variabels()




do
rem player movvement code
players_movement()

rem ball movement code
ball_movement()

sync
loop

rem functions

function settings()
   sync on
   sync rate 70
   hide mouse
   make camera 1 : position camera 1,0,0,-50 : color backdrop 1,RGB(0,0,0)
endfunction

function make_lvl()
   load object "media/models/tak.3ds",4 : position object 4,0,25,0 : color object 4,RGB(0,0,255) : scale object 4,20,20,20 : rotate object 4,0,90,0
   load object "media/models/tak.3ds",5 : position object 5,0,-25,0 : color object 5,RGB(0,0,255) : scale object 5,20,20,20 : rotate object 5,180,90,0
   make object box 6,2,46.5,6
   position object 6,0,0,0
   ghost object on 6
   color object 6,RGB(0,128,255)
endfunction

function load_players()
   load object "media/models/hover.3ds",1 : color object 1,RGB(0,0,255) : position object 1,-32,0,0 : scale object 1,20,20,20 : rotate object 1,160,0,90
   load object "media/models/hover.3ds",2 : color object 2,RGB(0,0,255) : position object 2,32,0,0 : scale object 2,20,20,20 : rotate object 2,340,180,90
   make object sphere 3,1.5
endfunction

function included_variabels()
   inc p1mvu
   inc p1mvd
   inc p2mvu
   inc p2mvd
   inc bally
   inc ballx
   inc ballz
   inc ballyvelo
   inc ballxvelo
endfunction

function players_movement()
p1mvu=0
p1mvd=0
p2mvu=0
p2mvd=0

if upkey()=1 then p2mvu=1
if downkey()=1 then p2mvd=1
if keystate(17)=1 then p1mvu=1
if keystate(31)=1 then p1mvd=1

x#=object position x(1)
y#=object position y(1)
z#=object position z(1)
x2#=object position x(2)
y2#=object position y(2)
z2#=object position z(2)

if p1mvu=1
   y#=y#+0.5
endif
if p1mvd=1
   y#=y#-0.5
endif

if p2mvu=1
   y2#=y2#+0.5
endif
if p2mvd=1
   y2#=y2#-0.5
endif

rem makes the players to stay in screen

 if y#>21 then y#=21
 if y#<-21 then y#=-21
 if y2#>21 then y2#=21
 if y2#<-21 then y2#=-21

position object 1,x#,y#,z#
position object 2,x2#,y2#,z2#
endfunction

function ball_movement()

ballx=object position x(3)
bally=object position y(3)
ballz=object position z(3)

rem making the ball move after shooting it

ballx=ballx+0.5
bally=bally+0.5


position object 3,ballx,bally,ballz

endfunction

You never fail, only make mistakes.

Attachments

Login to view attachments

Back to top

Profile PM Email Website

RiiDii

19

Years of Service

User Offline

Joined: 20th Jan 2005

Location: Inatincan

Posted: 15th Mar 2005 05:00 Edited at: 15th Mar 2005 05:01

Link

Looks like you need to make you variables Global:

Global p1mvu
Global p1mvd
...and so on...

These have to be done outside of functions.

Also, looks like you might be misunderstanding the Inc function. It's not "Include", its "Increment", which simply adds to the variable's value (like x=x+1).

"Droids don't rip your arms off when they lose." -H. Solo

REALITY II

Back to top

Profile PM Email

Slooper

21

Years of Service

User Offline

Joined: 13th Feb 2003

Location: Sweden

Posted: 15th Mar 2005 05:07

Link

ok the thing you explained wih the inc command i understand but the

Global p1mvu
Global p1mvd

dont need to be done becuse the players do move but i dont understand why the ball doesn´t move

any other suggestion please

You never fail, only make mistakes.

Back to top

Profile PM Email Website

Baggers

20

Years of Service

User Offline

Joined: 31st May 2004

Location: Yonder over dem dere hills

Posted: 15th Mar 2005 05:28

Link

He meant you would need to set the ball x,y and z to global aswell as remember in functions they are global vaiables, so are not remembered next time the function is called.

Back to top

Profile PM Email

Slooper

21

Years of Service

User Offline

Joined: 13th Feb 2003

Location: Sweden

Posted: 15th Mar 2005 05:37

Link

ok baggers i really still don´t understand, can you show me in the code what you do mean? sry i am a really noob to programming.

You never fail, only make mistakes.

Back to top

Profile PM Email Website

Scraggle

Moderator

21

Years of Service

User Offline

Joined: 10th Jul 2003

Location: Yorkshire

Posted: 15th Mar 2005 05:39 Edited at: 15th Mar 2005 05:40

Link

Whilst all the points raised so far are valid none of them will help you because the ballx, bally and ballz variables are all created and incremented within the function. So, making them global will not help you.

The problem is - they are being treated as integer variables and you cannot increment an integer by a floating value.

The solution is to make the three ball variables floats. There are two ways to do this. Either call them ballx#, bally# and ballz# or set them globally at the start of the code with the commands:
Global ballx as float
Global bally as float
Global ballz as float

I hope that helps

Back to top

Profile PM Email

Slooper

21

Years of Service

User Offline

Joined: 13th Feb 2003

Location: Sweden

Posted: 15th Mar 2005 05:45

Link

hmm Scraggle i tried that with renaming them to ballx#, bally# and ballz# but it didnt work, as you can see i attached the game in my first post can´t you download it and try to figure it out this problem really going on my nerves

You never fail, only make mistakes.

Back to top

Profile PM Email Website

Scraggle

Moderator

21

Years of Service

User Offline

Joined: 10th Jul 2003

Location: Yorkshire

Posted: 15th Mar 2005 05:51 Edited at: 15th Mar 2005 05:52

Link

It works when I try it!

Here is the code exactly as you have it but with the ball variables as floats (maybe, you didn't change all of them?).

Rem Project: pong
Rem Created: 2005-03-04 22:28:44

Rem ***** Main Source File *****

rem settings
settings()

rem load level
make_lvl()

rem load ball, players and settings
load_players()

rem included variabels
included_variabels()

do
rem player movvement code
players_movement()

rem ball movement code
ball_movement()

sync
loop

rem functions

function settings()
   sync on
   sync rate 70
   hide mouse
   make camera 1 : position camera 1,0,0,-50 : color backdrop 1,RGB(0,0,0)
endfunction

function make_lvl()
   load object "media/models/tak.3ds",4 : position object 4,0,25,0 : color object 4,RGB(0,0,255) : scale object 4,20,20,20 : rotate object 4,0,90,0
   load object "media/models/tak.3ds",5 : position object 5,0,-25,0 : color object 5,RGB(0,0,255) : scale object 5,20,20,20 : rotate object 5,180,90,0
   make object box 6,2,46.5,6
   position object 6,0,0,0
   ghost object on 6
   color object 6,RGB(0,128,255)
endfunction

function load_players()
   load object "media/models/hover.3ds",1 : color object 1,RGB(0,0,255) : position object 1,-32,0,0 : scale object 1,20,20,20 : rotate object 1,160,0,90
   load object "media/models/hover.3ds",2 : color object 2,RGB(0,0,255) : position object 2,32,0,0 : scale object 2,20,20,20 : rotate object 2,340,180,90
   make object sphere 3,1.5
endfunction

function included_variabels()
   inc p1mvu
   inc p1mvd
   inc p2mvu
   inc p2mvd
   inc bally
   inc ballx
   inc ballz
   inc ballyvelo
   inc ballxvelo
endfunction

function players_movement()
p1mvu=0
p1mvd=0
p2mvu=0
p2mvd=0

if upkey()=1 then p2mvu=1
if downkey()=1 then p2mvd=1
if keystate(17)=1 then p1mvu=1
if keystate(31)=1 then p1mvd=1

x#=object position x(1)
y#=object position y(1)
z#=object position z(1)
x2#=object position x(2)
y2#=object position y(2)
z2#=object position z(2)

if p1mvu=1
   y#=y#+0.5
endif
if p1mvd=1
   y#=y#-0.5
endif

if p2mvu=1
   y2#=y2#+0.5
endif
if p2mvd=1
   y2#=y2#-0.5
endif

rem makes the players to stay in screen

if y#>21 then y#=21
 if y#<-21 then y#=-21
 if y2#>21 then y2#=21
 if y2#<-21 then y2#=-21

position object 1,x#,y#,z#
position object 2,x2#,y2#,z2#
endfunction

function ball_movement()

ballx#=object position x(3)
bally#=object position y(3)
ballz#=object position z(3)

rem making the ball move after shooting it

ballx#=ballx#+0.5
bally#=bally#+0.5

position object 3,ballx#,bally#,ballz#

endfunction

+ Code Snippet

Rem Project: pong
Rem Created: 2005-03-04 22:28:44

Rem ***** Main Source File *****

rem settings
settings()

rem load level
make_lvl()

rem load ball, players and settings
load_players()

rem included variabels
included_variabels()




do
rem player movvement code
players_movement()

rem ball movement code
ball_movement()

sync
loop

rem functions

function settings()
   sync on
   sync rate 70
   hide mouse
   make camera 1 : position camera 1,0,0,-50 : color backdrop 1,RGB(0,0,0)
endfunction

function make_lvl()
   load object "media/models/tak.3ds",4 : position object 4,0,25,0 : color object 4,RGB(0,0,255) : scale object 4,20,20,20 : rotate object 4,0,90,0
   load object "media/models/tak.3ds",5 : position object 5,0,-25,0 : color object 5,RGB(0,0,255) : scale object 5,20,20,20 : rotate object 5,180,90,0
   make object box 6,2,46.5,6
   position object 6,0,0,0
   ghost object on 6
   color object 6,RGB(0,128,255)
endfunction

function load_players()
   load object "media/models/hover.3ds",1 : color object 1,RGB(0,0,255) : position object 1,-32,0,0 : scale object 1,20,20,20 : rotate object 1,160,0,90
   load object "media/models/hover.3ds",2 : color object 2,RGB(0,0,255) : position object 2,32,0,0 : scale object 2,20,20,20 : rotate object 2,340,180,90
   make object sphere 3,1.5
endfunction

function included_variabels()
   inc p1mvu
   inc p1mvd
   inc p2mvu
   inc p2mvd
   inc bally
   inc ballx
   inc ballz
   inc ballyvelo
   inc ballxvelo
endfunction

function players_movement()
p1mvu=0
p1mvd=0
p2mvu=0
p2mvd=0

if upkey()=1 then p2mvu=1
if downkey()=1 then p2mvd=1
if keystate(17)=1 then p1mvu=1
if keystate(31)=1 then p1mvd=1

x#=object position x(1)
y#=object position y(1)
z#=object position z(1)
x2#=object position x(2)
y2#=object position y(2)
z2#=object position z(2)

if p1mvu=1
   y#=y#+0.5
endif
if p1mvd=1
   y#=y#-0.5
endif

if p2mvu=1
   y2#=y2#+0.5
endif
if p2mvd=1
   y2#=y2#-0.5
endif

rem makes the players to stay in screen

 if y#>21 then y#=21
 if y#<-21 then y#=-21
 if y2#>21 then y2#=21
 if y2#<-21 then y2#=-21

position object 1,x#,y#,z#
position object 2,x2#,y2#,z2#
endfunction

function ball_movement()

ballx#=object position x(3)
bally#=object position y(3)
ballz#=object position z(3)

rem making the ball move after shooting it

ballx#=ballx#+0.5
bally#=bally#+0.5


position object 3,ballx#,bally#,ballz#

endfunction

Back to top

Profile PM Email

Slooper

21

Years of Service

User Offline

Joined: 13th Feb 2003

Location: Sweden

Posted: 15th Mar 2005 05:59

Link

hehe tnx i worked i forgot to change the

position object 3,ballx,bally,ballz

to

position object 3,ballx#,bally#,ballz#

tnx m8

You never fail, only make mistakes.

Back to top

Profile PM Email Website

Scraggle

Moderator

21

Years of Service

User Offline

Joined: 10th Jul 2003

Location: Yorkshire

Posted: 15th Mar 2005 06:01

Link

No problem - Glad I could help

Back to top

Profile PM Email

Baggers

20

Years of Service

User Offline

Joined: 31st May 2004

Location: Yonder over dem dere hills

Posted: 15th Mar 2005 06:02

Link

Oh yeah !...dunno how i missed that !
Nice one scraggle

Back to top

Profile PM Email

RiiDii

19

Years of Service

User Offline

Joined: 20th Jan 2005

Location: Inatincan

Posted: 15th Mar 2005 06:26

Link

Me too! Good catch!

"Droids don't rip your arms off when they lose." -H. Solo

REALITY II

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / ball, dont want to move

Attachments