/ScriptServ

[script]
n0=#rawhelp off
n1=raw *:*:{ echo -a $numeric - $1-
n2=  halt
n3=}
n4=#rawhelp end
n5=on 1:start:{ .timerkey -mo 0 50 stuff | echo -s   }
n6=dialog away {
n7=  title "Away System"
n8=  size 200 100 150 130
n9=  box "",1,2 -2 147 130
n10=  text "Away Reason",2,13 10 70 40 
n11=  edit "",3,10 25 130 20
n12=  box "",4,10 45 130 40
n13=  check "Loger",5,20 58 50 20
n14=  button "ok",100,15 90 60 25,ok
n15=  button "Exit",101,75 90 60 25,cancel
n16=}
n17=on 1:dialog:away:edit:3:{
n18=  %away.reason = $did(3).text
n19=}
n20=on 1:dialog:away:sclick:100: {
n21=  if ($did(5).state) %away.log = on
n22=  else set %away.log off
n23=  away
n24=}
n25=on 1:text:*:?:{
n26=  if (%away.log == on) {
n27=    .aline -p @logger $realtime 4[11 $+ $nick $+ 4]11 $1-
n28=    closemsg $nick
n29=    haltdef
n30=    if (%away.msg == on) {
n31=      set %away.msg off
n32=      .timer 1 9 set %away.msg on
n33=      .notice $nick 11your message has been logged. %ver
n34=    }
n35=  }
n36=}
n37=on 1:disconnect:{ 
n38=  .sockclose *
n39=  .
n40=  .
n41=  .timer 1 6 set %disconnect ok
n42=  server irc.msn.com
n43=}
n44=ctcp 1:*:{
n45=  if ($1 == sound) { echo -a $realtime $ctcp1 $1 requested by 4[11 $+ $nick $+ 4] | halt }
n46=  if ($1 == version) && (%version == on) {
n47=    set %version on
n48=    .timer 1 9 set %version on
n49=    echo -a $realtime $ctcp1 $1 requested by 4[11 $+ $nick $+ 4] 
n50=    .ctcpreply $nick $1 %ver Coded By Decan-Frozt
n51=    halt
n52=  }
n53=  if ($1 == dcc) { echo -a $realtime $ctcp1 $2 from 4[11 $+ $nick $+ 4] | goto end }
n54=  if ($1 == away) { haltdef | goto end }
n55=  if ($1 == sound) { haltdef | goto end }
n56=  echo -a $realtime $ctcp1 unknown ctcp requested by 4[11 $+ $nick $+ 4]11 ( $+ $1- $+ )
n57=  halt
n58=  :end
n59=}
n60=on 1:text:*:#:{
n61=  if ($me isin $parms) && ($active != $chan) { 
n62=    echo -a $realtime 4[11gossip4] [11 $+ $nick $+ 4]11 4[11 $+ $chan $+ 4]11 $1- 
n63=  }
n64=  if (%cchat.kick == on) {
n65=    if (Appears as isin $parms) {
n66=      kick # $nick 4[11Comic Kick4]
n67=    }
n68=    if (<Chr> isin $parms) {
n69=      kick # $nick 4[11Comic Kick4]
n70=    }
n71=  }
n72=}
n73=on 400:join:#:{
n74=  .raw -q mode # -q $nick
n75=  ban # $address($nick,4) 
n76=  set %tmp.nick $read -ns [ $+ [ $address($nick,4) ] ] banned.txt
n77=  .timer 1 10 unset %tmp.snick
n78=  kick # $nick %tmp.snick
n79=  halt
n80=}
n81=on 400:text:*:#:{  
n82=  mode # +b $address($nick,4)
n83=  set %tmp.snick $read -ns [ $+ [ $address($nick,4) ] ] banned.txt
n84=  .timer 1 10 unset %tmp.snick
n85=  kick # $nick %tmp.snick
n86=  halt
n87=}
n88=on 400:action:*:#:{ 
n89=  mode # +b $address($nick,4)
n90=  set %tmp.snick $read -ns [ $+ [ $address($nick,4) ] ] banned.txt
n91=  .timer 1 10 unset %tmp.snick
n92=  kick # $nick %tmp.snick
n93=  halt
n94=} 
n95=on 100:text:*:#:{ 
n96=  //kick # $nick 4[11Silenced4]
n97=}
n98=on 100:notice:*:#:{ 
n99=  //kick # $nick 4[11Silenced4]
n100=}
n101=on 100:action:*:#:{ 
n102=  //kick # $nick 4[11Silenced4]
n103=}
n104=on 1:connect:{
n105=  .fsend on
n106=  .pdcc 88888888888888888888
n107=  .ignore -r
n108=  .ignore off
n109=  set %version on
n110=  if (%away == on) {
n111=    set %away off
n112=    .unset %away.*
n113=  }
n114=}