diff options
Diffstat (limited to 'npc/functions/politics.txt')
| -rw-r--r-- | npc/functions/politics.txt | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/npc/functions/politics.txt b/npc/functions/politics.txt index 95469e8bc..3e6cdc31a 100644 --- a/npc/functions/politics.txt +++ b/npc/functions/politics.txt @@ -375,6 +375,8 @@ function script POL_Manage { l("Lower city taxes"), 35, rif(.@CR && .@RP, l("Tax crafters")), 40, rif(!.@CR, l("Don't tax crafters")), 41, + rif(is_staff(), l("Exile a player")), 70, + rif(is_staff(), l("Revert a player exile")), 71, l("Resign"), 99; mes ""; switch (@menuret) { @@ -464,6 +466,53 @@ function script POL_Manage { setd(.@town$+"_REPUTATION", .@RP+1); mesc l("Crafters no longer pays taxes. (Tax exempt)"), 1; break; + // Mark 70: Exile + case 70: + mesc l("Exiled players will not be able to save to menhir."), 1; + mesc l("A global announcement will be made."), 1; + mesc l("Player must be online for the operation to finish."), 1; + next; + mesc l("Please insert player name to exile."), 1; + input .@ex$; + if (.@ex$ == "") + break; + .@id=getcharid(3, .@ex$); + if (.@id < 1) { + mesc l("The player is offline or does not exist."); + break; + } + .@town=POL_LocToTP(getarg(0)); + .@you=getcharid(3); + attachrid(.@id); + dispbottom l("You have been EXILED from %s by %s.", getarg(0), .@MAYOR$); + #EXILED=#EXILED|.@town; + detachrid(); + attachrid(.@you); + kamibroadcast(sprintf("%s has EXILED %s from %s.", + .@MAYOR$, .@ex$, getarg(0))); + break; + case 71: + mesc l("Please insert player name to cancel exile."), 1; + input .@ex$; + if (.@ex$ == "") + break; + .@id=getcharid(3, .@ex$); + if (.@id < 1) { + mesc l("The player is offline or does not exist."); + break; + } + .@town=POL_LocToTP(getarg(0)); + .@you=getcharid(3); + attachrid(.@id); + if (#EXILED & .@town) { + dispbottom l("You are NO LONGER EXILED from %s by %s.", getarg(0), .@MAYOR$); + #EXILED=#EXILED^.@town; + } + detachrid(); + attachrid(.@you); + kamibroadcast(sprintf("%s has ANNULED THE EXILE %s from %s.", + .@MAYOR$, .@ex$, getarg(0))); + break; // Mark 90: Office case 99: mesc l("Really resign?"), 1; |