rendered paste bodyon *: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
}
}
}