also, wen das interessiert, ich habe eine umständliche lösung gefunden, allerdings nicht für schriftrollen. derjenige, der eine einfache funktion dafür kennt, bitte laut lachen:
set ItemValue to ItemValue + GetGoldValue ItemRef
set EnchantmentRef to GetEnchantment ItemRef
set EnchantType to GetEnchantmentType EnchantmentRef
if ( EnchantType == 1 || EnchantType == 2)
set EnchantmentCost to GetEnchantmentCost EnchantmentRef
set ItemCharge to ItemRef.GetCurrentCharge
set ItemValue to ItemValue + .4 * ( EnchantmentCost + ItemCharge )
elseif ( EnchantType == 3 )
set EffectCount to GetMagicItemEffectCount EnchantmentRef
while ( iTemp < EffectCount )
set Magnitude to GetNthEffectItemMagnitude EnchantmentRef iTemp
set EffectCode to GetNthEffectItemCode EnchantmentRef iTemp
set BarterFactor to GetMagicEffectBarterFactorC EffectCode
set ItemValue to ItemValue + ( Magnitude * BarterFactor )
set iTemp to iTemp + 1
loop
endif