KLoWnX — File Browser

klownX / klownX / test.mrc

test.mrc — 4.19 KB — Download this file



on 1:connect: {
  echo -q [02K07L13ø12W05ñ07×1]2 You are now Connected to the  $+ $network Network, and your server is  $+ $server 
}
Off 1:TEXT:*:?: {
  .msg $nick 02K07L13ø12W05ñ07× 2I'am not accepting Private Messages Right Now please Talk In the Channel | halt 
}
alias test {
  timer20 0 1 inc %z 1
  timer10 0 15 msg # Gone for $duration(%z)
}
alias locktopic {
  set %locktopic $$?="What Topic do you Want to be locked?" | set %lockchan $chan | set %topiclock on | set %topicchan $chan
  topic $chan %locktopic | msg $chan Topic is now Locked
}
alias unlocktopic {
  set %topiclock off | unset %locktopic | msg %topicchan  Topic Lock is now OFF  | unset %topicchan
}
on 1:topic:%topicchan:{
  if ($chan != %topicchan) { halt }
  if ($nick == $me) { halt }
  if (%topiclock == on) { topic $chan %locktopic 
  }
}
OFF 1:DEOP:#:{
  if ($immunity.nick($chan,$nick) !== $null) || ($immunity.chan($chan,$chan) !== $null)  { halt } 
  if ($nick == $me) { halt } 
  if ($address($opnick,2) == $address($me,2)) && ($address($opnick,4) == $address($me,4)) { goto me }
  else { goto next }  
  :me
  if ($opnick == $me) {
    inc %count [ $+ [ $nick ] ] | .timer 1 15 unset %count [ $+ [ $nick ] ]
    if (%count [ $+ [ $nick ] ] >= 3) { .notice $nick op/deop flood detected!Stop flooding me lamer! | halt } 
  }
  echo 10 -a Your clone has been deoped in 3 $+ $chan $+  by $nick !
  kick $chan $nick Don't DeOp My Clones
  if ($me isop $chan) && ($opnick !== $me) && ($opnick !== $nick) { 
    .notice $me %nav $nick deoped your clone and was Kicked
    halt 
  } 
}
OFF 1:KICK:#:{
  if ($immunity.nick($chan,$nick) !== $null) || ($immunity.chan($chan,$chan) !== $null)  { halt } 
  if ($nick == $me) { halt } 
  if ($address($opnick,2) == $address($me,2)) && ($address($opnick,4) == $address($me,4)) { goto me }
  else { goto next }  
  :me
  if ($opnick == $me) {
    inc %count [ $+ [ $nick ] ] | .timer 1 15 unset %count [ $+ [ $nick ] ]
    if (%count [ $+ [ $nick ] ] >= 3) { .notice $nick op/deop flood detected!Stop flooding me lamer! | halt } 
  }
  echo 10 -a Your Clone has been Kicked in 3 $+ $chan $+  by $nick !
  kick $chan $nick Don't Kick My Clone
  if ($me isop $chan) && ($opnick !== $me) && ($opnick !== $nick) { 
    .notice $me %nav $nick deoped your clone and was Kicked
    halt 
  } 
}
#VM Off
On ^1:TEXT:*:#:echo -a 12[ $+ $asctime(h:nntt) $+ ] 9(1 $+ $nick $+ 9) $1- | halt
On ^1:TEXT:*:?:echo -a 12[ $+ $asctime(h:nntt) $+ ] MSG 9(1 $+ $nick $+ 9) $1- | halt
On ^1:ACTION:*:#:echo # 12[ $+ $asctime(h:nntt) $+ ]6 *  $nick $1- | halt
On ^1:PART:#: {
  if ($nick == $me) { halt }
  echo # 12[ $+ $asctime(h:nntt) $+ ] 3* 9(3 $+ $nick $+ 9)3 ( $+ $address $+ ) has left $chan | halt
}
on ^1:JOIN:#: {
  if ($nick == $me) { halt }
  echo # 12[ $+ $asctime(h:nntt) $+ ] 3* 9(3 $+ $nick $+ 9)3 ( $+ $address $+ ) has joined $chan | halt
}

On 1:QUIT:echo $chan 12[ $+ $asctime(h:nntt) $+ ] 2* 9(2 $+ $nick $+ 9) 3(2 $+ $address $+ 3)2 has quit IRC 3(2 $+ $1- $+ 3) | halt

On 1:INPUT:*:{
  if $left($1,1) != / {
    if (: isin $1) {
      set %spidah.nc $remove($1,:)
      set %spidah.nc %spidah.nc $+ *!*@*
      if ($ialchan(%spidah.nc,$active,1).nick != $null) && ($len($1) != 2) {
        set %spidah.nc $ialchan(%spidah.nc,$active,1).nick
        set %spidah.nc $_nc(%spidah.nc)
        echo $active $_me(%spidah.nc,$2-)
        .raw privmsg $active : $+ %spidah.nc $2-    
        halt
      }
    }
    echo $active 12[ $+ $asctime(h:nntt) $+ ] 9( $+ $me $+ 9) $1- | .raw privmsg $active : $+ $1- | halt
  }
}
On 1:INPUT:ACTION:*:{
  if $left($1,1) != / {
    if (: isin $1) {
      set %spidah.nc $remove($1,:)
      set %spidah.nc %spidah.nc $+ *!*@*
      if ($ialchan(%spidah.nc,$active,1).nick != $null) && ($len($1) != 2) {
        set %spidah.nc $ialchan(%spidah.nc,$active,1).nick
        set %spidah.nc $_nc(%spidah.nc)
        echo $active $_me(%spidah.nc,$2-)
        .raw privmsg $active : $+ %spidah.nc $2-    
        halt
      }
    }
    echo $active 12<4<1 $asctime(HH:nn) 4>12> 9( $+ $me $+ 9) $1- | .raw privmsg $active : $+ $1- | halt
  }
}
#VM end