16F1786 issue with simple program.

[luxornet]

I try to compile this with PicBasic 3.0.7:

'PIC16F1786
#CONFIG
    __config _MCLRE_OFF
#ENDCONFIG

for PIC16F176 but I got an error:
[ASM ERROR] CODE_1.ASM (33) : Argument out of range (not a valid register address)
If I compile for PIC16F690 or other, the error doesn't occur.
I have no idea what happened.

[HenrikOlsson]

Hi,
The 16F1786 has more than one config register while the 16F690 (and probably the "others" you've tried) doesn't.

#CONFIG
    __config _CONFIG1, _MCLRE_OFF
#ENDCONFIG

Just remember that when you include a #CONFIG/#ENDCONFIG as above it replaces ALL of the PBP default ones, reverts to the devices specific HARDWARE defaults and THEN sets the bits you include in your block. I usually copy the default PBP ones and the changed/add what I need.

For the 16F1786 the PBP defaults are:

  #CONFIG
        __config _CONFIG1, _FOSC_INTOSC & _WDTE_ON & _PWRTE_ON &  _MCLRE_ON & _CP_OFF & _CPD_OFF & _BOREN_OFF & _CLKOUTEN_OFF
        __config _CONFIG2, _PLLEN_OFF & _LVP_OFF & _VCAPEN_OFF
  #ENDCONFIG

/Henrik.

[midali]

Try this:

#CONFIG
         __MCLRE_OFF  
#ENDCONFIG

[Heckler]

Here is one way to handle configs for multiple processsors...

    #IF __PROCESSOR__ = "16F1828"
        #CONFIG
        __CONFIG _CONFIG1, _FOSC_INTOSC & _WDTE_ON & _PWRTE_OFF & _MCLRE_OFF & _CP_OFF & _CPD_OFF & _BOREN_OFF & _CLKOUTEN_OFF & _IESO_OFF & _FCMEN_OFF
        __CONFIG _CONFIG2, _WRT_OFF & _PLLEN_OFF & _STVREN_OFF & _BORV_25 & _LVP_OFF
        #endconfig
    #ELSE
        #IF __PROCESSOR__ = "16F690"
            #CONFIG
            __CONFIG _INTRC_OSC_NOCLKOUT & _WDT_ON & _PWRTE_OFF & _MCLRE_OFF & _CP_OFF & _CPD_OFF & _BOD_OFF & _IESO_OFF & _FCMEN_OFF
            #endconfig
        #ELSE
            #ERROR "Program does not support " + __PROCESSOR__
        #ENDIF
    #ENDIF

    #msg "compiling for target " + __PROCESSOR__

it dosen't paste in a code window very well (due to line wrap) but you should get the idea.
try and copy/paste it into your IDE

[luxornet]

Thank you very much HenrikOlsson and Heckler.
I can compile now my PIC16F1786. Because you provide me a lot of information about this micro, I decided to read (finally) some information provided in PicBasic\DEVICE folder.
Thank you again.

[luxornet]

I figure a HelloWorld program and works fine in Proteus Simulator.
But I stuck when I try to read AN0 analog port.
The PicBasic ADCIN 0, something return "0".
No better luck when I try to explicitly read AN0, like bellow:

'PIC16F1786
    #CONFIG
        __config _CONFIG1, _FOSC_INTOSC & _WDTE_ON & _PWRTE_ON &  _MCLRE_OFF & _CP_OFF & _CPD_OFF & _BOREN_OFF & _CLKOUTEN_OFF
        __config _CONFIG2, _PLLEN_OFF & _LVP_OFF & _VCAPEN_OFF
    #ENDCONFIG
    
    include "MODEDEFS.BAS"
    
    DEFINE OSC 8
    OSCCON.6 = 1
    OSCCON.5 = 1
    OSCCON.4 = 1
    OSCCON.3 = 0
    OSCCON.1 = 1

    TRISA = %00001001    'AN0 is Analog
    TRISB = %11000000
    TRISC = %00000000

    
    ANSELA = %00001001 'digital; AN0 is analog
    ANSELB = %00001001

    'Configure VREF:
'    ADCON1.1 = 0
'    ADCON1.0 = 1 'VREF+ is connected to VREF+ pin
    ADCON1.1 = 0
    ADCON1.0 = 0 'VREF+ is connected to VDD

    ADCON1.2 = 0 ' VREF- is connected to VSS
    
    'ADC result
    ADCON0.7 = 1 ' 10 bits result
    ADCON0.0 = 1 ' ADC is enabled   
    
    ADCON1.6 = 1 'FOSC/64
    ADCON1.5 = 1
    ADCON1.4 = 0
    
    CM1CON0.7 = 0'comparator is disabled
    CM2CON0.7 = 0'comparator is disabled
    
    DACCON0.7 = 0 'DAC is disabled
    
    'disable intrerupt:
    INTCON = 0'intrerupt is disabled
    
    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 


'-[The connection between the LCD display and the microcontroller is as follows:]-
    ' Define LCD pins
    DEFINE LCD_DREG PORTC 'LCD data port 
    DEFINE LCD_DBIT 0 'LCD data starting bit 0 or 4 
    DEFINE LCD_RSREG PORTA 'LCD register select port 
    DEFINE LCD_RSBIT 2 'LCD register select bit       - pinul RS
    DEFINE LCD_EREG PORTA 'LCD enable port 
    DEFINE LCD_EBIT 7 'LCD enable bit                 - pinul E
'    DEFINE LCD_RWREG PORTC 'LCD read/write port 
'    DEFINE LCD_RWBIT 6 'LCD read/write bit 
    DEFINE LCD_BITS 4 'LCD bus size 4 or 8 
    DEFINE LCD_LINES 2 'Number lines on LCD 
    DEFINE LCD_COMMANDUS 2000 'Command delay time in us 
    DEFINE LCD_DATAUS 50 'Data delay time in us 

;-----[Variables]----------------------------------------------------
    Thermocouple  var word
    adval	      var	word    
;----[Initialization]-----------------------------------------------------------

'---[Hello World]---------------------------------------------------------------
Afisaj:
    LCDOUT $FE,1 ' Clear LCD
    LCDOUT $FE,2 ' Home cursor
    'Display initial screen
    lcdout $FE,2,"PIC16F1786",$fe, $C0,"Luxornet@2016"    
    pause 1000
    LCDOUT $FE,1 ' Clear LCD
    LCDOUT $FE,2 ' Home cursor

;----[Main program loop]--------------------------------------------------------
Main:
    'ADCIN 0, Thermocouple

'  	ADCON0 = %10000001	' Configure and turn on A/D Module

  	ADCON0.7 = 1 '10 bits result
	pause 10
    ADCON0.2 = 0	' use channel 0
    ADCON0.3 = 0
    ADCON0.4 = 0
    ADCON0.5 = 0
    ADCON0.6 = 0
    
    ADCON0.0 = 1 'ADC is enabled 
    
    ADCON0.1 = 1    ' Start Conversion   'Bit GO/DONE  

Voltmeter1:
    Pause 100
	If ADCON0.1 = 1 Then Voltmeter1	' Wait for low on bit-1 of ADCON0, conversion finished

	adval.highbyte = ADRESH	' Move HIGH byte of result to adval
	adval.lowbyte = ADRESL	' Move LOW byte of result to adval

    lcdout $FE,2,"Thermocouple: ",dec adval,"   "
    pause 500
   
GOTO Main