All pastes #150011 Raw Edit

Mine

public text v1 · immutable
#150011 ·published 2006-08-26 10:43 UTC
rendered paste body
ON @*:TEXT:*:#: {
  IF ($nick isop #) { RETURN }
  SET -u3 %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1)
  ; The variable, %fld.#chan.nick counts the number of lines the person speaks
  ; It is automatically unset 3 seconds after the last time the person talked
  ; So I guess in _theory_ if you managed to do 1 line per 3 secs for 3 lines you could be kicked
  IF (%fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 5) {
    ; The above if statement checks if that variable is greater to or equals 5
    ban -u0 # $nick 11
    kick # $nick Please do not flood
  }
}


on *:TEXT:@calc *:#: { 
  /msg $chan $$2- = $calc($$2-) 
} 

on *:TEXT:!calc *:#: { 
  /notice $nick $$2- = $calc($$2-) 
} 


on *:TEXT:!gratz*:#: { /msg $chan 0,1 4,1/7,1/8,1/3,1/12,1/6,1/0,1 Congratulations0,1 $nick on $2 $3!0,1 4,1\7,1\8,1\3,1\12,1\6,1\0,1  

 on *:RAWMODE:#:{
    if ($chan == #yvd) { halt }
    if (($1 == +q) && ($2 == $me)) { inc %owners | msg # 1,0[ 1Thanks 1For 1The 1+q $nick 1]1 Owners:12 %owners }
    if (($1 == +a) && ($2 == $me)) { inc %protects | msg # 1,0[ 1Thanks 1For 1The 1a $nick 1]1 Protects:12 %protects }
    if (($1 == +o) && ($2 == $me)) { inc %opz | msg # 1,0[ 1Thanks 1For 1The 1@ $nick 1]1 Ops:12 %opz }
    if (($1 == +h) && ($2 == $me)) { inc %hopz | msg # 1,0[ 1Thanks 1For 1The 1% $nick 1]1 HalfOps:12 %hopz }
    if (($1 == +v) && ($2 == $me)) { inc %voicez | msg # 1,0[ 1Thanks 1For 1The 1Voice $nick 1]1 Voices:12 %voicez }
    if (($1 == -q) && ($2 == $me)) { inc %deowners | msg # 1,0[ 1Why 1Did 1You 1Take 1My1 +q1 $nick 1]1 Deowners:12 %deowners }
    if (($1 == -a) && ($2 == $me)) { inc %deprotects | msg # 1,0[ 1Why 1Did 1You 1Take 1My1 +a1 $nick 1]1 Deprotects:12 %deprotects }
    if (($1 == -o) && ($2 == $me)) { inc %deopz | msg # 1,0[ 1Why 1Did 1You 1Take 1My1 @1 $nick 1]1 Deops:12 %deopz }
    if (($1 == -h) && ($2 == $me)) { inc %dehopz | msg # 1,0[ 1Why 1Did 1You 1Take 1My1 HalfOp1 $nick 1]1 DehalfOps:12 %dehopz }
    if (($1 == -v) && ($2 == $me)) { inc %devoicez | msg # 1,0[ 1Why 1Did 1You 1Take 1My1 Voice1 $nick 1]1 Devoices:12 %devoicez }