alertbox 'RHOldManPlot' {
Show(); Title(ID_BLANK);
Text(ID_RH_OLDMAN_PLOT);
Button(ID_DISAGREE) {
Kill();
Message(g.player, 'RHDisagree');
}
Button(ID_GIVE_MONEY) {
Kill();
Message(1, 'RHGiveMoney');
}
Button(ID_TAKE_MAP) {
Kill();
}
}
alertbox 'RHDisagree' {
Show(); Title(ID_BLANK);
Text(ID_RH_OLDMAN_DISAGREE);
GameOver();
}
alertbox 'RHGiveMoney' {
Show(); Title(ID_BLANK);
Text(ID_RH_OLDMAN_GIVEMONEY);
AddGold(g.player, -100);
if (random(4) != 0) {
Text(ID_RH_OLDMAN_SUCCESS);
}
else {
Text(ID_RH_OLDMAN_FAIL);
}
} |