Selam Puan Botu Yardım Edermisiniz ..
 

Selam Arkadaşlar ;
Sizden Isteğim Olucaktı Sunucuma Güzel Bir Puan Botu Yapmak Istiyorum
Botun adı ; YPB
Userin kanalda konuştuğunda puan alması
Kanalda Konuşan Userlere her 20 puanda bir
Bot ( gaz verici kelimeler kullansı )
-
Abicim o puanları Bot txt'e kaydedicek her user kendi puanını !puan yazdığında bilicek
-
1000 Puana ulaşan userlerin nicklerini
Bot
Ornek: 1000 puanlı userlerimizden ahmet kanala geldi gibi espirili SÖylemesini istiyorum Lütfen yardımcı olunuz.
[ Difusyon ve SAYIN Coderlerimiz ]

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

Velhasılkelam benim mIRCTurk.Com için yazdığım MPB yi istiyorsun (:

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

senin dedigin gibi bise yok bende ama size bole bi kod verebilirim kulanimi

!puan nick yazarak kanalda konusanin puanini gosterir bide 1000 puani olunca bot ona voice verecek

bu kod sezar a ait

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

CipriX Üstadim Botu PayLasirsan Seviniriz :)

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

Birde Kullanıcıya Puanı swhois olarak eklense X Nick'inin Puanı 10 şeklinde Mnp mi ne bu işlev vardı sanırım:)

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

güzlemiş ya paylaşırmısınız.

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

ciprix sizlere ömür :)

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

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

Cevap: Selam Puan Botu Yardım Edermisiniz ..
 

Konuşma puan/satırlarını kayıtlayan kodu da paylaşın ona binaen bu kod düzeltilebilir @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]