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

Ce site au démarrage

begin process at 2012 02 12 04:34:06

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

Bots

> JEUX POUR SALON : RAPIDOZGAMEZ (JEUX DE MOTS)

JEUX POUR SALON : RAPIDOZGAMEZ (JEUX DE MOTS)

Information sur la source

Note :

6,67 / 10

Catégorie :Bots Niveau :Initié Date de création :27/03/2004 Vu :16 967

Auteur : juki_webmaster

Ecrire un message privé

Site perso

Commentaire sur cette source (19)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Jeux trés simple, Multijoueur où il faut recomposer un mot qui à pris des espaces.
Durée de realisation : 2h dés que j'ai eu la bonne idée.
Ce jeu est bien si l'ont lui ajoute encore une vingtaine de mot et qu'ont ny joue à 10 pour quelques mots, sinon il devient vite soulant...

Source

on ^1:text:*:#Jeux:{
if ( %jeuxstatut == on ) {
if ( $1 == !points ) { msg $chan 14[8Point de $2 $+ 14]5 %userpoints [ $+ [ $2 ] ] point(s) | halt }
if ( $1 == !aide ) { notice $nick Le but est de gagner le plus d'argent possible, le bot dit par exemple M A i so N et vous devez le reecrire : MAisoN . | halt }
if ( $1- === %mot) { unset %mot | inc %userpoints [ $+ [ $nick ] ] %mbrpointsmot | msg $chan 14[3Bravo14]5 $nick 6vient de dire le mot7 %motdernier 6le plus rapidement, il gagne2 %mbrpointsmot $+ points. | motgen | writeini points.ini RapidozGamez $nick %userpoints [ $+ [ $nick ] ] | inc %compteg 1 | halt }
else { halt }
}
else { halt }
}
alias motgen {
/set %mot $rand(1,15)
if ( %mot == 1 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 M a i S oN 5(2points) | set %mot MaiSoN | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 2 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 L o l 5(1points) | set %mot Lol | /set %mbrpointsmot 1 | set %motdernier %mot }
if ( %mot == 3 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 a L ti M è TrE 5(2points) | set %mot aLtiMèTrE | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 4 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 COL l e M b O L es 5(3points) | set %mot COLleMbOLes | set %mbrpointsmot 3 | set %motdernier %mot }
if ( %mot == 5 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 rECt i T U d E 5(3points) | set %mot rECtiTUdE | set %mbrpointsmot 3 | set %motdernier %mot }
if ( %mot == 6 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 Z eU S 5(1points) | set %mot ZeUS | /set %mbrpointsmot 1 | set %motdernier %mot }
if ( %mot == 7 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 R O m u L us 5(2points) | set %mot ROmuLus | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 8 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 SY n a L l AG m a TI q u E 5(4points) | set %mot SYnaLlAGmaTIquE | set %mbrpointsmot 4 | set %motdernier %mot }
if ( %mot == 9 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 SZ é kE s f e H érv Àr 5(4points) | set %mot SZékEsfeHérvÀr | set %mbrpointsmot 4 | set %motdernier %mot }
if ( %mot == 10 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 sU d è TEs 5(2points) | set %mot sUdèTEs | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 11 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 m IrC 5(1points) | set %mot mIrC | set %mbrpointsmot 1 | set %motdernier %mot }
if ( %mot == 12 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 P iR A t a gE 5(2points) | set %mot PiRAtagE | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 13 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 cOU r b EVoI e 5(2points) | set %mot cOUrbEVoIe | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 14 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 P lâ T rE 5(2points) | set %mot PlâTrE | set %mbrpointsmot 2 | set %motdernier %mot }
if ( %mot == 15 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 J u sTA u C oR p s 5(3points) | set %mot JusTAuCoRps | set %mbrpointsmot 3 | set %motdernier %mot }
}
alias rapidozgamez {
dialog -m rapidozgamez rapidozgamez
}
dialog rapidozgamez {
title "RapidozGamez v1.0 by juki (juki@noos.fr)"
size -1 -1 163 20
option dbu
radio "Activé", 1, 1 1 33 10
radio "Desactivé", 2, 1 11 36 10
button "Ok", 3, 39 1 37 18, ok
text "Nombre de partie :", 4, 77 1 47 8
edit "", 5, 77 9 47 10, disable
button "Fermer", 6, 125 1 37 18, ok
}
on *:dialog:rapidozgamez:init:0:{
actuc
}
alias actuc {
did -a rapidozgamez 5 %compteg
}
on *:dialog:rapidozgamez:sclick:1:{ set %jeuxstatut on | msg #jeux Le jeux vient d'être activé . | motgen }
on *:dialog:rapidozgamez:sclick:2:{ set %jeuxstatut off | msg #jeux Le jeux vient d'être desactivé . }

on ^1:text:*:#Jeux:{
  if ( %jeuxstatut == on ) {
    if ( $1 == !points ) { msg $chan 14[8Point de $2 $+ 14]5 %userpoints [ $+ [ $2 ] ] point(s) | halt }
    if ( $1 == !aide ) { notice $nick Le but est de gagner le plus d'argent possible, le bot dit par exemple M A i  so N et vous devez le reecrire : MAisoN . | halt }    
    if ( $1- === %mot) { unset %mot | inc %userpoints [ $+ [ $nick ] ] %mbrpointsmot | msg $chan 14[3Bravo14]5 $nick 6vient de dire le mot7 %motdernier 6le plus rapidement, il gagne2 %mbrpointsmot $+ points. | motgen | writeini points.ini RapidozGamez $nick %userpoints [ $+ [ $nick ] ] | inc %compteg 1 | halt }
    else { halt }
  }
  else { halt }
}
alias motgen {
  /set %mot $rand(1,15)
  if ( %mot == 1 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 M  a i S  oN 5(2points) | set %mot MaiSoN | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 2 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 L o l 5(1points) | set %mot Lol | /set %mbrpointsmot 1 | set %motdernier %mot } 
  if ( %mot == 3 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 a L  ti M è  TrE 5(2points) | set %mot aLtiMèTrE | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 4 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 COL l e M  b O L es 5(3points) | set %mot COLleMbOLes | set %mbrpointsmot 3 | set %motdernier %mot } 
  if ( %mot == 5 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 rECt  i T U  d E 5(3points) | set %mot rECtiTUdE | set %mbrpointsmot 3 | set %motdernier %mot } 
  if ( %mot == 6 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 Z  eU S 5(1points) | set %mot ZeUS | /set %mbrpointsmot 1 | set %motdernier %mot } 
  if ( %mot == 7 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 R O m u L  us 5(2points) | set %mot ROmuLus | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 8 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 SY n a L  l AG  m a TI  q u  E 5(4points) | set %mot SYnaLlAGmaTIquE | set %mbrpointsmot 4 | set %motdernier %mot } 
  if ( %mot == 9 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 SZ é  kE s  f e  H  érv Àr 5(4points) | set %mot SZékEsfeHérvÀr | set %mbrpointsmot 4 | set %motdernier %mot } 
  if ( %mot == 10 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 sU d  è TEs 5(2points) | set %mot sUdèTEs | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 11 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 m  IrC 5(1points) | set %mot mIrC | set %mbrpointsmot 1 | set %motdernier %mot } 
  if ( %mot == 12 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 P  iR A t  a gE 5(2points) | set %mot PiRAtagE | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 13 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 cOU  r b EVoI  e 5(2points) | set %mot cOUrbEVoIe | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 14 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 P  lâ T   rE 5(2points) | set %mot PlâTrE | set %mbrpointsmot 2 | set %motdernier %mot } 
  if ( %mot == 15 ) { /timerq 1 6 /msg #jeux 14[7Attention14] 3Tapez le plus rapidement le mot :2 J u  sTA  u C oR  p  s 5(3points) | set %mot JusTAuCoRps | set %mbrpointsmot 3 | set %motdernier %mot } 
}
alias rapidozgamez {
  dialog -m rapidozgamez rapidozgamez
}
dialog rapidozgamez {
  title "RapidozGamez v1.0 by juki (juki@noos.fr)"
  size -1 -1 163 20
  option dbu
  radio "Activé", 1, 1 1 33 10
  radio "Desactivé", 2, 1 11 36 10
  button "Ok", 3, 39 1 37 18, ok
  text "Nombre de partie :", 4, 77 1 47 8
  edit "", 5, 77 9 47 10, disable
  button "Fermer", 6, 125 1 37 18, ok
}
on *:dialog:rapidozgamez:init:0:{
  actuc
}
alias actuc {
  did -a rapidozgamez 5 %compteg
}
on *:dialog:rapidozgamez:sclick:1:{ set %jeuxstatut on | msg #jeux Le jeux vient d'être activé . | motgen }
on *:dialog:rapidozgamez:sclick:2:{ set %jeuxstatut off | msg #jeux Le jeux vient d'être desactivé . }

Conclusion

Ce jeux est premierment adapter pour un jeu multijoueur sur un salon mais en remplacent #jeux par $chan vous pourez facilement le rendre multisalon, multiserveur.
Pour ouvrir le dialogue faite /rapidozgamez

Tricheur, trouvez par Bowser (merci à toi) :

on *:text:*:#:{
if ( $strip($1) == [Attention] ) { /msg $chan $strip($replace($9-,$chr(32),,$wildtok($strip($1-) ,*,$wildtok($strip($1-),*,0,32),32),))) }
}

PS : "Bowser (merci à toi) " jeux de mots :p
Voila amuser vous, si vous trouvez une bonne parade contre ce tricheur merci de nous faire partager le code.

Sources du même auteur

REDIRE LES 5 DERNIERES LIGNES (LOG) POUR BOT ET USER

RECORD DE PRESENCE - MULTI-SALON

ERADICATEUR DE CLONE

MPROTECTION V1.0

DEBUT DE JEU DE QUIZZ - SNIPPET

Toutes les sources de juki_webmaster

Sources de la même categorie

GESTION.BOT V2.0 FINAL par aliassangelius

EXEMPLE DE TCL EN DCC par aliassangelius

SERVICE GEOFRONT (PERL) par iZyTeHPariaH

TCL EGGDROP par aliassangelius

ANIMATION POUR BOT par michounou

Toutes les sources de la catégorie Bots

Commentaires et avis

Commentaire de Dark-Dragoon le 27/03/2004 20:40:12

sa a l'air pas mal, mais varie la formule des kestion
car
alias tricheurdebot {
  set %nombot $?="non du bot"
  enable #trichbot
  echo -a Tricheur ouvert
}
alias offtricheuredebot {
  disable #trichbot
  echo -a Tricheur fermer
}
#trichbot off
on *:text:*:#:{
  if $nick == %nombot {
    msg $chan $gettok($remove($7-,$chr(32)),1,108)
  }
}
#trichbot end

peut suffir a tricher avec ton bot :)
( g pas tester )

Commentaire de juki_webmaster le 27/03/2004 20:56:19

A merci encore un petit code de triche :)
Sinon je suis trop tentez pour faire un nouveau dialogue pour créer nous meme nos mots, mais pour cela faudrez ecrire sur un fichier txt ( à la façon Wquizz ) avec $1 comme mot gagnant et $2- comme le mot devlopper , genre :
!ajouter TrUC T r UC
Mais je ne trouve pas comment faire ça, car ensuite sa devrez aussi lire en deux partie.
Donc si ont peux m'aider sa serait pas mal.

Commentaire de tempusus le 27/03/2004 22:37:50 administrateur CS

Bonsoir,

ce qui serais bien, ce serais que l'on fasse une liste de mots et que ce soit le script qui ajoute aleatoirement les espaces et les majuscules. Enfin, c'est une idée, je ne sais pas si c'est réalisable.

Par contre pour l'antitriche, rajouter des points peu etre? ou des caracteres ; : . , ?.

Qu'en penses tu?

Tempusus

Commentaire de juki_webmaster le 27/03/2004 22:42:22

Tempusus > L'idée des ; , . ... pourez être bien mais sa alongerais le code considerablement, et puis de toute façon je crois qu'il ya aucun moyen de proteger, car ont pouré bien faire $left(quelquchose,-quelqueschose) pour enlver un nombre precis de caractére à gauche et à droite et hop, ont delimite le mot et ont lui enleve les espaces.
Ce qui serais peut etre mieu, serait de créer de petit cube pas trés esthetique qui genererais des lettres aleatoirement de type rnd(A,ZZ) enfin de ce genre qui modifirerais aleatoirement le nombre de caractére à gauche et à droite.
Enfin c'est pas tout à fait gagner.
Là me faut trop une aide pour :

Sinon je suis trop tentez pour faire un nouveau dialogue pour créer nous meme nos mots, mais pour cela faudrez ecrire sur un fichier txt ( à la façon Wquizz ) avec $1 comme mot gagnant et $2- comme le mot devlopper , genre :
!ajouter TrUC T r UC
Mais je ne trouve pas comment faire ça, car ensuite sa devrez aussi lire en deux partie.

Bonne fin de soirée à tous.

Commentaire de tempusus le 27/03/2004 22:46:55 administrateur CS

à mon avis, ya toujours moyen de tricher quelque soit le jeu. par contre, generer aléatoirement des espaces, des caracteres ou ce que l'on veut peu etre interressant pour limiter cette triche.

enfin, à voir :)

Tempusus

Commentaire de SornDrixer le 28/03/2004 09:40:50 administrateur CS

Bonne source.
Pour l'anti-triche, je ne pense pas qu'il y est de moyen fiable d'empêcher la triche sur ton jeu.
Tu peux sinon mettre des règles restrictives :
Celui qui tape un mot de plus de X caractères en moins de X secondes n'est pas retenu.
(Par exemple, je ne pense pas que quelqu'un puisse taper un mot de 15 caractères en une seconde)
Si une personne gagne des points depuis 5 mots d'affilés, alors on ignore cette personne pendant X secondes, histoire de ne pas décourager les autres participants, et de punir cet "éventuel" tricheur.

Commentaire de tofu le 28/03/2004 11:35:48

si tu px empècher la triche, tu crée les mots avec $rand() :)

Commentaire de juki_webmaster le 28/03/2004 11:47:30

Simere pour le 1,00/10 . Va jouer à la gameboy là tu aura plus de chance de gagner.

Commentaire de SornDrixer le 28/03/2004 11:48:57 administrateur CS

Un petit 10/10 pour remonter :P

Commentaire de tempusus le 28/03/2004 11:50:38 administrateur CS

En ce qui me concerne, 7/10.

bon code :)

Tempusus

Commentaire de juki_webmaster le 28/03/2004 14:45:06

mdr SornDrixer.

Commentaire de Panther007 le 28/08/2004 15:35:22

comment sa marche ??

Commentaire de lunamia le 02/09/2004 21:56:14

Bon j'ai copier tous sa et jlai mis ds Remote
mais quand je fais /rapidozgamez
sa me dis RAPIDOZGAMEZ Unknown command
alors comment on fait pou le faire marche?

Commentaire de VedamDren le 03/01/2005 02:38:42

/dialog -m rapidozgamez rapidozgamez

:)

Commentaire de punk6_2 le 28/03/2005 19:10:36

Il va trés bien le code

Commentaire de DjD3sTr0y le 24/10/2007 23:10:50

Salut je vien de loader ce script et la commande !points ne donnais que ceci :
!points
<jeutest> [Point de ] point(s)
Jai chercher et a cette place au début de ton code voici ton bout :
if ( $1 == !points ) { msg $chan 14[8Point de $2 $+ 14]5 %userpoints [ $+ [ $2 ] ] point(s) | halt }

J'ai modifier cette partie et voila maintenant le résulta :
!points
<jeutest> [Point de VoiCeBoT] 1 point(s)
Voila ce que jai modifier regarde comme faut ta partie etla mienne pour comprende sce qui nallais pas :

if ( $1 == !points ) { msg $chan 14[8Point de $nick $+ 14]5 %mbrpointsmot [ $+ [ $2 ] ] point(s) | halt }

Ce nétais pas $2 mais $nick et aussi pas %userpoints mais
%userpoints .

Voila moi c'est la seul chose que jai vue qui clochait mais jadore le jeu .

et pour quelqun qui nest pas scripteur comme moi (moi je script pas ) je me trouve fier davoir trouver ca lol .

10/10 ton code :P

Commentaire de DjD3sTr0y le 24/10/2007 23:16:45

dsl :s je vien de mapercevoir que je post se message 2 ans plus tard loll :S mais o moin kkun lora dit lol

Commentaire de DjD3sTr0y le 24/10/2007 23:39:24

%mbrpointsmot dans ma partie a la place de %userpoints dsl :S:S jai coier trop vite mon mot

Commentaire de doob666 le 25/11/2007 16:04:50

if (%mot isin $strip($1-)) { unset %mot | inc %userpoints [ $+ [ $nick ] ] %mbrpointsmot | msg $chan 14[3Bravo14]1,7 $nick 6vient de dire le mot7 %motdernier 6le plus rapidement, il gagne7 %mbrpointsmot $+ points. | motgen | writeini points.ini RapidozGamez $nick %userpoints [ $+ [ $nick ] ] | inc %compteg 1 | halt }

Pour pouvoir utiliser les couleurs et pouvoir répondre ^^

Ajouter un commentaire

Nos sponsors

Derniers Blogs

SESSION SILVERLIGHT 5 3D : SLIDES ET DEMOS par Groc

[TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES par gpommier

[SHAREPOINT] LES SESSIONS TECHDAYS 2012. par Patrick Guimonet

TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3 par ROMELARD Fabrice

MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE ! par Vko

Forum

CONFLIT ENTRE BOTSERV ET CHANSERV ? par Nordicansa

RE : AIDE par Nico26000

RE : AIDE par WorldDMT

RE : AFFICHAGE DES JOIN/PART/QUIT DANS UNE FENêTRE à PART @JPQ ? par WorldDMT

AIDE par Nico26000

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Passerelle Pericles sur site Joomla 17
Budget : 499€
Infogerance Serveur Debian Linux
Budget : 2 400€
Developpeur applications iphone - ipad - android
Budget : 800€

Logiciels

Tribler (2012)
TRIBLER (2012)

Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des...

Cliquez pour télécharger Tribler
OneSwarm (2012)
ONESWARM (2012)

Le peer-to-peer qui protège votre vie privée, c'est OneSwarm. Ce logiciel de peer-to-peer crypté...

Cliquez pour télécharger OneSwarm
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)

PONAMEDIA TV DEVIENS HELLLOOO FLASH LA TV SUR VOTRE ORDINATEUR. Toute une plateforme Multi...

Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO
Academy System (17.2.1.0)
ACADEMY SYSTEM (17.2.1.0)

Logiciel de gestion des établissements. - élèves/étudiants (inscription, dossier, absence...) -...

Cliquez pour télécharger Academy System
Easy-Planning (1.0.0.1)
EASY-PLANNING (1.0.0.1)

Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ...

Cliquez pour télécharger Easy-Planning