clear,clc,clfv0=15;h=10;%初速度、高度g=-98;k=-08;%重力加速度、衰减系数T=0;fort=0:005:25v=v0+g(t-T);%求速度y=h+v0(t-T)+g(t-T)^2/2;%求位移ify
#include <reg51h>
#define uchar unsigned char
#define uint unsigned int
//数码管 共阳
uchar code DSY_Table[]={
0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,
0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e,0xbf};
//音符对应的延时
uint code Tone_Delay_Table[]={
64021,64103,64260,64400,64524,64580,64684,64777,
64820,64898,64968,65030,65058,65110,65157,65178};
sbit BEEP=P3^2;
uchar KeyNo;
//生日快乐歌的音符频率表,不同的频率用延时值来表示
uchar code SONG_TONE[]={212,212,190,212,159,169,212,212,190,212,142,159,212,212,212,159,169,190,119,119,126,159,142,159,0};
uchar code SONG_LONG[]={9,3,12,12,12,24,9,3,12,12,12,24,9,3,12,12,12,12,9,3,12,12,12,24,0};
///////delay------
void DelayMS(uint x)
{
uchar i;
while(x--)for(i=0;i<120;i++);
}
void PlayMusic()
{
uint i=0,j,k;
while(SONG_LONG[i]!=0||SONG_TONE[i]!=0)
{
for(j=0;j<SONG_LONG[i]20;j++)
{
BEEP=~BEEP;
for(k=0;k<SONG_TONE[i]/3;k++);
}
DelayMS(80); //每个音符之间的时间间隔
i++;
}
}
void Keys_SCAN()
{
uchar k,t,key_state;
P1=0xff;
// while(1)
// {
t=P1;
if(t!=0xff)
{
DelayMS(10);
if(t!=P1)
{
switch(t){
case 0x87: BEEP=159 ; break; //1mie do
case 0x47: BEEP=142 ; break; //2mie re
case 0x27: BEEP=126 ; break; //3mie mi
case 0x17: BEEP=119 ; break; //4mie fa
case 0x0f: BEEP=212 ; break; //5mie sol
default: BEEP=169 ;
} // silu
}
// continue;
// key_state=~t;
// k=0;
// while(key_state!=0)
// {
// k++;
// key_state>>=1;
// }
// KeyNo=k;
// }
//return; //return 语句的加法很重要
}
//return;
//KeyNo=k;
}
void play_Tone() interrupt 1
{
TH0=Tone_Delay_Table[KeyNo]/256;
TL0=Tone_Delay_Table[KeyNo]%256;
BEEP=~BEEP;
}
//////MAIN/////////////////
void main()
{
//BEEP=0;
//while(1)
// P0=0xF0;
P0=0xbf;
PlayMusic();
DelayMS(1000);
DelayMS(1000);
TMOD=0x01;
IE=0x82;
while(1)
{
P1=0xff;
if(P1 != 0xff)
{
Keys_SCAN();
P0=DSY_Table[KeyNo];
TR0=1;
}
else
{
TR0=0;
}
DelayMS(2);
}
}
激光打标机打开时显示无法找到LMC1程序造成的四种原因可能是5V开关电源坏、控制卡与电脑连接USB数据线松动、控制卡驱动程序丢失、控制卡坏了。解决方法如下:
1、检查控制卡绿色指示灯是否亮灯,更换5V开关电源。
2、控制卡与电脑连接USB数据线重新插好。
3、打开电脑设备管理器看有无带问号的USB设备,重新安装控制卡驱动程序。
4、更换控制卡。激光打码机 *** 作简单,全自动激光设备,对于二维码条形码也轻松搞定,简单培训即可上手,如遇解决不了的问题欢迎致电当地专业工程师上门服务,减少人工成本,配有专业激光眼镜防止对眼睛损伤。
想要了解更多关于激光打码机的相关问题,推荐伟迪捷激光打码机。伟迪捷激光打码机是一种非接触式喷印方法,在标识质量、持久性和耗材量方面优于其他技术。伟迪捷激光喷码系列包括使用不同输出功率的 CO2激光喷码机、光纤激光打码机和 YAG 激光标识系统,可满足各种材质和应用的喷码需求。此外,伟迪捷还提供全面的激光配件产品组合,包括透镜和光束调整装置等配件。欢迎联系我们咨询激光打码机
以上就是关于哪位有用MatlaB模拟光纤激光器的程序全部的内容,包括:哪位有用MatlaB模拟光纤激光器的程序、求51单片机制作的激光竖琴程序 急啊.........、激光打标机打开时显示无法找到LMC1程序时应该怎么做等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)