171
APÉNDICE 1: CÓDIGO FUENTE PIC 18F452
Para el desarrollo del programa del microcontrolador PIC18F452 se utilizó el
programa MikroBasic, MikroElektronika Basic Compiler para Microchip PIC
microcontrollers Version: 5.0.0.2. Para mayor información de la sintaxis de los
comandos utilizados puede visitar la página de Internet http://www.mikroe.com/en/.
Program TESIS 'Declaración de Variables Globales
dim cod as string[20]
dim comparacion as integer
dim enter as byte
dim aux1 as byte
dim ingresodatos, passw as string [32]
dim aa, bb, cc as byte
dim respuesta as string [32]
dim respu, tamanorespuesta, validacionplanta,auxil as byte
dim correoaux as byte
sub procedure retardo() 'Procedimiento que provee un retardo de 0.5 segundos
Delay_ms(500)
end sub
sub procedure espacio () ’Procedimiento diseñado para enviar 25 espacios
dim var1 as byte 'de retorno de carro para limpiar pantalla de
var1 = 0 'HyperTerminal
Comentarios a estos manuales