loop object works (without any start or end frame specification)

Author

Message

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 4th Jul 2007 03:47 Edited at: 4th Jul 2007 03:56

Link

exactly that, when I actually specify the start and end frames (I'm trying to get a running loop) it doesn't move!

also, when i use the code:

+ Code Snippet

for ene=11 to 20
 if object visible(ene)
  point object ene,camera position x(0),camera position y(0), camera position z(0)
  move object ene
 endif
next ene

I get every enemy moving towards me! even the ones hidden behind walls (I'm using BSP).

any ideas

If at first you don't succeed, lower your expectations.

Back to top

Profile PM

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 6th Jul 2007 02:06

Link

Anyone at all?

If at first you don't succeed, lower your expectations.

Back to top

Profile PM

vorconan

17

Years of Service

User Offline

Joined: 4th Nov 2006

Location: Wales

Posted: 6th Jul 2007 02:30

Link

1. It sounds like you've specified the start and/or end frame wrongly.

2. I'm not that familiar with BSP, is it basically a form of object culling?

THREAD - http://forum.thegamecreators.com/?m=forum_view&t=109497&b=24&p=0

Back to top

Profile PM Email

Prancer

19

Years of Service

User Offline

Joined: 6th Feb 2005

Location: Idaho, US

Posted: 6th Jul 2007 02:37

Link

Every enemy is moving towards you because, I believe, the OBJECT VISIBLE() command is only false when you hide the object with HIDE OBJECT() command. It doesn't matter if it can't be seen by the camera. I hope this helps.

http://www.freewebs.com/prancer/

Back to top

Profile PM Website

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 6th Jul 2007 16:35

Link

@prancer
that's probably true ty. i never thought of it that way.
@vorconan. I've double checked the start and end frames and they're correct.

If at first you don't succeed, lower your expectations.

Back to top

Profile PM

Cash Curtis II

19

Years of Service

User Offline

Joined: 8th Apr 2005

Location: Corpus Christi Texas

Posted: 6th Jul 2007 17:07 Edited at: 6th Jul 2007 17:09

Link

@Allanon Shadeslayer -
Your code and theories have some problems.

Your movement doesn't work correctly because you're moving your enemy all the time. You have to account for collision in its movement. If you don't, it will keep moving.

Quote: "if object visible(ene)"

That tells you if the enemy object is visible, move it toward the camera no matter what. If you're looking at it, it will move toward the camera. It will be visible any time it's in the camera's viewport. If it is not, then it will not be visible. Objects are only visible if they're being rendered by DBP.

As for your object animation, it's impossible to definitevely tell you without code. However, it's probably because you're telling the object to loop every program loop, which restarts it every time.

Come see the WIP!

Back to top

Profile PM

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 6th Jul 2007 17:56

Link

I don't think that that is the animation problem because it's only when i specify the start and end frames that it messes up.

If at first you don't succeed, lower your expectations.

Back to top

Profile PM

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 6th Jul 2007 18:14 Edited at: 6th Jul 2007 18:15

Link

showing my entire code might help. (I'm using DarkMATTER 2)

Rem Project: Dark doomclone
Rem Created: 6/14/2007 5:40:11 PM

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

rem Initial settings
sync on : sync rate 100
backdrop off : hide mouse

rem Select font
set text font "arial" : set text size 16
set text to bold : set text transparent

rem Loading prompt
sync : center text screen width()/2,screen height()/2,"LOADING" : sync

rem Load all media for game
gosub _load_game

rem Setup all objects for game
gosub _setup_game

rem Game loop
do

rem Control game elements
 gosub _control_player
 gosub _control_gunandbullet
 gosub _control_enemies

rem Update screen
 sync

rem End loop
loop

_control_player:

rem Control player direction
rotate camera camera angle x(0)+(mousemovey()/2.0),camera angle y(0)+(mousemovex()/2.0),0

rem Control player movement
cx#=camera angle x(0) : cy#=camera angle y(0)
if keystate(17)=1 then xrotate camera 0,0 : move camera 0,4.5 : xrotate camera 0,cx#
if keystate(31)=1 then xrotate camera 0,0 : move camera 0,-4.5 : xrotate camera 0,cx#
if keystate(30)=1 then yrotate camera 0,cy#-90 : move camera 4.5 : yrotate camera 0,cy#
if keystate(32)=1 then yrotate camera 0,cy#+90 : move camera 4.5 : yrotate camera 0,cy#
if wrapvalue(camera angle x(0))>40 and wrapvalue(camera angle x(0))<180 then xrotate camera 0,40
if wrapvalue(camera angle x(0))>180 and wrapvalue(camera angle x(0))<280 then xrotate camera 0,280

rem Apply simple gravity to player
position camera camera position x(),camera position y()-1,camera position z()

rem Position listener at player for 3D sound
position listener camera position x(),camera position y(),camera position z()
rotate listener camera angle x(),camera angle y(),camera angle z()

rem In case of restart
if restart=1
   restart=0
   set bsp collision off 1
   rotate camera 0,0,0
   position camera 2,2,2
   set bsp camera collision 1,0,10,0
   set bsp collision height adjustment 1,60
endif

return

_control_gunandbullet:

rem Control gun firing
if mouseclick()=1 and bullet=-50
 bullet=100
 play sound GunSnd
 position object BulletObj,camera position x(0),camera position y(0),camera position z(0)
 rotate object BulletObj,camera angle x(0),camera angle y(0),0
 set bsp object collision 2,BulletObj,0.1,1
 move object BulletObj,0.2
endif

rem Control life of bullet
if bullet>0

rem If bullet collides with BSP world
 if bsp collision hit(2)=1 or bulletimpact=1
  rem End bullet on wall
  bulletimpact=0
  bullet=0
 else
  rem Move bullet
  dec bullet
  move object BulletObj,35
 endif

rem Bullet dies
 if bullet=0
  set bsp collision off 2
 endif

else
 rem Gun recharge phase
 if bullet>-50 then dec bullet
endif

return

_control_enemies:

rem Basic AI
for ene=11 to 20
 if object visible(ene)=1
  point object ene,camera position x(0),camera position y(0),camera position z(0)
  xrotate object ene,-90
  move object down ene,3.5
  set object speed ene,7500
  loop object ene,570,630
 endif
next ene

return

_control_stats:
return

_setup_game:

rem Setup camera
set camera range 1,10000
autocam off
set bsp camera 0

rem Trigger player initialization
restart=1

rem Setup gun for player
lock object on GunObj
scale object GunObj,12,12,14
rotate object GunObj,270,0,0
position object GunObj,0.5,-1.3,2
disable object zdepth GunObj

rem Create object for bullet
BulletObj=3 : make object cube BulletObj,2

rem Create simple sprite based crosshair
sprite 1,640-16,512-16,CrossHairImg
set sprite 1,0,1

return

_load_game:

rem Load BSP world
load bsp "media/world/Dark doomclone.pk3","Dark doomclone.bsp"

rem Load model for gun
GunObj=2 : load object "media/models/Browning.x",GunObj

rem Load models for enemies

`Minotaurs
 for Minotaur=11 to 13
  load object "media/models/Minotaur.x",Minotaur
  append object "media/models/Minotaur.x",Minotaur,total object frames(Minotaur)+1
  xrotate object Minotaur,-90 : yrotate object Minotaur,180
  scale object Minotaur,125,125,125
 next Minotaur

position object 11,175,-120,1050 : position object 12,-175,-120,1075 : position object 13,0,-120,1350

`Zombies
 for Zombie=14 to 17
  load object "media/models/Zombie.x",Zombie
  append object "media/models/Zombie.x",Zombie,total object frames(Zombie)+1
  xrotate object Zombie,-90
  scale object Zombie,125,125,125
 next Zombie

yrotate object 15,90 : yrotate object 16,90
 position object 14,-540,-120,1000 : position object 15,-1080,-120,300 : position object 16,-1080,-120,850
 position object 17,540,-120,1000

`Bezerkers
 for Bezerker=18 to 20
  load object "media/models/Bezerker.x",Bezerker
  append object "media/models/Bezerker.x",Bezerker,total object frames(Bezerker)+1
  xrotate object Bezerker,-90
  scale object Bezerker,200,200,200
 next Bezerker

yrotate object 20,-90
 position object 18,-540,-120,575 : position object 19,540,-120,575 : position object 20,1075,-120,575

rem Load all sounds
GunSnd=1 : load sound "media/sounds/Gun 1.wav",GunSnd

rem Load images
FireImg=1 : load image "media/images/fire.bmp",FireImg
CrossHairImg=1 : load image "media/images/crosshair.bmp",CrossHairImg

return

+ Code Snippet

Rem Project: Dark doomclone
Rem Created: 6/14/2007 5:40:11 PM

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

rem Initial settings
sync on : sync rate 100
backdrop off : hide mouse

rem Select font
set text font "arial" : set text size 16
set text to bold : set text transparent

rem Loading prompt
sync : center text screen width()/2,screen height()/2,"LOADING" : sync

rem Load all media for game
gosub _load_game

rem Setup all objects for game
gosub _setup_game

rem Game loop
do

 rem Control game elements
 gosub _control_player
 gosub _control_gunandbullet
 gosub _control_enemies

 rem Update screen
 sync

rem End loop
loop

_control_player:

rem Control player direction
rotate camera camera angle x(0)+(mousemovey()/2.0),camera angle y(0)+(mousemovex()/2.0),0

rem Control player movement
cx#=camera angle x(0) : cy#=camera angle y(0)
if keystate(17)=1 then xrotate camera 0,0 : move camera 0,4.5 : xrotate camera 0,cx#
if keystate(31)=1 then xrotate camera 0,0 : move camera 0,-4.5 : xrotate camera 0,cx#
if keystate(30)=1 then yrotate camera 0,cy#-90 : move camera 4.5 : yrotate camera 0,cy#
if keystate(32)=1 then yrotate camera 0,cy#+90 : move camera 4.5 : yrotate camera 0,cy#
if wrapvalue(camera angle x(0))>40 and wrapvalue(camera angle x(0))<180 then xrotate camera 0,40
if wrapvalue(camera angle x(0))>180 and wrapvalue(camera angle x(0))<280 then xrotate camera 0,280

rem Apply simple gravity to player
position camera camera position x(),camera position y()-1,camera position z()

rem Position listener at player for 3D sound
position listener camera position x(),camera position y(),camera position z()
rotate listener camera angle x(),camera angle y(),camera angle z()

rem In case of restart
if restart=1
   restart=0
   set bsp collision off 1
   rotate camera 0,0,0
   position camera 2,2,2
   set bsp camera collision 1,0,10,0
   set bsp collision height adjustment 1,60
endif

return

_control_gunandbullet:

rem Control gun firing
if mouseclick()=1 and bullet=-50
 bullet=100
 play sound GunSnd
 position object BulletObj,camera position x(0),camera position y(0),camera position z(0)
 rotate object BulletObj,camera angle x(0),camera angle y(0),0
 set bsp object collision 2,BulletObj,0.1,1
 move object BulletObj,0.2
endif

rem Control life of bullet
if bullet>0

 rem If bullet collides with BSP world
 if bsp collision hit(2)=1 or bulletimpact=1
  rem End bullet on wall
  bulletimpact=0
  bullet=0
 else
  rem Move bullet
  dec bullet
  move object BulletObj,35
 endif

 rem Bullet dies
 if bullet=0
  set bsp collision off 2
 endif

else
 rem Gun recharge phase
 if bullet>-50 then dec bullet
endif

return

_control_enemies:

rem Basic AI
for ene=11 to 20
 if object visible(ene)=1
  point object ene,camera position x(0),camera position y(0),camera position z(0)
  xrotate object ene,-90
  move object down ene,3.5
  set object speed ene,7500
  loop object ene,570,630
 endif
next ene

return

_control_stats:
return

_setup_game:

rem Setup camera
set camera range 1,10000
autocam off
set bsp camera 0

rem Trigger player initialization
restart=1

rem Setup gun for player
lock object on GunObj
scale object GunObj,12,12,14
rotate object GunObj,270,0,0
position object GunObj,0.5,-1.3,2
disable object zdepth GunObj

rem Create object for bullet
BulletObj=3 : make object cube BulletObj,2

rem Create simple sprite based crosshair
sprite 1,640-16,512-16,CrossHairImg
set sprite 1,0,1

return

_load_game:

rem Load BSP world
load bsp "media/world/Dark doomclone.pk3","Dark doomclone.bsp"

rem Load model for gun
GunObj=2 : load object "media/models/Browning.x",GunObj

rem Load models for enemies

 `Minotaurs
 for Minotaur=11 to 13
  load object "media/models/Minotaur.x",Minotaur
  append object "media/models/Minotaur.x",Minotaur,total object frames(Minotaur)+1
  xrotate object Minotaur,-90 : yrotate object Minotaur,180
  scale object Minotaur,125,125,125
 next Minotaur

 position object 11,175,-120,1050 : position object 12,-175,-120,1075 : position object 13,0,-120,1350

 `Zombies
 for Zombie=14 to 17
  load object "media/models/Zombie.x",Zombie
  append object "media/models/Zombie.x",Zombie,total object frames(Zombie)+1
  xrotate object Zombie,-90
  scale object Zombie,125,125,125
 next Zombie

 yrotate object 15,90 : yrotate object 16,90
 position object 14,-540,-120,1000 : position object 15,-1080,-120,300 : position object 16,-1080,-120,850
 position object 17,540,-120,1000

 `Bezerkers
 for Bezerker=18 to 20
  load object "media/models/Bezerker.x",Bezerker
  append object "media/models/Bezerker.x",Bezerker,total object frames(Bezerker)+1
  xrotate object Bezerker,-90
  scale object Bezerker,200,200,200
 next Bezerker

 yrotate object 20,-90
 position object 18,-540,-120,575 : position object 19,540,-120,575 : position object 20,1075,-120,575

rem Load all sounds
GunSnd=1 : load sound "media/sounds/Gun 1.wav",GunSnd

rem Load images
FireImg=1 : load image "media/images/fire.bmp",FireImg
CrossHairImg=1 : load image "media/images/crosshair.bmp",CrossHairImg

return

and here is the animations list:

000 : Stance
000 - 080 : Idle Posture
080 - 150 : Fidget Animation
150 - 200 : Attack (170 Impact)
200 - 250 : Hurt (220 Impact)
250 - 300 : Block/Dodge (270 Impact)
300 - 350 : Stagger
350 - 400 : Collapse/Die (370 Impact)
450 - 500 : Get Up
450 - 550 : Walk
: 450-470 - Position To Loop
: 470-530 - Looping Walk
: 530-550 - Return To Stance
550 - 650 : Run
: 550-570 - Position To Loop
: 570-630 - Looping Run
: 630-650 - Return To Stance

If at first you don't succeed, lower your expectations.

Back to top

Profile PM

RUCCUS

19

Years of Service

User Offline

Joined: 11th Dec 2004

Location: Canada

Posted: 6th Jul 2007 20:20 Edited at: 6th Jul 2007 20:23

Link

Quote: "Objects are only visible if they're being rendered by DBP."

Not true, objects are visible as long as they're not hidden or excluded. Run this code if you'd like proof;

+ Code Snippet


AUTOCAM OFF
MAKE OBJECT CUBE 1,100
POSITION OBJECT 1,0,-1000000,-1000000

DISABLE ESCAPEKEY:WHILE ESCAPEKEY() = 0

   IF OBJECT VISIBLE(1) = 0 THEN END
   SYNC

ENDWHILE:END

It would end if your statement was correct cash.

As for the animation problem, IIRC I always used a condition combined with play object, like so;

IF OBJECT PLAYING(obj) = 0 THEN PLAY OBJECT obj,start,end

As Cash said, loop object basically will constantly play your object from the start frame to the end frame. So if you call it every loop, it will constantly reset your object to it's start frame. So either only call loop object once, with the help of the OBJECT LOOPING() command, or use the condition I showed above.

Back to top

Profile PM Email Website

Cash Curtis II

19

Years of Service

User Offline

Joined: 8th Apr 2005

Location: Corpus Christi Texas

Posted: 6th Jul 2007 21:08

Link

Wow, I must be getting old

@Allanon Shadeslayer -
The DM2 models are flawed, they were exported with a time scale of 160. That means that every frame is multiplied by 160. So, Return to Stance is not frame 630, its 100,800. It sucks, but is true. I contacted TGC but they wouldn't help me with these crappy models, so in the end I reanimated them all myself.

Temporarily you can animated them at a speed that is 160x your original animation speed.

Come see the WIP!

Back to top

Profile PM

Johaness

18

Years of Service

User Offline

Joined: 20th Sep 2006

Location:

Posted: 8th Jul 2007 03:15

Link

The command to see if dbp is rendering the object is "Object In Screen".... I think.

Back to top

Profile PM Email

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 20th Aug 2007 23:21

Link

Thank you all very much for your help I've been away for awhile so I didn't get the chance to reply to this. but I'm doing it now. Thank you it helped a lot.

If at first you don't succeed, lower your expectations.

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / loop object works (without any start or end frame specification)