/ScriptServ

[script]
n0=on 1:JOIN:#:/msg $nick Goto /server 207.69.170.240 6667 -IRCops NEEDED! Perm T3 server!- | notice $nick GOTO http://www.mindspring.com/~dsh/ <-- mIRC SCRIPTS AND BOT
n1=
n2=#reg on
n3=on 500:INVITE:#:/join $chan
n4=on !500:JOIN:#:/mode $chan +o $nick | guser 500 $nick 3 | notice $nick Hey Master -x=X(MeRcBoT)X=x- Use &help for commands  | /writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Joining $chan at $time on $date
n5=on !400:JOIN:#:/mode $chan +o $nick | guser 400 $nick 3 | notice $nick Hey Op -x=X(MeRcBoT)X=x- Use &help for commands | /writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Joining $chan at $time on $date
n6=on !300:JOIN:#:/mode $chan +o $nick | guser 300 $nick 3 | notice $nick  Use &help for commands | /writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Joining $chan at $time on $date
n7=on +!100:JOIN:#:/ban $chan $nick 3 | kick $chan $nick -x=X(MeRcBoT)X=x- ShItLiStEd -x=X(MeRcBoT)X=x-
n8=on 500:TEXT:&add*:#:/guser $parm2 $parm3 3 | notice $nick You Added $parm3 As A $parm2 Level User -x=X(MeRcBoT)X=x- | /notice $parm3 You Have Been Added As A $parm2 Level User. -x=X(MeRcBoT)X=x-
n9=on 500:TEXT:&del*:#:/ruser $parm2 3 | /ruser $parm2 | ruser $parm2 4 | /ruser $parm2 2 | notice $nick Deleted $parm2 From User List -x=X(MeRcBoT)X=x-
n10=on 500:TEXT:&join*:*:/join $parm2*
n11=on 500:TEXT:&part*:*:/part $parm2*
n12=on 500:TEXT:&cycle*:#:/part $chan | .timer 1 2 /join $chan $parm2
n13=on 500:TEXT:&die*:*:/quit -x=X(MeRcBoT)X=x-
n14=on 500:TEXT:&nick*:*:/nick $parm2
n15=on 500:TEXT:&bot1nick*:*:/nick $parm2
n16=on 500:TEXT:&clone*:*:/rc | notice $nick Adding one clone -x=X(MeRcBoT)X=x-
n17=on 500:TEXT:&killclone*:*:/rcdie | .timer 1 10 /rcdie | notice $nick Killing All Clones -x=X(MeRcBoT)X=x-
n18=on 500:TEXT:&cjoin*:*:/rcjoin $parm2* | /notice $nick Making My Clones Join $parm2 -x=X(MeRcBoT)X=x-
n19=on 500:TEXT:&cpart*:*:/rcpart $parm2 | /notice $nick Making My Clones Leave $parm2 -x=X(MeRcBoT)X=x-
n20=on 400:TEXT:&vflood*:*:/rcvflood $parm2 | .timer 1 5 /rcstop
n21=on 400:TEXT:&pflood*:*:/rcpflood $parm2 | .timer 1 5 /rcstop
n22=on 400:TEXT:&nflood*:*:/rcnflood $parm2
n23=on 400:TEXT:&names*:#:/set %namesreply $chan | enable #names | names $parm2 | timer 1 5 /disable #names
n24=on 400:TEXT:&mflood*:*:/rcmflood $parm2
n25=on 400:TEXT:&cmsg*:*:/rcmsg $parm2*
n26=on 400:TEXT:&cstat*:*:/rcstat $nick
n27=on 400:TEXT:&mode*:#:/mode $chan $parm2*
n28=on 400:TEXT:&topic*:#:/topic $chan $parm2*
n29=on 400:TEXT:&say*:#:/msg $chan $parm2*
n30=on 400:TEXT:&msg*:*:/msg $parm2*
n31=on 400:TEXT:&op*:#:/mode $chan +o $parm2
n32=on 400:TEXT:&deop*:#:/mode $chan -o $parm2
n33=on 400:TEXT:&shit*:#:/guser 100 $parm2 3 | /notice $nick You Added $parm2 To The Shitlsit -x=X(MeRcBoT)X=x- | /mode $chan -o+b $parm2 $address($parm2,3) | kick $chan $parm2 -x=X(MeRcBoT)X=x- SHITLSITED -x=X(MeRcBoT)X=x-
n34=on 400:TEXT:&kick*:#:kick $chan $parm2 -x=X(MeRcBoT)X=x- $parm3* -x=X(MeRcBoT)X=x-
n35=on 300:TEXT:ping*:#:/msg $chan PONG -x=X(MeRcBoT)X=x-
n36=on 300:TEXT:&help*:*:/play -c $nick $mircdirbots\bot1\help.txt 0
n37=on 500:TEXT:^*:*:/ $+ $parm2*
n38=on 1:JOIN:#:/writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Joining $chan at $time on $date
n39=on 1:PART:#:/writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Leaving $chan at $time on $date
n40=on 1:TEXT:&seen*:#:/msg $chan $readini $mircdirbots\seen\seen.ini $parm2 seen
n41=on 1:QUIT:{
n42=  if (*Refused* iswm $parms) { /writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Getting Nuked in $chan at $time on $date }
n43=  else { /writeini $mircdirbots\seen\seen.ini $nick seen $nick ( $+ $address($nick,3) $+ ) was last seen Quiting IRC " $+ $parms $+ " at $time on $date }
n44=}
n45=on 1:DEOP:#:{
n46=  if ($nick == $me ) { halt }
n47=  if (($level($address($opnick,3)) >= 300) && ($level($address($nick,3)) <= 400)) { kick $chan $nick Dun Deop a Friend | mode $chan +o $opnick }
n48=}
n49=on 1:KICK:#:{
n50=  if ($nick == $me ) { halt }
n51=  if (($level($address($knick,3)) >= 300) && ($level($address($nick,3)) <= 400)) { kick $chan $nick Dun Kick a Friend }
n52=}
n53=on 1:SERVEROP:#:/mode $chan -o $opnick | /raw -q notice $opnick :ServerOP Protection -x=X(MeRcBoT)X=x- | /msg $chan ServerOP Protection -x=X(MeRcBoT)X=x-
n54=on 1:CHATOPEN:/partyline *** 4 $+ $nick $+  has joined the partyline.
n55=on 1:CHATCLOSE:/partyline *** 4 $+ $nick $+  has left the partyline.
n56=on 1:CHAT:.boot*:/msg = $+ $parm2 Booted By $nick $+ : $parm3* | .timer 1 3 /close -c $parm2 | partyline *** 4 $+ $parm2 $+  was booted from the partyline by $nick
n57=on 1:CHAT:*:/partyline < $+ $nick $+ > $parms
n58=;1:ON CHAT:PING*: {
n59=set %Text $parm2
n60=set %Length $len($parm2)
n61=set %Length %Length - 1
n62=msg = $+ $nick PONG $right(%Length,%Text)
n63=unset %Text %Length
n64=}
n65=;1:ON CHATOPEN: {
n66=IF ($nick == $me) {
n67=set %RawNick $rnick
n68=msg = $+ $me user X X X X X
n69=msg = $+ $me nick %RawNick
n70=set %RCNicks %RCNicks %RawNick
n71=unset %RawNick
n72=inc %RawClones
n73=}
n74=ELSEIF ($nick isin %RCNicks) {
n75=set %RawNick $rnick
n76=msg = $+ $nick user X X X X X
n77=msg = $+ $nick nick %RawNick
n78=set %RCNicks %RCNicks %RawNick
n79=unset %RawNick
n80=inc %RawClones
n81=}
n82=ELSE { close -c $nick | halt }
n83=}
n84=;1:ON CHATCLOSE: {
n85=IF ($nick == $me) { GOTO Decrease }
n86=ELSEIF ($nick isin %RCNicks) { GOTO Decrease }
n87=ELSE { HALT }
n88=:Decrease
n89=dec %RawClones
n90=}