Listeden Proxy Silme Sorunu... - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

darkshades1 · 08 Şubat 2011, 20:12

[20:07:20] <Microsoft> .proxy ekle 78.169.169.234
[20:07:20] <Nod32> "78.169.169.234" Basariyla Proxy Listesine Eklendi
[20:07:24] <Microsoft> .proxy sil 78.169.169.234
[20:07:25] <Nod32> "Microsoft" Belirtiginiz kritere uyan "78.169.169.234" listede mevcut degil

arkadaslar bu sorunu alıyorum bot da yardımcı olabilirmisiniz acaba kodu da gönderiyim hemen..

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:.proxy*:#kontrol: {
  if $2 == list {
    .msg $chan $nick Özelinize Bilgiler Verilmistir , Özelinizi Kontrol Ediniz.
    var %i = 1, %end = $ulist(*,proxy,0)
    .msg $nick - Toplam Proxy Sayisi:4 %end
    while %i <= %end  {
      .msg $nick $+(%i,$chr(41)) $iif($ulist(*,proxy,%i) == $nick,$+(,$v1,),$v1)
      inc %i 1
    }
  }
  if $2 == ekle { 
    if $3 == $null { .msg $chan $+(",$nick,") Lütfen eklenecek Hostu yaziniz | return }
    if $ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return }
    .auser proxy $3 
    .msg $chan $+(",,$3,,") Basariyla Proxy Listesine Eklendi
  }
  if $2 == sil { 
    if $3 == $null { .msg $chan $+(",$nick,") Lütfen silinecek ip yaziniz | return }
    if !$ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan  $+(",,$3,,") listede mevcut degil | return }
    .ruser proxy $3 | msg $chan $+(",,$3,,")  Proxy listten silindi 
  }
}

Ve

proxy listesine baktığımda eklediğim ip görüküyor ama bota .proxy sil dediğim de belirtilen kritere uyan ip bulunamadı diyor
yani proxy listesine ekliyor ama silmiyor listede bulamıyor ama listeye baktıgımda eklediğim ip görüküyor...
bide söylemeyi unuttum proxy listesi [ Users ] Bölümünde yani [ kullanıcı ]

CesuryureK · 09 Şubat 2011, 00:56

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
on *:text:.proxy*:#kontrol: {
  if $2 == list {
    .msg $chan $nick Özelinize Bilgiler Verilmistir , Özelinizi Kontrol Ediniz.
    var %i = 1, %end = $ulist(*,proxy,0)
    .msg $nick - Toplam Proxy Sayisi:4 %end
    while %i <= %end  {
      .msg $nick $+(%i,$chr(41)) $iif($ulist(*,proxy,%i) == $nick,$+(,$v1,),$v1)
      inc %i 1
    }
  }
  if $2 == ekle { 
    if $3 == $null { .msg $chan $+(",$nick,") Lütfen eklenecek Hostu yaziniz | return }
    if $ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return }
    .auser proxy $3 
    .msg $chan $+(",,$3,,") Basariyla Proxy Listesine Eklendi
  }
  if $2 == sil { 
    if $3 == $null { .msg $chan $+(",$nick,") Lütfen silinecek ip yaziniz | return }
    if ($level($3) == proxy) { .ruser proxy $3 | msg $chan $+(",,$3,,")  Proxy listten silindi }
    elseif ($level($3) != proxy) {  .msg $chan $+(",$nick,") Belirtiginiz kritere uyan  $+(",,$3,,") listede mevcut degil | return }
  }
}

Bu şekilde denediğiniz taktirde kod çalışacaktır.

Sizin kodunuzun çalışmama nedenini echo mesajı ile çok rahat bir şekilde görebilirsiniz.

//echo -a $ulist(ipadresi,proxy,1) yaptığınızda hata mesajını görüyorsunuz. O yüzden listede olup olmadığını
$level identifier'i ile kontrol ettirdik.

listede olan bir ip adresini,

//echo -a $level(ipadresi) şeklinde bakarsak proxy cevabını verecektir.
bildiğiniz üzere users(kullanıcılar) kısmına,

proxy:ipadresi

şeklinde eklenmiştir.

Eğerki $level(ipadresi) şeklinde proxy cevabını alıyorsak listede var, eğerki hata mesajını alıyorsak listede yoktur.

Bizde zaten ona göre sil kısmını $level ile listede varsa silmesini, listede yoksa ilgili kullanıcıya listede olmadığını msg ile beyan etmesini sağladık.

Hoşça paylaşımlar dilerim.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Proxy sorunu	Eset	mIRC Scripting Sorunları	5	25 Nisan 2012 04:07
Proxy Sorunu	DaDaS	mIRC Scripting Sorunları	0	03 Ekim 2010 20:56
proxy sorunu	Disconnected	mIRC Scripting Sorunları	6	08 Mayıs 2008 09:53

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.