I made a counter that has 10 binary digits, and every tick it goes up by 1, then moves the digit.





I think it is very satisfying to watch, seeing the numbers "push" each other.

And with less than 200 bytes, it is lightweight.
Tell me what you think! Idea

>>DOWNLOAD<< Smiling Cat
(2 versions, 1 is original and one is faster)
This should be about twice as fast and half the size.

Code:
ClrHome
Output(1,7,"Binary Counter
2^seq(X,X,~9,0->L1
For(A,1,1023
   2fPart(.5int(AL1
   For(I,10,1,~1
      Output(4,I+8,Ans(I
   End
End
mr womp womp wrote:
This should be about twice as fast and half the size.

Code:
ClrHome
Output(1,7,"Binary Counter
2^seq(X,X,~9,0->L1
For(A,1,1023
   2fPart(.5int(AL1
   For(I,10,1,~1
      Output(4,I+8,Ans(I
   End
End


Thanks, will definitely update. Didn't know this program could get smaller lol.
  
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
Page 1 of 1
» All times are UTC - 5 Hours
 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

 

Advertisement