|
Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
S'ENREGISTRER AUPRÈS DE SON BOT
Information sur la source
Description
Un petit system pour s'enregistrer auprès de son bot et pouvoir utilisé les commandes qui suivent.
Bien sur on peut adapté la commande d'enregistration pour d'autre chose
Source
- On *:text:*:?:{
- if ($1 == register) {
- if ($2 == $null) && ($1 == register) { .notice $nick [ERREUR] <~~> 3/msg $me Register MotDePasse }
- elseif ($address($nick,2) isin $read(pseudoth.txt, w,* $+ $address($nick,2) $+ *)) { .notice $nick [ERREUR] <~~> Vous êtes déjà enregistré sur le bot avec l'adresse :4 $address($nick,2) }
- elseif ($2 == MotDePasse) && ($1 == register) { .notice $nick [ERREUR] <~~> Merci de donner un mot de passe valide }
- else { /write pseudoth.txt $address($nick,2) | /set %mdp $+ $address($nick,2) $2 | /set %ol $+ $address($nick,2) ON | .notice $nick Vous êtes maintenant enregistré auprès du bot avec l'adresse :4 $address($nick,2) }
- }
- elseif ($1 == login) {
- if ($2 == $null) && ($1 == login) { .notice $nick [ERREUR] <~~> 3/msg $me login MotDePasse }
- elseif ($address($nick,2) != $read(pseudoth.txt, w,* $+ $address($nick,2) $+ *)) { .notice $nick [ERREUR] <~~> Vous n'êtes pas enregistré auprès du bot : 3/msg $me register MotDePasse 4Si vous avez changé votre vhost, merci de vous ré-enregistrer }
- elseif (%ol [ $+ [ $address($nick,2) ] ] == ON) { .notice $nick [ERREUR] <~~> Vous êtes déjà identifié }
- elseif ($2 != %mdp [ $+ [ $address($nick,2) ] ]) { .notice $nick [ERREUR] <~~> Mauvais Mot de passe }
- else { /set %ol [ $+ [ $address($nick,2) ] ] ON | .notice $nick Identification Réussie }
- }
- elseif ($1 == logout) {
- if ($address($nick,2) != $read(pseudoth.txt, w,* $+ $address($nick,2) $+ *)) { .notice $nick [ERREUR] <~~> Vous n'êtes pas enregistré auprès du bot : 3/msg $me register MotDePasse 4Si vous avez changé votre vhost, merci de vous ré-enregistrer }
- elseif (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous n'êtes pas identifié }
- else { /set %ol [ $+ [ $address($nick,2) ] ] OFF | .notice $nick Vous n'êtes plus identifié }
- }
-
- On *:text:*:#:{
- if ($1 == !v) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 0) && ($2 == $null) { /mode $chan +v $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan +v $2 }
- }
- elseif ($1 == !dv) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 0) && ($2 == $null) { /mode $chan -v $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan -v $2 }
- }
- elseif ($1 == !h) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 3) && ($2 == $null) { /mode $chan +h $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan +h $2 }
- }
- elseif ($1 == !dh) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 3) && ($2 == $null) { /mode $chan -h $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan -h $2 }
- }
- elseif ($1 == !o) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 5) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) && ($2 == $null) { /mode $chan +o $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan +o $2 }
- }
- elseif ($1 == !do) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 5) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) && ($2 == $null) { /mode $chan -o $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan -o $2 }
- }
- elseif ($1 == !a) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan +a $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan +a $2 }
- }
- elseif ($1 == !da) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan -a $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan -a $2 }
- }
- elseif ($1 == !q) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan +q $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan +q $2 }
- }
- elseif ($1 == !dq) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan -q $nick }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan -q $2 }
- }
- elseif ($1 == !go-axx) {
- If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /halt }
- if ($address($2,2) != $read(pseudoth.txt, w,* $+ $address($2,2) $+ *)) { .notice $nick Vous ne pouvez mettre des aXx que sur des host's enregistré auprès du bot ! | .notice $2 $nick à éssayé de vous mettre un aXx, enregistré vous auprès du bot, pour que cela soit possible ! ( /msg $me register MotDePasse ) | /halt }
- If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
- If ( %ol [ $+ [ $address($nick,2) ] ] == ON ) && ( %axx [ $+ [ $address($nick,2) ] ] > 9 ) { /set %axx $+ $address($2,2) $3 | .notice $nick Un aXx3 Niveau $3 a bien été ajouté sur l'host4 $address($2,2) ! | .notice $2 $nick vient de vous mettre un aXx 3Niveau $3 sur votre host :4 $address($2,2) }
- }
- }
On *:text:*:?:{
if ($1 == register) {
if ($2 == $null) && ($1 == register) { .notice $nick [ERREUR] <~~> 3/msg $me Register MotDePasse }
elseif ($address($nick,2) isin $read(pseudoth.txt, w,* $+ $address($nick,2) $+ *)) { .notice $nick [ERREUR] <~~> Vous êtes déjà enregistré sur le bot avec l'adresse :4 $address($nick,2) }
elseif ($2 == MotDePasse) && ($1 == register) { .notice $nick [ERREUR] <~~> Merci de donner un mot de passe valide }
else { /write pseudoth.txt $address($nick,2) | /set %mdp $+ $address($nick,2) $2 | /set %ol $+ $address($nick,2) ON | .notice $nick Vous êtes maintenant enregistré auprès du bot avec l'adresse :4 $address($nick,2) }
}
elseif ($1 == login) {
if ($2 == $null) && ($1 == login) { .notice $nick [ERREUR] <~~> 3/msg $me login MotDePasse }
elseif ($address($nick,2) != $read(pseudoth.txt, w,* $+ $address($nick,2) $+ *)) { .notice $nick [ERREUR] <~~> Vous n'êtes pas enregistré auprès du bot : 3/msg $me register MotDePasse 4Si vous avez changé votre vhost, merci de vous ré-enregistrer }
elseif (%ol [ $+ [ $address($nick,2) ] ] == ON) { .notice $nick [ERREUR] <~~> Vous êtes déjà identifié }
elseif ($2 != %mdp [ $+ [ $address($nick,2) ] ]) { .notice $nick [ERREUR] <~~> Mauvais Mot de passe }
else { /set %ol [ $+ [ $address($nick,2) ] ] ON | .notice $nick Identification Réussie }
}
elseif ($1 == logout) {
if ($address($nick,2) != $read(pseudoth.txt, w,* $+ $address($nick,2) $+ *)) { .notice $nick [ERREUR] <~~> Vous n'êtes pas enregistré auprès du bot : 3/msg $me register MotDePasse 4Si vous avez changé votre vhost, merci de vous ré-enregistrer }
elseif (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous n'êtes pas identifié }
else { /set %ol [ $+ [ $address($nick,2) ] ] OFF | .notice $nick Vous n'êtes plus identifié }
}
On *:text:*:#:{
if ($1 == !v) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 0) && ($2 == $null) { /mode $chan +v $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan +v $2 }
}
elseif ($1 == !dv) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 0) && ($2 == $null) { /mode $chan -v $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan -v $2 }
}
elseif ($1 == !h) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 3) && ($2 == $null) { /mode $chan +h $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan +h $2 }
}
elseif ($1 == !dh) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 3) && ($2 == $null) { /mode $chan -h $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan -h $2 }
}
elseif ($1 == !o) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 5) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) && ($2 == $null) { /mode $chan +o $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan +o $2 }
}
elseif ($1 == !do) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 5) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) && ($2 == $null) { /mode $chan -o $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 4) { /mode $chan -o $2 }
}
elseif ($1 == !a) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan +a $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan +a $2 }
}
elseif ($1 == !da) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan -a $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan -a $2 }
}
elseif ($1 == !q) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan +q $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan +q $2 }
}
elseif ($1 == !dq) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /return }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) && ($2 == $null) { /mode $chan -q $nick }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] > 9) { /mode $chan -q $2 }
}
elseif ($1 == !go-axx) {
If (%ol [ $+ [ $address($nick,2) ] ] == OFF) { .notice $nick [ERREUR] <~~> Vous devez être identifier pour utiliser cette commande ( /msg $me login MotDePasse ) | /halt }
if ($address($2,2) != $read(pseudoth.txt, w,* $+ $address($2,2) $+ *)) { .notice $nick Vous ne pouvez mettre des aXx que sur des host's enregistré auprès du bot ! | .notice $2 $nick à éssayé de vous mettre un aXx, enregistré vous auprès du bot, pour que cela soit possible ! ( /msg $me register MotDePasse ) | /halt }
If (%ol [ $+ [ $address($nick,2) ] ] == ON) && (%axx [ $+ [ $address($nick,2) ] ] < 10) { .notice $nick [ERREUR] <~~> Votre AxX N'est pas sufisant ! | /halt }
If ( %ol [ $+ [ $address($nick,2) ] ] == ON ) && ( %axx [ $+ [ $address($nick,2) ] ] > 9 ) { /set %axx $+ $address($2,2) $3 | .notice $nick Un aXx3 Niveau $3 a bien été ajouté sur l'host4 $address($2,2) ! | .notice $2 $nick vient de vous mettre un aXx 3Niveau $3 sur votre host :4 $address($2,2) }
}
}
Conclusion
Simple mais efficace.
J'attends vaut conseil
Historique
- 23 juillet 2008 18:17:41 :
- Modification des on text ;)
- 23 juillet 2008 18:21:57 :
- remplacement des if ($2 == $null) par if (!$2)
- 23 juillet 2008 18:26:50 :
- remplacement de halt par return
Merci =]
- 24 juillet 2008 00:06:58 :
- ...
- 24 juillet 2008 10:31:59 :
- Modif
- 24 juillet 2008 11:06:53 :
- voila j'espère que se sera la derniere modif
- 24 juillet 2008 15:42:43 :
- Création de la fin du code
- 24 juillet 2008 16:19:59 :
- mise en place de
On *:text:*:#:{
if ($1 == !v) {
petit doute sur 2 fois if ^^
- 24 juillet 2008 18:23:29 :
- remplacement de on text register bidule par
On *:text:*:?:{
if ($1 == register) {
Voila je crois que c'est la derniere modif =)
- 24 juillet 2008 20:18:36 :
- Désolé sa c'est parce que j'ai rajouté un dern paragraphe
Session close.
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|