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

Ce site au démarrage

begin process at 2012 02 12 07:32:34

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

JEUX POUR SALON : CASINO BOT

Information sur la source

Note :

8,27 / 10

Catégorie :Bots Niveau :Initié Date de création :07/03/2004 Date de mise à jour :12/03/2004 19:13:13 Vu / téléchargé :16 783 / 938

Auteur : juki_webmaster

Ecrire un message privé

Site perso

Commentaire sur cette source (35)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Voici ma 3eme source sur le reseau code-source , je remerçit beaucoup Sorn pour l'aide qui ma été donner ( sourtout pour l'affichage des points ) , je remerçit aussi le salon #scripting du serveur irc.helioschat.com qui mon aider .
J'ais fait ce bot en 2 jours ( semedi & dimanche ) , pour le serveur où je suis actuellement ( irc.sboob.net:14333 , bientot irc.rastachat.com ) .
Donc c'est un bot basser sur le capitalisme , il n'utilise aucun fichier externe ! pas de ini ni de txt , tout est stoquer dans des variables pour allez plus vite ( je pense ) .
C'est assez repetitif , mais je vous montre aussi à ceux qui ont debuter comme moi en scripting les if et les else ( moi je connais ça depuis longtemps car je connais le c++ depuis 1 ans environ , j'ais un grand livre dessus ) .
Donc voici la source :

Source

; ======= A METTRE DANS VOS REMOTES =======
on ^1:text:!casino.jouer:#:{
/set %casinosysvaria $rand(1,16)
if ( %casinosysvaria == 1 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 200 points . | /inc %casinouserpoints $+ $nick 200 }
if ( %casinosysvaria == 2 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 50 points . | /inc %casinouserpoints $+ $nick 50 }
if ( %casinosysvaria == 3 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 500 points . | /inc %casinouserpoints $+ $nick 500 }
if ( %casinosysvaria == 4 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 100 points ! | /inc %casinouserpoints $+ $nick 100 }
if ( %casinosysvaria == 5 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner le jackpot soit 1400 points ! | /inc %casinouserpoints $+ $nick 1400 }
if ( %casinosysvaria == 6 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 200 points ! | /inc %casinouserpoints $+ $nick -200 }
if ( %casinosysvaria == 9 ) { /msg $chan 10,2DOMMAGE $nick , tu perd 1 point symbolique ! | /inc %casinouserpoints $+ $nick -1 }
if ( %casinosysvaria == 10 ) { /msg $chan 10,2BIEN $nick , tu gagne 1 point symbolique ! | /inc %casinouserpoints $+ $nick 1 }
if ( %casinosysvaria == 11 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 300 points ! | /inc %casinouserpoints $+ $nick 300 }
if ( %casinosysvaria == 12 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 300 points ! | /inc %casinouserpoints $+ $nick -300 }
if ( %casinosysvaria == 7 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 100 points ! | /inc %casinouserpoints $+ $nick -100 }
if ( %casinosysvaria == 8 ) { /msg $chan 10,2CATASTROPHE $nick , tu vien de perdre tout tes points !!! | /set %casinouserpoints $+ $nick 0 }
if ( %casinosysvaria == 13 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 300 points ! | /inc %casinouserpoints $+ $nick -300 }
if ( %casinosysvaria == 14 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 450 points ! | /inc %casinouserpoints $+ $nick 450 }
if ( %casinosysvaria == 15 ) { /msg $chan 10,2PASSE TON TOUR $nick . }
if ( %casinosysvaria == 16 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 150 points ! | /inc %casinouserpoints $+ $nick 150 }
}
on ^1:TEXT:!casino.regle:#:{
/msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .
/msg $nick Voici les regles du bot "casino" :
/msg $nick Ceci est un jeu où le but et fonder son capitalisme !
/msg $nick Vous devez jouer ( !casino.jouer ) et recolter un maximun de points ,
/msg $nick Puis pour ne pas risquer de perdre vos gain , ils doivent etre mis dans votre compte epargne ( !casino.epargne )
/msg $nick L'action de mise en compte epargne va mettre une partie de 1 000 points dans ce compte .
/msg $nick Avec vos points qu'il soit du compte actuel ou du compte epargne , vous pourez vous offrir des lots !
/msg $nick Ces lots ne sont pas financier mais sont generalement desider par le controleur du bot .
/msg $nick Le but de ce jeu est de collecter et de ce fonder un empire capitaliste !
/msg $nick Pour l'aide taper !casino.aide , pour la liste des achats taper !casino.achatliste
/msg $nick Bot consut par juki ( juki@noos.fr ) .
}
on ^1:TEXT:!casino.aide:#:{
/msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .
/msg $nick Aide du bot $me créer par juki pour rastachat.com ( irc.sboob.net:14333 )
/msg $nick Ce bot est un bot qui permet d'animer vos salon , mais cela engendre aussi un flood !
/msg $nick Voici les commandes :
/msg $nick Jouer ( !casino.jouer )
/msg $nick Liste des achat possible ( !casino.achatliste )
/msg $nick Vos points ( !casino.compte )
/msg $nick Vos points et tout vos compte ( !casino.comptetotal )
/msg $nick Voir le compte d'un autre joueur ( !casino.whois [nom_du_joueur]
/msg $nick Voir juste le nessesaire , le compte d'un autre joueur ( !casino.petitwhois [nom_du_joueur] )
/msg $nick Transfert du compte d'epargne vers le compte central ( !casino.eptrans [montant] )
}
on ^1:TEXT:!casino.compte:#:{
/msg $chan 4,1 $+ $nick a : %casinouserpoints [ $+ [ $nick ] ] point(s)
/msg $chan 4,1Compte epargne : %casinouserepargne [ $+ [ $nick ] ] point(s)
}
on ^1:TEXT:!casino.comptetotal:#:{
/msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .
/notice $nick $nick a : %casinouserpoints [ $+ [ $nick ] ] point(s) .
/notice $nick Compte epargne : %casinouserepargne [ $+ [ $nick ] ] point(s)
/notice $nick Meuf : %casinouserahmeuf [ $+ [ $nick ] ] Mec : %casinouserahmec [ $+ [ $nick ] ]
/notice $nick Hôtel(s) : %casinouserahhotel [ $+ [ $nick ] ]
/notice $nick Villa : %casinouserahvilla [ $+ [ $nick ] ]
/notice $nick Boîte(s) de nuit : %casinouserahboite [ $+ [ $nick ] ]
/notice $nick DJ' : %casinouserahdj [ $+ [ $nick ] ]
/notice $nick Jet : %casinouserahjet [ $+ [ $nick ] ]
/notice $nick Paquebo : %casinouserahpaquebo [ $+ [ $nick ] ]
/notice $nick Limousine(s) : %casinouserahlimousine [ $+ [ $nick ] ]
/notice $nick Île(s) : %casinouserahile [ $+ [ $nick ] ]
/notice $nick Casino : %casinouserahcasino [ $+ [ $nick ] ]
/notice $nick Accee hop obtenu : %casinouserahaxxhop [ $+ [ $nick ] ] Voice : %casinouserahaxxvoice [ $+ [ $nick ] ]
/notice $nick Garde(s) du coprs : %casinouserahads [ $+ [ $nick ] ]
}
on ^1:TEXT:!casino.whois*:#:{
/msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .
/notice $nick $2 a : %casinouserpoints [ $+ [ $2 ] ] point(s) .
/notice $nick Compte epargne : %casinouserepargne [ $+ [ $2 ] ] point(s)
/notice $nick Meuf : %casinouserahmeuf [ $+ [ $2 ] ] Mec : %casinouserahmec [ $+ [ $2 ] ]
/notice $nick Hôtel(s) : %casinouserahhotel [ $+ [ $2 ] ]
/notice $nick Villa : %casinouserahvilla [ $+ [ $2 ] ]
/notice $nick Boîte(s) de nuit : %casinouserahboite [ $+ [ $2 ] ]
/notice $nick DJ' : %casinouserahdj [ $+ [ $2 ] ]
/notice $nick Jet : %casinouserahjet [ $+ [ $2 ] ]
/notice $nick Paquebo : %casinouserahpaquebo [ $+ [ $2 ] ]
/notice $nick Limousine(s) : %casinouserahlimousine [ $+ [ $2 ] ]
/notice $nick Île(s) : %casinouserahile [ $+ [ $2 ] ]
/notice $nick Casino : %casinouserahcasino [ $+ [ $2 ] ]
/notice $nick Accee hop obtenu : %casinouserahaxxhop [ $+ [ $2 ] ] Voice : %casinouserahaxxvoice [ $+ [ $2 ] ]
/notice $nick Garde(s) du coprs : %casinouserahads [ $+ [ $2 ] ]
}
on ^1:TEXT:!casino.petitwhois*:#:{
/msg $chan 8,2 $+ $2 a : %casinouserpoints [ $+ [ $2 ] ] point(s)
/msg $chan 8,2Compte epargne : %casinouserepargne [ $+ [ $2 ] ] point(s)
}
on ^1:text:!casino.achatliste:#:{
/msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .
/msg $nick Ce casino vous permez d'echanger vos points contre des objets ou des accees sur ce salon !
/msg $nick Voici la liste des objets et acces :
/msg $nick 1 000 points : Mec ( !casino.achatmec )
/msg $nick 1 000 points : Meuf ( !casino.achatmeuf )
/msg $nick 4 000 points : DJ' ( !casino.achatdj )
/msg $nick 5 000 points : Garde du corps ( !casino.achatads )
/msg $nick 7 000 points : Limousine ( !casino.achatlimousine )
/msg $nick 18 000 points : Villa ( !casino.achatvilla )
/msg $nick 18 000 points : Hôtel ( !casino.achathotel )
/msg $nick 20 000 points : Jet privé ( !casino.achatjet )
/msg $nick 30 000 points : Paquebo ( !casino.achatpaquebo )
/msg $nick 35 000 points : Boîte de nuit ( !casino.achatboite )
/msg $nick 40 000 points : île ( !casino.achatile )
/msg $nick 40 000 points : 1 7,8Goz8,7point1,0 ( !casino.achatgozpoint )
/msg $nick 51 000 points : Casino ( !casino.achatcasino )
/msg $nick 140 000 points : Accee voice de 14 jours sur ce salon ( !casino.achataxxvoice )
/msg $nick 200 000 points : Accee halfop de 7 jours sur ce salon ( !casino.achataxxhop )
/msg $nick Mais vous pouvez aussi stoquer votre argent sur un compte epargne par trache de 1 000 points ( !casino.epargne )
}
on ^1:text:!casino.epargne:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 1000 ) { /notice $nick Vous venez de mettre sur votre compte epagne la somme de 1 000 points . | /inc %casinouserepargne $+ $nick 1000 | /inc %casinouserpoints $+ $nick -1000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 999 ) { /notice $nick Vous n'avez pas assez de point ( 1 000 minimum ) }
}
on ^1:text:!casino.achatmeuf:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 1000 ) { /notice $nick Vous venez de vous offrir du plaisir , mais cela vous coûte 1 000 points . | /inc %casinouserahmeuf $+ $nick 1 | /inc %casinouserpoints $+ $nick -1000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 999 ) { /notice $nick Vous n'avez pas assez de point ( 1 000 minimum ) }
}
on ^1:text:!casino.achatmec:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 1000 ) { /notice $nick Vous venez de vous offrir du plaisir , mais cela vous coûte 1 000 points . | /inc %casinouserahmec $+ $nick 1 | /inc %casinouserpoints $+ $nick -1000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 999 ) { /notice $nick Vous n'avez pas assez de point ( 1 000 minimum ) }
}
on ^1:text:!casino.achatgozpoint:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 40000 ) { /msg $chan 14,1 $+ $nick Vient de s'offrir 1 7,8Goz8,7point | /msg jeuxbot !gozpoint.addpoint_ $+ %mdpgoz $nick | /inc %casinouserpoints $+ $nick -40000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 39999 ) { /notice $nick Vous n'avez pas assez de point ( 40 000 minimum ) }
}
on ^1:text:!casino.achathotel:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 18000 ) { /notice $nick Vous venez de vous offrir un hôtel, cela vous à tout de meme coûtez 18 000 points . | /inc %casinouserahhotel $+ $nick 1 | /inc %casinouserpoints $+ $nick -18000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 17999 ) { /notice $nick Vous n'avez pas assez de point ( 18 000 minimum ) }
}
on ^1:text:!casino.achatlimousine:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 7000 ) { /notice $nick Vous venez de vous offrir une splendide limousine ! cela vous à coûtez 7 000 points . | /inc %casinouserahlimousine $+ $nick 1 | /inc %casinouserpoints $+ $nick -7000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 6999 ) { /notice $nick Vous n'avez pas assez de point ( 7 000 minimum ) }
}
on ^1:text:!casino.achatile:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 40000 ) { /notice $nick Vous venez de vous offrir une île paradisiaque ! cela vous à coûtez 40 000 points . | /inc %casinouserahile $+ $nick 1 | /inc %casinouserpoints $+ $nick -40000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 39999 ) { /notice $nick Vous n'avez pas assez de point ( 40 000 minimum ) }
}
on ^1:text:!casino.achatjet:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 20000 ) { /notice $nick Vous venez de vous offrir un jet privé ( falcon ) ! cela vous à coûtez 20 000 points . | /inc %casinouserahjet $+ $nick 1 | /inc %casinouserpoints $+ $nick -20000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 19999 ) { /notice $nick Vous n'avez pas assez de point ( 20 000 minimum ) }
}
on ^1:text:!casino.achatpaquebo:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 30000 ) { /notice $nick Vous venez de vous offrir un magnifique paquebo ! cela vous à coûtez 30 000 points . | /inc %casinouserahpaquebo $+ $nick 1 | /inc %casinouserpoints $+ $nick -30000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 29999 ) { /notice $nick Vous n'avez pas assez de point ( 30 000 minimum ) }
}
on ^1:text:!casino.achatads:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 5000 ) { /notice $nick Vous venez de vous offrir les services d'un garde du corps , cela vous à coûtez 5 000 points . | /inc %casinouserahads $+ $nick 1 | /inc %casinouserpoints $+ $nick -5000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 4999 ) { /notice $nick Vous n'avez pas assez de point ( 5 000 minimum ) }
}
on ^1:text:!casino.achatdj:#:{
if ( %casinouserahboite [ $+ [ $nick ] ] >= 1 ) {
if ( %casinouserpoints [ $+ [ $nick ] ] >= 4000 ) { /notice $nick Vous venez de vous offrir les services d'un trés grand DJ' , cela vous à coûtez 4 000 points . | /inc %casinouserahdj $+ $nick 1 | /inc %casinouserpoints $+ $nick -4000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 3999 ) { /notice $nick Vous n'avez pas assez de point ( 4 000 minimum ) }
}
else { /notice $nick Vous devez deja achter une boîte de nuit pour pouvoir s'offrir un DJ' ! }
}
on ^1:text:!casino.achatboite:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 35000 ) { /notice $nick Vous venez de vous offrir une boîte de nuit à Ibiza , cela vous à coûtez 35 000 points . | /inc %casinouserahboite $+ $nick 1 | /inc %casinouserpoints $+ $nick -35000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 34999 ) { /notice $nick Vous n'avez pas assez de point ( 35 000 minimum ) }
}
on ^1:text:!casino.achatvilla:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 18000 ) { /notice $nick Vous venez de vous offrir une villa en face de l'ocean , cela vous à coûtez 18 000 points . | /inc %casinouserahvilla $+ $nick 1 | /inc %casinouserpoints $+ $nick -18000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 17999 ) { /notice $nick Vous n'avez pas assez de point ( 18 000 minimum ) }
}
on ^1:text:!casino.achatcasino:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 51000 ) { /msg $chan $nick C'EST OFFERT UN CASINO ! | /inc %casinouserahcasino $+ $nick 1 | /inc %casinouserpoints $+ $nick -51000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 50999 ) { /notice $nick Vous n'avez pas assez de point ( 51 000 minimum ) }
}
on ^1:text:!casino.eptrans*:#:{
if ( %casinouserepargne [ $+ [ $nick ] ] >= $2 ) { /notice $nick Transfert du compte epargne au compte central effectué pour $2 points | /inc %casinouserepargne $+ $nick - $+ $2 | /inc %casinouserpoints $+ $nick $2 | /halt }
if ( %casinouserepargne [ $+ [ $nick ] ] <= $2 ) { /notice $nick Vous ne pouvez pas tranferer plus que vous en avez ! }
}
on ^1:text:!casino.achataxxhop:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 200000 ) { /msg $chan $nick C'EST OFFERT UN ACCEE HALFOP SUR CE SALON ! | /msg $chan Les admins de ce salon vont etre prevenu de l'ajout de cette accee valable pour 1 semaine ( voir plus ) | /inc %casinouserahaxxhop $+ $nick 1 | /inc %casinouserpoints $+ $nick -200000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 199999 ) { /notice $nick Vous n'avez pas assez de point ( 200 000 minimum ) }
}
on ^1:text:!casino.achataxxvoice:#:{
if ( %casinouserpoints [ $+ [ $nick ] ] >= 140000 ) { /msg $chan $nick C'EST OFFERT UN ACCEE VOICE SUR CE SALON ! | /msg $chan Les admins de ce salon vont etre prevenu de l'ajout de cette accee valable pour 2 semaine ( voir plus ) | /inc %casinouserahaxxvoice $+ $nick 1 | /inc %casinouserpoints $+ $nick -140000 | /halt }
if ( %casinouserpoints [ $+ [ $nick ] ] <= 139999 ) { /notice $nick Vous n'avez pas assez de point ( 140 000 minimum ) }
}
on *:text:$(!casino.ctrl.addpoints_ $+ %casinocontrmdp $+ *):?:{
/msg $nick $3 point(s) ont été ajouter au joueur $2 .
/inc %casinouserepargne $+ $2 $3
}
on *:text:$(!casino.ctrl.droppoints_ $+ %casinocontrmdp $+ *):?:{
/msg $nick $3 point(s) ont été enlever au joueur $2 .
/inc %casinouserepargne $+ $2 - $+ $3
}
; ======= A METTRE DANS VOS POP UPS / CHANNEL ou SALON =======
Casino bot by juki (juki@noos.fr) :/halt
-
Controleur acces
.Changer mdp:/set %casinocontrmdp $$?="Nouveau mot de passe du controleur"
.mdp actuel ( %casinocontrmdp ):/halt

; ======= A METTRE DANS VOS REMOTES =======

on ^1:text:!casino.jouer:#:{ 
  /set %casinosysvaria $rand(1,16)
  if ( %casinosysvaria == 1 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 200 points . | /inc %casinouserpoints $+ $nick 200  } 
  if ( %casinosysvaria == 2 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 50 points . | /inc %casinouserpoints $+ $nick 50  } 
  if ( %casinosysvaria == 3 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 500 points . | /inc %casinouserpoints $+ $nick 500 }  
  if ( %casinosysvaria == 4 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 100 points ! | /inc %casinouserpoints $+ $nick 100  } 
  if ( %casinosysvaria == 5 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner le jackpot soit 1400 points ! |  /inc %casinouserpoints $+ $nick 1400  } 
  if ( %casinosysvaria == 6 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 200 points ! | /inc %casinouserpoints $+ $nick -200  } 
  if ( %casinosysvaria == 9 ) { /msg $chan 10,2DOMMAGE $nick , tu perd 1 point symbolique ! | /inc %casinouserpoints $+ $nick -1  } 
  if ( %casinosysvaria == 10 ) { /msg $chan 10,2BIEN $nick , tu gagne 1 point symbolique ! | /inc %casinouserpoints $+ $nick 1  } 
  if ( %casinosysvaria == 11 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 300 points ! | /inc %casinouserpoints $+ $nick 300  } 
  if ( %casinosysvaria == 12 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 300 points ! | /inc %casinouserpoints $+ $nick -300  } 
  if ( %casinosysvaria == 7 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 100 points ! | /inc %casinouserpoints $+ $nick -100  } 
  if ( %casinosysvaria == 8 ) { /msg $chan 10,2CATASTROPHE $nick , tu vien de perdre tout tes points !!! | /set %casinouserpoints $+ $nick 0 } 
  if ( %casinosysvaria == 13 ) { /msg $chan 10,2DOMMAGE $nick , tu vien de perdre 300 points ! | /inc %casinouserpoints $+ $nick -300  } 
  if ( %casinosysvaria == 14 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 450 points ! |  /inc %casinouserpoints $+ $nick 450  } 
  if ( %casinosysvaria == 15 ) { /msg $chan 10,2PASSE TON TOUR $nick . } 
  if ( %casinosysvaria == 16 ) { /msg $chan 10,2BRAVO $nick , tu vien de gagner 150 points ! | /inc %casinouserpoints $+ $nick 150  } 


}
on ^1:TEXT:!casino.regle:#:{
  /msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .
  /msg $nick Voici les regles du bot "casino" :
  /msg $nick Ceci est un jeu où le but et fonder son capitalisme !
  /msg $nick Vous devez jouer ( !casino.jouer ) et recolter un maximun de points ,
  /msg $nick Puis pour ne pas risquer de perdre vos gain , ils doivent etre mis dans votre compte epargne ( !casino.epargne )
  /msg $nick L'action de mise en compte epargne va mettre une partie de 1 000 points dans ce compte .
  /msg $nick Avec vos points qu'il soit du compte actuel ou du compte epargne , vous pourez vous offrir des lots !
  /msg $nick Ces lots ne sont pas financier mais sont generalement desider par le controleur du bot .
  /msg $nick Le but de ce jeu est de collecter et de ce fonder un empire capitaliste !
  /msg $nick Pour l'aide taper !casino.aide , pour la liste des achats taper !casino.achatliste
  /msg $nick Bot consut par juki ( juki@noos.fr ) .
}
on ^1:TEXT:!casino.aide:#:{ 
  /msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .

  /msg $nick Aide du bot $me créer par juki pour rastachat.com ( irc.sboob.net:14333 )
  /msg $nick Ce bot est un bot qui permet d'animer vos salon , mais cela engendre aussi un flood ! 
  /msg $nick Voici les commandes :
  /msg $nick Jouer ( !casino.jouer )
  /msg $nick Liste des achat possible ( !casino.achatliste )
  /msg $nick Vos points ( !casino.compte )
  /msg $nick Vos points et tout vos compte ( !casino.comptetotal )
  /msg $nick Voir le compte d'un autre joueur ( !casino.whois [nom_du_joueur]
  /msg $nick Voir juste le nessesaire , le compte d'un autre joueur ( !casino.petitwhois [nom_du_joueur] )
  /msg $nick Transfert du compte d'epargne vers le compte central ( !casino.eptrans [montant] )
}

on ^1:TEXT:!casino.compte:#:{ 
  /msg $chan 4,1 $+ $nick a : %casinouserpoints [ $+ [ $nick ] ] point(s)
  /msg $chan 4,1Compte epargne : %casinouserepargne [ $+ [ $nick ] ] point(s) 
}
on ^1:TEXT:!casino.comptetotal:#:{ 
  /msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .

  /notice $nick $nick a : %casinouserpoints [ $+ [ $nick ] ] point(s) . 
  /notice $nick Compte epargne : %casinouserepargne [ $+ [ $nick ] ] point(s)
  /notice $nick Meuf : %casinouserahmeuf [ $+ [ $nick ] ] Mec : %casinouserahmec [ $+ [ $nick ] ] 
  /notice $nick Hôtel(s) : %casinouserahhotel [ $+ [ $nick ] ]
  /notice $nick Villa : %casinouserahvilla [ $+ [ $nick ] ]
  /notice $nick Boîte(s) de nuit : %casinouserahboite [ $+ [ $nick ] ]
  /notice $nick DJ' : %casinouserahdj [ $+ [ $nick ] ]
  /notice $nick Jet : %casinouserahjet [ $+ [ $nick ] ]
  /notice $nick Paquebo : %casinouserahpaquebo [ $+ [ $nick ] ]
  /notice $nick Limousine(s) : %casinouserahlimousine [ $+ [ $nick ] ]
  /notice $nick Île(s) : %casinouserahile [ $+ [ $nick ] ]  
  /notice $nick Casino : %casinouserahcasino [ $+ [ $nick ] ]
  /notice $nick Accee hop obtenu : %casinouserahaxxhop [ $+ [ $nick ] ]  Voice : %casinouserahaxxvoice [ $+ [ $nick ] ]
  /notice $nick Garde(s) du coprs : %casinouserahads [ $+ [ $nick ] ]
}
on ^1:TEXT:!casino.whois*:#:{ 
  /msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .

  /notice $nick $2 a : %casinouserpoints [ $+ [ $2 ] ] point(s) . 
  /notice $nick Compte epargne : %casinouserepargne [ $+ [ $2 ] ] point(s)
  /notice $nick Meuf : %casinouserahmeuf [ $+ [ $2 ] ] Mec : %casinouserahmec [ $+ [ $2 ] ] 
  /notice $nick Hôtel(s) : %casinouserahhotel [ $+ [ $2 ] ]
  /notice $nick Villa : %casinouserahvilla [ $+ [ $2 ] ]
  /notice $nick Boîte(s) de nuit : %casinouserahboite [ $+ [ $2 ] ]
  /notice $nick DJ' : %casinouserahdj [ $+ [ $2 ] ]
  /notice $nick Jet : %casinouserahjet [ $+ [ $2 ] ]
  /notice $nick Paquebo : %casinouserahpaquebo [ $+ [ $2 ] ]
  /notice $nick Limousine(s) : %casinouserahlimousine [ $+ [ $2 ] ]
  /notice $nick Île(s) : %casinouserahile [ $+ [ $2 ] ]
  /notice $nick Casino : %casinouserahcasino [ $+ [ $2 ] ]
  /notice $nick Accee hop obtenu : %casinouserahaxxhop [ $+ [ $2 ] ]  Voice : %casinouserahaxxvoice [ $+ [ $2 ] ]
  /notice $nick Garde(s) du coprs : %casinouserahads [ $+ [ $2 ] ]
}
on ^1:TEXT:!casino.petitwhois*:#:{ 
  /msg $chan 8,2 $+ $2 a : %casinouserpoints [ $+ [ $2 ] ] point(s) 
  /msg $chan 8,2Compte epargne : %casinouserepargne [ $+ [ $2 ] ] point(s)
}

on ^1:text:!casino.achatliste:#:{
  /msg $chan 4,8 $+ $nick vient de lancer une commande importante , ralentissement prevu .

  /msg $nick Ce casino vous permez d'echanger vos points contre des objets ou des accees sur ce salon ! 
  /msg $nick Voici la liste des objets et acces : 
  /msg $nick 1 000 points : Mec ( !casino.achatmec ) 
  /msg $nick 1 000 points : Meuf ( !casino.achatmeuf )
  /msg $nick 4 000 points : DJ' ( !casino.achatdj )
  /msg $nick 5 000 points : Garde du corps ( !casino.achatads )
  /msg $nick 7 000 points : Limousine ( !casino.achatlimousine )
  /msg $nick 18 000 points : Villa ( !casino.achatvilla )
  /msg $nick 18 000 points : Hôtel ( !casino.achathotel )
  /msg $nick 20 000 points : Jet privé ( !casino.achatjet )
  /msg $nick 30 000 points : Paquebo ( !casino.achatpaquebo )
  /msg $nick 35 000 points : Boîte de nuit ( !casino.achatboite )
  /msg $nick 40 000 points : île ( !casino.achatile )
  /msg $nick 40 000 points : 1 7,8Goz8,7point1,0 ( !casino.achatgozpoint )
  /msg $nick 51 000 points : Casino ( !casino.achatcasino )
  /msg $nick 140 000 points : Accee voice de 14 jours sur ce salon ( !casino.achataxxvoice )
  /msg $nick 200 000 points : Accee halfop de 7 jours sur ce salon ( !casino.achataxxhop ) 
  /msg $nick Mais vous pouvez aussi stoquer votre argent sur un compte epargne par trache de 1 000 points ( !casino.epargne )
}


on ^1:text:!casino.epargne:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 1000 ) { /notice $nick Vous venez de mettre sur votre compte epagne la somme de 1 000 points . | /inc %casinouserepargne $+ $nick 1000 | /inc %casinouserpoints $+ $nick -1000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 999 ) { /notice $nick Vous n'avez pas assez de point ( 1 000 minimum )  }
}
on ^1:text:!casino.achatmeuf:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 1000 ) { /notice $nick Vous venez de vous offrir du plaisir , mais cela vous coûte 1 000 points . | /inc %casinouserahmeuf $+ $nick 1 | /inc %casinouserpoints $+ $nick -1000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 999 ) { /notice $nick Vous n'avez pas assez de point ( 1 000 minimum )  }
}
on ^1:text:!casino.achatmec:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 1000 ) { /notice $nick Vous venez de vous offrir du plaisir , mais cela vous coûte 1 000 points . | /inc %casinouserahmec $+ $nick 1 | /inc %casinouserpoints $+ $nick -1000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 999 ) { /notice $nick Vous n'avez pas assez de point ( 1 000 minimum )  }
}
on ^1:text:!casino.achatgozpoint:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 40000 ) { /msg $chan 14,1 $+ $nick Vient de s'offrir 1 7,8Goz8,7point | /msg jeuxbot !gozpoint.addpoint_ $+ %mdpgoz $nick | /inc %casinouserpoints $+ $nick -40000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 39999 ) { /notice $nick Vous n'avez pas assez de point ( 40 000 minimum )  }
}

on ^1:text:!casino.achathotel:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 18000 ) { /notice $nick Vous venez de vous offrir un hôtel, cela vous à tout de meme coûtez 18 000 points . | /inc %casinouserahhotel $+ $nick 1 | /inc %casinouserpoints $+ $nick -18000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 17999 ) { /notice $nick Vous n'avez pas assez de point ( 18 000 minimum )  }
}
on ^1:text:!casino.achatlimousine:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 7000 ) { /notice $nick Vous venez de vous offrir une splendide limousine ! cela vous à coûtez 7 000 points . | /inc %casinouserahlimousine $+ $nick 1 | /inc %casinouserpoints $+ $nick -7000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 6999 ) { /notice $nick Vous n'avez pas assez de point ( 7 000 minimum )  }
}
on ^1:text:!casino.achatile:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 40000 ) { /notice $nick Vous venez de vous offrir une île paradisiaque ! cela vous à coûtez 40 000 points . | /inc %casinouserahile $+ $nick 1 | /inc %casinouserpoints $+ $nick -40000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 39999 ) { /notice $nick Vous n'avez pas assez de point ( 40 000 minimum )  }
}
on ^1:text:!casino.achatjet:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 20000 ) { /notice $nick Vous venez de vous offrir un jet privé ( falcon ) ! cela vous à coûtez 20 000 points . | /inc %casinouserahjet $+ $nick 1 | /inc %casinouserpoints $+ $nick -20000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 19999 ) { /notice $nick Vous n'avez pas assez de point ( 20 000 minimum )  }
}
on ^1:text:!casino.achatpaquebo:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 30000 ) { /notice $nick Vous venez de vous offrir un magnifique paquebo ! cela vous à coûtez 30 000 points . | /inc %casinouserahpaquebo $+ $nick 1 | /inc %casinouserpoints $+ $nick -30000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 29999 ) { /notice $nick Vous n'avez pas assez de point ( 30 000 minimum )  }
}
on ^1:text:!casino.achatads:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 5000 ) { /notice $nick Vous venez de vous offrir les services d'un garde du corps , cela vous à coûtez 5 000 points . | /inc %casinouserahads $+ $nick 1 | /inc %casinouserpoints $+ $nick -5000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 4999 ) { /notice $nick Vous n'avez pas assez de point ( 5 000 minimum )  }
}
on ^1:text:!casino.achatdj:#:{ 
  if ( %casinouserahboite [ $+ [ $nick ] ] >= 1 ) {
    if ( %casinouserpoints [ $+ [ $nick ] ] >= 4000 ) { /notice $nick Vous venez de vous offrir les services d'un trés grand DJ' , cela vous à coûtez 4 000 points . | /inc %casinouserahdj $+ $nick 1 | /inc %casinouserpoints $+ $nick -4000 | /halt  }
    if ( %casinouserpoints [ $+ [ $nick ] ] <= 3999 ) { /notice $nick Vous n'avez pas assez de point ( 4 000 minimum )  }
  }
  else { /notice $nick Vous devez deja achter une boîte de nuit pour pouvoir s'offrir un DJ' ! }
}

on ^1:text:!casino.achatboite:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 35000 ) { /notice $nick Vous venez de vous offrir une boîte de nuit à Ibiza , cela vous à coûtez 35 000 points . | /inc %casinouserahboite $+ $nick 1 | /inc %casinouserpoints $+ $nick -35000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 34999 ) { /notice $nick Vous n'avez pas assez de point ( 35 000 minimum )  }
}
on ^1:text:!casino.achatvilla:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 18000 ) { /notice $nick Vous venez de vous offrir une villa en face de l'ocean , cela vous à coûtez 18 000 points . | /inc %casinouserahvilla $+ $nick 1 | /inc %casinouserpoints $+ $nick -18000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 17999 ) { /notice $nick Vous n'avez pas assez de point ( 18 000 minimum )  }
}

on ^1:text:!casino.achatcasino:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 51000 ) { /msg $chan $nick C'EST OFFERT UN CASINO ! | /inc %casinouserahcasino $+ $nick 1 | /inc %casinouserpoints $+ $nick -51000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 50999 ) { /notice $nick Vous n'avez pas assez de point ( 51 000 minimum )  }
}
on ^1:text:!casino.eptrans*:#:{ 
  if ( %casinouserepargne [ $+ [ $nick ] ] >= $2 ) { /notice $nick Transfert du compte epargne au compte central effectué pour $2 points | /inc %casinouserepargne $+ $nick - $+ $2 | /inc %casinouserpoints $+ $nick $2 | /halt  }
  if ( %casinouserepargne [ $+ [ $nick ] ] <= $2 ) { /notice $nick Vous ne pouvez pas tranferer plus que vous en avez !  }
}
on ^1:text:!casino.achataxxhop:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 200000 ) { /msg $chan $nick C'EST OFFERT UN ACCEE HALFOP SUR CE SALON ! | /msg $chan Les admins de ce salon vont etre prevenu de l'ajout de cette accee valable pour 1 semaine ( voir plus ) | /inc %casinouserahaxxhop $+ $nick 1 | /inc %casinouserpoints $+ $nick -200000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 199999 ) { /notice $nick Vous n'avez pas assez de point ( 200 000 minimum )  }
}
on ^1:text:!casino.achataxxvoice:#:{ 
  if ( %casinouserpoints [ $+ [ $nick ] ] >= 140000 ) { /msg $chan $nick C'EST OFFERT UN ACCEE VOICE SUR CE SALON ! | /msg $chan Les admins de ce salon vont etre prevenu de l'ajout de cette accee valable pour 2 semaine ( voir plus ) | /inc %casinouserahaxxvoice $+ $nick 1 | /inc %casinouserpoints $+ $nick -140000 | /halt  }
  if ( %casinouserpoints [ $+ [ $nick ] ] <= 139999 ) { /notice $nick Vous n'avez pas assez de point ( 140 000 minimum )  }
}

on *:text:$(!casino.ctrl.addpoints_ $+ %casinocontrmdp $+ *):?:{
  /msg $nick $3 point(s) ont été ajouter au joueur $2 .
  /inc %casinouserepargne $+ $2 $3
}
on *:text:$(!casino.ctrl.droppoints_ $+ %casinocontrmdp $+ *):?:{
  /msg $nick $3 point(s) ont été enlever au joueur $2 .
  /inc %casinouserepargne $+ $2 - $+ $3
}



; ======= A METTRE DANS VOS POP UPS / CHANNEL ou SALON =======


Casino bot by juki (juki@noos.fr) :/halt
-
Controleur acces
.Changer mdp:/set %casinocontrmdp $$?="Nouveau mot de passe du controleur"
.mdp actuel ( %casinocontrmdp ):/halt

Conclusion

Donc voici les commandes :
!casino.jouer ( pour jouer )
!casino.aide ( demande de l'aide )
!casino.achatliste ( liste des achats possible )
!casino.eptrans [SOMME] ( transfere une somme du compte epargne au compte normal pour vos achat )
...
Ce bot permet aussi à un moderateur d'avoir accee aux compte epargne des autres user , pour tout mettre comme il faut :
=============================================== ====
Cliquez sur la pop up Controleur acces/Changer mdp puis metter un mot de passe .
Nommer un moderateur ( la personne en qui vous croyer quel sera disponible ) et dite lui les deux commande à faire en PV DU BOT :

Ajouter des points au compte epargne d'un user :

/msg [nom_du_bot_de_jeu] !casino.ctrl.addpoints_[mot_de_passe_moderateur] [pour_le_joueur] [somme]
exemple : /msg casino !casino.ctrl.addpoints_blator djdavidb 3000
=> cela va ajouter 3000 points au compte epargne de djdavidb

Enlever des points à un compte epargne d'un user :

/msg [nom_du_bot_de_jeu] !casino.ctrl.droppoints_[mot_de_passe_moderateur] [pour_le_joueur] [somme]
exemple : /msg casino !casino.ctrl.addpoints_blator baptiste 500
=> cela va enlver 500 points au compte epargne de baptiste .

Voila les commandes , maintenant vous pourez modifier les gains comme bon vous sembles mais MERCI DE NE PAS ENLEVER DANS L'AIDE DU BOT
/msg $nick Aide du bot $me créer par juki pour rastachat.com ( irc.sboob.net:14333 )

Explication ( pour les debutants , et pour mieu comprendre ) :
Lorsqu'un joueur meme qu'il joue pour la premiere fois fera !casino.jouer
cela va entrenez un rand d'un nombre compris entre 1 & 12 , ce nombre sera affecter temporairement à la variable %casinosysvaria , /set ... va permettre de fixer la valeur !
Puis un enchainement de if agit , genre , si %casinosysvaria=3 alor /msg $chan BRAVO $nick , tu vien de gagner 500 points . | /inc %casinouserpoints $+ $nick 500 ...
/inc %casinouserpoints $+ $nick 500 ( /inc va jouer le role mathematique 500 seront ajouter à la variable %casinouserpoints $+ $nick , genre moi je joue avec le pseudo "juki" et que je tombe sur 3 , cela me fera : %casinouserpointsjuki 500
Voila .
Si vous avez quelque petite question merci de les possez .
" C'est en forgant qu'on devient forgeron " .
Poste : http://www.ircfr.com/forum.v2.aspx?ID=195686
PS : Dite moi si j'ai bien fait de la mettre dans le niveau 2 , sinon je la baise à niveau 1 .
Je rappel que je suis le seul créateur de ce bot :) apart l'aide :p et que je me suis juste inspirez d'un simple rand(1,6) qui simuler nu lancer de dés :p

==>> Vous trouvrez dans le zip une version optimiser du code . <<==

Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Bot optimise_par_Sorn.txt 12 199 octets
casinobot_by_juki.txt 15 900 octets

Télécharger le zip

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 juki_webmaster le 07/03/2004 16:22:29

Toutes question ou suggestion sont les bienvenu , dalleuir si quelqu'unj pouvez m'aider à faire un systeme de classement des 10 pseudos les plus riches ( le plus de points sur le compte epargne ) sa completerais le bot .

Commentaire de SornDrixer le 07/03/2004 18:00:29 administrateur CS

Enorme boulot de ta part (j'aime bien lorsque quelqu'un explique une source, même très simple, cela montre qu'il a compris, et n'a pas c/c bêtement se qu'on lui a dit)

Conseil : ajoute des 'antifloods' pour chaque commande, ou bien un simple anti-flood, qui ignore chaque personne qui flood.
Pour cela, utilise par exemple :
inc -u5 %antiflood $+ $nick
Ceci incrémentera la variable %antiflood collé du nick qui a provoqué l'événement, et la variable s'autodétruira après 5 secondes.

Un petit dialog permettant de gèrer les différents comptes de chacun aurait été aussi le bienvenue.
Voici mon petit tutorial sur les dialogs, qui pourra certainement t'aider si tu retiens cette idée :
http://www.ircfr.com/code.aspx?ID=19934

Autre remarque : dans un remote, les / sont inutiles, car tout se qui est en début de ligne dans un remote ( à part pour les événements ) est considéré comme une commande, donc les / sont superflus.

Voila, bonne continuation.

Commentaire de SornDrixer le 07/03/2004 18:04:48 administrateur CS

A propos de :
; ======= A METTRE DANS VOS POP UPS / CHANNEL ou SALON =======

Il te suffit de faire par exemple :

menu * {
Casino bot by juki (juki@noos.fr)
.Controleur acces
..Changer mdp:/set %casinocontrmdp $$?="Nouveau mot de passe du controleur"
..mdp actuel ( %casinocontrmdp ):halt
}

Commentaire de juki_webmaster le 07/03/2004 18:19:29

Merci pour ton avis SornDrixer , pour le flood de toute façon jy ait jouer qulque heures à mon bot :p et j'ais remarquer que floodé ne servez à rien , sa fait juste relentir le bot et cacher les textes à l'ecran , et puis lors d'un flood jadort voir :
truc à gagner le jackpote
...
...
truc a perdu tout ces points !
Donc floodé n'est pas la meuilleur solution du faite que vous pourez rater des points precieux !
Dalleuir je suis fier de moi d'avoir reussi à progresser aussi bien sur le scripting mirc :) Je suit la serie " bot de jeu " et je essaye de me donner des idées , des schema ... de bot de jeu .

Commentaire de Kerrigan le 07/03/2004 18:47:51

enleve les / pour lancer les comandes ça sert a rien. Et je pense qu'on pourrait diminuer la longueur du code en utilisant des fichier externe pour stocker des infos. mais ça n'engage que toi sinon ça a pas l'air trop mal. et faut que ya du boulot

Commentaire de juki_webmaster le 07/03/2004 19:03:19

D'accord Kerrigan entout cas je vais minspirer des tutos de dialogue pour les commprendres et essaye des les utilisez comme je pourais dans le bot .

Commentaire de vesparo le 08/03/2004 19:33:45

y'a eut du boulot je respecte. mais ca a pas beaucoup d'intêret niveau scripting parce que comme l'a dit kerrigan si tu avais stocker des infos dans un fichier + des whiles & dialogs ca aurait était bien plus intéressant :) mais je respecte beaucoup le travaille fournit !
6/10

Commentaire de juki_webmaster le 08/03/2004 20:14:52

Merci vesparo :)

Commentaire de juki_webmaster le 08/03/2004 20:15:01

Merci vesparo :)

Commentaire de ser le 08/03/2004 22:00:08

Bonne source bien scripté bien joué

Commentaire de Diabl0 le 10/03/2004 17:58:23

erf

Commentaire de juki_webmaster le 10/03/2004 23:22:23

Qui y a-til Diabl0 ? lol
merci ser .

Commentaire de l_ange_noir le 12/03/2004 15:59:14

euh g un ti pb dc g copier ta source ds mes pop ups ms kan je tape les commandes il me fai ke la commande est introuvable
dc stu pouV maiD un ti cou lol

Commentaire de juki_webmaster le 12/03/2004 17:42:05

Tu doit mettre la grose partie dans tes remotes et l'autre petite partie dans tes pop ups comme indiquez , sinon sa fou le bazar :)

Commentaire de tj95 le 30/05/2004 20:37:24

bonjour : jai telecharger tou enfin tou marche sauf ke le bot casino je le voi po! ke doi je faire

Commentaire de Panther007 le 28/08/2004 03:52:07

mdr tj95 ...... le bot............ C TOI . lol , et en passant bon boulot , j'adore le jeux =P

Commentaire de Andrealphuss le 30/11/2004 06:13:17

Cette source m'a l'air très bien, le jeu très complet et bien ficellet, mais j'avoue ne pas avoir compris comment on faisait pour gagner des points !!! :(
Mais je suis sure que ce jeu va me passionner... une fois que j'aurais compris comment y jouer.
En tout cas félicitation pour le travail effectué !

Commentaire de Andrealphuss le 30/11/2004 06:23:49

ah non ca y est j'ai compris :oP
Pourtant ma maman m'a toujours dit de réfléchir avant de parler :/

Commentaire de Andrealphuss le 30/11/2004 07:36:38

Je viens de scotcher 1h sur ton jeu, il est excellent !
Par contre, il reste des fautes d'orthographe (et pourtant c rare que je les vois!) et il serais interressant de mettre une fonction on/off au jeu pour éviter que les gens soit tout le temps en train de flooder. Je vais travailler dans ce sens, mais bon je débute alors je ne sais pas si je vais y arriver, mais ca ne m'a pas l'air trop compliqué. Encore une fois félicitation !
Au fait, c quoi "Gozpoint" ??? mdr

Commentaire de la HonTe le 04/01/2005 16:30:25

salut ton petit script est fort sympathique mais je lui trouve un probleme de taille des que l'on fait
!casino.achatliste cela me fait un excess flood et me deco comment pourrais je arreter cela ?

Commentaire de GeVaUdAn974 le 18/05/2005 16:49:13

salut juki !!!
je vien de tester ton petit jeu, verdict, excelent ^^
mais il y a quand meme 2/3 bug (a moin que cela provienne de moi) je m'explique...
1*: pour !casino.achatliste, sa n'affiche pas tous les objets (moi sa s'arrete a paquebot ou boite de nuit)
2*: ensuite, pour ton système de stockage des points gagné sur un compte d'épargne, c'est une super idée...,mais ya un hic, non seulement sa stock tes points dans ton compte épargne, mais en plus sa ne débite pas tes points accumulé :D génial lol
alors j'ai rectifié ce petit bug:

on *:TEXT:!credit*:#:{
  if ($nick == "pseudo_de_l'admin") {
    if ($2 == $null) { notice $nick Tu n'as pas précisé le pseudo du joueur a crediter }
    if ($3 == $null) { notice $nick Tu n'as pas précisé le montant a créditer }
    else { msg "pseudo_du_bot" !casino.ctrl.addpoints_"mot_de_passe" $2 $3 }
    if ( %casinouserpoints [ $+ [ $nick ] ] == $3 ) { /notice $nick Vous venez de mettre sur votre compte d'epargne la somme de $3 point(s) . | /inc %casinouserepargne $+ $nick $3 | /inc %casinouserpoints $+ $nick -$3 | /halt }
    /msg $nick $3 point(s) ont été enlever au joueur $2 .
    /inc %casinouserpoints $+ $2 - $+ $3
  }
}

PS: désolé si il y a plus simple mais je débute ;) en tout cas, sa marche.
donc voila, cette source débite tes points (de mise) pour les placer sur ton compte d'épargne ^^, et en plus, sa t'évite a chaque fois de taper "/msg [nom_du_bot_de_jeu] !casino.ctrl.addpoints_[mot_de_passe_moderateur] [pour_le_joueur] [somme]". donc vous l'avez bien compris que, pour enlever les points du compte épargne, et les remettre en points "de mise", il sufit de retaper la remote a l'inverse ^^.
j'éspére que je me suis bien esprimé, et te laisse cette petite remote pour une "mise a jour" on vas dire :D
en tout cas ton jeu est excelent, je m'ammuse comme un fou.
bonne continuation ;)

Commentaire de GeVaUdAn974 le 18/05/2005 17:19:07

re salut !!!
je passe juste pour te donner ta note bien méritée ^^
heu... je vais te mettre un petit 9/10
allez...@++ en éspérant voir une nouveau code-source prochainement ^^

Commentaire de sticmou007 le 18/07/2005 23:09:31

Félicitation belle source je l'utilise personnelement sur irc.epiknet.org sur le channel #french_obscuity

++ et encors FELICITATION beau travail et il fonctionne bien ^^
A ta prochaine version tu m'appelles ^^

PS: Dsl pour la pub de mon chan mas j'en ai besoin en ce moment

Commentaire de ShAdOwzz le 16/09/2005 22:21:42

Bein pour ajouter ou enlever des points, y a bokou bokou bokou + simple :

on 5:TEXT:*credit*:?:{ inc %casinouserpoints $+ $2- $3- }

ex : pour ajouter 10 points à YAKUZA je tape :

/msg <nom_du_bot> YAKUZA +10

dans " user " je met :

5:<mon_pseudo>

et le tour est joué !! ;)

En tout cas c' est un super jeu, je m' eclate bravo !! 9/10 :p

Commentaire de ShAdOwzz le 16/09/2005 22:24:06

mince je viens de me tromper dans la commande c' est :

/msg <nom_du_bot> credit YAKUZA +10

^^

Commentaire de kayak2007 le 24/12/2006 10:56:05

bravo pour le bot c'est super le program est bien pensé
je ne te note pas car je suis nouveau (donc débutant)
et je ne sais pas encore coi noter et sinon au début la source ne marchait pas j'ai remplacé les on ^1:texte par des on *:texte
je sais pas si c'est grave mais sa marche comme sa.

Commentaire de AngelDelDiabolo le 06/05/2007 01:18:09

Bon et bien que dire si ce n'est que j'ai adoré et que mon chan apprécie énormément aussi. Il est évident qu'il faille ajouter deux/trois phrases en plus pour éviter le coté rébarbatif. Après correction des fautes d'orthographes trop nombreuses je donne un très bon 9/10 pour l'originalité (je ne parle pas du scripting n'y connaissant rien). Bonne continuation :o)

Commentaire de hunter38 le 26/05/2007 13:09:10

si tu veut je connais kelkun qui a créé un bot pour casino
c sur francochat
c irc.paris.FrancoChat.org:6667 sur le salon #casino
il s'appelle maxino (BSmax pour ce qui connaisse)
Donc voila lui il saura te répondre je pense

Commentaire de THFERNAN le 08/06/2007 20:03:36

ET SURTOUT faut savoir que maxino pipe le jeu c'est à dire qu'il fait gagner qui il veut et perdre qui il veut aussi....

les probabilités, ça ne ment pas, ou tellement rarement.

Maxino = escroc ( en plus il fait payer par allopass les options c'est vraiment d'un dégradant... la honte !

Commentaire de hunter38 le 08/06/2007 20:38:00

lol mais bon je lui doi une fiere chandelle c grace a lui ke j'existe...

Commentaire de besky le 30/09/2007 17:29:35 7/10

Super jeu franchement ! ceci dit il est vrai que ca flood ennormément !

Donc pour éviter cela j'ai pensé que tu pourrais rajouter un ptit bout de code qui permettrais de mettre une limitte genre de pouvoir jouer qu'une fois toutes les 30 secondes (nombre paramettrable par commande si possible) ca permettrais de limitter le flood.

Sinon j'aimerais bien savoir comment on fait le virement du compte courant au compte épargne ca j'ai pas pigé :)

Merci. Je met un +7 pour t'encourager à améliorer toujours plus ta remote :)

Commentaire de besky le 30/09/2007 17:41:38

bon j'ai simplement rajouté un ptit code tout simple pour limitter le flood comme je disais

au debut de la remote

                   ON *:TEXT:*:#:{
                     if %af.casino [ $+ [ $nick ] ] == yes { halt }
                     set -u2 %af.casino $+ $nick yes
                     if $1 == !casino.jouer {
a rajouter ==>         ignore -cu10 $nick | .timer 1 10 notice $nick tu peux enfin rejouer !
                       var %casinosysvaria = $rand(1,12)

Commentaire de besky le 30/09/2007 23:41:41

autre chose (désolé de poster a chaque fois)

il serait super si on pouvait faire en sorte que quand quelqu'un joue avec une extention ca ne change pas le pseudo des points genre besky|joue que les points aillent directement sur besky

je sais que c'est faisable car ca marche sur certain quizz et scrabble.

si je me suis mal exprimé excusez moi :D

Commentaire de besky le 03/11/2007 14:12:23

c'est re moi j'utilise toujours ce jeu formidable auquel j'ai rajouter et enlevé certaines choses pour convenir a mon salon

par exemple j'ai mis des lot réel en jeu et j'ai rendu le gain de points un peu plus difficile a avoir car au bout de deux jours certains avaient deja dépassé les 100000 points

j'ai aussi mis un timer qui permet aux gens de jourer qu'une fois toutes les dix secondes pour éviter le flood sur le salon et permettres aux users de parler quand même entre eux pendant qu'ils jouent

j'ai codé un ptit truc pour que les gens ne puissent jouer que sans extention sans quoi c'etait le bordel car a chaque fois ils repartaient a zero au niveau des points.

et j'aimerais pouvoir coder une commande qui afficherais en notice les points de chaque joueurs genre : !casino.points

(notice du bot) joueur1 ==> compte courant: XXX compte épargne: XXXX
(notice du bot) joueur2 ==> compte courant: XXX compte épargne: XXXX
etc...

seulement je pense qu'il faut faire un systeme de boucle et je sais pas trop comment prendre la chose donc si quelqu'un pouvait m'aider ce serait super :)

Ah il y a aussi pas mal de fautes dans les textes je les ai corrigé.

je te remet un +9 car franchement le jeu est super mais quelques imperfection niveau ortographe ce qui est domage.

Commentaire de alexis783 le 09/01/2011 23:48:27

Salut tout le monde alors moi j'ai bien load ton fichier mis dans remote dans PoPups sauf que après avoir save et appuyer sur OK bah....
il n'y a rien mdr j'ai beau attendre rien ne se passe
Pouvez vous m'aider svp

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