Re: TIB: "Weighting" Dice on TI-85

To: ti-basic@lists.ticalc.org
Subject: Re: TIB: "Weighting" Dice on TI-85
From: larry1492@juno.com (Larry G Currie)
Date: Sun, 25 Jan 1998 20:28:40 -0500
Cc: ti-basic@lists.ticalc.org
References: <00a201bd29e2$3d7a12c0$81729bce@napalm>
Reply-To: ti-basic@lists.ticalc.org


Easiest way: (for a 20 sided die w/ 15-20 having higher odds) is to 
:(1+rand(26))/->/R 
:If ( R>20):then:R-6/->/R:End
This takes 21-26 as the second chance of 15-20 occuring.  -6 is a simple
conv.factor.
Ex. 2  Weighted "6" on a die
1+rand (10)/->/R
if (R>6): then: R=6:end
It should be simple to make any other odds you want, bi "making" a
weighted die a n all rolls die with more than one sided with the weighted
number.  IE. in the first example the die is 26 sided with two sides
having 15...20.
~Larry C
Larry1492@juno.com
[...]  I 
>would =
>like to know how to weight the dice [...]

_____________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com
Or call Juno at (800) 654-JUNO [654-5866]

References:

TIB: "Weighting" Dice on TI-85

From: "Jeremy Mullins" <jkmullins@bigfoot.com>