***********************Aliass*********************** roll { if (%dice == on ) { if (($$1 > 99) || ($$1 < 1)) { goto toobig } else { goto roll } :toobig /msg $$2 Sorry $$3, that number is out of range /msg $$2 Roll 1 to 99 dice halt :roll /set %dicetotal 0 /set %rolls $$1 /dec %rolls 1 /set %high_roll 0 :wild_die /set %wild_dice $rand(1,6) if ( %wild_dice == 1 ) { /set %wild_one $rand(1,6) if ((%wild_one == 1) || (%wild_one == 2)) { /msg $$2 $$3, got a one on the wild die but it didn't effect yout /inc %dicetotal %wild_dice } elseif ((%wild_one == 3) || (%wild_one == 4)) { /msg $$2 $$3, got a one on the wild die but it gave you a penalty /set %wild_fail on } elseif ((%wild_one == 5) || (%wild_one == 6)) { /msg $$2 $$3, got a one on the wild die, but it gave you a complication /inc %dicetotal %wild_dice } } elseif ( %wild_dice == 6 ) { /inc %dicetotal %wild_dice :wild_six /msg $$2 $$3 got a six on the wild die, roll again /set %wild_sixes $rand(1,6) /inc %dicetotal %wild_sixes if (%wild_sixes == 6) goto wild_six } else { /inc %dicetotal %wild_dice } :normal_roll if (%rolls <= 0) { goto end } /set %normal_roll $rand(1,6) if (%normal_roll > %high_roll) { /set %high_roll %normal_roll } /inc %dicetotal %normal_roll /dec %rolls 1 goto normal_roll :end if (%wild_fail == on ) { /set %wild_fail off /dec %dicetotal %high_roll } /msg $$2 4 $$3 has a total of %dicetotal halt } else { /msg $$2 Sorry $$3 dice roll is turned off } } dlroll { /roll $$1 $chan Dark_Lord_Of_Sith } ***********************Channels*********************** Dice Roll .On { /set %dice on /msg $chan Star Wars dice roll has been turned on /msg $chan Type !d to roll that many dice } .Off { /set %dice off /msg $chan Star Wars dice roll has been turned off } ***********************Events*********************** 1:on text:!d*:#: { /roll $parm2 $chan $nick }