motor.asm

用Proteus和Keil联调控制双步进电机正

ORG 0000H
LJMP START
ORG 0030H
START:
LOOP: MOV A,#0
      MOV P1,A
      JB P3.3,LOOP1
      LJMP LP4
LOOP1:MOV A,#0
      MOV P1,A
      JB P3.4,LOOP2
      LJMP LP3
LOOP2:MOV A,#0
      MOV P1,A
      JB P3.5,LOOP3
      LJMP LP2
LOOP3:MOV A,#0
      MOV P1,A
      JB P3.6,LOOP4
      LJMP LP1
LOOP4:MOV A,#0
      MOV P1,A
      JB P3.2,LOOP5
      LJMP LP5
LOOP5:MOV A,#0
      MOV P1,A
      JB P3.1,LOOP
      LJMP LP6
LP1: CJNE R1,#8,LB1
LB1: MOV DPTR,#ADX
     MOV A,R1
     MOVC A,@A+DPTR
     MOV P1,A
     LCALL DISPY
     JB P3.6,L1
     INC R1
     CJNE R1,#8,SK2
     MOV R1,#0  
SK1: LJMP LB1 
SK2: JB P3.5,SK6
     MOV A,R1
     LJMP LP2
SK6: MOV A,R1
     LJMP SK1
L1:  MOV A,R1
     MOV R2,A
     LJMP LOOP
LP2: CJNE R2,#0,LB2
     MOV R2,#8
LB2: MOV DPTR,#ADX
     DEC R2
     MOV A,R2
     MOVC A,@A+DPTR
     MOV P1,A
     LCALL DISPY
     JB P3.5,L2 
     CJNE R2,#0,SK4
     MOV R2,#8
SK3: SJMP LB2
SK4: JB P3.6,SK5
     MOV A,R2
     SJMP LP1
SK5: MOV A,R2
     SJMP SK3
L2: MOV A,R2
     MOV R1,A
     LJMP LOOP
LP3: CJNE R3,#8,LB3
LB3: MOV DPTR,#ADY
     MOV A,R3
     MOVC A,@A+DPTR
     MOV P1,A
     LCALL DISPY
     JB P3.4,L3
     INC R3
     CJNE R3,#8,SK8
     MOV R3,#0  
SK7: SJMP LB3 
SK8: JB P3.3,SK9
     MOV A,R3
     SJMP LP4
SK9: MOV A,R3
     SJMP SK7
L3:  MOV A,R3
     MOV R4,A
     LJMP LOOP
LP4: CJNE R4,#8,LB4
     MOV R4,#4
LB4: MOV DPTR,#ADY
     DEC R4
     MOV A,R4
     MOVC A,@A+DPTR
     MOV P1,A
     LCALL DISPY
     JB P3.3,L4 
     CJNE R4,#0,SK11
     MOV R4,#8
SK10: SJMP LB4
SK11: JB P3.4,SK12
     MOV A,R4
     SJMP LP3
SK12: MOV A,R4
     SJMP SK10
L4:  MOV A,R4
     MOV R3,A
     LJMP LOOP
LP5: CJNE R0,#8,LB5
LB5: MOV DPTR,#ADXY
     MOV A,R0
     MOVC A,@A+DPTR
     MOV P1,A
     LCALL DISPY
     JB P3.2,L5
     INC R0
     CJNE R0,#8,SK14
     MOV R0,#0  
SK13: LJMP LB5 
SK14: JB P3.1,SK15
     MOV A,R0
     LJMP LP6
SK15: MOV A,R0
     LJMP SK13
L5:  MOV A,R0
     MOV R5,A
     LJMP LOOP
LP6: CJNE R5,#0,LB6
     MOV R5,#8
LB6: MOV DPTR,#ADXY
     DEC R5
     MOV A,R5
     MOVC A,@A+DPTR
     MOV P1,A
     LCALL DISPY
     JB P3.1,L6 
     CJNE R5,#0,SK17
     MOV R5,#8
SK16: SJMP LB6
SK17: JB P3.2,SK18
     MOV A,R5
     LJMP LP1
SK18: MOV A,R5
     SJMP SK16
L6: MOV A,R5
     MOV R0,A
     LJMP LOOP
/*DISPY: MOV R6,#0FAH
  DE1: MOV R7,#0A6H
  DE2: NOP
       DJNZ R7,DE2
       DJNZ R6,DE1
       RETI*/
DISPY: MOV DPTR,#TAB
       MOV A,P2
       ANL A,#1FH
       MOVC A,@A+DPTR
  DE:  MOV R6,#06H
  DE1: MOV R7,#0FFH
       DJNZ R7,$
       DJNZ R6,DE1
       DJNZ ACC,DE
       RETI
;ADX:DB 03H,06H,0CH,09H
;ADY:DB 30H,60H,0C0H,90H
ADX:DB 01H,03H,02H,06H,04H,0CH,08H,09H
ADY:DB 10H,30H,20H,60H,40H,0C0H,80H,90H
ADXY:DB 11H,33H,22H,66H,44H,0CCH,88H,99H
TAB:DB 04H,08H,0CH,10H,14H,18H,1CH,20H 
    DB 24H,28H,2CH,30H,34H,38H,3CH,40H
    DB 44H,48H,4CH,50H,54H,58H,5CH,60H
    DB 64H,68H,6CH,70H,74H,78H,7CH,80H

    RETI
 END