Pic oscillator?

[Qacer]

By the way, I have another question. I was reading the PIC12F675 data sheet and it states that the following code will calibrate the internal PIC oscillator:

bsf STATUS, RP0 ;Bank 1
call 3FFh ;Get the cal value
movwf OSCCAL ;Calibrate
bcf STATUS, RP0 ;Bank 0

Am I doing the right thing using my BASIC coding?

changed 12F675.inc
__config _INTRC_OSC_CLKOUT & _WDT_ON & _MCLRE_ON & _CP_OFF


My next question is: how do I implement the calibration code in BASIC?

Is this right?

OSCVAL equ 3FFh ; assign 3FFh to OSCVAL
call OSCVAL
OSCCAL = OSCVAL ; ??


Thanks!

[mister_e]

just a tip
DEFINE OSCCAL_1K 1
DEFINE OSCCAL_2K 1

[Qacer]

just a tip
DEFINE OSCCAL_1K 1
DEFINE OSCCAL_2K 1

Thanks, mister_e! I knew I saw this somewhere. I started flipping through my manual and found it on page 12. One line is definitely much shorter than a couple.