diff options
Diffstat (limited to 'npc/functions/politics.txt')
| -rw-r--r-- | npc/functions/politics.txt | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/npc/functions/politics.txt b/npc/functions/politics.txt index 403a9e3dc..8ae2711eb 100644 --- a/npc/functions/politics.txt +++ b/npc/functions/politics.txt @@ -145,6 +145,22 @@ function script POL_PlayerMoney { - script Politics NPC_HIDDEN,{ +// Daily Paperwork Penalty +OnClock2359: + if ($TULIM_DAILYQUEST != gettimeparam(GETTIME_DAYOFMONTH)) + $TULIM_REPUTATION=limit(0, $TULIM_REPUTATION-2, 100); + if ($HALIN_DAILYQUEST != gettimeparam(GETTIME_DAYOFMONTH)) + $HALIN_REPUTATION=limit(0, $HALIN_REPUTATION-2, 100); + if ($HURNS_DAILYQUEST != gettimeparam(GETTIME_DAYOFMONTH)) + $HURNS_REPUTATION=limit(0, $HURNS_REPUTATION-2, 100); + if ($NIVAL_DAILYQUEST != gettimeparam(GETTIME_DAYOFMONTH)) + $NIVAL_REPUTATION=limit(0, $NIVAL_REPUTATION-2, 100); + if ($LOF_DAILYQUEST != gettimeparam(GETTIME_DAYOFMONTH)) + $LOF_REPUTATION=limit(0, $LOF_REPUTATION-2, 100); + if ($FROSTIA_DAILYQUEST != gettimeparam(GETTIME_DAYOFMONTH)) + $FROSTIA_REPUTATION=limit(0, $FROSTIA_REPUTATION-2, 100); + end; + OnSun0000: // Weekly income $TULIM_MONEY+=$TULIM_EXPORT*limit(0, $TULIM_REPUTATION, 100)/100; @@ -267,6 +283,8 @@ function script POL_Information { mesc l("The account with highest votes will win. Ties will be solved by randomness."); mesc l("An account may vote anywhere, but only once per town (weekly)."); next; + mesc l("The town administrator benefits for free services on the town."); + mesc l("Also, they can control the city taxes, which incide upon purchases and sales within the town."); return; } @@ -347,6 +365,7 @@ function script POL_Manage { .@EX=getd("$"+getarg(0)+"_EXPORT"); .@RP=getd("$"+getarg(0)+"_REPUTATION"); .@CR=getd("$"+getarg(0)+"_TAXOFF"); + .@DQ=getd("$"+getarg(0)+"_DAILYQUEST"); mesc l("Town Money: @@", .@GP), 2; mesc l("Town Reputation: %d | %d.%02d %% Tax", .@RP, .@TX/100, .@TX%100), 2; @@ -354,6 +373,7 @@ function script POL_Manage { next; menuint l("Nothing"), 0, + rif(.@DQ != gettimeparam(GETTIME_DAYOFMONTH), l("Do some paperwork")), 1, l("Invest in Exportations"), 10, l("Invest in Reputation"), 20, l("Raise city taxes"), 30, @@ -363,6 +383,13 @@ function script POL_Manage { l("Resign"), 99; mes ""; switch (@menuret) { + // Mark 0: Cycle + case 1: + if (rand(3) == 1) + setd(.@town$+"_REPUTATION", .@RP+1); + setd(.@town$+"_DAILYQUEST", gettimeparam(GETTIME_DAYOFMONTH)); + mesc l("You dealt with paperwork."), 2; + break; // Mark 10: Exports case 10: .@cost=.@EX/10; |