System de news

Commenter

Contenu du snippet

System de news. Vous avez envie de faire passer une information spécial ou de laisser une trace de quelque chose, se system de news est présent pour vous.

!news : Pour les consultés
!addnews : Pour en ajouter une
!delnews : Pour en supprimer une

J'ai mit une protection pour !addnews et !delnews . Que les admin, op, owner, et propriétaire peut y toucher.

N'oublier pas de crée le fichier news.txt pour que les news puisse s'ajouter

Source / Exemple : 


on *:text:*:#: {
  if ($strip($1) == !news) {
    if (!$2) {
      sendnews $nick
    }
    else {
      if ($read(news.txt,$2)) {
        .notice $nick News $2 : $read(news.txt,$2)
      }
      else {
        .notice $nick News inexistante
      }
    }
  }
  elseif ($strip($1) == !addnews) {
    if (!$istok(%protect,$nick,32) && !$istok(%owner,$nick,32) && !$istok(%master,$nick,32)) { notice $nick Accès refusé. | halt }
      if ($2) {
        write news.txt $2-
        .notice $nick News ajoutée
      }
      else {
        .notice $nick Entre le texte de la news $nick !
      }
    }
  elseif ($strip($1) == !delnews) {
    if (!$istok(%protect,$nick,32) && !$istok(%owner,$nick,32) && !$istok(%master,$nick,32)) { notice $nick Accès refusé. | halt }
      if ($2) {
        if ($2 <= $lines(news.txt)) {
          write -dl $+ $2 news.txt
          .notice $nick News $2 supprimée
        }
        else {
          .notice $nick News inexistante !
        }
      }
      else {
        .notice $nick Entre le numéro de la news à supprimer !
      }
    }
..................
Crée un fichier ALIASES:

alias sendnews {
  if ($1) {
    var %i 1
    set %nbdnews $lines(news.txt)
    if ((%nbdnews == 0) || (%nbdnews == $null)) {
      .notice $nick Aucune news pour le moment
      halt
    }
    while (%i <= %nbdnews) {
      .notice $1 10( News %i ) 7 Poster a ( %time ) : $read(news.txt,%i)
      inc %i
    }
  }
}

Conclusion :


Je suis ouvert a toute amélioration pour cette source.

N'oublier pas de crée le fichier news.txt

J'attend une note et des réponces de vous tous.

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 (Minerbe)