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

173

if var1 = enter then

break

else

Usart_Write(var1)

end if

next contador

end sub

sub procedure escrituraeeprom(dim direccion, longitud as byte)

dim contador, var1 as byte 'Procedimiento que permite escribir en la memoria

var1 = 0 'EEPROM del Microcontrolador

for contador = direccion to (direccion + longitud)

if ingresodatos[var1]<> enter then

EEprom_write(contador, ingresodatos[var1])

var1 = var1 + 1

Delay_ms(25)

else

break

end if

next contador

end sub

sub function calculolongitud(dim direccion, longitud as byte) as byte

dim contador, var1 as byte 'Procedimiento que determina el tamaño de los

for contador = direccion to (direccion + longitud) 'datos ingresados por el

var1= Eeprom_Read(contador) 'usuario

if var1 = $FF then

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

No comments

Multitech MTCBA-G-F User Manual Page 211