Make player face correct direction for npc insight
This commit is contained in:
parent
0738507791
commit
6759aba500
|
@ -420,10 +420,6 @@
|
||||||
Case 3
|
Case 3
|
||||||
needFacing = 1
|
needFacing = 1
|
||||||
End Select
|
End Select
|
||||||
Dim turns As Integer = needFacing - Screen.Camera.GetPlayerFacingDirection()
|
|
||||||
If turns < 0 Then
|
|
||||||
turns = 4 - turns.ToPositive()
|
|
||||||
End If
|
|
||||||
|
|
||||||
CType(Core.CurrentScreen, OverworldScreen).TrainerEncountered = True
|
CType(Core.CurrentScreen, OverworldScreen).TrainerEncountered = True
|
||||||
If InSightMusic <> "nomusic" And InSightMusic <> "" Then
|
If InSightMusic <> "nomusic" And InSightMusic <> "" Then
|
||||||
|
@ -445,7 +441,7 @@
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
Dim s As String = "version=2" & Environment.NewLine &
|
Dim s As String = "version=2" & Environment.NewLine &
|
||||||
"@player.turn(" & turns & ")" & Environment.NewLine
|
"@player.turnto(" & needFacing & ")" & Environment.NewLine
|
||||||
|
|
||||||
With CType(Screen.Camera, OverworldCamera)
|
With CType(Screen.Camera, OverworldCamera)
|
||||||
If CType(Screen.Camera, OverworldCamera).ThirdPerson = True And IsOnScreen() = False Then
|
If CType(Screen.Camera, OverworldCamera).ThirdPerson = True And IsOnScreen() = False Then
|
||||||
|
|
Loading…
Reference in New Issue