ASMB,A,B,L

* Binary counter on the S register
* by Tim Riker <Tim@Rikers.org>
* public domain

      HED ** binary counter **
      ORG 100B

* could CLA here, but stay small. =)
LOOPA INA          Increment A
      OTA 1        Write to S
      JMP LOOPA    Jump to the increment loop