/ScriptServ

[Aliases]
n0=sidle if ($me ison %antiidle) { msg %antiidle  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ -=((-ÕZZßÖT-))=- } | else { join %antiidle | mode %antiidle +iktns $r(a,z) $+ $r(1,0) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z)  | topic %antiidle ((-ÕzZßÖT-)) Anti-Idle Channel | recho 5 I have joined my anti-idle channel  $+ %antiidle $+  }
n1=idle .set %antiidle #ÕzZßÖT $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) | /join %antiidle | mode %antiidle +iktns $r(a,z) $+ $r(1,0) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z)  | topic %antiidle ((-ÕzZßÖT-)) Anti-Idle Channel | .timer 0 %itim sidle
n2=scan %mchan = "" | %tchan = "" | %enemnick = "" | %ppl = 0 | %nonvoice = 0 | %fops = 0 | %nops = 0 | %appl = 0 | %vppl = 0 | %found = 0 | %enem = 0 | %clns = 0 | %suspended = 0 | %200 = 0 | %300 = 0 | %400 = 0 | %500 = 0 | %600 = 0 | %dnvote = 0 | %didvote = 0 | unset %200nicks | unset %300nicks | unset %400nicks | unset %500nicks | unset %600nicks | unset %4nicks | set %nclns "" | set %iropn "" | set %awaynick "" | unset %clist | %ppl = $nick(0,%SCN) | %fops = $opnick(0,%SCN) | %nops = $nopnick(0,%SCN) | %mchan = $chan(%SCN).mode | %tchan = $chan(%SCN).topic | who %SCN
n3=report {
n4=  msg = $+ %nnick 7((-ÕzZ-))5 +-- ChanInfo for %SCN --+
n5=  if (%tchan != $null) { msg = $+ %nnick 7((-ÕzZ-))2 Topic:5 %tchan }
n6=  if (%mchan != $null) { msg = $+ %nnick 7((-ÕzZ-))2 Modes:5 %mchan }
n7=  msg = $+ %nnick 7((-ÕzZ-))2 Total Users:5 %ppl [Away %appl $+ / $+ %ppl $+ ] %awaynick
n8=  msg = $+ %nnick 7((-ÕzZ-))2 Ops:5 %fops - %percentops 2 NonOps:5 %nops - %percentnops
n9=  msg = $+ %nnick 7((-ÕzZ-))2 Voices:5 %vppl 2 NonVoices:5 %nonvoice
n10=  if (%600 != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Owner Access:5 %600 - %600nicks }
n11=  if (%500 != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Access 500:5 %500 - %500nicks }
n12=  if (%400 != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Access 400:5 %400 - %400nicks }
n13=  if (%300 != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Access 300:5 %300 - %300nicks }
n14=  if (%200 != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Access 200:5 %200 - %200nicks }
n15=  if (%suspended != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Suspended:5 %suspended - %4nicks }
n16=  if (%enem != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Shitlisted:5 %enem - %enemnick }
n17=  msg = $+ %nnick 7((-ÕzZ-))2 Voted:5 %didvote - %percentvoted 2 Didn't Vote:5 %dnvote - %percentnvoted
n18=  if (%clns != 0) { msg = $+ %nnick 7((-ÕzZ-))2 Clones:5 %clns - %nclns }
n19=  if (%found != 0) { msg = $+ %nnick 7((-ÕzZ-))2 IRCops:5 %found - %iropn }
n20=  unset %per*
n21=}
n22=login msg x@channels.undernet.org login #ozzy spyder | msg x@channels.undernet.org login #baseball spyder
n23=autogreet {
n24=  clonesprot
n25=  if ([ %cla [ $+ [ $nick ] ] ] != $null) { goto end } | else { set %cla $+ $nick 1 | .timer 1 60 unset %cla $+ $nick }
n26=  %agmsg = $read -sautogreet messages.txt
n27=  if (%agmsg == $null) { goto end }
n28=  else {
n29=    n $read -sautogreet messages.txt
n30=    if (%protag == OFF) { goto end }
n31=    inc %join
n32=    if (%join >= %joinnum) { unset %join | .disable #autogreet | recho 5 AutoGreet Protection Enabled!! | .timer 1 %agignore .enable #autogreet } | else { .timer142 1 %jointime unset %join }
n33=  }
n34=  :end
n35=}
n36=botstats d 5+----- ÕzZßÖT's Status ----+ | d 2Nick:4 $me | d 2Address:4 $address($me,1) | d 2Server:4 $server | d 2Port:4 $port | d 2Online:4 $duration($online) | d 2Channels Open:4 $channel(0) - $dde mircbot channels ""
n37=lamenick if ($parm2 == $null) { no Correct Syntax: !lame <nick> } | else { notice $chan 2On a scale from 1 to 10 $parm2* $read $mIRCdirlame.txt }
n38=dopenick if ($parm2 == $null) { no Correct Syntax: !dope <nick> } | else { notice $chan 2On a scale from 1 to 10 $parm2* $read $mIRCdirdope.txt }
n39=tex {
n40=  if ($nick == $dde mirc nickname "") { halt }
n41=  if ((%password == $parm2) && (%login == ON)) { .auser 200 $nick | .guser 200 $nick 3 | recho 5 $nick has logged in!! | n You Have Been Added To Level 200 | i3 }
n42=  elseif ((%password == $parm2) && (%login == ON)) { recho 5 $nick ( $+ $address $+ ) has put in the right password but login is OFF | no Sorry login is OFF | i3 }
n43=  else  { wecho 5 4 $+ $parms $+ 5 2Message received from:6 $nick ( $+ $address $+ ) 3Time sent:10 $time | ignore -pu30 $nick 2 }
n44=}
n45=poll pervp | d 7((-ÕzZ-)) 5Topic: 8,1 %vptopic  | d 7((-ÕzZ-)) 2Voted %choice1 $+ :4 %best 3( $+ %perbest $+ ) | d 7((-ÕzZ-)) 2Voted %choice2 $+ :4 %ok 3( $+ %perok $+ ) | d 7((-ÕzZ-)) 2Voted %choice3 $+ :4 %sucks 3( $+ %persucks $+ ) | d To see who voted for what type !whovoted | unset %per*
n46=poll1 pervp | no 5Topic: 8,1 %vptopic  | no 2Voted %choice1 $+ : %best 3( $+ %perbest $+ ) | no 2Voted %choice2 $+ : %ok 3( $+ %perok $+ ) | no 2Voted %choice3 $+ : %sucks 3( $+ %persucks $+ ) | n To see who voted for what type !whovoted in the channel | unset %per*
n47=ping {
n48=  if ($nick == $dde mirc nickname "") { 
n49=    %bosslag = $ctime - $parm2
n50=    if (%bosslag > 20) { recho 4 *** Excessive Lag Detected Between me and you ( $+ $duration(%bosslag) $+ ) }
n51=    if (%chanping == yes) { wecho 2 Your PING Reply:4 $duration(%bosslag) }
n52=    unset %chanping | settitle | halt
n53=  }
n54=  elseif ($nick == $me) { 
n55=    %mylag = $ctime - $parm2
n56=    if (%mylag > 20) { recho 4 *** Excessive Lag Detected ( $+ $duration(%mylag) @ $server -/- $port $+ ) }
n57=    settitle | halt
n58=  }
n59=  else {
n60=    %pt = $ctime - $parm2
n61=    n 7((-ÕzZ-)) 2Your PING Reply:4 $duration(%pt)
n62=  }
n63=  halt
n64=}
n65=begforops {
n66=  if (%opsbeg == ON) {
n67=    inc %begjoin | if (%begjoin == 1) { %begchan1 = $chan | .timer105 0 %bg opsbeg1 }
n68=    elseif (%begjoin == 2) { %begchan2 = $chan | .timer106 0 %bg opsbeg2 }
n69=    else { unset %begjoin | %begchan3 = $chan | .timer107 0 %bg opsbeg3 }
n70=  }
n71=}
n72=opsbeg1 if ($me !isop %begchan1) { msg %begchan1 2I am a channel bot, 4Please Op Me!! }
n73=opsbeg2 if ($me !isop %begchan2) { msg %begchan2 2I am a channel bot, 4Please Op Me!! }
n74=opsbeg3 if ($me !isop %begchan3) { msg %begchan3 2I am a channel bot, 4Please Op Me!! }
n75=begpart if ($chan == %begchan1) { unset %begchan1 | .timer105 off } | elseif ($chan == %begchan2) { unset %begchan2 | .timer106 off } | elseif ($chan == %begchan3) { unset %begchan3 | .timer107 off }
n76=vp {
n77=  %v.1 = $readini voted.ini nick $nick
n78=  %v.2 = $readini voted.ini site $site
n79=  %v.3 = $readini voted.ini userhost $address($nick,3)
n80=  if ((%v.1 != $null) || (%v.2 != $null) || (%v.3 != $null)) { no Sorry you already voted!! }
n81=  else {
n82=    inc %totalvoted | inc %countvp
n83=    if ($parm1 == %choice3) { inc %sucks | %nickvworst = %nickvworst $nick }
n84=    elseif ($parm1 == %choice2) { inc %ok | %nickvalright = %nickvalright $nick }
n85=    else { inc %best | %nickvbest = %nickvbest $nick }
n86=    if ($nick == $dde mirc nickname "") { poll } | else { poll1 }
n87=    .writeini voted.ini nick $nick 1 | .writeini voted.ini site $site 1 | .writeini voted.ini userhost $address($nick,3) 1
n88=  }
n89=}
n90=begtime recho 5 Time between asking for ops set for %bg seconds!! This will take effect the next time I join a channel. | cm
n91=accessdcc {
n92=  if ($level($mask(%accessmask,3)) == =4) { msg %waccess 2Nick:10 %getaccessnick | msg %waccess 2Mask:10 $mask(%accessmask,3) | msg %waccess 2Level:10 Access is Suspened | halt }
n93=  elseif (($level($mask(%accessmask,3)) >= 200) && ($level($mask(%accessmask,3)) <= 600)) { msg %waccess 2Nick:10 %getaccessnick | msg %waccess 2Mask:10 $mask(%accessmask,3) }
n94=  else { msg %waccess 10 %getaccessnick does not have any access | i3 | halt }
n95=  if (%getaccessnick == $dde mirc nickname "") { msg %waccess 2Level:10 $level($mask(%accessmask,3)) (Owner of me) | halt }
n96=  if (($level($mask(%accessmask,3)) >= 200) && ($level($mask(%accessmask,3)) <= 600)) { msg %waccess 2Level:10 $level($mask(%accessmask,3)) }
n97=  halt
n98=}
n99=whovoted %v.1 = $readini voted.ini nick $nick | %v.2 = $readini voted.ini site $site | %v.3 = $readini voted.ini userhost $address($nick,3) | if ((%v.1 != $null) && (%v.2 != $null) && (%v.3 != $null)) { pervp | n 7((-ÕzZ-)) 5Topic: 8,1 %vptopic  | n 7((-ÕzZ-))2 Voted %choice1 $+ 10( $+ %best - %perbest $+ )2 $+ :4 %nickvbest | n 7((-ÕzZ-))2 Voted %choice2 $+ 10( $+ %ok - %perok $+ )2 $+ :4 %nickvalright | n 7((-ÕzZ-))2 Voted %choice3 $+ 10( $+ %sucks - %persucks $+ )2 $+ :4 %nickvworst } | else { no You must vote on the topic first before you can see who voted for what! } | unset %per*
n100=toggles do 5Misc Stats | do 2NoOp:4 %noop | do 2Login:4 %login | do 2Seen:4 %sseen | do 2Ask For Ops:4 %opsbeg | do 2Channel for Counter:4 %chancounter | do 2Hours Channel:4 %hourschannel | do 2Password for Login:4 %password | do 2Voting Poll Topic:4 %vptopic | do 2Voting Poll Categories:4 %choice1 14 %choice2 14 %choice3 | do 2Report Info:4 %rinfo
n101=textflood {
n102=  if ((%prottext == ON) && ($me isop $chan)) {
n103=    if (($level($address($nick,3)) >= 300) && ($level($address($nick,3)) <= 600)) { goto end }
n104=    if ($nick !ison $chan) { goto end }
n105=    inc %TE $+ $nick
n106=    if ([ %TE [ $+ [ $nick ] ] ] == 1) { .timer -o 1 %ttime unset %TE $+ $nick }
n107=    elseif ([ %TE [ $+ [ $nick ] ] ] >= %tnum) { ban -u15 $chan $nick 2 | raw -q kick $chan $nick : Text Flood Detected  AutoKICK after  $+ %tnum $+  consecutive public lines in the period of  $+ %ttime $+  seconds. [15 sec ban] ((-ÕzZßÖT-) | unset %TE $+ $nick | set %cla $+ $nick 1 | .timer 1 60 unset %cla $+ $nick }
n108=    :end
n109=  }
n110=}
n111=actionflood {
n112=  if ((%protaction == ON) && ($me isop $chan)) {
n113=    if (($level($address($nick,3)) >= 300) && ($level($address($nick,3)) <= 600)) { goto end }
n114=    if ($nick !ison $chan) { goto end }
n115=    inc %ACT $+ $nick
n116=    if ([ %ACT [ $+ [ $nick ] ] ] == 1) { .timer 1 %atime unset %ACT $+ $nick }
n117=    elseif ([ %ACT [ $+ [ $nick ] ] ] >= %anum) { ban -u15 $chan $nick 2 | raw -q kick $chan $nick : Action Flood Detected  AutoKICK after  $+ %anum $+  consecutive public lines in the period of  $+ %atime $+  seconds. [15 sec ban] ((-ÕzZßÖT-) | unset %ACT $+ $nick | set %cla $+ $nick 1 | .timer 1 60 unset %cla $+ $nick }
n118=    :end
n119=  }
n120=}
n121=massdeopprot {
n122=  if ((%protmd == ON) && ($me isop $chan)) {
n123=    if (($level($address($nick,3)) >= 400) && ($level($address($nick,3)) <= 600)) { goto end }
n124=    if ($nick !ison $chan) { goto end }
n125=    inc %MD $+ $nick
n126=    if ([ %MD [ $+ [ $nick ] ] ] == 1) { .timer 1 %mtime unset %MD $+ $nick }
n127=    elseif ([ %MD [ $+ [ $nick ] ] ] >= %mnum) {
n128=      if ($level($address($nick,3)) == 200) { mode $chan -o $nick | .timer 1 600 .auser 200 $nick | .timer 1 600 .guser 200 $nick 3 | mdpen }
n129=      elseif ($level($address($nick,3)) == 300) { mode $chan -o $nick | .timer 1 600 .auser 300 $nick | .timer 1 600 .guser 300 $nick 3 | mdpen }
n130=      else { mode $chan -o $nick | raw -q kick $chan $nick : Mass Deop Detected  AutoKICK after  $+ %mnum $+  deops in the period of  $+ %mtime $+  seconds. ((-ÕzZßÖT-) | unset %MD $+ $nick | set %cla $+ $nick 1 | .timer 1 60 unset %cla $+ $nick }
n131=    }
n132=    :end
n133=  }
n134=}
n135=clonesprot {
n136=  if ((%clnfld == ON) && ($site != $host)) {
n137=    if ([ %CJ [ $+ [ *!*@ [ $+ [ $site ] ] ] ] ] == $null) { set %CJ $+ *!*@ $+ $site 1 | .timer135 1 %cljtime unset %CJ $+ *!*@ $+ $site }
n138=    elseif ([ %CJ [ $+ [ *!*@ [ $+ [ $site ] ] ] ] ] >= %cljnum) { %cjflood = $site | %cjchan = $chan | mode $chan +b *!*@ $+ $site | raw -q kick $chan $nick : Join Flood Detected  AutoKICK after  $+ %cljnum $+  joins, by the same site, in the period of  $+ %cljtime $+  seconds. ((-ÕzZßÖT-) | unset %CJ $+ *!*@ $+ $site | fk | recho 5 Possible clones or join flood in $chan by $nick at @ $+ $site }
n139=    else { inc %CJ $+ *!*@ $+ $site }
n140=  }
n141=}
n142=fk enable #fk | who %cjchan
n143=floodprot do 5FLOOD PROTECTION | do 2Text:4 %prottext | do 2Action:4 %protaction | do 2Mass Deop:4 %protmd | do 2Clone/Join:4 %protcj | do 2Nick:4 %protnick | do 2ServerOp:4 %protsop | do 2AutoGreet:4 %protag | do 2DCC Text:4 %protdcc
n144=seen1 {
n145=  if (%sseen != ON) { no Sorry seen is OFF | halt }
n146=  if ($parm2 == $null) { no Please type a nick after !seen | halt }
n147=  elseif ($parm2 == $me) { no I am right here!! | halt }
n148=  elseif ($parm2 ison $chan) { n 7((-ÕzZ-)) $parm2 is on the channel NOW! | halt }
n149=  %z = $readini seen.ini date $parm2
n150=  if (%z == $null) { n 7((-ÕzZ-)) I have not seen $parm2 }
n151=  else { no 6 $+ $parm2 was last seen on 4 $+ $readini seen.ini date $parm2 (EST)6,2 $readini seen.ini reason $parm2 }
n152=}
n153=seenjoin if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Joining [ $chan ] $+ . }
n154=seenpart if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Leaving [ $chan ] $+ . }
n155=seenquit if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Quitting IRC with  $+ $parms $+  as the quit message. }
n156=seenkick if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Getting kicked out of [ $chan ] by $nick with  $+ $parms $+  as the kick message. }
n157=seenjpl if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Joining the partyline. }
n158=seenlpl if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Leaving the partyline. }
n159=seennick if (%sseen == ON) { writeini seen.ini date $nick $day $+ , $adate at $time | writeini seen.ini reason $nick Changing nick from $nick to $newnick $+ . | writeini seen.ini date $newnick $day $+ , $adate at $time | writeini seen.ini reason $newnick Changing nick from $nick to $newnick $+ . }
n160=settitle titlebar -=((-ÕzZßÖT-))=- [Last Update: $time $+ ] (My Lag: %mylag $+ ) ( $+ Master's Lag: %bosslag $+ ) | set %lu $time
n161=meping .ctcp $me ping
n162=bossping if ((connected isin $dde mirc connected "") && (not !isin $dde mirc connected "")) { .ctcp $dde mirc nickname "" ping } | else { set %bosslag NA | settitle }
n163=recho {
n164=  if (%rinfo == dcc) {
n165=    if (%rwnick == $null) { halt }
n166=    %i = 1
n167=    :start
n168=    if ($chat(%i) == $null) { halt }
n169=    if ($chat(%i) == %rwnick) { goto yes }
n170=    inc %i 1
n171=    goto start
n172=    :yes
n173=    msg = $+ %rwnick 7((-ÕzZßÖT-)) $+ $1 *2
n174=  }
n175=  else { /dde mirc command "" /echo $1 7((-ÕzZßÖT-)) *2 }
n176=}
n177=wecho {
n178=  if (%rinfo == dcc) {
n179=    if (%rwnick == $null) { halt }
n180=    %i = 1
n181=    :start
n182=    if ($chat(%i) == $null) { halt }
n183=    if ($chat(%i) == %rwnick) { goto yes }
n184=    inc %i 1
n185=    goto start
n186=    :yes
n187=    msg = $+ %rwnick 7((-ÕzZ-)) $+ $1 *2
n188=  }
n189=  else { /dde mirc command "" /echo $1 7((-ÕzZ-)) *2 }
n190=}
n191=mecho line | echo $$1 -s 7((-ÕzZ-)) *2 | line
n192=line echo -s -----------------------------------------------------------------------------------------------------
n193=d msg = $+ $nick *1
n194=do msg = $+ $nick 7((-ÕzZßÖT-))2 *1
n195=lagstats d 7((-ÕzZ-)) 5Lag Stats | d 7((-ÕzZ-)) 2Last Update:4 %lu | d 7((-ÕzZ-)) 2 $+ $server $+ :4 $duration(%mylag) | d 7((-ÕzZ-)) 2 $+ $dde mirc nickname "" $+ :4 $duration(%bosslag) | d 7((-ÕzZ-)) 5End of Lag Stats
n196=nonvoters if (%nonvoters != $null) { wecho 2 People who have not voted 4( $+ %vple $+ / $+ %people - %percentnvote $+ ) | /dde mirc command "" /echo 7 %nonvoters } | else { recho 7 4Everyone in the channel has voted } | unset %per*
n197=advote if (%nonvoters != $null) { msg %adchan 7((-ÕzZßÖT-)) 2People who have not voted 3( $+ %vple $+ / $+ %people - %percentnvote $+ )2: 4 %nonvoters : 2Vote on the Topic 8,1 %vptopic  2by typing 5 $+ %choice1 $+ , %choice2 $+ , or %choice3 2in the channel!! } | else { msg %adchan 7((-ÕzZßÖT-)) 4Everyone in the channel has voted!! } | unset %per*
n198=funstuff msg %fschan 7((-ÕzZßÖT-)) 2Type 4!insult, !!insult, !8ball <a question>, !!dope,  !!lame, !dope <nick>, or !lame <nick>2 in the channel for some fun stuff and don't forget to vote on the Topic 8,1 %vptopic  2by typing 5 $+ %choice1 $+ , %choice2 $+ , or %choice3 2in the channel!!
n199=cm .timer 1 2 closemsg $nick
n200=n notice $nick *1
n201=no notice $nick 7((-ÕzZßÖT-))2 *1
n202=i3 .ignore -pctinu7 $nick 3
n203=i2 .ignore -pctinu7 $nick 2
n204=funw no 4You can only do 1 fun command every  $+ %funig $+  seconds
n205=fd no 4**Flood Detected**  $+ %hmfun $+  fun commands in  $+ %funig $+  seconds  You are ignored for  $+ $duration(%howig) $+  | .ignore -pctinu $+ %howig $nick 2
n206=agu .timer 1 %funig .unset %FS $+ $nick
n207=dp if (%autogreet == ON) { no C-YA later $nick! $dde mirc nickname "" says SEE YA!!! }
n208=cfc inc %cfc
n209=fst d 7((-ÕzZ-)) 5Fun Stuff Counter | d 7((-ÕzZ-)) 10Total Ever:4 %cfc | d 7((-ÕzZ-)) 2Insult Jokes:4 %insult | d 7((-ÕzZ-)) 2Asked 8ball:4 %8ball | d 7((-ÕzZ-)) 2Lame '0' Meter:4 %lame | d 7((-ÕzZ-)) 2Dope '0' Meter:4 %dope | d 7((-ÕzZ-)) 2Total Voted:4 %countvp | d 7((-ÕzZ-)) 2Did !WhoVoted:4 %countwv | d 7((-ÕzZ-)) 2Did !Seen:4 %countseen
n210=dccprot {
n211=  if ((%protdcc == ON) && ($nick != %rwnick)) {
n212=    if ($nick isin %linkbots) { goto end }
n213=    if ([ %dcc [ $+ [ $nick ] ] ] == $null) { set %dcc $+ $nick 1 | .timer 1 %dtime .unset %dcc $+ $nick }
n214=    elseif ([ %dcc [ $+ [ $nick ] ] ] >= %dnum) { msg [ = $+ [ $nick ] ] 7((-ÕzZßÖT-))6 FLOOD DETECTED | .close -c $nick | unset %dcc $+ $nick | unpl $nick | relay 6*** $nick has Left ÕzZßÖT's Party Line | relaybots 6*** $nick has Left ÕzZßÖT's Party Line | mecho 4 Connection Terminated with  $+ $nick $+  due to DCC TEXT FLOODING. }
n215=    else { inc %dcc $+ $nick }
n216=    :end
n217=  }
n218=}
n219=noticeprot {
n220=  if (($nick != $me) && ($nick != $dde mirc nickname "")) {
n221=    inc %notice
n222=    if (%notice == 1) { .timer 1 10 unset %notice }
n223=    if (%notice >= 5) { no  4Notice Flood Detected 2 | unset %notice | .ignore -nu30 *!*@* }
n224=  }
n225=}
n226=pervp {
n227=  if ((%best == 0) || (%best == $null)) { %perbest = 0.0% | goto next }
n228=  %pervb = %best * 100 | %perallb = %pervb / %totalvoted | %pervremb = %pervb % %totalvoted | %perbest = %perallb $+ . $+ %pervremb $+ %
n229=  :next
n230=  if ((%ok == 0) || (%ok == $null)) { %perok = 0.0% | goto then }
n231=  %pervo = %ok * 100 | %perallo = %pervo / %totalvoted | %pervremo = %pervo % %totalvoted | %perok = %perallo $+ . $+ %pervremo $+ %
n232=  :then
n233=  if ((%sucks == 0) || (%sucks == $null)) { %persucks = 0.0% | goto end }
n234=  %pervw = %sucks * 100 | %perallw = %pervw / %totalvoted | %pervremw = %pervw % %totalvoted | %persucks = %perallw $+ . $+ %pervremw $+ %
n235=  :end
n236=}
n237=uset unset %!votenames | unset %nonvoters | unset %people | unset %vple
n238=relay {
n239=  %i = 1
n240=  :start
n241=  %pnick = $chat(%i)
n242=  %pstatus = $chat(%i).status
n243=  if (%pnick = $null) { goto end }
n244=  elseif (%pnick == $nick) { goto next }
n245=  elseif (%pnick isin %linkbots) { goto next }
n246=  if (%pstatus == active) { msg = $+ %pnick *1 }
n247=  :next
n248=  inc %i
n249=  goto start
n250=  :end
n251=}
n252=relaybots {
n253=  %i = 1
n254=  :start
n255=  %pnick = $chat(%i)
n256=  %pstatus = $chat(%i).status
n257=  if (%pnick = $null) { goto end }
n258=  elseif (%pnick == $nick) { goto next }
n259=  elseif (%pnick isin %linkbots) { goto bot } | else { goto next }
n260=  :bot
n261=  if (%pstatus == active) { msg = $+ %pnick *1 }
n262=  :next
n263=  inc %i
n264=  goto start
n265=  :end
n266=}
n267=askping {
n268=  if ($nick == $dde mirc nickname "") { %chanping = yes | .ctcp $nick ping | halt }
n269=  if ([ %pg [ $+ [ $nick ] ] ] != 1) { .ctcp $nick ping | set %pg $+ $nick 1 | .timer 1 30 unset %pg $+ $nick }
n270=  else { textflood }
n271=}
n272=fstu {
n273=  if ([ %FS [ $+ [ $nick ] ] ] == $null) {
n274=    agu
n275=    if ($parm1 == !insult) { no $read $mIRCdiryomama.txt | cfc | inc %insult }
n276=    elseif ($parm1 == !!insult) { no $read $mIRCdiryomama2.txt | cfc | inc %insult }
n277=    elseif ($parm1 == !8ball) && ($parm2 == $null) { no Correct Syntax: !8ball <question> | cfc | inc %8ball }
n278=    elseif ($parm1 == !8ball) && ($parm2 != $null) { notice $chan 7((-ÕZZßÖT-))2 $nick $+ , $read $mIRCdir8ball.txt | cfc | inc %8ball }
n279=    elseif ($parm1 == !Lame) { lamenick | cfc | inc %lame }
n280=    elseif ($parm1 == !Dope) { dopenick | cfc | inc %dope }
n281=    elseif ($parm1 == !counter) {
n282=      if ($parm2 == $null) { no Total that joined any channel since 5 $+ %tdate $+  :4 %total }
n283=      else {
n284=        %t1 = $readini join.ini channels $parm2
n285=        if (%t1 == $null) { no I have no count for $parm2 }
n286=        else { no Total that Joined5  $+ $parm2 $+  2since5  $+ $readini join.ini date $parm2 $+ :4 $readini join.ini channels $parm2 }
n287=      }
n288=    }
n289=    elseif ($parm1 == %choice3) { vp | cfc }
n290=    elseif ($parm1 == %choice2) { vp | cfc }
n291=    elseif ($parm1 == %choice1) { vp | cfc }
n292=    elseif ($parm1 == !seen) { seen1 | cfc | inc %countseen }
n293=    elseif ($parm1 == !menu) { no 5Fun Commands:4 %funcommands }
n294=    elseif ($parm1 == !topic) { no 5Voting Poll Topic: 8,1 $+ %vptopic | no 5Vote by typing: 4 $+ %choice1 $+ 2, 4 $+ %choice2 $+ 2, or 4 $+ %choice3 | no 6*** To vote in private join the Partyline. }
n295=    elseif ($parm1 == !poll) {
n296=      if ($nick == $dde mirc nickname "") { poll | inc %countwv | cfc } | else { poll1 | cfc | inc %countwv }
n297=    }
n298=    elseif ($parm1 == !ozzbot.zip) { dcc send $nick $mIRCdirozzbot.zip | recho 5 $nick has just asked me to send ozzbot.zip! | n 4,1 $read $mIRCdirrandver.txt %version | cfc }
n299=    elseif ($parm1 == !whovoted) { unset %per* | whovoted | cfc | inc %countwv }
n300=    else { 
n301=      if ($nick == $dde mirc nickname "") { recho 5 There is no such command $parm1 } 
n302=      else {
n303=        if ([ %NSC [ $+ [ $nick ] ] ] == $null) { set %NSC $+ $nick 1 | no 5There is no such command  $+ $parm1 $+  | textflood }
n304=        else { textflood }
n305=        .timer 1 15 unset %NSC $+ $nick | goto end
n306=      }
n307=    }
n308=    if ($nick == $dde mirc nickname "") { goto end }
n309=  }
n310=  elseif ([ %FS [ $+ [ $nick ] ] ] == 1) { funw } 
n311=  elseif ([ %FS [ $+ [ $nick ] ] ] >= %hmfun) { fd }
n312=  else { goto next }
n313=  :next
n314=  inc %FS $+ $nick | textflood
n315=  :end
n316=}
n317=unpl .write -ds $+ $$1 userchats.txt | .write -ds $+ $$1 hostchats.txt | if ($$1 isin %linkbots) { %linkbots = $remove(%linkbots,$$1) }
n318=checkvoted {
n319=  cfc | %h.1 = $read -s $+ $nick hostchats.txt | %h.2 = $read -s $+ $nick userchats.txt | %v.1 = $readini voted.ini nick $nick | %v.2 = $readini voted.ini site %h.1 | %v.3 = $readini voted.ini userhost %h.2
n320=  if ((%v.1 != $null) || (%v.2 != $null) || (%v.3 != $null)) { do Sorry you already voted! | halt }
n321=  else { inc %totalvoted | inc %countvp | .writeini voted.ini nick $nick 1 | .writeini voted.ini site %h.1 1 | .writeini voted.ini userhost %h.2 1 }
n322=}
n323=dccpoll pervp | d 5Topic: 8,1 %vptopic  | d 2Voted %choice1 $+ : %best 3( $+ %perbest $+ ) | d 2Voted %choice2 $+ : %ok 3( $+ %perok $+ ) | d 2Voted %choice3 $+ : %sucks 3( $+ %persucks $+ ) | d 5To see who voted for what type !whovoted | unset %per*
n324=nickprot {
n325=  if ($site != $host) {
n326=    if ([ %NK [ $+ [ $site ] ] ] == $null) { inc %NK $+ $site | .timer 1 %nctime unset %NK $+ $site }
n327=    elseif ([ %NK [ $+ [ $site ] ] ] >= %ncnum) { ban $chan $newnick 2 | %ncflooder = $site | %ncreason =  $+ %ncnum $+  Nick Changes in the period of  $+ %nctime $+  seconds. | .enable #nk | who $chan }
n328=    else { inc %NK $+ $site }
n329=  }
n330=}
n331=master if ($nick == $dde mirc nickname "") { .auser 600 $dde mirc nickname "" | .guser 600 $dde mirc nickname "" 3 | recho 5 You now have Master access Boss!!! } | else { no There is no such command $parms. 15 Second Ignore | .ignore -pctinu15 $nick 2 }
n332=quit quit 1,1.7,1((-ÕzZ-)) 4,1 $+ $read $mIRCdirrandver.txt 7,1((-ÕzZßÖT-))1,1.
n333=dcccom {
n334=  if ($nick != %rwnick) {
n335=    if ([ %DM [ $+ [ $nick ] ] ] == $null) { inc %DM $+ $nick | .timer 1 15 unset %DM $+ $nick }
n336=    elseif ([ %DM [ $+ [ $nick ] ] ] >= 1) { do Only do 1 command every 15 seconds }
n337=    dccprot
n338=  }
n339=}
n340=serverop if ((%protsop == OFF) || ($opnick == $me)) { halt } | else { mode $chan -o $opnick | notice $opnick NO SERVEROPS ALLOWED! <<-= ÕzZ =->> - Hack Detected! - }
n341=join1 if ($nick == $dde mirc nickname "") { .auser 600 $nick | .guser 600 $nick 3 | halt } | autogreet | seenjoin
n342=error if (($me isin $parms) && (flood isin $parms)) { recho 7 2I have been disconnected from IRC  4Reason: 2(Excess Flood) }
n343=up if ($nick !isop $chan) { if (%noop != ON) { raw mode $chan +o $nick } | else { no Sorry the channel is in NOOP mode } | i3 }
n344=chatopen {
n345=  seenjpl
n346=  if ($nick isin %wait) { %wait = $remove(%wait,$nick) | %linkbots = %linkbots $nick | relay 6*** $nick and $me are now linked together | mecho 4 $nick and $me are now Linked | halt }
n347=  %motd = $read -smotd messages.txt
n348=  d 5Welcome to ÕzZßÖT's PartyLine $nick
n349=  d -
n350=  d 5I am running: %version
n351=  d -
n352=  if (%motd != $null) { d $read -smotd messages.txt } | else { d 5No MOTD Set }
n353=  d -
n354=  d 5Voting Poll Topic: 8,1 $+ %vptopic
n355=  d 5Vote by Typing:4 %choice1 $+ 2,4 %choice2 $+ 2, or4 %choice3
n356=  d -
n357=  d 5Type 4.menu 5for a list of commands
n358=  d 5Type 4.help 5for help on commands
n359=  d 5Play the Number Guessing Game by typing4 !#game 5or, if a game is already going on,4 !#= <number>.
n360=  if (%protdcc == ON) { d - | d 6*** WARNING: Do not exceed  $+ %dnum $+  lines in  $+ %dtime $+  seconds or you will be kicked off. }
n361=  d 2*** WARNING: Everything you type is sent to everyone else on the Partyline except if "12.2" or "12!2" is put in front of it, or if you use the "12!msg2" command.
n362=  relay 6*** $nick has Joined ÕzZßÖT's PartyLine
n363=  relaybots 6*** $nick has Joined ÕzZßÖT's PartyLine
n364=  mecho 4 DCC Connection Established with $nick
n365=  if ($nick == $dde mirc nickname "") { %rwnick = $nick }
n366=} 
n367=die recho 5 C-YA!!!!!!! | unset %rwnick | .rlevel -r 500 | quit | unset %rwnick | unset %linkbots | unset %wait | .write -c userchats.txt | .write -c hostchats.txt | exit
n368=kick500 if (($nick != $me) && ($nick != $dde mirc nickname "")) { kick $chan $nick Now You Have Pissed Me Off! ((-ÕzZßÖT-)) }
n369=ban500 if (($nick != $me) && ($nick != $dde mirc nickname "")) { mode $chan -o-b+b $nick $banmask $address($nick,2) | kick $chan $nick ((-ÕzZ  Protect-) }
n370=names if ($parm2 isin %linkbots) { msg = $+ $parm2 !names $nick | halt } | else { do $parm2 is not a bot linked to me. }
n371=kick400 .auser 10 $nick | .guser 10 $nick 3 | kick $chan $nick Get Out! ((-Protected User-))
n372=onjoin {
n373=  seenjoin
n374=  if ($nick == $me) {
n375=    if ($chan == %hourschannel) { play -c %hourschannel $mIRCdirTime.txt 50 | recho 5 I have joined $chan! | begforops }
n376=    elseif ($chan == %antiidle) { halt }
n377=    else { recho 5 I have joined $chan! | begforops }
n378=    halt
n379=  }
n380=  inc %total | %cc = $readini join.ini channels $chan
n381=  if (%cc == $null) { writeini join.ini date $chan $adate }
n382=  inc %cc | writeini join.ini channels $chan %cc
n383=  if (%autogreet == ON) { autogreet }
n384=  %agl = $level($address($nick,3))
n385=  if (%agl == 600) { .auser 600 $nick }
n386=  elseif (%agl == 500) { .auser 500 $nick }
n387=  elseif (%agl == 400) { .auser 400 $nick }
n388=  elseif (%agl == 300) { .auser 300 $nick }
n389=  elseif (%agl == 200) { .auser 200 $nick }
n390=  else { halt }
n391=  if ($me isop $chan) {
n392=    if (%agl isnum 500-600) { goto op }
n393=    elseif (%agl isnum 200-400) {
n394=      if (%noop != ON) { goto op } | else { no Sorry $nick the channel is in NOOP mode | halt }
n395=    }
n396=    :op
n397=    .raw mode $chan +o $nick
n398=  }
n399=}
n400=lost {
n401=  %l = 1
n402=  :start
n403=  %lnick = $chat(%l)
n404=  %lstatus = $chat(%l).status
n405=  if (%lnick == $null) { halt }
n406=  elseif (%lnick == $$1) {
n407=    if (%lstatus != active) { close -c $$1 | unpl $$1 | mecho 4 Lost Connection with $$1 | seenlpl }
n408=    halt
n409=  }
n410=  inc %l
n411=  goto start
n412=}
n413=gvote i3 | uset | /unset %per* | .enable #snovoters | set %rawvote yes | set %adchan $chan | who $chan
n414=mdpen .auser =4 $nick | .guser =4 $nick 3 | unset %MD $+ $nick | notice $nick  Mass Deop Detected   $+ %mnum $+  deops in the period of  $+ %mtime $+  seconds. You are Suspended for 10 minutes. ((-ÕzZßÖT-))
n415=shit .auser =999 $parm2 | .guser =999 $parm2 2 | .guser =999 $parm2 3 | ban $chan $parm2 2 | recho 5 I have places $parm2 on my Shitlist! | kick $chan $parm2 ((-ÕzZ SHiT KiCk-))
n416=seendcc {
n417=  if (%sseen != ON) { do Sorry seen is OFF | halt }
n418=  if ($parm2 == $null) { do Correct Syntax: !seen <nick> | halt }
n419=  if ($parm2 == $me) { do I am right here!! | halt }
n420=  %z = $readini seen.ini date $parm2
n421=  if (%z == $null) { msg = $+ $nick 7((-ÕzZ-)) 2I have not seen $parm2 }
n422=  else { msg = $+ $nick 7((-ÕzZ-))6 $parm2 was last seen on 4 $+ $readini seen.ini date $parm2 (EST)6,2 $readini seen.ini reason $parm2 }
n423=  cfc | inc %countseen
n424=}
n425=menu2 no 5Funstuff Commands:4 %funcommands | no 5Access Commands:4 %200chan
n426=menu5 no 5Funstuff Commands:4 %funcommands | no 5Access Commands:4 %200chan %500chan
n427=funigp %funig = $parm2 | %howig = $parm3 | %hmfun = $parm4 | do Fun command protection set for 1 fun commands in  $+ %funig $+  seconds and ignores for  $+ %howig $+  seconds after the number of fun commands exceeds  $+ %hmfun $+  | halt
n428=prota %joinnum = $parm2 | %jointime = $parm3 | %agignore = $parm4 | do If there are %joinnum joins in %jointime seconds, autogreet will be disabled for %agignore seconds!! | dec %joinnum | halt
n429=clp %cljnum = $parm2 | %cljtime = $parm3 | do Clone/Join Flood Protection set for  $+ %cljnum $+  joins by the same site in the period of  $+ %cljtime $+  seconds.
n430=ready do The Number Game is ready!! 5You get4 %guess 5tries to guess the number between4 1 5and4 %max# $+ . 5Format is:4 !#= <number>
n431=ng do Number Game Reset | halt
n432=sb {
n433=  %w = 1
n434=  do 2Number Game ScoreBoard
n435=  :start
n436=  %wnick = $chat(%w)
n437=  if (%wnick = $null) { halt }
n438=  else {
n439=    if ([ %win [ $+ [ %wnick ] ] ] == $null) { do 5 $+ %wnick $+ :4 0 }
n440=    else { do 5 $+ %wnick $+ :4 [ %win [ $+ [ %wnick ] ] ] }
n441=  }
n442=  inc %w
n443=  goto start
n444=}
n445=shitboss if ($nick == $dde mirc nickname "") { recho 5 Boss you are on my shitlist } | else { .ignore -a $nick 2 } | cm