Crouching.. prevent the player to stand up if under something?

Author

Message

JJJ0han

17

Years of Service

User Offline

Joined: 4th Oct 2007

Location: Brisbane, Australia

Posted: 12th Oct 2007 11:32

Link

I managed to create my own simple crouching system, good or not, it seems to work reasonably well.

Anyway, the thing I'm asking is, how can I prevent the player from automatically standing up, or in that case, stand up at all, when he or she is under something?

Here's the crouch code:

+ Code Snippet

      if keystate(29)=1
      rem and third=0
      position camera object position x(2),object position y(2)+2.5,object position z(2)
      scale object 2,1,1,1
      collide = sc_SphereCastGroup(1,oldx#,oldy#,oldz#,oldx#,oldy#+vy#,oldz#,radius#/1.5,0)
   if shiftkey()=0 then sprint=sprint+2
      endif

      if keystate(29)=0
      rem and third=0
      position camera object position x(2),object position y(2)+5,object position z(2)
      scale object 2,1,1,1
      collide = sc_SphereCastGroup(1,oldx#,oldy#,oldz#,oldx#,oldy#+vy#,oldz#,radius#,0)
   if shiftkey()=0 then sprint=sprint+1
      endif

No need to clean it up, it seems to be fine for me.

Also, I'm guessing the answer lies with ray casting, but I'm not sure what that is so if that is what I'm gonna have to do considering I have Sparky's DLL, then I'd like a bit of help with it so I can understand it.

Back to top

Profile PM Email

DB PROgrammer

17

Years of Service

User Offline

Joined: 9th Feb 2007

Location: Nowhere But Everywhere

Posted: 12th Oct 2007 17:40

Link

This should work but I did not test it. If it doesn't work it is at least the basic idea.

+ Code Snippet

`the height integer should be the difference between the players `height when he is standing and his height when he is crouching.
`So if his standing height is 7 and his crouching height is 4 the the
`height integer should be 3

      if keystate(29)=1
      rem and third=0
      position camera object position x(2),object position y(2)+2.5,object position z(2)
      scale object 2,1,1,1
      collide = sc_SphereCastGroup(1,oldx#,oldy#,oldz#,oldx#,oldy#+vy#,oldz#,radius#/1.5,0)
   if shiftkey()=0 then sprint=sprint+2
      endif

      if keystate(29)=0 and SC_rayCast(0,playerx,playery,playerz,playerx,playery+height,playerz,2)=0
      rem and third=0
      position camera object position x(2),object position y(2)+5,object position z(2)
      scale object 2,1,1,1
      collide = sc_SphereCastGroup(1,oldx#,oldy#,oldz#,oldx#,oldy#+vy#,oldz#,radius#,0)
   if shiftkey()=0 then sprint=sprint+1
      endif

I keep runing nowhere fast!

Back to top

Profile PM Email Website

JJJ0han

17

Years of Service

User Offline

Joined: 4th Oct 2007

Location: Brisbane, Australia

Posted: 15th Oct 2007 11:19

Link

It seems to be flickering a bit when the player attempts to crouch under an obstacle.

Not really sure how to describe it. But all I can say it isn't working

.

Anyway here's what I got with the code:

+ Code Snippet

      if keystate(29)=1
      rem and third=0
      position camera object position x(2),object position y(2)+5,object position z(2)
      scale object 2,1,1,1
      collide = sc_SphereCastGroup(1,oldx#,oldy#,oldz#,oldx#,oldy#+vy#,oldz#,radius#/0.5,0)
   if shiftkey()=0 then sprint=sprint+2
      endif

      if keystate(29)=0 and SC_rayCast(0,X#,Y#,Z#,X#,Y#+10,Z#,2)=0
      rem and third=0
      position camera object position x(2),object position y(2)+10,object position z(2)
      scale object 2,1,1,1
      collide = sc_SphereCastGroup(1,oldx#,oldy#,oldz#,oldx#,oldy#+vy#,oldz#,radius#*2,0)
   if shiftkey()=0 then sprint=sprint+1
      endif

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / Crouching.. prevent the player to stand up if under something?