IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Ceza ve Puan (https://www.ircforumlari.net/mirc-scripting-sorunlari/540862-ceza-ve-puan.html)

Hayırlı ramazanlar arkadaşlar forumda thunderboLt arkadaşımızın [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sayfasında paylaştıgı bi kod var kodu aşağıdaki gibi vermiş

on Yetkili:text:!cezaekle*:#kanal:{
if !$2 { msg # Hatalı kullanım. !cezaekle nick [miktar] şeklinde kullanın. | halt }
hinc -m cezalar $2 $iif($3,$3)
msg # $iif($3,$3,1) ceza puanı eklenmiştir.
}

Ceza ekleyebilecek yetkilileri;
/auser Yetkili nick şeklinde ekleyebilirsin.
Silmek için;
/ruser Yetkili nick

Kodu attıktan sonra //hmake cezalar | hsave cezalar cezalar.hash
komutunu uygulayıp, sonra
on 1:start:{ eventinin içine
hmake cezalar
hload cezalar cezalar.hash
timer -o 0 300 /hsave cezalar cezalar.hash

Altta vermiş oldugu ikinci kodla birleştirilmesini yapamadım yardımcı olurmusunuz birde bu kodda bazı eklemeler yapabilirmiyiz mesela örneğin !puansil, !puansor nick veya !puanlist komutları ve belirlenecek olan her puanlarda o nicke mesaj atsın örneğin
nick 100 puana ulaşınca /msg # $2 tebrikler 100 puana oluştınız .
yani bu çoğaltılmaya açık olabilirmi
yardım edicek veya etmiyecek herkese çok teşekkürler ve emeklerinize sağlık

Cevap: Ceza ve Puan

Yanlis Hatirlamiyorsam Puan sistemi Forumda birkac kez konusulmustu. Arama yaptiginiz taktirde bunlari görebilirsiniz.

Cevap: Ceza ve Puan

Alıntı:

Ku|L| Nickli Üyeden Alıntı (Mesaj 1041321780)

Yanlis Hatirlamiyorsam Puan sistemi Forumda birkac kez konusulmustu. Arama yaptiginiz taktirde bunlari görebilirsiniz.

Evet hocam forumda puan sistemi var ama onlar kanaldaki yazılan kelimelere göre puan olayı ne kadar aradıysamda hep aynı yani [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buna denk kodlarla karşılaştım bildiğiniz bi yer varsa link paylaşırmısınız rica etsem

Cevap: Ceza ve Puan

[COLOR="Blue"]Toprak Arkadaşımıza emeğinden dolayı teşekkür ederim kod güze çalışıyor.

Cevap: Ceza ve Puan

üstadım bu koda !puanlar yapıp kayıtlı puanları görebilirmiyiz

Cevap: Ceza ve Puan

Alıntı:

sito Nickli Üyeden Alıntı (Mesaj 1041341416)

üstadım bu koda !puanlar yapıp kayıtlı puanları görebilirmiyiz

Kod:

on *:text:*:#:{

  if $1 == !cezaekle {

    if (!$2) { msg # Nick belirtiniz. | return }

    if (!$3) { msg # Ceza Puan'ı belirtiniz. | return }

    if (!$hget(Ceza)) { .hmake Ceza | .hload -i Ceza Ceza.mercy }

    .hdec -m Ceza $2 $3 | .hload -i Ceza Ceza.mercy

    msg # Nick:[ $2 ] Ceza Puan'ı Toplam:[ $hget(Ceza,$2) ]

    if $hget(Ceza,$2) == 50 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 60 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 70 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 80 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 90 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 100 { msg # Puanın $hget(Ceza,$2) oldu }

  }

  if $1 == !puanekle {

    if (!$2) { msg # Nick belirtiniz. | return }

    if (!$3) { msg # Puan belirtiniz. | return }

    if (!$hget(Ceza)) { .hmake Ceza | .hload -i Ceza Ceza.mercy }

    .hinc -m Ceza $2 $3 | .hload -i Ceza Ceza.mercy

    msg # Nick:[ $2 ] Toplam Puan'ı:[ $hget(Ceza,$2) ]

    if $hget(Ceza,$2) == 50 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 60 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 70 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 80 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 90 { msg # Puanın $hget(Ceza,$2) oldu }

    if $hget(Ceza,$2) == 100 { msg # Puanın $hget(Ceza,$2) oldu }

  }

  if $1 == !puanlar { 

    var %c1 = 1,%c2 = $hget(Ceza,0).item

    while %c1 <= %c2 { msg # Nick: $hget(Ceza,%c1).item Puanı: $hget(Ceza,$hget(Ceza,%c1).item) | inc %c1 }

  }

  if $1 == !puan {

    if (!$2) { msg # Nick belirtiniz. | return }

    if !$strip($2) || $strip($2) == $nick {

      if $hget(Ceza,$2) { msg # 4 :[ $nick ] 1kullanıcısına ait toplam ; [ $hget(Ceza,$2) ] Puan bulunmakta | return }

      else { msg #  :[ $nick ]  nin Puan'ı bulunmamaktadır. | return }

    }

    if $strip($2) {

      if $hget(Ceza,$2) { msg #  :[ $strip($2) ] kullanıcısına ait toplam ; [ $hget(Ceza,$2) ]1 Puan bulunmakta | return }

      else { msg #  :[ $strip($2) ]  Puan'ı bulunmamaktadır. | return }

    }

  }

Cevap: Ceza ve Puan

Merhaba.
Mirc.6.35 ve üstünde çalışacak,
kanalda !ceza nick +süre sebep
!ceza list yazıldığında ceza listesi ( ceza alan nick >ceza sebebi > ceza süresi > kalan süre ) komutlarına yetki verilen kişilerin kullanabileceği , komuta yetkisi olmayanın yazdığında komuta erişiminiz yoktur diyerek kanala uyarı mesajı atabileceği bir kod yazabilir misiniz ?

Örnek:

<Test> !ceza list
<BoT> Ceza alan kullanıcılar listesi:
<BoT> Ceza alan kullanıcı yok.
<Test> !ceza aliveli 1d Forum ihlali
<BoT> Aliveli kullanıcısı 1gün ceza almıştır.
<Test> !ceza ahmet 2d Forum ihlali
<BoT> ahmet kullanıcısı 2gün ceza almıştır.
<Test> !ceza list
<BoT> Ceza alan kullanıcılar listesi:
<BoT> 1) Nick: Aliveli : Ceza Sebebi: Forum İhlali: Ceza bitimi süresi: 23saat 58dk.
<BoT> 2) Nick: Ahmet : Ceza Sebebi: Forum İhlali: Ceza bitimi süresi: 47saat 59dk.

1günlük süre sonunda ise:

<Test> !ceza list
<BoT> 1) Ceza süresi dolan kullanıcı: Aliveli
<BoT> 2) Nick: Ahmet : Ceza Sebebi: Forum İhlali: Ceza bitimi süresi: 23saat 59dk.
<Test> !cezasil aliveli
<BoT> Aliveli ceza süresi dolduğu için silinmiştir.
<Test> !cezalist
<BoT> 1) Nick: Ahmet : Ceza Sebebi: Forum İhlali: Ceza bitimi süresi: 23saat 59dk.

Sevgi ve Saygılarımla.

Cevap: Ceza ve Puan

Sayın Coderlar. Müsait olan arkadaşımız 2 post yukarıda verdiğim şekilde karınca kararınca yardımcı olabilir mi. Teşekkürler Saygılar

Cevap: Ceza ve Puan

+güncel. Yardımcı olursanız sevinirim. Saygılar