Is Number Odd?

[SteveB]

Here's another approach:

TestNumber as word
TestVal as word

If TestNumber = 0 then Zero
TestVal = 2
Test:
	If TestNumber = TestVal Then
		LCDOUT "Even"
		EndProgram
	Else
		If TestNumber = TestVal - 1 then
			LCDOUT "Odd"
			EndProgram
		Else
			TestVal = TestVal + 2
			Test
		EndiF
	Endif

Zero:
	LCDOUT "Zero"
	EndProgram

EndProgram:
end

[T.Jackson]

Here's another approach:

TestNumber as word
TestVal as word

If TestNumber = 0 then Zero
TestVal = 2
Test:
	If TestNumber = TestVal Then
		LCDOUT "Even"
		EndProgram
	Else
		If TestNumber = TestVal - 1 then
			LCDOUT "Odd"
			EndProgram
		Else
			TestVal = TestVal + 2
			Test
		EndiF
	Endif

Zero:
	LCDOUT "Zero"
	EndProgram

EndProgram:
end

Excellent! That's called a recursive method.

Trent Jackson