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.txt36
1 files changed, 35 insertions, 1 deletions
diff --git a/npc/functions/politics.txt b/npc/functions/politics.txt
index f9df9e575..9349a6990 100644
--- a/npc/functions/politics.txt
+++ b/npc/functions/politics.txt
@@ -42,14 +42,48 @@ function script PurchaseTaxes {
- script Politics NPC_HIDDEN,{
-// Weekly income
OnSun0000:
+ // Weekly income
$TULIM_MONEY+=$TULIM_EXPORT*limit(0, $TULIM_REPUTATION, 100)/100;
$HALIN_MONEY+=$HALIN_EXPORT*limit(0, $HALIN_REPUTATION, 100)/100;
$HURNS_MONEY+=$HURNS_EXPORT*limit(0, $HURNS_REPUTATION, 100)/100;
$LOF_MONEY+=$LOF_EXPORT*limit(0, $LOF_REPUTATION, 100)/100;
$NIVAL_MONEY+=$NIVAL_EXPORT*limit(0, $NIVAL_REPUTATION, 100)/100;
$FROSTIA_MONEY+=$FROSTIA_EXPORT*limit(0, $FROSTIA_REPUTATION, 100)/100;
+
+ // Send salary to Town Administrators (20% from exports and 5GP/reputation)
+ .@tax=$TULIM_EXPORT*limit(0, $TULIM_REPUTATION, 100)/500;
+ .@tax+=$TULIM_REPUTATION*5;
+ .@tax=min($TULIM_MONEY, .@tax);
+ rodex_sendmail(gf_charnameid($TULIM_MAYOR$), "Tulimshar Townhall", "Term Income", "You've received the money for the term.", .@tax);
+
+ .@tax=$HALIN_EXPORT*limit(0, $HALIN_REPUTATION, 100)/500;
+ .@tax+=$HALIN_REPUTATION*5;
+ .@tax=min($HALIN_MONEY, .@tax);
+ rodex_sendmail(gf_charnameid($HALIN_MAYOR$), "Halinarzo Townhall", "Term Income", "You've received the money for the term.", .@tax);
+
+ .@tax=$HURNS_EXPORT*limit(0, $HURNS_REPUTATION, 100)/500;
+ .@tax+=$HURNS_REPUTATION*5;
+ .@tax=min($HURNS_MONEY, .@tax);
+ rodex_sendmail(gf_charnameid($HURNS_MAYOR$), "Hurnscald Townhall", "Term Income", "You've received the money for the term.", .@tax);
+
+ .@tax=$LOF_EXPORT*limit(0, $LOF_REPUTATION, 100)/500;
+ .@tax+=$LOF_REPUTATION*5;
+ .@tax=min($LOF_MONEY, .@tax);
+ rodex_sendmail(gf_charnameid($LOF_MAYOR$), "LoF Townhall", "Term Income", "You've received the money for the term.", .@tax);
+
+ .@tax=$NIVAL_EXPORT*limit(0, $NIVAL_REPUTATION, 100)/500;
+ .@tax+=$NIVAL_REPUTATION*5;
+ .@tax=min($NIVAL_MONEY, .@tax);
+ rodex_sendmail(gf_charnameid($NIVAL_MAYOR$), "Nivalis Townhall", "Term Income", "You've received the money for the term.", .@tax);
+
+ .@tax=$FROSTIA_EXPORT*limit(0, $FROSTIA_REPUTATION, 100)/500;
+ .@tax+=$FROSTIA_REPUTATION*5;
+ .@tax=min($FROSTIA_MONEY, .@tax);
+ rodex_sendmail(gf_charnameid($FROSTIA_MAYOR$), "Frostia Townhall", "Term Income", "You've received the money for the term.", .@tax);
+
+ // Conduct elections
+
end;
}