Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

BOT POUR SALON DE TEAM COUNTER-STRIKE (CS)


Information sur la source

Catégorie :Bots Niveau : Initié Date de création : 10/03/2005 Date de mise à jour : 10/03/2005 01:18:00 Vu / téléchargé: 13 314 / 659

Note :
6 / 10 - par 1 personne
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (9)
Ajouter un commentaire et/ou une note

Description

Pour les teams CS ne voulant pas se casser la tête avec un bot trop complexe il gère les requêtes basiques qu'une team peut attendre (!ip1, !radio, !url, !news...). Téléchargez le ZIP !
 

Source

  • ; Bot-Cs By Hathor @ #mIRC.fr
  • on *:text:!team*:#:{
  • msg $chan Team: %team
  • }
  • on *:text:!staff*:#:{
  • msg $chan Staff: %staff
  • }
  • on *:text:!news1:#:{
  • set %i $lines(news.txt)
  • var %x = 1
  • while (%x <= %i) {
  • .timer 1 %x msg $chan 4 $+ $read(news.txt,%x)
  • inc %x
  • }
  • }
  • on *:text:!news2:#:{
  • set %i $lines(news2.txt)
  • var %x = 1
  • while (%x <= %i) {
  • .timer 1 %x msg $chan 4 $+ $read(news2.txt,%x)
  • inc %x
  • }
  • }
  • on *:text:!even*:#:{
  • set %i $lines(events.txt)
  • var %x = 1
  • while (%x <= %i) {
  • .timer 1 %x msg $chan 4 $+ $read(events.txt,%x)
  • inc %x
  • }
  • }
  • on *:text:!war*:#:{
  • set %i $lines(wars.txt)
  • var %x = 1
  • while (%x <= %i) {
  • .timer 1 %x msg $chan 4 $+ $read(wars.txt,%x)
  • inc %x
  • }
  • }
  • on *:text:!result*:#:{
  • set %i $lines(results.txt)
  • var %x = 1
  • while (%x <= %i) {
  • .timer 1 %x msg $chan 4 $+ $read(results.txt,%x)
  • inc %x
  • }
  • }
  • on *:text:setnews1*:?:{
  • if ($2 == %pass) {
  • write -c news.txt
  • write news.txt $3-
  • notice $nick Ok changement des news effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setevents*:?:{
  • if ($2 == %pass) {
  • write -c events.txt
  • write events.txt $3-
  • notice $nick Ok changement des events effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setwars*:?:{
  • if ($2 == %pass) {
  • write -c wars.txt
  • write wars.txt $3-
  • notice $nick Ok changement des wars effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setresults*:?:{
  • if ($2 == %pass) {
  • write -c results.txt
  • write results.txt $3-
  • notice $nick Ok changement des results effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setnews2*:?:{
  • if ($2 == %pass) {
  • write -c news2.txt
  • write news2.txt $3-
  • notice $nick Ok changement des news2 effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setradio*:?:{
  • if ($2 == %pass) {
  • set %radio $3-
  • notice $nick Ok changement de la radio effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:seturl*:?:{
  • if ($2 == %pass) {
  • set %url $3-
  • notice $nick Ok changement de l'url effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setip1*:?:{
  • if ($2 == %pass) {
  • set %ip1 $3-
  • notice $nick Ok changement de l'ip 1 effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setip2*:?:{
  • if ($2 == %pass) {
  • set %ip2 $3-
  • notice $nick Ok changement de l'ip 2 effectué.
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setstaff*:?:{
  • if ($2 == %pass) {
  • set %staff $3-
  • notice $nick Ok staff mise à jour. Staff actuel: %staff
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:setteam*:?:{
  • if ($2 == %pass) {
  • set %team $3-
  • notice $nick Ok team mise à jour. Team actuelle: %team
  • }
  • else {
  • notice $nick Erreur mauvais pass.
  • }
  • }
  • on *:text:!radio*:#:msg $chan Radio: %radio
  • on *:text:!url*:#:msg $chan URL: %url
  • on *:text:!ip1*:#:msg $chan Server 1: %ip1
  • on *:text:!ip2*:#:msg $chan Server 2: %ip2
  • on *:text:!h*:#:msg $chan Il est $time
  • on *:text:!cmd*:#:{
  • set %i $lines(cmds.txt)
  • var %x = 1
  • while (%x <= %i) {
  • .timer 1 %x msg $chan $read(cmds.txt,%x)
  • inc %x
  • }
  • }
;                                               Bot-Cs By Hathor @ #mIRC.fr


on *:text:!team*:#:{
  msg $chan Team: %team
}
on *:text:!staff*:#:{
  msg $chan Staff: %staff
}
on *:text:!news1:#:{
  set %i $lines(news.txt)
  var %x = 1
  while (%x <= %i) { 
    .timer 1 %x msg $chan 4 $+ $read(news.txt,%x)
    inc %x
  }
}
on *:text:!news2:#:{
  set %i $lines(news2.txt)
  var %x = 1
  while (%x <= %i) { 
    .timer 1 %x msg $chan 4 $+ $read(news2.txt,%x)
    inc %x
  }
}
on *:text:!even*:#:{
  set %i $lines(events.txt)
  var %x = 1
  while (%x <= %i) { 
    .timer 1 %x msg $chan 4 $+ $read(events.txt,%x)
    inc %x
  }
}
on *:text:!war*:#:{
  set %i $lines(wars.txt)
  var %x = 1
  while (%x <= %i) { 
    .timer 1 %x msg $chan 4 $+ $read(wars.txt,%x)
    inc %x
  }
}
on *:text:!result*:#:{
  set %i $lines(results.txt)
  var %x = 1
  while (%x <= %i) { 
    .timer 1 %x msg $chan 4 $+ $read(results.txt,%x)
    inc %x
  }
}
on *:text:setnews1*:?:{
  if ($2 == %pass) {
    write -c news.txt
    write news.txt $3-
    notice $nick Ok changement des news effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setevents*:?:{
  if ($2 == %pass) {
    write -c events.txt
    write events.txt $3-
    notice $nick Ok changement des events effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setwars*:?:{
  if ($2 == %pass) {
    write -c wars.txt
    write wars.txt $3-
    notice $nick Ok changement des wars effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setresults*:?:{
  if ($2 == %pass) {
    write -c results.txt
    write results.txt $3-
    notice $nick Ok changement des results effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setnews2*:?:{
  if ($2 == %pass) {
    write -c news2.txt
    write news2.txt $3-
    notice $nick Ok changement des news2 effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setradio*:?:{
  if ($2 == %pass) {
    set %radio $3-
    notice $nick Ok changement de la radio effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:seturl*:?:{
  if ($2 == %pass) {
    set %url $3-
    notice $nick Ok changement de l'url effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setip1*:?:{
  if ($2 == %pass) {
    set %ip1 $3-
    notice $nick Ok changement de l'ip 1 effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setip2*:?:{
  if ($2 == %pass) {
    set %ip2 $3-
    notice $nick Ok changement de l'ip 2 effectué.
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setstaff*:?:{
  if ($2 == %pass) {
    set %staff $3-
    notice $nick Ok staff mise à jour. Staff actuel: %staff
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:setteam*:?:{
  if ($2 == %pass) {
    set %team $3-
    notice $nick Ok team mise à jour. Team actuelle: %team
  }
  else {
    notice $nick Erreur mauvais pass.
  }
}
on *:text:!radio*:#:msg $chan Radio: %radio
on *:text:!url*:#:msg $chan URL: %url
on *:text:!ip1*:#:msg $chan Server 1: %ip1
on *:text:!ip2*:#:msg $chan Server 2: %ip2
on *:text:!h*:#:msg $chan Il est $time
on *:text:!cmd*:#:{
  set %i $lines(cmds.txt)
  var %x = 1
  while (%x <= %i) { 
    .timer 1 %x msg $chan $read(cmds.txt,%x)
    inc %x
  }
}

Conclusion

Lisez de haut en bas l'aide sinon vous vous en sertirez jamais, téléchargez donc les 3 fichiers, le ZIP !
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Historique

10 mars 2005 01:18:00 :
Correction de fautes de frappes et précisions

Commentaires et avis

signaler à un administrateur
Commentaire de MaX_62 le 10/03/2005 06:58:13

Regroupe tes evenement ON TEXT !!

on *:TEXT:*:#:{
  if (!team* iswm $1-) { ... }
  elseif (!staff* iswm $1-) { ... }
}

signaler à un administrateur
Commentaire de wims le 10/03/2005 15:23:54

Ouais regroupe tes evenements
Puis aussi utilise des variables differentes car %i ou %x ou %pass sont souvent utilisés

signaler à un administrateur
Commentaire de MaX_62 le 10/03/2005 19:18:34

au fait, en parlant de variable, utilises les variables locales !

var %i $lines(news.txt) , %x 1

signaler à un administrateur
Commentaire de MaX_62 le 10/03/2005 19:19:24

Niveau initié ? mdr..

signaler à un administrateur
Commentaire de COOLMAN002 le 10/03/2005 19:26:49

on *:text:!team*:#:{
    msg $chan Team: %team
}

si %team n'existe pas ?
si !team apparait en couleur, ton bot ne réagira pas.

plus: ci dessus.

signaler à un administrateur
Commentaire de GiUsTiNo le 11/03/2005 13:33:09

Bon désolé mais je trouve ca exagéré de le mettre en "Initié" ...
Bonne continuation quand même !

Giustino, Admin VegaGames

signaler à un administrateur
Commentaire de Huitre le 17/03/2005 23:28:10

-Tes fichiers txt n existe pas, aucune verification ni creation le cas echeant.
-Les espaces ne sont pas geres
-Ce n est pas trop du inité
-Cf autres remarques

bonne chance.

signaler à un administrateur
Commentaire de Allan007 le 11/07/2006 22:45:00

Je te conseil de faire ton code en socket, car sinon tu as plusieur mIRC ouvert.... Moi perso mes bots sont en socket, c'est pas difficile.. il te faut un minimum de connaissance, sockopen, sockclose, sockread, var, gettok, hash tables / writeini / write / set.

Je vote pas car tu as mit le niveaux de ton code en initié, alors que ce gere de chose tu trouve un peux partout.

J'attend une mise a jours éventuelle, et bonne chance.

signaler à un administrateur
Commentaire de Belath le 14/06/2007 16:50:04

salut je sui pas hiper for en ordi j'aimerai un bot pour que mon perso xp mieu dans dofus merci de repondre  jai telecharger ton truc mai jai rien compris a ce quil faut faire merci de m'aider                                                                                

Ajouter un commentaire



Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,546 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.