| SCTX |
ScriptName AltarofAkatosh
short doonce
short DayofLastUse
ref target
Begin OnActivate
if IsActionRef player == 1
If Player.GetCrimeGold > 0 || GetPCInfamy > GetPCFame
MessageBox "Seek not the Dragon's blessing, sinner!"
elseif FameAkatosh == 0
MessageBox "Make a pilgrimage to a Wayshrine of Akatosh, and henceforth receive a blessing at Akatosh's holy altars."
elseif FameAkatosh > 0
if GetDayofWeek == DayofLastUse
MessageBox "You've already been blessed this day."
else
MessageBox "You make Father Akatosh proud!"
Cast AltarAkatosh Player
Set DayofLastUse to GetDayofWeek
endif
endif
else
set target to GetActionRef
Cast AltarAkatosh 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 |