Boxe - jeu

Soyez le premier à donner votre avis sur cette source.

Snippet vu 10 382 fois - Téléchargée 24 fois

Contenu du snippet

Et Bien
/msg Votre_Bot creation Nom_de_votre_boxeur poid (exemple /msg Boxe-Bot Xfight lourd)
/msg Votre_Bot stats | /msg Votre_Bot stats pseudo
/msg Votre_Bot combattre pseudo ou boxeur
/msg Votre_Bot vie
/msg Votre_Bot mes-achats
/msg Votre_Bot listeboxeur
ou bien :
/msg Votre_Bot aide

c'est très mal codé mais sa peut être sympas :x

Source / Exemple :


on *:text:*:?:{
  if ($1 == login) {
    if ($readini(boxe-jeu.ini,$nick,inscrit) == oui) {
      if ($readini(boxe-jeu.ini,$nick,login) != on) {
        writeini -n boxe-jeu.ini $nick login on
        notice $nick Vous Êtes Maintenant Auth
      }  
      elseif ($readini(boxe-jeu.ini,$nick,login) == on) {
        notice $nick Tu es déja Auth
      }
      else { 
        notice $nick Vous N'êtes pas inscrit !  
      }
    }
  }
}
on *:text:*:?:{
  if ($1 == add) {
    if ($readini(boxe-jeu.ini,$nick,admin) == oui ) {
      writeini boxe-jeu.ini $2 $3 $calc($readini(boxe-jeu.ini,$2,$3) $4 )
      notice $nick $4 Ajouté à $2
      notice $2 $4 Ajouté Sur Votre Compte
    }
    else {
      notice $nick tu n'es pas admin
    }  
  }
}

on *:text:*:?:{
  if ($1 == add-admin) {
    if ($readini(boxe-jeu.ini,$nick,admin) == oui ) {
      writeini boxe-jeu.ini $2 admin oui
      notice $nick $2 Est Maintenant Admin
      notice $2 Vous Êtes Maintenant Admin
      amsg Nouveau Admin : $2
    }
    else {
      notice $nick tu n'es pas admin
    }  
  }
}
on *:text:*:?:{
  if ($1 == creation) {
    if ($readini(boxe-jeu.ini,$nick,inscrit) != oui) {
      writeini -n boxe-jeu.ini $nick inscrit oui
      writeini -n boxe-jeu.ini $nick ko 0
      writeini -n boxe-jeu.ini $nick étéko 0
      writeini -n boxe-jeu.ini $nick lourd non
      writeini -n boxe-jeu.ini $nick plume non
      writeini -n boxe-jeu.ini $nick moyen non
      writeini -n boxe-jeu.ini $nick $3 oui
      writeini -n boxe-jeu.ini $nick vie 50
      writeini -n boxe-jeu.ini $nick bronze non
      writeini -n boxe-jeu.ini $nick argentt non
      writeini -n boxe-jeu.ini $nick or non
      writeini -n boxe-jeu.ini $nick gantbronze non
      writeini -n boxe-jeu.ini $nick gantargent non
      writeini -n boxe-jeu.ini $nick gantor non
      writeini -n boxe-jeu.ini $nick protegedentbronze non
      writeini -n boxe-jeu.ini $nick protegedentargent non
      writeini -n boxe-jeu.ini $nick protegedentor non
      writeini -n boxe-jeu.ini $nick coquillebronze non
      writeini -n boxe-jeu.ini $nick coquilleargent non
      writeini -n boxe-jeu.ini $nick coquilleor non
      writeini -n boxe-jeu.ini $nick argent 30
      write -n boxe-jeu.ini $nick login off
      mode #boxe +v $nick
      amsg 4N1ouveau Boxeur : %boxeur [ $+ [ $nick ] ] 
      write listeeboxeur.txt $nick : %boxeur [ $+ [ $nick ] ] 
      set %boxeur $+ $nick $2 | set %poid $+ $nick $3 | notice $nick Votre Boxeur : %boxeur [ $+ [ $nick ] ] | notice $nick Poid : %poid [ $+ [ $nick ] ]   
    }
    elseif ($readini(boxe-jeu.ini,$nick,inscrit) == oui) {
      notice $nick Tu es déja inscrit !
    }
  }
}

on *:text:*:?:{
  if ($$1 == stats) {
    if ($readini(boxe-jeu.ini,$nick,inscrit) == oui) {
      elseif ($readini(boxe-jeu.ini,$nick,login) == on) {
      } 
      else { notice $nick $2 n'éxiste pas    
      }
      if ($2 == $null) {
        notice $nick 14[4Stats14]1 : 
        notice $nick 1Boxeur : %boxeur [ $+ [ $nick ] ] 
        notice $nick 1Vie : $readini(boxe-jeu.ini,$nick,vie) % 
        notice $nick 1Nombre De K.O : $readini(boxe-jeu.ini,$nick,étéko) K.O
        notice $nick 1Nombre de K.O créer : $readini(boxe-jeu.ini,$nick,ko) K.O
        notice $nick 1Ceinture De Bronze : $readini(boxe-jeu.ini,$nick,bronze) 
        notice $nick 1Ceinture D'Argent : $readini(boxe-jeu.ini,$nick,argentt) 
        notice $nick 1Ceinture D'or : $readini(boxe-jeu.ini,$nick,or) 
        notice $nick 1Argent : $readini(boxe-jeu.ini,$nick,argent) ?
      }
      if ($readini(boxe-jeu.ini,$2,inscrit) == oui) {
        if ($readini(boxe-jeu.ini,$nick,login) == on) {
          notice $nick 14[4Stats14]1 : 
          notice $nick 1Boxeur : %boxeur [ $+ [ $2 ] ] 
          notice $nick 1Vie : $readini(boxe-jeu.ini,$2,vie) % 
          notice $nick 1Nombre De K.O : $readini(boxe-jeu.ini,$2,étéko) K.O
          notice $nick 1Nombre de K.O créer : $readini(boxe-jeu.ini,$2,ko) K.O
          notice $nick 1Ceinture De Bronze : $readini(boxe-jeu.ini,$2,bronze) 
          notice $nick 1Ceinture D'Argent : $readini(boxe-jeu.ini,$2,argentt) 
          notice $nick 1Ceinture D'or : $readini(boxe-jeu.ini,$2,or) 
          notice $nick 1Argent : $readini(boxe-jeu.ini,$2,argent) ?
        }
      }
    }
  }
}

on *:text:*:?:{
  if ($1 == aide) {
    notice $nick Pour Combattre : /msg $me combattre [Pseudo] 
    notice $nick Pour avoir la liste des Boxeurs Tape : /msg $me listeboxeur
    notice $nick Pour Avoir tes Stats tape : /msg $me stats
    notice $nick Pour Avoir les Stats d'un Autre Users : /msg $me stats [Boxeur]
    notice $nick Pour Voir Le Magazin : /msg $me Magazin
    notice $nick Pour Acheter de la Vie : /msg $me vie
    notice $nick Pour Acheter Tape : /msg $me payer-aide
    notice $nick Pour Connaitres tes Achats Tape : /msg $me mes-achats
  }
}

on *:text:*:?:{
  if ($1 == listeboxeur) {
    notice $nick Boxeurs :
    var %plist = $lines(listeeboxeur.txt)
    while (%plist > 0) {
      notice $nick $read(listeeboxeur.txt,%plist)
      dec %plist
    }
  }
}

on *:text:*:?:{
  if ($$1 == combattre) {
    if ($readini(boxe-jeu.ini,$nick,inscrit) == oui) {
      if ($readini(boxe-jeu.ini,$nick,vie) >= 7 ) { 
        if ($readini(boxe-jeu.ini,$nick,login) == on) {
          var %combat $rand(1,2)
          if (%combat == 1) {
            writeini -n boxe-jeu.ini $nick ko $calc($readini(boxe-jeu.ini,$nick,ko) +1)
            writeini -n boxe-jeu.ini $2 étéko $calc($readini(boxe-jeu.ini,$2,étéko) +1)
            writeini -n boxe-jeu.ini $nick gagne $calc($readini(boxe-jeu.ini,$nick,gagne) +1)
            writeini -n boxe-jeu.ini $2 perdu $calc($readini(boxe-jeu.ini,$2,perdu) +1)
            writeini -n boxe-jeu.ini $2 vie $calc($readini(boxe-jeu.ini,$2,vie) -5)
            writeini -n boxe-jeu.ini $nick vie $calc($readini(boxe-jeu.ini,$nick,vie) +1)
            writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) +4)
            notice $2 $read(gagne1.txt)
            notice $nick Tu Gagne !
            amsg 4 %boxeur [ $+ [ $nick ] ] 1Combat 4 %boxeur [ $+ [ $2 ] ]
            amsg 4 %boxeur [ $+ [ $nick ] ] 1 Gagne et 4  %boxeur [ $+ [ $2 ] ] 1Perd
          }
          elseif (%combat == 2) {
            if ($readini(boxe-jeu.ini,$nick,vie) >= 7 ) {
              writeini -n boxe-jeu.ini $nick perdu $calc($readini(boxe-jeu.ini,$nick,perdu) +1)
              writeini -n boxe-jeu.ini $2 vie $calc($readini(boxe-jeu.ini,$2,vie) +1)
              writeini -n boxe-jeu.ini $2 perdu $calc($readini(boxe-jeu.ini,$2,perdu) -1)
              writeini -n boxe-jeu.ini $nick vie $calc($readini(boxe-jeu.ini,$nick,vie) -5)
              writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) -4)
              notice $2 $read(perdu1.txt)
              notice $nick Tu Perd !
              amsg 4  %boxeur [ $+ [ $nick ] ] 1Combat 4 %boxeur [ $+ [ $2 ] ]
              amsg 4  %boxeur [ $+ [ $nick ] ] 1 Perd et 4  %boxeur [ $+ [ $2 ] ] 1Gagne

            }
            if ($readini(boxe-jeu.ini,$nick,vie) >= 99 ) {
              notice $nick Tu as trop de vie
            }
            if ($readini(boxe-jeu.ini,$nick,ko) >= 10 ) {
              notice $nick vous passez à la ceinture : Bronze
              writeini -n boxe-jeu.ini $nick bronze oui
              mode $active +v $nick
              writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) +25)
            }
            if ($readini(boxe-jeu.ini,$nick,ko) >= 20 ) {
              notice $nick vous passez à la ceinture : Argent
              writeini -n boxe-jeu.ini $nick argentt oui
              mode $active +h $nick
              writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) +35)            
            }
            if ($readini(boxe-jeu.ini,$nick,ko) >= 30 ) {
              notice $nick vous passez à la ceinture : Or
              writeini -n boxe-jeu.ini $nick or oui
              mode $active +o $nick
              writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) +45)
            }
            if ($readini(boxe-jeu.ini,$nick,vie) <= 1 ) {
              notice $nick Plus de Vie 
              notice $2 4 $nick 1n'a plus de vie
            }
            if ($readini(boxe-jeu.ini,$nick,inscrit) != oui) {
              notice $nick tu n'es pas inscrit !
            }
          }
        }
      }
    }
  }
}

on *:text:*:?:{
  if ($1 == vie) {
    if ($readini(boxe-jeu.ini,$nick,argent) >= 21 ) {
      if ($readini(boxe-jeu.ini,$nick,inscrit) == oui ) {
        if ($readini(boxe-jeu.ini,$nick,login) == on) {
          writeini -n boxe-jeu.ini $nick vie $calc($readini(boxe-jeu.ini,$nick,vie) +50)
          notice $nick 50 % de vie Ajouté à votre compte !
          writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) -40)
          notice $nick Il vous reste : $readini(boxe-jeu.ini,$nick,argent) ? 
        }
      }
    }
  }
}

on *:text:*:?:{
  if ($1 == magazin) {
    if ($readini(boxe-jeu.ini,$nick,inscrit) == oui ) {
      notice $nick 1_____4,1MAGAZIN1,0_____     
      notice $nick 0_______________
      notice $nick 1____GANT____
      notice $nick 1Gant de Boxe : Bronze - Prix : 35 ?
      notice $nick 1Gant de Boxe : Argent - Prix : 50 ?
      notice $nick 1Gant de Boxe : OR - Prix : 95 ?
      notice $nick 1____Coquille____
      notice $nick 1Coquille : Bronze - Prix : 35 ?
      notice $nick 1Coquille : Argent - Prix : 43 ?
      notice $nick 1Coquille : OR - Prix : 76 ?
      notice $nick 1____Protège Dents____
      notice $nick 1Protège Dents : Bronze - Prix : 15 ?
      notice $nick 1Protège Dents : Argent - Prix : 25 ?
      notice $nick 1Protège Dents : OR - Prix : 35 ?
    }
  }
}

on *:text:*:?:{
  if ($1 == payer-gantbronze) {
    if ($readini(boxe-jeu.ini,$nick,argent) >= 20 ) {
      if ($readini(boxe-jeu.ini,$nick,inscrit) == oui ) {
        if ($readini(boxe-jeu.ini,$nick,login) == on) {
          writeini -n boxe-jeu.ini $nick gantbronze oui 
          notice $nick Gant De Boxe De Bronze Ajouté
          writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) -35)
          notice $nick Il vous reste : $readini(boxe-jeu.ini,$nick,argent) ? 
        }
      }
    }
  }
}

on *:text:*:?:{
  if ($1 == payer-aide) {
    notice $nick Pour Acheter Tape /msg $me payer-[Achat]
    notice $nick Liste : 
    notice $nick gantbronze
    notice $nick gantargent
    notice $nick gantor
    notice $nick protegedentbronze
    notice $nick protegedentargent
    notice $nick protegedentor
    notice $nick coquillebronze
    notice $nick coquilleargent
    notice $nick coquilleor
    notice $nick Exemple : /msg $me payer-protegedentor
  }
}

on *:text:*:?:{
  if ($1 == payer-coquilleor) {
    if ($readini(boxe-jeu.ini,$nick,login) == on) {
      if ($readini(boxe-jeu.ini,$nick,argent) >= 76 ) {
        notice $nick Plus D'Argent !
        if ($readini(boxe-jeu.ini,$nick,inscrit) == oui ) {
          writeini -n boxe-jeu.ini $nick gantbronze oui 
          notice $nick Coquille D'Or Ajouté
          writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) -76)
          notice $nick Il vous reste : $readini(boxe-jeu.ini,$nick,argent) ? 
        }
      }
    }
  }
}

on *:text:*:?:{
  if ($1 == payer-coquilleargent) {
    if ($readini(boxe-jeu.ini,$nick,argent) >= 43 ) {
      notice $nick Plus D'Argent !
      if ($readini(boxe-jeu.ini,$nick,inscrit) == oui ) {
        if ($readini(boxe-jeu.ini,$nick,login) == on) {
          writeini -n boxe-jeu.ini $nick gantbronze oui 
          notice $nick Coquille D'Argent Ajouté
          writeini -n boxe-jeu.ini $nick argent $calc($readini(boxe-jeu.ini,$nick,argent) -43)
          notice $nick Il vous reste : $readini(boxe-jeu.ini,$nick,argent) ? 
        }
      }
    }
  }
}

on *:join:#:{
  if ($readini(boxe-jeu.ini,$nick,inscrit) == oui) {
    msg $chan %boxeur [ $+ [ $nick ] ] Est Un Boxeur
    mode #boxe +v $nick
  }
  if ($readini(boxe-jeu.ini,$nick,inscrit) != oui) {
    notice $nick Inscrit Toi en tapant : /msg $me creation TonBoXeur PoId . Exemple /msg $me creation BoXeuR-PrO lourd
  }
}
on *:part:#:{
  writeini -n boxe-jeu.ini $nick login off
}

on *:text:*:?:{
  if ($1 == mes-achats) {
    if ($readini(boxe-jeu.ini,$nick,inscrit) == oui ) {
      if ($readini(boxe-jeu.ini,$nick,login) == on) {
        notice $nick 1Vous Possédez :
        notice $nick 1Gant De Bronze : $readini(boxe-jeu.ini,$nick,gantbronze) 
        notice $nick 1Gant D'Argent : $readini(boxe-jeu.ini,$nick,gantargent) 
        notice $nick 1Gant D'Or : $readini(boxe-jeu.ini,$nick,gantor) 
        notice $nick 1Protège Dents Bronze : $readini(boxe-jeu.ini,$nick,protegedentbronze) 
        notice $nick 1Protège Dents Argent : $readini(boxe-jeu.ini,$nick,protegedentargent) 
        notice $nick 1Protège Dents Or : $readini(boxe-jeu.ini,$nick,protegedentor) 
        notice $nick 1Coquille De Bronze : $readini(boxe-jeu.ini,$nick,coquillebronze) 
        notice $nick 1Coquille D'Argent : $readini(boxe-jeu.ini,$nick,coquilleargent) 
        notice $nick 1Coquille D'Or : $readini(boxe-jeu.ini,$nick,coquilleor) 
      }
    }
  }
}

Conclusion :


By Dragon`Night

Pour de l'aide , vous pouvez me retrouver sur : cool-irc.shellhoster.com

A voir également

Ajouter un commentaire

Commentaires

cs_isko
Messages postés
16
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
15 janvier 2007
-
tu le met dans les remote de ton bot, et tu te créer un compte :
/msg Votre_Bot creation Nom_de_votre_boxeur poid (exemple /msg Boxe-Bot Xfight lourd)

ensuite regarde l'aide du bot : /msg Ton_Bot aide
aznkhmerpride
Messages postés
1
Date d'inscription
lundi 18 décembre 2006
Statut
Membre
Dernière intervention
18 janvier 2007
-
ça ne marche pas TT; je fais comment pour le faire fonctionner ?
Corween
Messages postés
73
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
31 juillet 2008
-
Pour ce qui est du code, j'y connait pas grand chose, mais pur ce qui est du jeu, j'y est déjà joué quelques fois, et il est vraiment pas mal.
En tout cas, pas mal l'idée ;)
Panthouffle
Messages postés
281
Date d'inscription
jeudi 21 juillet 2005
Statut
Membre
Dernière intervention
14 avril 2008
-
J'ai pas testé mais à vu d'oeil tu regroupe tes on text qu'à moitié :(

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.