Diyalog Yardım Nick Listesi - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

YANSIMA · 11 Mayıs 2008, 16:08

Arkadaşlar Ben Aşağıdaki Gibi Bir Diyalog'a Ulaştım Ben Bu Diyalog'ta Yaptırmak İstediğim Şu

Nicki Yazdımda Ekle Dedim mi Ekliyecek
Ve Bu Nick'i Bir Not Defterine Kaydedecek Benim Elimde Diyelim ki 15 Nick Var ve Bu Nickleri Her 15 Günde İdentlemem Gerek Bunların Üzerine 1 Kere Tıkladım mı Nicke Geçecek ve Şifresini Girecek.
Şifresi Her Nickimin Aynı Olacak Buna Göre Bir Yardımcı Olabilir misiniz Acaba

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

dialog Nick {
  title "Nick Listesi"
  size -1 -1 150 155
  option dbu
  box "", 1, 9 9 132 130
  box "", 2, 2 3 146 142
  list 3, 74 34 62 101, size vsbar
  edit "", 4, 74 19 62 12, return autohs autovs
  button "Ekle", 5, 39 19 25 11
  button "Çıkart", 6, 39 33 25 11
  box "", 7, 33 13 39 34
 }

on *:dialog:Nick:*:*:{
  if ($devent == sclick) {
    if ($did == 3) { did -ra $dname 4 $did(3).seltext }    
    if ($did == 5) {
      if ($istok(%l,$did(4),32) == $true) { halt }
      if ($did(4) == $null) { halt }
      if ($istok(%l,$did(4),32) == $false) { set %l $addtok(%l,$did(4),32) | did -a $dname 3 $did(4) }
      did -r $dname 4
    }
    if ($did == 6) {
      if ($istok(%l,$did(4),32) == $false) && ($did(4) != $null) { halt }
      if ($did(4) == $null) { halt }
      if ($istok(%l,$did(4),32) == $true) { set %l $remtok(%l,$did(4),32) | did -d Nick 3 $did(3).sel }
      did -r $dname 4
    }
}

L3my · 11 Mayıs 2008, 18:16

mantık olarak timer işlevi yaptiracaksin coder'lerimiz iyisini bilirlerde coder'lerimize yardim amacli bir soru yönelteyim sana.bulundugun serverde nick değişme süresi varmı? mesela nick değiştin ondan sonra serbestmi yoksa belirli bir süre sonrasındamı ikinci nicke geçebiliyorsun?

L4roXyL · 11 Mayıs 2008, 22:54

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

on *:dialog:nick:*:*:{
  if ($regex($devent,^init$)) { if ($read(nickler.txt)) { loadbuf -o $dname 3 nickler.txt } }
  if ($regex($devent,^sclick$)) {
    if ($regex($did,^5$)) { var %e = $did(4) | if (!%e) { $iif($input(Nick girmediniz.,y) == $true,halt,halt) | halt } 
      else { $iif($read(nickler.txt,w,%e),$iif($input(Eklediğiniz nick mevcut.,y) == $true,halt,halt),write nickler.txt %e) | did -a $dname 3 %e | did -r $dname 4 }
    }
    if ($regex($did,^6$)) { var %r = $did($dname,3).sel | if (!%r) { $iif($input(Herhangi bir nick seçmediniz.,y) == $true,halt,halt) | halt }
      else { var %- = $did($dname,3).seltext | did -d $dname 3 %r | write $+(-ds,%-) nickler.txt }
    }
  }
}

Bu şekilde düzenledim.
Lakin, nick'in üzerine tek tıklamamda o nick'e geçicek.
Ve her nick'in ayrı bir şifresi olacak dedin.
Bunun için 2. bir list oluşturmak daha mantıklı olmazmı?

kunt · 12 Mayıs 2008, 00:12

Txt ile uğraşacağina 20 saniye timer ile tek tek nick değişerek ident edebilir diye düşünüyorum. hem nicklerde zamandan etkilenmez.
/tanit
alias tanit {
.timer 1 20 /nick nick1 | .timer 1 21 /ns identify sifren
.timer 1 40 /nick nick2 | .timer 1 41 /ns identify sifren
.timer 1 60 /nick nick3 | .timer 1 61 /ns identify sifren
.timer 1 80 /nick nick4 | .timer 1 81 /ns identify sifren
.timer 1 100 /nick nick5 | .timer 1 101 /ns identify sifren
}

YANSIMA · 12 Mayıs 2008, 19:14

L4roXyL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

on *:dialog:nick:*:*:{
  if ($regex($devent,^init$)) { if ($read(nickler.txt)) { loadbuf -o $dname 3 nickler.txt } }
  if ($regex($devent,^sclick$)) {
    if ($regex($did,^5$)) { var %e = $did(4) | if (!%e) { $iif($input(Nick girmediniz.,y) == $true,halt,halt) | halt } 
      else { $iif($read(nickler.txt,w,%e),$iif($input(Eklediğiniz nick mevcut.,y) == $true,halt,halt),write nickler.txt %e) | did -a $dname 3 %e | did -r $dname 4 }
    }
    if ($regex($did,^6$)) { var %r = $did($dname,3).sel | if (!%r) { $iif($input(Herhangi bir nick seçmediniz.,y) == $true,halt,halt) | halt }
      else { var %- = $did($dname,3).seltext | did -d $dname 3 %r | write $+(-ds,%-) nickler.txt }
    }
  }
}

Bu şekilde düzenledim.
Lakin, nick'in üzerine tek tıklamamda o nick'e geçicek.
Ve her nick'in ayrı bir şifresi olacak dedin.
Bunun için 2. bir list oluşturmak daha mantıklı olmazmı?

Hocam Hayır Şifreleri Aynı Olacak Her nickimin Şifresi 123 Olacak Mesela Bu Yoldan Çıkacağız , Ayrıca Kodu Denedim Üzerine Tıklayınca Nicke Geçmiyor Birde Üzerine Tıklayınca Nicke Geçip Belirtiğim 1 Tek Şifreyi Girmesini Sağlayabilirmiyiz Mümkünse Şimdiden Çok Tşkler..

L4roXyL · 12 Mayıs 2008, 19:29

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

on *:dialog:nick:*:*:{
  if ($regex($devent,^init$)) { if ($read(nickler.txt)) { loadbuf -o $dname 3 nickler.txt } }
  if ($regex($devent,^sclick$)) {
    if ($regex($did,^5$)) { var %e = $did(4) | if (!%e) { $iif($input(Nick girmediniz.,y) == $true,halt,halt) | halt } 
      else { $iif($read(nickler.txt,w,%e),$iif($input(Eklediğiniz nick mevcut.,y) == $true,halt,halt),write nickler.txt %e) | did -a $dname 3 %e | did -r $dname 4 }
    }
    if ($regex($did,^6$)) { var %r = $did($dname,3).sel | if (!%r) { $iif($input(Herhangi bir nick seçmediniz.,y) == $true,halt,halt) | halt }
      else { var %- = $did($dname,3).seltext | did -d $dname 3 %r | write $+(-ds,%-) nickler.txt }
    }
  }
  if ($regex($devent,^dclick$)) { $iif($did == 3,entr $did($dname,3).seltext) } 
}
alias entr nick $1 | $iif($regex($status,^connected$),ns identify 123,$iif($input(Herhangi bir sunucuya bağlı değilsiniz.,y) == $true,halt,halt))

Şeklinde yapabilirsin.
List'deki nicklerden herhangi birine şift tıklaman yeterli olur.

YANSIMA · 12 Mayıs 2008, 19:39

Peki Hocam Bunlara Tıkladığımda Şifresini Girmesini Nasıl Sağlayabilirim Şifre.txt Diye Bir Dosyaya Veya Bir Yere Yazma İmkanım Olamaz mı ?

Bütün Nicklerin Şifresi Tek Bir Şifre.

L4roXyL · 12 Mayıs 2008, 20:04

Kalın olarak belirttiğim yer: 123 zaten o şifre.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Yardım Nick info Son Görülen Zaman aşımından Access silme Yardım	HsN	mIRC Scripting Sorunları	4	14 Ocak 2014 21:15
Yardım : Identi Belirli Usere Oto Zline ( Diyalog Halinde )	St_By_Romantiq_Serseri	mIRC Scripting Sorunları	4	07 Ağustos 2013 13:31
Nick karşılama paneli diyalog şeklinde	SovaLyem	mIRC Scripting Hazır Kodlar	2	20 Mayıs 2010 22:59
Nick listesi	Kahraman50	Unreal IRCd	4	29 Ağustos 2009 23:54
!nick nick değiştirme komutu yardım ?	SabotaJ-	mIRC Scripting Hazır Kodlar	2	23 Haziran 2009 00:56

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.