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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - away cevap botu (https://www.ircforumlari.net/mirc-scripting-sorunlari/356328-away-cevap-botu.html)

arkadaşlar, konuyu yeni öğreniyorum, oyuzden verilen verilen gelişmiş away kodları inceleyerek anlamakta guçluk çekiyorum. Away olduğum zaman, herhangi bir yerde bana seslenirlerse, aşağıdaki away sebebi kısmındaki yazıyı mesaj olarak seslenilen yere nasıl gonderirim.

Tekrar özür dileyerek, öğrenmem açısından basit bir away verebilirmisiniz bunla ilgili. yardımlarınız için teşekkürler

alias awaymenu { dialog -m avaydlg avaydlg }
dialog avaydlg {
title "Away Menüsü"
size -1 -1 217 98
option dbu
text "Away Sebebi : ", 1, 7 12 39 8
edit "", 2, 47 11 161 10
button "AWAY OL", 3, 141 27 57 9, flat
check "Nickin Sonuna Ekle :", 4, 7 27 57 8
edit "", 5, 68 26 64 10
box "Away Menü Ayarları :", 6, 3 1 210 40
button "AWAYDAN DÖN", 7, 17 82 87 12
button "PENCEREYİ KAPAT", 8, 111 82 87 12, ok
}

Cevap: away cevap botu

Kod:

on *:dialog:avaydlg:sclick:3: {  

  if (%away  ==  $null) { 

    set %away $did(2)

    away $did(2)

    set %nick $nick 

    set %awayn %nick $+ $did(5)

    nick %awayn  

  }

  elseif (%away  !==  $null) {

    echo -a 4* Zaten Away sınız

  }

}

on 1:dialog:avaydlg:sclick:7:  {

  if (%away  ==  $null) {

    echo -a 4* Zaten Away değilsiniz?

  }

  elseif (%away  !=  $null) { 

    unset %away

    away 

    nick %nick

  }

bu kodu altına ekle not: seslenme olayını bilmiyorum :)

Açıklama

Kod:

on *:dialog:avaydlg:sclick:3: {   3 nnumaralı buton a tıkladıgında

  if (%away  ==  $null) {  adını bilmiorum :) veriables de %away kaydı yoksa

    set %away $did(2)   2 numaralı pencereye yazdıgın yazıyı %away kaydı olarak al

    away $did(2)  /away mesajınız ( mesajınız yerine 2 numaralı pencereye yazdıgın yazıyı kullan

    set %nick $nick   şu anki nick imi veriabese kaydet

    set %awayn %nick $+ $did(5)  5 numaralı pencereye yani nick e eklenecek  bölümle beraber nick i kaydet

    nick %awayn  away nick i olarak kaydettiğin nick e gec

  }

  elseif (%away  !==  $null) { eğer veriables de %away kaydı varsa 

    echo -a 4* Zaten Away sınız  bu mesajı aktif ekrana yolla

  }

}

on 1:dialog:avaydlg:sclick:7:  {   7 numaralı button a tıkladıgımda

  if (%away  ==  $null) {   veriables de %away kaydı yoksa

    echo -a 4* Zaten Away değilsiniz?  aktif ekrana bu mesajı yolla

  }

  elseif (%away  !=  $null) {  veriables de %away kaydı varsa

    unset %away   %away kaydını kaldır ( tekrar away olurken lazım olcak :) )

    away   awaydan çık

    nick %nick   awaydan önceki kaydettiğim nick e geri dön

  }

upuzun zamandır bende girmiyodum baya unuttum :) hatırladıgım kodlar dahilinde şimdilik elimden bu kadarı geldi

not: bazı yerleri fazladan yazdım bazı yerleri değişebilecek sekilde yazdım cou yerine kendine göre ekleme yababilirsin :)
işin mantıgını öğrendinmi gerisi zaten cocuk oyuncagı

işin mantıgı mirc in lisanıyla onunla konusmak gibi önce kafanda konusma metnini düşün nasıl ikna ederim diye düsün resmi bi dile dök sonra kodlara dök bu kadar oldu bitti ::)

Cevap: away cevap botu

:))) dostum supersin , anlatışın ve konuya yaklaşımın harika. Gerçekten çok teşekkurler
sayenizde bişeyler öğrendim.

Cevap: away cevap botu

dostum verdiğin kodda şoyle bi sorun var nasıl çozerim.

avay mesaj sebebi ve nike eklenecek kutular boşsa ,
ve sen avayol dersen niki değiişriyor ama ayden don dersen zaten avey değilsiniz diyor.

yani şunu oraya nasıl eklemeliyim.

eğer avay sebebi kutusu ve nicke ekle boşken avay ol denildiyse
avay sebebi = Bir sure yokum
niksonuna = _yok

birde avay sebebini kanala gondermiyor
şoyle bişey yaptım ama bu şekildemi olmalı

on *:dialog:avaydlg:sclick:3: {
if (%msebep == $null) {
if ($did(2) !== $null) {set %msebep $did(2)
msebep $did(2)
}
elseif (%msebep == $null) { set %msebep $+ gidiyorum... }
set %nick $nick
set %awayn %nick $+ $did(5)
nick %awayn
/ame Gidiyorum.. Sebep: " $+ %msebep $+ 2"

}
elseif (%msebep !== $null) {
echo -a 4* Zaten Away sınız
}
}