voila g un gros prob sur mon auto join que je n'arrive pas a resoudre si quelqun pouvais m'aider se serais cool mci
;Auto-Join v2.08
;Team Nexgen 2002 by KnightFal
;www.team-nexgen.com
on *:load:{
if ($version < 5.91) echo -a $+ $colour(info2) $+ *** You
need mirc 5.91 or greator in order to use this addon. | beep
echo -a 4TEAM NEXGEN'S AUTO-JOIN v2.08 | echo -a
4Please type: /aj to begin dialog, type: /ajoin to rejoin set
channels.
}
menu Status,Menubar {
auto-join
.console:aj
.rejoin channels:ajoin
.switch $aj.switch
.. $aj.switch : if ($_ar(general,switch) == on) { if
($dialog(_ajoin) != $null) { did -b _ajoin 1,2,3,5 | did -u _ajoin 13 }
| _aw general switch off | haltdef } | else { if ($dialog(_ajoin)
!= $null) { did -c _ajoin 13 | did -e _ajoin 1,2,3,5 } | _aw general
switch on | haltdef }
}
alias -l aj.switch {
if ($_ar(general,switch) == off) { return $chr(91) $+ off $+ $chr(93) }
else { return $chr(91) $+ on $+ $chr(93) }
}
;[read write data/autojoin.ini]
alias -l _ar {
if ($exists(data\autojoin.ini) == $false) { mkdir data | write -c data\autojoin.ini }
return $readini data\autojoin.ini $$1 $$2
}
alias -l _aw {
if ($exists(data\autojoin.ini) == $false) { mkdir data | write -c data\autojoin.ini }
writeini data\autojoin.ini $$1 $$2 $$3-
}
alias -l _arem {
if ($exists(data\autojoin.ini) == $false) { mkdir data | write -c data\autojoin.ini }
remini data\autojoin.ini $$1 $$2
}
alias aj {
if ($version < 5.91) { echo -a 4This addon will not work
properly with mIRC $version $+ , please upgrade to latest mIRC
www.mirc.com | beep | halt }
if $dialog(_ajoin) == $null) { dialog -m _ajoin _ajoin }
}
;on *:connect: { ajoin }
on *:connect: { aj.join }
alias ajoin {
if ($version < 5.91) { echo -a 4This addon will not work
properly with mIRC $version $+ , please upgrade to latest mIRC
www.mirc.com | beep | halt }
if ($aj.network == $true) && ($_ar(general,switch) == on) { aj.join }
}
dialog _ajoin {
title "auto-join v2.08"
size -1 -1 127 116
option dbu
button "exit", 4, 250 250 15 10, ok
list 1, 7 34 50 64, disable size hsbar
edit "", 2, 7 11 50 10, disable autohs
button "add", 3, 8 24 21 8, disable
button "del", 5, 35 24 21 8, disable
list 6, 69 34 50 64, disable sort size hsbar
button "add", 7, 70 24 21 8, disable
button "del", 8, 97 24 21 8, disable
edit "", 9, 69 11 50 10, disable autohs
box "network", 10, 4 4 58 98
box "channel", 11, 65 4 58 98
check "enable", 13, 7 104 30 10
button "join now", 14, 81 105 29 8
}
on *:dialog:_ajoin:init:*:{
if ($_ar(general,switch) == on) { did -c _ajoin 13 | did -e _ajoin 1,2,3,5 }
did -o _ajoin 2 1 $net.check
aj.refresh
}
alias -l net.check {
if ($network != $null) { return $network }
else return $server
}
alias -l aj.netc {
if ($_ar(network,count) != $null) { return $_ar(network,count) }
else return 0
}
alias -l aj.chanc {
if ($_ar($did(1).sel,count) != $null) && ($_ar($did(1).sel,count) >= 1) { return $_ar($did(1).sel,count) }
else return 0
}
alias -l aj.refresh {
did -r _ajoin 1,6
var %aj1 = $aj.netc
var %ajc = 1
:loop
if (%ajc <= %aj1) { did -a _ajoin 1 $_ar(network,%ajc) }
else { goto end }
inc %ajc
goto loop
:end
}
alias -l net {
return " $+ $findfile($mircdirdata, $net.check $+ .txt,1) $+ "
}
alias -l aj.join {
var %aj1 = $lines($net)
var %ajc = 1
while (%ajc <= %aj1) { join $read($net ,%ajc) | inc %ajc 1 }
}
alias -l aj.channel {
did -r _ajoin 6
var %aj1 = $lines(data/ $+ $_ar(network,$_ar(network,current)) $+ .txt)
var %ajc = 1
while (%ajc <= %aj1) { did -a _ajoin 6 $read(data/ $+
$_ar(network,$_ar(network,current)) $+ .txt,%ajc) | inc %ajc 1 }
}
alias -l aj.network {
var %aj1 = $aj.netc
var %ajc = 1
:loop
if (%ajc > %aj1) { return $false | goto end }
elseif ($_ar(network,%ajc) == $net.check) { return $true }
else { return $false | goto end }
inc %ajc
goto loop
:end
}
alias -l del.ajset { remove $findfile($mircdirdata,autojoin.ini,1) }
on *:dialog:_ajoin:sclick:*:{
if ($did == 3) && ($did(2,$did(2).text) != $null) { _aw
network count $calc($aj.netc + 1) | _aw network $aj.netc $did(2).text |
did -a _ajoin 1 $did(2).text | did -r _ajoin 2 }
if ($did == 5) && ($did(1,$did(1).sel) != $null) { var
%ajq = $_ar(network,$_ar(network,current)) | _arem network
$aj.netc $did(1).sel | _aw network count $calc($aj.netc - 1) | did -r
_ajoin 1 | if ($findfile($mircdirdata,%ajq $+ .txt,1) != $null) {
remove data/ $+ %ajq $+ .txt } | aj.refresh | aj.channel }
if ($did == 1) && ($did(1,$did(1).sel) != $null) { if
($left($active,1) == $chr(35)) { did -o _ajoin 9 1 $active } | did -e
_ajoin 6,9,7,8 | _aw network current $did(1).sel | aj.channel }
if ($did == 7) && ($did(1,$did(1).sel) != $null)
&& ($did(9,$did(9).text) != $null) { write data/ $+
$did(1,$did(1).sel) $+ .txt $did(9).text | did -a _ajoin 6 $did(9).text
| did -r _ajoin 9 }
if ($did == 8) && ($did(6,$did(6).sel) != $null) { write
-ds $+ $did(6,$did(6).sel) data/ $+ $did(1,$did(1).sel) $+ .txt |
.timer -m 1 1 aj.channel }
if ($did == 13) {
if ($_ar(general,switch) == on) { did -b _ajoin
1,2,3,5 | did -u _ajoin 13 | _aw general switch off | haltdef }
else { did -c _ajoin 13 | did -e _ajoin 1,2,3,5 | _aw general switch on | haltdef }
}
if ($did == 14) { aj.join }
}