scn 1EJohnnyCasketscript

short 	HasBeenHired
short	WeaponOut
short	CombatStyleRanged
short	CombatStyleMelee
short	IsFollowingDefault
short	IsFollowingShort
short	IsFollowingLong
short FollowerSwitchAggressive			; 0 = Passive (wait for player), 1 = Aggressive (attack when see enemy)
short	Waiting
short	DoOnce
short bLoadedOnce;

Begin OnLoad
;	set up base stats
	if (bLoadedOnce == 0)
;		SetActorValue guns 35; JES 11/2/10 - Artificial buffs found and removed! Mazel tov!
;		SetActorValue energyweapons 20;
;		SetActorValue meleeweapons 70;
;		SetActorValue unarmed 40;
;		SetActorValue medicine 50;
;		SetActorValue sneak 100;
		set bLoadedOnce to 1;
	endif

	;Script to make sure we set the right combat style on loading.
	If (CombatStyleMelee == 1)
		1EJohnnyCasketREF.SetCombatStyle FollowersCombatStyleMelee;
	Else
		1EJohnnyCasketREF.SetCombatStyle FollowersCombatStyleRanged;
	EndIf

End


BEGIN GameMode

	if ( DoOnce == 0 )
		if ( GetDistance Player <= 1400 )
			set DoOnce to 1
			evp
		endif
	endif

END


BEGIN OnCombatEND

	if ( GetPlayerTeammate == 1 )
		resethealth
		restoreav perceptioncondition 100
		restoreav endurancecondition 100
		restoreav leftattackcondition 100
		restoreav leftmobilitycondition 100
		restoreav rightattackcondition 100
		restoreav rightmobilitycondition 100
	endif

END

BEGIN OnDeath
	if (GetQuestCompleted VMS53 == 0)
		SetStage VMS53 255;
	endif
	if (GetQuestCompleted VMS39 == 0)
		SetStage VMS39 80;
	endif
	if ( VNPCFollowers.bJohhnyHired == 1  )
		set VNPCFollowers.nCurrentFollowers to VNPCFollowers.nCurrentFollowers - 1;
		if (VNPCFollowers.nCurrentFollowers == 0)
			set VNPCFollowers.bPlayerHasFollower to 0
		endif
		set VNPCFollowers.bJohnnyHired to 0
		set VNPCFollowers.bHumanoidInParty to 0;
		Player.RemoveFromFaction VJohnnyFaction
		ShowMessage FollowerMessageDeadJohnny
	endif
END