#KaLaMs on
on 1:INPUT:*: { 
  if ($left($1,1) = /) { return } 
  if ($1 ison $chan) { return } 
  set %mote $rand(1,1) 
  if (%mote == 1) { set %tupac $1- } 
  %tupac = $replace(%tupac,Ð,Ðõ) 
  %tupac = $replace(%tupac,Ï,Ïó) 
  %tupac = $replace(%tupac,Ì,Ìø) 
  %tupac = $replace(%tupac,Í,Íò) 
  %tupac = $replace(%tupac,Î,Îñ) 
  %tupac = $replace(%tupac,å,åõ) 
  %tupac = $replace(%tupac,Ú,Úú) 
  %tupac = $replace(%tupac,Û,Ûó) 
  %tupac = $replace(%tupac,Ý,Ýó) 
  %tupac = $replace(%tupac,Õ,Õó) 
  %tupac = $replace(%tupac,Ö,Öó) 
  %tupac = $replace(%tupac,Ô,Ôõ) 
  %tupac = $replace(%tupac,Ó,Óó) 
  %tupac = $replace(%tupac,í,íö) 
  %tupac = $replace(%tupac,È,Èõ) 
  %tupac = $replace(%tupac,Ê,Êñ) 
  %tupac = $replace(%tupac,ä,äó) 
  %tupac = $replace(%tupac,ã,ãö) 
  %tupac = $replace(%tupac,ß,ßõ) 
  %tupac = $replace(%tupac,Æ,Æõ) 
  %tupac = $replace(%tupac,Á,Áó) 
  %tupac = $replace(%tupac,Ä,Äõ) 
  %tupac = $replace(%tupac,Ñ,Ñö) 
  %tupac = $replace(%tupac,ì,ìó) 
  %tupac = $replace(%tupac,É,É) 
  %tupac = $replace(%tupac,æ,æö) 
  %tupac = $replace(%tupac,Ò,Òó) 
  %tupac = $replace(%tupac,Ù,Ùó) 
  msg $active %Tupac 
  halt 
} 
#KaLaMs end 

menu Status,menubar,channel { 
  -
  !ÇáßÊÇÈÉ ÈÇÍÑÝ ãÒÎÑÝå!
  .On:/.enable #KaLaMs off 
  .Off:/.disable #KaLaMs end 
}