| med1kal | 05 Eylül 2009 11:52 |
Normalde karışmayacaktım ama FIX butonuna bastığımda açılan parantezi gösteriyordu, yani event'ı... bu da kafa karıştırıcıydı hakkaten... Kod:
on *: dialog:exlove:init:*: {
if (%otooper) did -c $dname 2
if (%otoidenthost) did -c $dname 3
if (%otonicksifre) did -c $dname 4
if (%deop) did -c $dname 8
}
dialog eXLove {
title "eXLove AUTO Menü"
size -1 -1 144 164
option dbu
box "AUTO İşlemler", 1, 2 9 135 53
check "AUTO Oper'imi Gir (AÇ / KAPA)", 2, 42 18 98 10
check "AUTO İdent - Host ' umu Gir (AÇ / KAPA)", 3, 22 32 110 10
check "AUTO Nick - Şifre Gir (AÇ / KAPA)", 4, 6 45 107 10
box "Online İşlemler", 5, 1 92 136 54
button "Oper ' imi Gir", 6, 53 100 37 9
button "İdent - Hostumu Gir", 7, 44 113 55 9
check "Deop Koruması (AÇ / KAPA)", 8, 28 65 103 10
button "Nick ' imi Ve Şifresini Gir", 9, 40 125 63 12
button "KAYDET / ÇIK", 10, 47 78 48 12
button "ÇIK", 11, 52 149 37 12
}
On *:dialog:exlove:*:*: {
if ($devent == sclick) {
if ($did == 6) { /oper eXLove 2644 }
if ($did == 9) {
/nick eXLove
/identify şifren
}
}
}
on *:dialog:exlove:sclick:*: {
if ($did == 10)
if ($did == 11)
if ($did == 7) { /setident $$?="Ident" | /sethost $$?="Host" }
}
on 1:connect:{
if (%otooper) {
Oper eXLove a5052650528
}
if (%otoidenthost) {
setident identin
sethost hostun
}
if (%otonicksifre) {
nick nickin
identify şifren
}
}
on *:DEOP:#:{
if (%deop) {
if ($nick ison #myops) { goto son }
if ($nick == ChanServ) { goto cs }
if ($nick == OperServ) { goto cs }
if ($nick == $me) { goto son }
if ($opnick == $me) {
:cs
.identify Şifren
/mode $chan +o $me
/msg # $nick Deop Ettiğin Adama Dikkat Et.. Ayaklarını Yerden Keserim Senin. 1,15=1,1(0,4>15,151 1,114,1e15,1X0,1L0,1o15,1v150e1,15 0,4<15,1511,1)15,151= 1,15=1,1(0,4>15,151 1,114,1S15,1c0,1r0,1i15,1p150t1,15 0,4<15,1511,1)15,151=
/mode # -o $nick
}
:son
}
}
|
