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

4Beğeni(ler)
  • 1 Post By Mecnun
  • 1 Post By Mecnun
  • 2 Post By Alper

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 06 Mayıs 2017, 23:20   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Bota cezalı nick ekleme kodu arıyorum




Merhabalar, mIRC'ıma veya bota cezalı nick ekleyeceğim, ceza listesinde olan user voice aldığı zaman, ceza listesindesiniz, voice alamazsınız yazmalı böyle bir kod mümkün müdür?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 07 Mayıs 2017, 08:08   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:voice:#:{ if $nick !isop # { if $read(ceza.txt,w,$2) { mode # -v $2 | msg # $2 ceza listesinde oldugunuz için (+) prefixsini alamazsınız. } } } on *:text:*:#: { if $regex($1,/^([.!]ceza)/Si) { if $2 == $null { msg $chan 4HATA: 2Yetersiz ya da eksik kullanım. Lütfen seçenek belirtin; 4!ceza ekle|sil|list } else { if $2 == list { if $lines(ceza.txt) == 0 { msg $chan 2Ceza listesinde kullanıcı bulunamadı. } else { msg $chan 4Ceza listesi sıralanıyor. msg $chan $str(-,20) var %i 1 while %i <= $lines(ceza.txt) { msg $chan %i - $read(ceza.txt,%i) inc %i } } } if $2 == ekle { if $3 == $null { msg $chan 2Lütfen bir nick seçiniz 4Kullanımı; !ceza ekle nick .halt } if $read(ceza.txt,w,$3) { msg $chan 4 $+ $3 $+ , 2zaten listede ekli. } else { write ceza.txt $3 msg $chan 4 $+ $3 $+ , 2ceza listesine eklenmiştir. } } if $2 == sil { if $3 == $null { msg $chan 2Lütfen bir nick seçiniz 4Kullanımı; !ceza sil nick .halt } if !$read(ceza.txt,w,$3) { msg $chan 4 $+ $3 $+ , 2listede bulunamadı. } else { write -dw $+ $3 ceza.txt msg $chan 4 $+ $3 $+ , 2ceza listesinden silinmiştir. }


 
Alıntı ile Cevapla

Alt 07 Mayıs 2017, 09:23   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




* /if: Kapalı ayraç bulunamadı (Satır 3, Voice yasak.txt)
-
* /if: Kapalı ayraç bulunamadı (Satır 3, Voice yasak.txt)


Hatası veriyor

 
Alıntı ile Cevapla

Alt 07 Mayıs 2017, 13:13   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




on *:voice:#:{ if ($nick !isop #) || ($me isop #) || ($nick !isop #){ if $read(cezavoice.txt,w,$2) { mode # -v $2 | msg #fantazi@ 7««««1 $2 6 AngeLus 7Tarafından 13cezalı olduğu için (-)devoice 7YapıLdı. } } }
on ^*:VOICE:#:{
if ($vnick != $me) {
if !$istok(#staff #fantazi@ kanal3,$chan,32) && ($vnick != $me) {
msg #fantazi@ 7««««1 $2 6 $nick 7Tarafından 13(+)Voice 7YapıLdı, 4!ceza oku 7yaparak ceza listesinden konrol ediniz...
haltdef
halt
}
}
bu işinizi görür, biraz uğraştan sonra sorunsuz gbi

 
Alıntı ile Cevapla

Alt 12 Mayıs 2017, 01:32   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




Tinba Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
* /if: Kapalı ayraç bulunamadı (Satır 3, Voice yasak.txt)
-
* /if: Kapalı ayraç bulunamadı (Satır 3, Voice yasak.txt)


Hatası veriyor

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:voice:#:{ if $read(ceza.txt,w,$2) { mode # -v $2 | msg # $2 ceza listesinde oldugunuz için (+) prefixsini alamazsınız. } } } on *:text:*:#kanal: { if $regex($1,/^([.!]ceza)/Si) { if !$read(master.txt,w,$nick) { msg # 2Yetkili listesinde bulunamadıgınız için kullanamazsınız. } if !$2 { msg # 2Lütfen parametre belirtiniz.4 !ceza ekle|liste|sil | return } } if $2 == liste { if !$read(master.txt,w,$nick) { msg # 2Yetkili listesinde bulunamadıgınız için kullanamazsınız. } if $lines(ceza.txt) = 0 { msg # 2Ceza kayiti bulunamadi. | halt } msg # 2Ceza listesi siralaniyor. var %massacre 1 while (%massacre <= $lines(ceza.txt)) { msg # %massacre $read(ceza.txt,%massacre) inc %massacre } } if $2 == ekle { if !$read(master.txt,w,$nick) { msg # 2Yetkili listesinde bulunamadıgınız için kullanamazsınız. } if !$3 { msg # 2Lütfen nick belirtiniz.4 !ceza ekle nick | return } if $read(ceza.txt,w,$nick) { msg # 2Eklemeye çalıştığınız nick zaten listede ekli, tekrar ekleyemezsiniz. } write ceza.txt $3 msg $chan 4 $+ $3 $+ , 2ceza listesine eklenmiştir. } if $2 == sil { if !$read(master.txt,w,$nick) { msg # 2Yetkili listesinde bulunamadıgınız için kullanamazsınız. } if !$3 { msg # 2Lütfen nick belirtiniz.4 !ceza sil numara | return } if !$read(ceza.txt,w,$3) { msg $chan 4 $+ $3 $+ , 2listede bulunamadı. } write -dw $+ $3 ceza.txt msg $chan 4 $+ $3 $+ , 2ceza listesinden silinmiştir. } }



Konu Mecnun tarafından (12 Mayıs 2017 Saat 03:23 ) değiştirilmiştir. Sebep: Son düzenleme
 
Alıntı ile Cevapla

Alt 12 Mayıs 2017, 03:04   #6
Çevrimdışı
diE
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




Mode Komutunda tepki göstermiyor sadece Operserv tarafından Komut yazılırsa tepki veriyor

<diE> !v ||
* Bot mod değiştirdi:+v ||
<Bot> || kanalda voice (+v) konumuna geçtiniz.

* diE mod değiştirdi:+v ||
<Bot> || kanalda voice (+v) konumuna geçtiniz.

* OperServ mod değiştirdi:+v ||
<Bot> || Ceza listesinde oldugunuz için (+) prefixsini alamazsınız.
* Bot mod değiştirdi:-v ||

 
Alıntı ile Cevapla

Alt 12 Mayıs 2017, 03:24   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




diE Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Mode Komutunda tepki göstermiyor sadece Operserv tarafından Komut yazılırsa tepki veriyor

<diE> !v ||
* Bot mod değiştirdi:+v ||
<Bot> || kanalda voice (+v) konumuna geçtiniz.

* diE mod değiştirdi:+v ||
<Bot> || kanalda voice (+v) konumuna geçtiniz.

* OperServ mod değiştirdi:+v ||
<Bot> || Ceza listesinde oldugunuz için (+) prefixsini alamazsınız.
* Bot mod değiştirdi:-v ||


yukarıdaki kodu düzelttim tekrar deneyin

 
Alıntı ile Cevapla

Alt 02 Nisan 2018, 12:02   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




!ceza ekle nick yaptım o nicke voice verilmiyor sebebini !ceza ekle nick sebeb olsa bunuda !ceza oku gib, yapıp nick neden voice yasagı almış bilsek daha iyi olur

 
Alıntı ile Cevapla

Alt 02 Nisan 2018, 13:45   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bota cezalı nick ekleme kodu arıyorum




mys_35 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
!ceza ekle nick yaptım o nicke voice verilmiyor sebebini !ceza ekle nick sebeb olsa bunuda !ceza oku gib, yapıp nick neden voice yasagı almış bilsek daha iyi olur

Zaten liste komutu olduğu için ekle bir komut eklemedim var olan listede gözükmesini sağladım. Sebep kısmı boş bırakılırsa eklenirken Belirsiz olarak gözükür.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:voice:#:{ if $read(ceza.txt,w,$+($2,¿,*)) { mode # -v $2 | msg # $2 2Ceza listesinde oldugunuz için 4(+) 2prefixsini alamazsınız. } } on *:text:*:#: { if $regex($1,/^([.!]ceza)/Si) { if !$read(master.txt,w,$nick) { msg # 2Yetkili listesinde bulunamadıgınız için kullanamazsınız. | return } if !$2 { msg # 2Lütfen parametre belirtiniz.4 !ceza ekle|liste|sil | return } } if $2 == liste { if $lines(ceza.txt) = 0 { msg # 2Ceza kayiti bulunamadi. | halt } msg # 2Ceza listesi siralaniyor. var %massacre 1 while (%massacre <= $lines(ceza.txt)) { msg # $+(%massacre,-,$chr(41),) 4Nick:2 $token($read(ceza.txt,%massacre),1,191) 4Sebep:2 $token($read(ceza.txt,%massacre),2,191) inc %massacre } } if $2 == ekle { if !$3 { msg # 2Lütfen nick belirtiniz.4 !ceza ekle nick | return } if $read(ceza.txt,w,$+($3,¿,*)) { msg # 2Eklemeye çalıştığınız nick zaten listede ekli, tekrar ekleyemezsiniz. | return } write ceza.txt $+($3,¿,$iif($4 == $null,Belirsiz,$4-)) msg $chan 4 $+ $3 $+ , 2ceza listesine eklenmiştir. 4Sebep:2 $iif($4 == $null,Belirsiz,$4-) } if $2 == sil { if !$3 { msg # 2Lütfen nick belirtiniz.4 !ceza sil numara | return } if !$read(ceza.txt,w,$+($3,¿,*)) { msg $chan 4 $+ $3 $+ , 2listede bulunamadı. | return } write -dw $+ $+($3,¿,*) ceza.txt msg $chan 4 $+ $3 $+ , 2ceza listesinden silinmiştir. } }


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.



Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Cevapla

Etiketler
bot, ceza, mirc


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
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 Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Socket bota Proxy ekleme kodu moonman mIRC Scripting Sorunları 7 10 Ekim 2013 04:27
Socket bota ekleme moonman mIRC Scripting Sorunları 2 15 Eylül 2013 00:42
Bota kod ekleme ads01ads mIRC Scripting Sorunları 1 09 Ocak 2012 03:30
Bota , Küfür koruma ekleme Skys mIRC Scripting Sorunları 6 07 Temmuz 2010 14:15
Bota Master Ekleme lacremel mIRC Scripting Sorunları 5 13 Nisan 2008 01:17