MoonScript IRC — File Browser
MoonScriptIRCv3.0 / MoonScriptIRCv3.0 / system / control1.ini
control1.ini — 11.49 KB — Download this file
[aliases]
n0=massb {
n1= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP In) $moontxt2(#) | halt }
n2= if ( $nick(#,0) <= 1 ) { echo -a $moontxt2(No Other Users In) $moontxt2(#) $moontxt2(To Mass Ban) | halt }
n3= else {
n4= set %i 1
n5= goto loop
n6= }
n7= :loop
n8= set %mktarg $nick(#,%i)
n9= if ( %mktarg == $null ) { goto end }
n10= elseif ( %mktarg == $me ) { inc %i 1 | goto loop }
n11= else {
n12= if ( %mktarg isop # ) { mode # -o+bb %mktarg %mktarg $address(%mktarg,3) | inc %i 1 | goto loop }
n13= mode # +bb %mktarg $address(%mktarg,3)
n14= inc %i 1
n15= goto loop
n16= }
n17= :end
n18=}
n19=masskb {
n20= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An Op In) $moontxt2(#) | halt }
n21= if ( $nick(#,0) <= 1 ) { echo -a $moontxt2(No Other Users In) $moontxt2(#) $moontxt2(To Mass Kick/) $+ $moontxt2(Ban) | halt }
n22= else {
n23= set %i 1
n24= goto loop
n25= }
n26= :loop
n27= set %mktarg $nick(#,%i)
n28= if ( %mktarg == $null ) { goto end }
n29= elseif ( %mktarg == $me ) { inc %i 1 | goto loop }
n30= else {
n31= if ( %mktarg isop # ) { mode # -o+bb %mktarg %mktarg $address(%mktarg,3) | inc %knum 1 | kick # %mktarg Mass Kick/Ban $kicklogo | inc %i 1 | goto loop }
n32= mode # +bb %mktarg $address(%mktarg,3) | inc %knum 1 | kick # %mktarg Mass Kick/Ban $kicklogo
n33= inc %i 1
n34= goto loop
n35= }
n36= :end
n37=}
n38=ops onotice 2Ops( $+ $opnick(#,0) $+ ) in # $+ ( $+ $nick(#,0) $+ ):5 $1-
n39=ovnotice {
n40= if ( $me isop # ) || ( $me isvo # ) {
n41= %ov.num = 0
n42= %ov.total = $vnick(#,0)
n43= echo -> 2Ops( $+ $opnick(#,0) $+ ) & Voice( $+ $vnick(#,0) $+ ) In # $+ ( $+ $nick(#,0) $+ ):5 $1-
n44= .notice @ $+ # 2Ops( $+ $opnick(#,0) $+ ) & Voice( $+ $vnick(#,0) $+ ) In # $+ ( $+ $nick(#,0) $+ ): $1-
n45= :loop
n46= inc %ov.num 1
n47= if ( %ov.num > %ov.total ) { goto done }
n48= elseif ( $vnick(#,%ov.num) == $me ) { goto loop }
n49= else {
n50= .notice $vnick(#,%ov.num) 2Ops( $+ $opnick(#,0) $+ ) & Voice( $+ $vnick(#,0) $+ ) in # $+ ( $+ $nick(#,0) $+ ): $1-
n51= goto loop
n52= }
n53= else { goto loop }
n54= }
n55= else { echo -a $moontxt2(Error: You Must Be An OP Or Voice In) $moontxt2(#) | halt }
n56= :done
n57= unset %ov.*
n58=}
n59=mkops {
n60= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP In) $moontxt2(#) | halt }
n61= if ($opnick(#,0) <= 1) { echo -a $moontxt2(There Are No Other Opped Users In) $moontxt2(#) $moontxt2(To Mass Kick) | halt }
n62= echo -a $moontxt2(Now Doing A MassKick Of OPs In) $moontxt2(#)
n63= set %num 1
n64= :incl
n65= set %mktarg $opnick(#,%num)
n66= if (%mktarg == $null) { goto end }
n67= if (%mktarg != $me) { inc %knum 1 | kick # %mktarg Mass Kick (OPS) $kicklogo }
n68= inc %num 1 | goto incl
n69= :end
n70= unset %num %mktarg
n71=}
n72=
n73=takeover {
n74= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An Op In) $moontxt2(#) | halt }
n75= set %tmp $chan
n76= set %i 0
n77= inc %take.counter 1
n78= .mode %tmp +smilk 1 $rand(a,z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9)
n79= .topic %tmp $irc $+ $moontxt2(- Take) $+ $moontxt2(Over No.) $moontxt2(%take.counter)
n80= :next
n81= inc %i 1
n82= set %nick $nick(%tmp,%i)
n83= if (%nick == $me) { goto next }
n84= if (%nick == $null) { goto done }
n85= .mode %tmp -o %nick
n86= .mode %tmp +b $address(%nick,3)
n87= .mode %tmp +b $address(%nick,4)
n88= .inc %knum 1 | .kick %tmp %nick Takeover $kicklogo
n89= goto next
n90= :done
n91= unset %i
n92= unset %tmp
n93=}
n94=
n95=mknops {
n96= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP In) $moontxt2(#) | halt }
n97= elseif ($nopnick(#,0) < 1) { echo -a $moontxt2(There Are No Non OP Users In) $moontxt2(#) $moontxt2(To Mass Kick) | halt }
n98= else {
n99= echo -a $moontxt2(Now Doing A Mass Kick Of Non OPs In) $moontxt2(#)
n100= set %num 1
n101= :incl
n102= set %mktarg $nopnick(#,%num)
n103= if (%mktarg == $null) { goto end }
n104= inc %knum 1
n105= kick # %mktarg Mass Kick (NON OPS) $kicklogo
n106= inc %num 1 | goto incl
n107= :end
n108= unset %num %mktarg
n109= }
n110=}
n111=minvite {
n112= if ($nopnick(#,0) < 1) { echo -a $moontxt2(There Are No Non OP Users In) $moontxt2(#) $moontxt2(To Mass Invite) }
n113= set %num 1
n114= :incl
n115= set %mitarg $nopnick(#,%num)
n116= if (%mitarg == $null) { goto end }
n117= .invite %mitarg #$$1
n118= inc %num 1 | goto incl
n119= :end
n120= unset %num %mitarg
n121=}
n122=
n123=mkall {
n124= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An Op In) $moontxt2(#) | halt }
n125= elseif ($nick(#,0) <= 1) { echo -a $moontxt2(There Are No Other Users In) $moontxt2(#) $moontxt2(To Mass Kick) | halt }
n126= else {
n127= echo -a $moontxt2(Now Doing A Mass Kick Of All Users In) $moontxt2(#)
n128= set %num 1
n129= :incl
n130= set %mktarg $nick(#,%num)
n131= if (%mktarg == $null) { goto end }
n132= if (%mktarg != $me) { inc %knum 1 | kick # %mktarg Mass Kick (ALL) $kicklogo }
n133= inc %num 1 | goto incl
n134= :end
n135= unset %num %mktarg
n136= }
n137=}
n138=mdop {
n139= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An Op In) $moontxt2(#) | halt }
n140= elseif ($opnick(#,0) <= 1) { echo -a $moontxt2(There Are No Other Opped Users In) $moontxt2(#) $moontxt2(To Mass Deop) | halt }
n141= else {
n142= echo -a $moontxt2(Now Doing A Mass Deop In) $moontxt2(#)
n143= %mass = ""
n144= %i = 0
n145= :incl
n146= inc %i
n147= if ($opnick(#,%i) == $me) { inc %i }
n148= if ($opnick(#,%i) == $null) {
n149= if ($len(%mass) > 0) mode # -ooo %mass
n150= halt
n151= }
n152= %mass = %mass $opnick(#,%i)
n153= if (3 // %i) {
n154= mode # -ooo %mass
n155= %mass = ""
n156= }
n157= goto incl
n158= }
n159=}
n160=mvoice {
n161= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP In) $moontxt2(#) | halt }
n162= elseif ($nvnick(#,0) < 1) { echo -a $moontxt2(There Are No Non Voiced Users In) $moontxt2(#) $moontxt2(To Mass Voice) | halt }
n163= else {
n164= echo -a $moontxt2(Now Doing A Mass Voice In) $moontxt2(#)
n165= %mass = ""
n166= %i = 0
n167= :incl
n168= inc %i
n169= if ($nvnick(#,%i) = $null) {
n170= if ($len(%mass) > 0) mode # +vvv %mass
n171= halt
n172= }
n173= %mass = %mass $nvnick(#,%i)
n174= if (3 // %i) {
n175= mode # +vvv %mass
n176= %mass = ""
n177= }
n178= goto incl
n179= }
n180=}
n181=mdvoice {
n182= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP In) $moontxt2(#) | halt }
n183= elseif ($vnick(#,0) < 1) { echo -a $moontxt2(There Are No Voiced Users In) $moontxt2(#) $moontxt2(To Mass De) $+ $moontxt2(Voice) | halt }
n184= else {
n185= echo -a $moontxt2(Now Doing A Mass De) $+ $moontxt2(Voice In) $moontxt2(#)
n186= %mass = ""
n187= %i = 0
n188= :incl
n189= inc %i
n190= if ($vnick(#,%i) == $null) {
n191= if ($len(%mass) > 0) mode # -vvv %mass
n192= halt
n193= }
n194= %mass = %mass $vnick(#,%i)
n195= if (3 // %i) {
n196= mode # -vvv %mass
n197= %mass = ""
n198= }
n199= goto incl
n200= }
n201=}
n202=mop {
n203= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An Op In) $moontxt2(#) | halt }
n204= elseif ($nopnick(#,0) < 1) { echo -a $moontxt2(There Are No Non OP Users In) $moontxt2(#) $moontxt2(To Mass OP) | halt }
n205= else {
n206= echo -a $moontxt2(Now Doing A Mass OP In) $moontxt2(#)
n207= %mass = ""
n208= %i = 0
n209= :incl
n210= inc %i
n211= if ($nopnick(#,%i) == $null) {
n212= if ($len(%mass) > 0) mode # +ooo %mass
n213= halt
n214= }
n215= %mass = %mass $nopnick(#,%i)
n216= if (3 // %i) {
n217= mode # +ooo %mass
n218= %mass = ""
n219= }
n220= goto incl
n221= }
n222=}
n223=
n224=
n225=mn {
n226= if ($nick(#,0) < 1) { echo -a $moontxt2(There Are No other Users In) $moontxt2(#) $moontxt2(To Mass Notice) }
n227= set %num 1
n228= :incl
n229= set %mktarg $nick(#,%num)
n230= if (%mktarg == $null) { goto end }
n231= .notice %mktarg /msg to # $+ $+ : $1-
n232= inc %num 1 | goto incl
n233= :end
n234= unset %num %mktarg
n235=}
n236=
n237=fkb {
n238= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP in) $moontxt2(#) | halt }
n239= if ( $nick(#,0) <= 1 ) { echo -a $moontxt2(No Users In) $moontxt2(#) $moontxt2(To Filter Out) | halt }
n240= if ( $$1 iswm $address($me,5) ) { echo -a $moontxt2(You Are Included In This Address. Maybe You Should Rethink This Kick.) | halt }
n241= if ( $2 == $null ) { set %chan # }
n242= else { set %chan $2 }
n243= if ( $ial($$1,0) == 0 ) { echo -a $moontxt2(No matches For:) $moontxt2($$1) }
n244= if ( $ial($$1,0) != 0 ) {
n245= set %num $nick(%chan,0)
n246= :next
n247= if ($$1 iswm $address($nick(%chan,%num),5) ) && ( $$1 !iswm $address($me,5) ) {
n248= mode %chan +b $$1 | inc %knum 1 | kick %chan $nick(%chan,%num) Filter Kick ( $+ $$1 $+ ) $kicklogo
n249= }
n250= dec %num
n251= if ( $ial($$1,0) == 0 ) { goto done }
n252= if ( %num > 0 ) { goto next }
n253= :done
n254= }
n255= unset %num %chan
n256=}
n257=
n258=fkick {
n259= if ( $me !isop # ) { echo -a $moontxt2(You Are Not An OP In) $moontxt2(#) | halt }
n260= if ( $nick(#,0) <= 1 ) { echo -a $moontxt2(No Users In) $moontxt2(#) $moontxt2(To Filter Out) | halt }
n261= if ( $$1 iswm $address($me,5) ) { echo $moontxt2(You Are Included In This Address. Maybe You Should Rethink This Kick.) | halt }
n262= if ( $2 == $null ) { set %chan # }
n263= else { set %chan $2 }
n264= if ( $ial($$1,0) == 0 ) { echo -a $moontxt2(No Matches For:) $moontxt2($$1) }
n265= if ( $ial($$1,0) != 0 ) {
n266= set %num $nick(%chan,0)
n267= :next
n268= if ( $$1 iswm $address($nick(%chan,%num),5) ) {
n269= inc %knum 1 | kick %chan $nick(%chan,%num) Filter Kick ( $+ $$1 $+ ) $kicklogo
n270= }
n271= dec %num
n272= if ( $ial($$1,0) == 0 ) { goto done }
n273= if ( %num > 0 ) { goto next }
n274= :done
n275= }
n276= unset %num %chan
n277=}
n278=
n279=screwu {
n280= unset %moontalk
n281= %i = 1
n282= %temp = $replace($1-,$chr(32),$chr(160))
n283= :next
n284= if ($mid(%temp,%i,1) != $null) {
n285= if ( $mid(%temp,%i,1) == $chr(64) ) || ( $mid(%temp,%i,1) == $chr(33) ) || ( $mid(%temp,%i,1) == $chr(46) ) { set %screw $mid(%temp,%i,1) }
n286= elseif ( 2 // %i ) { set %screw ? }
n287= else { set %screw $mid(%temp,%i,1) }
n288= %moontalk = %moontalk $+ %screw
n289= inc %i
n290= goto next
n291= }
n292= else {
n293= { return %moontalk }
n294= }
n295=}
n296=
n297=screwban {
n298= if ( $1 == 0 ) { return $screwu($address($2,0)) }
n299= elseif ( $1 == 1 ) { return $screwu($address($2,1)) }
n300= elseif ( $1 == 2 ) { return $screwu($address($2,2)) }
n301= elseif ( $1 == 3 ) { return $screwu($address($2,3)) }
n302= elseif ( $1 == 4 ) { return $screwu($address($2,4)) }
n303= elseif ( $1 == 5 ) { return $screwu($address($2,5)) }
n304= elseif ( $1 == 6 ) { return $screwu($address($2,6)) }
n305= elseif ( $1 == 7 ) { return $screwu($address($2,7)) }
n306= elseif ( $1 == 8 ) { return $screwu($address($2,8)) }
n307= elseif ( $1 == 9 ) { return $screwu($address($2,9)) }
n308= else { halt }
n309=}