summaryrefslogtreecommitdiff
path: root/npc/functions/politics.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/functions/politics.txt')
-rw-r--r--npc/functions/politics.txt13
1 files changed, 13 insertions, 0 deletions
diff --git a/npc/functions/politics.txt b/npc/functions/politics.txt
index 0a35d2458..7d32fbca1 100644
--- a/npc/functions/politics.txt
+++ b/npc/functions/politics.txt
@@ -419,6 +419,7 @@ function script POL_Manage {
rif(.@left >= 6, l("Exile a player")), 70,
rif(.@left >= 6, l("Revert a player exile")), 71,
rif(.@left, l("Raise server wide EXP")), 80,
+ rif(Zeny > $ALLIANCE_TAX1, l("Donate to town")), 90,
l("Resign"), 99;
mes "";
switch (@menuret) {
@@ -601,6 +602,18 @@ function script POL_Manage {
}
break;
// Mark 90: Office
+ case 90:
+ mesc l("The alliance will take %s GP as fee, +%d%% tax over donations.", fnum($ALLIANCE_TAX1), $ALLIANCE_TAX2), 1;
+ mesc l("You can donate up to %s GP.", fnum(Zeny-$ALLIANCE_TAX1));
+ input .@donate, 0, Zeny-$ALLIANCE_TAX1;
+ if (.@donate <= 0)
+ break;
+ Zeny -= $ALLIANCE_TAX1;
+ .@tax = .@donate * (100-$ALLIANCE_TAX2) / 100;
+ setd(.@town$+"_MONEY", .@GP+.@tax);
+ Zeny -= .@donate;
+ mesc l("Donation completed."), 2;
+ break;
case 99:
mesc l("Really resign?"), 1;
next;