cont1 EQU 0X20
cont EQU 0X21
include<P16F877A.INC>
__CONFIG 0X3FFA
ORG 0
inizio: BSF STATUS,RP0
MOVLW 0XFF
MOVWF TRISC
MOVLW 0X00
MOVWF PORTD
BCF STATUS,RP0
MOVLW 0
ripeti: BTFSC PORTC,cont
GOTO test_ons
BCF cont1,0
GOTO ripeti
test_ons: BTFSS cont1,0
ADDLW 1
BSF cont1,0
MOVWF PORTD
GOTO ripeti
Y29udDEJRVFVIDBYMjAKY29udAlFUVUgMFgyMQoJaW5jbHVkZTxQMTZGODc3QS5JTkM+CkxJU1QgUD0xNkY4NzdBCl9fQ09ORklHIDBYM0ZGQQpPUkcgMAoKaW5pemlvOiBCU0YgU1RBVFVTLFJQMAoJCQlNT1ZMVwkwWEZGCgkJCU1PVldGCVRSSVNDCgkJCU1PVkxXCTBYMDAKCQkJTU9WV0YJUE9SVEQKCQkJQkNGIAlTVEFUVVMsUlAwCgkJCU1PVkxXCTAKcmlwZXRpOgkJQlRGU0MJUE9SVEMsY29udAoJCQlHT1RPCXRlc3Rfb25zCgkJCUJDRiAJY29udDEsMAoJCQlHT1RPCXJpcGV0aQp0ZXN0X29uczoJQlRGU1MJY29udDEsMAoJCQlBRERMVwkxCgkJCUJTRgkJY29udDEsMAoJCQlNT1ZXRglQT1JURAoJCQlHT1RPCXJpcGV0aQpFTkQJCQk=
cont1 EQU 0X20
cont EQU 0X21
include<P16F877A.INC>
LIST P=16F877A
__CONFIG 0X3FFA
ORG 0
inizio: BSF STATUS,RP0
MOVLW 0XFF
MOVWF TRISC
MOVLW 0X00
MOVWF PORTD
BCF STATUS,RP0
MOVLW 0
ripeti: BTFSC PORTC,cont
GOTO test_ons
BCF cont1,0
GOTO ripeti
test_ons: BTFSS cont1,0
ADDLW 1
BSF cont1,0
MOVWF PORTD
GOTO ripeti
END