Multitech MTCBA-G-F User Manual download pdf (Page 212)

174

if contador = direccion then ' si no hay nada guardado evita que

result = 0 ' se envíe un valor de -1

break

end if

result = contador-direccion-1

break

end if

next contador

end sub

sub procedure lecturadatos(dim direccion, longitud as byte)

dim contador as byte 'Procedimiento en el que se guardan de forma

contador = 0 'temporal los datos ingresados por el usuario

while true 'los cuales son posteriormente enviados al

if PORTA.1= 1 then 'procedimiento de escritura EEPROM

break

end if

if Usart_Data_Ready = 1 then

ingresodatos[contador]= Usart_Read

if ingresodatos[0] <> enter then

if ingresodatos[contador] = $08 then

contador = contador - 2

end if

contador = contador + 1

if ingresodatos[contador-1]= enter then

limpeareeprom(direccion,longitud)

escrituraeeprom(direccion,longitud)

break

1 2 ... 207 208 209 210 211 212 213 214 215 216 217 ... 236 237

No comments

Multitech MTCBA-G-F User Manual Page 212