Activating Checkpoints 1 by 1.

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|733\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Blitz -> Activating Checkpoints 1 by 1.
Tue, 18 May 2010, 06:34
ShadowIce	Hi all. For some reason, this code is not letting me activate each checkpoint only once.. for some reason, it allows u to activate all the checkpoints at the same time infinitely, no matter which 1 i hit 1st, and no matter how far apart they are.. i don't see what i'm doing wrong here.. Type tObject Field ObjType Field Position.tVector Field id Field this_entity Field IValues[16] Field FValues#[16] Field Mode Field State ; Player motion values Field Motion.tObject_Motion Field Entity Field Shield Field FireShield Field ElectricShield Field BubbleShield Field Invincible Field child Field sphere Field status Field return_waypoint End Type ; ========================================================================================================= ; Object_Checkpoint_Create ; ========================================================================================================= ; Creates a New Ring Object Function Object_Checkpoint_Create.tObject(x#, y#, z#) o.tObject = New tObject o\ObjType = OBJTYPE_CHECKPOINT o\Position = New tVector o\Position\x# = x# o\Position\y# = y# o\Position\z# = z# o\Entity = LoadAnimMesh("Objects\Checkpoint\Checkpoint.b3d") o\status = 1 ;set checkpoint's status to 1 o\id = o\Entity EntityAutoFade(o\Entity, OBJECT_VIEWDISTANCE_MIN#, OBJECT_VIEWDISTANCE_MAX#) ScaleEntity o\Entity, 0.6, 0.6, 0.6 TranslateEntity o\Entity, x#, y#, z# ; If Checkpoint_Activate = False ; ; If CheckpointIdle <> 0 ; EntityParent CheckpointIdle, EM21,0 ; EndIf ; EndIf orb=CreateSphere() EntityColor orb, 10, 100, 255 EntityFX orb,1 ScaleEntity orb, 3,3,3 child = FindChild(o\Entity,"Bone2") EntityParent orb,child,0 Return o End Function Function Object_Checkpoint_Update(o.tObject, p.tPlayer, d.tDeltaTime) If EntityDistance(p\Objects\Entity,o\Entity) > 10.0 And EntityDistance(p\Objects\Entity,o\Entity) < 11 Then o\State = 1 EndIf If EntityDistance(p\Objects\Entity,o\Entity) <= 10.0 And o\State = 1 Then ; Ding-Dong! CheckCheckpoints() DebugLog "o\Status:" +o\Status EndIf Return End Function Function CheckCheckpoints() For p.tplayer = Each tPlayer For o.tObject = Each tObject If o\ObjType = OBJTYPE_CHECKPOINT Select o\Status Case 1 If o\entity <> o\id If o\status = 1 Then o\status = 2 EndIf PlaySound Sound_Check Animate o\Entity, 3, 1 Spawn_X = (EntityX(p\Objects\Entity)) Spawn_Y = (EntityY(p\Objects\Entity) + 5) Spawn_Z = (EntityZ(p\Objects\Entity) + 20) orb2=CreateSphere() EntityFX orb2,1 EntityColor orb2, 255, 255, 0 ScaleEntity orb2, 3.1,3.1,3.1 child = FindChild(o\Entity,"Bone2") EntityParent orb2,child,0 Case 2 o\state = 1 End Select EndIf Next Next End Function --v Thanks!
Tue, 18 May 2010, 06:46
Jayenkai	You need to keep track of which checkpoint each player passes. First off, give each checkpoint a value, ranging from 1 at the start, up to x at the end. Next, set the player up with a player\Checkpoint=0 value. When scanning for nearby checkpoints, only bother to check whenever "Checkpoint\Number = Player\Checkpoint + 1", and if it's nearby, pop up the checkpoint number on the player so that it then scans for the next one. Basically, you're switching it from Checkpoint based lookups, to player based, instead. And, don't forget to flip it back down to 0 when the player reaches the goal, so they can do more laps! -=-=- ''Load, Next List!''
Tue, 18 May 2010, 06:56
ShadowIce	Um. I already have all that in the code. I just need to know what is acting up in my code, and how to fix it. Thanks!
Tue, 18 May 2010, 09:31
HoboBen	In Object_Checkpoint_Create, you're setting o\status = 1. In CheckCheckpoints(), at case 2 you're resetting o\status = 1 again... Basically when you check each checkpoint there's no way that you're not going to get the PlaySound event happening... both infinitely and for every check point. I think the solution is, in Object_Checkpoint_Create, set o\status = 0 and for case 2 in CheckCheckpoints(), comment out the line o\state = 1. That should get you on the right track! -=-=- blog \| work \| code \| more code
Tue, 18 May 2010, 09:35
ShadowIce	right. i only want it to activate once per checkpoint
Tue, 18 May 2010, 13:43
ShadowIce	FIXED!
Thu, 20 May 2010, 09:41
Erebel55	Awesome hope you stick around the forums.
Sat, 22 May 2010, 07:50
ShadowIce	will do!