anchor.diff:          {player_won, {player, _, _, Bet}, _} -> 
               credits_server:deposit(Who, Bet);
           {house_won, {player, _, _, Bet}, _} ->
  -            credits_server:withdraw(Who, Bet)
  +            credits_server:withdraw(Who, Bet);
  +        _ -> ok
       end,
       format_result(Res).
    
  
positive.code: handle_event({cmd, _Bot, From, To, Cmd}, State) ->
      Tokens = nani_utils:parse_cmd(Cmd),
      Mod = blackjack_commands,
      io:format("~p~n", [Tokens]),
      case Tokens of
          ["bj", "bet", Arg] ->
              H = handle_bet_command,
              MFA = {Mod, H, [Arg]},
              apply_command(From, To, MFA);
          ["bj", "deal"] ->
              H = handle_deal_command,
              MFA = {Mod, H, []},
              apply_command(From, To, MFA);
          ["bj", "hit"] ->
              H = handle_hit_command,
              MFA = {Mod, H, []},
              apply_command(From, To, MFA);
          ["bj", "stand"] ->
              H = handle_stand_command,
  
negative.code:             nani_bot:say(To, [From, ": ", Msg])
      end.
  
  handle_bet_command(Arg, Who) ->
      case try_parse_int(Arg) of
          {ok, Amount} -> 
              Res = blackjack:bet(frotz, Amount),
              case Res of 
                  {player_won, {player, _, _, Bet}, _} -> 
                      credits_server:deposit(Who, Bet);
                  {house_won, {player, _, _, Bet}, _} ->
                      credits_server:withdraw(Who, Bet);
                  _ -> ok
              end,
              format_result(Res);
          Err -> Err
      end.
  
  handle_deal_command(Who) ->
      Res = blackjack:deal(frotz),
      case Res of 
          {player_won, {player, _, _, Bet}, _} -> 
              credits_server:deposit(Who, Bet);
          {house_won, {player, _, _, Bet}, _} ->
              credits_server:withdraw(Who, Bet);
          _ -> ok
      end,
      format_result(Res).
  
  handle_hit_command(Who) ->
      Res = blackjack:hit(frotz),
      case Res of 
          {player_won, {player, _, _, Bet}, _} -> 
              credits_server:deposit(Who, Bet);
          {house_won, {player, _, _, Bet}, _} ->
              credits_server:withdraw(Who, Bet);
          _ -> ok
      end,
      format_result(Res).
  
  handle_status_command() ->
  