29 Eylül 2018, 17:21
#1 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Rohit v2 - baglanti diyalogu
rohit script v2 2011 yilinda yazdigim
scriptimin baglanti menüsünü script yazan arkadaslar (eger halaa varsa tabi)
scriptlerinde kullanabilmeleri icin ekliyorum.
görüntü:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog start {
size -1 -1 263 361
title "Rohit v2 (connect menu)"
icon 1,4 7 252 67 , ems/rohit.bmp
box "Connect Options",2,9 78 248 95
text "[ Nick Name ]",3,32 109 66 17
text "[ Password ]",4,32 139 64 17
box "Choose IRC Server",5,13 181 244 142
button "Xchat",6,27 201 60 30
button "Yuzuk",7,102 201 60 30
button "Ayva",8,177 201 60 30
button "Adamca",9,27 241 60 30
button "Soyle",10,104 241 60 30
button "Maytap",11,177 242 60 30
button "Sohbet",12,27 283 60 30
button "Kelebek",13,104 283 60 30
button "Nazli",14,177 282 60 30
button "Cancel",15,36 328 188 23, ok
edit "",16,123 134 117 22
edit "",17,123 105 117 22
}
alias -l close.dlg { dialog -x start start }
on *:dialog:start:*:*:{
if ($devent == init) {
did -a $dname 17 $me
}
if ($devent == sclick) {
if ($did == 6) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 7) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 8) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 9) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 10) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 11) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 12) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 13) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.Net | close.dlg }
if ($did == 14) { set %xxx $did(16) | .nick $did(17) | server irc.Soyle.net | close.dlg }
}
}
on *:connect:{
if (%xxx != $null) { .msg nickserv identify %xxx | unset %xxx }
}
on *:start: {dialog -m start start }