Вс мар 04, 2018 15:48:45
#include "P16F84A.inc"
delaycount1 equ 0x1a
delaycount2 equ 0x1b
counter equ 0x1c
bsf STATUS,RP0
movlw 0x00
movwf TRISB
bcf STATUS,RP0
movlw 0xff
movwf PORTB
movlw 0x00
movwf counter
loop
call delay
incf counter,1
btfss counter,4
goto display
movlw 0x00
movwf counter
display
call segmente
movwf PORTB
goto loop
segmente
movf counter,0
addwf PCL,f
retlw b'10000000'
retlw b'11110010'
retlw b'01001000'
retlw b'01100000'
retlw b'00110010'
retlw b'00100100'
retlw b'00000100'
retlw b'11110000'
retlw b'00000000'
retlw b'00100000'
retlw b'10000000'
goto$
delay
movlw 0xff
movwf delaycount1
movlw 0xaa
delayloop1
movwf delaycount2
delayloop2
incfsz delaycount2,1
goto delayloop2
incfsz delaycount1,1
goto delayloop1
return
end
Вс мар 04, 2018 15:59:25
Вс мар 04, 2018 19:02:16