mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-07-12 08:24:46 +02:00
Fix registered trainers still do in sight check
This commit is contained in:
parent
edf225189d
commit
b7a045e37c
@ -352,7 +352,7 @@
|
||||
|
||||
If distance <= Me.TrainerSight Then
|
||||
Dim InSightMusic As String = "nomusic"
|
||||
|
||||
Dim t As Trainer = Nothing
|
||||
If Me.IsTrainer = True Then
|
||||
Dim trainerFilePath As String = GameModeManager.GetScriptPath(Me.AdditionalValue & ".dat")
|
||||
Security.FileValidation.CheckFileValid(trainerFilePath, False, "NPC.vb")
|
||||
@ -365,7 +365,7 @@
|
||||
If Trainer.IsBeaten(trainerID) = True Then
|
||||
Exit Sub
|
||||
Else
|
||||
Dim t As New Trainer(trainerID)
|
||||
t = New Trainer(trainerID)
|
||||
InSightMusic = t.GetInSightMusic()
|
||||
End If
|
||||
ElseIf l.StartsWith("@battle.starttrainer(") = True Then
|
||||
@ -373,13 +373,13 @@
|
||||
If Trainer.IsBeaten(trainerID) = True Then
|
||||
Exit Sub
|
||||
Else
|
||||
Dim t As New Trainer(trainerID)
|
||||
t = New Trainer(trainerID)
|
||||
InSightMusic = t.GetInSightMusic()
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
If t IsNot Nothing Then
|
||||
Dim needFacing As Integer = 0
|
||||
Select Case Me.faceRotation
|
||||
Case 0
|
||||
@ -446,6 +446,7 @@
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Overrides Sub ClickFunction()
|
||||
|
Loading…
x
Reference in New Issue
Block a user