La Confrérie des Traducteurs

Code : Tout sélectionner

begin OnAdd player
    player.AddSpell aaMpPrise
end


begin OnDrop player

; if we have any of our items we want to get out

; standard swords   
    if (player.GetItemCount aaOabatbm1 > 0 || player.GetItemCount aaOabatbm2 > 0)
    return;
    elseif (player.GetItemCount aaOabatE1 > 0 || player.GetItemCount aaOabatE2 > 0)
    return;
    elseif (player.GetItemCount aaOabatN1 > 0 || player.GetItemCount aaOabatN2 > 0)
    return;
    elseif (player.GetItemCount aaOabatR1 > 0 || player.GetItemCount aaOabatR1 > 0)
    return;
    endif

message " "
message " "

; if we reach this point we have none of our items so remove the spell
    player.RemoveSpell aaMpPrise

end

Code : Tout sélectionner

scn aaScnMpPriseEff

ref weaponFrom
ref weaponTo
short wasEquipped

begin ScriptEffectStart

set weaponFrom to 0
set weaponTo to 0
set wasEquipped to 0

message " "
message " "

; determine weapons to swap
if (player.GetEquipped aaOabatbm1)
    set weaponFrom to aaOabatbm1
    set weaponTo to aaOabatbm2
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatbm2)
    set weaponFrom to aaOabatbm2
    set weaponTo to aaOabatbm1
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatE1 )
    set weaponFrom to aaOabatE1
    set weaponTo to aaOabatE2
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatE2)
    set weaponFrom to aaOabatE2
    set weaponTo to aaOabatE1
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatN1 )
    set weaponFrom to aaOabatN1
    set weaponTo to aaOabatN2
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatN2)
    set weaponFrom to aaOabatN2
    set weaponTo to aaOabatN1
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatR1 )
    set weaponFrom to aaOabatR1
    set weaponTo to aaOabatR2
    set wasEquipped to 1
elseif (player.GetEquipped aaOabatR2)
    set weaponFrom to aaOabatR2
    set weaponTo to aaOabatR1
    set wasEquipped to 1
endif

message " "
message " "
; handle the 2h weapon swap 
if (wasEquipped == 1)

; unequip weaponFrom
    player.UnequipItem weaponFrom

; remove weaponFrom from inventory
    player.RemoveItem weaponFrom 1

; add the weaponTo to inventory
    player.AddItem weaponTo 1

; equip weaponTo
    player.EquipItem weaponTo

endif

end