AmuseiScript
Editor ID:AmuseiScript
Form ID:0001532A
Type:Object
Script:ScriptName AmuseiScript
Short GuardsMoved
Short VampireEnabled
Short AmuseiAtBedroll
Short PCJailed
Begin GameMode
If AmuseiAtBedRoll == 0
If AmuseiRef.GetDistance SleepingMatAmuseiSkingrad < 500
Set AmuseiAtBedroll to 1
EndIf
EndIf
If TG04Mistake.AmuseiEscape == 0
If AmuseiPrisonCellDoorRef.GetLocked == 0
Set TG04Mistake.AmuseiEscape to 1
EndIf
EndIf
If VampireEnabled == 0
If Player.GetDistance FirstBloodStainRef <= 256
TG06PaleLadyVampireRef.Enable
TG06PaleLadyVampireRef.ModDisposition AmuseiRef 60
Set VampireEnabled to 1
EndIf
EndIf
If GetStage TG06Atonement == 60
If Player.GetInSameCell TG06PaleLadyVampireRef == 0 && TG06PaleLadyVampireRef.GetDisabled == 0
TG06PaleLadyVampireRef.Disable
EndIf
EndIf
If GetStage TG06Atonement == 50
If GuardsMoved == 0
SkingradGuardPatrolDay01Ref.EvaluatePackage
If SkingradGuardPatrolDay01Ref.GetIsCurrentPackage TG06SkingradGuardAway == 1
SkingradGuardPatrolDay01Ref.MoveTo SkingradTownGuardMessHall
Endif
SkingradGuardPatrolDay02Ref.EvaluatePackage
If SkingradGuardPatrolDay02Ref.GetIsCurrentPackage TG06SkingradGuardAway == 1
SkingradGuardPatrolDay02Ref.MoveTo SkingradTownGuardMessHall
Endif
SkingradGuardPatrolNight01Ref.EvaluatePackage
If SkingradGuardPatrolNight01Ref.GetIsCurrentPackage TG06SkingradGuardAway == 1
SkingradGuardPatrolNight01Ref.MoveTo SkingradTownGuardMessHall
Endif
SkingradGuardPatrolNight02Ref.EvaluatePackage
If SkingradGuardPatrolNight02Ref.GetIsCurrentPackage TG06SkingradGuardAway == 1
SkingradGuardPatrolNight02Ref.MoveTo SkingradTownGuardMessHall
Endif
Set GuardsMoved to 1
EndIf
If Player.GetDistance AmuseiEscapes < 512
SetStage TG06Atonement 51
AddScriptPackage TG06AmuseiFindPC
EndIf
If TG06Atonement.EscapePartOne == 0
If Player.GetInCell SkingradCastleCourtyard
Set TG06Atonement.EscapePartOne to 1
EndIf
EndIf
If IsPlayerInJail == 1
Wait TG06AmuseiFollowPCSneak
Wait TG06AmuseiFollowPCRun
MoveTo TG06AmuseiHide
EndIf
EndIf
End