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


ircforumu sekershelldamlasu
bizimkiler sihirlisohbet sohbetelit


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 22 Aralık 2016, 19:10   #1
Çevrimdışı
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
mIRC Puan Sistemi eklentisi


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#:{ if $1 == !puan { if ($2 == list) { top10 | goto t0p10 } elseif !$read(puan.txt,w,$+(*,$2,*)) { msg $chan $2 puan listesinde yok } if $2 == $me { msg # $+($nick,:) Benim puanmımı boşver, sen sohbetine bak. | goto t0p10 } elseif ($2 == $nick && $read(puan.txt,w,$+(*,$2,*))) { msg $chan $read(puan.txt,$readn) puanın var | goto t0p10 } } if !$read(puan.txt,w,$+(*,$nick,*)) { write puan.txt $nick 100 | halt } else { var %dify $readn var %yeah = $calc($token($read(puan.txt,%dify),2,32) +1) write $+(-l,%dify) puan.txt $nick %yeah if %yeah == 1000 { mode $chan +v $nick | msg $chan Tebrikler $nick 1.000 puanın oldu } } :t0p10 } alias top10 { var %cnk = @dify, %hit = 10, %e = puan.txt, %top10 = 1 window -hn %cnk filter -fwcteu 2 32 %e %cnk msg # 7,17,1 14«15««7 Turkiye Kanalında En Cok Konusma Puanına Sahip Olan 10 Kişi: 15»»14» while %top10 <= %hit { msg # 12 $ord(%top10) $line(%cnk,%top10) | inc %top10 } window -c %cnk }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#:{ if $1 == !puan { if ($2 == list) { top10 | goto t0p10 } elseif !$read(puan.txt,w,$+(*,$2,*)) { msg $chan $2 puan listesinde yok } if $2 == $me { msg # $+($nick,:) Benim puanmımı boşver, sen sohbetine bak. | goto t0p10 } elseif ($2 == $nick && $read(puan.txt,w,$+(*,$2,*))) { msg $chan $read(puan.txt,$readn) puanın var | goto t0p10 } } if !$read(puan.txt,w,$+(*,$nick,*)) { write puan.txt $nick 100 | halt } else { var %dify $readn var %yeah = $calc($token($read(puan.txt,%dify),2,32) +1) write $+(-l,%dify) puan.txt $nick %yeah if %yeah == 1000 { mode $chan +v $nick | msg $chan Tebrikler $nick 1.000 puanın oldu } } :t0p10 } alias top10 { var %cnk = @dify, %hit = 10, %e = puan.txt, %top10 = 1 window -hn %cnk filter -fwcteu 2 32 %e %cnk msg # 7,17,1 14«15««7 Turkiye Kanalında En Cok Konusma Puanına Sahip Olan 10 Kişi: 15»»14» while %top10 <= %hit { msg # 12 $ord(%top10) $line(%cnk,%top10) | inc %top10 } window -c %cnk }

  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
eklentisi, mirc, puan, sistemi
IRCForumu.Net - Sponsor Bağlantılar


Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık