Tekil Mesaj gösterimi
Alt 10 Ağustos 2011, 05:26   #15
Çevrimdışı
mertmeric
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: belirli aralıklarla global mesaj atma




Mrb [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kardeşim. Bahsi geçen addonla ilgili diyalog penceresini hazırladım ve önceki addonda ilgili yere yapıştırdım. Baglantı ve köprüleri kurma konusunda yetersiz olduğum için sadece görsel olarak diyalogu hazırlayabildim. Yukarıdaki eksiklikleri tam olarak giderebilirsek güzel bir addon ortaya çıkabilir.

Yeni diyalog penceresiyle ortaya çıkan kod:

alias globalmesaj {
if $dialog(Global) == $null {
dialog -m Global Global
}
}
dialog Global {
title "Global Mesaj Bildirim Listesi"
size -1 -1 432 292
option pixels notheme
button "Sil", 1, 192 187 55 26
list 2, 10 15 413 136, sort
box "Mesajlar", 3, 3 0 424 149
edit "", 4, 10 166 174 84, autohs
box "Eklenecek mesaji girin", 5, 3 150 185 97
button "Ekle", 6, 192 157 55 25
text "Saniye giriniz", 8, 11 262 82 19, center
edit "sn", 9, 106 256 80 28, autohs center
button "Baslat", 10, 192 219 55 27, ok
button "Durdur", 12, 192 251 55 25
box "Sure", 7, 3 249 96 37
box "Kanal listesi", 11, 252 152 108 130
list 13, 259 165 94 121
button "Kanal Ekle", 14, 366 159 62 25
button "Kanal Sil", 15, 366 188 62 25
button "Cikis", 16, 366 217 61 25
}
on *:dialog:Global:sclick:*: {
if $did == 1 { $read(sozler.txt,w,$+(*,$did(2).seltext,*)) { write $+(-,d,l,$readn) sozler.txt | did -d Global 2 $did(2).sel } }
if $did == 6 { if ($did(4) != $null) { did -a Global 2 $did(4) | write sozler.txt $did(4) | did -fr Global 4 } }
if $did == 10 { if $did(9) isnum { .timerglobmesaj 0 $did(9) msg #Chat $!read(sozler.txt) | echo -a 0,6** Global Mesaj Bildirimi Aktif ** } }
if $did == 12 { .timerglobmesaj off | echo -a 0,7** Global Mesaj Bildirimi Kapalı ** }
}
on *:dialog:Global:init:*: {
if ($lines(sozler.txt) != $null) {
set %global 0
while (%global < $lines(sozler.txt)) {
inc %global 1
did -a Global 2 $read(sozler.txt,%global)
}
unset %global
}
}
menu status,nicklist,channel {
Global Mesaj :globalmesaj
}

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kardeşim bilgilerinizi bizimle paylaştıgınız için çok teşekkür ederim...

Sevgilerimle....

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet