on *:text:!new:#:{ 
  if ($hget(Roully, $address($nick,2)) >= 0) { msg $chan $nick You already have an account. | halt }
  if ($hget(Roully, $address($nick,2)) < 0) {
    hadd -m Roully $address($nick,2) 100000 
    msg $chan A new account has been created. $nick has $chr(36) $+ 100000 to gamble.
  }
}
needs to be change for me to get this one to work 
was missing the !
in this line 
if ($hget(Roully, $address($nick,2)) < 0) {
to become 
if (!$hget(Roully, $address($nick,2)) < 0) {

nice job :)
works great

already have people playing fun :)
going to add some color i think