CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2010 02 10 12:08:48

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

NEWS

Information sur la source

Note :

6,00 / 10

Catégorie :AddOns Niveau :Débutant Date de création :01/04/2005 Date de mise à jour :08/08/2005 17:32:20 Vu :2 116

Auteur : DieMaster

Ecrire un message privé

Site perso

Commentaire sur cette source (7)

Ajouter un commentaire et/ou une note

Description

Systeme de news assé symple ki peux gérer les news sur plusieurs chans

Source

on *:text:!setnews*:#chan: {
if (!$2) {
msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:.
halt
}
if (!$3) {
msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:.
halt
}
if ($2 !isnum) {
msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:.
halt
}
if ($2 > 1000) {
msg $chan 4,0.:.1 Le n° doit être comprit entre 0 & 1000 4,0.:.
halt
}
set %news [ $+ [ $chan ] $+ [ . ] $+ [ $round($2,0) ] ] $3-
msg $chan 4,0.:.1 News n° $2 : %news [ $+ [ $chan ] $+ [ . ] $+ [ $round($2,0) ] ] 4,0.:.
}
on *:text:!delnews*:#chan: {
if (!$2) {
msg $chan 4,0.:.1 Syntaxe: !delnews n° 4,0.:.
halt
}
if ($2 !isnum) {
msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:.
halt
}
if ($2 > 1000) {
msg $chan 4,0.:.1 Le n° doit être comprit entre 0 & 1000 4,0.:.
halt
}
unset %news [ $+ [ $chan ] $+ [ . ] $+ [ $round($2,0) ] ]
msg $chan 4,0.:.1 News n° $round($2,0) : supprimée 4,0.:.
}
on *:text:!news*:#chan: {
if (!$2) {
msg $chan 4,0.:.1 Syntaxe: !news n° 4,0.:.
halt
}
if ($2 !isnum) {
msg $chan 4,0.:.1 Syntaxe: !news n° 4,0.:.
halt
}
if ($2 > 1000) {
msg $chan 4,0.:.1 Le n° doit être comprit entre 0 & 1000 4,0.:.
halt
}
if (!%news [ $+ [ $chan ] $+ [ . ] $+ [ $2 ] ]) {
msg # 4,0.:.1 La news $2 : N'existe pas 4,0.:.
halt
}
msg # 4,0.:.1 News $2 : %news [ $+ [ $chan ] $+ [ . ] $+ [ $2 ] ] 4,0.:.
}

on *:text:!setnews*:#chan: { 
  if (!$2) { 
    msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:. 
    halt 
  } 
  if (!$3) { 
    msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:. 
    halt 
  } 
  if ($2 !isnum) { 
    msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:. 
    halt 
  } 
  if ($2 > 1000) { 
    msg $chan 4,0.:.1 Le n° doit être comprit entre 0 & 1000 4,0.:. 
    halt 
  } 
  set %news [ $+ [ $chan ] $+ [ . ] $+ [ $round($2,0) ] ] $3- 
  msg $chan 4,0.:.1 News n° $2 : %news [ $+ [ $chan ] $+ [ . ] $+ [ $round($2,0) ] ] 4,0.:. 
} 

on *:text:!delnews*:#chan: { 
  if (!$2) { 
    msg $chan 4,0.:.1 Syntaxe: !delnews n° 4,0.:. 
    halt 
  } 
  if ($2 !isnum) { 
    msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:. 
    halt 
  } 
  if ($2 > 1000) { 
    msg $chan 4,0.:.1 Le n° doit être comprit entre 0 & 1000 4,0.:. 
    halt 
  } 
  unset %news [ $+ [ $chan ] $+ [ . ] $+ [ $round($2,0) ] ] 
  msg $chan 4,0.:.1 News n° $round($2,0) : supprimée 4,0.:. 
} 


on *:text:!news*:#chan: { 
  if (!$2) { 
    msg $chan 4,0.:.1 Syntaxe: !news n° 4,0.:. 
    halt 
  } 
  if ($2 !isnum) { 
    msg $chan 4,0.:.1 Syntaxe: !news n° 4,0.:. 
    halt 
  } 
  if ($2 > 1000) { 
    msg $chan 4,0.:.1 Le n° doit être comprit entre 0 & 1000 4,0.:. 
    halt 
  } 
  if (!%news [ $+ [ $chan ] $+ [ . ] $+ [ $2 ] ]) { 
    msg # 4,0.:.1 La news $2 : N'existe pas 4,0.:. 
    halt 
  } 
  msg # 4,0.:.1 News $2 : %news [ $+ [ $chan ] $+ [ . ] $+ [ $2 ] ] 4,0.:. 
}

Historique

08 août 2005 17:32:21 :: Qq modifs dezo

Sources du même auteur

..........

MASS CMD

Toutes les sources de DieMaster

Sources de la même categorie

BLACKLIST PSEUDOS/MASKS par usurpateur

[XCHAT] ANTI KICK / AWAY C++ par GeroXXXX

JEU DU CODE par alanpersonproject

SERVEUR FTP par hisoka2501

BANNIR LES AGES, LES HOMMES, LES FEMMES ET PSEUDO AVEC CHIFF... par cougar_du_havre

Toutes les sources de la catégorie AddOns

Commentaires et avis

Commentaire de SornDrixer le 02/04/2005 09:49:43 administrateur CS

Tu aurais pu faire qu'un seul événement TEXT et tout regrouper dans celui-ci (beaucoup de lignes se répètent)

Ainsi tu aurais pu éviter ton erreur :
msg $chan 4,0.:.1 Syntaxe: !setnews n° news 4,0.:
(pour la commande !delnews, je vois pas se que !setnews vient faire là dedans)

if ($2 > 999999999)
Le jour où tu trouves quelqu'un qui arrive à poster plus de 999999999 news, tu m'appelles. Je pense que cette condition est inutile :
- soit le numéro de la news existe, donc tu l'affiches
- si le numéro n'existe pas, tu en informes l'user et voilà

Et si on souhaite poster une longue news, comment on fait ? Les variables n'autorisent pas l'enregistrement d'une chaine de caractère illimité !
les .txt (/write,$read), les .ini (/writeini,$readini,/remini) ou même les hashtables sont plus adaptés pour ce genre de système.

Ca serait pas mal non plus de rendre ton système multi-serveur (en te basant sur $network, et si $network ne retourne rien, tu te bases sur $server)

C'est un bon début de code, mais à améliorer
Bonne continuation

Commentaire de COOLMAN002 le 02/04/2005 10:02:51

on *:text:!news*:#chan: {
if (!$2) {

si tu mets "!news*", $2 existe forcement il me semble.
Si pour del c'est !delnews, pk pour ajouter on fait pas: !addnews ?

Idem que Sorn.

Commentaire de fjxokt le 02/04/2005 10:43:28

tu dis toi meme que cette source est assez simple et tu la met en initié ?
Sinon bcp d'ameliorations possibles (voir plus haut)

Commentaire de wims le 02/04/2005 10:58:56

Idem que plus haut.
Utilise elseif et else

Commentaire de MaX_62 le 02/04/2005 11:37:59

on *:text:!setnews*:#chan: {

et si on est pas sur #chan ? :(
si je tapes !setnewss ça va marcher. Tu peux faire

on *:text:!setnews &:#:{

Sinon les crochets j'aime pas trop, je préfère $+(1,2,3)

Commentaire de Sizlaa le 12/04/2005 18:23:19

Source faite qu'avec des On Text, je ne pense pas qu'elle puisse valoir 10/10... sinon il faudrait vraiment m'expliker
Toot a déjà été dis

Commentaire de Wallach le 22/04/2005 13:44:05

je suis pas un adepte du on *:text , mets des alias a la limite ca fait plus discret et ca evite de saouler les gens
L'idée est bonne mais le script mal travaillé. C'est un debut. :p

Ajouter un commentaire

Nos sponsors

Derniers Blogs

TECHDAYS PARIS 2010 : PLEINIèRE DERNIER JOUR par ROMELARD Fabrice

UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante

TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice

[DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE par orion

TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010 par ROMELARD Fabrice

Forum

RE : ON RAWMODE par WorldDMT

RE : PROBLEME AVEC UN QUIZZ par vincent67190

RE : PROBLèME FLAG IRCOP par WebiK

AVERTISSMENT ET KIKK par mouhcine951990

RE : PROBLèME FLAG IRCOP par Benjamin37

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Module sur Prestashop
Budget : 700€
Redaction d-une page de vente pour un ebook
Budget : 300€
module flash de personalisation
Budget : 600€

Logiciels

DB-MAIN (9.1.0)
DB-MAIN (9.1.0)

DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal...

Cliquez pour télécharger DB-MAIN
Xilisoft DPG Convertisseur (5.1.37.0120)
XILISOFT DPG CONVERTISSEUR (5.1.37.0120)

Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé...

Cliquez pour télécharger Xilisoft DPG Convertisseur
GraphicsGale (2.01.01)
GRAPHICSGALE (2.01.01)

GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ...

Cliquez pour télécharger GraphicsGale
Architecte 3D (Platinum 2010)
ARCHITECTE 3D (PLATINUM 2010)

Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é...

Cliquez pour télécharger Architecte 3D
TeamViewer 5 (TeamViewer 5)
TEAMVIEWER 5 (TEAMVIEWER 5)

Dépanner un ami,expliquer une manipulation devient un jeu d'enfant. Prise en main d'un autre ord...

Cliquez pour télécharger TeamViewer 5