RosettaCodeData/Task/Integer-sequence/8080-Assembly/integer-sequence-1.8080

8 lines
207 B
Plaintext

ORG 0100H
MVI A, 0 ; move immediate
LOOP: INR A ; increment
; call 'PRINT' subroutine, if required
JMP LOOP ; jump unconditionally
END