TI-83+ Basic- Decimal/Binary converter

[Neo]

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                
End