AutoHotkey Community

[taskforce_inc]

I play dnd, and find that my dice are bias, so I made this for my players(so that they would stop Bit#$ing at me for being unfair, its also useful for any type of dice rolling you may need, plus a bonus feature of making a custom die (just in case ya need to roll a 3427-sided die, by chance. anyway, enjoy...


Gui, add, button,, Exit
Gui, add, text,,You rolled:
Gui, add, text, vRoll, _____________________________________
Gui, add, tab,, D2|D3|D4|D6|D8|D10|D12|D20|D30|D100|Custom
Gui, add, text,,How many two-sided dice would you like to roll?
Gui, add, edit, vD2,
Gui, add, button,, Roll-D2
Gui, tab, 2
Gui, add, text,,How many three-sided dice would you like to roll?
Gui, add, edit, vD3,
Gui, add, button,, Roll-D3
Gui, tab, 3
Gui, add, text,,How many four-sided dice would you like to roll?
Gui, add, edit, vD4,
Gui, add, button,, Roll-D4
Gui, tab, 4
Gui, add, text,,How many six-sided dice would you like to roll?
Gui, add, edit, vD6,
Gui, add, button,, Roll-D6
Gui, tab, 5
Gui, add, text,,How many eight-sided dice would you like to roll?
Gui, add, edit, vD8,
Gui, add, button,, Roll-D8
Gui, tab, 6
Gui, add, text,,How many ten-sided dice would you like to roll?
Gui, add, edit, vD10,
Gui, add, button,, Roll-D10
Gui, tab, 7
Gui, add, text,,How many twelve-sided dice would you like to roll?
Gui, add, edit, vD12,
Gui, add, button,, Roll-D12
Gui, tab, 8
Gui, add, text,,How many twenty-sided dice would you like to roll?
Gui, add, edit, vD20,
Gui, add, button,, Roll-D20
Gui, tab, 9
Gui, add, text,,How many thirty-sided dice would you like to roll?
Gui, add, edit, vD30,
Gui, add, button,, Roll-D30
Gui, tab, 10
Gui, add, text,,How many one hundred-sided dice would you like to `nroll?
Gui, add, edit, vD100,
Gui, add, button,, Roll-D100
Gui, tab, 11
Gui, add, text,,How many sides should your dice have?
Gui, add, edit, vCside,
Gui, add, text,,How many dice would you like to roll?
Gui, add, edit, vDcust,
Gui, add, button,, Roll-Custom-Die


Gui, Show,,Virtual Die Roller
Return


;***************************Buttons********************************
ButtonRoll-D2:
GuiControlGet, D2
DiceSide = 2
Min = %D2%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%

Return
;*****************************************************************
ButtonRoll-D3:
GuiControlGet, D3
DiceSide = 3
Min = %D3%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;******************************
ButtonRoll-D4:
GuiControlGet, D4
DiceSide = 4
Min = %D4%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;***************************
ButtonRoll-D6:
GuiControlGet, D6
DiceSide = 6
Min = %D6%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;**********************
ButtonRoll-D8:
GuiControlGet, D8
DiceSide = 8
Min = %D8%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;***********************
ButtonRoll-D10:
GuiControlGet, D10
DiceSide = 10
Min = %D10%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;*************
ButtonRoll-D12:
GuiControlGet, D12
DiceSide = 12
Min = %D12%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;**********
ButtonRoll-D20:
GuiControlGet, D20
DiceSide = 20
Min = %D20%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;************
ButtonRoll-D30:
GuiControlGet, D30
DiceSide = 30
Min = %D30%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;***************
ButtonRoll-D100:
GuiControlGet, D100
DiceSide = 100
Min = %D100%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;************
ButtonRoll-Custom-Die:
GuiControlGet, Cside
GuiControlGet, Dcust
DiceSide = %Cside%
Min = %Dcust%
EnvMult, DiceSide, %Min%
Random, Output, %Min%, %DiceSide%
GuiControl,, Roll, %Output%
return
;******************************************************************
ButtonEXIT:
GuiClose:
Quit:
ExitApp



is there anything this Virtual die gen left out? please let me know and I will update the script

[Chris]

Looks great; thanks for posting it.

[Watcher]

Looks Very cool but I could only see the first digit of the output window. See if this line after the 'you rolled' command helps.

[taskforce_inc]

Oh there I go, being a retard while I am testing! I used really small numbers when I was testing to make sure the range didnt go above or before what it should of for what ever reason. If I used a number bigger than 3 *cough* and tested more than the d2 and custom I would have noticed this. any way, thanks for the fix, good jobs, works great now. I think I will be adding some fun graphics later on too before she gets compiled again, and put into the D & D character package I am makin... look for that! in a few months if yall are dnd players.

[jonny]

Of course, before I test this I'm afraid to tell you: The Random command isn't truly random. In fact, it's impossible for any computer-based system to be truly random, since, by nature, computers are deterministic. By coincidence, I am a die collector, and I happen to know that many excellent dice manufacturers make some wonderful dice. Used with the proper rolling techniques, these dice can be more random than any program. (And they look better while doing it. )

That said, I'll give this a try. It looks cool. Just keep in mind that it would probably fail the standard 10,000 roll testing that manufactured dice usually get. (Chris, if I'm wrong, please enlighten me. I'm just going off what I know.)

[Chris]

[taskforce_inc]

I understand that the only real way to game is with real die, and my die roll radom. very random, when they are not being used to determine wether the party lives or dies. Then of couse the party dies, and first off thats only fun now and then, and lots of work for me.

[savage]

Heh, I've got a couple of dice like that. They have the incredible ability to make me miss when otherwise there would be practically no chance of failure.