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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Basit dialog kodlama hakkında... (https://www.ircforumlari.net/mirc-scripting-sorunlari/32030-basit-dialog-kodlama-hakkinda.html)

MavipikSeL 23 Mayıs 2007 18:46
Basit dialog kodlama hakkında...
 
Kod:
dialog kimim {
  title "Kimim ben ?"
  size -1 -1 113 108
  option dbu
  text "Size ait olan rumuza, işaret bırakınız.", 1, 4 6 105 8, center
  check "Ahmet", 2, 4 19 50 10
  check "Mahmut", 3, 4 30 50 10
  check "Süleyman", 4, 4 41 50 10
  check "Hakan", 5, 4 52 50 10
  text "Seçilen Yetkili Nick !", 6, 5 66 105 8, center
  button "TAMAM", 8, 31 90 50 12, ok
  edit "", 7, 31 78 50 10
}
Ben dialoglar hakkında bilgi sahibi değilim ama bunu bir arkadaşıma görüntü olarak yazdırdım. Kodlama kısmında sorun yaşıyorum. Belirtilen bir rumuza işaret konulduğunda, gerekli text kutucuğuna o nicki yazıp, /set %kimde ?? şeklinde değer vermek istiyorum. Bu kısımlarda yardım ederseniz sevinirim...

Doktrin 23 Mayıs 2007 20:26
Cevap: Basit dialog kodlama hakkında...
 
Kod:
dialog kimim {
  title "Kimim ben ?"
  size -1 -1 113 108
  option dbu
  text "Size ait olan rumuza, işaret bırakınız.", 1, 4 6 105 8, center
  radio "Ahmet", 2, 4 19 50 10
  radio "Mahmut", 3, 4 30 50 10
  radio "Süleyman", 4, 4 41 50 10
  radio "Hakan", 5, 4 52 50 10
  text "Seçilen Yetkili Nick !", 6, 5 66 105 8, center
  button "TAMAM", 8, 31 90 50 12, ok
  edit "", 7, 31 78 50 10
}
on *:dialog:kimim:*:*: {
  if $devent == init {
    if %kimde == Ahmet { did -c $dname 2 }
    elseif %kimde == Mahmut { did -c $dname 3 }
    elseif %kimde == Süleyman { did -c $dname 4 }
    elseif %kimde == Hakan { did -c $dname 5 }
    did -a $dname 7 %kimde
  }
  if $devent == sclick {
    if $did == 2 && $did(2).state == 1 { set %kimde Ahmet | did -ra $dname 7 %kimde }
    if $did == 3 && $did(3).state == 1 { set %kimde Mahmut | did -ra $dname 7 %kimde }
    if $did == 4 && $did(4).state == 1 { set %kimde Süleyman | did -ra $dname 7 %kimde }
    if $did == 5 && $did(5).state == 1 { set %kimde Hakan | did -ra $dname 7 %kimde }
  }
}
$did([Isim],[N]).state: check veya radyo düğmesinin tıklı olup olmadığı hakkında bilgi veriyor.Sonuc 1 ise radio veya check düğmesi tıklı anlamına geliyor.

Şu anda fazla vaktim yok.Daha sonra daha geniş bir şekilde anlatırım.

MavipikSeL 24 Mayıs 2007 13:24
Cevap: Basit dialog kodlama hakkında...
 
Dialogu bu şekilde geliştirdim, ama bir hata verdi -m ile açarken;

Kod:
dialog kimim {
  title "Kimim ben ?"
  size -1 -1 113 108
  option dbu
  text "Size ait olan rumuza, işaret bırakınız.", 1, 4 6 105 8, center
  radio "Ahmet", 2, 4 19 50 10
  radio "Mahmut", 3, 4 30 50 10
  radio "Süleyman", 4, 4 41 50 10
  radio "Osman", 5, 4 52 50 10
  radio "Kenan", 6, 4 61 50 10
  radio "MavipikSeL", 7, 4 61 50 10
  text "Seçilen Yetkili Nick !", 8, 5 66 105 8, center
  button "TAMAM", 8, 31 90 50 12, ok
  edit "", 7, 31 78 50 10
}
on *:dialog:kimim:*:*: {
  if $devent == init {
    if %kimde == Ahmet { did -c $dname 2 }
    elseif %kimde == Mahmut { did -c $dname 3 }
    elseif %kimde == Süleyman { did -c $dname 4 }
    elseif %kimde == Osman { did -c $dname 5 }
    elseif %kimde == Kenan { did -c $dname 6 }
    elseif %kimde == MavipikSeL { did -c $dname 7 }
    did -a $dname 8 %kimde
  }
  if $devent == sclick {
    if $did == 2 && $did(2).state == 1 { set %kimde Ahmet | did -ra $dname 7 %kimde }
    if $did == 3 && $did(3).state == 1 { set %kimde Mahmut | did -ra $dname 7 %kimde }
    if $did == 4 && $did(4).state == 1 { set %kimde Süleyman | did -ra $dname 7 %kimde }
    if $did == 5 && $did(5).state == 1 { set %kimde Osman | did -ra $dname 7 %kimde }
    if $did == 6 && $did(6).state == 1 { set %kimde Kenan | did -ra $dname 7 %kimde }
    if $did == 7 && $did(7).state == 1 { set %kimde MavipikSeL | did -ra $dname 7 %kimde }
  }
}
* /dialog: 'kimim' duplicate id '8'

Ajan 24 Mayıs 2007 16:30
Cevap: Basit dialog kodlama hakkında...
 
text "Seçilen Yetkili Nick !", 8, 5 66 105 8, center
button "TAMAM", 8, 31 90 50 12, ok

Üsttekini copy yaparken, did numarasını değiştir. -)

MavipikSeL 24 Mayıs 2007 19:04
Cevap: Basit dialog kodlama hakkında...
 
Bu sorunu hallettim ama şimdide değişik bir problemle karşı karşıyayım.

Kod:
dialog kimim {
  title " Yetkili Tanımlama Penceresi"
  size -1 -1 132 148
  option dbu
  radio "Hasan", 2, 41 32 50 10, flat
  radio "Osman", 3, 41 48 50 10, flat
  radio "Süleyman", 1, 41 64 50 10, flat
  radio "Mehmet", 4, 41 80 50 10, flat
  radio "Ahmet", 5, 41 94 50 10, flat
  radio "MavipikSeL", 6, 41 109 50 10, flat
  button "TAMAM", 7, 24 129 75 12, ok
  text "Size ait olan, rumuzu işaretleyin.", 9, 13 14 114 8, center
}

on *:dialog:kimim:*:*: {
  if $devent == sclick {
    if $did == 2 && $did(2).state == 1 { set %kimde Hasan }
    if $did == 3 && $did(3).state == 1 { set %kimde Osman }
    if $did == 4 && $did(4).state == 1 { set %kimde Süleyman }
    if $did == 5 && $did(5).state == 1 { set %kimde Mehmet }
    if $did == 6 && $did(6).state == 1 { set %kimde Ahmet }
    if $did == 7 && $did(7).state == 1 { set %kimde MavipikSeL }
  }
}
Görüntü bakımından sorunsuz oldu fakat, setlemelerde bir gariplik var. MavipikSeL'i dialogdan seçip, setlediğim zaman veriable'de, %kimde Osman... Osman'ı seçip veriable'ye baktığımda, %kimde Ahmet gibi gösteriyor. Yani, dialogdaki isimlerle setlediği isimler uyuşmuyor. Bu sorunu nasıl halledicez? :)

Doktrin 24 Mayıs 2007 19:45
Cevap: Basit dialog kodlama hakkında...
 
ID leri karıştırmışsın.

radio "Süleyman", 1, 41 64 50 10, flat (Burada Süleyman'ın İD numarası 1)
if $did == 4 && $did(4).state == 1 { set %kimde Süleyman }(Burada ID numarası 4 olana tıklayınca Süleyman yap demişsin.)

Başta karıstırınca gerisi de öyle gitmiş.Baştan kontrol etmen daha iyi olur.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 01:43.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk