copy n paste on your remote



Pronounced this thing as 'I Dont Want To See This Message'

alias -l ix12cdm {
  var %m = $strip($1-), %i = $iif($chan,$chan,$nick)
  if (%ix12cdm) {
    set %ix12cdmmsg %m
    filter -fk $ixfile(1) ixchk
    if (%ix12cdmres) { 
      if ($event = open) {
        if (%ix12cdmopen) haltdef 
      }
      elseif (%ix12cdmecho) haltdef
      elseif (%ix12cdmhide) { echo -ftc $+ $iif(!$window(%i,1),sa) $replacex($event,text,normal) $iif($window(%i,1),%i) $+($replacex($left($event,1),t,<,n,-,a,* ),$nick,$remove($replacex($left($event,1),t,>,n,-),a) ,$color(background),$chr(44),$color(background),%m,) | haltdef }
    }
  }
  unset %ix12cdmres %ix12cdmmsg
}
alias -l ixchk {
  if ($+(*,$1,*) iswm %ix12cdmmsg) set %ix12cdmres 1
}
on ^*:open:?:*:ix12cdm $1-
on ^*:text:*:*:ix12cdm $1-
on ^*:action:*:*:ix12cdm $1-
on ^*:notice:*:*:ix12cdm $1-

menu channel {
  $iif(%ix12cdm,$style(1)) IX12CDisMsg
  .Add Text:ixadd
  .Del Text
  ..$submenu($ixdel($1))
  .See List
  ..$submenu($ixlst($1))
  .-
  .$iif(%ix12cdmopen,$style(1)) Do Not Open Query:set %ix12cdmopen $iif(%ix12cdmopen,0,1)
  .$iif(%ix12cdmecho,$style(1)) Do Not Echo Msg:set %ix12cdmecho $iif(%ix12cdmecho,0,1)
  .$iif(%ix12cdmhide,$style(1)) Echo Msg But Hide It:set %ix12cdmhide $iif(%ix12cdmhide,0,1)
  .-
  .On/Off:set %ix12cdm $iif(%ix12cdm,0,1)
}
alias -l ixlst {
  if ($1 isnum) && ($read($ixfile,$1)) {
    var %t = $v1
    return %t :echo -ftsac info * [IX12CDisMsg $ord($1) List:] %t
  }
}
alias -l ixdel {
  if ($1 isnum) && ($read($ixfile,$1)) {
    return $v1 :write -dl $+ $1 $ixfile(1)
  }
}
alias -l ixadd {
  var %s = $$?="Enter Text:", %e = echo -ftsac info * [IX12CDisMsg Error:]
  if ($read($ixfile,ns,%s)) %e %s Already Listed!
  elseif (%s) {
    write $ixfile(1) %s
    $replace(%e,error,Succesfull) %s Have Been Listed!
  }
}
alias ixfile { var %f = $scriptdirix12cdm.lst | return $iif($1,$+(",%f,"),%f) }