Dice pool creation.

RoloLudo.package/DicePool.class/instance/dice..st

@@ -0,0 +1,3 @@
+accessing
+dice: anArray
+	dice := anArray

RoloLudo.package/DicePool.class/instance/dice.st

@@ -1,3 +1,3 @@
 accessing
 dice
-	^ dice ifNil: [dice := Array with: (Die with: 6) with: (Die with: 6) ]
+	^ dice ifNil: [dice := Array new ]

RoloLudo.package/DicePool.class/instance/with.with..st

@@ -0,0 +1,4 @@
+accessing
+with: fistInteger with: secondInteger
+
+	self dice: (Array with: (Die with: fistInteger) with: (Die with: secondInteger))

RoloLudo.package/Die.class/instance/printOn..st

@@ -0,0 +1,5 @@
+accessing
+printOn: aStream
+	super initialize.
+	aStream
+		nextPutAll:  self faces asString

RoloLudo.package/Firelights.class/instance/dice.st

@@ -1,3 +1,3 @@
 accessing
 dice
-	^ dice ifNil: [ dice := DicePool new ]
+	^ dice ifNil: [ dice := DicePool new with: 6 with: 6 ]