Aide commandes

**Dylan** Mar 29 Déc - 4:19

Code:: ######################## Aide Commands v1.0 ########################### # # # Author : MeS - MeS@EdenTech.Biz - http://www.EdenTech.Biz # # # Support Channels : #EdenTech @Undernet.org # #EdenTech @DalNet # #EdenTech @EdenTech.Biz # #EdenTech @Hells.ca # # # *Description : Ce script vous permet de configurer vous meme, celon # vos besoin les pub commands "!exemple" que vous souhaitez. Ainsi que # d'y afficher le resultat que vous desirez. Il affiche aussi une # notice à tous ceux qui rejoingnent le channel, les informants des # commandes disponibles # # # Exemple : !Exemple # Resultat: -nick notice- Ce Si Est Le Texte Qui Va Avec le !Exemple. # # # Se script est utilisez dans les channels d'aide pour des commandes # tel que !helper !aide !admin ... # # # -Il peut né-an-moin etre adapter à divers fonctions. Vous pouvez y # programmez une !list qui informera les gens des commandes disponibles # -Il peut etre utiliser pour les channels ISP. pour un !menu ou # !Services. # # # *En Bref Ce Script Serv a tout. Besoin de crées des pub aide # commandes vous etes à la bonne adresse. # # ####################################################################### # La Configuration du script commence ici # ####################################################################### # Vous n'avez aucun besoin de changer ceci. (Sauf pour frimer) set Aide-Cmds(ver) "v1.0" # la notice on join ou changreet que recevrons les user qui rejoignent # votre channel. Ainsi que votre channel doivent etre preciser ici. bind join - * join_tous proc join_tous {nick host hand chan} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Votre-Notice-On-Join ex: Soyez les bienvenues taper !menu pour acceder à notre list de commandes" } } # Ici vous devez apliquer les pub commandes désirées. # bind pub - !Exemple pub_Exemple --> remplace ici exemple par le nom # de la commande souhaiter et n'oublier pas de changer pub_"Exemple" # Il doivent avoir le meme nom. bind pub - !Exemple pub_Exemple # Il vous est possible de travailler en arborescence si vous le # souhaiter. Suffit de refléchir. taper !menu vous aurais !sousmenu1, # !sousmenu2, !sousmenu3 ... .Puis tapez !sousmenu2 vous accederais au # sousmenu3. Et avec sa vous pouvez crée un menu complé. # Plus vous avez besoin d'aide commande plus vous adder de pour crée # de nouvelle commande !.... . # bind pub - !..... pub_..... bind pub - !Aide pub_Aide bind pub - !helpers pub_Helpers bind pub - !list pub_list bind pub - !Info pub_Info bind pub - !Menu pub_Menu bind pub - !SousMenu pub_SousMenu bind pub - !Services pub_Services bind pub - !Service1 pub_Service1 # ICI commance la configuration des textes resultats des diférentes # commandes !..... ####################################################################### # Procédure !Exemple # ####################################################################### proc pub_Exemple {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Ceci est un exemple, remplacer ce text par votre propre text" puthelp "NOTICE $nick :Vous pouvez proceder par ligne chaque ligne correspond un 1 notice de la par du bot" } } # Aussi si vous changer l'intitule !Exemple de la commande ainsi que # le pub_Exemple. Vous dever le changer dans ces ligne de procedure # au dessu : "proc pub_Exemple" # pour adder des ligne de notice adder une ligne de script # puthelp "NOTICE $nick :la notice souhaité" # Vous pouvez adder autant de notice que vous souhaiter, mais il est # deconseiller de dépasser la mesure. Cela peut causer le flood de # votre Egg. ####################################################################### # Procédure !Aide # ####################################################################### proc pub_Aide {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Les Commandes d'aide sont :" puthelp "NOTICE $nick :!Aide-Commandes" puthelp "NOTICE $nick :!Aide-EggDrop" puthelp "NOTICE $nick :!Aide-PsyBNC" puthelp "NOTICE $nick :!Aide-Linux" puthelp "NOTICE $nick :!Aide-....." puthelp "NOTICE $nick :!Aide-....." } } ####################################################################### # Procédure !Helpers # ####################################################################### proc pub_Helpers {nick host hand chan args} { if {$chan == "#Votre-Channels"} { puthelp "NOTICE $nick :Nos Helpers Officiel sont :" puthelp "NOTICE $nick :MeS" puthelp "NOTICE $nick :Statique" puthelp "NOTICE $nick :Xeres" puthelp "NOTICE $nick :VorBis" puthelp "NOTICE $nick :`DarK`" puthelp "NOTICE $nick :`}F{F}F{`" puthelp "NOTICE $nick :Nick-du-helper" } } ####################################################################### # Procédure !list # ####################################################################### proc pub_list {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Nos Publics commands sont : !seen, !Info, !dns host; !ping nick, !aide,..." } } ####################################################################### # Procédure !Info # ####################################################################### proc pub_Info {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Channel D'Aide en tout genre" puthelp "NOTICE $nick :Notre Site Web : http://www......net" puthelp "NOTICE $nick :Nos Statistique: http://www......net" } } ####################################################################### # Procédure !Menu # ####################################################################### proc pub_Menu {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Les composant du menu d'aide sont :" puthelp "NOTICE $nick :!SousMenu" puthelp "NOTICE $nick :!SousMenu1" puthelp "NOTICE $nick :!SousMenu2" puthelp "NOTICE $nick :!SousMenu3" puthelp "NOTICE $nick :!SousMenu4" } } ####################################################################### # Procédure !SousMenu # ####################################################################### proc pub_SousMenu {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Offre 1" puthelp "NOTICE $nick :Qualité" puthelp "NOTICE $nick :nombre de" puthelp "NOTICE $nick :......" } } ####################################################################### # Procédure !Services # ####################################################################### proc pub_Services {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Nos services sont:" puthelp "NOTICE $nick :Service1" puthelp "NOTICE $nick :Shell-A" puthelp "NOTICE $nick :Shell-B" puthelp "NOTICE $nick :WebHosting" puthelp "NOTICE $nick :WebDesign" puthelp "NOTICE $nick :...." } } ####################################################################### # Procédure !Service1 # ####################################################################### proc pub_Service1 {nick host hand chan args} { if {$chan == "#Votre-Channel"} { puthelp "NOTICE $nick :Le Compte Service1 Est :" puthelp "NOTICE $nick :1 shell" puthelp "NOTICE $nick :2 backgrounds" puthelp "NOTICE $nick :1 email" puthelp "NOTICE $nick :Accés a tout nos vhost" puthelp "NOTICE $nick :........" puthelp "NOTICE $nick :........" puthelp "NOTICE $nick :10$/month" } } ############### CopyRight 2003 : EdenTech Communication ############### putlog "Aide Cmds TCL by MeS http://www.EdenTech.Biz loaded!"