Is Number Odd?

[SteveB]

OK, This is better. It has to do one final check after the FOR..NEXT loop.

TestNumber as word
TestVal as word

For TestVal = 65534 to 2 step -2
	If (TestNumber + TestVal)= 0 Then
		LCDOUT "Even"
		EndProgram
	Else
		If (TestNumber + TestVal) + 1 = 0 then
			LCDOUT "Odd"
			EndProgram
		Else
	Endif
Next TestVal
If (TestNumber + TestVal) - 1 = 0 then
       LCDOUT "Odd"
       EndProgram
Else
       LCDOUT "Zero"
Endif
EndProgram:
end