16f628 dahili osilatör kullanımı

[kadirafacan]

microcode studio kullanıyorum.16f628a ile dahili osilatör kullanmak ve o pinleri input olarak kullanmak istiyorum. Ancak gerekli kodlarda zorlanıyorum.
bir diğer konuda analog input için porta.0 kullanımı ADC kullanmak istiyorum ancak hata veriyor. Kodlar aşağıda yazılı yardımcı olabilirseniz sevinirim.



include "modedefs.bas"
TRISA=%11111
TRISB=%00000000
'-------------------------------------------------------------------
@ DEVICE pic16F628a, XT_OSC
'-------------------------------------------------------------------
DEFINE LCD_RSREG PORTB ' port Register select
DEFINE LCD_RSBIT 0 ' Register Select bit
DEFINE LCD_EREG PORTB ' Enable port
DEFINE LCD_EBIT 1 ' Enable bit
DEFINE LCD_DREG PORTB ' port selection
DEFINE LCD_DBIT 4
DEFINE ADC_BITS 10 ' Set number of bits in result
DEFINE ADC_CLOCK 3 ' Set clock source (rc = 3)
DEFINE ADC_SAMPLEUS 50 ' Set sampling time in microseconds
Define OSC 4

pause 20
B0 var WORD
ADCON1 = 2 ' PORTA is analog

basla:
ADCIN 0, B0' Read channel 0 to B0
pause 100
lcdout $fe,1
lcdout $fe,$d0
lcdout "menu set cancel?"
lcdout $FE,2
lcdout DEC4 B0
pause 100
GOTO BASLA

 

[musallim]

@ETE ile PBP gibi isimlerle pbp dersleri var.Daha önce bir kaç kez verildi.
Bul ve incele , çok yararı olacaktır.