/ScriptServ

[script]
n0=;************************************************************************************************
n1=;************************************************************************************************
n2=;******************************      MYSTIQUE  RAW   **************************************
n3=;************************************************************************************************
n4=;************************************************************************************************
n5=raw 001:* { titlebar [Mystique $remove($remove($remove($remove($remove($remove(%mver2,),-),=),[),]),M) by: enigma@kyuzz.org] | mhs 2Initializing... | halt }
n6=raw 002:* { halt }
n7=raw 003:* { halt }
n8=raw 004:* { halt }
n9=raw 250:* { mh1s 2 $parm4 6connections formed. | halt }
n10=raw 251:* { mh1s 2 $parm4 6users on2 $parm10 6servers | halt }
n11=raw 252:* { mh1s 2 $parm2 6irc ops | halt }
n12=raw 253:* { mh1s 2 $parm2 6unknown connections | halt }
n13=raw 254:* { mh1s 2 $parm2 6channels formed | halt }
n14=raw 255:* { mh1s 2 $parm4 6client and2 $parm9 6serverconnections | halt }
n15=raw 375:* { halt }
n16=raw 372:* { halt }
n17=raw 376:* { halt }
n18=raw 314:*: {
n19=  if (%whois == on) {
n20=    echo -a 2 _________________________________________
n21=    mh1 14(10 $+ $parm2 $+ 14) 2- $parm3 $+ 6@2 $+ $parm4 
n22=    mh1 6real name:2 $parm6*
n23=    halt
n24=  }
n25=}
n26=raw 311:*: {
n27=  if (%whois == on) {
n28=    echo -a 2 _________________________________________
n29=    mh1 14(10 $+ $parm2 $+ 14) 2- $parm3 $+ 6@2 $+ $parm4 
n30=    mh1 6real name:2 $parm6*
n31=    halt
n32=  }
n33=}
n34=raw 312:*: {
n35=  if (%whois == on) {
n36=    mh1 6server:2 *3 
n37=    halt
n38=  }
n39=}
n40=raw 313:*: {
n41=  if (%whois == on) {
n42=    mh1 2 $parm2 6is an2 $parm5*
n43=    halt
n44=  }
n45=}
n46=raw 317:*: {
n47=  if (%whois == on) {
n48=    mh1 6idle:2 $3 secs.
n49=    halt
n50=  }
n51=}
n52=raw 319:*: {
n53=  if (%whois == on) {
n54=    mh1 6channels:2 $replace($3-,@,6@2)
n55=    halt
n56=  }
n57=}
n58=raw 369:*: {
n59=  if (%whois == on) {
n60=    echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯   
n61=    halt
n62=  }
n63=}
n64=raw 318:*: {
n65=  if (%whois == on) {
n66=    echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯  
n67=    halt
n68=  }
n69=}
n70=raw 401:* if (%whois == on) { mh1 6 $+ $parm2 2is offline | halt } 
n71=raw 402:* if (%whois == on) { mh1 6 $+ $parm2 2is offline | halt }
n72=raw 406:* if (%whois == on) { mh1 TEST | halt } 
n73=raw 200:* { mh1 2 *2 }
n74=raw 262:* { echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ | halt }
n75=raw 351:* { mh1 2Version of6 $server 2: $2 | halt }
n76=raw 364:* { aline @Links 6|2 *2 }
n77=raw 365:* { aline @Links 6|2 End of LINKS }
n78=raw 366:*: {
n79=  if (%sync == off) { halt }
n80=  set %snc.temp $ticks | %snc.time = [ [ %snc.temp ] - [ %snc.time ] ]
n81=  echo $parm2 10[2M10] 10   [o:2 $+ $opnick(0,$parm2) $+ 10] [t:2 $+ $nick(0,$parm2) $+ 10] [snc:2 $left(1,%snc.Time) $+ . $+ $right(3,%snc.Time) $+ 10"]
n82=  unset %snc.* 
n83=  halt
n84=}
n85=raw 367:*: {
n86=  if %banlist == 1 {
n87=    if %unbanall == 1 { mode $parm2 -b $parm3 | /goto end }
n88=    inc %bancount 1
n89=    if %bancount == 1 { 
n90=      echo -a 2 _________________________________________
n91=    echo -a 6[2M6]2 Ban List for6 $parm2  }
n92=    if ($parm4 == $null) { set %banman *Unavailable* } 
n93=    else { set %banman $parm4 }
n94=    mh2 $parm3 2banned by6 %banman
n95=    :end
n96=  }
n97=}
n98=raw 368:*: { 
n99=  if %banlist == 1 {
n100=    if %unbanall == $null {
n101=      if %bancount == 0 { 
n102=        echo -a 2 _________________________________________ 
n103=        echo -a 6[2M6]2 Ban List for6 $parm2  
n104=        echo -a 2No bans were found...
n105=      }
n106=      echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
n107=    }
n108=    unset %unbanall | /unset %banlist | /unset %bancount
n109=  }
n110=}
n111=;
n112=raw 315:*: halt
n113=raw 302:* {
n114=  set %ntf1 $remove($token(1,61,$2),$chr(61)) | set %ntf2 $right($token(2,61,$2),$sub($len($token(2,61,$2)),1)) | set %ntf = %ntf1 $+ ! $+ %ntf2
n115=  mh1 2[6online2(10 $+ %ntf1 $+  14= $replace(%ntf2,@,10@14) $+ 2)] | halt 
n116=}
n117=raw 352:*: { 
n118=  if (%who == on) {
n119=    aline @Who 2 _____________________________________________________ 
n120=    aline @Who 14(10 $+ $6 $+ 14)2 - $3 $+ 6@2 $+ $4
n121=    aline @Who 6aka:2 $left($9-,40) 
n122=    aline @Who 6 $+ Server:2 $5 
n123=    aline @Who 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ 
n124=    halt 
n125=  }
n126=}
n127=raw 353:*: { 
n128=  if (%ncc == on) && (%names == on) {
n129=    echo -a 2 _________________________________________ 
n130=    mh 2Names on6 $3 
n131=    mh1 2 $replace(*4,@,6@2) 
n132=    echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
n133=    unset %ncc 
n134=    halt
n135=  }
n136=}
n137=#portscan off
n138=raw 211:* {
n139=  if $left(4,$right(5,$parm2)) isnum {
n140=    if (%porscan == $null) { set %bestport $left(4,$right(5,$parm2)) | set %bestportval $parm5 + $parm7 | set %porscan active | set %portlist $left(4,$right(5,$parm2)) }
n141=    else { set %portlist1 %portlist | set %portlist %portlist1 $+ ,  $+ $left(4,$right(5,$parm2)) | set %curval $parm5 + $parm7
n142=      if (%curval < %bestportval) { set %bestport $left(4,$right(5,$parm2)) | set %bestportval $parm5 + $parm7 | set %portlist1 %portlist | unset %portlist1 }
n143=  unset %curval } }
n144=  halt
n145=}
n146=raw 219:*: {
n147=  if ($parm2 == l) { 
n148=    set %sserver $server  
n149=    echo -a 2•6 Portscan report for 2 $+ $server $+  
n150=    echo -a 2•6 Availble ports are:2 %portlist 
n151=    echo -a 2•6 Best port is:2 %bestport 
n152=    if (%bestportval < 1) { echo -a 2•6 Best port traffic:2 Null }
n153=    if (%bestportval == 1) { echo -a 2•6 Best port traffic:2 %bestportval Kilobyte }
n154=    if (%bestportval > 1 ) { echo -a 2•6 Best port traffic:2 %bestportval Kilobytes }
n155=    echo -a 2•6 Done scanning ports on2 $server $+ ! 
n156=    echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
n157=    unset %portlist 
n158=    unset %porscan 
n159=    unset %bestportval 
n160=    .timer 1 20 /unset %bestport 
n161=    .timer 1 1 /.disable #portscan 
n162=    halt 
n163=  }
n164=}
n165=#portscan end
n166=;
n167=#portscan2 off
n168=raw 211:* {
n169=  if $left(4,$right(5,$parm2)) isnum {
n170=    if (%porscan == $null) { set %bestport $left(4,$right(5,$parm2)) | set %bestportval $parm5 + $parm7 | set %porscan active | set %portlist $left(4,$right(5,$parm2)) }
n171=    else { set %portlist1 %portlist | set %portlist %portlist1 $+ ,  $+ $left(4,$right(5,$parm2)) | set %curval $parm5 + $parm7
n172=      if (%curval < %bestportval) { set %bestport $left(4,$right(5,$parm2)) | set %bestportval $parm5 + $parm7 | set %portlist1 %portlist | unset %portlist1 }
n173=  unset %curval } }
n174=  halt
n175=}
n176=raw 219:*: {
n177=  if ($parm2 == l) { 
n178=    echo -a 2•6 Portscan report for 2 $+ %sserver $+  
n179=    echo -a 2•6 Availble ports are:2 %portlist 
n180=    echo -a 2•6 Best port is:2 %bestport 
n181=    if (%bestportval < 1) { echo -a 2•6 Best port traffic:2 Null }
n182=    if (%bestportval == 1) { echo -a 2•6 Best port traffic:2 %bestportval Kilobyte }
n183=    if (%bestportval > 1 ) { echo -a 2•6 Best port traffic:2 %bestportval Kilobytes }
n184=    echo -a 2•6 Done scanning ports on2 %sserver $+ ! 
n185=    echo -a 2 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
n186=    unset %portlist 
n187=    unset %porscan 
n188=    unset %bestportval 
n189=    /.timer 1 20 /unset %bestport 
n190=    /.timer 1 1 /.disable #portscan2
n191=    halt 
n192=  }
n193=}
n194=#portscan2 end
n195=
n196=raw 305:* { mh 2 You are no longer marked as being away at6 $time | unset %astatus | halt }
n197=raw 306:* { mh 2 You have been marked as being away at6 $time | set %astatus Yes | halt }
n198=raw 381:* { mh 2 Greetings,6 $me $+2, You're now an IrcCop on6 $server 2.. | halt }
n199=raw 421:* { mh 2 Unknown command:6 $2 | halt }
n200=raw 432:* { mh 2 Erroneus Nickname:6 Please try again... | halt }
n201=raw 433:* { mh 2 Nickname6 $parm2 2is already in use. | halt }
n202=raw 471:* { mh 2 Cannot join channel6 $parm2 2It's full | halt }
n203=raw 473:* { mh 2 Cannot join channel6 $parm2 2Invite only | halt }
n204=raw 474:* { mh 2 Cannot join channel6 $parm2 2Banned | halt }
n205=raw 475:* { mh 2 Cannot join channel6 $parm2 2Requires correct key | halt }
n206=raw 482:* { mh 2 You are not channel operator on6 $parm2  | halt }
n207=raw 437:* { mh 2 $2 6nick\channel is temporarily unavailable...