on *:LOAD: {
if ($version <= 6.0) {
echo -a 9Hvala sto koristite Auto Stuff :)
echo -a 9Za vise informacija:
www.Marvi-Konvic.co.cc i
www.IRCSvet.com }
else {
set %opmsg 4Dude Sweet... Dobio/a sam 9@4! | set %opthnks OFF | set %voicethnks Off | set %deopthnks OFF | set %devothnks OFF | set %vmsg 4Nice... Dobio/la sam neki 4+4 | set %deopmsg 4Slanino,koji ti je vrag? Zasto mi skide 4@4 ??? | set %dvmsg 7Vrati mi moj 4+4 !
echo -a 9Hvala sto koristite auto staff by Marvi-Konvic
echo -a 9Za vise informacija:
www.Marvi-Konvic.co.cc i
www.IRCSvet.com }
}
on *:UNLOAD: {
echo -a 9Za vise informacija
www.Marvi-Konvic.co.cc echo -a 9Hvala sto ste koristili addon
unset %var1 | unset %mkjoin | unset %mkjoin.chans | unset %var | unset %AutoID | unset %AutoID.nicks | unset %AutoID.pass | unset %opmsg | unset %opthnks | unset %voicethnks | unset %deopthnks | unset %devothnks | unset %vmsg | unset %deopmsg | unset %dvmsg
}
alias mkjoin { if ($dialog(mkjoin)) dialog -v mkjoin | else dialog -m mkjoin mkjoin }
dialog mkjoin {
size -1 -1 272 202
title "» Auto staff By Marvi-Konvic «"
button "Close",100, 139 176 55 22, ok flat
tab "Auto Join",1, 8 8 254 166
tab "Auto Identify",2
tab "Auto Hvala",3
list 4, 27 44 110 118, disable, tab 1
box "",5, 17 31 236 130, tab 1 flat
edit "",6, 156 77 87 22, autohs, disable, tab 1 flat
box "",7, 17 31 130 130, tab 1 flat
box "",8, 146 61 107 100, tab 1 flat
button "Dodaj Kanal",9, 156 105 87 22, disable, tab 1 flat
button "Obrisi Kanal",10, 156 131 87 22, disable, tab 1 flat
check " Ukljuci",11, 174 43 52 20, tab 1 flat
box "",12, 17 31 236 130, tab 2 flat
box "",13, 17 31 130 130, tab 2 flat
box "",14, 146 61 107 100, tab 2 flat
list 15, 27 44 110 118, disable, tab 2 flat
text "Nick:",16, 152 78 22 20, tab 2 flat
edit "",17, 178 75 69 22, autohs, disable, tab 2 flat
text "Pass:",18, 152 106 25 20, tab 2 flat
edit "",19, 181 103 66 22, pass, autohs, disable, tab 2
button "Dodaj",20, 152 132 45 22, disable, tab 2 flat
button "Obrisi",21, 202 132 45 22, disable, tab 2 flat
check " Ukljuci",22, 174 43 52 20, tab 2 flat
check " OP:",23, 29 47 48 20, tab 3 flat
edit "",24, 82 46 160 22, autohs, center, tab 3 flat
check " Voice:",25, 29 75 53 20, tab 3 flat
edit "",26, 87 74 155 22, autohs, center, tab 3 flat
check " Deop:",27, 29 103 59 20, tab 3 flat
edit "",28, 93 102 149 22, autohs, center, tab 3 flat
check " Devoice:",29, 29 131 66 20, tab 3 flat
edit "",30, 100 130 142 22, autohs, center, tab 3 flat
box "",31, 17 31 236 130, tab 3 flat
button "About",32, 74 176 55 22, flat
}
on 1:dialog:mkjoin:init:*: {
var %ctr1 = 1 | while (%ctr1 <= $numtok(%mkjoin.chans,32)) { did -a $dname 4 $Gettok(%mkjoin.chans,%ctr1,32) | inc %ctr1 }
if (%var1 == on) { did -c mkjoin 11 | did -e mkjoin 4,6,9 }
var %ctr = 1 | while (%ctr <= $numtok(%AutoID.nicks,32)) { did -a $dname 15 $Gettok(%AutoID.nicks,%ctr,32) | inc %ctr }
if (%var == on) { did -c mkjoin 22 | did -e mkjoin 15,17,19,20 }
did -a mkjoin 24 %opmsg
did -a mkjoin 26 %vmsg
did -a mkjoin 28 %deopmsg
did -a mkjoin 30 %dvmsg
if (%opthnks == on) { did -c mkjoin 23 }
if (%voicethnks == on) { did -c mkjoin 25 }
if (%deopthnks == on) { did -c mkjoin 27 }
if (%devothnks == on) { did -c mkjoin 29 }
if (%opthnks == off) { did -m mkjoin 24 }
if (%voicethnks == off) { did -m mkjoin 26 }
if (%deopthnks == off) { did -m mkjoin 28 }
if (%devothnks == off) { did -m mkjoin 30 }
}
on 1:dialog:mkjoin:sclick:*: {
if ($did == 4) { did -ra $dname 6 $did(4).seltext | did -e $dname 10 }
if ($did == 9) { set %mkjoin.chans [ %mkjoin.chans ] $did(6) | did -a $dname 4 $did(6) | did -ra $dname 6 }
if ($did == 10) { set %mkjoin.chans $deltok(%mkjoin.chans,$findtok(%mkjoin.chans,$did(6),32),32) | did -d $dname 4 $did(4).sel | did -ra $dname 6 | did -b $dname 10 }
if ($did == 11) { if ($did(11).state == 1) { set %var1 on | set %mkjoin $true | did -e mkjoin 4,6,9 } | else { set %var1 off | set %mkjoin $false | did -b mkjoin 4,6,9 } }
if ($did == 15) { did -ra $dname 17 $did(15).seltext | did -ra $dname 19 $Gettok(%AutoID.pass,$findtok(%AutoID.nicks,$did(15).seltext,32),32) | did -e $dname 21 }
if ($did == 20) { set %AutoID.nicks [ %AutoID.nicks ] $did(17) | set %AutoID.pass [ %AutoID.pass ] $did(19) | did -a $dname 15 $did(17) | did -ra $dname 17,19 }
if ($did == 21) { set %AutoID.nicks $deltok(%AutoID.nicks,$findtok(%AutoID.nicks,$did(17),32),32) | set %AutoID.pass $deltok(%AutoID.pass,$findtok(%AutoID.pass,$did(19),32),32) | did -d $dname 15 $did(15).sel | did -ra $dname 17,19 | did -b $dname 21 }
if ($did == 22) { if ($did(22).state == 1) { set %var on | set %AutoID $true | did -e mkjoin 15,17,19,20 } | else { set %var off | set %AutoID $false | did -b mkjoin 15,17,19,20 } }
if ($did == 23) { if (%opthnks == on) { set %opthnks OFF | did -m mkjoin 24 | halt } | if (%opthnks != On) { set %opthnks ON | did -n mkjoin 24 | halt } }
if ($did == 25) { if (%voicethnks == ON) { set %voicethnks Off | did -m mkjoin 26 | halt } | if (%voicethnks != On) { set %voicethnks ON | did -n mkjoin 26 | halt } }
if ($did == 27) { if (%deopthnks == on) { set %deopthnks OFF | did -m mkjoin 28 | halt } | if (%deopthnks != On) { set %deopthnks ON | did -n mkjoin 28 | halt } }
if ($did == 29) { if (%devothnks == on) { set %devothnks OFF | did -m mkjoin 30 | halt } | if (%devothnks != On) { set %devothnks ON | did -n mkjoin 30 | halt } }
if ($did == 32) { mkabout }
}
on *:dialog:mkjoin:edit:24:{ set %opmsg $did(24) }
on *:dialog:mkjoin:edit:26:{ set %vmsg $did(26) }
on *:dialog:mkjoin:edit:28:{ set %deopmsg $did(28) }
on *:dialog:mkjoin:edit:30:{ set %dvmsg $did(30) }
on ^*:op:#: { if ($opnick == $me) && (%opthnks == ON) { msg $chan %opmsg } }
on ^*:deop:#: { if ($opnick == $me) && (%deopthnks == ON) { msg $chan %deopmsg } }
on ^*:voice:#: { if ($vnick == $me) && (%voicethnks == ON) { msg $chan %vmsg } }
on ^*:devoice:#: { if ($vnick == $me) && (%devothnks == ON) { msg $chan %dvmsg } }
On *:connect:{
if (%mkjoin == $true) { var %i = $numtok(%mkjoin.chans,32) | while (%i) { join $gettok(%mkjoin.chans,%i,32) | dec %i } }
}
on *:notice:*:?: {
if ($nick == NickServ) && (*IDENTIFY*PASS* iswm $strip($1-)) && ($istok(%AutoID.nicks,$me,32) == $true) && (%AutoID == $true) { echo -a $logo1 Identify za nick $me $+ | .identify $Gettok(%AutoID.pass,$findtok(%AutoID.nicks,$me,32),32) }
}
alias mkabout { dialog -m mkabout mkabout }
dialog mkabout {
title "AutoStaff abuot"
size -1 -1 159 92
option dbu
button "OK", 33, 70 75 60 10, flat ok cancel
text "Addon je Auto Ident,Auto Join,Auto Hvala za status lak i prost za upotrebu. Za Sve dodatne informacije,predloge kritike...Javite se na email", 34, 3 3 153 54
button "Posalji E-Mail autoru", 35, 3 60 60 10, flat
button "Poseti Web Sajt Autora", 36, 70 60 60 10, flat
button "Poseti
www.ircsvet.com", 37, 3 75 60 10, flat
}
on *:dialog:mkabout:sclick:35: {
if ($did == 35) { run mailto:marvi.konvic@gmail.com }
}
on *:dialog:mkabout:sclick:36: {
if ($did == 36) { run http://www.marvi-konvic.co.cc }
}
on *:dialog:mkabout:sclick:37: {
if ($did == 37) { run http://www.ircsvet.com }
}
menu * {
» Auto Stuff «: dialog -m mkjoin mkjoin