Camera and object movement. DBP - GameCreators Forum

Author

Message

YAURAH

17

Years of Service

User Offline

Joined: 12th Apr 2007

Location: Everywhere

Posted: 25th Apr 2007 20:50

Link

Here is a code to help those who want to understand camera and object movement commands..its very basic...in fact its DARK Basic...

`CODE BY Yaurah - C.S.J.
`Free for use in any DBP code.
`No credit needed but appreciated.

`syncronise screen
sync

`turn off the autocam, then make your own freecam, then position it 0 in the x axis
`which is left and right, and 100 in the y axis which is up and down (height) and -400
`in the z axis behind the cube object.
autocam off
make camera 1
position camera 1, 0, 100, -400

`make the cube object, and position it in the center, everything at 0.
make object cube 1, 50
position object 1, 0, 0, 0

`two reference spheres to let you know your moving positioned on the left and right in front of the cube.
make object sphere 2, 50
make object sphere 3, 50
position object 2, 50, 0, 100
position object 3, -50, 0, 100

`simple object collision done automatically for the 3 objects
automatic object collision 1, 30, 1
automatic object collision 2, 30, 1
automatic object collision 3, 30, 1

`begin with a "do" procedure to start the loop process.
do

`key control using w,a,s,d to make the cube object and the camera follow in the same motion (separated by
`the : symbol) and m,n for turning motions. note:(motion will not be detected if the cam and object move
`at the same interval because they are in unison this is also why the two reference spheres were placed)
if inkey$()="z" or inkey$()="Z" then move object 1, 1.25 : move camera 1, 1.3
if inkey$()="x" or inkey$()="X" then move object 1, -1.25 : move camera 1, -1.3

if inkey$()="a" or inkey$()="A" then roll object left 1,1
if inkey$()="d" or inkey$()="D" then roll object right 1,1

if inkey$()="m" or inkey$()="M" then turn object right 1, .4 : turn camera right 1, .5
if inkey$()="n" or inkey$()="N" then turn object left 1, .4 : turn camera left 1, .5

`let it know youve completed commands for this loop.
loop

`more updates to making this a better code coming soon...

+ Code Snippet

`CODE BY Yaurah - C.S.J.
`Free for use in any DBP code.
`No credit needed but appreciated.





`syncronise screen
sync


`turn off the autocam, then make your own freecam, then position it 0 in the x axis
`which is left and right, and 100 in the y axis which is up and down (height) and -400
`in the z axis behind the cube object.
autocam off
make camera 1
position camera 1, 0, 100, -400

`make the cube object, and position it in the center, everything at 0.
make object cube 1, 50
position object 1, 0, 0, 0

`two reference spheres to let you know your moving positioned on the left and right in front of the cube.
make object sphere 2, 50
make object sphere 3, 50
position object 2, 50, 0, 100
position object 3, -50, 0, 100

`simple object collision done automatically for the 3 objects
automatic object collision 1, 30, 1
automatic object collision 2, 30, 1
automatic object collision 3, 30, 1

`begin with a "do" procedure to start the loop process.
do

`key control using w,a,s,d to make the cube object and the camera follow in the same motion (separated by
`the : symbol) and m,n for turning motions. note:(motion will not be detected if the cam and object move
`at the same interval because they are in unison this is also why the two reference spheres were placed)
if inkey$()="z" or inkey$()="Z" then move object 1, 1.25 : move camera 1, 1.3
if inkey$()="x" or inkey$()="X" then move object 1, -1.25 : move camera 1, -1.3

if inkey$()="a" or inkey$()="A" then roll object left 1,1
if inkey$()="d" or inkey$()="D" then roll object right 1,1


if inkey$()="m" or inkey$()="M" then turn object right 1, .4 : turn camera right 1, .5
if inkey$()="n" or inkey$()="N" then turn object left 1, .4 : turn camera left 1, .5

`let it know youve completed commands for this loop.
loop


`more updates to making this a better code coming soon...

CSJ 7000

Back to top

Profile PM Email Website

TDK

Retired Moderator

22

Years of Service

User Offline

Joined: 19th Nov 2002

Location: UK

Posted: 26th Apr 2007 00:01

Link

Quote: "Here is a code to help those who want to understand camera and object movement commands..its very basic..."

Hmmm... yes it is.

The idea of this board is to post helpful code snippets which benefit others, covering things that can't be gleaned in a few minutes from the help files.

More importantly, I think your snippet might confuse beginners - it did me and I've been out of beginner status a while:

Quote: "turn off the autocam, then make your own freecam"

What's are 'autocams' and 'freecams'? The default camera does everything a camera you create can do, so why do you create camera 1?

Quote: "position object 1, 0, 0, 0"

It's already there when you create it, so if you aren't using position variables or need it to be somewhere other than 0,0,0 it's not necessary to position it.

Quote: "key control using w,a,s,d"

W and S keys do nothing.

Extraneous code:

+ Code Snippet

if inkey$()="z" or inkey$()="Z" then move object 1, 1.25 : move camera 1, 1.3
if inkey$()="x" or inkey$()="X" then move object 1, -1.25 : move camera 1, -1.3

if inkey$()="a" or inkey$()="A" then roll object left 1,1
if inkey$()="d" or inkey$()="D" then roll object right 1,1


if inkey$()="m" or inkey$()="M" then turn object right 1, .4 : turn camera right 1, .5
if inkey$()="n" or inkey$()="N" then turn object left 1, .4 : turn camera left 1, .5

Better:

+ Code Snippet

do
  I$=Upper$(Inkey$())
  if I$="Z" then move object 1, 1.25 : move camera 1, 1.3
  if I$="X" then move object 1, -1.25 : move camera 1, -1.3
  if I$="A" then roll object left 1,1
  if I$="D" then roll object right 1,1
  if I$="M" then turn object right 1, .4 : turn camera right 1, .5
  if I$="N" then turn object left 1, .4 : turn camera left 1, .5
  `let it know youve completed commands for this loop.
loop

These are admittedly minor points but do add to the confusion if you are a beginner.

The biggest problem of all though is that the snippet doesn't do what it says it does - or I misunderstand the exercise completely and it does - but does something so strange that I can't imagine anyone ever having a use for. (I'm happy to take it back if anyone can suggest a use for it).

Quote: "key control using w,a,s,d to make the cube object and the camera follow in the same motion"

When you run the program, if you use the Z key, the camera continues despite the cube stopping at the spheres. Reversing back doesn't get the cube back.

Sorry - I just don't get it!

TDK_Man

* TDK's Game Programming Forums - Open To All - DB & Team Request Boards *

Back to top

Profile PM Email Website

YAURAH

17

Years of Service

User Offline

Joined: 12th Apr 2007

Location: Everywhere

Posted: 26th Apr 2007 03:26

Link

thank you TDK, as I am a begginer to programming in Dark Basic, and just felt the need to post some quick help, as I needed it earlier and accomplished what I was trying.

CSJ 7000

Back to top

Profile PM Email Website

Sorry your browser is not supported!

Code Snippets / Camera and object movement. DBP