All pastes #246121 Raw Edit

talkers

public text v1 · immutable
#246121 ·published 2006-11-11 22:11 UTC
rendered paste body

#symboli© off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say $replace($1-,a,Å,b,ß,c,¢,d,Ð,l,L,n,Ñ,o,Ø,r,®,s,§,y,¥,1/2,½,1/4,¼,3/4,¾,?,?¿?) | halt
}
#symboli© end

#satinc off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  ;set %myline $1-
  /say 15,0<<14,15<<1,14<<14,1<<8 < 11 %myline 8 > 14>>15,14>>14,15>>15,0>>| halt
}
#satinc end

#satin1 off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say 8,1<9<12<13S12>9>8>4,1 %myline  8<9<12<13S12>9>8> | halt
}
#satin1 end

#redz off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say 4,0-:|5,4 %myline 4,0|:- | halt
}
#redz end

#pinkie off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say 13,0-:|6,13 %myline 13,0|:- | halt
}
#pinkie end

#rosy off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say 3,1.»4º©º3«..»4º©º3«.0 %myline 3,1.»4º©º3«..»4º©º3«. | halt
}
#rosy end

#blooz off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say 11<12,11<2,12<12,2<11,2 %myline 12,2>2,12>12,11>11,0> | halt
}
#blooz end

#randcol off
on *:INPUT:*:{
  if ($left($1,1) == /) return
  if ($left($target,1) == @) return
  ;set %myline $1-
  /say  $+ %speakcol $replace(%myline,a,A,b,B,I,i,l,L,n,N,o,0,r,R,s,§,y,¥,1/2,½,1/4,¼,3/4,¾,?,?¿?) |  halt
}
#randcol end
menu menulist,channel,query,nicklist {

  <- Talkers ->
  .Colours:.disable #satin1   | .disable #rosy   | .disable #redz   | .disable #blooz   | .disable #pinkie   | .disable  #symboli©   | .enable #satinc  | .disable #randcol   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .Satin1:.disable  #symboli©   | .disable #rosy   | .disable #redz   | .disable #blooz   | .disable #pinkie   | .disable #satinc  | .disable #randcol   | .enable #satin1   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .Symboli©:.disable #satin1   | .disable #rosy   | .disable #redz   | .disable #blooz   | .disable #pinkie   | .disable #satinc  | .disable #randcol  | .enable #symboli©   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .Roses:.disable #satin1   | .enable #rosy   | .disable #redz   | .disable #blooz   | .disable #pinkie   | .disable #satinc  | .disable #randcol  | .disable #symboli©   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .Redz:.disable #satin1   | .disable #rosy   | .enable #redz   | .disable #blooz   | .disable #pinkie   | .disable #satinc  | .disable #randcol  | .disable #symboli©   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .Blooz:.disable #satin1   | .disable #rosy   | .disable #redz   | .enable #blooz   | .disable #pinkie   | .disable #satinc  | .disable #randcol  | .disable #symboli©   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .Pinkie:.disable #satin1   | .disable #rosy   | .disable #redz   | .disable #blooz   | .enable #pinkie   | .disable #satinc  | .disable #randcol  | .disable #symboli©   | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .-
  .ColourTlk:.disable #satin1   | .disable #rosy   | .disable #redz   | .disable #blooz   | .disable #pinkie   | .disable #satinc  | .disable #symboli©   | .randcol  | echo 4 -a Talker Enabled2 - Select 'Normal' from the Talkers menu to disable.
  .set colour:/unset %speakcol   | /set %speakcol $$?="pick colour number: 4=red 12=blue 3=green 6=purple"
  .-
  .Normal:/.disable  #symboli©   | /.disable #satinc   | /.disable #satin1   | /.disable #rosy   | /.disable #redz   | /.disable #blooz  | /.disable #randcol   | /.disable #pinkie   | /echo 4 -a Talker Disabled - Normal Mode
}