📄 宏晶步进驱动.lst
字号:
A51 MACRO ASSEMBLER 宏晶步进驱动 03/27/2007 09:42:18 PAGE 1
MACRO ASSEMBLER A51 V1.10
OBJECT MODULE PLACED IN 宏晶步进驱动.OBJ
ASSEMBLER INVOKED BY: C:\MANLEY\PMEDWIN\A51.EXE 宏晶步进驱动.ASM DB
LOC OBJ LINE SOURCE
1 ; AT89C2051步进电机驱动程序
0000 2 ORG 0000H ;程序执行开始地址
0000 020003 3 LJMP START ;跳到标号START执行
0020 4 state EQU 20H
0017 5 xadd equ 17h
0010 6 step equ 10h
00E1 7 dogcontr equ 0e1h
00B1 8 p3m0 equ 0b1h
00B2 9 p3m1 equ 0b2h
0091 10 p1m0 equ 91h
0092 11 p1m1 equ 92h
0003 E5E1 12 START: mov a,dogcontr
0005 20E71E 13 jb acc.7,lppp
0008 E4 14 clr a
0009 F520 15 mov state,a
000B 75B0FF 16 mov p3,#0ffh
000E 00 17 nop
000F E5B0 18 mov a,p3
0011 540C 19 anl a,#00001100b
0013 C3 20 clr c
0014 13 21 rrc a
0015 13 22 rrc a
0016 900048 23 mov dptr,#tab5
0019 93 24 movc a,@a+dptr
001A F510 25 mov step,a
001C 751700 26 mov xadd,#00h
001F 75E13C 27 mov dogcontr,#00111100b
0022 D200 28 setb state.0
0024 D208 29 setb 8
0026 30 lppp:
0026 31 loopp1:
32
0026 759100 33 mov p1m0,#00h
0029 7592FF 34 mov p1m1,#0ffh
002C 75B100 35 mov p3m0,#00h
002F 75B230 36 mov p3m1,#30h
0032 75E13C 37 mov dogcontr,#00111100b
38
0035 D2B1 39 setb p3.1 ;#0ffh ;非回位状态和开机时，系统读键
0037 D2B0 40 setb p3.0
0039 00 41 nop
003A 00 42 nop
003B A2B1 43 mov c,p3.1
003D 9205 44 mov state.5,c ;dir
003F A2B0 45 mov c,p3.0 ;free
0041 4009 46 jc main
0043 759000 47 mov p1,#00h
0046 80DE 48 jmp loopp1
49
0048 01020410 50 tab5:db 01h,02h,04h,10h ;细分数16，4，2，1
51
004C 52 main:
004C 00 53 nop
004D A2B7 54 mov c,p3.7 ;clk脉冲上升沿判定
004F 9201 55 mov state.1,c
0051 B000 56 anl c,/state.0
0053 5009 57 jnc clklp1
0055 7FFF 58 mov r7,#0ffh
A51 MACRO ASSEMBLER 宏晶步进驱动 03/27/2007 09:42:18 PAGE 2
0057 7E50 59 mov r6,#50h
0059 C208 60 clr 8
005B 12006E 61 lcall xy
005E A201 62 clklp1: mov c, state.1 ;clk
0060 9200 63 mov state.0,c
0062 DF04 64 djnz r7,lopp
0064 DE02 65 djnz r6,lopp
0066 D208 66 setb 8
0068 12008A 67 lopp: lcall outp3
006B 80B9 68 jmp loopp1
006D 22 69 ret
70
006E 30050C 71 xy:jnb state.5, outlp2 ;方向判别
0071 E517 72 mov a,xadd
0073 C3 73 clr c
0074 3510 74 addc a, step ;当前输出脉冲码地址
0076 543F 75 anl a,#00111111b
0078 F517 76 mov xadd, a
007A 020089 77 jmp outlp5
007D E517 78 outlp2: mov a,xadd
007F C3 79 clr c
0080 9510 80 subb a, step
0082 543F 81 anl a,#00111111b
0084 F517 82 mov xadd, a ;当前输出脉冲码地址
0086 020089 83 jmp outlp5
0089 22 84 outlp5:ret
85
008A E517 86 outp3:mov a,xadd ;根据当前输出脉冲码地址输出码型
008C A2E5 87 mov c,acc.5
008E 92B5 88 mov p3.5,c
0090 B0E4 89 anl c,/acc.4
0092 9203 90 mov state.3,c
0094 A2E4 91 mov c,acc.4
0096 B0E5 92 anl c,/acc.5
0098 7203 93 orl c,state.3
009A 92B4 94 mov p3.4,c
009C 543F 95 anl a,#00111111b
009E 9000B5 96 mov dptr,#tab
00A1 93 97 movc a,@a+dptr
00A2 30080C 98 jnb 8,loppp ;电流减半
00A5 C3 99 clr c
00A6 13 100 rrc a
00A7 A2E1 101 mov c,acc.1
00A9 92E0 102 mov acc.0,c
00AB A2E4 103 mov c,acc.4
00AD 92E1 104 mov acc.1,c
00AF 546F 105 anl a,#01101111b
00B1 106 loppp:
00B1 F590 107 mov p1,a
00B3 00 108 nop
00B4 22 109 ret
00B5 1D3D3F5E 110 tab: db 00011101b,00111101b,00111111b,01011110b
00B9 7C999AB5 111 db 01111100b,10011001b,10011010b,10110101b
00BD B6D1D2ED 112 db 10110110b,11010001b,11010010b,11101101b
00C1 E9EAE7E3 113 db 11101001b,11101010b,11100111b,11100011b
00C5 E3E7EAE9 114 db 11100011b,11100111b,11101010b,11101001b
00C9 EDD2D1B6 115 db 11101101b,11010010b,11010001b,10110110b
00CD B59A997C 116 db 10110101b,10011010b,10011001b,01111100b
00D1 5E3F3D1D 117 db 01011110b,00111111b,00111101b,00011101b
118
00D5 1D3D3F5E 119 db 00011101b,00111101b,00111111b,01011110b
00D9 7C999AB5 120 db 01111100b,10011001b,10011010b,10110101b
00DD B6D1D2ED 121 db 10110110b,11010001b,11010010b,11101101b
00E1 E9EAE7E3 122 db 11101001b,11101010b,11100111b,11100011b
00E5 E3E7EAE9 123 db 11100011b,11100111b,11101010b,11101001b
00E9 EDD2D1B6 124 db 11101101b,11010010b,11010001b,10110110b
A51 MACRO ASSEMBLER 宏晶步进驱动 03/27/2007 09:42:18 PAGE 3
00ED B59A997C 125 db 10110101b,10011010b,10011001b,01111100b
00F1 5E3F3D1D 126 db 01011110b,00111111b,00111101b,00011101b
127
00F5 1D3D3F5E 128 db 00011101b,00111101b,00111111b,01011110b
00F9 7C999AB5 129 db 01111100b,10011001b,10011010b,10110101b
00FD B6D1D2ED 130 db 10110110b,11010001b,11010010b,11101101b
0101 E9EAE7E3 131 db 11101001b,11101010b,11100111b,11100011b
0105 E3E7EAE9 132 db 11100011b,11100111b,11101010b,11101001b
0109 EDD2D1B6 133 db 11101101b,11010010b,11010001b,10110110b
010D B59A997C 134 db 10110101b,10011010b,10011001b,01111100b
0111 5E3F3D1D 135 db 01011110b,00111111b,00111101b,00011101b
136
0115 1D3D3F5E 137 db 00011101b,00111101b,00111111b,01011110b
0119 7C999AB5 138 db 01111100b,10011001b,10011010b,10110101b
011D B6D1D2ED 139 db 10110110b,11010001b,11010010b,11101101b
0121 E9EAE7E3 140 db 11101001b,11101010b,11100111b,11100011b
0125 E3E7EAE9 141 db 11100011b,11100111b,11101010b,11101001b
0129 EDD2D1B6 142 db 11101101b,11010010b,11010001b,10110110b
012D B59A997C 143 db 10110101b,10011010b,10011001b,01111100b
0131 5E3F3D1D 144 db 01011110b,00111111b,00111101b,00011101b
145
146
0135 00 147 nop
0136 00 148 nop
0137 0126 149 jmp loopp1
0200 150 org 200h
0200 00 151 nop
0201 00 152 nop
0202 00 153 nop
0203 0126 154 jmp loopp1
155
0300 156 org 300h
0300 00 157 nop
0301 00 158 nop
0302 00 159 nop
0303 0126 160 jmp loopp1
03F0 161 org 3f0h
03F0 00 162 nop
03F1 00 163 nop
03F2 00 164 nop
03F3 0126 165 jmp loopp1
03F0 166 org 3f0h
03F0 00 167 nop
03F1 00 168 nop
03F2 00 169 nop
03F3 0126 170 jmp loopp1
171
172 end
A51 MACRO ASSEMBLER 宏晶步进驱动 03/27/2007 09:42:18 PAGE 4
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
ACC. . . . . . . . D ADDR 00E0H A
CLKLP1 . . . . . . C ADDR 005EH A
DOGCONTR . . . . . N NUMB 00E1H A
LOOPP1 . . . . . . C ADDR 0026H A
LOPP . . . . . . . C ADDR 0068H A
LOPPP. . . . . . . C ADDR 00B1H A
LPPP . . . . . . . C ADDR 0026H A
MAIN . . . . . . . C ADDR 004CH A
OUTLP2 . . . . . . C ADDR 007DH A
OUTLP5 . . . . . . C ADDR 0089H A
OUTP3. . . . . . . C ADDR 008AH A
P1 . . . . . . . . D ADDR 0090H A
P1M0 . . . . . . . N NUMB 0091H A
P1M1 . . . . . . . N NUMB 0092H A
P3 . . . . . . . . D ADDR 00B0H A
P3M0 . . . . . . . N NUMB 00B1H A
P3M1 . . . . . . . N NUMB 00B2H A
START. . . . . . . C ADDR 0003H A
STATE. . . . . . . N NUMB 0020H A
STEP . . . . . . . N NUMB 0010H A
TAB. . . . . . . . C ADDR 00B5H A
TAB5 . . . . . . . C ADDR 0048H A
XADD . . . . . . . N NUMB 0017H A
XY . . . . . . . . C ADDR 006EH A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -