/ScriptServ

menu channel {
  KLøWñ× Neat Stuff
  .Set ICQ No:set %icqno  $?="What's Your ICQ Number?" | echo -a  [02K07L13ø12W05ñ07×1] 1You Icq Number has been set to %icqno | echo -a [02K07L13ø12W05ñ07×1] 1to tell ppl yout icq number press | echo -a [02K07L13ø12W05ñ07×1] 1Shift+F5 or type /icq
  .Abbreviation
  ..On:set %abv On | echo -a  [02K07L13ø12W05ñ07×1] 1Abbreviation On
  ..Off:set %abv Off | echo -a  [02K07L13ø12W05ñ07×1] 1Abbreviation Off
  .Anti Idle
  ..On:.timer101 0 %idletime msg # 4,1Anti-Idle Msg 8(9 %idletime sec 8)12 Interval | echo -a [02K07L13ø12W05ñ07×1] Anti Idle In now on | echo -a [02K07L13ø12W05ñ07×1] All messages will be displayed in #
  ..Off:.timer101 off | echo -a [02K07L13ø12W05ñ07×1] Anti Idle has been Stopped
  ..Setup:set %idletime $?="How much of a delay between messages? (Secs 1-9999)"
  .Chan Stats
  ..Public Person Count:msg $chan 2,15There are12 $nick(#,0) 2people in5 $chan2 ...12 $opnick(#,0) 2Op(s) And12 $nopnick(#,0) 2without
  ..Private Person Count:echo -a [02K07L13ø12W05ñ07×1] 2,15There are12 $nick(#,0) 2people in5 $chan2 ...12 $opnick(#,0) 2Op(s) And12 $nopnick(#,0) 2without
  .Script Stats:stats
  .Dictionary:dict
  .Nick Completion
  ..On:set %nickcom On
  ..Off:set %nickcom Off
  .Jokes
  ..NT:msg $active While walking through Seattle recently, I passed a butchers shop and noticed that they were selling fresh brains for the following prices | msg $active Linux Programmer brains $2,95/kg | msg $active Mac OS Programmer brains, $4,95/kg | msg $active Windows NT Programmer brains $24,95/kg | msg $active I was astounded and walked inside to ask the butcher the obvious question , "Why are the NT Programmers' brain so expensive?" | msg $active The butcher replied very clamly; "Do you relise how many NT programmers we have to use just to get 1kg of brains?"
}

On 1:INPUT:*: {
  if (%nickcom == On) {
    say 12-=[9 $+ $snicks 1112]=-814 $1- | halt
  }
}
off 1:INPUT:*: {
  msg $active %text $1- | halt
}
on 1:INPUT:*: {
  if (%abv == on) { 
    if ( $parms == wb ) { msg $active 9W14elcome 9B19ack | halt }
    elseif ( $parms == np ) { msg $active 9N19o 9P19roblem | halt }
    elseif ( $parms == brb ) { msg $active 9B19e 9R19ight 9B19ack | halt }
    elseif ( $parms == bbl ) { msg $active 9B19e 9B19ack 9L19ater | halt }
    elseif ( $parms == lol ) { msg $active 9L19augh 9O19ut 9L19oud | halt }
    elseif ( $parms == rotfl ) { msg $active 9R19olling 9O19n 9T19he 9F19loor 9L19aughing | halt }
    elseif ( $parms == rotflmao ) { msg $active 9R19olling 9O19n 9T19he 9F19loor 9L19aughing 9M19y 9A19ss 9O19ff | halt }
    elseif ( $parms == bbs ) { msg $active 9B19e 9B19ack 9S19oon | halt }
    elseif ( $parms == gtg ) { msg $active 9G19ot 9T19o 9G19o | halt }
    elseif ( $parms == lmao ) { msg $active 9L19aughing 9M19y 9A19ss 9O19ff | halt }
    elseif ( $parms == wtf ) { msg $active 9W19hat 9T19he 9F19uck | halt }
    elseif ( $parms == stfu ) { msg $active 9S19hut 9T19he 9F19uck 9U19p | halt }
    elseif ( $parms == ty ) { msg $active 9T19hank5-9Y19ou | halt }
    elseif ( $parms == btw ) { msg $active 9B19y 9T19he 9W19ay | halt }
    elseif ( $parms == err ) { msg $active 9err | halt }
  }   
}
On 1:kick:#:{
  if ($knick == $me) {
    .timer100 10 1 join # 
  }
}
On 1:join:#:{
  .timer100 off
} 
On 1:text:*:#:if ($nick == %offer) { set %copy $parms | set %copy1 $chan | msg $chan %copy }
On 1:action:*:#:if ($nick == %offer) { set %copy $parms | set %copy1 $chan | me $chan %copy }
Off 1:OP:#: {
  if ($opnick == $me) {
    Teaseop $nick
  }
}
on 1:START: {
  inc %script.start 1
  echo 2,2--0,0----------------------------14[0,0---02©~~~~02K07L13ø12W05ñ07× 14[10By14] 9K11LoWnRob & 9K11LoWnDJearl02~~~~©0,0-----5 19999™0,0--14]
  echo 2,2--0,0-------------- 5You are Running 02K07L13ø12W05ñ07×5 Version %ver $+ , with mIRC $version $bits $+ bit Running on Windows $+ $os 
  echo 2,2--0,0::::::::::::::::::::::::::::::::::::::02K07L13ø12W05ñ07×2 This Script Has Been Run 14[12 $+ %script.start $+ 14]2 Times
  echo 2,2--0,0:10,0The Time And Date Is $day $asctime(mmmm d) $+ , $asctime(h:nntt)

}