[WeiLSiDe]

SLm arkadaşlar
Bana şöle bişey lazım...
Server aynı İP den 3 nick bağlanırsa bi dialog acılsın ve kill, zline, shun gibi secenekleri olsun istiyorum.
Şimdiden tşk ler.

[CesuryureK]

normalde böyle bunu istiyorum şunu yapabilirmisin gibi şeylere pek sıcak bakmıyoruz sebebi ise, bari bi dialog yapsaydın bi clone koruması verseydin de birlikte yapsaydık amacımız birlikte bişiler öğrenmek.
ben gene de bu seferlik verdim, bir sonraki isteklerde lütfen elinizde bir veri olsun, en azından bişiler yaptığınız ortada olsun.. yoksa benim için sorun değil verir susarım ben..
dialog üstünde pek durmadım az boş vaktim vardı.
---
kullanımına gelince, aynı ipten üçüncü kişi girdiğinde dialog çıkacaktır ve yapman gereken işlemler shun kline kill.
kill durumunda üç nicke de kill atar. dialog kısmında %at1 %at2 %at3 kişileri belirtmekte sadece birini atmasını istiyorsan belirtirsin.

son bir durum.. eğer işlem yapmicaksan kapat butonunu kullanmanı öneririm. çünkü o nickleri variables'te silsin ki başka cloneler geldiğinde sorun olmasın.. zaten herhangi bir işlem seçersen variableste silinecektir.

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

on *:join:#: {
  %clone = $ialchan($wildsite,#,0)
  if (%clone == 3) {
    var %c = 1
    set %cloneNick csr
    while (%c <= %clone)  {
      %cloneNick = %cloneNick  $ial($wildsite,%c).nick
    inc %c  }
    dialog -m clone clone
    .set %At1 $gettok($remove(%cloneNick,csr),1,32)
    .set  %At2 $gettok($remove(%cloneNick,csr),2,32)
    .set %at3 $gettok($remove(%cloneNick,csr),3,32)
  }
  set %change $read -s $+ $address($nick,4) notes.ini
  if (%change == $null) {
    haltdef
    halt  
  }
}

dialog Clone {
  title "Clone İşlem Paneli"
  size -1 -1 106 54
  option dbu
  box "Clonelere Uygulanacak  Komut?", 1, 2 0 102 52
  button "Kline", 2, 71 13 27 12, ok
  button "Kill", 3, 38 13 27 12, ok
  button "Shun", 4, 6 13 27 12, ok
  button "Kapat", 5, 33 33 37 12, ok cancel
}
on *:dialog:clone:sclick:*:{
  if ($did == 2) { kline %at1 Clone! | unset %at1 %at2 %at3 }
  if ($did == 3) { kill %at1 Clone! | kill %at2 Clone! | kill %at3 Clone | unset %at1 %at2 %at3 }
  if ($did == 4) { Shun %at1 Clone! | unset %at1 %at2 %at3 }
  if ($did == 5) { unset %at1 %at2 %at3 }
} 

[WeiLSiDe]

Öncelikle tşk ederim yardımın için
Aslında bişeyler yapmaya çalıştım ama corba oldu. O kodla buraya cıkıp rezil olmaktan tırstım ne yalan sölim. O kadar garip insan var ki olmadık seyler yazılıyo.
Anlatım bozukluğu için özür dilerim ki kimseye emri vaki yapmam amacımda bu değil di. Böle anlaşıldığı için üzgünüm.
Uyarılarınızı Dikkate alcam.
Tekrar Tşk ler.

[AzuLa]

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

Öncelikle tşk ederim yardımın için Aslında bişeyler yapmaya çalıştım ama corba oldu. O kodla buraya cıkıp rezil olmaktan tırstım ne yalan sölim. O kadar garip insan var ki olmadık seyler yazılıyo. Anlatım bozukluğu için özür dilerim ki kimseye emri vaki yapmam amacımda bu değil di. Böle anlaşıldığı için üzgünüm. Uyarılarınızı Dikkate alcam. Tekrar Tşk ler.

O çorba olmuş kodunuz bile , o halde ekleseydiniz bile , eminim hiçbir şey eklemeden konu açmanızdan daha iyi olurdu.. En azından uğraşmış yapamamış derdik ve yaptığınız hatalarınızı da gösterirdik, beraber düzenlerdik.. ve hem hatalarınızın sebebini görmüş olurdunuz, hem de bir şeyler öğrenmiş olurdunuz.. (:

Yanlış anlamayın art niyetle söylemiyorum; ama en azından biraz daha çaba ile çok daha iyi bir sonuç alırdınız, en azından sizin açınızdan.. (:

Bazen yapılan hatayı görmek onu düzeltmek doğrusunu anlamak bile bir adımdır. Hatta çoğu güzel eserin ilk hali bile hatalıdır, düzenlendikçe güzelleşir.. =]

[DaNGerouS_ZoNe]

bu kod sadece kanala giris icin calisiyor denedim sunucuya girisini nasil engelleyecegiz arkadaslar.