Biosystem by [simon]

Commenter

Contenu du snippet

Voila, je debute en scripting mIRC, voila ma premiere source, un systeme de biographie pour BOT (enfin le mot biographie est peuut etre un peu gros :p)
C'est tout simple, il faut creer le fichier bio.ini dans le repertoire racine du BOT et copier le code dans une nouvelle remote.
Les commandes sont simple :
!biaide pour l'aide sur le systeme de biographie
!mabio <Le texte de la bio> pour enregistrer sa bio dans le BOT
!mabio DEL pour effecer sa biographie
!bio <nick> pour regarder la bio de quelqu'un
Voila, lachez vos commentaire, j'espere que ce code vous plaira !

Source / Exemple : 


;VERSION STABLE QUI MARCHE BIEN
on *:text:!bio*:#: {
  if (!$2) { notice $nick Tu veut la bio de qui ? Je suis pas devin moi ! }
  else {
    if ($readini($shortfn(bio.ini),bio,$2) == $null) {
      notice $nick Desolé $nick , mais $2 n'a pas entré sa biographie.
    }
    else {
      notice $nick Biographie de  $2 : $readini($shortfn(bio.ini),bio,$2)
      if ( $2 != $nick ) {
        if ( $2 ison $chan ) notice $2 $nick (sur $chan ) a lu ta biographie.
      }
    }
  }
}
On *:text:!mabio*:#: {
  if (!$2) { notice $nick Entre ta biographie cretin ! Je suis pas devin ! Ou si tu veut effecer ta bio, tape !mabio del }
  if ($2 == del) { remini bio.ini bio $nick | notice $nick Ta bio a bien été effacée ! }
  else {
    writeini $shortfn(bio.ini) bio $nick $2-
    notice $nick Voila $nick $+ ta bio est maintenant $2-
  }
}
On *:text:!biaide:#: {
  notice $nick AIDE SUR MON SERVICE DE BIOGRAPHIE
  notice $nick !mabio ta biographie pour entrer ta biographie dans ma base de donnée
  notice $nick !mabio DEL pour effacer ta biographie
  notice $nick !bio nick pour consulter la bio de quelqu'un
}

;VERSION AVEC ON TEXT REGROUPE, !MABIO DEL MARCHE PLUS, SI QUELQU'UN PEuT M'AIDER
on *:text:*:#: {
  if ($1 == !bio) {
    if (!$2) { notice $nick Tu veut la bio de qui ? Je suis pas devin moi ! }
    else {
      if (!$readini($shortfn(bio.ini),bio,$2)) {
        notice $nick Desolé $nick , mais $2 n'a pas entré sa biographie.
      }
      else {
        notice $nick Biographie de  $2 : $readini($shortfn(bio.ini),bio,$2)
        if ( $2 != $nick ) {
          if ( $2 ison $chan ) notice $2 $nick (sur $chan ) a lu ta biographie.
        }
      }
    }
  }
  if ($1 == !mabio) {
    if (!$2) { notice $nick Entre ta biographie cretin ! Je suis pas devin ! Ou si tu veut effecer ta bio, tape !mabio del }
    if ($2 == del) { 
      if (!$readini($shortfn(bio.ini),bio,$2)) {
        notice $nick T'es malin toi ! Tu veux effacer ta bio avant même de l'avoir ecrite !
      }
      else {
        remini bio.ini bio $nick
        notice $nick Ta bio a bien été effacée ! 
      }
    }
    else {
      writeini $shortfn(bio.ini) bio $nick $2-
      notice $nick Voila $nick $+ ta bio est maintenant $2-
    }
  }
  if ($1 == !biaide) {
    notice $nick AIDE SUR MON SERVICE DE BIOGRAPHIE
    notice $nick !mabio ta biographie pour entrer ta biographie dans ma base de donnée
    notice $nick !mabio DEL pour effacer ta biographie
    notice $nick !bio nick pour consulter la bio de quelqu'un
  }
}

Conclusion :


Bon je sais que j'aurai pu regrouper les on text mais des que je m'attaque aux IF, je m'y perd :p
Have fun !
-----EDIT-----
Je l'ai refait avec un seul on text, et je m'y suis pas perdu ! miracle :p !
En fait, Le code est en double parce-que quand je regroupe les on text, le !mabio del marche plus donc si quelqu'un pouvait me dire ou est l'erreur merci ;) !

A voir également

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.

Du même auteur (Simonledoudou)