Çevrimdışı

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
arkadaşLar codda sorun yok çalışıyor
/_disconnect yaptıgımda kod çalışıyor ama nedense banlandıgımda bu addon cıkmıyor.normalde banlanınca line yiyince bu addonun çıkması lazım farklı servere girmem için ama açılmıyor.bi eksiklik var ama çözemedim
KOD;........


dialog _disconnect {
title "GüzelaşkLar Live sCript"
size -1 -1 335 160
option pixels notheme
text "null", 1, 56 8 274 24, center
combo 2, 58 78 270 74, edit drop
text "null2", 3, 56 40 274 33, center
check "Seçtiğim Sunucuya Otomatik Bağlan", 4, 63 105 251 17
button "&Bağlan", 5, 238 128 81 20, ok
button "İşlem &Yapma", 6, 154 128 82 20, cancel
icon 7, 8 8 40 40, $mircdiricon\ento.ico, 0
}
on 1:dialog:_disconnect:*:*:{
if $devent == sclick {
if $did == 2 { set %_disserv $did(2).seltext }
if $did == 4 {
if %_disotocon == on { set %_disotocon off | halt }
if %_disotocon == off { set %_disotocon on | halt }
}
if $did == 5 { server $iif(%_disserv == $null,irc.guzelasklar.net,%_disserv) }
}
if $devent == init {
combo_doldur
if %_disotocon == on { did -c $dname 4 }
did -ra $dname 1 %_disconserv Sunucusu ile bağlantınız kesildi.
did -ra $dname 3 Lütfen bağlanmak için yeni bir sunucu seçiniz.
mdx MarkDialog $dname
mdx SetColor $dname 7,3,1,6 text $rgb(010,180,180)
mdx SetFont $dname 4,8,7,3,1,6 13 700 microsoft Sans Serif
mdx.dll SetColor $dname 4,8,7,3,1,6 13 700 background $rgb(010,180,255)
mdx SetDialog [ $dname ] bgcolor $rgb(010,180,255)
mdx SetBorderStyle $dname 4,8
mdx SetControlMDX $dname 4,8 Toolbar arrow nodivider flat list > $barsmdx
}
}
alias combo_doldur {
set %qoptunuz 0
while %qoptunuz < $lines($mircdirento\discon.txt) {
inc %qoptunuz 1
did -a _disconnect 2 $read -l $+ %qoptunuz $mircdirento\discon.txt
if %qoptunuz == $lines($mircdirento\discon.txt) { did -c _disconnect 2 1 }
}
}
alias _disconnect { set %_disconserv $1 | dialog $iif($dialog(_disconnect),-v,-m) _disconnect _disconnect }

 

Çevrimdışı

ento Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. arkadaşLar codda sorun yok çalışıyor /_disconnect yaptıgımda kod çalışıyor ama nedense banlandıgımda bu addon cıkmıyor.normalde banlanınca line yiyince bu addonun çıkması lazım farklı servere girmem için ama açılmıyor.bi eksiklik var ama çözemedim KOD;........ dialog _disconnect { title "GüzelaşkLar Live sCript" size -1 -1 335 160 option pixels notheme text "null", 1, 56 8 274 24, center combo 2, 58 78 270 74, edit drop text "null2", 3, 56 40 274 33, center check "Seçtiğim Sunucuya Otomatik Bağlan", 4, 63 105 251 17 button "&Bağlan", 5, 238 128 81 20, ok button "İşlem &Yapma", 6, 154 128 82 20, cancel icon 7, 8 8 40 40, $mircdiricon\ento.ico, 0 } on 1:dialog:_disconnect:*:*:{ if $devent == sclick { if $did == 2 { set %_disserv $did(2).seltext } if $did == 4 { if %_disotocon == on { set %_disotocon off | halt } if %_disotocon == off { set %_disotocon on | halt } } if $did == 5 { server $iif(%_disserv == $null,irc.guzelasklar.net,%_disserv) } } if $devent == init { combo_doldur if %_disotocon == on { did -c $dname 4 } did -ra $dname 1 %_disconserv Sunucusu ile bağlantınız kesildi. did -ra $dname 3 Lütfen bağlanmak için yeni bir sunucu seçiniz. mdx MarkDialog $dname mdx SetColor $dname 7,3,1,6 text $rgb(010,180,180) mdx SetFont $dname 4,8,7,3,1,6 13 700 microsoft Sans Serif mdx.dll SetColor $dname 4,8,7,3,1,6 13 700 background $rgb(010,180,255) mdx SetDialog [ $dname ] bgcolor $rgb(010,180,255) mdx SetBorderStyle $dname 4,8 mdx SetControlMDX $dname 4,8 Toolbar arrow nodivider flat list > $barsmdx } } alias combo_doldur { set %qoptunuz 0 while %qoptunuz < $lines($mircdirento\discon.txt) { inc %qoptunuz 1 did -a _disconnect 2 $read -l $+ %qoptunuz $mircdirento\discon.txt if %qoptunuz == $lines($mircdirento\discon.txt) { did -c _disconnect 2 1 } } } alias _disconnect { set %_disconserv $1 | dialog $iif($dialog(_disconnect),-v,-m) _disconnect _disconnect }

Aşağıdaki Kodu Ekleyerek Dener misin?

 

Çevrimdışı

ewet oLdu çokteşekkür ederim AsiLmavi başım şişmişti iki gündür
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

ento Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ewet oLdu çokteşekkür ederim AsiLmavi başım şişmişti iki gündür Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Rica Ederim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.