# this script is for the one who will give the reward!
ONCE_PROG
QUESTCHAT Vengeance! I have been wronged by ${1 vengeance}!
mpsetvar $i VENGEANCE ''
~
QUEST_TIME_PROG vengeance -1
mpsetvar $i VENGEANCE ''
mpsetvar * VENGEANCE ''
~
SPEECH_PROG trouble problem wronged quest help honor insult reward corpse enemy trouble? problem? wronged? quest? help? honor? insult? reward? corpse? enemy?
say "$n" ${1 vengeance} has insulted my honor! Kill him dead and I'll have a reward.
~
QUEST_TIME_PROG vengeance 1
QUESTCHAT One minute to left kill ${1 vengeance}, or I'm doing it myself.
~
GREET_PROG 200
IF VAR($i VENGEANCE != MINE)
IF VAR($n VENGEANCE == KILLER)
mpsetvar $i VENGEANCE MINE
mpsetvar $n VENGEANCE ''
say "$n" Thank you. I will mount his head on my wall. Here is your reward:
IF !QUESTWINNER($n vengeance)
mpexp $n 50%
mpoload QuestPoint
give "a quest point" "$n"
endif
mpoload 1000
give 1000 "$n"
mpquestwin $n vengeance
mpendquest vengeance
ENDIF
ENDIF
~
