All pastes #291013 Raw Edit

Anonymous

public text v1 · immutable
#291013 ·published 2006-12-24 17:27 UTC
rendered paste body
on *:INVITE:#: {
  if ($read(strikes.ini,channels,* $+ $chan $+ *) == $null) {
    write strikes.ini $chan 0
  }
}
on *:KICK:#: {
  if ($knick == $me) {
    if ($read(strikes.ini,channels,* $+ $chan $+ *) == $null) {
      write strikes.ini $chan 1
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 0) {
      write -l $+ $readn strikes.ini $chan 1
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 1) {
      write -l $+ $readn strikes.ini $chan 2
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 2) {
      write -l $+ $readn strikes.ini $chan 3
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 3) {
      write -l $+ $readn strikes.ini $chan 4
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 4) {
      write -l $+ $readn strikes.ini $chan 5
    }
  }
}
on *:JOIN:#: {
  if ($chan != #helliansheros) {
    if ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 0) {
      msg $chan Hello, use 'demon, leave' to make me leave.
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 1) {
      msg $chan You have 1/5 strike. use 'demon, leave' to make me leave.
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 2) {
      msg $chan You have 2/5 strikes. use 'demon, leave' to make me leave.
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 3) {
      msg $chan You have 3/5 strikes. use 'demon, leave' to make me leave.
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 4) {
      msg $chan You have 4/5 strike. Use 'demon, leave' to make me leave.
    }
    elseif ($read(strikes.ini,channels,* $+ $chan $+ *) == $chan 5) {
      msg $chan You have been Blacklisted! To appeal please go to #chr1s and ask Demonviper16
      part $chan    
    }
  }
}
on *:TEXT:!cbl*:#: {
  if ($nick isop #staffers) { 
    if ($read(strikes.ini,channels,* $+ $2 $+ *) == $null) {
      write strikes.txt $2 5
    }
    else {
      write -l $+ $readn strikes.ini $2 5
      notice $nick $2 has been Blacklisted!    
    }
  }
}
on *:TEXT:!cub*:#: {
  if ($nick isop #staffers) { 
    if ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 5) {
      write -l $+ $readn strikes.ini $2 0
      notice $nick $2 has been Unblacklisted
    }
    else {
      notice $nick  This channel isn't blacklisted.  To check type !ccb.
    }
  }
}
on *:TEXT:!ccb*:#: {
  if ($nick isop #staffers) {
    if ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 5) {
      notice $nick $2 has 5 strikes and is blacklisted
    }
    elseif ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 4) {
      notice $nick $2 has 4 strikes and 1 one away from being blacklisted!
    }
    elseif ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 3) {
      notice $nick $2 has 3 strikes and 2 one away from being blacklisted!
    }
    elseif ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 2) {
      notice $nick $2 has 2 strikes and 3 one away from being blacklisted!
    }
    elseif ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 1) {
      notice $nick $2 has 1 strikes and 4 one away from being blacklisted!
    }
    elseif ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 0 || $read(strikes.ini,channels,* $+ $2 $+ *) == $null) {) {
      notice $nick $2 has 0 strikes and is 5  away from being blacklisted!
    }
  }
}
on *:TEXT:!setw*:#: {
  if ($nick isop #staffers) {
    if ($read(strikes.ini,channels,* $+ $2 $+ *) == $null) {
      write strikes.txt $2 $3
    }
    elseif ($read(strikes.ini,channels,* $+ $2 $+ *) == $2 0 || $read(strikes.ini,channels,* $+ $2 $+ *) == $2 1 || $read(strikes.ini,channels,* $+ $2 $+ *) == $2 2 || $read(strikes.ini,channels,* $+ $2 $+ *) == $2 3 || $read(strikes.inin,channels,* $+ $2 $+ *) == $2 4 || $read(strikes.ini,channels,* $+ $2 $+ *) == $2 5) {
      write -l $+ $readn strikes.ini $2 $3
    }
    else { 
      notice $nick an error has occured I am very sorry please ask demonviper16 to fix it.
      halt
    }
  }
}