/ScriptServ

[aliases]
n0=/owner /mode # +qqq $$1 $2 $3
n1=/deowner /mode # -qqq $$1 $2 $3
n2=/protect /mode # +aaa $$1 $2 $3
n3=/deprotect /mode # -aaa $$1 $2 $3
n4=/op /mode # +ooo $$1 $2 $3
n5=/dop /mode # -ooo $$1 $2 $3
n6=/halfop /mode # +hhh $$1 $2 $3
n7=/dehalfop /mode # -hhh $$1 $2 $3
n8=/voice /mode # +vvv $$1 $2 $3
n9=/devoice /mode # -vvv $$1 $2 $3
n10=/j /join #$$1 $2-
n11=/p /part #
n12=/n /names #$$1
n13=/w /whois $$1
n14=/k /kick # $$1 $2-
n15=/q /query $$1
n16=/send /dcc send $1 $2
n17=/chat /dcc chat $1
n18=/ping /ctcp $$1 ping
n19=/s /server $$1-
n20=
n21=_comchans {  
n22=  var %tokk = $iif($2,$ifmatch,$chr(32)), %iii = 1, %chh  
n23=  while (%iii <= $comchan($1,0)) {
n24=    %chh = $addtok(%chh,$comchan($1,%iii),%tokk) | inc %iii   
n25=  }   
n26=  return $sorttok(%chh,%tokk) 
n27=}
n28=
n29=trivtalk {
n30=  tokenize 32 $1-
n31=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n32=  while %i {
n33=    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c1,10,10,2),$replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%c2,10,10,2),%u,%b,$replace($mid(%w,2),:, :,!, !),$chr(15)) %t 
n34=    dec %i
n35=  }
n36=  return %t
n37=}
n38=
n39=scaratalk {
n40=  tokenize 32 $1-
n41=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n42=  while %i {
n43=    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c3,10,10,2),$replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%c4,10,10,2),%u,%b,$replace($mid(%w,2),:, :,!, !),$chr(15)) %t 
n44=    dec %i
n45=  }
n46=  return %t
n47=}
n48=acrotalk {
n49=  tokenize 32 $1-
n50=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n51=  while %i {
n52=    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c9,10,10,2),$replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%c10,10,10,2),%u,%b,$replace($mid(%w,2),:, 15:,!, 15!),$chr(15)) %t 
n53=    dec %i
n54=  }
n55=  return %t
n56=}
n57=
n58=squaretalk {
n59=  tokenize 32 $1-
n60=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n61=  while %i {
n62=    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c5,10,10,2),$replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%c6,10,10,2),%u,%b,$replace($mid(%w,2),:, :,!, !),$chr(15)) %t 
n63=    dec %i
n64=  }
n65=  return %t
n66=}
n67=
n68=sillabatalk {
n69=  tokenize 32 $1-
n70=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n71=  while %i {
n72=    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c7,10,10,2),$replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%c8,10,10,2),%u,%b,$replace($mid(%w,2),:, 15:,!, 15!),$chr(15)) %t 
n73=    dec %i
n74=  }
n75=  return %t
n76=}
n77=xtalk {
n78=  tokenize 32 $1-
n79=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n80=  while %i {
n81=    var %w $ [ $+ [ %i ] ],%t =  $+ $+($chr(3),$base(%xc1,10,10,2), $+  $+ $replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%xc2,10,10,2),%u,%b, $+  $+ $replace($mid(%w,2),:, :,!, !),$chr(15)) %t 
n82=    dec %i
n83=  }
n84=  return %t
n85=}
n86=ntalk {
n87=  tokenize 32 $1-
n88=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n89=  while %i {
n90=    var %w $ [ $+ [ %i ] ],%t =  $+ $+($chr(3),$base(%c70,10,10,2), $+  $+ $replace($left(%w,1),a, Ä,b, B,c, C,d, D,e, Ë,f, F,g, G,h, H,i, Ï,j, J,k, K,l, L,m, M,n, N,o, Ö,p, P,q, Q,r, R,s, S,t, T,u, Ü,v, V,w, W,x, X,y, Y,z, Z,[, [,], ]),$chr(3),$base(%c71,10,10,2),%u,%b, $+  $+ $replace($mid(%w,2),a, ä,b, b,c, c,d, d,e, ë,f, f,g, g,h, h,i, ï,j, j,k, k,l, l,m, m,n, n,o, ö,p, p,q, q,r, r,s, s,t, t,u, û,v, v,w, w,x, x,y, y,z, z,:, :,!, !),$chr(15)) %t 
n91=    dec %i
n92=  }
n93=  return %t
n94=}
n95=
n96=ferma_tutti {
n97=  if (%triviap == ON) { .timertriv* off | set %triviap off }
n98=  if (%bifrontip == ON) { .timerbif* off | set %bifrontip off }
n99=  if (%bombap == ON) { .timerbomb* off | set %bombap off }
n100=  if (%consonando_gioco == ON) { .timercons* off | set %consonando_gioco OFF }
n101=  if (%estremip == ON) { .timerestr* off | set %estremip off }
n102=  if (%gameframeup_stato == ON) { .timerfram* off | set %gameframeup_stato OFF }
n103=  if (%impicca == ON) { .timerimp* off | set %impicca off }
n104=  if (%invertip == ON) { .timerinv* off | set %invertip off }
n105=  if (%xTSillaba_gioco == ON) { .timersill* off | set %xTSillaba_gioco OFF }
n106=  if (%testacodap == ON) { .timertest* off | set %testacodap off }
n107=  if (%traducip == ON) { .timertrad* off | set %traducip off }
n108=  if (%kaosp == ON) { .timerka* off | set %kaosp off }
n109=  if (%vocalando_gioco == ON) { .timervoc* off | set %vocalando_gioco off }
n110=  if (%matep == ON) { .timermat* off | set %matep off }
n111=  if (%gamescarat_stato == ON) { .timersca* off | set %gamescarat_stato off }
n112=  if (%scarat_manche == ON) { set %scarat_manche off }
n113=  if (%jack1p == ON) { .timerjack* off | set %jack1p off }
n114=  if (%jack2p == ON) { .timerjack* off | set %jack2p off }
n115=  if (%jack3p == ON) { .timerjack* off | set %jack3p off }
n116=  if (%jack4p == ON) { .timerjack* off | set %jack4p off }
n117=  if (%bonus1p == ON) { .timerbon* off | set %bonus1p off }
n118=  if (%bonus2p == ON) { .timerbon* off | set %bonus2p off }
n119=  if (%anagrammp == ON) { .timerana* off | set %anagrammp off }
n120=  if (%pnasc == ON) { .timerpna* off | set %pnasc off }
n121=  if (%gamescacchiera_stato == ON) { .timer* off | set %gamescacchiera_stato off }
n122=  if (%gameformaparole_stato == ON) { .timer* off | set %gameformaparole_stato off }
n123=  if (%gameserpente_stato == ON) { .timer* off | set %gameserpente_stato off }
n124=  if (%gameraddpp_stato == ON) { .timer* off | set %gameraddpp_stato off }
n125=  .timeratt* off | .timerhint* off | set %xtrivia OFF | write -c words | triv_rem settings consecutive | triv_rem settings utonto
n126=}