Confronta il testo

Trova la differenza tra due file di testo

Editor live

Comprimi invariate

Senza a capo

Layout

Livello di dettaglio

Evidenziazione sintassi

Diffchecker Desktop Il modo più sicuro per usare Diffchecker. Ottieni l'app Diffchecker Desktop: i tuoi diff non lasciano mai il tuo computer!Ottieni Desktop

necr 1.2-1.3

Creato 5 anni faIl diff non scade mai

7 rimozioni

Linee
Totale
Rimosso

Caratteri
Totale
Rimosso

Per continuare a utilizzare questa funzione, aggiorna a Diffchecker Pro Visualizza prezzi

170 linee

11 aggiunte

Linee
Totale
Aggiunto

Caratteri
Totale
Aggiunto

Per continuare a utilizzare questa funzione, aggiorna a Diffchecker Pro Visualizza prezzi

173 linee

Scriptname hzNECRAliasScript extends ReferenceAlias

Actor Property PlayerRef Auto

Ammo Property hzNECRDummyArrow Auto

GlobalVariable Property hzNECRBoltLoaded Auto

GlobalVariable Property hzNECRAutoReload Auto

GlobalVariable Property hzNECRStaminaMult Auto

MagicEffect Property hzNECRStaminaPerkME Auto

Message Property hzNECRInitMsg Auto

Message Property hzNECRInitDelayedMsg Auto

Message Property hzNECRRaceSwitchMsgBox Auto

Spell Property hzNECRStaminaDrainSpell Auto

Ammo LastAmmo

Bool bSKSE

Float fStaminaCost

;--INIT STATE--

Event OnInit()

if PlayerRef.GetEquippedItemType(0) == 12

GoToState("Main")

else

hzNECRInitDelayedMsg.Show()

endif

EndEvent

Event OnObjectEquipped(Form akBaseObject, ObjectReference akReference)

if akBaseObject as Weapon && PlayerRef.GetEquippedItemType(0) == 12

GoToState("Main")

endif

EndEvent

;--MAIN STATE--

State Main

Event OnBeginState()

Utility.Wait(0.1)

PlayerRef.AddItem(hzNECRDummyArrow, 1, 1)

Utility.Wait(0.5)

PlayerRef.EquipItem(hzNECRDummyArrow, 0, 1)

Utility.Wait(0.5)

PlayerRef.RemoveItem(hzNECRDummyArrow, 1, 1)

RegisterForAnimationEvent(PlayerRef, "arrowRelease")

RegisterForAnimationEvent(PlayerRef, "reload")

RegisterForAnimationEvent(PlayerRef, "ReloadFast")

RegisterForAnimationEvent(PlayerRef, "reloadStop")

RegisterForAnimationEvent(PlayerRef, "arrowAttach")

RegisterForAnimationEvent(PlayerRef, "WeapEquip_Out")

SKSECheck()

hzNECRInitMsg.Show()

EndEvent

Event OnRaceSwitchComplete()

Utility.Wait(0.1)

UnRegisterForAnimationEvent(PlayerRef, "arrowRelease")

UnRegisterForAnimationEvent(PlayerRef, "reload")

UnRegisterForAnimationEvent(PlayerRef, "ReloadFast")

UnRegisterForAnimationEvent(PlayerRef, "reloadStop")

UnRegisterForAnimationEvent(PlayerRef, "arrowAttach")

UnRegisterForAnimationEvent(PlayerRef, "WeapEquip_Out")

Utility.Wait(0.1)

RegisterForAnimationEvent(PlayerRef, "arrowRelease")

RegisterForAnimationEvent(PlayerRef, "reload")

RegisterForAnimationEvent(PlayerRef, "ReloadFast")

RegisterForAnimationEvent(PlayerRef, "reloadStop")

RegisterForAnimationEvent(PlayerRef, "arrowAttach")

RegisterForAnimationEvent(PlayerRef, "WeapEquip_Out")

if PlayerRef.GetAnimationVariableInt("i1stPerson") == 1

hzNECRRaceSwitchMsgBox.Show()

endif

EndEvent

Event OnAnimationEvent(ObjectReference akSource, string asEventName)

if PlayerRef.GetEquippedItemType(0) == 12

if PlayerRef.GetAnimationVariableBool("IsEquipping")

if asEventName == "arrowAttach" && ReloadCondition()

PlayerRef.UnequipItem(LastAmmo, 0, 1)

Utility.Wait(0.01)

PlayerRef.EquipItem(LastAmmo, 0, 1)

elseif asEventName == "WeapEquip_Out"

AutoReload()

endif

else

if hzNECRBoltLoaded.GetValueInt() != 0 && asEventName == "arrowRelease"

hzNECRBoltLoaded.SetValueInt(0)

Debug.SendAnimationEvent(PlayerRef, "attackStop")

AutoReload()

; debug.messagebox("shot")

elseif asEventName == "reload" || asEventName == "ReloadFast"

hzNECRBoltLoaded.SetValueInt(0)

if bSKSE

CalculateStaminaCost()

hzNECRStaminaDrainSpell.SetNthEffectMagnitude(0, StaminaCost())

hzNECRStaminaDrainSpell.SetNthEffectMagnitude(0, fStaminaCost)

endif

hzNECRStaminaDrainSpell.Cast(PlayerRef, PlayerRef)

; debug.messagebox("reload start")

elseif asEventName == "reloadStop"

hzNECRBoltLoaded.SetValueInt(1)

PlayerRef.DispelSpell(hzNECRStaminaDrainSpell)

; debug.messagebox("reloaded")

endif

EndEvent

Event OnObjectEquipped(Form akBaseObject, ObjectReference akReference)

if akBaseObject as Ammo

LastAmmo = akBaseObject as Ammo

endif

EndEvent

Event OnObjectUnEquipped(Form akBaseObject, ObjectReference akReference)

if akBaseObject as Weapon

PlayerRef.DispelSpell(hzNECRStaminaDrainSpell)

endif

EndEvent

Event OnPlayerLoadGame()

SKSECheck()

if ReloadCondition()

Debug.SendAnimationEvent(PlayerRef, "reloadStart")

endif

EndEvent

EndState

;--FUNCTIONS--

Function SKSECheck()

bSKSE = False

if SKSE.GetVersion()

bSKSE = True

endif

EndFunction

Function AutoReload()

if hzNECRAutoReload.GetValueInt() == 1 && ReloadCondition()

Utility.Wait(0.25)

Debug.SendAnimationEvent(PlayerRef, "reloadStart")

endif

EndFunction

Function CalculateStaminaCost()

float Function StaminaCost()

fStaminaCost = PlayerRef.GetEquippedWeapon().GetWeight()

Float fStaminaCost = PlayerRef.GetEquippedWeapon().GetWeight()

if PlayerRef.HasMagicEffect(hzNECRStaminaPerkME)

fStaminaCost = fStaminaCost*0.7

endif

fStaminaCost = (fStaminaCost - ((fStaminaCost/200)*PlayerRef.GetAv("Marksman")))*hzNECRStaminaMult.GetValue()

Int iSkill = PlayerRef.GetAv("Marksman") as Int

if iSkill > 100

iSkill = 100

endif

fStaminaCost = (fStaminaCost - ((fStaminaCost/200)*iSkill))*hzNECRStaminaMult.GetValue()

; debug.notification("Stamina cost is "+ fStaminaCost +"")

return fStaminaCost

EndFunction

bool Function ReloadCondition()

if hzNECRBoltLoaded.GetValueInt() == 0 && PlayerRef.GetEquippedItemType(0) == 12 && PlayerRef.IsEquipped(LastAmmo)

return True

else

return False

endif

EndFunction

Diff salvati

Testo originale

Apri file

Scriptname hzNECRAliasScript extends ReferenceAlias

Actor Property PlayerRef Auto

Ammo Property hzNECRDummyArrow Auto

GlobalVariable Property hzNECRBoltLoaded Auto
GlobalVariable Property hzNECRAutoReload Auto
GlobalVariable Property hzNECRStaminaMult Auto

MagicEffect Property hzNECRStaminaPerkME Auto

Message Property hzNECRInitMsg Auto
Message Property hzNECRInitDelayedMsg Auto
Message Property hzNECRRaceSwitchMsgBox Auto

Spell Property hzNECRStaminaDrainSpell Auto

Ammo LastAmmo

Bool bSKSE

Float fStaminaCost

;--INIT STATE--

Event OnInit()
	if PlayerRef.GetEquippedItemType(0) == 12
		GoToState("Main")
	else
		hzNECRInitDelayedMsg.Show()
	endif
EndEvent

Event OnObjectEquipped(Form akBaseObject, ObjectReference akReference)
	if akBaseObject as Weapon && PlayerRef.GetEquippedItemType(0) == 12
		GoToState("Main")
	endif
EndEvent

;--MAIN STATE--

State Main
	Event OnBeginState()
		Utility.Wait(0.1)
		PlayerRef.AddItem(hzNECRDummyArrow, 1, 1)
		Utility.Wait(0.5)
		PlayerRef.EquipItem(hzNECRDummyArrow, 0, 1)
		Utility.Wait(0.5)
		PlayerRef.RemoveItem(hzNECRDummyArrow, 1, 1)

RegisterForAnimationEvent(PlayerRef, "arrowRelease")
		RegisterForAnimationEvent(PlayerRef, "reload")
		RegisterForAnimationEvent(PlayerRef, "ReloadFast")
		RegisterForAnimationEvent(PlayerRef, "reloadStop")
		RegisterForAnimationEvent(PlayerRef, "arrowAttach")
		RegisterForAnimationEvent(PlayerRef, "WeapEquip_Out")

SKSECheck()
		hzNECRInitMsg.Show()
	EndEvent

Event OnRaceSwitchComplete()
		Utility.Wait(0.1)
		UnRegisterForAnimationEvent(PlayerRef, "arrowRelease")
		UnRegisterForAnimationEvent(PlayerRef, "reload")
		UnRegisterForAnimationEvent(PlayerRef, "ReloadFast")
		UnRegisterForAnimationEvent(PlayerRef, "reloadStop")
		UnRegisterForAnimationEvent(PlayerRef, "arrowAttach")
		UnRegisterForAnimationEvent(PlayerRef, "WeapEquip_Out")

Utility.Wait(0.1)
		RegisterForAnimationEvent(PlayerRef, "arrowRelease")
		RegisterForAnimationEvent(PlayerRef, "reload")
		RegisterForAnimationEvent(PlayerRef, "ReloadFast")
		RegisterForAnimationEvent(PlayerRef, "reloadStop")
		RegisterForAnimationEvent(PlayerRef, "arrowAttach")
		RegisterForAnimationEvent(PlayerRef, "WeapEquip_Out")

if PlayerRef.GetAnimationVariableInt("i1stPerson") == 1
			hzNECRRaceSwitchMsgBox.Show()
		endif
	EndEvent

Event OnAnimationEvent(ObjectReference akSource, string asEventName)
		if PlayerRef.GetEquippedItemType(0) == 12
			if PlayerRef.GetAnimationVariableBool("IsEquipping")
				if asEventName == "arrowAttach" && ReloadCondition()
					PlayerRef.UnequipItem(LastAmmo, 0, 1)
					Utility.Wait(0.01)
					PlayerRef.EquipItem(LastAmmo, 0, 1)
				elseif asEventName == "WeapEquip_Out"
					AutoReload()
				endif
			else
				if hzNECRBoltLoaded.GetValueInt() != 0 && asEventName == "arrowRelease"
					hzNECRBoltLoaded.SetValueInt(0)
					Debug.SendAnimationEvent(PlayerRef, "attackStop")
					AutoReload()
;					debug.messagebox("shot")
				elseif asEventName == "reload" || asEventName == "ReloadFast"
					hzNECRBoltLoaded.SetValueInt(0)
					if bSKSE
						CalculateStaminaCost()
						hzNECRStaminaDrainSpell.SetNthEffectMagnitude(0, fStaminaCost)
					endif
					hzNECRStaminaDrainSpell.Cast(PlayerRef, PlayerRef)
;					debug.messagebox("reload start")
				elseif asEventName == "reloadStop"
					hzNECRBoltLoaded.SetValueInt(1)
					PlayerRef.DispelSpell(hzNECRStaminaDrainSpell)
;					debug.messagebox("reloaded")
				endif 
			endif
		endif
	EndEvent

Event OnObjectEquipped(Form akBaseObject, ObjectReference akReference)
		if akBaseObject as Ammo
			LastAmmo = akBaseObject as Ammo
		endif
	EndEvent

Event OnObjectUnEquipped(Form akBaseObject, ObjectReference akReference)
		if akBaseObject as Weapon
			PlayerRef.DispelSpell(hzNECRStaminaDrainSpell)
		endif
	EndEvent

Event OnPlayerLoadGame()
		SKSECheck()
		if ReloadCondition()
			Debug.SendAnimationEvent(PlayerRef, "reloadStart")	
		endif
	EndEvent
EndState

;--FUNCTIONS--

Function SKSECheck()
	bSKSE = False
	if SKSE.GetVersion()
		bSKSE = True
	endif
EndFunction

Function AutoReload()
	if hzNECRAutoReload.GetValueInt() == 1 && ReloadCondition()
		Utility.Wait(0.25)
		Debug.SendAnimationEvent(PlayerRef, "reloadStart")
	endif
EndFunction

Function CalculateStaminaCost()
	fStaminaCost = PlayerRef.GetEquippedWeapon().GetWeight()
	if PlayerRef.HasMagicEffect(hzNECRStaminaPerkME)
		fStaminaCost = fStaminaCost*0.7
	endif
	fStaminaCost = (fStaminaCost - ((fStaminaCost/200)*PlayerRef.GetAv("Marksman")))*hzNECRStaminaMult.GetValue()
;	debug.notification("Stamina cost is "+ fStaminaCost +"")
EndFunction

bool Function ReloadCondition()
	if hzNECRBoltLoaded.GetValueInt() == 0 && PlayerRef.GetEquippedItemType(0) == 12 && PlayerRef.IsEquipped(LastAmmo)
		return True
	else
		return False
	endif
EndFunction

Testo modificato

Apri file

Scriptname hzNECRAliasScript extends ReferenceAlias

Actor Property PlayerRef Auto

Ammo Property hzNECRDummyArrow Auto

GlobalVariable Property hzNECRBoltLoaded Auto
GlobalVariable Property hzNECRAutoReload Auto
GlobalVariable Property hzNECRStaminaMult Auto

MagicEffect Property hzNECRStaminaPerkME Auto

Message Property hzNECRInitMsg Auto
Message Property hzNECRInitDelayedMsg Auto
Message Property hzNECRRaceSwitchMsgBox Auto

Spell Property hzNECRStaminaDrainSpell Auto

Ammo LastAmmo

Bool bSKSE

;--INIT STATE--

Event OnInit()
	if PlayerRef.GetEquippedItemType(0) == 12
		GoToState("Main")
	else
		hzNECRInitDelayedMsg.Show()
	endif
EndEvent

Event OnObjectEquipped(Form akBaseObject, ObjectReference akReference)
	if akBaseObject as Weapon && PlayerRef.GetEquippedItemType(0) == 12
		GoToState("Main")
	endif
EndEvent

;--MAIN STATE--

SKSECheck()
		hzNECRInitMsg.Show()
	EndEvent

if PlayerRef.GetAnimationVariableInt("i1stPerson") == 1
			hzNECRRaceSwitchMsgBox.Show()
		endif
	EndEvent

Event OnAnimationEvent(ObjectReference akSource, string asEventName)
		if PlayerRef.GetEquippedItemType(0) == 12
			if PlayerRef.GetAnimationVariableBool("IsEquipping")
				if asEventName == "arrowAttach" && ReloadCondition()
					PlayerRef.UnequipItem(LastAmmo, 0, 1)
					Utility.Wait(0.01)
					PlayerRef.EquipItem(LastAmmo, 0, 1)
				elseif asEventName == "WeapEquip_Out"
					AutoReload()
				endif
			else
				if hzNECRBoltLoaded.GetValueInt() != 0 && asEventName == "arrowRelease"
					hzNECRBoltLoaded.SetValueInt(0)
					Debug.SendAnimationEvent(PlayerRef, "attackStop")
					AutoReload()
;					debug.messagebox("shot")
				elseif asEventName == "reload" || asEventName == "ReloadFast"
					hzNECRBoltLoaded.SetValueInt(0)
					if bSKSE
						hzNECRStaminaDrainSpell.SetNthEffectMagnitude(0, StaminaCost())
					endif
					hzNECRStaminaDrainSpell.Cast(PlayerRef, PlayerRef)
;					debug.messagebox("reload start")
				elseif asEventName == "reloadStop"
					hzNECRBoltLoaded.SetValueInt(1)
					PlayerRef.DispelSpell(hzNECRStaminaDrainSpell)
;					debug.messagebox("reloaded")
				endif 
			endif
		endif
	EndEvent

Event OnObjectEquipped(Form akBaseObject, ObjectReference akReference)
		if akBaseObject as Ammo
			LastAmmo = akBaseObject as Ammo
		endif
	EndEvent

Event OnObjectUnEquipped(Form akBaseObject, ObjectReference akReference)
		if akBaseObject as Weapon
			PlayerRef.DispelSpell(hzNECRStaminaDrainSpell)
		endif
	EndEvent

Event OnPlayerLoadGame()
		SKSECheck()
		if ReloadCondition()
			Debug.SendAnimationEvent(PlayerRef, "reloadStart")	
		endif
	EndEvent
EndState

;--FUNCTIONS--

Function SKSECheck()
	bSKSE = False
	if SKSE.GetVersion()
		bSKSE = True
	endif
EndFunction

Function AutoReload()
	if hzNECRAutoReload.GetValueInt() == 1 && ReloadCondition()
		Utility.Wait(0.25)
		Debug.SendAnimationEvent(PlayerRef, "reloadStart")
	endif
EndFunction

float Function StaminaCost()
	Float fStaminaCost = PlayerRef.GetEquippedWeapon().GetWeight()
	if PlayerRef.HasMagicEffect(hzNECRStaminaPerkME)
		fStaminaCost = fStaminaCost*0.7
	endif

Int iSkill = PlayerRef.GetAv("Marksman") as Int
	if iSkill > 100
		iSkill = 100
	endif
	fStaminaCost = (fStaminaCost - ((fStaminaCost/200)*iSkill))*hzNECRStaminaMult.GetValue()
;	debug.notification("Stamina cost is "+ fStaminaCost +"")
	return fStaminaCost
EndFunction