Problem with A port on 18F2550

[NL2TTL]

I have a problem with my a port on the 18F2550 device. When i use this code the a port will toggle all the time. What do I wrong.

I have the following code:

Include "modedefs.bas"

Define OSC 20
DEFINE DEBUG_REG PORTC
DEFINE DEBUG_BIT 7
DEFINE DEBUG_BAUD 9600
DEFINE DEBUG_MODE 1

LEDGroen VAR PORTB.7
LEDRood VAR PORTA.2


Relais1 VAR PORTA.5 ' Relaiscontact'

LATA = 0


ADCON1 = 7 'poort a op digitaal
'ADCON1 = 0 'poort a op analoog

ADCON0 = 0
ADCON2 = 0

'CMCON = 7


TRISB.3 = 1 'Input
TRISB.2 = 1 'Input
TRISA.1 = 1 'Input

TRISA = 255


DEFINE ADC_BITS 8 ' Set number of bits in result (8, 10 or 12)
DEFINE ADC_CLOCK 2 ' Set clock source (rc = 3)
DEFINE ADC_SAMPLEUS 50 ' Set sampling time in microseconds

Init:

HIGH LEDGroen
PAUSE 500
LOW LEDGroen
Pause 500
HIGH LEDRood
PAUSE 500
LOW LEDRood
Pause 500
Debug "->Start<-", 13,10

Goto Main


Main:
High Relais1
Goto Main:

[skimask]

I have a problem with my a port on the 18F2550 device. When i use this code the a port will toggle all the time. What do I wrong.
I have the following code:........................

Since your last thread was about 3v3 PICs, I have to ask...
What is your power supply? And are you running a PIC18F2550 or PIC18LF2550?

And what's this line for?
---------Baudrate CON T9600 ' Voor communicatie met RFID-module---------

[NL2TTL]

This is for a other project, it's a normal 5V operation system.
The line where you talk about is not needed.

[mister_e]

make sure that there's no possible Brown-out reset @20MHz and @3 V. Usually the datasheet show the minimum voltage for a given crystal speed.

EDIT: nevermind.. misread your post.

well you'll need to post your Config Fuses line OR send your compiled .HEX files.

Make sure your ADCON setting is good as well.

[NL2TTL]

I Use the following A ports:

Input1 VAR PORTA.0 'input
Relais1 VAR PORTA.5 'output
Data_In VAR PORTA.4 'serial data
LEDRood VAR PORTA.2 'output

I use the following adcon settings:

LATA = 0
ADCON1 = 7 'poort set as digital

ADCON0 = 0
ADCON2 = 0
TRISA.1 = 1 'Input

TRISA = 255

Fuses are set:

http://www.ttalens.com/images/picbasic/fuses1.JPG

[skimask]

Does the ">Start<" go out the serial port about every 2 seconds or so?