; The Cancellator version 1.0b | for OUTCHAT | Made By Tokie-D-Bear 2/27/96 |
; My 2nd Script!
; This is sort of a fun and mildly effective script to use on troublemaking
; Guests. It usually freaks em out pretty good.  Sometimes it works on 
; members too, but just the ignorant ones.
;
; USAGE: For all commands except ?cancellate, you must first click on the
; target user (get into whisper mode) before you issue the command.
;
; COMMANDS:   To cancel user type:  cancellate (use on troublemakers only, not
;             innocents)
;             To re-cancel user type:  recancel   (use this if the user 
;             moves away from the X)
;             To un-cancel user type:  uncancel   (use this when behavior
;             modification is achieved)
;  For Online Instructions type:  ?cancellate  (use this when you forget how
;  the script works)
;

{  PENFRONT
   15 PENSIZE
   255 0 0 PENCOLOR
   "!)no NOTICE: " WHOTARGET WHONAME + " has been CANCELLED!" + ROOMMSG  ""
CHATSTR =
   WHOTARGET WHOPOS y = x =
   x 21 - y 21 - x 21 + y 21 + LINE
   x 21 + y 21 - x 21 - y 21 + LINE
   "" CHATSTR =
}  CHATSTR "^cancellate" GREPSTR IF
{  PAINTUNDO PAINTUNDO
   PENFRONT
   15 PENSIZE
   255 0 0 PENCOLOR
   "There is no easy escape from The Cancellator, " WHOTARGET WHONAME + 
".  Try
begging for forgiveness and promising to behave yourself.  Sometimes that
works." + ROOMMSG  "" CHATSTR =
   WHOTARGET WHOPOS y = x =
   x 21 - y 21 - x 21 + y 21 + LINE
   x 21 + y 21 - x 21 - y 21 + LINE
   "" CHATSTR =
}  CHATSTR "^recancel" GREPSTR IF
{  PAINTUNDO PAINTUNDO
   "!)yes NOTICE: " WHOTARGET WHONAME + " has been Un-Cancelled." + 
ROOMMSG  ""
CHATSTR =
   "" CHATSTR =
}  CHATSTR "^uncancel" GREPSTR IF
{  "@10,50 !The Cancellator v1.0b | Another ChoticPsyae IptScrae brought 
to you
by Tokie-D-Bear." LOCALMSG
   "@150,50 !USAGE: Click on target (to get in whisper mode) then type
cancellate." LOCALMSG
   "@290,50 !If target moves, while still in whisper mode, type recancel to
re-cancel the target." LOCALMSG
   "@150,170 !When behavior modification is achieved, in whisper mode, type
uncancel." LOCALMSG
   "" CHATSTR =
}  CHATSTR "?cancellate" == IF