|
popuptaki menu arkadaşlar, ozel kabul remotesi var, çok hoşuma gitti. sağmouse tan açıp kapatabilorsunuz. Ben bunu sağmoustan değil tolbara koyduğum buttonumdan nasıl açarım. yani toolbarımdaki kod kısmında şuraya if $did == 5 { Buraya ne yazmalıyım } menu status,query,channel,nicklist,menubar { - Ozel sistem .Aç:.enable #ozelim | echo -a 4,1 ..::0,1 Özeliniz :4,1 Açık .Kapa:.disable #ozelim | echo -a 4,1 ..::0,1 Özeliniz :4,1 Kapalı .Ayarlar:.ozelsteam | .did -f ozelsteam 6 .Yardım:.ozelsteam | .did -f ozelsteam 7 - } } |
Cevap: popuptaki menu kodun tamamı bu değil sanırım. dialog şeklindeyse dialoğu paylaşır mısın. yada büyük ihtimalle dialogun adı ozelsteam dır .dialog -m ozelsteam ozelsteam olarak açabilirsin |
Cevap: popuptaki menu on *:load:{ .def.mesajlar } on *:unload:{ .echo -a 4,1..::0,1 Özel Kontrol Sistem, başarı ile kaldırıldı. } alias ozelsteam { dialog -m ozelsteam ozelsteam } dialog ozelsteam { title "Özel Kabul Sistemi" size 180 220 300 123 option dbu check "Özel Sistem On/Off", 1, 8 108 60 10, flat button "Tamam", 2, 265 105 30 15, ok button "İptal", 3, 235 105 30 15, cancel Box "Özel Görüşme İsteği" 4, 5 5 290 95 tab "İstek Bilgisi" 5, 10 13 280 80 tab "Ayarlar" 6, 10 13 280 80 tab "Yardım" 7, 10 13 280 80 Box "" 8, 20 30 64 18, tab 5 Edit "Özele Gelen Nick =>" 9, 23 35 58 11, tab 5, read Box "" 10, 20 50 64 18, tab 5 Edit "Özele Yazdığı Yazı =>" 11, 23 55 58 11, tab 5, read Edit "" 12, 90 35 80 11, tab 5 autohs center Edit "" 13, 90 55 195 11, tab 5 autohs left button "Reddet" 14, 254 75 30 15, tab 5 button "İgnore Et" 15, 223 75 30 15, tab 5 button "Kabul Et" 16, 192 75 30 15, tab 5 default button "EKLE" 17, 162 75 30 15, tab 5 Text "Not : Kişiyi dost listenize, eklemek için EKLE 'ye basınız. Kişiyi eklerseniz, özeliniz kapalı olsada, özelinize yazabilir. " 18, 15 70 146 20, tab 5 Edit "SiyahTeaM - SiyahKaR [System Codes v1.0]" 19, 172 35 112 11, tab 5, read center Text "Not : Tamam ve İptal Butonlarını Ayarlarda değişiklik yapmadığınız sürece kullanmayınız." 20, 70 105 130 20 Edit "Karşılama Mesajı =>" 21, 16 30 58 11, tab 6, read Edit "Reddetme Mesajı =>" 22, 16 45 58 11, tab 6, read Edit "Kabul Etme Mesajı=>" 23, 16 60 58 11, tab 6, read Edit "" 24, 80 30 195 11, tab 6 autohs left %def.Kar Edit "" 25, 80 45 195 11, tab 6 autohs left %def.Red Edit "" 26, 80 60 195 11, tab 6 autohs left %def.Kabul Link "Dost Listenizi Düzenlemek için" 27, 16 80 70 13, tab 6 button "BURAYA" 28, 90 78 30 13, tab 6 Link "Tıklayınız" 29, 123 80 70 13, tab 6 Button "İlk Ayara Dön" 30, 227 78 50 13, tab 6 box "Özel Sistem Yardımı" 31, 14 27 272 63, tab 7 link "Dost Listesi :" 32, 20 38 35 13, tab 7 link "İlk Ayara Dön :" 33, 20 61 40 13, tab 7 text " Listeye Nick ekleme yapmak için, 'Istek bilgisi' bölümünden 'EKLE' butonunu ve 'Ayarlar' bölümünden düzenleme butonunu kullanabilirsiniz. Listeye Eklediğiniz kişi, Özel Sistem açık durumda dahi olsa, özelinize yazı yazabilir." 34, 59 39 220 23, tab 7 text " Ayarlar bölümündeki mesajlarda yapmış olduğunuz değişiklikleri iptal etmek için, Ayarlar bölümündeki 'İlk Ayara Dön' butonunu kullanabilirsiniz." 35, 59 62 220 18, tab 7 link " Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. 36, 220 80 60 13, tab 7 } #ozelim off on dostlist:open:?:*:{ .msg $nick 0,2 Özel Sistem 1,15 Nick'iniz dost listesinde olduğu için, özele yazabilirsiniz. } on redlist:open:?:*:{ .close -m $nick | .timer 0 600 /tumunu.sil | .timer 0 660 /timerlar.off } on *:open:?:*:{ if ($nick != $me) { .close -m $nick .set %gelenNick $nick .set %gelenMesaj $1- .ozelsteam .msg $nick 0,2 $nick $+ %def.Kar .did -a ozelsteam 13 $1- .did -a ozelsteam 12 $nick } } #ozelim end alias tumunu.sil { .flush redlist } alias timerlar.off { .timers off } alias Ozelmesajlar { .set %ilk.Kar 0,2 $nick 1,15 Özel görüşme isteğiniz değerlendiriliyor. Lütfen Bekleyiniz. .set %ilk.Red 0,2 $nick 1,15 Özel görüşme talebiniz, Reddedilmiştir. Hoş Sohbetler. .set %ilk.Kabul 0,2 $nick 1,15 Özel görüşme isteğiniz, KABUL edildi. Özele yazabilirsin. } alias Def.mesajlar { set %def.Kar 1,15 Özel görüşme isteğiniz değerlendiriliyor.0,2 Lütfen Bekleyiniz. set %def.Red 1,15 Özel görüşme talebiniz, Reddedilmiştir.0,2 Hoş Sohbetler. set %def.Kabul 1,15 Özel görüşme isteğiniz, KABUL edildi.0,2 Özele yazabilirsin. } on *:dialog:ozelsteam:init:*: { if ($group(#ozelim) == on) { .did -c $dname 1 .did -c $dname 1 .did -a $dname 24 %def.Kar .did -a $dname 25 %def.Red .did -a $dname 26 %def.Kabul } elseif ($group(#ozelim) == off) { .did -b $dname 12,13,14,15,16,17,24,25,26,30 .did -a $dname 24 %def.Kar .did -a $dname 25 %def.Red .did -a $dname 26 %def.Kabul } } on *:dialog:ozelsteam:sclick:*: { if ($did == 1) { if ($did(1).state == 0) { did -b $dname 12,13,14,15,16,17,24,25,26,30 | .disable #ozelim | .ignore -r } else { did -e $dname 12,13,14,15,16,17,24,25,26,30 | .enable #ozelim } } if ($did == 30) { .def.mesajlar .did -o $dname 24 1 %def.Kar .did -o $dname 25 1 %def.Red .did -o $dname 26 1 %def.Kabul } if ($did == 14) { .msg %gelenNick 0,2 %gelenNick $+ %def.Red | .auser redlist %gelenNick | .ignore -p %gelenNick | dialog -x $dname } if ($did == 15) { .msg %gelenNick 0,2 %gelenNick $+ %def.Red | .notice %gelenNick 4,1 İgnore Edildiniz | .ignore -p %gelenNick | .echo -a 4,1 .:: 0,1 %gelenNick İgnore Listesine Eklendi. | dialog -x $dname } if ($did == 16) { .query %gelenNick | .msg %gelenNick 0,2 %gelenNick $+ %def.Kabul | dialog -x $dname | .echo -a 0,2 %gelenNick 2: Geliş mesajı: 0,2 %gelenMesaj } if ($did == 17) { .auser dostlist %gelenNick .set %dost.list $addtok(%dost.list,%gelenNick,32) | dialog -x ozelsteam | .msg %gelenNick 0,2 %gelenNick $+ %def.Kabul | .query %gelenNick | .echo -a 0,2 %gelenNick 2: Geliş mesajı: 0,2 %gelenMesaj .echo -a 4,1 .:: 0,1 %gelenNick Dost Listesine Eklendi. } if ($did == 2) { if ($group(#ozelim) == off) { .flush redlist } .set %def.Kar $did(24).text .set %def.Red $did(25).text .set %def.Kabul $did(26).text } if ($did == 28) { .dostlar } if ($did == 36) { .run [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } } alias dostlar { dialog -m dostlistim dostlistim } dialog dostlistim { title "Özel Sistem - Dost Listesi" size 450 250 120 140 option dbu box "Dost Listesi" 1, 5 5 110 130 edit "" 2, 10 18 50 12, autohs right list 3, 10 35 50 93, size button "Ekle" 4, 66 15 43 15 button "Sil" 5, 66 33 43 15 button "Listeyi Sil" 6, 66 51 43 15 button "Tamam" 7, 66 115 43 15, ok icon 8, 80 92 30 30, icon\dostlist.ico, top } on *:dialog:dostlistim:init:*: { didtok dostlistim 3 32 %dost.list } alias dostlist.tumunu.sil { .flush dostlist } on *:dialog:dostlistim:sclick:*: { if ($did = 4) { if ($did(2).text == $null) { return } | else { did -a dostlistim 3 $did(2).text | set %dost.list $didtok(dostlistim,3,32) | .auser dostlist $did(2).text | did -r dostlistim 2 } } if ($did = 5) { if ($did(3).sel == $null) { return } | else { .ruser $did(3,$did(3).sel).text | did -d dostlistim 3 $did(3).sel | set %dost.list $didtok(dostlistim,3,32) } } if ($did == 6) { dostlist.tumunu.sil | .did -r dostlistim 3 | .unset %dost.list } } menu status,query,channel,nicklist,menubar { - Ozel sistem .Aç:.enable #ozelim | echo -a 4,1 ..::0,1 Özeliniz :4,1 Açık .Kapa:.disable #ozelim | echo -a 4,1 ..::0,1 Özeliniz :4,1 Kapalı .Ayarlar:.ozelsteam | .did -f ozelsteam 6 .Yardım:.ozelsteam | .did -f ozelsteam 7 - } } |
Cevap: popuptaki menu Alıntı:
if $did == 5 { /ozelsteam } |
Cevap: popuptaki menu Alıntı:
dostum cevap için teşekkurler fakat oradaki aç, kapat komutunu demiştim. yani toolbarıma aç, kapat diye iki buton koyucam aç tıklandığında ozel koruma açılacak. şöyle mi olmalı if $did == 5 { .enable #ozelim | echo -a 4,1 ..::0,1 Özeliniz :4,1 Açık } |
Cevap: popuptaki menu Alıntı:
|
Cevap: popuptaki menu şu şekilde yapabilirsin bu bence göze hoş gelen birşey ve tek buttonla işi halledersin; öncelikle aşağıda ki kodu remotene ekle Kod: alias -l pop tokenize 32 $dll($pdll,Popup,$1-) | if ($isid) return $1- | $iif($4- != did not select a menu item,$4-)mirc klasörünün içinde icon klosörünün içine at [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Not:beşinci buttona ozelackapat yazmalısın if $did == 5 { ozelackapat } |
Cevap: popuptaki menu teşekkürler arkadaşlar, fener1907 hocam, anladım kadarıyla icl dosyasında sadece iki tane icon var. yeni iconlar ekleyebiliyormuyuz. Başka icl dosyaları indirdim denedim ama çıkmadı.birde açılanan popupun genişliği düzenlene biliyormu. |
Cevap: popuptaki menu icl dosyası açan program indirirsen istediğin kadar eklersin tabı ki. popups New bir 32 32 bu kısım icon büyüklüğü değiştirirsen ona göre boyu büyür veya küçülür |
| Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:34. |
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