alias kanaldakiler {
  if $hget(kanaldaki) { .hfree kanaldaki }
  var %; = 1
  while $nick($chan,%;) {
    if !$istok($nick $me E-Bot S-Bot S-Puan,$v1,32)  {
      .hadd -m kanaldaki %; $nick($chan,%;)
    } 
    inc %;
  }
}
on $*:text:/^[.!]arkada[sşŞ]/Si:#:{
  if ($2) { msg $chan $+($chr(3),4,$nick,$chr(44)) 2sadece 4!arkadas 2yazınız... }
  elseif $hget(arkadas,$nick) { .notice $nick $hget(arkadas,$nick).unset saniye içersinde, Yalnız 1 defa [!]arkadas Komutunu Kullanabilirsiniz. }
  else { 
  .kanaldakiler | .timerarkads 1 1 msg $chan $+($chr(3),4,$nick,$chr(59)) 2işte senin için en ideal arkadaş: $+($chr(3),4,$hget(kanaldaki,$r(1,$hget(kanaldaki,0).data)).data) }
  .hinc -mu60 arkadas $nick
}