Création d'un service tcl
#1
Bonjour,

Voilà je me présente à vous pour avoir votre aide quand à la réalisation de mon service tcl.
Ce service va être multifonction mais étant donne que je suis pas un très très bon codeur j'espère que vous pourrer me donner un coup de main pour que je puisse terminer mon jolie tcl.


Voilà, j'aimerai savoir s'il est possible de faire en sorte que le robot reconnaisse des mots et qu'à la réconnaissance de ce mot il y est un action, soit un kick soit un ban soit une réponse.

J'aimerai aussi faire un système de log via ce service je sais qu'il faut utiliser un proc de ce genre
Code :
putspeed "notice $n : "
if {![file exists "scripts/news.dab"]}
mais le soucis c'est comment le mettre en place et est ce qu'il y a une possibilité de le mettre sur du fichier non pas .dab mais .html ?

Ensuite j'ai fais ce codage sur des vhost pour des sajoins :
Code :
bind join - "*" mejoin3
proc mejoin3 {nick host hand arg} {
global vhostnet
  foreach vvhostnet $vhostnet {
  if [string match -nocase $vvhostnet $host]  {
putserv "SAJOIN $nick #staff"
    }  
  }
}
Mais hélas le sajoin ne s'effectue pas... Je comprends pas trop pourquoi...

J'aimerai savoir s'il est possible de faire un codage pour que le bot puisse halfopé,opé,etc via un système d'enregistrement via le robot ( comme par exemple eva ou lea ) ? Est ce compliqué à faire comme codage ?

Et pour finir, j'aimerai savoir s'il est possible via tcl de mettre un sytème sur les asv, c'est à dire, un utilisateur arrive avec un asv incorrect ou imcomplet ou sans asv, alors le bot refuse sa connexion sur les salons?

Merci d'avance à vous.
Répondre Avertir
#2
Salut,

Pour tout ce qui opé,half et autre sur authentifcation sur le robot, Tu la fonctionne des flag.

Enssuite pour ton tcl de sajoin je tes fais un petit code a toi de le testé j'ai aucun egg pour le teste moi meme !

TCL
#################################
#		Script sajoin.tcl		#
#	 Tcl Creat By BaGrift		#
#			27/02/2014			#
#								#
####################################
#		Aurel-Tchat Network		   #
#	Server irc://irc.aurel-tchat.fr#
# Site-Web http://aurel-tchat.fr   #
# Forum http://forum.aurel-tchat.fr#
####################################

#####################################################################################
#	Attention Si vous toucher le code vous risquer de le faire planter				#
#		Merci de pas toucher si vous avez aucune connaissance dans le domaine du TCL#
#####################################################################################

# Ici tu mais les vhost que tu veux qui sois sajoin !
set vhoststaff {
  *@NetAdmin.Ton-reseau.fr
  *@Admin.Ton-Reseau.fr
  *@CoAdmin.Ton-Reseau.fr
}
 
 
bind join - "*" join
proc join {nick host hand arg} {
global vhoststaff staff
  foreach vhost $vhoststaff {
  if [string match -nocase $vhost $host]  {
putserv "SAJOIN $nick #staff"
    }  
  }
}
 
putlog "\002\0034Chargement.. \002\037\0031sajoin.tcl by BaGrift\037\0031"


Site Web: Clic ici Nous rejoindres par mIRC -> Clic Ici
inutile d'avoir une grosse machine si il y'a un con deriere l'ecran Very Happy
Répondre Avertir
#3
Merci je vais tester ça et je vais te dire ce que cela donne Smile
Répondre Avertir
#4
Salut, je vais faire mon chieur.
Mais quelle et l'utilité de faire un sajoin ? Il serait pas plus juste que de faire une invitation, et comme sa la personne rejoins le salon.. surtout que forcer le join d'un salon a une personne c'est assez contraire a toutes fonctions

"Envoyé depuis mon GT-N7000 avec Tapatalk"
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
Répondre Avertir
#5
(27/02/2014, 21:19)KeeViiNou a écrit : Merci je vais tester ça et je vais te dire ce que cela donne Smile

Derien avec plaisir n’hésite pas si ta besoin !
Site Web: Clic ici Nous rejoindres par mIRC -> Clic Ici
inutile d'avoir une grosse machine si il y'a un con deriere l'ecran Very Happy
Répondre Avertir


Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté