+- Qbasicnews.com (http://qbasicnews.com/newforum)
+-- Forum: General (http://qbasicnews.com/newforum/forum-6.html)
+--- Forum: General/Misc (http://qbasicnews.com/newforum/forum-18.html)
+---- Forum: General Programming (http://qbasicnews.com/newforum/forum-20.html)
+---- Thread: TI-83+ Basic- Decimal/Binary converter (/thread-9949.html)
TI-83+ Basic- Decimal/Binary converter - Skyler - 03-27-2007
Okay, I'm taking a digital Circuits course, so I figured I'd cook up a TI-BASIC converter, since the function wasn't already built in.
If only it were that easy.
This is what I have so far for the dec to bin part:
Code:
Lbl B
Disp "DECIMAL:"
Input D
For(X,8,0,-1)
If (D-(2^X))>0
Then
O+(10^X)->O 'That's a Store In command, not a minus and a greater than.
D-2^X->D
End 'For the IF
End 'For the For loopMy problem is that a decimal 1 comes out as 0, and a decimal 255 comes out as 11111110. So does 256.
What am I doing wrong? Or is this just not possible?
Re: TI-83+ Basic- Decimal/Binary converter - Neo - 03-27-2007
Code:
Lbl B
Disp "DECIMAL:"
Input D
0->O
For(X,8,0,-1)
If (D-(2^X))>=0 '#### <- you forgot the equal sign here
Then
O+(10^X)->O
D-2^X->D
End
EndTI-83+ Basic- Decimal/Binary converter - Skyler - 03-27-2007
:oops: DUH!!!! Of course!
Now it works. Thanks Neo!
