NOMADYSTIC
Messages postés21Date d'inscriptiondimanche 1 juillet 2007StatutMembreDernière intervention10 juillet 2007
-
10 juil. 2007 à 09:40
cs_wims
Messages postés2466Date d'inscriptionvendredi 23 juillet 2004StatutMembreDernière intervention 1 août 2010
-
10 juil. 2007 à 15:12
Je post ici et ailleur car jai pris cette source et les doublé pour mon usage, mais jessais de faire le tout en un seul.mrc mais le on join semble pas fonctioné, quelqu'un pourrais maider? la source original est ici http://www.ircfr.com/codes/SYSTEME-VIP-TRES-SIMPLE_38636.aspx et celle que je bricolle ici:
alias IDoAdd {
if ((!$read(crypt\IDoList.txt,w,* $+ $address($$1,2) $+ *)) && ($$1 ison $$2)) {
write crypt\IDoList.txt $address($$1,2)
echo -a 3;15[ID-System] $$1 avec l'host $address($$1,2) ajouté à la liste des OPs.
}
else {
echo -a 3;15[ID-System] $$1 ( $+ $address($$1,2) $+ ) est déjà dans la list ou n'est pas présent sur $$2 $+ .
}
}
alias IDvAdd {
if ((!$read(crypt\IDvList.txt,w,* $+ $address($$1,2) $+ *)) && ($$1 ison $$2)) {
write IDvlist.txt $address($$1,2)
echo -a 3;14[ID-System] $$1 avec l'host $address($$1,2) ajouté à la liste des Voices.
}
else {
echo -a 3;14[ID-System] $$1 ( $+ $address($$1,2) $+ ) est déjà dans la list ou n'est pas présent sur $$2 $+ .
}
}
alias IDoDel {
if (($read(crypt\IDoList.txt,w,* $+ $address($$1,2) $+ *) != $null) && ($$1 ison $$2)) {
write -dw $+ $address($$1,2) crypt\IDoList.txt
echo -a 3;15[ID-System] $$1 avec l'host $address($$1,2) effacé de la liste des OPs.
}
else {
echo -a 3;15[ID-System] $$1 ( $+ $address($$1,2) $+ ) n'est pas dans la list ou n'est pas présent sur $$2 $+ .
}
}
alias IDvdel {
if (($read(crytp\IDvList.txt,w,* $+ $address($$1,2) $+ *) != $null) && ($$1 ison $$2)) {
write -dw $+ $address($$1,2) crypt\IDvList.txt
echo -a 3;14[ID-System] $$1 avec l'host $address($$1,2) effacé de la liste des Voices.
}
else {
echo -a 3;14[ID-System] $$1 ( $+ $address($$1,2) $+ ) n'est pas dans la list ou n'est pas présent sur $$2 $+ .
}
}
alias IDoList {
var %x = 1
var %i = $lines(crypt\IDoList.txt)
if (%i) {
while (%x <= %i) {
echo -a 3;15[Liste des hosts OPs] $read(crypt\IDoList.txt,%x)
inc %x
}
}
else {
echo -a 3;15[ID-System] Il n'y a aucuns OPs dans la liste pour le moment.
}
}
alias IDvList {
var %x = 1
var %i = $lines(crypt\IDvList.txt)
if (%i) {
while (%x <= %i) {
echo -a 3;14[Liste des hosts Voices] $read(crypt\IDvList.txt,%x)
inc %x
}
}
else {
echo -a 3;14[ID-System] Il n'y a aucuns Voice dans la liste pour le moment.
}
}
on *:JOIN:#Last.Call:{
if ($read(crypt\VIPoList.txt,w,* $+ $address($nick,2) $+ *) != $null) {
mode $chan +o $nick
msg $chan 3;3ID Confirmed. Access authorized.
msg $chan 3;5Welcome in the pack! Bienvenue dans la meute! ;)
}
}
on *:JOIN:#Last.Call:{
if ($read(crypt\IDvList.txt,w,* $+ $address($nick,2) $+ *) != $null) {
mode $chan +v $nick
msg $chan 3;3ID Confirmed. access authorized.
msg $chan 3;5Welcome in the pack! Bienvenue dans la meute!
}
}
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 10 juil. 2007 à 13:21
il me semble qu'on peu pas mettre deux on join comme ca à la suite essai de les regrouper peut etre :
on *:JOIN:#Last.Call:{
if ($read(crypt\VIPoList.txt,w,* $+ $address($nick,2) $+ *) != $null) {
mode $chan +o $nick
msg $chan 3;3ID Confirmed. Access authorized.
msg $chan 3;5Welcome in the pack! Bienvenue dans la meute! ;)
}
if ($read(crypt\IDvList.txt,w,* $+ $address($nick,2) $+ *) != $null) {
mode $chan +v $nick
msg $chan 3;3ID Confirmed. access authorized.
msg $chan 3;5Welcome in the pack! Bienvenue dans la meute!