led_jianming.lst

义隆单片机控制8个LED的渐明渐暗

     1                     ;===============================================
     2                     ;   晶振4MHz，周期为4个时钟，指令周期为1us
     3                     ;===============================================
     4                     
     5                     ;---------------定义变量------------------------- 
     6       0003                       r3       ==  0x03
     7       0005                       port5    ==  0x05
     8       0010                       temp     ==  0x10
     9       0015                       flag1    ==  0x15
    10                     ;---------------程序入口地址--------------------------            
    11                                  
    12                                  org    0x00     ;复位入口地址
    13 00000 1410                       jmp    main
    14                                  
    15                     ;---------------初始化程序------------------------------            
    16                                 org    0x10     ;程序入口地址
    17 00010                   main:                    
    18 00010 1800                      mov   a,@0x00
    19 00011 0005                      iow   port5      ;p5口作为输出
    20 00012 0080                      clra
    21 00013 000E                      iow   0x0e
    22 00014 00D0                      clr   temp       ;计数器清零
    23 00015 00D5                      clr   flag1      ;标志位清零
    24                     ;----------------主程序------------------------------
    25 00016                    loop:
    26 00016 1030                      call  light_adj  ;调节LED亮度值
    27 00017 1019                      call  light_disp  ;LED显示
    28 00018 1416                      jmp   loop
    29                     ;----------------LED显示-----------------------------
    30 00019               light_disp:
    31 00019 1800                      mov   a,@0x00    ;LED输出低电平
    32 0001A 0045                      mov   port5,a
    33                                 
    34 0001B 0410                      mov  a,temp      ;LED100等份的变量值
    35 0001C 0053                      mov  0x13,a
    36 0001D                       d1:
    37 0001D 1819                      mov  a,@25        ; 延时25*4us=0.1ms
    38 0001E 0054                      mov  0x14,a
    39 0001F                       d2:
    40 0001F 0000                      nop
    41 00020 05D4                      djz  0x14
    42 00021 141F                      jmp  d2            ;4个指令周期*4个时钟/4MHZ=4us
    43 00022 05D3                      djz  0x13
    44 00023 141D                      jmp  d1
    45 00024 04C5                      com  port5
    46                                 
    47 00025 1864                      mov  a,@0x64
    48 00026 0110                      sub  a,temp
    49 00027 0053                      mov  0x13,a
    50 00028                       d3:
    51 00028 1819                      mov  a,@25
    52 00029 0054                      mov  0x14,a
    53 0002A                       d4:
    54 0002A 0000                      nop
    55 0002B 05D4                      djz  0x14
    56 0002C 142A                      jmp  d4
    57 0002D 05D3                      djz  0x13
    58 0002E 1428                      jmp  d3
    59 0002F 0012                      ret
    60                                 
    61 00030               light_adj:
    62 00030 0C15                      jbc  flag1,0
    63 00031 143A                      jmp  light_dec
    64 00032 0550                      inc  temp
    65 00033 1864                      mov  a,@0x64
    66 00034 0110                      sub  a,temp
    67 00035 0E83                      jbs  r3,2
    68 00036 1442                      jmp  light_over
    69 00037 0A15                      bs   flag1,0
    70 00038 0883                      bc   r3,2
    71 00039 1442                      jmp  light_over
    72 0003A               light_dec:
    73 0003A 01D0                      dec  temp
    74 0003B 1801                      mov  a,@0x01
    75 0003C 0110                      sub  a,temp
    76 0003D 0E83                      jbs  r3,2
    77 0003E 1442                      jmp  light_over
    78 0003F 00D0                      clr  temp
    79 00040 0815                      bc   flag1,0
    80 00041 0883                      bc   r3,2
    81 00042               light_over:
    82 00042 0012                      ret  
    83                                 end          
  0 Error(s), 0 Warning(s), 0 User Message(s)