home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s225 / 1.ddi / SHUNDA.ASM < prev    next >
Encoding:
Assembly Source File  |  1980-01-01  |  206 b   |  18 lines
  1.     ORG    0000H
  2.     AJMP    MAIN
  3.     ORG    0040H
  4. MAIN    CLR    00H
  5.     MOV    R7,#09H
  6.     MOV    R0,#40H
  7.     MOV    R1,#41H
  8.     MOV    A,@R0
  9.     MOV    R2,A
  10.     CLR    C
  11.     SUBB    A,@R1
  12.     MOV    A,R2
  13.     JNC    L1
  14.     SETB    00H
  15.     XCH    A,@R1
  16.     MOV    @R0,A
  17. L1    MOV    A,@R1
  18.