portA problem

[keymuu]

Hi!

I do not know what is going on!

PortB works just fine,
but
a) code does NOT toggle the test (test1, test2) pins
b) code does toggle the test pins

test1 = portA.1 and test2 = portA.2

'a)
loop:
pause 5
toggle test1
toggle test2

if portB = 0 then
portB = $ff
'// toggle test1
else
portB = 0
'// toggle test2
endif
goto loop:

'b)
loop:
pause 5
'// toggle test1
'// toggle test2

if portB = 0 then
portB = $ff
toggle test1
else
portB = 0
toggle test2
endif
goto loop:


Could somebody please try to explain how this is possible?
I'm puzzled, how is this possible?
Using picbasicpro 2.50

regards
key

[skimask]

I do not know what is going on!

http://www.picbasic.co.uk/forum/showthread.php?t=561
And it would REALLY help to know which PIC you are using...

[keymuu]

http://www.picbasic.co.uk/forum/showthread.php?t=561
And it would REALLY help to know which PIC you are using...

Thanks for the reply...

The prosessor is 18F4550

and before the the code there is:
trisA = 0
trisB = 0

So, actually i do not know if it is a portA problem or a TOGGLE failure?

Regards
Key

[skimask]

Re-read that linked post above...read it good, read it carefully...then re-read the 3rd paragraph...then re-read it again...

And if you're not sure if it's a TOGGLE failure or not, then don't use TOGGLE...
Surely you can come up with a different method of changing the state of a bit from one to the other and back again...

[keymuu]

Re-read that linked post above...read it good, read it carefully...then re-read the 3rd paragraph...then re-read it again...

And if you're not sure if it's a TOGGLE failure or not, then don't use TOGGLE...
Surely you can come up with a different method of changing the state of a bit from one to the other and back again...

...when I add ADCON1 = 7 to the code after trisA and trisB it does not change the outcome. Here is the code:

DEFINE OSC 48
'
test1 var PORTA.1
test2 var PORTA.2

trisA = 0
trisB = 0
ADCON1 = 7

ProgramStart:

pause 5
toggle test1 '// comment -- THIS DOES NOT WORK!
toggle test2 '// these two lines AND

if portB = 0 then
portB = $ff
'//toggle test1 '// uncomment -- THIS WORKS
else
portB = 0
'//toggle test2 '// uncomment
endif

goto ProgramStart

Depending where toggle is it either work or does not work. If you have the possibility to test this, please let me know if works on your pic.

Thank you in advance

Regards
Key

[skimask]

...when I add ADCON1 = 7 to the code after trisA and trisB

1/2 way there...keep reading and re-reading...
And again...read the PBP manual about TOGGLE. Not that TOGGLE is a bad command, but there are other ways to flip a bit...

Anybody got the link to the R-M-W 'writeup' thread here?
The PIC is running 48Mhz here (apparently). I see possible R-M-W issues...

Besides that...look at your code...There are logical flow flaws (is that the correct way to put that?) in it...
How do you know TOGGLE isn't actually working the way it should?
Can you see that fast? I can't...