/ScriptServ

[variables]
n0=%counter 1
[script]
n0=;##########################################
n1=;######## Botolo by -[ {sTReGa} ]- ########
n2=;##########################################
n3=
n4=
n5=on *:dialog:stre.bot:sclick:415 {
n6=  set %lista 1
n7=  echo 7Lista5 simpatico 7caricata con successo! 
n8=}
n9=
n10=on *:dialog:stre.bot:sclick:416 {
n11=  set %lista  2
n12=  echo 7Lista5 Depresso 7caricata con successo! 
n13=}
n14=
n15=on *:dialog:stre.bot:sclick:417 {
n16=  set %lista 3
n17=  echo 7Lista5 Romantico 7caricata con successo! 
n18=}
n19=
n20=on *:dialog:stre.bot:sclick:418 {
n21=  set %lista 4
n22=  echo 7Lista5 Scurrile 7caricata con successo! 
n23=}
n24=
n25=
n26=on 1:TEXT:%parolastono:#: { 
n27=  if (%modbotolo = 1) {
n28=    set %colore  $+ %scritta $+ , $+ %sfondo
n29=    if (%lista = 1) { msg $chan —]10 $+ $nick $+ [— %colore  $read(addons/Stono.txt) }
n30=    if (%lista = 2) { msg $chan —]10 $+ $nick $+ [— %colore  $read(addons/Stono2.txt) }
n31=    if (%lista = 3) { msg $chan —]10 $+ $nick $+ [— %colore  $read(addons/Stono3.txt) }
n32=    if (%lista = 4) { msg $chan —]10 $+ $nick $+ [— %colore  $read(addons/Stono4.txt) }
n33=  }
n34=  if (%modbotolo = 2) {
n35=    if (%lista = 1) { msg $chan —]10 $+ $nick $+ [— $bottalk(  $read(addons/Stono.txt) ) }
n36=    if (%lista = 2) { msg $chan —]10 $+ $nick $+ [— $bottalk(  $read(addons/Stono2.txt) ) }
n37=    if (%lista = 3) { msg $chan —]10 $+ $nick $+ [— $bottalk(  $read(addons/Stono3.txt) ) } 
n38=    if (%lista = 4) { msg $chan —]10 $+ $nick $+ [— $bottalk(  $read(addons/Stono4.txt) ) }
n39=  }
n40=}
n41=
n42=alias bottalk {
n43=  tokenize 32 $1-
n44=  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))
n45=  while %i {
n46=    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c13,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(%c14,10,10,2),%u,%b,$replace($mid(%w,2),:, :,!, !),$chr(15)) %t 
n47=    dec %i
n48=  }
n49=  return %t
n50=}