Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| dialog tan akıck atma hatası
slm arkadaslar elimdekı bır operator addonunda akick ekleme ve silme var lakın
dialogtan nickı secip akıck ekle butonuna bastıgımda
servisler uyarı verio komutu yanlıs kullanıyorsunuz cs akick nick ident host vs die
acaba koddakı hataya bakabılcekmısınız
on *:dialog:console:sclick:9:{ if ($me isop %c-cha) .chanserv akick %c-cha add $remove($did(console,2,$did(console,2).sel).text,@ ,+) | kick %c-cha $remove($did(console,2,$did(console,2).sel).text,@ ,+) $kickm(kick.txt) }
bölüm burası
--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 20:03 -->-> Daha önceki mesaj 20:01 -- alias mdx { return $dll(adon\dll\mdx.dll,$1,$2-) }
alias mdx.dll { return $dll(adon\dll\mdx.dll,$1,$2-) }
alias console { dialog -m console console }
dialog console {
title "xx script| Operatör Menüsü "
size -1 -1 350 320
icon resim\icon\resm.ico
button "Bu Menüyü Kapa",1,33 283 285 30,ok flat
list 2, 195 30 140 237,sort
box "",3,6 6 339 267
box "ChanServ Komutları",4,20 19 165 130, flat
button "Aop Ekle",5,33 40 65 25, flat
button "Sop Ekle",6,33 75 65 25, flat
button "Aop Sil",7,110 40 65 25, flat
button "Sop Sil",8,110 75 65 25, flat
button "Akick Ekle",9,33 110 65 25, flat
button "Akick Sil",10,110 110 65 25, flat
button "Op Ver",11, 33 160 65 25, flat
button "Deop Yap",12,110 160 65 25, flat
button "Kick/Ban",13,33 195 65 25, flat
button "Kick At",14,110 195 65 25, flat
button "Voice Ver",15,33 230 65 25, flat
button "Voice Al",16,110 230 65 25, flat
text "",17, 235 17 70 13
}
on *:dialog:console:sclick:5:{ if ($me isop %c-cha) .chanserv aop %c-cha add $remove($did(console,2,$did(console,2).sel).text,@ ,+) }
on *:dialog:console:sclick:6:{ if ($me isop %c-cha) .chanserv sop %c-cha add $remove($did(console,2,$did(console,2).sel).text,@ ,+) }
on *:dialog:console:sclick:7:{ if ($me isop %c-cha) .chanserv aop %c-cha del $remove($did(console,2,$did(console,2).sel).text,@ ,+) }
on *:dialog:console:sclick:8:{ if ($me isop %c-cha) .chanserv sop %c-cha del $remove($did(console,2,$did(console,2).sel).text,@ ,+) }
on *:dialog:console:sclick:9:{ if ($me isop %c-cha) .chanserv akick %c-cha add $remove($did(console,2,$did(console,2).sel).text,@ ,+) | kick %c-cha $remove($did(console,2,$did(console,2).sel).text,@ ,+) $kickm(kick.txt) }
on *:dialog:console:sclick:10:{ if ($me isop %c-cha) .chanserv akick %c-cha del $remove($remove($did(console,2,$did(console,2).sel ).text,@,+),@,+) }
on *:dialog:console:sclick:11:{ if ($me isop %c-cha) mode %c-cha +o $remove($did(console,2,$did(console,2).sel).text,@ ,+) }
on *:dialog:console:sclick:12:{ if ($me isop %c-cha) mode %c-cha -o $remove($did(console,2,$did(console,2).sel).text,@ ,+) }
on *:dialog:console:sclick:13:{ if ($me isop %c-cha) ban %c-cha $remove($did(console,2,$did(console,2).sel).text,@ ,+) 3 | kick %c-cha $remove($did(console,2,$did(console,2).sel).text,@ ,+) $kickm(kick.txt) }
on *:dialog:console:sclick:14:{ if ($me isop %c-cha) kick %c-cha $remove($did(console,2,$did(console,2).sel).text,@ ,+) $kickm(kick.txt) }
on *:dialog:console:sclick:15:{ if ($me isop %c-cha) mode %c-cha +v $remove($did(console,2,$did(console,2).sel).text,@ ,+) 3 }
on *:dialog:console:sclick:16:{ if ($me isop %c-cha) mode %c-cha -v $remove($did(console,2,$did(console,2).sel).text,@ ,+) 3 }
on *:dialog:console:init:0:{
mdx.dll MarkDialog $dname
mdx SetFont 1,5,6,7,8,9,10,11,12,13,14,15,16,17 14 700 arial
mdx SetColor $dname 4,17 textbg $rgb(010,180,255)
mdx SetColor $dname 1,4,5,6,7,8,9,10,11,12,13,14,15,16,17 background $rgb(010,180,255)
mdx SetDialog [ $dname ] bgcolor $rgb(010,180,255)
set %c-cha $active
did -a $dname 17 Toplam: $nick(%c-cha,0) Kişi
set %c-ops 0
set %c-voi 0
set %c-reg 0
:lewp-o
inc %c-ops
if ($opnick(%c-cha,%c-ops) != $null) goto op
else { goto lewp-v }
:op
did -a $dname 2 @ $+ $opnick(%c-cha,%c-ops)
goto lewp-o
:lewp-v
inc %c-voi
if ($vnick(%c-cha,%c-voi) != $null) goto voice
else goto lewp-r
:voice
did -a $dname 2 + $+ $vnick(%c-cha,%c-voi)
goto lewp-v
:lewp-r
inc %c-reg
if ($nick(%c-cha,%c-reg,r) != $null) goto regular
else halt
:regular
did -a $dname 2 $nick(%c-cha,%c-reg,r)
goto lewp-r
} |