anchor.diff:  %%	lager:info("Time : ~p", [Time]),
   %%	lager:info("Temp1 : ~p C", [Temp1/2]),
   %%	lager:info("Rest : ~p", [Rest]),
  -	Result = {rf_address, RF_address, {temp, Temp/2}, {value, Value}, {date, Date}, {time, Time},
  -							 [{state_1, [{error, value(error,Error)}, {answer,value(answer,Answer)},{state,State}]}, 
  -							 [state_1, [{battery, value(battery, Battery)}, {linkstatus, value(linkstatus,Linkstatus)}, {panel, value(panel,Panel)}, {gateway, value(gateway,Gateway)}, {dst, value(dst,Dst)}]]]},	
  -	%%decode_l(binary:part(Rest, (Length - 11), byte_size(Rest) - (Length - 11)), [Result|Acc]).
  +	Result = {rf_address, RF_address, [{temp, Temp/2}, {value, Value}, {date, Date}, {time, Time},
  +							 {error, value(error,Error)}, {answer,value(answer,Answer)},{state,State}, 
  +							 {battery, value(battery, Battery)}, {linkstatus, value(linkstatus,Linkstatus)}, {panel, value(panel,Panel)}, {gateway, value(gateway,Gateway)}, {dst, value(dst,Dst)}]},	
  +	lager:info("2. Length of the rest : ~p", [byte_size(Rest) ]),
  +	decode_l(Rest, [Result|Acc]);
  +decode_l(<<6,
  +		   RF_address:?RF_ADDRESS, 
  +		   Unknown:1/binary, 
  +		   Status_1:1/binary, 
  +		   Status_2:1/binary, 
  +		   Rest/binary>>, Acc) ->
  +	<<U4:1, U3:1,U2:1, Valid:1, Error:1, Answer:1, State:1, U1:1>> = Status_1, 
  +	<<Battery:1, Linkstatus:1, Panel:1, Gateway:1, Dst:1, U:1, Mode_1:1, Mode_0:1>> = Status_2,
  +	Result = {rf_address, RF_address, [
  +							 {error, value(error,Error)}, {answer,value(answer,Answer)},{state,State}, 
  +							 {battery, value(battery, Battery)}, {linkstatus, value(linkstatus,Linkstatus)}, 
  +							 {panel, value(panel,Panel)}, {gateway, value(gateway,Gateway)}, {dst, value(dst,Dst)}]},
   	decode_l(Rest, [Result|Acc]).
   
   
  
positive.code: 	lager:info("Devices : ~p", [Devices]),
  	[{rooms, Rooms}, {devices, Devices}];
  decode(<<"C:",RF_address:6/binary, "," ,Rest/binary>> = Message) ->
  	lager:debug("C - Message : ~p", [Message]),	
  	Messages = binary:split(Message, <<"\r\n">>, [global]), 
  	[decode_c_m(<<"C:", RF_address/binary, ",", (base64:decode(Body))/binary>>) || <<"C:",RF_address:6/binary, "," , Body/binary>> <- Messages];
  decode(<<"L:", Rest/binary>> = Message) ->
  
negative.code: 	Result = {rf_address, RF_address, [{temp, Temp/2}, {value, Value}, {date, Date}, {time, Time},
  							 {error, value(error,Error)}, {answer,value(answer,Answer)},{state,State}, 
  							 {battery, value(battery, Battery)}, {linkstatus, value(linkstatus,Linkstatus)}, 
  							 {panel, value(panel,Panel)}, {gateway, value(gateway,Gateway)}, {dst, value(dst,Dst)}]},
  	lager:info("1.Length of the rest : ~p", [byte_size(Rest) ]),
  	decode_l(Rest, [Result|Acc]);
  
  decode_l(<<12,
  