All pastes #1351528 Raw Edit

Miscellany

public text v1 · immutable
#1351528 ·published 2009-03-03 01:19 UTC
rendered paste body
on *:TEXT:*:#:{
  if (Cody isin $1-) {
    if (%AutoIgnore == on && !$hget(AutoIgnore,$address($nick,3))) || (%AutoIgnore == off) {
      timerstroke 1 2 describe $chan strokes $nick softly
      halt
    }
  }
}

on *:start: {
  hmake AutoIgnore 100
  set %AutoIgnore on
  if ($isfile(AutoIgnore.hsh)) hload AutoIgnore AutoIgnore.hsh 
}
on *:exit: {
  if ($hget(AutoIgnore)) hsave -o AutoIgnore AutoIgnore.hsh
}
on *:LOAD: {
  hmake AutoIgnore 100
  set %AutoIgnore on
  if ($isfile(AutoIgnore.hsh)) hload AutoIgnore AutoIgnore.hsh
  //echo -a $timestamp ::: ( Auto Slapback Blocker Loaded. ) :::
}
menu * {
  Auto Slapback Blocker
  .Options
  ..&Add $1 to Auto Ignore?: set %addnicks $1 | set %addaddress $address($1,3) | /autoadds | halt
  ..-
  ..&Delete $1 from Auto Ignore?: set %delnicks $1 | set %deladdress $address($1,3) | /autodels | halt
  .$iif(%AutoIgnore == on,$style(1)) $+ Auto Slapback Blocker &On: /set %AutoIgnore on
  .-
  .$iif(%AutoIgnore == off,$style(1)) $+ Auto Slapback Blocker &Off: /set %AutoIgnore off
}

alias autoadds {
  if (!$hget(AutoIgnore,%addaddress)) { 
    hadd AutoIgnore %addaddress %addaddress
    hsave -o AutoIgnore AutoIgnore.hsh
    //echo -a $timestamp ::: ( %addnicks has been added to your Auto Slapback Ignore List. ) :::
    unset %addnicks
    unset %addaddress
    halt
  }
  //echo -a $timestamp ::: ( %addnicks is already on your Auto Slapback Ignore List. ) :::
  unset %addnicks
  unset %addaddress
  halt
}
alias autodels {
  if (!$hget(AutoIgnore,%deladdress)) { 
    //echo -a $timestamp ::: ( %delnicks isn't on your Auto Slapback Ignore List. ) :::
    unset %deladdress
    unset %delnicks
    halt
  }
  .hdel -sw AutoIgnore %deladdress
  hsave -o AutoIgnore AutoIgnore.hsh
  //echo -a $timestamp ::: ( %delnicks has been removed from your Auto Slapback Ignore List. ) :::
  unset %deladdress
  unset %delnicks
  halt
}