/ScriptServ

[script]
n0=;************************************************************************************************
n1=;************************************************************************************************
n2=;******************************      MYSTIQUE  COMMANDS   ****************************
n3=;************************************************************************************************
n4=;************************************************************************************************
n5=
n6=ctcp 1:PING: {
n7=  raw -q notice $nick :
PING %mver2 
n8=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 PING Request
n9=  if (%ctcpp == on) {
n10=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site }
n11=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived Ping flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n12=    inc %ctcps $+ $site 1  
n13=    halt
n14=  }
n15=}
n16=ctcp 1:VERSION: {
n17=  raw -q notice $nick :
VERSION %mver 6(2motd:10 [  $read $mircdir $+ docs\ $+ [ %ver.txt ] ] $+ 6)   
n18=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 VERSION Request
n19=  if (%ctcpp == on) {  
n20=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site }
n21=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived Version flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n22=    inc %ctcps $+ $site 1  
n23=    halt 
n24=  } 
n25=}
n26=ctcp 1:FINGER: {
n27=  raw -q notice $nick :
FINGER %mver    
n28=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 FINGER Request  
n29=  if (%ctcpp == on) {  
n30=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site } 
n31=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived Finger flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n32=    inc %ctcps $+ $site 1  
n33=    halt
n34=  }
n35=}
n36=ctcp 1:TIME: {
n37=  raw -q notice $nick :
TIME %mver - $time 
n38=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 TIME Request  
n39=  if (%ctcpp == on) {  
n40=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site }
n41=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived Time flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n42=    inc %ctcps $+ $site 1  
n43=    halt
n44=  }
n45=}
n46=ctcp 1:ECHO: { 
n47=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 ECHO Request 
n48=  if (%ctcpp == on) { 
n49=    .ignore -ntu30 $nick 4 | .ignore -tu15 * | mh 2Recived Echo flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) | halt 
n50=  }
n51=}
n52=ctcp 1:USERINFO: {
n53=  raw -q notice $nick :
USERINFO %mver -2 $me $+ , 6what more?   
n54=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 USERINFO Request
n55=  if (%ctcpp == on) {  
n56=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site }
n57=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived User Info flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n58=    inc %ctcps $+ $site 1  
n59=    halt
n60=  }
n61=}
n62=ctcp 1:CLIENTINFO: {
n63=  raw -q notice $nick :
CLIENTINFO %mver     
n64=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 CLIENTINFO Request
n65=  if (%ctcpp == on) {  
n66=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site }
n67=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived Client Info flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n68=    inc %ctcps $+ $site 1  
n69=    halt
n70=  }
n71=}
n72=ctcp 1:dcc chat {
n73=  if ($nick == $me) { goto end }
n74=  if (%ctcpp == on) {   
n75=    mh 2Chat request by6 $nick (2 $+ $address $+ 6) (2port:6 $5 $+ 6)
n76=    inc %cr 
n77=    if (%cr >= 3) { .ignore -tu10 $nick 3 | timer 1 10 set %cr 0 | mh 2Recived DCC SEND flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) | halt } 
n78=    .timer 1 5 set %cr 0
n79=    :end
n80=  }
n81=}
n82=ctcp 1:dcc send {
n83=  mh 2Get request by6 $nick (2 $+ $address $+ 6) (2file:6 $3 $+ 6)
n84=  if (%ctcpp == on) {   
n85=    inc %sr 
n86=    if (%sr >= 3) { .ignore -tu10 $nick 3 | timer 1 10 set %sr 0 | mh 2Recived DCC SEND flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) | halt } 
n87=    .timer 1 5 set %sr 0
n88=  }
n89=}
n90=ctcp 1:;;: {
n91=  mh1 2[6ctcp2(10 $+ $nick $+ 2)]2 $parms Request
n92=  if (%ctcpp == on) {  
n93=    if ([ %ctcps [ $+ [ $site ] ] ] == $null) { set %ctcps $++ $site 1 | .timer 1 5 unset %ctcps $++ $site }
n94=    if ([ %ctcps [ $+ [ $site ] ] ] == 2) { .ignore -ntu30 $nick 4 | .ignore -tu15 * | unset %ctcps $++ $site | mh 2Recived  $+ $parms $+  flood from: 6(2 $+ $nick $+ 6)(2 $+ $address $+ 6) }
n95=    inc %ctcps $+ $site 1  
n96=    halt
n97=  }
n98=}
n99=;
n100=ctcp 1:DCC ACCEPT:
n101=ctcp 1:PAGE: { 
n102=  if (%away.page == $null) { halt }
n103=  if ($parm2 == $null) { set %away.page.msg none | goto jump }
n104=  set %away.page.msg $parm2
n105=  :jump
n106=  splay $mircdir $+ sounds\page.wav 
n107=  .timer 1 5 /splay $mircdir $+ sounds\page.wav
n108=  .ignore -tu30 $nick 4 
n109=  mh 2> 6[2 $+ $nick $+ 6[2PAGE6]] [2 $+ msg:6 %away.page.msg $+ ]  
n110=  notice $nick %mver - Page received!
n111=}