anchor.diff:    write_command(I2cRef, Backlight, ?RETURN_HOME, ?NO_PARAMS).
   
   
  -function_set(I2cRef, Backlight, Params) ->
  +set_display_function(I2cRef, Backlight, Params) ->
     write_command(I2cRef, Backlight, ?FUNCTION_SET, Params).
   
   
  -display_control(I2cRef, Backlight, Params) ->
  +set_display_control(I2cRef, Backlight, Params) ->
     write_command(I2cRef, Backlight, ?DISPLAY_CONTROL, Params).
   
   
  -entry_mode_set(I2cRef, Backlight, Params) ->
  +set_entry_mode(I2cRef, Backlight, Params) ->
     write_command(I2cRef, Backlight, ?ENTRY_MODE_SET, Params).
  +
  +
  +set_data_addr(I2cRef, Backlight, Params) ->
  +  write_command(I2cRef, Backlight, ?SET_DDRAM_ADDR, Params).
   
   
   write_command(I2cRef, Backlight, Command, Params) ->
  
positive.code:       update_lcd_control(I2cRef, Inputs),
        Status = initialed,
        Value = 0, 
        {ok, Private2} = attrib_utils:set_value(Private1, i2c_ref, I2cRef);
        
      {error, Reason} ->
        error_logger:error_msg("Error: ~p intitializing LCD driver, I2C Address: ~p~n", 
                                [Reason, I2cAddr]),
        Status = proc_error,
        Value = not_active,
        Private2 = Private1
      end,
     
    Outputs1 = output_utils:set_value_status(Outputs, Value, Status),
  
    % This is the block state
    {Config, Inputs, Outputs1, Private2}.
  
  
  %%
  %%  Execute the block specific functionality
  %%
  -spec execute(block_state()) -> block_state().
  
  execute({Config, Inputs, Outputs, Private}) ->
  
    {ok, I2cRef} = attrib_utils:get_value(Private, i2c_ref),
  
    Backlight = update_lcd_control(I2cRef, Inputs),
  
    write_data(I2cRef, Backlight, 65),
  
    Status = normal,
    Value = $A, 
    Outputs1 = output_utils:set_value_status(Outputs, Value, Status),
  
    % Return updated block state
  
negative.code:     block_common:inputs(),
      [
        {display, {true, ?EMPTY_LINK}},
        {clear, {false, ?EMPTY_LINK}},
        {cursor, {true, ?EMPTY_LINK}},
        {blink_cursor, {true, ?EMPTY_LINK}},
        {backlight, {true, ?EMPTY_LINK}},
        {inputs, [{"Input", ?EMPTY_LINK}]}
      ]). 
  
  
  