OSCCON可以控制內部振盪器的頻率

main.s
list p=12f1822, r=hex
#include <p12f1822.inc>
__config _CONFIG1, _FOSC_INTOSC & _WDTE_OFF & _MCLRE_OFF
__config _CONFIG2, _LVP_OFF
#define tmp1 0x20
#define tmp2 0x21
org 0x0000
goto start
org 0x0100
start:
banksel OSCCON
movlw b'01101010'
movwf OSCCON
banksel TRISA
clrf TRISA
loop:
banksel PORTA
bcf PORTA, 0
call delay
banksel PORTA
bsf PORTA, 0
call delay
goto loop
delay:
banksel tmp1
movlw 0xff
movwf tmp1
movwf tmp2
decfsz tmp1, f
goto $-1
decfsz tmp2, f
goto $-3
return
end
編譯
$ gpasm main.s
完成
