/ScriptServ

[aliases]
n0=F2 /clear
n1=/op /mode # +ooo $$1 $2 $3
n2=/j /join #$$1 $2-
n3=/who /who #$$1 $2-
n4=/p /part #
n5=/n /names #$$1
n6=/w /whois $$1
n7=/k /kick # $$1
n8=/q /query $$1
n9=/send /dcc send $1 $2
n10=/ping /ctcp $$1 ping
n11=/lag /ping $me
n12=/pm /query $$1
n13=/Chan.stats {
n14=
n15=  echo -a 1··················11 $+ #
n16=  echo -a 4There Are1 $nick(#,0) 4Total
n17=  echo -a 4There Are1 $opnick(#,0) 4Opped
n18=  echo -a 4There Are1 $vnick(#,0) 4Voiced
n19=  echo -a 4Modes Are1 $chan(#).mode
n20=  echo -a 4Topic Is1 $chan(#).topic
n21=  echo -a 1··················11 $+ #
n22=}
n23=/hey {
n24=  set %nicklength $len($$1)
n25=  set %nickdesignl $right(#-·:_:·'~'·:_:·'~'·->, $+ $calc(22 - (%nicklength / 2)))
n26=  set %nickdesignr $left(<-·'~'·:_:·'~'·:_:·-#, $+ $calc(22 - (%nicklength / 2)))
n27=  set %nickcolor 2,1·,.12,·'~~'·11,.,·----->  $+ $rand(2,15) $+ HEY! 11<-----·,.,12·'~~'·,2.,·
n28=  set %nicklinelength $calc(($len(%nickdesignl)) + %nicklength + $len(%nickdesignr)))
n29=  set %nickcolorlength 46
n30=  set  %nicktotal $calc(%nickcolorlength - 3)
n31=  if (%nicktotal == %nicklinelength) /set %nickdesignr %nickdesignr $+ ·
n32=  me %nickcolor
n33=  me 4,1 $+ %nickdesignl 8 $+ $$1 4 $+ %nickdesignr
n34=  me %nickcolor
n35=  unset %nicklength %nickdesignl %nickdesignr %nickcolor %nicklinelength %nickcolorlength
n36=}
n37=/wb {
n38=  set %nicklength $len($$1)
n39=  set %nickdesignl $right(]]]]>>>>==-->, $+ $calc(12 - (%nicklength / 2)))
n40=  set %nickdesignr $left(<--==<<<<[[[[, $+ $calc(12 - %nicklength / 2)))
n41=  set %nickcolor  $+ $rand(2,13) $+ ,1** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ **
n42=  set %nicklinelength $calc( $len(%nickdesignl) + %nicklength + $len(%nickdesignr) + 2)
n43=  set %nickcolorlength 26
n44=  if (%nickcolorlength > %nicklinelength) /set %nickdesignl § $+ %nickdesignl
n45=  if (%nickcolorlength > %nicklinelength) /set %nickdesignr %nickdesignr $+ §
n46=  if (%nickcolorlength > %nicklinelength) /set %nickstar §
n47=  if (%nickcolorlength > %nicklinelength) /set %nickcolor  $+ $rand(2,13) $+ ,1** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ * $+ %nickstar $+ * $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ ** $+ $rand(2,13) $+ WB $+ $rand(2,13) $+ **
n48=  me %nickcolor
n49=  me 11,1 $+ %nickdesignl 8 $+ $$1 11 $+ %nickdesignr
n50=  me %nickcolor
n51=  unset %nicklength %nickdesignl %nickdesignr %nickcolor %nicklinelength %nickcolorlength %nickstar
n52=}
n53=/bye {
n54=  set %nicklength $len($$1)
n55=  set %nickdesignl $right(;°·._.·°·._.·°·, $+ $calc(13 - (%nicklength / 2)))
n56=  set %nickdesignr $left(·°·._.·°·._.·°;, $+ $calc(14 - %nicklength / 2)))
n57=  set %nickdesignrlength $len($left(·°·._.·°·._.·°;, $+ $calc(13 - %nicklength / 2))))
n58=  set %nickcolor  $+ $rand(2,13) $+ ,1---- $+ $rand(2,13) $+ ---- $+ $rand(2,13) $+ ==== $+ $rand(2,13) $+ BYE! $+ $rand(2,13) $+ ==== $+ $rand(2,13) $+ ---- $+ $rand(2,13) $+ ----
n59=  set %nicklinelength $calc( $len(%nickdesignl) + %nicklength + %nickdesignrlength + 2)
n60=  set %nickcolorlength 28
n61=  if (%nicklinelength => %nickcolorlength) /set %nickdesignr $left(%nickdesignr, $+ $calc(%nickdesignrlength))
n62=  me %nickcolor
n63=  me 11,1 $+ %nickdesignl 8 $+ $$1 11 $+ %nickdesignr
n64=  me %nickcolor
n65=  unset %nicklength %nickdesignl %nickdesignr %nickcolor %nicklinelength %nickcolorlength %nickdesignrlength %nicktotallength %nicktotal
n66=}
n67=/ty {
n68=  set %nicklength $len($$1)
n69=  set %nickdesignl $right(!¡!¡!¡!¡!¡!¡!¡!¡!, $calc(16 - (%nicklength / 2)))
n70=  set %nickdesignr $left(¡!¡!¡!¡!¡!¡!¡!¡!¡, $calc(16 - (%nicklength / 2)))
n71=  set %nickdesignrlength $len(%nickdesignr)
n72=  set %nickdesignllength $len(%nickdesignl)
n73=  set %nickcolor  $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1, $+ $rand(2,15) $+ ,1~ $+ $rand(2,15) $+ ,1˜ $+ $rand(2,15) $+ ,1` $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1§ $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1~ $+ $rand(2,15) $+ ,1‚ $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1- $+ $rand(2,15) $+ ,1THANKS! $+ $rand(2,15) $+ ,1- $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1, $+ $rand(2,15) $+ ,1~ $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1§ $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1` $+ $rand(2,15) $+ ,1˜ $+ $rand(2,15) $+ ,1~ $+ $rand(2,15) $+ ,1, $+ $rand(2,15) $+ ,1.
n74=  set %nicklinelength $calc(%nickdesignllength + %nicklength + %nickdesignrlength)
n75=  set %nickcolorlength 31
n76=  me %nickcolor
n77=  if (%nickcolorlength < %nicklinelength) set %nickdesignl $right(!¡!¡!¡!¡!¡!¡!¡!¡!, $calc(15 - (%nicklength / 2)))
n78=  me 11,1 $+ %nickdesignl $+ 8 $+ $$1 $+ 11 $+ %nickdesignr
n79=  me %nickcolor
n80=  unset %nick*
n81=}
n82=/np {
n83=  set %nicklength $len($$1)
n84=  set %nickdesignl $right(‡‡‡===---···...……, $calc(16 - (%nicklength / 2)))
n85=  set %nickdesignr $left(……...···---===‡‡‡, $calc(16 - (%nicklength / 2)))
n86=  set %nickdesignrlength $len(%nickdesignr)
n87=  set %nickdesignllength $len(%nickdesignl)
n88=  set %nickcolor  $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1{ $+ $rand(2,15) $+ ,1NO PROBLEM! $+ $rand(2,15) $+ ,1} $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1¤ $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1· $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1. $+ $rand(2,15) $+ ,1.
n89=  set %nicklinelength $calc(%nickdesignllength + %nicklength + %nickdesignrlength)
n90=  set %nickcolorlength 31
n91=  me %nickcolor
n92=  if (%nickcolorlength < %nicklinelength) set %nickdesignl $right(‡‡‡===---···...……, $calc(15 - (%nicklength / 2)))
n93=  me 11,1 $+ %nickdesignl $+ 8 $+ $$1 $+ 11 $+ %nickdesignr
n94=  me %nickcolor
n95=  unset %nick*
n96=}
n97=/pf timer 4 0 ping $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1 $+ , $+ $$1