IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

Kod:

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 } } }

!firlat nick*seklinde komutu kullanabilirsiniz.

Kod Sahibi : @Set