home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s210 / 1.ddi / DEMO51.LST < prev   
Encoding:
File List  |  1979-12-31  |  1.0 KB  |  30 lines
  1. The Cybernetic Micro Systems 8051 Family Assembler, Version 3.03   Page   1
  2.                                                                    01-01-80
  3.  
  4.  
  5.                 ; DEMO51.ASM    8051 SOURCE CODE
  6.                 ;
  7.  4869 =         Abc EQU 'Hi'    ;string value equate
  8.  00BD =         Val1 EQU 0BDH   ;hexadecimal constant
  9.  004B =         Val2 EQU 75     ;decimal constant
  10.                 ;
  11.  0025           ORG 25H
  12.                 ;
  13.                 START:
  14.  0025 2465      add A,#65H
  15.  0027 0532      inc 32H
  16.  0029 853225    mov 25H,32H     ;COPY (32) TO (25)
  17.  002C 904869    mov DPTR,#Abc   ;16 BIT DATA, MSB FIRST !!
  18.  002F B41BF3    cjne A,#27,START  ;LOOP RELATIVE TO START
  19.  0032 C3        clr C
  20.  0033 94BD      subb A,#Val1
  21.  0035 20D202    jb OV,NEXT      ;JUMP IF OVERFLOW FLAG SET
  22.  0038 B24B      cpl Val2        ;BIT ADDRESS
  23.                 ;
  24.                 NEXT:
  25.  003A B04B      anl C,/Val2
  26.  003C 60E7      jz  START
  27.  0025           END START       ;STARTING ADDRESS
  28.  
  29.  00 Errors  (0000)
  30.