单片机控制直流电机的VHDL程序

 

 CR0 DATA 20H
 CR1 DATA 21H
 GEN DATA 22H
 ORG 0000H
 LJMP MAIN
 ORG 000BH
 LJMP TT0
 ORG 001BH
 LJMP TT1
 ORG 0100H
MAIN: MOV TMOD,#22H
 MOV TH0,#06H
 MOV TL0,#06H
 MOV TH1,#0CEH
 MOV TL1,#0CEH
 MOV CR0,#20
 MOV CR1,#1
 MOV R0,CR0
 MOV R1,CR1
 SETB P0.0
 MOV P1,#0FFH
 SETB ET0
 SETB ET1
 SETB EA
 SETB TR1
 SETB TR0
LOOP: MOV A,P1
 MOV R2,A
 ANL A,#0FH
 MOV GEN,A
 MOV A,R2
 ANL A,#0F0H
 SWAP A
 MOV B,#10
 MUL AB
 ADD A,GEN
 MOV CR1,A
 AJMP LOOP
TT0: DJNZ R0,EXT0
 MOV R0,CR0
 SETB P0.0
 SETB TR1
EXT0: RETI
TT1: DJNZ R1,EXT1
 MOV R1,CR1
 CLR P0.0
 CLR TR1
EXT1: RETI
 END