Bonjour à tous!!!
Voici ma première source que je post ici, alors ne soyez pas indulgent ;)
Alors cette source est un petit remote qui permet de se débanir (si on a les droits pour le faire ^^) quelques soient l'ecriture du ban,
c'est à dire que mon script traite aussi les caracteres spéciaux comme le * et le ?
Ben voila c tout
Si celui la vous plait peut etre que plein d'autre suivront ^_^
Source / Exemple :
on *:BAN:#:{
if ($nick == $me) { halt }
if (($me isop $chan) || ($me ishop $chan)) {
if ($ForBan($banmask,$me)) { mode $chan -b $banmask }
}
}
alias ForBan {
;/server -m irc.ff.st -j #IRPG
;$chr(42) == * $chr(63) == ?
var %x 0
var %arg.data
var %arg.bool $false
var %arg.result
var %arg.mode $$1
var %arg.ban $$2 $+ $right($address($$2,0),$calc($len($address($$2,0))-1))
var %arg.lg $len($$1)
while (%x < %arg.lg) {
inc %x
if ($mid(%arg.mode,%x,1) != $chr(42)) && ($mid(%arg.mode,%x,1) != $chr(63)) {
%arg.data = %arg.data $+ $mid(%arg.mode,%x,1)
}
else if (($mid(%arg.mode,%x,1) == $chr(42)) || ($mid(%arg.mode,%x,1) == $chr(63))) && (%arg.data != $null) {
if (%arg.data isin %arg.ban) {
%arg.bool = $true
%arg.data = $null
}
else {
%arg.bool = $false
break
}
}
}
if (%arg.data isin %arg.ban) {
%arg.bool = $true
}
else if (%arg.data != $null) {
%arg.bool = $false
}
return %arg.bool
}
Conclusion :
J'attends toutes vos remarques constructives et eventuelles amélioratios avec impatience ;)
Pour des mises à jour venez faire un petit tour sur mon chan et puis adressez vous à [-_-Prince^__^Altaiir-_-]
/server -m irc.ff.st -j #IRPG
++ les rebelles xD
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.