seems you forgot to aadd a few things on ur `colour one
this could have been done alot better =/
and you can just do ur dice like this instead of setting a var

on *:TEXT:`dice:#:{
  describe # rolls a dice 
  .timer 1 1 msg # You have rolled a $r(1,6) 
}

as well as ur emoticon script

on *:TEXT:`emoticon:#:{
  var %em =].=[.=D.=0.=|.=3.=F.=x.=@.=K 
  describe # $gettok(%em,$r(1,10),46) 
}

you should really use local var\'s instead of gloabl