[Events]
n0=@+69:ON TEXT:*:#:/msg $chan [10 $+ $nick $+ ] Shut Up Kik Violated 10 second Ban | ban -u10 $chan $nick 2 | k $chan $nick [10Shutup] I Told You Not To Talk [10Shutup] 
n1=@+69:ON ACTION:*:#:/msg $chan [10 $+ $nick $+ ] Shut Up Kik Violated 10 second Ban | ban -u10 $chan $nick 2 | k $chan $nick [10Shutup] I Told You Not To Talk [10Shutup] 
n2=1:ON JOIN:#:writeini %path $+ \seen.ini $chan $nick $ctime
n3=1:ON TEXT:!seen *:#: {
n4=  if ($parm2 == $null) { msg $chan $nick $+ , you have to ask me who I've seen =) | halt }
n5=  elseif ($parm2 == $nick) { msg $chan Don't you know where you are $nick $+ ? | halt }
n6=  elseif ($parm2 ison $chan) { msg $chan $nick $+ , $parm2 is here right now (are u blind?) | halt }
n7=  elseif ($parm2 == $me) { msg $chan $nick $+ , I'm right here!! | halt }
n8=  %a = $readini %path $+ \seen.ini $chan $parm2
n9=  if (%a == $null) { msg $chan $nick $+ , I have never seen $parm2 | unset %a | halt }
n10=  msg $chan $nick $+ , I saw $parm2 $duration($counter(%a)) ago | unset %a | halt
n11=}
n12=1:ON NICK: {
n13=  %a = $readini %path $+ \seen.ini $chan $nick
n14=  if (%a == $null) { unset %a | halt }
n15=  else { writeini %path $+ \seen.ini $chan $newnick %a | remini %path $+ \seen.ini $chan $nick | unset %a | halt }
n16=}
n17=!1:On Ban:#:{
n18=  if ( $banmask iswm $address($me,1)) goto meban
n19=  if ( $banmask iswm $address($me,2)) goto meban
n20=  if ( $banmask iswm $address($me,3)) goto meban
n21=  if ( $banmask iswm $address($me,4)) goto meban
n22=  if ( $bnick iswm $banmask ) goto meban
n23=  else goto end
n24=  :meban
n25=  If ( $me isop $chan ) goto unban
n26=  else goto noop
n27=  :unban
n28=  mode $chan -b $banmask | mode $chan -o $nick | kick $chan $nick [Prot] Dont Ban Me [Prot]
n29=  echo -a %h Auto-Unbann Completed
n30=  goto end
n31=  :noop
n32=  echo -a %h You Have Been Banned And Are Not An Op Sorry
n33=  :end
n34=  echo -a %h Ban [10+b]10 $banmask In $chan
n35=}
n36=1:on text:*!ping*:#:/ctcp $nick ping
n37=1:on text:*ping me*:#:/ctcp $nick ping
n38=1:on text:*ping pl*:#:/ctcp $nick ping
n39=1:on text:*my ping*:#:/ctcp $nick ping
n40=1:on text:*lagged?*:#:/ctcp $nick ping
n41=1:on action:*ping me*:#:/ctcp $nick ping
n42=1:on action:*ping pl*:#:/ctcp $nick ping
n43=1:on action:*my ping*:#:/ctcp $nick ping
n44=1:on action:*lagged?*:#:/ctcp $nick ping
n45=1:on ctcpreply:*ping*: %apt = $ctime - $parm2 | if (%apt < 5) { notice $nick **[10 $+ %apt $+ ] Little Lag Nuthing To Worry Bout** -[10Auto Ping Reply]- } | if (%apt > 5) { notice $nick **[10 $+ %apt $+ ] : Minmal Lag** -[10Auto Ping Reply]- }
n46=1:ON DEOP:#: { if ($readini %path $+ \names.txt protected  $address($opnick,3) == protected) { if $nick == $me | halt } mode $chan +o-o $opnick $nick }
n47=+50:ON OP:#: { echo -a %h 12Notice: You were 12OPed [+o] in [ $lower($chan) ] by [12 $lower($nick) ]. }
n48=+50:ON DEOP:#: { echo -a %h 12Notice: You were 12de0ped [-o] in [ $lower($chan) ] by [12 $lower($nick) ]. | msg chanserv OP $chan $me }
n49=+@45:ON DEOP:# { if ($readini %path $+ \names.txt botsbotsbots $address($nick,3) == bot) mode $chan +v $opnick }
n50=@40!:ON BAN:# { if ($banmask iswm $address($me,6) && $nick != $me) { mode $chan -b $banmask | halt } | if ($nick != $me && $banmask !iswm $address($me,6)) bancheck $chan $banmask $nick }
n51=40:ON JOIN:# {
n52=  if (($me isop $chan) && (%autoop == on) && ($atop($nick,$chan) == 1)) mode $chan +o $nick | if (($me isop $chan) && (%autoop == off) && (%f11 == on) && (%func == on)) { set %f11 off | .timer 1 5 set %f11 on | %kkchan = mode $chan +o $nick | mode $chan +v $nick | echo %c -a %h  $+ %c2 $+ $nick $+ ( $+ %c3 $+ $address) has joined  $+ %c2 $+ $chan, to op  $+ %c2 $+ $nick press  $+ %c2 $+ F11. }
n53=  if (%info == on && $nick != $me) { msg $chan %lb $+ $nick $+ %rb $read -ns $+ $address($nick,3) %path $+ \info.txt } | if (%seen == on) { if (([ isin $nick) || (] isin $nick)) goto end | writeini %path $+ \names.txt $nick seen $ctime } | :end
n54=}
n55=45:ON INVITE:* { echo %c -a %h Autojoining  $+ %c2 $+ $chan by the request of  $+ %c2 $+ $nick( $+ %c3 $+ $address) | join $chan }
n56=30:ON TEXT:pass*:? {
n57=  if ($idpass($parm2) != $null && $parm3 == $null) { raw -q notice $nick :You already have a password set. | halt } | if ($len($parm2) < 4) { raw -q notice $nick :Please use at least 4 characters. | halt } | if ($idpass($parm2) != $null && $parm3 == $null) { raw -q notice $nick :Invalid password, please try again. | halt } | if ($parm3 == $null) { writeini %path $+ \names.txt $nick password $parm2 | writeini %path $+ \names.txt passwords $parm2 $nick | raw -q notice $nick :Password set to ' $+ $parm2 $+ ' | halt }
n58=  if ($parm3 != $null && $len($parm3) < 4) { raw -q notice $nick :Please use at least 4 characters. | halt } | if ($idpass($parm3) != $null) { raw -q notice $nick :Invalid password, please try again. | halt } | if (($parm3 !=  $null) && ($idpass($parm2) == $nick) && ($idpass($parm3) == $null)) { writeini %path $+ \names.txt $nick password $parm3 | remini %path $+ \names.txt passwords $parm2 | writeini %path $+ \names.txt passwords $parm3 $nick | raw -q notice $nick :Changed password to ' $+ $parm3 $+ ' | halt } 
n59=}
n60=30:ON JOIN:# { if $me isop $chan mode $chan +v $nick | if (%info == on && $nick != $me) { msg $chan %lb $+ $nick $+ %rb $read -ns $+ $address($nick,3) %path $+ \info.txt } | if (%seen == on) { if (([ isin $nick) || (] isin $nick)) goto end | writeini %path $+ \names.txt $nick seen $ctime } | :end }
n61=40:ON SERVEROP:# { if (%splitin == $nick) halt | set %splitin $nick | if (%netjoin == on) { echo %c -a %h Netsplit rejoin detected on  $+ %c2 $+ $nick $+  at %time1 | write -c %path $+ \wholeft.txt | set %netjoin off | timer 1 30 set %netjoin on } | unset %split11 | unset %split22 }
n62=30:ON SERVEROP:# { if (%splitin == $nick) halt | set %splitin $nick | if (%netjoin == on) { echo %c -a %h Netsplit rejoin detected on  $+ %c2 $+ $nick $+  at %time1 | write -c %path $+ \wholeft.txt | set %netjoin off | timer 1 30 set %netjoin on } | unset %split11 | unset %split22 }
n63=+@20:ON JOIN:# { ban $chan $nick 3 | kick $chan $nick Banned [ $readini %path $+ \enemies.txt $maddress($address($nick,0)) date ] $+ : $readini %path $+ \enemies.txt $maddress($address($nick,0)) reason }
n64=+@20:ON ACTION:*:# { ban $chan $nick 3 | kick $chan $nick Banned [ $readini %path $+ \enemies.txt $maddress($address($nick,0)) date ] $+ : $readini %path $+ \enemies.txt $maddress($address($nick,0)) reason }
n65=+@20:ON TEXT:*:# { ban $chan $nick 3 | kick $chan $nick Banned [ $readini %path $+ \enemies.txt $maddress($address($nick,0)) date ] $+ : $readini %path $+ \enemies.txt $maddress($address($nick,0)) reason }
n66=+@20:ON NOTICE:*:# { ban $chan $nick 3 | kick $chan $nick Banned [ $readini %path $+ \enemies.txt $maddress($address($nick,0)) date ] $+ : $readini %path $+ \enemies.txt $maddress($address($nick,0)) reason }
n67=@1:ON UNBAN:# { if (%lsban == $banmask) { unset %lsban | halt } | if ($maddress($banmask) == 20) mode $chan +b $banmask | set %lsban $banmask }
n68=1:ON TEXT:ident*:? { if ($parm2 == $null) halt | if ($idpass($parm2) != $nick && $idpass($parm2) != $null) { raw -q notice $nick :You're not $nick, you're $idpass($parm2) $+ . | halt } | set %ident on | set %ipass $parm2 | whois $nick }
n69=#seen disabled
n70=30:ON PART:# { if (([ isin $nick) || (] isin $nick)) halt | writeini %path $+ \names.txt $nick seen $ctime }
n71=30:ON QUIT { if (([ isin $nick) || (] isin $nick)) goto end | writeini %path $+ \names.txt $nick seen $ctime | :end }
n72=1:ON TEXT:seen*:# { if ($parm2 == $null) halt | if $parm2 iswm $me { msg $chan $nick $+ : Yeah, whenever I look in a mirror... | halt } | if ($nick == $parm2) { msg $chan $nick $+ , look in the mirror, or is that too scary? | halt } | if $parm2 ison $chan { msg $chan $nick $+ : $parm2 is on the channel right now! | halt } | lastseen $chan $parm2* }
n73=50:ON TEXT:seen*:# { if ($parm2 == $null) halt | if $parm2 iswm $me { msg $chan $nick $+ : Yeah, whenever I look in a mirror... | halt } | if ($nick == $parm2) { msg $chan $nick $+ , look in the mirror, or is that too scary? | halt } | if $parm2 ison $chan { msg $chan $nick $+ : $parm2 is on the channel right now! | halt } | lastseen $chan $parm2* }
n74=#seen end
n75=1:ON CHAT:.part { if (%partyline == on) { writeini %path $+ \names.txt $nick partyline no | msg = $+ $nick Leaving the partyline... | partyline $nick *** $nick has left the partyline. } | else msg = $+ $nick Partyline was not active. }
n76=1:ON CHAT:.partyline { if (%partyline == on) { writeini %path $+ \names.txt $nick partyline yes | msg = $+ $nick Entering the partyline... (type .part to exit partyline) | partyline $nick *** $nick joined the partyline. } | else msg = $+ $nick Partyline is not active. }
n77=1:ON CHAT:* { if ($readini %path $+ \names.txt $nick partyline == yes && %partyline == on) goto party | halt | :party | partyline $nick < $+ $nick $+ > $parms }
n78=#decryption start
n79=1:ON TEXT:>*:# { decrypt $nick $chan $parm2* }
n80=50:ON TEXT:>*:# { decrypt $nick $chan $parm2* }
n81=45:ON TEXT:>*:# { decrypt $nick $chan $parm2* }
n82=40:ON TEXT:>*:# { decrypt $nick $chan $parm2* }
n83=30:ON TEXT:>*:# { decrypt $nick $chan $parm2* }
n84=20:ON TEXT:>*:# { decrypt $nick $chan $parm2* }
n85=#decryption end
n86=1:ON NOTIFY: { if (($nick != $me) && (%inotify == on) && ($nick !isin %notifylist)) { set %cnt on | whois $nick } | :end }
n87=@1:ON BAN:# { if ($banmask iswm $address($me,6) && $nick != $me) { mode $chan -bo $banmask $nick | kick $chan $nick %bankick | halt } | if ($level($maddress($banmask)) >= 40 && $nick != $me) { mode $chan -b $nick $banmask | halt } | if (%f11 == on && %func ==on) { set %f11 off | .timer 1 10 set %f11 on | %kkchan = mode $chan -b $banmask | echo %c -a %h Ban ( $+ %c2 $+ $banmask) by  $+ %c2 $+ $nick on  $+ %c2 $+ $chan was placed, to remove press  $+ %c2 $+  F11. } | :end }
n88=1:ON QUIT {
n89=  if (($parm3 != $null) || ($parm2 == $null)) goto end | if ($parm1 == %split11 && $parm2 == %split22) { write %path $+ \wholeft.txt /echo %c *  $+ %c2 $+ $nick $+  ( $+ $time) ( $+ %c2 $+ $parms $+ ) | halt } | if ircII* iswm $parm1 goto end | if ((irc* iswm $parm1) || (irc* iswm $parm2) || (*com iswm $parm1) || (*com iswm $parm2) || (*net iswm $parm1) || (*net iswm $parm2) || (*edu iswm $parm1) || (*edu iswm $parm2)) goto next | goto end
n90=  :next | set %split11 $parm1 | set %split22 $parm2 | set %split1 $parm1 | set %split2 $parm2 | if ($left(2,%split1) == *.) goto split1 | if ($left(2,%split2) == *.) goto split2 | if irc* iswm $parm1 goto split | halt
n91=  :split | write %path $+ \wholeft.txt /echo %c *  $+ %c2 $+ $nick ( $+ $time) ( $+ %c2 $+ $parms $+ ) | echo %c -a %h Netsplit detected at %time1 ( $+ %c2 $+ $parms $+ ) | echo %c -a %h Type /wholeft to see who split away. | echo %c -a %h To join split ( $+ %c2 $+ $parm2 $+ ) hit  $+ %c2 $+ F10. | .timer 1 120 write -c %path $+ \wholeft.txt | halt
n92=  :split1 | write %path $+ \wholeft.txt /echo %c *  $+ %c2 $+ $nick ( $+ $time) ( $+ %c2 $+ $parms $+ ) | echo %c -a %h Netsplit detected at %time1 ( $+ %c2 $+ $parms $+ ) | echo %c -a %h Type /wholeft to see who split away. | echo %c -a %h To join split ( $+ %c2  $+ $parm2 $+ ) hit  $+ %c2 $+ F10 | set %split1 $replace(%split1,*,irc) | .timer 1 120 write -c %path $+ \wholeft.txt | halt
n93=  :split2 | write %path $+ \wholeft.txt /echo %c *  $+ %c2 $+ $nick ( $+ $time) ( $+ %c2 $+ $parms $+ ) | echo %c -a %h Netsplit detected at %time1 ( $+ %c2 $+ $parms $+ ) | echo %c -a %h Type /wholeft to see who split away. | echo %c -a %h To join split ( $+ %c2  $+ $replace(%split2,*,irc) $+ ) hit  $+ %c2 $+ F10 | set %split2 $replace(%split2,*,irc) | .timer 1 120 write -c %path $+ \wholeft.txt | halt | :end
n94=}
n95=1:ON CTCPREPLY:ping* { if ($parm2 == $null) halt | %pt = $ctime - $parm2 | if (%pt <= 0) echo %c -a [ $+ %c2 $+ $nick $+  PING  $+ %c2 $+ reply] 0 sec | if (%pt > 0) echo %c -a [ $+ %c2 $+ $nick $+  PING  $+ %c2 $+ reply] $duration(%pt) } 
n96=1:ON CTCPREPLY:version* { echo %c -a $chr(91) $+  $+ %c2 $+ $nick $+  $parm1 $+ $chr(93)  $+ %c2 $+ $parm2* $+  }
n97=1:ON FILERCVD:* { set %j 0 | :start | inc %j | if ($get(%j) == $null) goto end | if (($nick == $get(%j)) && ($nopath($filename) == $get(%j).file)) goto next | else goto start | :next | if ($get(%j).cps == n/a) goto end | %cpsget = $kps($get(%j).cps) | %rctime = $get(%j).size / $get(%j).cps | echo %c -a %h $lof($filename) bytes received from  $+ %c2 $+ $nick in %rctime secs ( $+ %cpsget $+ kb/s) | :end } 
n98=1:ON FILESENT:* { 
n99=  set %i 0 | :start | inc %i | if ($send(%i) == $null) goto end | if ($nick == $send(%i) && $nopath($filename) == $send(%i).file) goto next | else goto start | :next | if ($send(%i).cps == n/a) goto end | %cpssend = $kps($send(%i).cps) | %sntime = $send(%i).size / $send(%i).cps | echo %c -a %h $lof($filename) bytes sent to  $+ %c2 $+ $nick in %sntime secs ( $+ %cpssend $+ kb/s)
n100=  :end | if (%cpssend > %lrecord && %xdccs == on) { set %record $token(1,46,%cpssend) | set %lrecord %cpssend | echo %c -a %h New record:  $+ %cpssend $+ kb/s | raw -q notice $nick :New record set by you at  $+ %cpssend $+ kb/s! } | if ((%xdccs == on) && ($lines(%qpath) >= 1) && ($send(0) < %maxslots)) { %rnick = $read -l1 %qpath | %rfile = $read -l1 %qpath1 | raw -q notice %rnick Sending you queued file  $+ $nopath(%rfile) $+ , which is one file. | write -dl1 %qpath | write -dl1 %qpath1 | dcc send %rnick %rfile } 
n101=}
n102=+1:ON SERVEROP:# { if (%serverprot == on) { if $me isop $chan mode $chan -o $opnick } | if (%splitin == $nick) halt | set %splitin $nick | if (%netjoin == on) { echo %c -a %h Netsplit rejoin detected on  $+ %c2 $+ $nick $+  at %time1 | write -c %path $+ \wholeft.txt | set %netjoin off | .timer 1 30 set %netjoin on } | unset %split11 | unset %split22 }
n103=1:ON DNS { if ($naddress == $null || $raddress == $null) { echo %c -a %h Unable to resolve $nick $+ ( $+ %c2 $+ $iaddress $+ ) | halt } | else echo %c -a %h $nick $+ ( $+ %c2 $+ $iaddress $+ ) Resolved  $+ %c2 $+ $naddress $+  to  $+ %c2 $+ $raddress $+  }
n104=@1:ON TOPIC:%hchan { if (%htopic == on && $nick != $me) { topic $chan %holdtopic | raw -q notice $nick :Please do not change the topic for now. Thanks. } | :end }
n105=1:ON INVITE:* { %kchan = j $chan | echo %c -a %h  $+ %c2 $+ $nick( $+ %c3 $+ $address) has invited you to join  $+ %c2 $+ $chan, to join press  $+ %c2 $+ F12 }
n106=1:ON NICK {
n107=  if (%nickprot == on) {
n108=    if ((%nfnick != $address($newnick,3)) || (%nfnick == $null)) { set %nftime $ctime | set %nfnick $address($newnick,3) | set %nfnum 1 | halt } 
n109=    inc %nfnum | .timer 1 10 if (%nfnum > 0) dec %nfnum
n110=    if (%nfnum >= %maxnf) { %nftimet = $ctime - %nftime | ckick $newnick nickFLOOD:  $+ %maxnf $+  nick changes in  $+ %nftimet $+  secs | unset %nfnick | set %nfnum 0 | halt }
n111=  }
n112=}
n113=@1:ON DEOP:# { 
n114=  if ($readini %path $+ \names.txt botsbotsbots $address($opnick,3) == bot && %reopbot == on) mode $chan +0 $opnick
n115=  if ($readini %path $+ \names.txt botsbotsbots $address($nick,3) == bot && %botdeop == on) mode $chan +v $opnick
n116=  if (%massdeop == on) {
n117=    inc %numdeop | .timer 1 10 if (%numdeop > 0) dec %numdeop
n118=    if ((%deopnick != $nick) || (%deopnick == $null) && ($nick != $me)) { set %fnick $ctime | set %deopnick $nick | set %numdeop 1 | halt }
n119=    if (%numdeop >= %maxdeops) { %fnickt = $ctime - %fnick | if ($nick != $me) mode $chan -o $nick | if ($nick != $me) kick $chan $nick massDEOP:  $+ %maxdeops $+  deops in  $+ %fnickt $+  secs | unset %deopnick | set %numdeop 0 | halt }
n120=  }
n121=}
n122=1:ON KICK:# {
n123=  if (($me isop $chan) && ($knick != $me) && ($nick != $me) && (%f12 == on) && (%func == on)) { set %f12 off | .timer 1 5 set %f12 on | %kchan = invite $knick $chan | echo %c -a %h  $+ %c2 $+ $knick was kicked off  $+ %c2 $+ $chan by  $+ %c2 $+ $nick, to invite  $+ %c2 $+ $knick press  $+ %c2 $+ F12. }
n124=  if ((%masskick == on) && ($knick != $me) && ($me isop $chan)) { 
n125=    inc %numkick | .timer 1 10 if (%numkick > 0) dec %numkick
n126=    if ((%kicknick != $nick) || (%kicknick == $null)) { set %knick $ctime | set %kicknick $knick | set %numkick 1 | goto next }
n127=    if (%numkick >= %maxkick) { %knickt = $ctime - %knick | ban $chan $knick 3 | kick $chan $knick massREJOIN:  $+ %maxkick $+  rejoins in  $+ %knickt $+  secs | unset %kicknick | set %numkick 0 | goto next } 
n128=  }
n129=  :next
n130=  if ((%amasskick == on) && ($nick != $me) && ($knick != $me) && ($me isop $chan)) { 
n131=    inc %anumkick | .timer 1 10 if (%anumkick > 0) dec %anumkick
n132=    if ((%akicknick != $nick) || (%akicknick == $null)) { set %aknick $ctime | set %akicknick $nick | set %anumkick 1 | halt }
n133=    if (%anumkick >= %amaxkick) { %aknickt = $ctime - %aknick | kick $chan $nick massKICK:  $+ %amaxkick $+  kicks in  $+ %aknickt $+  secs | unset %akicknick | set %anumkick 0 | halt }
n134=  }
n135=  if $knick iswm $me goto me | halt | :me | %kkchan = j $chan | echo %c -a %h You have been kicked by  $+ %c2 $+ $nick( $+ %c3 $+ $address) from  $+ %c2 $+ $chan, to rejoin press  $+ %c2 $+ F11.
n136=}
n137=1:ON TEXT:*:? {
n138=  set %msgrec $chr(91) $+ $nick $+ ( $+ $address) $+ $chr(93) $parms
n139=  if ($active != $nick && %actmsg == on) echo %c -a $chr(91) $+ $nick: $+ %c2 $+ $address $+ $chr(93) $parms
n140=  if ($away == $true) { 
n141=    if (%clsmsg == on) .close -m $nick | if ($parm1 == xdcc) goto next | if (%msglog == on) write %path $+ \msg.txt $nick $+ ( $+ $address)( $+ $remove($adate,$right(3,$adate)) $+ @ $+ %time1 $+ ) $parms | tb
n142=    if (%msgcntr == on) { if ($parm1 == xdcc) goto next | write %path $+ \msgcntr.ini mp $+ %msgno $+ = $+ %nummsg $+ ) $nick | inc %nummsg | inc %msgno | write %path $+ \msgcntr.ini mp $+ %msgno $+ = $+ . $+ &Message | inc %msgno | write %path $+ \msgcntr.ini mp $+ %msgno $+ = $+ .. $+ $replace($replace($parms,:,.),/,\) $+ := | inc %msgno | write %path $+ \msgcntr.ini mp $+ %msgno $+ = $+ . $+ $address $+ := | inc %msgno | write %path $+ \msgcntr.ini mp $+ %msgno $+ = $+ . $+ $day $replace($adate,/,-) $replace(%time1,:,.) $+ := | inc %msgno }
n143=  if $nick isin %knowaway goto next | else set %knowaway %knowaway $nick | raw -q notice $nick :Message Has Been Logged:[ $+ Logged Time: 12 $+ %time1 $+ ] } | :next
n144=  if (%msgflood == on) { inc %msgfldno | .timer 1 5 dec %msgfldno | if (%msgfldno >= %mdefcon) { .ignore -pu30 *!*@* | %kkchan = .ignore -pu *!*@* | echo %c -a %h Message flood detected, all messages have been ignored for 30 seconds. To undo ignore press  $+ %c2 $+ F11. }
n145=  }
n146=}
n147=1:ON NOTICE:*:? {
n148=  set %notrec $chr(91) $+ $nick $+ ( $+ $address) $+ $chr(93) $parms | if ($away == $true && %savenotice == on) { if (%msglog == on) write %path $+ \msg.txt $nick $+ ( $+ $address)( $+ $remove($adate,$right(3,$adate)) $+ @ $+ %time1 $+ ) $parms } | if (%noticeflood == on) { inc %notfldno | .timer 1 5 dec %notfldno | if (%notfldno >= %ndefcon) { .ignore -nu30 *!*@* | %kkchan = .ignore -nu *!*@* | echo %c -a %h Notice flood detected, all notices have been ignored for 30 seconds. To undo ignore press  $+ %c2 $+ F11. }
n149=  }
n150=}
n151=#colorkick disabled
n152=+1:ON TEXT:**:# { kick $chan $nick %ckmsg }
n153=#colorkick end
n154=1:ON TEXT:*:# { if ($me isin $parms && $active != $chan) { set %mynick  $+ %c2 $+ [ $me ] $+  | echo %c -a < $+ $nick $+ %c2 $+ : $+ %c3 $+ $chan> $replace($parms,$me,%mynick) | halt } | if ((%shortnick isin $parms) && ($active != $chan) && (%shortnick != $me)) { set %mynick  $+ %c2 $+ %shortnick $+  | echo %c -a < $+ $nick $+ %c2 $+ : $+ %c3 $+ $chan> $replace($parms,%shortnick, [ %mynick ] ) } | :end }
n155=#partyline disabled
n156=1:on chatopen: {
n157=  who $nick
n158=  %p = 0
n159=  :co
n160=  inc %p
n161=  if (%p > $chat(0)) { unset %p | halt }
n162=  msg = $+ $chat(%p) $nick has joined the partyline!
n163=  goto co
n164=}
n165=1:on chat:.me *: {
n166=  %p = 0
n167=  :c
n168=  inc %p
n169=  if (%p > $chat(0)) { unset %p | halt }
n170=  msg = $+ $chat(%p) * $nick $parm2*
n171=  goto c
n172=}
n173=1:on chat:.who: {
n174=  msg =$nick nick!user@host
n175=  msg =$nick ===========
n176=  %w = 0
n177=  :w
n178=  inc %w
n179=  %ini = $readini %path $+ \who.ini who $chat(%w)
n180=  if (%w > $chat(0)) { msg =$nick End of .who list | unset %ini %w | halt }
n181=  msg =$nick %ini
n182=  goto w
n183=}
n184=1:on chat:*: {
n185=  %p = 0
n186=  :c
n187=  inc %p
n188=  if (%p > $chat(0)) { unset %p | halt }
n189=msg = $+ $chat(%p) < $+ $nick $+ > $parms }
n190=goto c
n191=}
n192=1:on chatclose: {
n193=remini %path $+ \who.ini who $nick
n194=%p = 0
n195=:ccl
n196=inc %p
n197=if (%p > $chat(0)) { unset %p | halt }
n198=msg = $+ $chat(%p) $nick has left the partyline.
n199=goto ccl
n200=}
n201=#partyline end