162.asm

stepMotor.rar Proteus仿真51单片机

       ORG 0000H
       AJMP MAIN
       ORG 0030H
MAIN:  JNB P2.0,START
       JNB P2.2,START1
       SJMP MAIN
START: JNB P2.0,START
LOOP2: ;JNB P2.2,$
       MOV R2,#4
       MOV R3,#00
       MOV DPTR,#TAB
       LCALL LOOP
START1:JNB P2.2,START1
LOOP3: ;JNB P2.0,$
       MOV R2,#4
       MOV R3,#00
       MOV DPTR,#TAB1
       LCALL LOOP1
LOOP:  MOV A,R3
       MOVC A,@A+DPTR
       MOV P1,A
       LCALL DELAY
       JNB P2.1,STOP
       JNB P2.2,START1
       INC R3
       DJNZ R2,LOOP
       SJMP LOOP2
LOOP1: MOV A,R3
       MOVC A,@A+DPTR
       MOV P1,A
       LCALL DELAY
       JNB P2.1,STOP
       JNB P2.0,START
       INC R3
       DJNZ R2,LOOP1
       SJMP LOOP3
STOP:  JNB P2.1,STOP
       AJMP MAIN
DELAY: MOV R6,#6
D2:    MOV R4,#100
D1:    MOV R5,#250
       DJNZ R5,$
       DJNZ R4,D1
       DJNZ R6,D2
       RET
TAB:   DB 02H,04H,08H,01H
TAB1:  DB 01H,08H,04H,02H
       END