LABEL Loop
SET Player.SelectId Player.LocalId
SET Player.SelectPart 0
SUB R0 Player.Pos.X obj0.Pos.X
SUB R1 Player.Pos.Y obj0.Pos.Y
SUB R2 Player.Pos.Z obj0.Pos.Z
MUL R3 R0 R0
MUL R4 R2 R2
ADD R3 R3 R4
SQRT R3 R3
GREATER R7 R3 12
IF R7 Teleport
ATAN2 R4 R0 R2
SET obj0.Rot.Y R4
LESS R5 R3 2
NOT R6 R5
IF R6 Move
GOTO CheckFront
LABEL Move
SIN R0 obj0.Rot.Y
COS R1 obj0.Rot.Y
MUL R2 DeltaTime 2
MUL R0 R0 R2
MUL R1 R1 R2
ADD obj0.Pos.X obj0.Pos.X R0
ADD obj0.Pos.Z obj0.Pos.Z R1
GOTO End
LABEL CheckFront
SIN R0 obj0.Rot.Y
COS R1 obj0.Rot.Y
MUL R2 R0 R0
MUL R3 R1 R1
ADD R2 R2 R3
SQRT R2 R2
DIV R0 R0 R2
DIV R1 R1 R2
MUL R2 R0 R0
MUL R3 R1 R1
ADD R4 R2 R3
GREATER R5 R4 0.5
AND R6 R5 R5
IF R6 Attack
GOTO Idle
LABEL Attack
SET trg0.Trigger.ForceActive 1
GOTO End
LABEL Idle
SET trg0.Trigger.ForceActive 0
GOTO End
LABEL Teleport
SIN R0 obj0.Rot.Y
COS R1 obj0.Rot.Y
MUL R0 R0 -2
MUL R1 R1 -2
ADD obj0.Pos.X Player.Pos.X R0
SET obj0.Pos.Y Player.Pos.Y
ADD obj0.Pos.Z Player.Pos.Z R1
LABEL End
SLEEP 0
GOTO Loop
#Enemy Horror NPC
1 messages · Page 1 of 1 (latest)