?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.         ADD A,E
  2.         JR NC,1F
  3.         INC D
  4. 1       LD E,A
  5. 2       LD B,4
  6.         LD A,(DE)
  7.         OUT (152),A
  8.         DJNZ 2B
  9.  
  10.         MACRO zing
  11.             DUP 2
  12.                 JR 1F
  13. 1               DJNZ    1B
  14.             EDUP
  15.         ENDM
  16.  
  17.         .4 zing
  18.