alias xyz {
  if ($prop = n) { return $+(-,$1,-) }
  var %r = $token($2-,0,$1), %ra = $token($2-,$rand(1,%r),$1)
  return %ra
}
on *:text:*:#: {
  if $regex($1,/[!.]f(i|ı)rlat/i) { 
    if !$2 { msg # $xyz($nick).n lutfen nick giriniz sonra firlatalim. | return }
    var %firlat = leptop"leptopu geri firlatti" ‡ kalem"saplandi" ‡ masa"yardi" ‡  tekerlek"uzerinden gecti" ‡ canta"carpti" ‡ gözlük"kırıldı" ‡  tas"kırdı" ‡  telefon"kirildi" ‡  bicak"saplandi", cicek"tekrar kaldirdi kokladi", $&
      %firlatilan = $xyz(135,%firlat), %carpma = kafasina ayagina koluna beline, %carpan = $xyz(32,%carpma), %tutma = Manevra  ‡ hizli koşu  ‡ senden once hareket, %kacma = $xyz(135,%tutma), $&
      %denge = $iif($rand(1,10) >= 1,on,off)
    msg # 5 $xyz($nick).n 2 elinde5 $token(%firlatilan,1,34) 2 tutup5 $xyz($2).n 2 nickli arkadasa firlatti.
    if (%denge = on) { $+(.timer,$nick) 1 2 msg # 2 Firlatilan4 $token(%firlatilan,1,34) 2 $xyz($2).n  arkadasin  5 %carpan 2 isabet etti ve5 $token(%firlatilan,2,34)  }
    if (%denge = off) { $+(.timer,$nick) 1 2 msg # 2 Firlatilan $token(%firlatilan,1,34) 2 $xyz($2).n arkadasin  5 %carpan 2 isabet etmedi cunki 4 %kacma 2 yaparak kurtuldu } 
  }
}