I received a response to a similar question I asked which was How can I make dice for R? The response was a program for R in addition to a program for "intimate dice". I'm not sure which die Alice and Bob are interested in but I suggest using R in addition to a remote desktop so each player can see that the other is not cheating.
I don't know how to write the codes so I've copy/pasted the response I received:
If you want to make dice in the statistical program R. Start by downloading it here: http://cran.r-project.org/.
To make a normal dice use the following script:
#Dice roll function
RollDie = function(n) sample(1:6,n,replace=T)
#use Die
RollDie(n)
#If you'd like to spice things up a bit and make a dice for safe and consensual adult
#activities then use the following series of scripts:
#Creating the function, use this script:
#Intimate dice function
Actions= c("kiss","lick","suck","bite",
"spank","blow", "stroke",
"tickle","pinch",
"torment")
Body= c("lips","arms","chest","thighs",
"neck","ear", "wrist",
"navel","nipples",
"the good stuff")
Action= function(n) sample(Actions[1:10],n,replace=T)
Area= function(n) sample(Body[1:10],n,replace=T)
Action(1)
Area(1)
#If you'd like the dice saved to the R global environment so you can be ready for when
the mood is right use the following script:
#Save the following script as yourfile.R in something like this location "C:\\Documents
and Settings\\yourfile.R"
#Intimate dice
Action(1)
Area(1)
#yes
#Now create the following function to save to R's global environment with the following:
#Run all
source("C:\\Documents and Settings\\yourfile.R",echo=T)
hi<-function(){source("C:\\Documents and Settings\\yourfile.R",echo=T)}
#ok
#close and save your R workspace
#upon opening run the following function:
hi()
#If this has been done properly then you should see something along the lines of this:
#Intimate dice
Action(1)
[1] "bite"
Area(1)
[1] "ear"
#yes
#Here's to one more reason for celebrating math & science