Un systême vip très simple

2/5 (16 avis)

Snippet vu 8 405 fois - Téléchargée 23 fois

Commenter

Contenu du snippet

Un systême VIP assez simple pour un seul salon qui utilise les hosts pour détecter si oui ou non la personne est VIP, si oui elle sera voicer. Enfin vous pouvez modifier mode $chan +v $nick et msg $chan VIP détecté: $nick à votre grés.

Utilisation: /vipadd pseudo #salon pour ajouté qu'unlqun dans la vip list.
Utilisation: /vipdel pseudo #salon pour effacer qu'unlqun de la liste des vips.
Utilisation: /viplist pour voir la liste de toutes les hosts vips.

(Comme le suggère le code il faut que la personne soit présente sur le salon en question).

Source / Exemple :

alias vipadd {
if ((!$read(viplist.txt,w,* $+ $address($$1,2) $+ *)) && ($$1 ison $$2)) {
  write viplist.txt $address($$1,2)
  echo -a [VIP-System] $$1 avec l'host $address($$1,2) ajouté à la liste des VIPS.
}
else {
  echo -a  [VIP-System] $$1 ( $+ $address($$1,2) $+ ) est déjà dans la VIP list ou n'est pas présent sur $$2 $+ .
}
}
alias vipdel {
if (($read(viplist.txt,w,* $+ $address($$1,2) $+ *) != $null) && ($$1 ison $$2)) {
  write -dw $+ $address($$1,2) viplist.txt
  echo -a [VIP-System] $$1 avec l'host $address($$1,2) effacé de la liste des VIPS.
}
else {
  echo -a [VIP-System] $$1 ( $+ $address($$1,2) $+ ) n'est pas dans la VIP list ou n'est pas présent sur $$2 $+ .
}
}
alias viplist {
var %x = 1
var %i = $lines(viplist.txt)
if (%i) {
  while (%x <= %i) {
    echo -a [Liste des hosts VIPS] $read(viplist.txt,%x)
    inc %x
  }
}
else {
  echo -a [VIP-System] Il n'y a aucuns VIP dans la liste pour le moment.
}
}
on *:JOIN:#NomDuSalon:{
if ($read(viplist.txt,w,* $+ $address($nick,2) $+ *) != $null) {
  mode $chan +v $nick
  msg $chan VIP détecté: $nick 
}
}

Conclusion :

Modifiez on *:JOIN:#NomDuSalon:{ en mettant à la place de #NomDuSalon le nom de votre salon où sera appliqué le systême VIP.

A voir également

Ajouter un commentaire Commentaires

Signaler

NOMADYSTIC

Messages postés: 21
Date d'inscription: dimanche 1 juillet 2007
Statut: Membre
Dernière intervention: 10 juillet 2007

10 juil. 2007 à 09:38

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 15[ID-System] $$1 avec l'host $address($$1,2) ajouté à la liste des OPs.
}
else {
echo -a 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 14[ID-System] $$1 avec l'host $address($$1,2) ajouté à la liste des Voices.
}
else {
echo -a 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 15[ID-System] $$1 avec l'host $address($$1,2) effacé de la liste des OPs.
}
else {
echo -a 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 14[ID-System] $$1 avec l'host $address($$1,2) effacé de la liste des Voices.
}
else {
echo -a 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 15[Liste des hosts OPs] $read(crypt\IDoList.txt,%x)
inc %x
}
}
else {
echo -a 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 14[Liste des hosts Voices] $read(crypt\IDvList.txt,%x)
inc %x
}
}
else {
echo -a 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 3ID Confirmed. Access authorized.
msg $chan 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 3ID Confirmed. access authorized.
msg $chan 5Welcome in the pack! Bienvenue dans la meute!
}
}

Signaler

NOMADYSTIC

Messages postés: 21
Date d'inscription: dimanche 1 juillet 2007
Statut: Membre
Dernière intervention: 10 juillet 2007

7 juil. 2007 à 10:02

au fait bonne continuité au codeur du code, jai apris en jouent avec ;) 9/10 mais sa ses la note dun gars qui code pas :P

Signaler

NOMADYSTIC

Messages postés: 21
Date d'inscription: dimanche 1 juillet 2007
Statut: Membre
Dernière intervention: 10 juillet 2007

7 juil. 2007 à 09:59

jai ajouter des popup et tout car je veut me faire un script et jai doubler pour avoir les 2 mode.. on peut compresser ca en une seul remote car la jen est 2 .mrc

menu bar
UnderNet VIP
.V-OP
..Add VIP:/vipoadd $$?="Nicknames:" #$$?="Chan:"
..Del VIP:/vipodel $$?="Nicknames:" #$$?="Chan:"
..VIP List:/vipolist
.V-Voice
..Add VIP:/vipvadd $$?="Nicknames:" #$$?="Chan:"
..Del VIP:/vipvdel $$?="Nicknames:" #$$?="Chan:"
..VIP List:/vipvlist

Nick List
UnderNet VIP
.V-OP
..Add VIP:/vipoadd $$1 $chan
..Del VIP:/vipodel $$1 $chan
..VIP List:/vipolist
.V-Voice
..Add VIP:/vipvadd $$1 $chan
..Del VIP:/vipvdel $$1 $chan
..VIP List:/vipvlist

alias vipoadd {
if ((!$read(viplist.txt,w,* $+ $address($$1,2) $+ *)) && ($$1 ison $$2)) {
write viplist.txt $address($$1,2)
echo -a 15[VIP-System] $$1 avec l'host $address($$1,2) ajouté à la liste des VIPS.
}
else {
echo -a 15[VIP-System] $$1 ( $+ $address($$1,2) $+ ) est déjà dans la VIP list ou n'est pas présent sur $$2 $+ .
}
}
alias vipodel {
if (($read(viplist.txt,w,* $+ $address($$1,2) $+ *) != $null) && ($$1 ison $$2)) {
write -dw $+ $address($$1,2) viplist.txt
echo -a 15[VIP-System] $$1 avec l'host $address($$1,2) effacé de la liste des VIPS.
}
else {
echo -a 15[VIP-System] $$1 ( $+ $address($$1,2) $+ ) n'est pas dans la VIP list ou n'est pas présent sur $$2 $+ .
}
}
alias vipolist {
var %x = 1
var %i = $lines(viplist.txt)
if (%i) {
while (%x <= %i) {
echo -a 15[Liste des hosts VIPS] $read(viplist.txt,%x)
inc %x
}
}
else {
echo -a 15[VIP-System] Il n'y a aucuns VIP dans la liste pour le moment.
}
}
on *:JOIN:#N:{
if ($read(viplist.txt,w,* $+ $address($nick,2) $+ *) != $null) {
mode $chan +o $nick
msg $chan ID 3Confirmed access authorized.
msg $chan 0, 2007 14::15 VIP Détecté 14::0 $nick
msg $chan 5Welcome in the pack! Bienvenue dans la meute! ;)
}
}

@@@@@@@@@@@@@@@@@@@@@

alias vipvadd {
if ((!$read(viplist2.txt,w,* $+ $address($$1,2) $+ *)) && ($$1 ison $$2)) {
write viplist2.txt $address($$1,2)
echo -a 14[VIP-System] $$1 avec l'host $address($$1,2) ajouté à la liste des VIPS.
}
else {
echo -a 14[VIP-System] $$1 ( $+ $address($$1,2) $+ ) est déjà dans la VIP list ou n'est pas présent sur $$2 $+ .
}
}
alias vipvdel {
if (($read(viplist2.txt,w,* $+ $address($$1,2) $+ *) != $null) && ($$1 ison $$2)) {
write -dw $+ $address($$1,2) viplist2.txt
echo -a 14[VIP-System] $$1 avec l'host $address($$1,2) effacé de la liste des VIPS.
}
else {
echo -a 14[VIP-System] $$1 ( $+ $address($$1,2) $+ ) n'est pas dans la VIP list ou n'est pas présent sur $$2 $+ .
}
}
alias vipvlist {
var %x = 1
var %i = $lines(viplist.txt)
if (%i) {
while (%x <= %i) {
echo -a 14[Liste des hosts VIPS] $read(viplist2.txt,%x)
inc %x
}
}
else {
echo -a 14[VIP-System] Il n'y a aucuns VIP dans la liste pour le moment.
}
}
on *:JOIN:#N:{
if ($read(viplist2.txt,w,* $+ $address($nick,2) $+ *) != $null) {
mode $chan +v $nick
msg $chan ID 3Confirmed access authorized.
msg $chan 0, 2007 14::15 VIP Détecté 14::0 $nick
msg $chan 5Welcome in the pack! Bienvenue dans la meute! ;)
}
}

Signaler

NOMADYSTIC

Messages postés: 21
Date d'inscription: dimanche 1 juillet 2007
Statut: Membre
Dernière intervention: 10 juillet 2007

7 juil. 2007 à 09:44

ca marrche la mais on peut metre le choix de +v ou +o ? moi je les cloné la

Signaler

NOMADYSTIC

Messages postés: 21
Date d'inscription: dimanche 1 juillet 2007
Statut: Membre
Dernière intervention: 10 juillet 2007

7 juil. 2007 à 06:40

je narive pas a men servir ces normal?

Afficher les 16 commentaires

S'inscrire maintenant

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.

Un systême vip très simple

Contenu du snippet

Source / Exemple :

Conclusion :

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Du même auteur (cs_Hathor)

Mémoriser les chans qu'on join/part à la manière d'un bnc

Anti idle pour salon

Script de pickup

Bot pour salon de team counter-strike (cs)

Source / Exemple :

Conclusion :

A voir également

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Du même auteur (cs_Hathor)

Mémoriser les chans qu'on join/part à la manière d'un bnc

Anti idle pour salon

Script de pickup

Bot pour salon de team counter-strike (cs)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !