++++++++++++++++++++++++++++++++++++++++
+ マヌ涖赭 ハレム泚 ツ硼 .. 葹ヌハ 翩砒 蒟ヌ淲 +
+ +
+ Made By MoGrM +
++++++++++++++++++++++++++++++++++++++++
********************************
*** ヌ睇耜 淸ヘリ ネヌ瞋淏賁 ***
*** Put it In Remote ***
*** alt+R 矍ハヘ ヌ瞋淏賁 ヌヨロリ ***
********************************
alias auto-id {
var %bt = $var(%ai.*,0) , %b = 0 , %b2
while (%b < %bt) {
inc %b
inc %b2 5
.timer $+ %b 1 %b2 /ns identify $remove($var(%ai.*,%b),$+($chr(37),ai.))
$eval($var(%ai.*,%b),2)
}
}
alias ai { dialog -m ai ai }
alias listai {
did -r ai 10
var %bt = $var(%ai.*,0) , %b = 0
while (%b < %bt) {
inc %b
did -a ai 10 $remove($var(%ai.*,%b),$+($chr(37),ai.))
}
}
dialog ai {
title "identify dialog By GooD"
size -1 -1 185 163
option dbu
button "Add Nick", 1, 2 12 36 12,flat
edit "", 2, 42 13 44 14
edit "", 3, 88 13 43 14
list 10, 132 3 43 143, size
button "Identify", 12, 13 55 114 13,flat
button " Del Nick " 11, 13 34 114 10,flat
button " Change Nickname " 17, 13 44 114 10,flat
edit "", 13, 13 69 114 2
button "Identify all nick In list", 14, 14 77 113 12,flat
box "Auto Identify", 15, 5 95 124 26
check "Do You Want To auto identify when Connect", 16, 8 105 119 10,flat
button "Cancel", 18, 24 125 84 9,cancel flat
button "OK", 19, 49 138 30 11,ok flat
text "identify dialog To Nicks By", 20, 24 153 91 8
link "GooD", 21, 24 153 22 8
text " Nick ", 22, 50 4 25 8
text " Pass", 23, 96 3 25 8
}
on *:dialog:ai:init:*: {
listai
if (%autoid == +) { did -c ai 16 }
}
on *:dialog:ai:sclick:*: {
if ($did == 16) { if (%autoid == +) { .set %autoid - } | else { .set %autoid + } }
if ($did == 1) {
if ($did(2).text != $null && $did(3).text != $null) {
.set %ai. [ $+ [ $did(2).text ] ] $did(3).text
listai
}
}
if ($did == 11) {
if ($did(ai,10).seltext != $null) {
.unset %ai. [ $+ [ $did(ai,10).seltext ] ]
listai
}
}
if ($did == 17 && $did(ai,10).seltext != $null) { nick $did(ai,10).seltext }
if ($did == 12 && $did(ai,10).seltext != $null) { ns identify $did(ai,10).seltext
$eval(%ai. [ $+ [ $did(ai,10).seltext ] ],2) }
if ($did == 14) { auto-id }
}
on *:connect:{
if (%autoid == +) {
auto-id
}
}