[资料下载]

51单片机心电图程序

问答对人有帮助，内容完整，我也想知道答案 0 #include *it ADDR0 = P1^0; it ADDR1 = P1^1; it ADDR2 = P1^2; it ADDR3 = P1^3; **it ENLED = P1^4; typedef unsigned int uint16; typedef unsigned char uint8; typedef unsigned long uint32; uint8 l,h,f,d; code uint8 dx[]={0xFF,0x99,0x00,0x00,0x00,0x81,0xC3,0xE7,0xff}; code uint8 xx[]={0xFF,0xFF,0xDB,0x81,0x81,0xC3,0xE7,0xFF}; code uint16 zz[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xa7,0xa1,0x86,0x8e}; //------ÑÓÊ±-------- ys(uint16 a) { static uint16 i,j; for(i=0;i for(j=0;j<50;j++){ } } } //------LEDµÆ------- led8() { ADDR3 = 1; ENLED = 0; ADDR0 = 0; ADDR1 = 1; ADDR2 = 1; } //------ÊýÂë¹Ü------ leds() { ADDR3 = 1; ENLED = 0; } //------LEDX-------- ledx() { ADDR3 = 0; ENLED = 0; } //-------------´óÐÄÉÁ--------- dxf(uint8 a){ static uint8 K = 0; if(K == 0){ADDR0 = 0;ADDR1 = 0;ADDR2 = 0;P0 = dx[K];K++;};ys(a); if(K == 1){ADDR0 = 1;ADDR1 = 0;ADDR2 = 0;P0 = dx[K];K++;};ys(a); if(K == 2){ADDR0 = 0;ADDR1 = 1;ADDR2 = 0;P0 = dx[K];K++;};ys(a); if(K == 3){ADDR0 = 1;ADDR1 = 1;ADDR2 = 0;P0 = dx[K];K++;};ys(a); if(K == 4){ADDR0 = 0;ADDR1 = 0;ADDR2 = 1;P0 = dx[K];K++;};ys(a); if(K == 5){ADDR0 = 1;ADDR1 = 0;ADDR2 = 1;P0 = dx[K];K++;};ys(a); if(K == 6){ADDR0 = 0;ADDR1 = 1;ADDR2 = 1;P0 = dx[K];K++;};ys(a); if(K == 7){ADDR0 = 1;ADDR1 = 1;ADDR2 = 1;P0 = dx[K];K=0;};ys(a); } //------------ÎÞÐÄÉÁ---------- wxf(uint8 a,uint8 b){ static uint8 K = 0; if(K == 0){ADDR0 = 0;ADDR1 = 0;ADDR2 = 0;P0 = dx[b];K++;};ys(a); if(K == 1){ADDR0 = 1;ADDR1 = 0;ADDR2 = 0;P0 = dx[b];K++;};ys(a); if(K == 2){ADDR0 = 0;ADDR1 = 1;ADDR2 = 0;P0 = dx[b];K++;};ys(a); if(K == 3){ADDR0 = 1;ADDR1 = 1;ADDR2 = 0;P0 = dx[b];K++;};ys(a); if(K == 4){ADDR0 = 0;ADDR1 = 0;ADDR2 = 1;P0 = dx[b];K++;};ys(a); if(K == 5){ADDR0 = 1;ADDR1 = 0;ADDR2 = 1;P0 = dx[b];K++;};ys(a); if(K == 6){ADDR0 = 0;ADDR1 = 1;ADDR2 = 1;P0 = dx[b];K++;};ys(a); if(K == 7){ADDR0 = 1;ADDR1 = 1;ADDR2 = 1;P0 = dx[b];K=0;};ys(a); } //-------Ð¡ÐÄÉÁ----------- xxf(uint8 a){ static uint8 K = 0; if(K == 0){ADDR0 = 0;ADDR1 = 0;ADDR2 = 0;P0 = xx[K];K++;};ys(a); if(K == 1){ADDR0 = 1;ADDR1 = 0;ADDR2 = 0;P0 = xx[K];K++;};ys(a); if(K == 2){ADDR0 = 0;ADDR1 = 1;ADDR2 = 0;P0 = xx[K];K++;};ys(a); if(K == 3){ADDR0 = 1;ADDR1 = 1;ADDR2 = 0;P0 = xx[K];K++;};ys(a); if(K == 4){ADDR0 = 0;ADDR1 = 0;ADDR2 = 1;P0 = xx[K];K++;};ys(a); if(K == 5){ADDR0 = 1;ADDR1 = 0;ADDR2 = 1;P0 = xx[K];K++;};ys(a); if(K == 6){ADDR0 = 0;ADDR1 = 1;ADDR2 = 1;P0 = xx[K];K++;};ys(a); if(K == 7){ADDR0 = 1;ADDR1 = 1;ADDR2 = 1;P0 = xx[K];K=0;};ys(a); } //--------ÐÄµçÍ¼----------- xdt(){ P0 = 0xfe;ys(3); P0 = 0xfd;ys(3); P0 = 0xfb;ys(3); P0 = 0xf7;ys(100); P0 = 0xef;ys(3); P0 = 0xdf;ys(3); P0 = 0xbf;ys(3); P0 = 0x7f;ys(3); } //------------Ö÷º¯Êý------------------------- main(){ ledx(); while(1){ ledx(); for(l=0;l<10;l++){ xxf(10); } for(h=0;h<5;h++){ dxf(5); } led8(); xdt(); ledx(); for(h=0;h<5;h++){ dxf(5); } for(f=0;f<10;f++){ xxf(10); } } } 2 已退回1积分
2015-7-15 13:48:26　　评论淘帖0 邀请回答您可以邀请以下用户，快速回答问题 × Katrina_WIZnet 该类别下有 4 个回答。邀请回答 elecfar 该类别下有 3 个回答。邀请回答龚旭升该类别下有 2 个回答。邀请回答熟悉的路上该类别下有 2 个回答。邀请回答电子发扫友该类别下有 1 个回答。邀请回答 man411122 该类别下有 1 个回答。邀请回答 skyhahaha 该类别下有 1 个回答。邀请回答刘信仪该类别下有 1 个回答。邀请回答 Winar 该类别下有 1 个回答。邀请回答 lgliang 该类别下有 1 个回答。邀请回答 jiero39 该类别下有 1 个回答。邀请回答 jhyanlin 该类别下有 1 个回答。邀请回答獨善该类别下有 1 个回答。邀请回答 zhongjru 该类别下有 1 个回答。邀请回答 h1654155212.2100 该类别下有 1 个回答。邀请回答 h2f910302 该类别下有 1 个回答。邀请回答 tryqaz 该类别下有 1 个回答。邀请回答 z1234zz 该类别下有 1 个回答。邀请回答 h1654155848.7968 该类别下有 1 个回答。邀请回答 tototm 该类别下有 1 个回答。邀请回答举报龚旭升相关推荐 • AD8232开发心电图仪 11181 • 请问怎样去设计一种心电图热敏打印机系统？ 1774 • 有没有哪位兄弟懂动态心电图机检定方法的 3636 • ad8232串口显示心率及心电图 8754 • 请问信号发生振荡怎么解决？ 1301 • 求一个心电图实时监控与报警系统有关的LABVIEW程序 6607 • 求labview心电图运行仿真模拟 2238 • 信号发生了振荡，该如何解决？ 6886 • AT89C51单片机，51单片机,控制3个步进电机的C程序及硬件图 2720 • 心电图示仪 2576 1个回答