SuperScript PRO — File Browser
SuperScriptPROv1.0 / SuperScriptPROv1.0 / system / hscript4.ini
hscript4.ini — 25.52 KB — Download this file
[script]
n0=;<----------------------=º<×>קuþêr§çriþt§× PRO ßy Hell`Fire '98 © <×>º=--------------------->
n1=; -(!)- -(!)- ! DO NOT EDIT ANYTHING HERE OR THE SCRIPT WILL NOT WORK ANYMORE ! -(!)- -(!)-
n2=
n3=ctcp +20:* { echo -a $ver $nick has ctcp'd you 14twice 12in ten seconds | .guser 30 $nick 3 | .timer 1 10 .ruser 30 $nick 3 | halt }
n4=ctcp +30:* { .ignore -tu60 $wildsite | echo -a $ver14 $nick has ctcp'd 12three 14times in 10 seconds! 14(We might just ignore him for a minute or so). | halt }
n5=ctcp !1:ping: { .inc %pingcount 1 | .ctcpreply $nick PING 12I have been pinged14 %pingcount $ver | echo -a $ver $nick is pinging you | .guser 20 $nick 3 | .timer 1 10 .ruser 20 $nick 3 }
n6=ctcp !1:version: { .ctcpreply $nick VERSION 3קuþêr§çriþt§× 7PRO | echo -a $ver $nick is trying to version you | .guser 20 $nick 3 | .timer 1 10 .ruser 20 $nick 3 }
n7=ctcp !1:finger: { .ctcpreply $nick FINGER $ver 4 U devil! | echo -a $ver $nick is trying to finger you | .guser 20 $nick 3 | .timer 1 10 .ruser 20 $nick 3 | halt }
n8=ctcp !1:userinfo: { .ctcpreply $nick USERINFO $ver | echo -a $ver $nick is trying to userinfo you | .guser 20 $nick 3 | .timer 1 10 .ruser 20 $nick 3 | halt }
n9=ctcp !1:clientinfo: { .ctcpreply $nick CLIENTINFO $ver | echo -a $ver $nick is trying to Clientinfo you | .guser 20 $nick 3 | .timer 1 10 .ruser 20 $nick 3 | halt }
n10=ctcp !1:time: { .ctcpreply $nick TIME $date $time $ver | echo -a $ver $nick is asking you the time | .guser 20 $nick 3 | .timer 1 10 .ruser 20 $nick 3 | halt }
n11=ctcp !1:gforce: { .ctcpreply $nick3קuþêr§çriþt§× 7PRO | alias ver /return 3קuþêr§çriþt§× 7PRO }
n12=on 1:NICK:{
n13= if $nick == $me { goto mynick }
n14= if %offnick == OFF goto nickflood
n15= if $level($maddress($address($newnick,5))) == 97 {
n16= set %comchan 0
n17= :loopnick
n18= inc %comchan 1
n19= %comchan1 = $comchan($newnick,%comchan)
n20= if $chan(%comchan1) == $null { goto nickflood }
n21= else { autokick.nick $newnick %comchan1 OFFENSIVE-NICK }
n22= goto loopnick
n23= }
n24= :nickflood
n25= if %nickfld == OFF { goto floodend }
n26= if (%nickch >= 3) && ($address($newnick,3) == %nfaddy) {
n27= .set %comchan 1
n28= :kicknick
n29= %schan = $comchan($newnick,%comchan)
n30= if $chan(%schan) == $null { goto alldone }
n31= if ($newnick isop $chan(%schan)) && ($me isop $chan(%schan) { echo -a $ver $newnick 14was not kicked from12 $chan(%schan) 14 for Nick-Flooding because12 $newnick 14is an Op | .inc %comchan 1 | splay $mircdirsounds\kick.wav | goto kicknick }
n32= if ($newnick ison $chan(%schan)) && ($me isop $chan(%schan) { kicker $newnick $chan(%schan) NICKFLOOD | .inc %comchan 1 | goto kicknick }
n33= else { .inc %comchan 1 | goto kicknick }
n34= :alldone
n35= .unset %schan %nickch %comchan
n36= }
n37= else if (%nfaddy == $address($newnick,3)) { .set %nfaddy $address($newnick,3) | .inc %nickch 1 | .timer 1 10 unset %nickch }
n38= else { .set %nfaddy $address($newnick,3) | .set %nickch 1 | .timer 1 7 unset %nickch }
n39= :floodend
n40= goto endnick
n41= :mynick
n42= if (Guest isin $newnick) && (%primnick == $null) { nick %nnick1 | echo -a $ver Changing your nick Guest Nick Auto Activation }
n43= elseif Guest isin $newnick { nick %primnick | echo -a $ver Changing your nick Guest Nick Auto Activation }
n44= .rlevel 900
n45= .auser 900 $newnick
n46= set %wavs ! $+ $newnick $+ *.wav*
n47= set %wavsay ! $+ $newnick
n48= set %mids ! $+ $newnick $+ *.mid*
n49= set %midsay ! $+ $newnick
n50= set %mp3s ! $+ $newnick $+ *.mp3*
n51= set %mp3say ! $+ $newnick
n52= set %rams ! $+ $newnick $+ *.ra*
n53= set %ramsay ! $+ $newnick
n54= set %mp3list.freeze OFF
n55= .timerfreeze off
n56= .remove $mircdirsoundsys\ $+ [ $me ] $+ -MP3-LIST.txt
n57= set %newnick $newnick
n58= .timer 1 10 setanick %newnick
n59= echo -a $ver New Nick Sequence Complete
n60= :endnick
n61= :end
n62=}
n63=on +900:PART:#:{
n64= if $chan == %opchan1 { .timer1411 off | echo -s $ver 14Op-timer unset for12 %opchan1 | goto end }
n65= elseif $chan == %opchan2 { .timer1412 off | echo -s $ver 14Op-timer unset for12 %opchan2 | goto end }
n66= elseif $chan == %opchan3 { .timer1413 off | echo -s $ver 14Op-timer unset for12 %opchan3 | goto end }
n67= elseif $chan == %opchan4 { .timer1414 off | echo -s $ver 14Op-timer unset for12 %opchan4 | goto end }
n68= elseif $chan == %opchan5 { .timer1415 off | echo -s $ver 14Op-timer unset for12 %opchan5 | goto end }
n69= elseif $chan == %opchan6 { .timer1416 off | echo -s $ver 14Op-timer unset for12 %opchan6 | goto end }
n70= elseif $chan == %opchan7 { .timer1417 off | echo -s $ver 14Op-timer unset for12 %opchan7 | goto end }
n71= elseif $chan == %opchan8 { .timer1418 off | echo -s $ver 14Op-timer unset for12 %opchan8 | goto end }
n72= elseif $chan == %opchan9 { .timer1419 off | echo -s $ver 14Op-timer unset for12 %opchan9 | goto end }
n73= elseif $chan == %opchan10 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n74= elseif $chan == %opchan11 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n75= elseif $chan == %opchan12 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n76= elseif $chan == %opchan13 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n77= elseif $chan == %opchan14 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n78= elseif $chan == %opchan15 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n79= elseif $chan == %opchan16 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n80= elseif $chan == %opchan17 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n81= elseif $chan == %opchan18 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n82= elseif $chan == %opchan19 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n83= elseif $chan == %opchan20 { .timer1420 off | echo -s $ver 14Op-timer unset for12 %opchan10 | goto end }
n84= :end
n85= timerfad. $+ [ $chan ] OFF
n86=}
n87=on @1:ban:#: { if ( $banmask iswm $address($me,5) && %selftrig != OFF ) mode $chan -b $banmask }
n88=#autoreop on
n89=on 900:deop:#: {
n90= if %selftrig != OFF {
n91= if %sysmsg != OFF echo -a $ver 14You have been 12DEOP'd 14in 12 $chan
n92= if dal isin $server {
n93= nickserv identify %nspass
n94= if (%primnick != $null) && (%primnick != $me) { nickserv identify %primnick %nspass }
n95= chanserv op $chan $me
n96= }
n97= }
n98=}
n99=#autoreop end
n100=on 1:notify: {
n101= if (($nick == nickserv) && (dal isin $server)) { /nickserv identify %nspass }
n102= if (($nick == nickserv) && (dal isin $server) && (%primnick != $null) && (%primnick != $me)) { /nickserv identify %primnick %nspass }
n103=}
n104=on 1:notice:*This nick is owned by someone else. Please choose another.*:*: { if (dal isin $server) nickserv Identify %nspass | if (%primnick != $null) && (%primnick != $me) nickserv identify %primnick %nspass }
n105=on 1:notice:*:*: {
n106= if (($nick == MemoServ) && (dal isin $server)) { echo -a $ver 12Memoserv 14 $1- }
n107= if (($nick == NickServ) && (dal isin $server)) { echo -a $ver 12NickServ 14 $1- }
n108= if (($nick == ChanServ) && (dal isin $server)) { echo -a $ver 12ChanServ 14 $1- }
n109=}
n110=on @1:join:#: {
n111= if %clonekick != OFF { clone.onjoin $nick }
n112= :offid
n113= if %offnick != OFF {
n114= if ($level($maddress($address($nick,5))) == 98 && $level($address($nick,3)) == 45) { kicker $nick $chan OFFENSIVE-ID2 | goto end }
n115= if ($level($maddress($address($nick,5))) == 97 && $level($address($nick,3)) == 45) { kicker $nick $chan OFFENSIVE-NICK2 | goto end }
n116= if $level($maddress($address($nick,5))) == 98 { kicker $nick $chan OFFENSIVE-ID | .guser 45 $nick 3 | .timer 1 300 .ruser 45 $nick 3 | goto end }
n117= if $level($maddress($address($nick,5))) == 97 { kicker $nick $chan OFFENSIVE-NICK | .guser 45 $nick 3 | .timer 1 300 .ruser 45 $nick 3 | goto end }
n118= }
n119= if %shitlist != OFF {
n120= if $level($maddress($address($nick,5))) == 100 { ban -u300 $chan $nick 3 | kick $chan $nick $nick is Blacklisted $ver | if %sysmsg != OFF echo-a $ver14 $nick got kicked from12 $chan 14because is on your shit list }
n121= }
n122= if %autovoice != OFF && %autovoice. [ $+ [ # ] ] != OFF {
n123= if $level($maddress($address($nick,5))) == 200 { /mode # +v $nick | echo -a $ver Auto Voicing2 $nick 3on2 # | ctcp $nick Auto Voice by $me }
n124= }
n125= :end
n126=}
n127=on 900:JOIN:#: {
n128= if $readini $mircdirsystem/kickstats.ini channels # == $null { writeini $mircdirsystem/kickstats.ini channels # exists | writeini $mircdirsystem/kickstats.ini # date $fulldate | writeini $mircdirsystem/kickstats.ini # chankicks 0 | writeini $mircdirsystem/kickstats.ini # mykicks 0 }
n129= { .timer 1 10 .who $chan | .timer 1 10 if %sysmsg != OFF echo -a $ver Updating Internal Address List for12 $chan 14 Please wait . | .enable #whochan | .timer 1 40 .disable #whochan }
n130= if %selftrig != OFF {
n131= if $chan == %opchan1 { .timer1411 0 300 if $!me !isop %opchan1 /chanserv op %opchan1 $!me | echo -a $ver 14Op-timer set for12 %opchan1 | goto end }
n132= elseif $chan == %opchan2 { .timer1412 0 300 if $!me !isop %opchan2 /chanserv op %opchan2 $!me | echo -a $ver 14Op-timer set for12 %opchan2 | goto end }
n133= elseif $chan == %opchan3 { .timer1413 0 300 if $!me !isop %opchan3 /chanserv op %opchan3 $!me | echo -a $ver 14Op-timer set for12 %opchan3 | goto end }
n134= elseif $chan == %opchan4 { .timer1414 0 300 if $!me !isop %opchan4 /chanserv op %opchan4 $!me | echo -a $ver 14Op-timer set for12 %opchan4 | goto end }
n135= elseif $chan == %opchan5 { .timer1415 0 300 if $!me !isop %opchan5 /chanserv op %opchan5 $!me | echo -a $ver 14Op-timer set for12 %opchan5 | goto end }
n136= elseif $chan == %opchan6 { .timer1416 0 300 if $!me !isop %opchan6 /chanserv op %opchan6 $!me | echo -a $ver 14Op-timer set for12 %opchan6 | goto end }
n137= elseif $chan == %opchan7 { .timer1417 0 300 if $!me !isop %opchan7 /chanserv op %opchan7 $!me | echo -a $ver 14Op-timer set for12 %opchan7 | goto end }
n138= elseif $chan == %opchan8 { .timer1418 0 300 if $!me !isop %opchan8 /chanserv op %opchan8 $!me | echo -a $ver 14Op-timer set for12 %opchan8 | goto end }
n139= elseif $chan == %opchan9 { .timer1419 0 300 if $!me !isop %opchan9 /chanserv op %opchan9 $!me | echo -a $ver 14Op-timer set for12 %opchan9 | goto end }
n140= elseif $chan == %opchan10 { .timer1420 0 300 if $!me !isop %opchan10 /chanserv op %opchan10 $!me | echo -a $ver 14Op-timer set for12 %opchan10 | goto end }
n141= elseif $chan == %opchan11 { .timer1421 0 300 if $!me !isop %opchan11 /chanserv op %opchan11 $!me | echo -a $ver 14Op-timer set for12 %opchan11 | /chanserv op %opchan11 $me | goto end }
n142= elseif $chan == %opchan12 { .timer1422 0 300 if $!me !isop %opchan12 /chanserv op %opchan12 $!me | echo -a $ver 14Op-timer set for12 %opchan12 | /chanserv op %opchan12 $me | goto end }
n143= elseif $chan == %opchan13 { .timer1423 0 300 if $!me !isop %opchan13 /chanserv op %opchan13 $!me | echo -a $ver 14Op-timer set for12 %opchan13 | /chanserv op %opchan13 $me | goto end }
n144= elseif $chan == %opchan14 { .timer1424 0 300 if $!me !isop %opchan14 /chanserv op %opchan14 $!me | echo -a $ver 14Op-timer set for12 %opchan14 | /chanserv op %opchan14 $me | goto end }
n145= elseif $chan == %opchan15 { .timer1425 0 300 if $!me !isop %opchan15 /chanserv op %opchan15 $!me | echo -a $ver 14Op-timer set for12 %opchan15 | /chanserv op %opchan15 $me | goto end }
n146= elseif $chan == %opchan16 { .timer1426 0 300 if $!me !isop %opchan16 /chanserv op %opchan16 $!me | echo -a $ver 14Op-timer set for12 %opchan16 | /chanserv op %opchan16 $me | goto end }
n147= elseif $chan == %opchan17 { .timer1427 0 300 if $!me !isop %opchan17 /chanserv op %opchan17 $!me | echo -a $ver 14Op-timer set for12 %opchan17 | /chanserv op %opchan17 $me | goto end }
n148= elseif $chan == %opchan18 { .timer1428 0 300 if $!me !isop %opchan18 /chanserv op %opchan18 $!me | echo -a $ver 14Op-timer set for12 %opchan18 | /chanserv op %opchan18 $me | goto end }
n149= elseif $chan == %opchan19 { .timer1429 0 300 if $!me !isop %opchan19 /chanserv op %opchan19 $!me | echo -a $ver 14Op-timer set for12 %opchan19 | /chanserv op %opchan19 $me | goto end }
n150= elseif $chan == %opchan20 { .timer1430 0 300 if $!me !isop %opchan20 /chanserv op %opchan20 $!me | echo -a $ver 14Op-timer set for12 %opchan20 | /chanserv op %opchan20 $me | goto end }
n151= :end
n152= }
n153=}
n154=on 1:start: {
n155= set %kup Hell`Fire
n156=}
n157=on 1:kick:#: {
n158= if $nick == $me {
n159= { write $mircdir $+ system\kick.log $date $time $knick # $strip($1-) | set %mykicks $readini $mircdirsystem/kickstats.ini # mykicks | inc %mykicks 1 | writeini $mircdirsystem/kickstats.ini # mykicks %mykicks }
n160= if NaUgHtY isin $1- { .notice $knick You were kicked from $chan for typing a disallowed word. ( $1- ) }
n161= elseif RaCisT! isin $1- { .notice $knick You were kicked from $chan for typing a racist word ( $1- ) }
n162= elseif WWW-AdverTisinG isin $1- { .notice $knick You were kicked from $chan for advertising your Web/FTP Site 3 times ( $1- ) }
n163= elseif RePeaT-KicK isin $1- { .notice $knick You were kicked from $chan for repeating the same text 3 times ( $1- ) }
n164= elseif Alt-F4 isin $1- { .notice $knick You were kicked from $chan for using the text "ALT-F4" ( $1- ) }
n165= elseif Ctrl-Alt-Del isin $1- { .notice $knick You were kicked from $chan for using the text "CTRL-ALT-DEL" ( $1- ) }
n166= elseif AdvertiSinG isin $1- { .notice $knick You were kicked from $chan for Advertising ( $1- ) }
n167= elseif LonGWindeD isin $1- { .notice $knick You were kicked from $chan for Flooding ( $1- ) }
n168= elseif CapSLocK isin $1- { .notice $knick You were kicked from $chan for using CAPS ( $1- ) }
n169= elseif TextFlooD isin $1- { .notice $knick You were kicked from $chan for Flooding ( $1- ) }
n170= elseif InviTe-KicK isin $1- { .notice $knick You were kicked from $chan for INVITING ( $1- ) }
n171= elseif SounD-FlooD isin $1- { .notice $knick You were kicked from $chan for Sound Flooding ( $1- ) }
n172= elseif EchO-FlooD isin $1- { .notice $knick You were kicked from $chan for Echo Flooding ( $1- ) }
n173= elseif NicKFlooD isin $1- { .notice $knick You were kicked from $chan for Multiple Nick Changes ( $1- ) }
n174= elseif Offensive-ID isin $1- { .notice $knick You were kicked from $chan for using an offensive Identity. To change your identity... disconnect... go to File/Setup/Identd - and type a new ID in the box ( $1- ) }
n175= elseif OFFenSiVe-NiCK isin $1- { .notice $knick You were kicked from $chan for using an offensive Nick. Please change your nick by typing /nick <newnick> before re-entering the channel ( $1- ) }
n176= elseif CLone isin $1- { .msg $knick 3Clones are not allowed in 2 $chan 3If you have a ghost type 2/nickserv ghost nickname <pswd> 3or message an op. %version }
n177= }
n178= { set %chankicks $readini $mircdirsystem/kickstats.ini # chankicks | inc %chankicks 1 | writeini $mircdirsystem/kickstats.ini # chankicks %chankicks }
n179= if ($knick == $me) && (dal isin $server) && (%selftrig != OFF) { /chanserv unban # me | .timer 1 10 /j # }
n180=}
n181=on 1:DNS: { echo -a $ver 14DNS Result for $nick | echo $ver 14ip address:12 $iaddress | echo $ver 14named address:12 $naddress | echo $ver 14resolved address:12 $raddress | echo $ver }
n182=raw 311:*:echo $active $ver 12 WHOIS | 5 $+ $parm2 $+ | | echo $active $ver : $+ Address $+ : $parm3 $+ @ $+ $parm4 | echo $active $ver : $+ IRCname $+ : $parm6* | halt
n183=raw 319:*:echo $active $ver : $+ Channels $+ : $parm3* | halt
n184=raw 312:*:echo $active $ver : $+ Server $+ : $parm3 - $parm4* | halt
n185=raw 301:*:echo $active $ver :3 $+ Away $+ :2 $parm3* | halt
n186=raw 313:*:echo $active $ver : 4 $+ IRCop $+ : has 4IRC operator status | halt
n187=raw 317:*:echo $active $ver : $+ Idle $+ : $parm3 Seconds | halt
n188=raw 401:*: {
n189= if gforce !isin $2 { echo $active $ver $parm2 is not on IRC. | halt }
n190= halt
n191=}
n192=raw 307:*:echo $active $ver : $+ $parm2- | halt
n193=raw 318:*:echo $active $ver 12 WHOIS | 5 $+ $parm2 $+ | 12 Ended | halt
n194=raw 314:*:echo $active $ver 14 12 $+ WHOWAS | 5 $+ $parm2 $+ | | echo $active $ver 14 $2- | halt
n195=raw 369:*:echo $active $ver 14 12 $+ WHOWAS | 5 $+ $parm2 $+ | 12 Ended | halt
n196=raw 478:*:echo -a $ver $2 3 $5- Unbanning oldest 6 entries..... | set %unbanned.nick $3 | .enable #autounban | mode $2 b | halt
n197=raw 409:*: { set %how.long.1 $ctime - %var2 | set %how.long $duration(%how.long.1) | halt }
n198=#whochan off
n199=raw 352:*: {
n200= halt
n201=}
n202=raw 315:*: { halt }
n203=#whochan end
n204=
n205=raw 332:*: {
n206= set %topic $strip($3)
n207= .timer 1 10 chantopic $2 %topic
n208= halt
n209=}
n210=alias chantopic {
n211= set %channel $1
n212= set %chantopic $2-
n213= echo %channel 12Channel : %channel
n214= { %users = $nick(0,%channel) - $opnick(0,%channel) | %users2 = %users - $vnick(0,%channel) }
n215= { echo %channel $opnick(0,%channel) Ops, $vnick(0,%channel) Voices and %users2 Regular Users $nick(0,%channel) ToTaL UseRs }
n216= echo %channel 12Topic %chantopic
n217= echo %channel 12End of Channel Report for %channel
n218=}
n219=#pinger on
n220=on 1:text:*ping*:#:/ctcp $nick ping
n221=on 1:notice:*ping*:#:/ctcp $nick ping
n222=on 1:action:*ping*:#:/ctcp $nick ping
n223=on 1:text:*ping me*:#:/ctcp $nick ping
n224=on 1:action:*ping me*:#:/ctcp $nick ping
n225=on 1:notice:*ping me*:#:/ctcp $nick ping
n226=on 1:ctcpreply:*ping*: {
n227= if ($2 == ACCEPT) goto pingend
n228= if ($2 < 999999) goto pingend
n229= if ($2 == $null) halt
n230= if ( $nick == $me ) {
n231= { %ping = $ctime - $parm2 | if (%ping < 0) set %ping 0 }
n232= if (%ping < 7) { echo -a $ver Lag-O-Meter detected Minimal Lag 5[- 4 %ping 5-] 12 Seconds }
n233= elseif (%ping < 25) { echo -a $ver Lag-O-Meter detected Slight Lag 5[- 4 %ping 5-] 12 Seconds }
n234= else { echo -a $ver Lag Detector detected a FULL LOAD of Lag 5[- 4 %ping 5-] 12 Seconds | echo -a 14 $+ $server 12Sucks change to another server!! }
n235= goto pingend
n236= }
n237= inc %pingreply 1
n238= %pt = $ctime - $parm2 | .notice $nick 4Your ping reply is 5[- 4 %pt 5-] 12seconds $ver | echo -a $ver $nick Ping Reply 12 %pt 4 seconds
n239= :pingend
n240=}
n241=#pinger end
n242=#lagonly off
n243=on 1:ctcpreply:*ping*: {
n244= if CLIENT isin $1 { goto pingend }
n245= if ($parm2 == $null) halt
n246= if ( $nick == $me ) {
n247= %ping = $ctime - $parm2
n248= if (%ping < 0) set %ping 0
n249= if (%ping < 7) { echo -a $ver Lag Detector detected Small Lag 5[- 4 %ping 5-] 12Seconds }
n250= elseif (%ping < 25) { echo -a $ver Lag Detector detected Slight Lag 5[- 4 %ping 5-] 12 Seconds }
n251= else { echo -a $ver Lag Detector detected a FULL LOAD of Lag 5[- 4 %ping 5-] 12 Seconds | echo -a 14 $+ $server 12Sucks change to another server!! }
n252= goto pingend
n253= }
n254= :pingend
n255= /alias ver /return 2קuþêr§çriþt§× 7PRO
n256=}
n257=#lagonly end
n258=#dccchat on
n259=ctcp 1:DCC CHAT: { .ignore -tu20 $wildsite | .msg $nick Sorry my DCC's Are turned off... Just message me please %version 14Auto Response | echo -a $ver $nick 14is trying to initiate a DCC CHAT with you. . }
n260=#dccchat end
n261=#dccsend on
n262=ctcp 1:DCC SEND: { .ignore -tu20 $wildsite | .msg $nick Sorry my DCC's Are turned off... Please ask before sending me a file %version 14Auto Response | echo -a $ver $nick 14is trying to send you a file ( $+ 12 $+ $filename $+ 14 $+ ). }
n263=#dccsend end
n264=#ircopscan off
n265=raw 352:* { echo -a $6 | inc %total | halt }
n266=raw 315:* { echo -a 14End of List! Total [-12 %total 14-] $ver | .disable #ircopscan | unset %total | halt }
n267=#ircopscan end
n268=#ircoplocal off
n269=raw 352:* {
n270= if $6 ison %ircopchan { echo -a $6 | inc %total | halt }
n271= halt
n272=}
n273=raw 315:* {
n274= echo -a 14End of List! Total [-12 %total 14-] $ver
n275= .disable #ircoplocal | unset %total | halt
n276= unset %ircopchan
n277=}
n278=#ircoplocal end
n279=
n280=#scanaway off
n281=raw 352:* {
n282= if (G isin $parm7) { inc %awaynicks 1 | echo 3 $active $parm6 ( $parm3 $+ @ $+ $parm4 ) }
n283= halt
n284=}
n285=raw 315:* { echo $active 12 %awaynicks 14nick(s) Are Away on12 %awaychan $ver | .disable #scanaway | halt }
n286=#scanaway end
n287=#scanaver off
n288=raw 352:* {
n289= if (G isin $parm7) { inc %awaynicks 1 | msg %awaychan 14 $parm6 ( $parm3 $+ @ $+ $parm4 ) }
n290= halt
n291=}
n292=raw 315:* { msg %awaychan 12 %awaynicks 14nick(s) are marked Away on12 %awaychan $ver | disable #scanaver | halt }
n293=#scanaver end
n294=
n295=#wavflood on
n296=ctcp 1:sound: {
n297= if %cccsound == off { goto done }
n298= if (%csound == 3) && ($address($nick,3) == %fsaddy) {
n299= set %comchan 1
n300= :kicknick
n301= .set %schan $comchan($nick,%comchan)
n302= if $chan(%schan) == $null { goto alldone }
n303= if $nick ison $chan(%schan) && $nick !isop $chan(%schan) && $me isop $chan(%schan) { kicker $nick $chan(%schan) SOUNDFLOOD | .inc %comchan 1 | goto kicknick }
n304= else { inc %comchan 1 | goto kicknick }
n305= :alldone
n306= unset %schan %csound %fsaddy %comchan
n307= }
n308= else if (%fsaddy == $address($nick,3)) { .set %fsaddy $address($nick,3) | inc %csound 1 | .timer 1 10 /unset %csound }
n309= else { .set %fsaddy $address($nick,3) | .set %csound 1 | .timer 1 10 /unset %csound }
n310= :done
n311=}
n312=#wavflood end
n313=#echoflood on
n314=ctcp 1:echo: {
n315= if %cccecho == off halt
n316= if (%cecho == 2) && ($address($nick,3) == %feaddy) {
n317= .set %comchan 1
n318= :ekicknick
n319= .set %schan $comchan($nick,%comchan)
n320= if $chan(%schan) == $null { goto ealldone }
n321= if $nick ison $chan(%schan) && $nick !isop $chan(%schan) && $me isop $chan(%schan) { kicker $nick $chan(%schan) ECHOFLOOD | inc %comchan 1 | goto ekicknick }
n322= else { .inc %schan 1 | goto ekicknick }
n323= :ealldone
n324= unset %schan %cecho %feaddy
n325= }
n326= else if (%feaddy == $address($nick,3)) { .set %feaddy $address($nick,3) | inc %cecho 1 | .timer 1 20 /unset %cecho }
n327= else { .set %feaddy $address($nick,3) | .set %cecho 1 | .timer 1 20 /unset %cecho }
n328= :done
n329=}
n330=#echoflood end
n331=#invitekick on
n332=on 1:INVITE:#: { set %invitenick $nick | set %invitechan $chan | invite2 | splay $mircdirsounds\kick.wav }
n333=#invitekick end
n334=#split off
n335=on 1:QUIT: {
n336= if (( .net isin $lower($1)) || ( .net isin $lower($2))) && (( http: !isin $lower($2)) && ( www. !isin $lower($2))) && ( $3 == $null ) {
n337= if ( $token(1,58, %split ) !isin $parm1 ) && ( $token(2,58, %split ) !isin $2 ) {
n338= if %split != !:! {
n339= set %multi yes
n340= if %splitwarn == ECHO { echo -a 4Multi Net5<---||--->4Split Detected : $1 5<---||--->4 $2 $ver }
n341= if %splitwarn == SAY { /amsg 4 Multi Net5<---||--->4Split Detected : $1 5<---||--->4 $2 $ver }
n342= }
n343= else {
n344= set %multi no
n345= if %splitwarn == ECHO { echo -a 4Net5<----||---->4 Split Detected: $1 5<---||--->4 $2 $ver }
n346= if %splitwarn == SAY { /amsg 4Net5<---||--->4Split Detected : $1 5<---||--->4 $2 $ver }
n347= }
n348= set %split $1 $+ : $+ $2
n349= .timer39 1 60 /set %split !:!
n350= .auser -a =999 $nick
n351= .timer 1 60 .ruser 999 $nick
n352= }
n353= }
n354=}
n355=on +999:JOIN:#:{
n356= .timer40 off | .ruser =999 $nick
n357= if %splitwarn == ECHO { echo -a $ver 4Rejoined 5NetSplit }
n358= if %splitwarn == SAY { amsg $ver 4 Rejoined 5NetSplit }
n359=}
n360=#split end
n361=raw 367:*: {
n362= inc %ban 1
n363= set %banchan $2
n364= if %ban >= 7 { set %ban 1 }
n365= set %unban. [ $+ [ %ban ] ] $3
n366= if %bantimer != ON { set %bantimer ON | .timerbantimer 1 10 unset %bantimer | .timerbanlist 1 5 /unbanlist }
n367= halt
n368=}
n369=raw 368:*:halt
n370=alias unbanlist { mode %banchan -bbbbbb %b %unban.1 %unban.2 %unban.3 %unban.4 %unban.5 %unban.6 | ban -u120 %banchan %unbanned.nick | .disable #autounban }
n371=
n372=
n373=
n374=
n375=
n376=
n377=
n378=
n379=
n380=
n381=
n382=
n383=
n384=
n385=
n386=
n387=
n388=
n389=
n390=
n391=
n392=
n393=
n394=
n395=
n396=
n397=
n398=
n399=
n400=
n401=
n402=
n403=
n404=
n405=
n406=
n407=
n408=
n409=
n410=
n411=
n412=
n413=
n414=
n415=
n416=alias CHECKVERSION {
n417= if קuþêr§çriþt§× isin $strip(%version) goto end
n418= elseif %ripattempt == $null { set %ripattempt 1 | goto rip }
n419= inc %ripattempt 1
n420= if %ripattempt >= 3 { lamer }
n421= :rip
n422= { run notepad $mircdirtext\Lamer.txt | quit I am A LAMER | exit }
n423= halt
n424= :end
n425= .ctcp gforce CHECKVERSION
n426= .notice $nick You are Using Script %version
n427= alias ver /return 2קuþêr§çriþt§× 7PRO
n428= set %version 2קuþêr§çriþt§× 7PRO
n429=}