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

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - !söz Addonu (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/702052-soz-addonu.html)

Kod:

on *:text:*:?: { 

  if $1 == !soz && $3 {

    var %senyor2 $replace($2-,$chr(32),+) $+ $chr(0229) $+ $nick 

    var %senyor $rand(101,9999)

    hadd -m soz %senyor %senyor2 

    msg #opers 4 $gettok($replace($hget(soz,%senyor),+,$chr(32)),1,$asc(å)) 1Sözü Onay Listesine Alindi. Bu Sözü Onaylamak İçin4 !onay %senyor 1Yaziniz. (Ekleyen Nick:13 $gettok($replace($hget(soz,%senyor),+,$chr(32)),2,$asc(å)) )

    msg $nick Talebiniz İlgililere İletilmiştir, Sözünüz Onaylandiğinda Veya Reddedildiğinde Size Memo Yoluyla Bilgi Verilecektir. Haberdar Olabilmek İçin Nickinizin Kayitli Oldugundan Emin Olunuz.

  }

}

on *:text:*:#: { 

  if $chan == #opers { 

    if $1 == !silsoz && $2 { 

      if $hget(soz,$2) {

        msg #opers 4 $2 1Kod Numaralı4 $gettok($replace($hget(soz,$2),+,$chr(32)),1,$asc(å)) 1Sözü İsteğiniz Üzere 4Silinmiştir

        msg memoserv send $gettok($hget(soz,$2),2,$asc(å)) Sayin $gettok($hget(soz,$2),2,$asc(å)) Gönderdiğiniz $2 Onay Numarali Söz Uygun Bulunmamiştir.. İlginize Teşekkür Ederim.

        hdel -s soz $2 

      }

    }

    if $1 == !listeleonayli && !$2 { 

      var %i 1 

      while %i <= $lines(onaylisoz.txt) { 

        msg # $read(onaylisoz.txt,%i)

        inc %i

      }

    }

    if $1 == !listelesoz && !$2 { 

      var %i 1 

      while %i <= $hmatch(soz,*,*) { 

        msg #opers 4Söz:10 $gettok($replace($hget(soz,$hmatch(soz,*,%i)),+,$chr(32)),1,$asc(å)) 7Onay Kodu:12 $hmatch(soz,*,%i)

        inc %i

      }

    }

    if $1 == !onay && $2 {

      if $hget(soz,$2) { 

        write onaylisoz.txt $gettok($replace($hget(soz,$2),+,$chr(32)),1,$asc(å)) Onay Numarasi:4 $2 1Gönderen Nick:4 $gettok($hget(soz,$2),2,$asc(å)) | msg #ufuk 4 $gettok($replace($hget(soz,$2),+,$chr(32)),1,$asc(å)) 1Sözü Onaylanmiştir.

        msg memoserv send $gettok($hget(soz,$2),2,$asc(å)) Sayin $gettok($hget(soz,$2),2,$asc(å)) Gönderdiğiniz $2 Onay Numarali Söz Onaylanmiştir. İlginize Teşekkür Ederim.

        hdel soz $2 

      }

    }

  }

  if $1 == !soz && $2 { 

    msg # 4 $2 -->12 $read(onaylisoz.txt)

  }

}

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Komutlar:

Botun Özeline: !soz eklenecek söz şeklinde yazilir.

#Opers Kanalına Eklenen Söz Onaya Onay Numarasıyla Beraber Düşer;

Onaylamak İçin: !onay onaynumarasi

Onaylanmamiş Sözleri Listelemek İçin: !listelesoz

Onaylanmiş Sözleri Listelemek İçin: !listeleonayli

Onay Bekleyen Fakat Onaylanmasi İstenmeyen Sözü Onay Listesinden Kaldirmak İçin: !silsoz onaynumarasi

Birine Kanalda Söz Göndermek İçin: !soz <nicki>

Resimden Komutlari Daha Net Anlayabilirsiniz.

Dipnot: 3 Kelimeden Daha Az Kelime Sayisina Sahip Sözler Eklenemez. !soz Naber Nasilsin Eklenmez. !soz Naber Nasilsin İyiyim Eklenir.

Onay Kanalı Default #Opers 'dir koddan kendinize göre değiştirebilirsin.

Kod Dahada Geliştirilebilir Mesela !söz Ekleyen Kişilerin Ekledikleri Sözün Onaylanip Onaylanmadiği Memo Yoluyla Karşi Tarafa İletilebilir.

Bunun Gibi Başka Eklemelerde Aklınıza Gelirse Üzerine Koyarim.

Cevap: !söz Addonu

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Sen gerçekten iyisin .. : ) Tesekkurler...

Cevap: !söz Addonu

Alıntı:

uFuK Nickli Üyeden Alıntı (Mesaj 1041685550)

PHP- Kodu:

   on *:text:*:?: { 

  if $1 == !soz && $3 {

    var %ufuk $replace($2-,$chr(32),+)

    var %senyor $rand(101,9999)

    hadd -m soz %senyor uk 

    msg #Opers 4 $replace($hget(soz,%senyor),+,$chr(32)) 1Sözü Onay Listesine Alindi. Bu Sözü Onaylamak İçin4 !onay %senyor 1Yaziniz.

  }

}

on *:text:*:#: { 

  if $chan == #opers { 

    if $1 == !silsoz && $2 { 

      if $hget(soz,$2) {

        msg #Opers 4 $2 1Kod Numaralı4 $replace($hget(soz,$2),+,$chr(32)) 1Sözü İsteğiniz Üzere 4Silinmiştir

        hdel -s soz $2 

      }

    }

    if $1 == !listeleonayli && !$2 { 

      var %i 1 

      while %i <= $lines(onaylisoz.txt) { 

        msg # $read(onaylisoz.txt,%i)

        inc %i

      }

    }

    if $1 == !listelesoz && !$2 { 

      var %i 1 

      while %i <= $hmatch(soz,*,*) { 

        msg #Opers 4Söz:10 $replace($hget(soz,$hmatch(soz,*,%i)),+,$chr(32)) 7Onay Kodu:12 $hmatch(soz,*,%i)

        inc %i

      }

    }

    if $1 == !onay && $2 {

      if $hget(soz,$2) { 

        write onaylisoz.txt $replace($hget(soz,$2),+,$chr(32)) | msg #Opers 4 $replace($hget(soz,$2),+,$chr(32)) 1Sözü Onaylanmiştir.

        hdel soz $2 

      }

    }

  }

  if $1 == !soz && $2 { 

    msg # 4 $2 -->12 $read(onaylisoz.txt)

  }

}

Eline sağlık usta ama bu sistemi oeprs kanalında deilde benim özelimde onaylanması mümkünmü acaba hocam. söz eklendiğinde eklenen söz benim özelime gelsin ve botun özeline !onay numara şeklinde onaylasam.

Cevap: !söz Addonu

Peki Sen Sunucuda Yoksan Kime Gidecek Onay Mesajı :)

#Opers Olan Yeri #Smith Diye Değiştirip Kanalı +s Yapsan Daha İyi Olur.

Yinede Özelimden Onaylansin İstiyorsan Yapayim

Cevap: !söz Addonu

Alıntı:

uFuK Nickli Üyeden Alıntı (Mesaj 1041685647)

Peki Sen Sunucuda Yoksan Kime Gidecek Onay Mesajı :)

#Opers Olan Yeri #Smith Diye Değiştirip Kanalı +s Yapsan Daha İyi Olur.

Yinede Özelimden Onaylansin İstiyorsan Yapayim

Usta özelimden onaylansın iyi olurda botun özeline !soz deeme yazdım bot tepki vermedi nedendir :S

Cevap: !söz Addonu

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Birde eklenen sözün kimin eklediğini ve söz numarasıda çıkabilirmi usta !söz yazıldığında size zahmet.

Cevap: !söz Addonu

usta botun özeline !soz black seni seviyoruz yazıyorum aynı alttaki resimdeki gibi çıkıyor nedendir yardımcı olurmusunuz.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: !söz Addonu

Onlar niye öyle oluyor biliyormusun bu forumun yüzünden. Eklediğim kodu değiştiren bi acaip forum sistemi var artık kodda paylasılmıyor forum üzerinden.

%ufuk diye değişken paylasıyorum forum %uuk %guguk ne varsa yapıyor tabiatıyla kodda calısmıyor.

Yukarıda düzenledim tekrar alip kullanabilirsin.

2 kelimelik sözleri eklemez minimum 3 kelime ister yukarıda belirttim

Cevap: !söz Addonu

Alıntı:

uFuK Nickli Üyeden Alıntı (Mesaj 1041685696)

Kardeşim eline sağlık birde senden bir iki ricam daha olucak !söz <nick> yazdığımda çıkan sözde ekleyen nicki ve onay koduda çıkabilirmi mümkünmüdür ve botu özeline !soz eklenecek soz yazıldıktan sonra sozunuz bot yapımcısına olaştırılmıştır gibi mesaj verebilirmi ? çok saol.

Cevap: !söz Addonu

Alıntı:

Smith Nickli Üyeden Alıntı (Mesaj 1041685731)

Neler Eklendi:

* !söz Ekleyen Kişiye Sözünün Değerlendirmeye Alindiği Bildirildi.
* Onaylanan Sözün Onaylandiği Memo Yoluyla Sözü Gönderen Kişiye İletildi.
* Reddedilen Sözün Onaylanmadiği Memo Yoluyla Sözü Gönderen Kişiye İletildi.
* !söz Nick Yazildiğinda Sözün Onay Numarası ve Kim Tarafindan Eklendiği Sözün Sonuna Eklendi.

Neler Eklenebilir:

* Flood Koruması

Yukardan Tekrar Aliniz Kodu.