DECLARASION DE INICIO DEL PROGRAMA

 

# INCLUDE <16 F84A H>.

# FUSES XT, NOWOT, NOPUT, NOprotect.

# USE DELAN (CLOCK = 4000000).

# BYTE TRIS A = 0x85.

# BYTE PORT A =0x05.

# BYTE TRIS B = 0x86.                                                           l = ENCENDIDO.

# BYTE PORT B = 0x06.                                                        0 = APAGADO.

 

 

EXPLICACION.

 

A8 A7 A6 A5 A4 A3 A2 A1 A0

0

x

0

0

0

0

0

0

0

 

 

PORT B = "00000000"

PORT B = "0000000l"

PORT B = "000000l0"

 

PROGRAMA PRINCIPAL

VOID MAIN (VOID)

 

INT A;

TRIS B = "00000000"

PORT B = "00000000"

      A = 1000;

 

WHILE (1)

 

DELAY_MS (1000)

PORT B = " 0000000l"

DELAY - MS (1000)

PORT B = "00000000";