1d100 Sans Limite...

leGlauque

XLDnaute Nouveau
Bonjour à tous,

J’aimerai savoir s’il est possible de simuler dans une cellule le tirage d’un dé à 100 faces (d100) Sans Limite.

« Mais qu’est-ce donc que cela ?!..., vous interloquerez vous »
Et bien, il s’agit de tirer au hasard un nombre de 1 à 100. Jusqu’ici, rien de trop compliqué.
Mais deux alternatives peuvent se produire :
- Si ce nombre est compris entre 1 et 5, on retire à nouveau 1d100 et on l’ôte à ce résultat.
- Si le nombre est compris entre 96 et 100, on retire à nouveau 1d100 et on l’ajoute à ce résultat.
Tout en sachant que cela peut se cumuler.

Des exemples ? Mais bien sûr :

Ex A :
1er jet : 99
Je relance le dé pour y ajouter son résultat : 26.
On s’arrête là pour un total de 99+26 = 125

Ex B :
1er Jet : 01
Je relance le dé pour en retrancher le résultat : 76
On s’arrête là pour un total de : 01-76 = -75

Ex C :
1er Jet : 98
Je relance le dé pour y ajouter son résultat : 96
Je relance le dé pour y ajouter son résultat : 64.
On s’arrête là pour un total de 98+96+64 = 258

Ex D :
1er Jet : 04
Je relance le dé pour en retrancher le résultat : 96
Je relance le dé pour en retrancher le résultat : 02
Je relance le dé pour y ajouter le résultat : 65
On s’arrête là pour un total de : 04-96-02+65 = -29

Voilà…

Bon, ensuite, on peut créer des nuances, avec des jets d’1d100 Sans Limite Supérieure, où la relance ne se fait que sur un 96-100.

L’idée étant de pouvoir une liste d’individus qui ont besoin de faire un jet à chaque tour.
Ainsi, en appuyant sur un bouton, par exemple, je peux assigner un résultat de jet à 20 personnes (qui apparaît dans une case à côté de leur nom), au lieu de faire tous les jets des protagonistes.

Merci d’avance,

Le Glauque
 

Pièces jointes

  • Initiatives.xls
    17 KB · Affichages: 35
  • Initiatives.xls
    17 KB · Affichages: 38
  • Initiatives.xls
    17 KB · Affichages: 40
Dernière édition:

tototiti2008

XLDnaute Barbatruc
Re : 1d100 Sans Limite...

Bonjour le Glauque,

d'après l'exemple D, le signe ne change que si on fait un jet de 5 ou moins, c'est bien ça ?
si j'ai compris :
EX E:
1er jet : 04
on relance pour retrancher : 96
on relance pour retrancher : 98
on relance pour retrancher : 04
on relance pour ajouter : 23
04-96-98-04+23=-171

peux-tu confirmer ?
 

Gruick

XLDnaute Accro
Re : 1d100 Sans Limite...

Salut le Glauque,
Je te renvoies le fichier avec une macro et son bouton.
Pour l'instant, elle jette le dé, et met le résultat sur la cellule choisie.
J'ai laissé les msgbox pour que tu vérifies si c'est conforme.

Tiens, salut Tototiti !

A perfectionner donc...

Gruick

Edit : Après relecture, je m'aperçois que c'est pas bon... tout dépend du premier jet.
L'exemple 4 est bizarre on ajoute alors que le précédent jet est 02 ? A préciser
 

Pièces jointes

  • Initiatives.xls
    25.5 KB · Affichages: 45
  • Initiatives.xls
    25.5 KB · Affichages: 45
  • Initiatives.xls
    25.5 KB · Affichages: 45
Dernière édition:

tototiti2008

XLDnaute Barbatruc
Re : 1d100 Sans Limite...

un exemple avec ce que j'ai compris :

Edit : Bonjour Gruick
 

Pièces jointes

  • Initiatives.xls
    24.5 KB · Affichages: 43
  • Initiatives.xls
    24.5 KB · Affichages: 43
  • Initiatives.xls
    24.5 KB · Affichages: 41
Dernière édition:

Gruick

XLDnaute Accro
Re : 1d100 Sans Limite...

Rapide le Tototiti... Viens-tu à Rennes pour la rencontre XLD ?
Juste le temps de faire les commissions, et vlan.
Pas pensé à faire une fonction.
Chapeau, belle synthèse ! j'ose à peine proposer ma version plus traditionnelle.

Le Glauque tu dois encore dormir, vu ton message tardif d'hier. Dis-nous ce que tu en penses.

A plus
Gruick
 

Pièces jointes

  • Initiatives.xls
    27 KB · Affichages: 55
  • Initiatives.xls
    27 KB · Affichages: 55
  • Initiatives.xls
    27 KB · Affichages: 56

tototiti2008

XLDnaute Barbatruc
Re : 1d100 Sans Limite...

Non, pour Rennes, ça va être un peu compliqué, je suis de l'Est de la France. Mais je lirais avec plaisir le "compte-rendu" de votre rencontre, dès votre retour :).
Je viens de voir ton code et notre inspiration est manifestement la même, pas de quoi rougir de ta solution. La fonction a un soucis : le bouton recalcule tout le classeur à chaque clic, donc je ne suis pas persuadé que ce soit forcément la meilleure idée.
 

leGlauque

XLDnaute Nouveau
Sens de la Relance

D'abbord, merci pour votre rapidité !

Ensuite sur le "sens" des relances :
En gros, il faut se dire que
96-100 fait relancer ds le sens actuel
01-05 fait relancer en sens inverse

Un exemple (qui a fort peu de prob de se produire...) :
jet = 02
on relance en sens inverse (vers le négatif) = 98
on relance ds le même sens (donc tjrs vers le négatif) = 96
on relance ds le même sens (donc tjrs vers le négatif) = 05
on relance en sens inverse (vers le positif) = 99
on relance ds le même sens (donc tjrs vers le positif) = 97
on relance ds le même sens (donc tjrs vers le positif) = 47

On s'arrête là pour un total de 02-98-96-5+99+97+47 = 46

Voilà, je sais pas si c'est plus clair...

Bon, je vais voir vos docs...
Merci encore !
 

leGlauque

XLDnaute Nouveau
Re : 1d100 Sans Limite...

Alors, voilà la réponse qu'on m'a donné sur un autre forum.
Elle me convient tout à fait, je vous la livre donc !

Merci encore pour tout !
 

Pièces jointes

  • Initiatives.xls
    37 KB · Affichages: 49
  • Initiatives.xls
    37 KB · Affichages: 51
  • Initiatives.xls
    37 KB · Affichages: 50

Discussions similaires

Réponses
4
Affichages
277
Réponses
6
Affichages
330

Statistiques des forums

Discussions
312 104
Messages
2 085 344
Membres
102 865
dernier inscrit
FreyaSalander