I can´t lock my gun to the screen. HELP!

Author

Message

Freddy 007

19

Years of Service

User Offline

Joined: 30th Nov 2004

Location: Denmark

Posted: 1st Feb 2005 20:43 Edited at: 1st Feb 2005 21:08

Link

Hi

I´ve just started modelling a bit, and I´ve made a Colt that I would like to have in my game.

So far i have this code:

+ Code Snippet

sync on
sync rate 60

REM load, position and set settings for gun

load object "colt.x",26
rotate object 26,180,270,0
scale object 26, 10,10,10
position object 26,23,0,0
set object cull 26,0

camx#=camera position x()
camy#=camera position y()
camz#=camera position z()

REM make the matrix
make matrix 1,1000,1000,100,100
position matrix 1,-100,-3,-100


REM make spheres

for x=2 to 25

make object sphere x,5
position object x,rnd(300),0,rnd(300)
next x

REM as this is a first person game, we use the camera as the player.

REM position the camera
position camera 25,0,0

point camera 0,0,0

do



set cursor 0,15
print camera position x()
set cursor 0,25
print camera position y()
set cursor 0,35
print camera position z()

set cursor 0,0
print "Frames Per Second  :  ";screen fps()

if keystate(17)=1 then move camera 1
if keystate(31)=1 then move camera -1
if keystate(30)=1 then turn camera left 2
if keystate(32)=1 then turn camera right 2


lock object on 26


sync
loop

But when I run the game, I can´t see my gun!

I´ve tried to run the game WITHOUT the lock object on, and then my gun is in the middle of the screen

But I want to lock my gun in that position.

Please, help me!

Thanks

[EDIT] Oh, I forgot... I´m using Dark BASIC Professional

Check out PanzerGames at http://www.freewebs.com/panzergames

Back to top

Profile PM Email

Foxy

19

Years of Service

User Offline

Joined: 4th Jan 2005

Location: The Dale, South Australia

Posted: 1st Feb 2005 20:53 Edited at: 1st Feb 2005 21:00

Link

Try locking the object to screen before your main loop, bundled with your loading gun code. Although that probably wont work it might have to do with the 0,0,0 position of your object. Load the gun into your modelling program and if it does not appear right in the centre of the axis then the 0,0,0 pos of your object is offset.

Just noticed this then: when your positioning your gun you're setting it off to the side a fair bit, try moving the gun forward a bit.

If any of those don't work, you've got me stumped.

Anyway, good luck.

[edit] Yeah, youre prob is most likely going to be locking the object to screen before moving the camera or anything else. You're moving the cam first so the gun is going to be locked with that cam position in relation to itself. Anyway, I babble on...

If I were you and you were me, then you'd be yourself 'cos you are me and I am you.

Back to top

Profile PM Email

Freddy 007

19

Years of Service

User Offline

Joined: 30th Nov 2004

Location: Denmark

Posted: 1st Feb 2005 21:01

Link

It doesn´t work

I´ve set the position offset to 0,0,0

I´ve put the lock object on together with the loading code

And I have no idea of what´s wrong

I need help

Check out PanzerGames at http://www.freewebs.com/panzergames

Back to top

Profile PM Email

Dodo

20

Years of Service

User Offline

Joined: 8th Aug 2004

Location: eating lunch

Posted: 2nd Feb 2005 03:18

Link

well perhaps you might consider placing the gun every loop, all lock object on does is to re-orientate the axis, so it will move forward when you use the move object command. Try using the camera position commands to position the gun object each loop.

Part of solving the problem is actually noticing that the problem is there in the first place

Back to top

Profile PM Email Website

Freddy 007

19

Years of Service

User Offline

Joined: 30th Nov 2004

Location: Denmark

Posted: 2nd Feb 2005 03:30

Link

Then how do I make it so, that when i rotate the camera, the gun rotates too, and it stays in sight, so it never disappears or appear in a strange angle?

Check out PanzerGames at http://www.freewebs.com/panzergames

Back to top

Profile PM Email

Ric

20

Years of Service

User Offline

Joined: 11th Jul 2004

Location: object position x

Posted: 2nd Feb 2005 09:14 Edited at: 2nd Feb 2005 09:18

Link

This may help - just wrote it in answer to a different thread....

sync on
sync rate 100
hide mouse
autocam off
position camera 0,5,0
color backdrop rgb(200,200,255)
fog on
fog distance 2500

`grass
for x=1 to 10
for y=1 to 10
ink rgb(rnd(100),rnd(155)+100,0),0
dot x,y
next y
next x
get image 1000,1,1,10,10
make object plain 1000,1000,1000
xrotate object 1000,-90
texture object 1000,1000
scale object texture 1000,10,10
set object texture 1000,2,0

`dummy for targetting
make object cube 1,1
hide object 1

`gun
make object cylinder 2,1
color object 2,rgb(100,100,100)
xrotate object 2,90
fix object pivot 2
scale object 2,100,600,100

do

gosub aim
gosub pointgun
gosub crosshairs
gosub movecamera

sync
loop

aim:
position object 1,camera position x(),camera position y(),camera position z()
set object to camera orientation 1
move object 1,100
move object up 1,-(mousey()-screen height()/2)/10
move object right 1,(mousex()-screen width()/2)/10
return

pointgun:
position object 2,camera position x(),camera position y()-2,camera position z()
move object 2,4
point object 2,object position x(1),object position y(1),object position z(1)
return

crosshairs:
circle object screen x(1),object screen y(1),10
return

movecamera:
 if upkey()=1 then move camera 1
 if downkey()=1 then move camera -1
 if leftkey()=1 then turn camera left 1
 if rightkey()=1 then turn camera right 1
return

+ Code Snippet

sync on
sync rate 100
hide mouse
autocam off
position camera 0,5,0
color backdrop rgb(200,200,255)
fog on
fog distance 2500


`grass
for x=1 to 10
for y=1 to 10
ink rgb(rnd(100),rnd(155)+100,0),0
dot x,y
next y
next x
get image 1000,1,1,10,10
make object plain 1000,1000,1000
xrotate object 1000,-90
texture object 1000,1000
scale object texture 1000,10,10
set object texture 1000,2,0


`dummy for targetting
make object cube 1,1
hide object 1

`gun
make object cylinder 2,1
color object 2,rgb(100,100,100)
xrotate object 2,90
fix object pivot 2
scale object 2,100,600,100

do

gosub aim
gosub pointgun
gosub crosshairs
gosub movecamera

sync
loop

aim:
position object 1,camera position x(),camera position y(),camera position z()
set object to camera orientation 1
move object 1,100
move object up 1,-(mousey()-screen height()/2)/10
move object right 1,(mousex()-screen width()/2)/10
return

pointgun:
position object 2,camera position x(),camera position y()-2,camera position z()
move object 2,4
point object 2,object position x(1),object position y(1),object position z(1)
return

crosshairs:
circle object screen x(1),object screen y(1),10
return

movecamera:
 if upkey()=1 then move camera 1
 if downkey()=1 then move camera -1
 if leftkey()=1 then turn camera left 1
 if rightkey()=1 then turn camera right 1
return

Oh, and by the way, when you lock an object, you only need to do it once - before your main program loop, and before you position the camera away from 0,0,0.

Back to top

Profile PM Email Website

Freddy 007

19

Years of Service

User Offline

Joined: 30th Nov 2004

Location: Denmark

Posted: 2nd Feb 2005 21:52 Edited at: 2nd Feb 2005 22:22

Link

Thanks, but I just got it to work myself.
I have no idea what I did, but this code is working:

sync on
sync rate 60
autocam off
REM load, position and set settings for gun

camx#=camera position x()
camy#=camera position y()
camz#=camera position z()

load object "colt.x",27
rotate object 27,0,0,0
scale object 27, 10,10,10
position object 27,camx#+1,camy#-1,camz#+2
lock object on 27
set object cull 27,0

REM make the matrix
make matrix 1,1000,1000,100,100
position matrix 1,-100,-3,-100

REM make spheres

for x=2 to 26

make object sphere x,5
position object x,rnd(300),0,rnd(300)
next x

REM as this is a first person game, we use the camera as the player.

REM position the camera
position camera 0,0,0

point camera 0,0,0

REM bullet settings

do

set cursor 0,15
print "Camera position x  :  "; int(camera position x())
set cursor 0,25
print "Camera position z  :  "; int(camera position z())

set cursor 0,0
print "Frames Per Second  :  ";screen fps()

if keystate(17)=1 then move camera 1
if keystate(31)=1 then move camera -1
if keystate(30)=1 then turn camera left 2
if keystate(32)=1 then turn camera right 2

disable object zdepth 27

sync
loop

+ Code Snippet

sync on
sync rate 60
autocam off
REM load, position and set settings for gun

camx#=camera position x()
camy#=camera position y()
camz#=camera position z()

load object "colt.x",27
rotate object 27,0,0,0
scale object 27, 10,10,10
position object 27,camx#+1,camy#-1,camz#+2
lock object on 27
set object cull 27,0



REM make the matrix
make matrix 1,1000,1000,100,100
position matrix 1,-100,-3,-100


REM make spheres

for x=2 to 26

make object sphere x,5
position object x,rnd(300),0,rnd(300)
next x

REM as this is a first person game, we use the camera as the player.

REM position the camera
position camera 0,0,0

point camera 0,0,0

REM bullet settings

do



set cursor 0,15
print "Camera position x  :  "; int(camera position x())
set cursor 0,25
print "Camera position z  :  "; int(camera position z())


set cursor 0,0
print "Frames Per Second  :  ";screen fps()

if keystate(17)=1 then move camera 1
if keystate(31)=1 then move camera -1
if keystate(30)=1 then turn camera left 2
if keystate(32)=1 then turn camera right 2

disable object zdepth 27

sync
loop

Thanks

[EDIT] But I have another problem now though...

I am trying to make a bullet that will fire if mouseclick=1.

It looks like:

if mouseclick()=1

position object bulletnumber#,bulletposx#,bulletposy#,bulletposz#
rotate object bulletnumber#, 0-camera angle x(),0-camera angle y(),0-camera angle z()
fire#=1
bulletlife#=100
show object bulletnumber#
endif

and so on...
It actually works great... But if I move the camera, it´s like the program doesn´t update the camera position, and positions the bullet in the cameras original position...

[EDIT EDIT

] I solved the problem myself.... sorry

I told the program that bulletposx/y/z=camera position x/y/z OUTSIDE the loop, so it WASN`T updating tho coordinates....

Check out PanzerGames at http://www.freewebs.com/panzergames

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / I can´t lock my gun to the screen. HELP!