/ScriptServ

[aliases]
n0=countdown {
n1=  set %countdown.number $$?="number to count down from"
n2=  .msg $$1 Help me count down from %countdown.number - $irc 
n3=  :loop
n4=  if ( %countdown.number >= 0 ) { .msg $$1 %countdown.number  | inc %countdown.number -1 | goto loop }
n5=  else { .msg $$1 Thank you for your help, can we play again sometime? - $irc | unset %countdown.number }
n6=}
n7=countup {
n8=  set %countup.num $$?="number to count to"
n9=  set %countup.number $calc(%countup.num - %countup.num)
n10=  .msg $$1 Help me count to %countup.num - $irc 
n11=  :loop 
n12=  .msg $$1 $calc(1 + %countup.number)  | inc %countup.number 1 
n13=  if ( %countup.number <= $calc(%countup.num - 1) ) { goto loop }
n14=  else { .msg $$1 Thank you for your help, can we play again sometime? - $irc | unset %countup.* }
n15=}
n16=
n17=jpflud {
n18=  set %jp.chan $chan
n19=  set %jp.num 0
n20=  set %jp.stop $$?="how many times do i need to join/part?"
n21=  set %jp.msg $$?="/part msg?"
n22=  :loop 
n23=  raw join %jp.chan  | raw part %jp.chan %jp.msg | raw join %jp.chan | inc %jp.num 1 
n24=  if ( %jp.num <= $calc(%jp.stop - 1) ) { goto loop }
n25=  else { unset %jp.* | halt }
n26=}
n27=flud {
n28=  {
n29=    %flud = $$?="what do i say?"
n30=    set %flud.number 0
n31=    set %flud.stop $$?="where do i stop?"
n32=    set %flud.who $$1
n33=    set %flud $replace(%flud,a,4a)
n34=    set %flud $replace(%flud,b,3B)
n35=    set %flud $replace(%flud,c,6C) 
n36=    set %flud $replace(%flud,d,7D) 
n37=    set %flud $replace(%flud,e,4e) 
n38=    set %flud $replace(%flud,f,12F) 
n39=    set %flud $replace(%flud,g,13G) 
n40=    set %flud $replace(%flud,h,6H) 
n41=    set %flud $replace(%flud,i,4i) 
n42=    set %flud $replace(%flud,j,J) 
n43=    set %flud $replace(%flud,k,3K) 
n44=    set %flud $replace(%flud,l,L) 
n45=    set %flud $replace(%flud,m,4M) 
n46=    set %flud $replace(%flud,n,6N)
n47=    set %flud $replace(%flud,o,4o) 
n48=    set %flud $replace(%flud,p,12P) 
n49=    set %flud $replace(%flud,q,Q) 
n50=    set %flud $replace(%flud,r,13R) 
n51=    set %flud $replace(%flud,s,7S) 
n52=    set %flud $replace(%flud,t,T) 
n53=    set %flud $replace(%flud,u,4u) 
n54=    set %flud $replace(%flud,v,V) 
n55=    set %flud $replace(%flud,w,12W) 
n56=    set %flud $replace(%flud,x,7X) 
n57=    set %flud $replace(%flud,y,Y) 
n58=    set %flud $replace(%flud,z,6z) 
n59=    set %flud $replace(%flud,?,12¿6?) 
n60=    set %flud $replace(%flud,!,6!12¡)
n61=    echo -a 4>>>12 You are flooding 4 $+ %flud.who $+  10 $+ %flud.stop $+  12times with the message: %flud
n62=    :lewp  
n63=    if ( %flud.who != $null ) { goto next }
n64=    else { halt }
n65=    :next
n66=    .notice %flud.who %flud 
n67=    inc %flud.number 1
n68=    if ( %flud.number <= $calc(%flud.stop - 1) ) { goto lewp }
n69=    unset %flud*
n70=  }
n71=}
n72=nickflud {
n73=  set %nflud.me $me
n74=  set %nflud.stop $$?="how many times do i need to change my nick?"
n75=  :loop 
n76=  nick $read clonenicks1.txt $+ $read clonenicks2.txt | inc %nflud.stop -1
n77=  if ( %nflud.stop > 0 ) { goto loop }
n78=  else { .timer 1 1 nick %nflud.me | unset %nflud.* halt }
n79=}
n80=
n81=
n82=
n83=freezeflud {
n84=  set %fflud.number 0
n85=  set %fflud.stop $$?="where do i stop?"
n86=  :lewp  
n87=  .notice $$1 #!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@!#!@@&*@#))$(%*@!#!@($*$&Q@&*@#)&*@#))$(%*@!#!@($*$&Q@&*@#))$(%*@
n88=  inc %fflud.number 1
n89=  if ( %fflud.number <= $calc(%fflud.stop - 1) ) { goto lewp }
n90=  unset %fflud* 
n91=}
n92=
n93=
n94=pingflud {
n95=  {
n96=    set %pingflud.number 0
n97=    set %pingflud.stop $$?="where do i stop?"
n98=    :lewp  
n99=    .ctcp $$1 ping | .ctcp $$1 version | .ctcp $$1 time
n100=    inc %pingflud.number 1
n101=    if ( %pingflud.number <= $calc(%pingflud.stop - 1) ) { goto lewp }
n102=    unset %pingflud* 
n103=  }
n104=}
n105=
n106=cflud {
n107=  .set %floodtimer $$?"How Many Times?"
n108=  .set %flood.counter 0
n109=  .nick $read clonenicks1.txt $+ $read clonenicks2.txt
n110=  :loop
n111=  .if ( %flood.counter == %floodtimer ) { goto end }
n112=  .notice $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n113=  .ctcp $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n114=  .msg $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n115=  .notice $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n116=  .ctcp $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n117=  .msg $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n118=  .nick $read clonenicks1.txt $+ $read clonenicks2.txt
n119=  .notice $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n120=  .ctcp $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n121=  .msg $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n122=  .notice $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n123=  .ctcp $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n124=  .msg $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12
n125=  .nick $read clonenicks1.txt $+ $read clonenicks2.txt
n126=  inc %flood.counter 1 
n127=  goto loop
n128=  :end
n129=  unset %floodtimer
n130=}
n131=
n132=opflud {
n133=  {
n134=    set %opflud.who $$?="nick to flood"
n135=    set %opflud.number 0
n136=    set %opflud.stop $$?="where do i stop?"
n137=    :lewp  
n138=    .mode # +o %opflud.who | .mode # -o %opflud.who
n139=    inc %opflud.number 1
n140=    if ( %opflud.number <= $calc(%opflud.stop - 1) ) { goto lewp }
n141=    unset %opflud* 
n142=  }
n143=}
n144=
n145=cflud3 timerflud 0 1 .notice $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n146=cflud2 { 
n147=  set %floodtimer $$?"How Many Times?"
n148=  timer %floodtimer 0 .notice $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n149=  timer %floodtimer 0 .ctcp $$1 1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12####$$$$ $+ $irc $+ 5,12####$$$$moonio^^1,12 
n150=}
n151=ccodes1 {
n152=  %flud = $$?="what do i say?"
n153=  set %flud.number 0
n154=  set %flud.stop $$?="where do i stop?"
n155=  set %flud.who $$1
n156=  %flud = $m2(%flud)
n157=  echo -a 4>>>12 You are flooding 4 $+ %flud.who $+  10 $+ %flud.stop $+  12times with the message: %flud
n158=  :lewp  
n159=  if ( %flud.who != $null ) { goto next }
n160=  else { halt }
n161=  :next
n162=  .notice %flud.who %flud 
n163=  inc %flud.number 1
n164=  if ( %flud.number <= $calc(%flud.stop - 1) ) { goto lewp }
n165=  unset %flud*
n166=}
n167=
n168=ccodes2 {
n169=  %flud = $$?="what do i say?"
n170=  set %flud.number 0
n171=  set %flud.stop $$?="where do i stop?"
n172=  set %flud.who $$1
n173=  %flud = $m3(%flud)
n174=  echo -a 4>>>12 You are flooding 4 $+ %flud.who $+  10 $+ %flud.stop $+  12times with the message: %flud
n175=  :lewp  
n176=  if ( %flud.who != $null ) { goto next }
n177=  else { halt }
n178=  :next
n179=  .notice %flud.who %flud 
n180=  inc %flud.number 1
n181=  if ( %flud.number <= $calc(%flud.stop - 1) ) { goto lewp }
n182=  unset %flud*
n183=}
n184=ccodes3 {
n185=  %flud = $$?="what do i say?"
n186=  set %flud.number 0
n187=  set %flud.stop $$?="where do i stop?"
n188=  set %flud.who $$1
n189=  %flud = $moontxt(%flud)
n190=  echo -a 4>>>12 You are flooding 4 $+ %flud.who $+  10 $+ %flud.stop $+  12times with the message: %flud
n191=  :lewp  
n192=  if ( %flud.who != $null ) { goto next }
n193=  else { halt }
n194=  :next
n195=  .notice %flud.who %flud 
n196=  inc %flud.number 1
n197=  if ( %flud.number <= $calc(%flud.stop - 1) ) { goto lewp }
n198=  unset %flud*
n199=}
n200=ccodes4 {
n201=  %flud = $$?="what do i say?"
n202=  set %flud.number 0
n203=  set %flud.stop $$?="where do i stop?"
n204=  set %flud.who $$1
n205=  %flud = $moontxt2(%flud)
n206=  echo -a 4>>>12 You are flooding 4 $+ %flud.who $+  10 $+ %flud.stop $+  12times with the message: %flud
n207=  :lewp  
n208=  if ( %flud.who != $null ) { goto next }
n209=  else { halt }
n210=  :next
n211=  .notice %flud.who %flud 
n212=  inc %flud.number 1
n213=  if ( %flud.number <= $calc(%flud.stop - 1) ) { goto lewp }
n214=  unset %flud*
n215=}
n216=ccodes5 {
n217=  %flud = $$?="what do i say?"
n218=  set %flud.number 0
n219=  set %flud.stop $$?="where do i stop?"
n220=  set %flud.who $$1
n221=  %flud = $moontalk(%flud)
n222=  echo -a 4>>>12 You are flooding 4 $+ %flud.who $+  10 $+ %flud.stop $+  12times with the message: %flud
n223=  :lewp  
n224=  if ( %flud.who != $null ) { goto next }
n225=  else { halt }
n226=  :next
n227=  .notice %flud.who %flud 
n228=  inc %flud.number 1
n229=  if ( %flud.number <= $calc(%flud.stop - 1) ) { goto lewp }
n230=  unset %flud*
n231=}