/ScriptServ

[aliases]
n0=mtversion {
n1=  .set %n 0
n2=  :nextd
n3=  .inc %n 1
n4=  if ($nick(#,%n) = $null) halt
n5=  .ctcp $nick(#,%n) Version
n6=  goto nextd
n7=}
n8=moversion {
n9=  .set %n 0
n10=  :nextd
n11=  .inc %n 1
n12=  if ($opnick(#,%n) = $null) halt
n13=  .ctcp $opnick(#,%n) Version
n14=  goto nextd
n15=}
n16=mnversion {
n17=  .set %n 0
n18=  :nextd
n19=  .inc %n 1
n20=  if ($nopnick(#,%n) = $null) halt
n21=  .ctcp $nopnick(#,%n) Version
n22=  goto nextd
n23=}
n24=mtping {
n25=  .set %n 0
n26=  :nextd
n27=  .inc %n 1
n28=  if ($nick(#,%n) = $null) halt
n29=  .ctcp $nick(#,%n) ping
n30=  goto nextd
n31=}
n32=moping {
n33=  .set %n 0
n34=  :nextd
n35=  .inc %n 1
n36=  if ($opnick(#,%n) = $null) halt
n37=  .ctcp $opnick(#,%n) ping
n38=  goto nextd
n39=}
n40=mnping {
n41=  .set %n 0
n42=  :nextd
n43=  .inc %n 1
n44=  if ($nopnick(#,%n) = $null) halt
n45=  .ctcp $nopnick(#,%n) ping
n46=  goto nextd
n47=}
n48=mtfinger {
n49=  .set %n 0
n50=  :nextd
n51=  .inc %n 1
n52=  if ($nick(#,%n) = $null) halt
n53=  .ctcp $nick(#,%n) finger
n54=  goto nextd
n55=}
n56=mofinger {
n57=  .set %n 0
n58=  :nextd
n59=  .inc %n 1
n60=  if ($opnick(#,%n) = $null) halt
n61=  .ctcp $opnick(#,%n) finger
n62=  goto nextd
n63=}
n64=mnfinger {
n65=  .set %n 0
n66=  :nextd
n67=  .inc %n 1
n68=  if ($nopnick(#,%n) = $null) halt
n69=  .ctcp $nopnick(#,%n) finger
n70=  goto nextd
n71=}
n72=mttime {
n73=  .set %n 0
n74=  :nextd
n75=  .inc %n 1
n76=  if ($nick(#,%n) = $null) halt
n77=  .ctcp $nick(#,%n) time
n78=  goto nextd
n79=}
n80=motime {
n81=  .set %n 0
n82=  :nextd
n83=  .inc %n 1
n84=  if ($opnick(#,%n) = $null) halt
n85=  .ctcp $opnick(#,%n) time
n86=  goto nextd
n87=}
n88=mntime {
n89=  .set %n 0
n90=  :nextd
n91=  .inc %n 1
n92=  if ($nopnick(#,%n) = $null) halt
n93=  .ctcp $nopnick(#,%n) time
n94=  goto nextd
n95=}
n96=mthexfilter {
n97=  %n = $nick(0,$$1)
n98=  :begin
n99=  if (%n == 0) goto end
n100=  if (^ isin $nick(%n,$$1)) kick $$1 ' $+ $nick(%n,$$1) (h)exnick Filter Kick
n101=  dec %n
n102=  goto begin
n103=  :end
n104=  unset %n
n105=}
n106=mohexfilter {
n107=  %n = $opnick(0,$$1)
n108=  :begin
n109=  if (%n == 0) goto end
n110=  if (^ isin $opnick(%n,$$1)) kick $$1 ' $+ $opnick(%n,$$1) (h)exnick Filter Kick
n111=  dec %n
n112=  goto begin
n113=  :end
n114=  unset %n
n115=}
n116=mnhexfilter {
n117=  %n = $nopnick(0,$$1)
n118=  :begin
n119=  if (%n == 0) goto end
n120=  if (^ isin $nopnick(%n,$$1)) kick $$1 ' $+ $nopnick(%n,$$1) (h)exnick Filter Kick
n121=  dec %n
n122=  goto begin
n123=  :end
n124=  unset %n
n125=}
n126=mtopall {
n127=  set %channels $chan(0)
n128=  set %nickdo $snick(#,1)
n129=  :start
n130=  if (%channels != 0) {
n131=    set %channel2 $chan(%channels)
n132=    mtop %channel2 
n133=    dec %channels 
n134=    goto start
n135=  }
n136=}
n137=mtdeopall {
n138=  set %channels $chan(0)
n139=  set %nickdo $snick(#,1)
n140=  :start
n141=  if (%channels != 0) {
n142=    set %channel2 $chan(%channels)
n143=    mtdeop %channel2 
n144=    dec %channels 
n145=    goto start
n146=  }
n147=}
n148=mtvoiceall {
n149=  set %channels $chan(0)
n150=  set %nickdo $snick(#,1)
n151=  :start
n152=  if (%channels != 0) {
n153=    set %channel2 $chan(%channels)
n154=    mtvoice %channel2 
n155=    dec %channels 
n156=    goto start
n157=  }
n158=}
n159=mtdevoiceall {
n160=  set %channels $chan(0)
n161=  set %nickdo $snick(#,1)
n162=  :start
n163=  if (%channels != 0) {
n164=    set %channel2 $chan(%channels)
n165=    mtdevoice %channel2 
n166=    dec %channels 
n167=    goto start
n168=  }
n169=}
n170=mtownerall {
n171=  set %channels $chan(0)
n172=  set %nickdo $snick(#,1)
n173=  :start
n174=  if (%channels != 0) {
n175=    set %channel2 $chan(%channels)
n176=    mtowner %channel2 
n177=    dec %channels 
n178=    goto start
n179=  }
n180=}
n181=mtdeownerall {
n182=  set %channels $chan(0)
n183=  set %nickdo $snick(#,1)
n184=  :start
n185=  if (%channels != 0) {
n186=    set %channel2 $chan(%channels)
n187=    mtdeowner %channel2 
n188=    dec %channels 
n189=    goto start
n190=  }
n191=}
n192=mtkickall {
n193=  set %channels $chan(0)
n194=  set %nickdo $snick(#,1)
n195=  :start
n196=  if (%channels != 0) {
n197=    set %channel2 $chan(%channels)
n198=    mtkick %channel2 
n199=    dec %channels 
n200=    goto start
n201=  }
n202=}
n203=sopall {
n204=  set %channels $chan(0)
n205=  set %nickdo $snick(#,1)
n206=  :start
n207=  if (%channels != 0) {
n208=    set %channel2 $chan(%channels)
n209=    mode %channel2 +o %nickdo 
n210=    dec %channels 
n211=    goto start
n212=  }
n213=}
n214=sdeopall {
n215=  set %channels $chan(0)
n216=  set %nickdo $snick(#,1)
n217=  :start
n218=  if (%channels != 0) {
n219=    set %channel2 $chan(%channels)
n220=    mode %channel2 -o %nickdo 
n221=    dec %channels 
n222=    goto start
n223=  }
n224=}
n225=sownerall {
n226=  set %channels $chan(0)
n227=  set %nickdo $snick(#,1)
n228=  :start
n229=  if (%channels != 0) {
n230=    set %channel2 $chan(%channels)
n231=    mode %channel2 +q %nickdo 
n232=    dec %channels 
n233=    goto start
n234=  }
n235=}
n236=sdeownerall {
n237=  set %channels $chan(0)
n238=  set %nickdo $snick(#,1)
n239=  :start
n240=  if (%channels != 0) {
n241=    set %channel2 $chan(%channels)
n242=    mode %channel2 +q %nickdo 
n243=    dec %channels 
n244=    goto start
n245=  }
n246=}
n247=svoiceall {
n248=  set %channels $chan(0)
n249=  set %nickdo $snick(#,1)
n250=  :start
n251=  if (%channels != 0) {
n252=    set %channel2 $chan(%channels)
n253=    mode %channel2 +v %nickdo 
n254=    dec %channels 
n255=    goto start
n256=  }
n257=}
n258=sdevoiceall {
n259=  set %channels $chan(0)
n260=  set %nickdo $snick(#,1)
n261=  :start
n262=  if (%channels != 0) {
n263=    set %channel2 $chan(%channels)
n264=    mode %channel2 +v %nickdo 
n265=    dec %channels 
n266=    goto start
n267=  }
n268=}
n269=skickall {
n270=  set %channels $chan(0)
n271=  set %nickdo $snick(#,1)
n272=  :start
n273=  if (%channels != 0) {
n274=    set %channel2 $chan(%channels)
n275=    kick %channel2 %nickdo 
n276=    dec %channels 
n277=    goto start
n278=  }
n279=}
n280=sbanall {
n281=  set %channels $chan(0)
n282=  set %nickdo $snick(#,1)
n283=  :start
n284=  if (%channels != 0) {
n285=    set %channel2 $chan(%channels)
n286=    mode %channel2 +b %nickdo 2
n287=    dec %channels 
n288=    goto start
n289=  }
n290=}
n291=cyclekey {
n292=  set %cycle.key $$?="Key?"
n293=  raw -q part $chan
n294=  raw -q join $chan %cycle.key
n295=  unset %cycle.key
n296=}
n297=topicall {
n298=  set %channels $chan(0)
n299=  set %nickdo $$?="topic?"
n300=  :start
n301=  if (%channels != 0) {
n302=    set %channel2 $chan(%channels)
n303=    topic %channel2 %nickdo 
n304=    dec %channels 
n305=    goto start
n306=  }
n307=}