AltarofDibella
Editor ID:AltarofDibella
Form ID:00066CDC
Typ:Objekt
Script:ScriptName AltarofDibella
short doonce
short DayofLastUse
ref target
Begin OnActivate
if IsActionRef player == 1
If Player.GetCrimeGold > 0 || GetPCInfamy > GetPCFame
MessageBox "Du bist heute gesegnet worden."
elseif FameDibella == 0
MessageBox "Dibella liebt dich!"
elseif FameDibella > 0
if GetDayofWeek == DayofLastUse
MessageBox "Ihr wurdet heute bereits gesegnet."
else
MessageBox "Dibella liebt Euch!"
Cast AltarDibella Player
Set DayofLastUse to GetDayofWeek
endif
endif
else
set target to GetActionRef
Cast AltarDibella target
endif
end
begin gamemode
if doonce == 0 ;days are numbered 0-6 - prevents first visit on 0 day and being told you've used it today
set DayofLastUse to 10
set doonce to 1
endif
end