Tekil Mesaj gösterimi
Alt 23 Eylül 2019, 16:22   #9
Çevrimiçi
mys_35
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Selam Puan Botu Yardım Edermisiniz ..




on *:text:*:#: {
var %< = $+(%,Puan.,#,.,$nick)
if ($1 == !Puan) { if (!$2 || $2 == $nick) { msg # 1[4 $nick 1]3 $Chan 1Kanalındaki Toplam Puanınız 1[4 $(%<,2) 1] }
else { msg # 1[4 $2 1] Nickinin Puanına Bakamazsınız. 3!geveze 1Komutu İle Genel Puanlamayı Listeleyiniz. }
}
elseif ($1 == !geveze) {
var %a = $var($($+(%,Puan.,#,.*)),0),%c
while (%a > 0) { var %b = $var($($+(%,Puan.,#,.*)),$v1),%n = $gettok(%b,-1,46),%c = $addtok($(%b,2) %n,%c,160),%a = $calc(%a -1) }
%c = $sorttok(%c,160,rn)
tokenize 160 %c
.msg # 1[3 $Chan 1] Kanalında En Çok Sohbet Eden Kullanıcılar
.msg # 1. 4 $1 1
.msg # 2. 4 $2 1
.msg # 3. 4 $3 1
.msg # 4. 4 $4 1
.msg # 5. 4 $5 1
.msg # 6. 4 $6 1
.msg # 7. 4 $7 1
.msg # 8. 4 $8 1
.msg # 9. 4 $9 1
.msg # 10. 4 $10 1
}
else {
inc $(%<,1)
if ($istok(10 30 40 45 60 75 100 120 135 150 175 200 225 250 275 300,$(%<,2),32) && $(%<,2)) { .msg $chan $nick $read(Puan.txt,wn,$+($v1,$chr(32),*)) }
if $(%<,2) == 300 { .mode $chan +v $nick $+ }
}
}




[16:14:59] <Extra> [ #kanal ] Kanalında En Çok Sohbet Eden Kullanıcılar
[16:14:59] <Extra> 1. 38 nick1
[16:14:59] <Extra> 2. 20 nick1
[16:14:59] <Extra> 3.
[16:14:59] <Extra> 4.
[16:15:00] <Extra> 5.
[16:15:00] <Extra> 6.
[16:15:00] <Extra> 7.
[16:15:00] <Extra> 8.
[16:15:00] <Extra> 9.
[16:15:00] <Extra> 10.

böyle çıkıyor benim istedigim ise böyle çıkması

[15:44:11] <Extra> *** #kanal Kanalı Günün Gevezeleri ***
[15:44:11] <Extra>
[15:44:11] <Extra> 1) jhgfj ---> Satır : 494
[15:44:11] <Extra> 2) hfadhfd ---> Satır : 296
[15:44:11] <Extra> 3) hfahf ---> Satır : 241
[15:44:11] <Extra> 4) dvdvv ---> Satır : 236
[15:44:11] <Extra> 5) hfdhfd ---> Satır : 153
[15:44:11] <Extra> 6) vbnbf ---> Satır : 150
[15:44:11] <Extra> 7) fbfbf ---> Satır : 142
[15:44:11] <Extra> 8) bbfbFBV ---> Satır : 125
[15:44:11] <Extra> 9) bfbbfs ---> Satır : 112
[15:44:11] <Extra> 10) vgdvb ---> Satır : 110

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet