Newbe problem on first try

[RFKoenig]

Hello,
I'm finally starting to use all this fine equipment I've purchased. I have a EasyPIC V7 and I'm using MikroeBasic Pro for PIC.
I've typed the program on page 309 of Programming in BASIC and I've gotten several errors

while 'endless loop
if cnt = 50 then 'increment PORTB after 50 interrupts
PORTB = PORTB + 1 'Increment PORTB by 1
cnt = 0 'reset variable cnt
end if

wend
Messages 304 1) if is not a valid identifier
2)expected "end" but found "if"
3)expected "." but found "cnt"

I've typed in the program and triple checked my typing. What's wrong here, please help.

Bob Koenig

[jovana.medakovic]

Hello,

Your while loop is not correctly written. The correct way to use while statement is:

Code: Select all

while expression  
   statements
wend

and in your case, you don't have expression.

Try this:

Code: Select all

while TRUE 'endless loop
   if cnt = 50 then 'increment PORTB after 50 interrupts
      PORTB = PORTB + 1 'Increment PORTB by 1
      cnt = 0 'reset variable cnt
   end if
wend

Kind regards,
Jovana

[RFKoenig]

Thank you very much,
The expression, TRUE, wasn't in the book but it's now
A lesson learned. Thank you again, Jovana.