您能帮忙编一个程序吗，就用89c51的汇编语言。

2024-12-31 18:36:11

推荐回答（2个）

回答1：

其实就是用51控制步进电机现在工作很忙找个程序你先借鉴下吧都带说明
StartEnd bit 01H ;起动及停止标志
MinSpd EQU 25 ;起始转动速度
MaxSpd EQU 100 ;最高转动速度
Speed DATA 23H ;流动速度计数
DjCount DATA 24H ;控制电机输出的一个值，初始为11110 111
Hidden EQU 10H ;消隐码
Counter DATA 57H ;显示计数器
DISPBUF DATA 58H ;显示缓冲区
ORG 0000H
AJMP MAIN
ORG 000BH
JMP DISP
ORG 001BH
JMP DJZD
ORG 30H
MAIN:
MOV SP,#5FH
MOV P1,#0FFH
MOV A,#Hidden
MOV DispBuf,A
MOV DispBuf+1,A
MOV DispBuf+2,A
MOV DjCount,#11110111B
MOV SPEED,#MinSpd;起始转动速度送入计数器
CLR StartEnd;停转状态
MOV TMOD,#00010001B ;
MOV TH0,#HIGH(65536-3000)
MOV TL0,#LOW(65536-3000)
MOV TH1,#0FFH;
MOV TL1,#0FFH
SETB TR0
SETB EA
SETB ET0
SETB ET1
LOOP: ACALL KEY ;键盘程序
JNB F0,m_NEXT1 ;无键继续
ACALL KEYPROC ;否则调用键盘处理程序
m_NEXT1:
MOV A,Speed
MOV B,#10
DIV AB
MOV DispBuf+5,B ;最低位
MOV B,#10
DIV AB
MOV DispBuf+4,B
MOV DispBuf+3,A
JB StartEnd,m_Next2
CLR TR1 ;关闭电机
JMP LOOP
ORL P1,#11110000B
m_Next2:
SETB TR1 ;启动电机
AJMP LOOP ;主程序结束
;---------------------------------------
D10ms:
⋯⋯
;---------延时程序,键盘处理中调用
KEYPROC:
MOV A,B ;获取键值
JB ACC.2,StartStop ;分析键的代码,某位被按下,则该位为1
JB ACC.3,KeySty
JB ACC.4,UpSpd
JB ACC.5,DowSpd
AJMP KEY_RET
StartStop:
SETB StartEnd 启动
AJMP KEY_RET
KeySty:
CLR StartEnd; ;停止
AJMP KEY_RET
UpSpd:
INC SPEED;
MOV A,SPEED
CJNE A,#MaxSpd,K1 ;到了最多的次数
DEC SPEED ;是则减去1，保证下次仍为该值
K1:
AJMP KEY_RET
DowSpd:
DEC SPEED
MOV A,SPEED
CJNE A,#MAXSPD,KEY_RET;不等（未到最大值），返回
MOV SPEED,#MinSpd;
KEY_RET:
RET
KEY:
⋯⋯获取键值的程序
RET
DjZd: ;定时器T1用于电机转速控制
PUSH ACC
PUSH PSW
MOV A,Speed
SUBB A,#MinSpd ;减基准数
MOV DPTR,#DjH
MOVC A,@A+DPTR
MOV TH1,A
MOV A,Speed
SUBB A,#MinSpd
MOV DPTR,#DjL
MOVC A,@A+DPTR
MOV TL1,A
MOV A,DjCount
CPL A
ORL P1,A
MOV A,DjCount
JNB ACC.7,d_Next1
JMP d_Next2
d_Next1:
MOV DjCount,#11110111B
d_Next2:
MOV A,DjCount
RL A
MOV DjCount,A ;回存
ANL P1,A
POP PSW
POP ACC
RETI
DjH: DB 76,82,89,95,100,106,110,115,119,123,12……
DjL: DB 0,236,86,73,212,0,214,96,163,165
⋯⋯
DISP: ;显示程序
POP PSW
POP ACC
⋯⋯
RETI
BitTab: DB 7Fh,0BFH,0DFH,0EFH,0F7H,0FBH
DISPTAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,88H,83H,0C6H,0A1H,86H,8EH,0FFH
END
程序分析
本程序主要由键盘程序、显示器程序、步进电机驱动程序三部份组成，主程序首先初始化各变量，将显示器的高3位消隐，步进电机驱动的各引脚均输出高电平，然后调用键盘程序，并作判断，如果有键按下，则调用键盘处理程序，否则直接转下一步。下一步是将当前的转速值转换为BCD码，送入显示缓冲区；接着判断StartEnd这个位变量，是“1”还是“0”，如果是“1”，则开启定时器T1，否则关闭定时器T1，为防止关闭时某一相线圈长期通电，因此，在关闭定时器T1时，将P1.0~P1.3均置高。至此，主程序的工作即结束。这里为简便起见，这里没有做高位“0”消隐的工作，即如果速度为10转/分，则显示值“010”，读者可以自行加入相关的代码来处理这一工作。
步进电机的驱动工作是在定时器T1的中断服务程序中实现的，由前述分析，每次的定时时间到达以后，需要将P1.0~P1.3依次接通，程度中用了一个变量DjCntr来实现这一功能，在主程序初始化时，该变量被赋予初值11110111B，进入到定时中断以后，将该变量取出送ACC累加器，并在累加器中进行左移，这样，该数值就变为11101111，然后将该数与P1相“与”，此时，P1.4即输出低电平，第二次进入中断时，先将该数取反，成为0001 0000，然后将该数与P1相“或”，这样，P1.4即输出高电平，关断了相应的线圈，然后将该数重新取出，并作左移，即 1110，1111右移成为1101 1111，将该数与P1相“与”，这样P1.5即输出低电平，依次类推，P1.7~P1.4即循环输出低电平。当这一数据变为01111111后，需要作适当的改动，将数据重新变回 1111 0111，进行第二次循环，相关代码，请读者自行分析。
定时时间又是如何确定的呢？这里用的是查表的方法，首先用Excel计算得出在每一种转速下的TH值和TL值，然后，分别放入DjH和DjL表中，在进入T1中断程序之后，将速度值变量Speed送入累加器ACC，然后减去基数25，使其基数从0开始计数，然后分别查表，送入TH1和TL1，实现重置定时初值的目的

回答2：

/*利用动态扫描和定时器1在数码管上显示
出从765432开始以1/10秒的速度往下递减
直至765398并保持显示此数，与此同时利
用定时器0以500MS速度进行流水灯从上至
下移动，当数码管上数减到停止时，实验
板上流水灯也停止然后全部开始闪烁，3秒
后（用T0定时）流水灯全部关闭、数码管上
显示出"HELLO"。到此保持住。*/

#include //52单片机头文件
#include //包含有左右循环移位子函数的库
#define uint unsigned int //宏定义
#define uchar unsigned char //宏定义
sbit dula=P2^6;
sbit wela=P2^7;
uchar code table[]={ //显示数据编码
0x3f,0x06,0x5b,0x4f,
0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,
0x39,0x5e,0x79,0x71,
0x76,0x79,0x38,0x3f,0};
uchar temp,t0,t1,bai,shi,ge,flag,flag1;
uint shu;
void init(); //函数声明
void display(uchar aa,uchar bb,uchar cc,uchar bai,uchar shi,uchar ge);
void delay(uint z) //延时子函数
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void main() //主函数
{
init();
while(1)
{
if(flag1!=1) //如果flagi不再等于1则显示数据
display(7,6,5,bai,shi,ge);
else
display(16,17,18,18,19,20); //否则显示hello
}
}

void init() //初始化函数
{
shu=432;
temp=0xfe;
P1=temp;
TMOD=0x11;
TH0=(65536-50000)/256; //定时器初始化
TL0=(65536-50000)%256;
TH1=(65536-50000)/256;
TL1=(65536-50000)%256;
EA=1;
ET0=1;
ET1=1;
TR0=1;
TR1=1;
}

void timer0() interrupt 1 //定时器0中断
{
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
t0++;
if(flag!=1) //flag不等于1时进行流水灯
{
if(t0==10)
{
t0=1;
temp=_crol_(temp,1);
P1=temp;
}
}
else //否则进行灯闪烁
{
if(t0%4==0) //小灯每200毫秒变化一次
P1=~P1;
if(t0==60)
{
TR0=0; //3秒后关闭定时器0，关闭灯，并置flag=1
P1=0xff;
flag1=1;
}
}
}

void timer1() interrupt 3 //定时器1中断函数
{
TH1=(65536-50000)/256;
TL1=(65536-50000)%256;
t1++;
if(t1==2)
{
t1=0;
shu--;
bai=shu/100;
shi=shu%100/10;
ge=shu%10;
if(shu==398) //当到398时把原来T0中的数清除，重新加裁初值让小灯闪烁
{
TR0=0;
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
TR0=1;
flag=1;
t0=0;
P1=0xff;
TR1=0;
}
}
}

void display(uchar aa,uchar bb,uchar cc,uchar bai,uchar shi,uchar ge) //显示子函数
{
dula=1;
P0=table[aa];
dula=0;
P0=0xff;
wela=1;
P0=0xfe;
wela=0;
delay(1);

dula=1;
P0=table[bb];
dula=0;
P0=0xff;
wela=1;
P0=0xfd;
wela=0;
delay(1);

dula=1;
P0=table[cc];
dula=0;
P0=0xff;
wela=1;
P0=0xfb;
wela=0;
delay(1);
dula=1;
P0=table[bai];
dula=0;
P0=0xff;
wela=1;
P0=0xf7;
wela=0;
delay(1);

dula=1;
P0=table[shi];
dula=0;
P0=0xff;
wela=1;
P0=0xef;
wela=0;
delay(1);

dula=1;
P0=table[ge];
dula=0;
P0=0xff;
wela=1;
P0=0xdf;
wela=0;
delay(1);
}