Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include "p10f322.inc" ; processor specific variable definitions
- __CONFIG _FOSC_INTOSC & _WDTE_OFF & _MCLRE_OFF & _LVP_OFF & _CP_OFF & _BOREN_OFF
- #DEFINE LED1 LATA,0
- #DEFINE LED2 LATA,1
- CBLOCK 0x40 ; blok definice proměnných (20h-7Fh, 96 bytes)
- DELAY,D1,D2,D3,D4 ; pro zpožďovací smyčky
- ENDC
- org 0x0
- movlw b'00010000' ; for 250-kHz (default 8MHz -1100-00)
- movwf OSCCON ; nastavení vnitřního oscilátoru
- clrf LATA ; init LATA
- clrf ANSELA ; xxxxxRA<2:0>; 1=an, 0=dig (default -----111)
- clrf TRISA
- MAIN bsf LED1
- bsf LED2
- call WAIT100ms
- call WAIT100ms
- call WAIT100ms
- call WAIT100ms
- bcf LED1
- bcf LED2
- call WAIT100ms
- call WAIT100ms
- call WAIT100ms
- call WAIT100ms
- goto MAIN ; nekonečná smyčka
- WAIT100ms movlw 0xE1
- movwf D1
- movlw 0x05
- movwf D2
- decfsz D1,F
- goto $+2
- decfsz D2,F
- goto $-3
- return
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement