注意:访问本站需要Cookie和JavaScript支持!请设置您的浏览器! • 打开购物车 • 查看留言 • 付款方式 • 联系我们 |
首页 | 电子入门 | 学单片机 | 免费资源 | 下载中心 | 商品列表 | 象棋在线 | 在线绘图 | 加盟五一 | 加入收藏 | 设为首页 |
选择分类:当前分类——学单片机 相关联或者相类似的文章: 三十分钟一个小时学会单片机(9045) 什么是单片机?单片机有什么用? (8723) 如何用STC板将代码烧录进IC(8681) 怎样安装AT51编程板的USB转串口软件?(8206) 送给单片机爱好者——LED在线编码器(1814) 送给单片机爱好者——LED点阵在线编码器(1544) 单片机系统中的汉字显示(1492) 带语音报数功能的抢答器(1489) 用VB进行串口实时数据采集(1347) 用AT89C2051设计超声波测距仪(1171) 小小电子闹钟 生活学习良伴(1165) DS1820测温原理(1129) 几句代码实现控制摄像头(转)(1117) STC单片机选型指南(1111) 自制PIC单片机编程器(1105) USB转串口芯片CH340(1010) 快速学习单片机之黄金机会!(1010) 告戒购单片机开发实验板初学者(970) 新款实用旋转LED显示屏A(890) 使用市售 USB转RS232串口与PLC通信的测试报告 (881) 首页 前页 后页 尾页 本站推荐: | 1.红外遥控噐软件解码及其应用 MCS-51系列MCU对TC9012红外遥控噐软件解码实例清单如下: ;============================================== ;遥控器软件解码子程序,入口标号:TKEY ;影响4BH、4CH单元;4BH为循环计数器。 ;位地址00H为读键标志:“1”为成功,“0”为读 ;键无效, 若成功, 键值在4C单元中。 ;位地址04H为键值类型标志: ;“1” 实际值,“0” 映射值。 ;以下2个参数是红外遥控信号的软件解 ;码参数,视CPU时钟频率而定,若晶振为6M,则 ;============================================== #HW EQU #08H ;引导脉冲特征宽度 #PW EQU #02H ;信号脉冲特征宽度 #ZGZQ EQU #90H;主工作区高位地址; TKE2: LJMP TKE;接力跳转; TKEY: PUSH A ;子程序入口 PUSH PSW PUSH DPH PUSH DPL PUSH 00H PUSH 01H MOV TMOD,#01H MOV PSW, #00H MOV P2, #ZGZQ MOV R0, #70H MOV R1, #21H ;有效脉冲只有33个 CLR 00H TK3: MOV TH0,#0 MOV TL0,#0AH;测低电平宽度 SETB TR0 TK4: JB TF0, TKE2;超时无效转结束 JNB P3.3, TK4 CLR TR0 MOV A, TH0 MOVX @R0, A INC R0 MOV A, TL0 MOVX @R0, A INC R0 MOV TH0, #00H MOV TL0, #0AH;测高电平宽度 SETB TR0 TK5: JB TF0, TKE2;超时无效转结束 JB P3.3, TK5 CLR TR0 MOV A, TH0 MOVX @R0, A INC R0 MOV A, TL0 MOVX @R0, A INC R0 DJNZ R1, TK3;循环 ; ;分析脉冲流 ;脉冲波形数据存放在70H开始的连续84H个单元内, ;每个脉冲由一个低电平脉宽和高电平脉宽组成 ;每个脉宽数据占两个字节,前一个字节为高8位 ;后一个字节为低8位 ; ;判引导脉冲是否有效 MOV R0, #70H MOVX A, @R0 CLR C SUBB A, #HW JC TKE ;低电平引导脉冲无效转结束 INC R0 INC R0 MOVX A, @R0 SUBB A, #HW JC TKE ;高电平引导脉冲无效转结束 ;分析键码 ;键码值在片内4CH单元 ! ;判9012遥控芯片特征码是否有效, ;特征码是连续两个字节的0EH ;首先译码第1个特征码,并判断是否为“0EH” MOV 4BH, #8 MOV 4CH, #0 INC R0 INC R0 TK6: INC R0 INC R0 MOVX A, @R0 CLR C SUBB A, #PW MOV A, 4CH RRC A MOV 4CH, A INC R0 INC R0 DJNZ 4BH, TK6 ;循环 MOV A, 4CH CPL A CJNE A, #0EH, TK7 MOV A, R0 ;是9012芯片的特征码 ADD A, #20H;跳过后一个特征码的 MOV R0, A ;判断,去译码键值----- LJMP TK9 ;--转TK9 ;第1个特征码无效 ;再译码第2个特征码,并判断是否为“0EH” TK7: MOV 4BH, #8 MOV 4CH, #0 TK8: INC R0 INC R0 MOVX A, @R0 CLR C SUBB A, #PW MOV A, 4CH RRC A MOV 4CH, A INC R0 INC R0 DJNZ 4BH, TK8 MOV A, 4CH CPL A CJNE A, #0EH, TKE;无效退出; ; 特征码有效,进行键值译码 TK9: MOV 4BH, #8 MOV 4CH, #0 TK10: INC R0 INC R0 MOVX A, @R0 CLR C SUBB A, #PW MOV A, 4CH RRC A MOV 4CH, A INC R0 INC R0 DJNZ 4BH, TK10 MOV A, 4CH; CPL A ;得键码 JB 04H, TKE1 MOV DPTR, #TAB ;键码到键值 MOVC A, @A+DPTR;的查表映射 TKE1: MOV 4CH, A;或4CH中 SETB 00H ;置读键有效标志 TKE: POP 01H POP 00H POP DPL ;返回 POP DPH POP PSW POP A MOV P2, #0FFH RET ;以下是针对某一具体应用的“重定义按键”映射表 TAB: DB 01H,02H,03H,04H,05H,06H,07H,08H DB 09H,00H,20H,20H,20H,20H,20H,20H DB 0EH,11H,14H,13H,0AH,0BH,0FH,20H DB 0CH,0DH,15H,20H,10H,12H,0FH,20H DB 20H,20H,20H,20H,20H,20H,20H,20H ; 以上是软件译码的子程序。调用该子程序,必须首先检测是否有遥控信号的到来,并进行同步。具体方法可以采用查询方式,也可采用中断方式。以下给出查询方式的子程序: ;============================================== ;测试是否有遥控信号到来,子程序返回时 ;位标志00H置“1”时有遥控信号到来, ;位标志置“0”时无遥控信号到来. ;============================================== DKEY: SETB 00H MOV 2FH,#00H DK1: JNB P3.3,DKE NOP NOP NOP JNB P3.3,DKE NOP NOP NOP DJNZ 2FH,DK1 CLR 00H DKE: RET 2.一种8位I/O口的单片机显示器和键盘接口 LED显示和键盘查询软件汇编的子程序如下: DISP为LED显示子程序,其功能是使P1.7=1,把显示缓冲区(首址为DISB)中的数据依次送至P1.0~P1.3即U1/CD4511的输入端,同时,P1.4~P1.6输出对应各LED管位的BCD码,每个LED管的显示时间为1ms。 入口参数:DISB显示缓冲区首址; 出口参数:无; 使用寄存器:A,R0,R2,R3,R4。 DISP: MOV R3,#04H ;LED数码管个数 MOV R0,DISB ;显示缓冲区首址 MOV R2,#08H ;输出码初值,使P1.7=1 DSP0: MOV A,R2 ;取初值 SWAP A ;高4位和低4位交换 ANL A,#0F0H ;屏蔽低4位 ORL A,@R0 ;与欲显示数码合成为输出码 MOV P1,A ;输出至P1口 MOV R4,#0FAH ;延时计数器初值 DLP: DJNZ R4,DLP ;延时1ms INC R0 ;显示缓冲器地址+1 INC R2 ;LED位地址+1 DJNZ R3,DSP0 ;共显示4个LED RET 下面是键盘查询子程序KSB。其功能是,使LED熄灭(P1.7=0),置P1.0~P1.3为输入方式,P1.4~P1.6依次输出数字“0~3”所对应的BCD码,同时测量P1.0~P1.3是否有低电平;若有低电平即为有键按下,延时消键抖动,计算键值,测键是否被释放,若释放,延时退出。此时置累加器A=1,键值在寄存器R2中。若无键,则累加器A=0。 入口参数:无; 出口参数:A有无键标志:A=0时无键,A=1则有键; R2键位值(0~1FH); 使用寄存器:A,R0,R2,R3,R4。 KBS: MOV R3,#0F0H ;P1初值,P1.0~P1.3输入,P1.4~P1.6=0,P1.7=0 MOV R4,#04H ;列计数器初值 MOV R2,#00H ;键位的初值 KS1: MOV A,R3 ;取输出初值 SWAP A ;高低四位交换,形成输出码 MOV P1,A ;输出至P1口 NOP MOV A,P1 ;测输入 ANL A,#0FH ;屏蔽掉高四位 XRL A,#0F ;测是否有键 JNZ KSP ;有键,转计算键值 INC R3 ;无键,输出值+1 MOV A,R2 ;取键值 ADD A,#04H ;键值+4(因每列4键) MOV R2,A ;赋键值 DJNZ R4,KS1 ;4列扫完否 KSE0: CLR A ;无键,A清零 SJMP KSE ;退出 KSP: ACALL D20MS ;有键,延时20ms消键抖动 ORL P1,#0FH ;再测有键否 NOP MOV A,P1 ANL A,#0FH XRL A,#0FH JZ KSE0 ;无键退出 KSP0: RRC A ;循环右移 JC WAIT ;此位有键,转等待 INC R2 ;无键,键值+1 SJMP KSP0 ;循环测键位,计算键值 WAIT: ORL P1,#0FH ;测键是否释放 NOP MOV A,P1 ANL A,#0FH XRL A,#0FH JNZ WAIT ;键未释放,等待 ACALL D20MS ;键释放,延时20ms INC A ;有键,A=1 KSE: RET D20MS是延时20ms子程序。 入口参数:无; 出口参数:无; 使用寄存器:R6,R7。 D20MS: MOV R7,#14H DL1: MOV R6,#0F9H DL2: DJNZ R6,DL2 DJNZ R7,DL1 RET 3.如何在MCS-51系统中使用IDE硬盘
MCS-51程序主要部分如下: 主要部分MCS51程序: /* 以下是关于8255的一些定义: */ #define IDE_8255_LSB 0x2000 /* 低8位 */ #define IDE_8255_MSB 0x2001 /* 高8位 */ #define IDE_8255_CTL 0x2002 #define CFG_8255 0x2003 #define RD_IDE_8255 0x92 /*10010010b, 8255输入 */ #define WR_IDE_8255 0x80 /*10000000b, 8255输出 */ /* 8255和IDE接口连接 */ #define IDE_A0 0x01 /* 8255和IDE接口直接相连 */ #define IDE_A1 0x02 /* 8255和IDE接口直接相连 */ #define IDE_A2 0x04 /* 8255和IDE接口直接相连 */ #define IDE_CS0 0x08 /* 8255和IDE接口通过74LS04反相后相连 */ #define IDE_CS1 0x10 /* 8255和IDE接口通过74LS04反相后相连 */ #define IDE_WR 0x20 /* 8255和IDE接口通过74LS04反相后相连 */ #define IDE_RD 0x40 /* 8255和IDE接口通过74LS04反相后相连 */ #define IDE_RST 0x80 /* 8255和IDE接口通过74LS04反相后相连 */ #define IDE_DATA IDE_CS0 #define IDE_ERR IDE_CS0 + IDE_A0 #define IDE_SECCNT IDE_CS0 + IDE_A1 #define IDE_SECTOR IDE_CS0 + IDE_A1 + IDE_A0 #define IDE_LSB IDE_CS0 + IDE_A2 #define IDE_MSB IDE_CS0 + IDE_A2 + IDE_A0 #define IDE_HEAD IDE_CS0 + IDE_A2 + IDE_A1 #define IDE_COMMAND IDE_CS0 + IDE_A2 + IDE_A1 + IDE_A0 #define IDE_STATUS IDE_CS0 + IDE_A2 + IDE_A1 + IDE_A0 #define IDE_CONTROL IDE_CS1 + IDE_A2 + IDE_A1 #define IDE_ASTATUS IDE_CS1 + IDE_A2 + IDE_A1 + IDE_A0 /* IDE命令:*/ #define IDE_CMD_RECAL 0x10 #define IDE_CMD_READ 0x20 #define IDE_CMD_WRITE 0x30 #define IDE_CMD_INIT 0x91 #define IDE_CMD_ID 0xEC #define IDE_CMD_SPINDOWN 0xE0 #define IDE_CMD_SPINUP 0xE1 /* IDE初始化 */ int IDE_Init() { int status, i=0; IDE_Write(IDE_HEAD, 0xA0); status = IDE_Read(IDE_STATUS); while(!(status&0x40)) { /*等待RDY为”1”*/ delay(1); if(i++>5000){ printf("Time out, device error!\n"); exit(1); } } i = 0; while(status&0x80) { /*等待BSY为”0”*/ delay(1); if(i++>5000){ printf("Time out, device error!\n"); exit(1); } } IDE_Write(IDE_HEAD, 0x20); IDE_Write(IDE_SECCNT, 64); IDE_Write(IDE_COMMAND, IDE_CMD_INIT); if(IDE_Busy()==-1){ printf("Time out,device error!\n"); exit(1); } IDE_Write(IDE_COMMAND, IDE_CMD_RECAL); if(IDE_Busy()==-1){ printf("Time out,device error!\n"); exit(1); } } /* 从硬盘读取一个扇区,放入到形参指定的内存中 */ int ReadSector(short *addr, long int LBA) { IDE_Busy(); /* 等待硬盘空闲 */ WriteLBA(LBA); IDE_Write(IDE_COMMAND,IDE_CMD_READ); IDE_DRQ(); ReadData(addr); } /* 向硬盘写一个扇区,返回零表示成功,否则失败。*/ int WriteSector(short * Buffer, long int LBA) { IDE_Busy(); WriteLBA(LBA); IDE_Write(IDE_COMMAND,IDE_CMD_WRITE); IDE_DRQ(); Wirte_Data(Buffer); IDE_Busy(); } /* 取得错误号 */ short GetError() { int res; res = IDE_Read(IDE_ERR); return res; } /* 读取硬盘的标识。 */ void GetDriverId(short * Buffer) { IDE_Busy(); IDE_Write(IDE_COMMAND,IDE_CMD_ID); IDE_DRQ(); ReadData(Buffer); } /* 激活硬盘(转动)。 */ void SpinUP() { IDE_Write(IDE_COMMAND,IDE_CMD_SPINUP); IDE_Busy(); } /* 让硬盘休眠(停转)。 */ void SpinDown() { IDE_Busy(); IDE_Write(IDE_COMMAND,IDE_CMD_SPINDOWN); IDE_Busy(); } /* 从硬盘读取512个字节。 */ int ReadData(short * Buffer) { int i; for(i = 0; i < 256; i ++) { *(Buffer ++) = IDE_Read(IDE_DATA); } return 0; } /* 向硬盘写入512个字节。 */ void WriteData(short * Buffer) { int i; for(i = 0; i < 256; i ++) { IDE_Write(IDE_DATA, *(Buffer++)); } } /* 向设备寄存器写入逻辑块地址 */ void WriteLBA(long int LBA) { short data = 0; data |= ((LBA&0xFF000000) >> 24); data &= 0x0F; data |= 0xE0; IDE_Write(IDE_HEAD, data); data = 0; data |= ((LBA&0xFF0000) >> 16); IDE_Write(IDE_MSB, data); data = 0; data |= ((LBA&0xFF00) >> 8); IDE_Write(IDE_LSB, data); data = 0; data |= (LBA&0xFF); IDE_Write(IDE_SECTOR, data); IDE_Write(IDE_SECCNT, 1); } /* 等待IDE设备空闲,返回设备的状态. */ int IDE_Busy() { int res,i = 0; do { res = IDE_Read(IDE_STATUS); delay(1); /* 等待 1ms */ if(i++>5000) return -1; /* 重试5000次,如果失败,返回错误*/ }while(res&0x80); return res; } /* 等待设备空闲直到可以传送数据,返回设备的状态 */ int IDE_Ready() { int i = 0, res; do { res = IDE_Read(IDE_STATUS); delay(1); /* 等待 1ms */ if(i++>5000) return -1; }while((res&0x80)&&(!(res&0x08))); return res; } /* 通过8255读取硬盘数据(一个16位的字)。 */ short IDE_Read(unsigned char reg) { short res = 0; unsigned char MSB, LSB; *((char *)CFG_8255) = RD_IDE_8255; /* 8255为输入模式,读硬盘。 */ *((char *)IDE_8255_CTL) = reg; MSB = *((char *)IDE_MSB); LSB = *((char *)IDE_LSB); *((char *)IDE_8255_CTL) = 0x00; /* 清除控制寄存器。 */ res = (MSB << 8)|LSB; return res; } /* 通过8255向硬盘写入一个字。 */ void IDE_Write(unsigned char reg, short data) { unsigned char outdata = 0; *((char *)CFG_8255) = WR_IDE_8255; /* 8255为输出模式,写硬盘。 */ outdata |= (data & 0x00ff); *((char *)IDE_8255_LSB) = outdata; /* 首先写LSB。 */ outdata = 0; outdata |= (data >> 8); *((char *)IDE_8255_MSB) = outdata; /* 写MSB。 */ *((char *)IDE_8255_CTL) = reg; reg |= IDE_WR; *((char *)IDE_8255_CTL) = reg; *((char *)IDE_8255_CTL) = 0x00; /* 清除控制寄存器。 */ *((char *)CFG_8255) = RD_IDE_8255; /* 8255为输入模式,读硬盘。 */ } /* 硬盘复位操作,当初始化结束后需要复位。 */ void IDE_Reset() { *((char *)CFG_8255) = WR_IDE_8255; /* 8255为输出模式,写硬盘。 */ *((char *)IDE_8255_CTL) = IDE_RST; delay(3); *((char *)IDE_8255_CTL) = 0x00; /* 清除控制寄存器。 */ } 4.移动电话便携通话装置的按键扫描设计
原程序清单如下: Remote_Key.h文件代码如下: #define REM_YES 0x1000 //接听键YES #define REM_NO 0x2000 //拒接键NO #define REM_UP 0x4000 /音量增大键UP #define REM_DOWN 0x8000 //音量减低键DOWN /*以下决定每个按键对应的比特位置*/ #define _REM_YES 12 #define _REM_NO 13 #define _REM_UP 14 #define _REM_DOWN 15 /* 以下为函数声明*/ void Key_IOINIT(void); Remote_Key.c文件代码如下: #include #include "macro.h" #include "Remote_Key.h" #include "SCI.h" /*SCI串行通信模块*/ unsigned int Remote_Keys; unsigned char RecByte; unsigned char* csAdd; void Key_IOINIT(void) { /*将P5.2从普通I/O引脚功能切换为外部中断引脚3*/ P5C2R &= 0xfd; P5C2R |= 0x04; P5C1R |= 0x06; P5C0R |= 0x06; Disable_Interrupts(); spp(EXINT_PG); /*切换到外部中断页寄存器*/ /*外部中断触发寄存器设置*/ EITR = 0; /*设置成信号下降沿触发中断*/ /*外部中断标志寄存器设置*/ EIPR = 0; /*清空所有标志位*/ /*外部中断使能寄存器设置*/ EIMR |= EIm_ib1m| /*使能第3号外部中断*/ /*外部中断优先级寄存器设置*/ EIPLR |= 0x2d; /*设置第3号外部中断优先级*/ EIPLR &= 0xeb; /* INT3(INT.B1 101:5) */ /*外部中断向量寄存器*/ EIVR = 0x40 ; /*设置外部中断向量*/ Enable_Interrupts(); } #pragma interrupt (EXT_INT_3) void EXT_INT_3(void) { SAVE_PAGE; /*当前页压栈*/ spp(EXINT_PG); EIPR &= ~EIm_ipb1m; /*清空第3号外部中断发生标志位*/ /*片选MCP3201使其工作*/ csAdd=0x8001; *csAdd &= 0xef; /*通过SCI串行通信方式从MCP3201获得数据*/ SCI_Receive_Buffer(&RecByte, 1); if (RecByte>=0xf0 && RecByte<=0xff) /*接听键(YES)处理*/ { Remote_Keys = REM_YES; /*这里添加接听键(YES)处理代码......*/ ClrBit(Remote_Keys,_REM_YES); } if (RecByte>=0xcb && RecByte<=0xd7) /*拒接键(NO)处理*/ { Remote_Keys = REM_NO; /*这里添加拒接键(NO)处理代码......*/ ClrBit(Remote_Keys,_REM_NO); } if (RecByte>=0xc2 && RecByte<=0xc6) /*音量增大键(UP)处理*/ { Remote_Keys = REM_UP; /*这里添加音量增大键(UP)处理代码......*/ ClrBit(Remote_Keys,_REM_UP); } if (RecByte>=0x8d && RecByte<=0x96) /*音量减低键(DOWN)处理*/ { Remote_Keys = REM_DOWN; /*这里添加音量减低键(DOWN)处理代码......*/ ClrBit(Remote_Keys,_REM_DOWN); } /*通过将片选信号设置为高电平停止MCP3201工作*/ *csAdd |= 0x10; /*当前页出栈*/ RESTORE_PAGE; } 5.亿恒C166系列单片机IIC总线的软件模拟 测试原程序如下: 3.1 延时子程序 延时子程序Delay用于产生时钟和数据信号的延时,延时时间为400ns×count。程序清单如下: void Delay(unsigned int count) { while (count--); } 3.2 SCL线检查子程序 SCL线检查子程序Check_SCL用于向串行时钟线输出高电平。该子程序将等待从设备释放SCL,等待的时限为10ms,如果时钟和数据线无误,则返回值为0,否则为1。程序清单如下: unsigned char Check_SCL() { time_out = period; DSCL = 0; /*设置SCL为输入*/ while (time_out--) { if (SCL) /* 等待从设备释放SCL*/ { SCL = 1; /* 置时钟线为高电平 */ DSCL = 1; /*设置SCL为输出*/ return (0); } } return (1); /*出错*/ } 3.3 初始化子程序 初始化子程序I2CInit用于主定时器T3和辅助定时器T2的设置,并检查时钟和数据线的错误,如SDL/SCL上无上拉电阻或者被从设备拉低。如时钟和数据线无误则返回值为0,否则为1。程序清单如下: unsigned char I2cInit() { T3CON = 0x0080; /*定时器模式;分辨率为400ns;向下计时*/ T2CON = 0x0027; /*重载模式;输入为T3OTL的正负跳变*/ T2 = 0x0018; /*T2的重载值为24*/ T3 = 0x0018; /*T3的初值*/ T2IC = 0x0004; /*设置T2的中断优先级*/ DSDA = 0; /*设置SDA和SCL为输入*/ DSCL = 0; if (!SDA) /*检查时钟和数据线*/ if (I2cStop()) return (1); if (!SCL) if (I2cStop()) return (1); return (0); } 3.4 起动子程序 起动子程序I2Cstart用于在I2C总线上产生起始位。程序清单如下: void I2cStart() { SDA = 1; /*确认SDA和SCL均为高电平*/ SCL = 1; DSDA = 1; /*设置SDA和SCL为输出*/ DSCL = 1; Delay(5); SDA = 0; Delay(10); SCL = 0; } 3.5 主设备写子程序 主设备写子程序I2CMasterWrite用于向从设备写一个字节的数据,在写数据前先检查等待情况。传送给从设备的数据为该子程序的参数。程序清单如下: void I2cMasterWrite(unsigned char input_byte) { input_data = input_byte; /*在中断子程序中使用*/ COM_ON = 1; /*置通信标志位*/ TX_RX = 0; /*发送模式标志*/ mask = 0x80; /*先传送MSB位*/ DSDA = 1; /*设置SDA为输出*/ bit_count = 0; /*时钟脉冲计数器*/ if (mask & input_data) /*发送数据的第一位*/ SDA = 1; else SDA = 0; mask = mask >> 1; /*发送数据右移一位*/ Check_SCL(); /*发送前检查等待状态*/ T2IE = 1; /*T2中断使能*/ T3R = 1; /*定时器开始计时*/ } 3.6 主设备读子程序 主设备读子程序I2CmasterRead用于从从设备读取一个字节的数据,在读数据前先检查等待情况。当该子程序的参数为0时,主设备在接收到一个字节的数据后输出低电平,当参数为1时,输出高电平。程序清单如下: void I2cMasterRead(unsigned char ack) { Ackge = ack; /*在中断服务程序中使用*/ rec_data = 0; COM_ON = 1; /*置通信标志位*/ TX_RX = 1; /*设置接收标志*/ mask = 0x80; DSDA = 0; /*设置SDA为输入*/ bit_count = 0; /*时钟脉冲计数器*/ Check_SCL(); /*接收前检查等待情况*/ T2IE = 1; /* T2中断使能*/ T3R = 1; /*定时器开始计时*/ } 3.7 停止子程序 停止子程序I2CStop用于产生I2C总线上的停止位。此外,该子程序还用于产生时钟脉冲直至从设备释放SDA。当SDA正常时,I2Cstop的返回值为0,如果SDA被拉低的时间超过10ms,返回值为1。程序清单如下: unsigned char I2cStop() { time_out = period; DSDA =0; /*设置SDA为输入*/ while (time_out --) {if (!SDA) /*检查SDA线*/ { SCL = 1; /*如果SDA拉低则产生时钟脉冲*/ Delay(6); SCL = 0; Delay(6); } else /*检查SCL*/ {SDA = 0; DSDA = 1; /*设置SDA为输出*/ if (Check_SCL()) /*产生停止位*/ return (1); /*错误*/ Delay(10); SDA = 1; return (0); } } return (1); /*错误*/ } 3.8 T2中断服务程序 T2中断服务程序int_timer2_handler用于发送、接受数据,每次中断发送或接受一位数据。程序清单如下: void int_timer2_handler(void) interrupt 0x22 { if (TX_RX) {/*接收模式*/ SCL = 1; bit_count++; if (bit_count <= 8) { if (SDA) rec_data |= mask; /*接收字节存于变量rec_data中*/ else { time_out = period; /*用于延时*/ SCL = 1; } mask = mask >> 1; SCL = 0; if (bit_count == 8) { DSDA = 1; /*设置SDA为输出*/ if (Ackge) /*置应答位*/ SDA = 1; else SDA = 0; } } else if (bit_count == 9) {/*一个字节接收结束*/ if (bit_count == 9) /*延时*/ { SCL = 1; SCL = 1; SCL = 1; T2IE = 0; /*中断复位*/ T3IE = 0; T2IR = 0; T3R = 0; COM_ON = 0; /*通信结束*/ SCL = 0; } } } /*发送模式*/ else { SCL = 1; bit_count++; if (bit_count <= 8) { temp_SDA = 0; if (mask & input_data) /*准备下一位*/ temp_SDA = 1; mask = mask >> 1; SCL = 0; if (bit_count != 8) SDA = temp_SDA; /*当时钟为低时发送一位数据 */ else DSDA = 0; /*释放SDA以接收ack位*/ } else if (bit_count == 9) { RecAck = SDA; /*在第9个时钟周期读应答位*/ if (bit_count == 9) /*延时*/ { SCL = 1; /*1字节发送结束*/ T2IE = 0; T3IE = 0; T2IR = 0; T3R = 0; COM_ON = 0; /*通信结束*/ SCL = 0; } } } /*发送结束*/ } 虚拟软件包见文件:I2c_hw。 6.MCS-51四字节浮点库及其使用说明
浮点库程序清单如下: 程序清单: (1) 标号: BTOF 功能:浮点BCD码转换成格式化浮点数 入口条件:浮点BCD码操作数在[R0]中。 出口信息:转换成的格式化浮点数仍在[R0]中。 BTOF: INC R0 INC R0 inc r0;read L MOV 07h,@R0 DEC R0 MOV 06h,@R0 DEC R0 mov 05h,@r0 ;r5r6r7=0.hml(dec) dec r0 ;;r0 to jie_ma mov a,r7 ORL A,R6 orl a,r5 jnz btf0 ;jb r5r6r7=0 MOV @R0,#41H RET BTF0: MOV A,@R0 MOV C,ACC.7 MOV 1DH,C CLR 1FH MOV C,ACC.6 MOV ACC.7,C MOV @R0,A JNC BTF1 ADD A,#19 JC BTF2 MOV @R0,#41H INC R0 MOV @R0,#0 INC R0 MOV @R0,#0 inc r0 MOV @R0,#0 DEC R0 DEC R0 dec r0 RET BTF1: SUBB A,#19 JC BTF2 MOV A,#3FH MOV C,1DH MOV ACC.7,C MOV @R0,A INC R0 MOV @R0,#0FFH INC R0 MOV @R0,#0FFH inc r0 MOV @R0,#0FFH dec r0 DEC R0 DEC R0 RET BTF2: CLR A ;use r1.r2r3r4 MOV R4,A MOV R3,A MOV R2,a mov r1,#24 ;3byte =3*8=24 BTF3: MOV A,R7 ADD A,R7 DA A MOV R7,A MOV A,R6 ADDC A,R6 DA A MOV R6,A mov a,r5 addc a,r5 da a mov r5,a;r5r6r7*2 MOV A,R4 RLC A MOV R4,A MOV A,R3 RLC A MOV R3,A mov a,r2 rlc a mov r2,a ;count .r5r6r7(10)=>.r2r3r4(2) DEC R1 JNB ACC.7,BTF3 MOV A,R5 ADD A,#0B0H CLR A ADDC A,R4 MOV R4,A CLR A ADDC A,R3 MOV R3,A CLR A ADDC A,R2 MOV R2,A JNC BTF4 MOV R2,#80H INC R1 BTF4: MOV DPTR,#BTFL MOV A,@R0 ADD A,#19 MOV B,#4 ;4 byte MUL AB ADD A,DPL MOV DPL,A JNC BTF5 INC DPH BTF5: CLR A MOVC A,@A+DPTR MOV C,ACC.6 MOV ACC.7,C MOV 0ch,A ;r4"=0ch MOV A,#1 MOVC A,@A+DPTR MOV 0dh,A MOV A,#2 MOVC A,@A+DPTR MOV 0eh,A MOV A,#3 MOVC A,@A+DPTR MOV 0fh,A LCALL MUL1 MOV C,1DH MOV 1FH,C LJMP MOV0 (2) 标号: FTOB 功能:格式化浮点数转换成浮点BCD码 入口条件:格式化浮点操作数在[R0]中。 出口信息:转换成的浮点BCD码仍在[R0]中。 FTOB: INC R0 MOV A,@R0 ;h INC R0 ORL A,@R0 ;m inc r0 orl a,@r0 ;l dec r0 DEC R0 DEC R0 JNZ FTB0 MOV @R0,#41H RET FTB0: MOV A,@R0 MOV C,ACC.7 MOV 1DH,C CLR ACC.7 MOV @R0,A LCALL MVR0 MOV DPTR,#BFL0 MOV B,#0 MOV A,R2 JNB ACC.7,FTB1 MOV DPTR,#BTFL MOV B,#0EDH ADD A,#16 JNC FTB1 MOV DPTR,#BFLN MOV B,#0FAH FTB1: CLR A MOVC A,@A+DPTR MOV C,ACC.6 MOV ACC.7,C MOV 0ch,A ;r4" MOV A,#1 MOVC A,@A+DPTR MOV 0dh,A MOV A,#2 MOVC A,@A+DPTR MOV 0eh,A MOV A,#3 MOVC A,@A+DPTR MOV 0fh,A MOV A,0ch ;r4" jie_ma CLR C SUBB A,R2 JB ACC.7,FTB2 JNZ FTB3 MOV A,0dh ;0.r5"r6"r7"-0.r3r4r5 CLR C SUBB A,R3 JC FTB2 JNZ FTB3 MOV A,0eh;r6"-r4;;;2002.6.18 CLR C SUBB A,r4 JC FTB2 JNZ FTB3 MOV 0ah,B INC 0ah MOV 0dh,#10h;0.100000 MOV r6,#0 MOV r7,#0 SJMP FTB6 FTB2: INC DPTR INC DPTR INC DPTR inc dptr ;4byte INC B SJMP FTB1 FTB3: PUSH B CALL DIV3 FTB4: MOV A,r2 JZ FTB5 CLR C LCALL RR1 SJMP FTB4 FTB5: POP 0ah LCALL HB2 MOV 0dh,A;r5" LCALL HB2 MOV R6,A LCALL HB2 MOV R7,A MOV A,R3 RLC A CLR A ADDC A,R7 DA A MOV R7,A CLR A ADDC A,R6 DA A MOV R6,A JNC FTB6 MOV R6,#10H INC 0dh FTB6: INC R0 INC R0 inc r0 MOV A,R7 MOV @R0,A DEC R0 MOV A,R6 MOV @R0,A DEC R0 MOV A,0dh mov @r0,a dec r0 mov a,0ah MOV C,1DH MOV ACC.7,C MOV @R0,A RET ;[r3r4r5*100]\10=>bcd1,2 HB2: MOV A,R5 MOV B,#100 MUL AB MOV R5,A MOV A,B XCH A,R4 MOV B,#100 MUL AB ADD A,R4 MOV R4,A ;JNC HB21 mov a,B addc a,#0 xch a ,r3 mov b,#100 mul ab add a,r3 mov r3,a mov a,b addc a,#0 HB21: ;MOV A,B MOV B,#10 DIV AB SWAP A ORL A,B RET BTFL: DB 41H,0ECH,1EH ,4ah;10e-19 DB 45H,93H,92H,0efh;10e-18 DB 48H,0B8H,77H,0aah;10e-17 DB 4BH,0E6H,95H,95h;10e-16 DB 4FH,90H,1DH ,7dh;10e-15 DB 52H,0B4H,24H,0dch;10e-14 DB 55H,0E1H,2EH,13h;10e-13 DB 59H,8CH,0BcH,0cch;10e-12 DB 5CH,0AFH,0EbH,0ffh;10e-11 DB 5FH,0DBH,0E6H,0ffh;10e-10 DB 63H,89H,70H ,5fh;10e-9 DB 66H,0ABH,0CCH,77h;10e-8 DB 69H,0D6H,0bfH,95h;10e-7 BFLN: DB 6DH,86H,37H ,0bdh;10e-6 DB 70H,0A7H,0C5H,0ach;10e-5 DB 73H,0D1H,0B7H,17h;10e-4 DB 77H,83H,12H ,6fh;10e-3 DB 7AH,0A3H,0D7H,0ah;10e-2 DB 7DH,0CCH,0CcH,0cdh;10e-1 BFL0: DB 1,80H,00H ,00h;10e0 DB 4,0A0H,00H,00h;10e1 DB 7,0C8H,00H,00h;10e2 DB 0AH,0FAH,00H,00h;10e3 DB 0EH,9CH,40H,00h;10e4 DB 11H,0C3H,50H,00;10e5 DB 14H,0F4H,24H,00h;10e6 DB 18H,98H,96H,80h;10e7 DB 1BH,0BEH,0BCH,20h;10e8 DB 1EH,0EEH,6BH,28h;10e9 DB 22H,95H,02H,0f9h;10e10 DB 25H,0BAH,43H,0b7h;10e11 DB 28H,0E8H,0D4h,0a5h;10e12 DB 2CH,91H,84H,0e7h;10e13 DB 2FH,0B5H,0E6H,20h;10e14 DB 32H,0E3H,5fH,0a9h;10e15 DB 36H,8EH,1bH,0cah;10e16 DB 39H,0c1H,0A2H,0cdh;10e17 DB 3CH,0DEH,0BH,5bh;10e18 DB 40H,8AH,0d7H,23h;10e19 (3) 标号: FMUL 功能:浮点数乘法 入口条件:被乘数在[R0]中,乘数在[R1]中。 出口信息:OV=0时,积仍在[R0]中,OV=1时,溢出。 FMUL: LCALL MVR0 MOV A,@R0 XRL A,@R1 RLC A MOV 1FH,C LCALL MUL0 LJMP MOV0 MUL0: LCALL MVR1 mov 01h,02h mov 02h,03h mov 03h,04h mov 04h,05h ;;**************8 MUL1: ;*********** MOV A,R2 ;;第一尾数为零否? ORL A,R3 orl a,r4 JZ MUL6 MOV A,0dh ;;第二尾数为零否? ORL A,0eh orl a,0fh JZ MUL5;计算r2R3R4×r5R6R7-→r2R3R4 ;************ mov 08h,r0;jie_ma piont mov 09h,r1;jie_ma mov 01h,r2 mov 02h,r3 mov 03h,r4 ;************ MOV R0,#25;右移相加25次 CLR A MOV R6,A MOV R7,A;ACC,R6,R7为部分积累加器 CLR C LOOP1:JNC M2 CALL ADD0 ADDC A,R1;乘数移出位等于1 ,被乘数往部分积里加1次 M2:CALL SRA1 XCH A,R5 CPL RS0 CALL SRA CPL RS0;部分积带进位位整体右移1位 DJNZ R0,LOOP1 MOV R5,A JB ACC.7,M3;查积最高位 MOV A,0DH RLC A CALL H0;积最高位为0,积整体算术左移1位 JNB ACC.7,Mul3 CALL INC3;尾数截去部分四舍五入 SJMP mul3 M3: MOV A,0DH JNB ACC.7,mul3;2002 CALL INC3;尾数截去部分四舍五入 ;sjmp mul3 ;*************** MUL3: ;*********** mov r0,08h mov 03h,r5 mov 04h,r6 mov 05h,r7 ;************* MOV A,09h ADD A,0ch MD: MOV r2,A JB ACC.7,MUL4 JNB ACC.6,MUL6 MOV r2,#3FH SETB OV RET MUL4: JB ACC.6,MUL6 MUL5: CLR A mov r5,a ;out r2.r3r4r5=fu(2) MOV R3,A MOV R4,A MOV R2,#41H MUL6: CLR OV RET (4) 标号: FDIV 功能:浮点数除法 入口条件:被除数在[R0]中,除数在[R1]中。 出口信息:OV=0时,商仍在[R0]中,OV=1时,溢出。 FDIV: INC R0 MOV A,@R0 INC R0 ORL A,@R0 inc r0 orl a,@r0 dec r0 DEC R0 DEC R0 JNZ DIV1 MOV @R0,#41H CLR OV RET DIV1: INC R1 MOV A,@R1 INC R1 ORL A,@R1 inc r1 orl a,@r1 dec r1 DEC R1 DEC R1 JNZ DIV2 SETB OV RET DIV2: LCALL MVR0 MOV A,@R0 XRL A,@R1 RLC A MOV 1FH,C LCALL MVR1 LCALL DIV3 LJMP MOV0 DIV3: CLR C ;r3r4r5-r5"r6"r7" MOV A,R5 ;ASUBB A,0fh mov a,r4 subb a,0eh mov a,r3 subb a,0dh JC DIV4 CALL RR1 SJMP DIV3 DIV4: mov 08h,r0 mov 09h,r1 mov 0ah,r2 CLR A mov r0,a mov r1,a mov r2,a MOV B,#24 ;r3r4r5/r5"r6"r7"=>r0r1r2 DIV5: CLR C mov a,r2 rlc a mov r2,a MOV A,R1 RLC A MOV R1,A MOV A,R0 RLC A MOV R0,A MOV A,R5 RLC A MOV R5,A XCH A,R4 RLC A XCH A,R4 XCH A,R3 RLC A XCH A,R3 MOV F0,C CLR C SUBB A,0fh;r7" MOV r7,A ;r7 temp MOV A,R4 SUBB A,0eh MOV r6,A MOV A,R3 SUBB A,0dh ANL C,/F0 JC DIV6 MOV R3,A MOV 05h,07h;r7 mov 04h,06h INC R2 DIV6: DJNZ B,DIV5 MOV A,0dh CLR C RRC A SUBB A,R3 CLR A ADDC A,R2 MOV R5,A CLR A ADDC A,R1 MOV R4,A CLR A ADDC A,R0 MOV R3,A mov r0,08h mov r1,09h mov r2,0ah MOV A,R2 CLR C SUBB A,0ch LCALL MD LJMP RLN (5) 标号: FMOV 功能:浮点数传送 入口条件:源操作数在[R1]中,目标地址为[R0]。 出口信息:[R0]=[R1],[R1]不变。 FMOV: INC R0 INC R0 inc r0 INC R1 INC R1 inc r1 MOV A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R1 MOV @R0,A RET (6) 标号: FCMP 功能:浮点数代数值比较(不影响待比较操作数) 入口条件:待比较操作数分别在[R0]和[R1]中。 出口信息:若CY=1,则[R0] < [R1],若CY=0且A=0则 [R0] = [R1],否则[R0] > [R1]。 FCMP: MOV A,@R0 XRL A,@R1 JNB ACC.7,CMP2 MOV A,@R0 RLC A MOV A,#0FFH RET CMP2: MOV A,@R1 MOV C,ACC.6 MOV ACC.7,C MOV B,A MOV A,@R0 MOV C,ACC.7 MOV F0,C MOV C,ACC.6 MOV ACC.7,C CLR C SUBB A,B JZ CMP6 RLC A JNB F0,CMP5 CPL C CMP5: MOV A,#0FFH RET ;************ CMP6: INC R0 INC R0 inc r0 inc r1 INC R1 INC R1 CLR C MOV A,@R0 SUBB A,@R1 MOV B,A DEC R0 DEC R1 MOV A,@R0 SUBB A,@R1 DEC R0 DEC R1 ;*********** mov 0fh,a;r7" MOV A,@R0 SUBB A,@R1 dec r0 dec r1 ORL A,0fh orl a,b JZ CMP7 JNB F0,CMP7 CPL C CMP7: RET (7) 标号: FADD 功能:浮点数加法 入口条件:被加数在[R0]中,加数在[R1]中。 出口信息:OV=0时,和仍在[R0]中,OV=1时,溢出。 FADD: CLR F0 ;设立加法标志 SJMP AS ;计算代数和 FADD: CLR F0 SJMP AS (8) 标号: FSUB 功能:浮点数减法 入口条件:被减数在[R0]中,减数在[R1]中。 出口信息:OV=0时,差仍在[R0]中,OV=1时,溢出。 FSUB: SETB F0 AS: LCALL MVR1 MOV C,F0 RRC A XRL A,@R1 MOV C,ACC.7 ASN: MOV 1EH,C XRL A,@R0 RLC A MOV F0,C LCALL MVR0 LCALL AS1 MOV0: INC R0 INC R0 inc r0 mov a,r5 mov @r0,a dec r0 MOV A,R4 MOV @R0,A DEC R0 MOV A,R3 MOV @R0,A DEC R0 MOV A,R2 MOV C,1FH MOV ACC.7,C MOV @R0,A CLR ACC.7 CLR OV CJnE A,#3FH,MV01 SETB OV MV01: MOV A,@R0 RET MVR0: MOV A,@R0 MOV C,ACC.7 MOV 1FH,C MOV C,ACC.6 MOV ACC.7,C MOV R2,A INC R0 MOV A,@R0 MOV R3,A INC R0 MOV A,@R0 MOV R4,A inc r0 mov a,@r0 mov r5,a dec r0 DEC R0 DEC R0 RET MVR1: MOV A,@R1 MOV C,ACC.7 MOV 1EH,C MOV C,ACC.6 MOV ACC.7,C MOV 0ch,A ;r4" INC R1 MOV A,@R1 MOV 0dh,A INC R1 MOV A,@R1 MOV 0eh,A INC R1 MOV A,@R1 MOV 0fh,A dec r1 DEC R1 DEC R1 RET AS1: MOV A,0dh ORL A,0eh orl a,0fh JZ AS2 MOV A,R3 ORL A,R4 orl a,r5 JNZ EQ1 mov r3,0dh mov r4,0eh mov r5,0fh ;a2=>a1 ;************ MOV r2,0ch ;************ MOV C,1EH MOV 1FH,C AS2: RET EQ1: MOV A,R2 XRL A,0ch ;jie_ma JZ AS4 JB ACC.7,EQ3 MOV A,R2 CLR C SUBB A,0ch JC EQ4 EQ2: CLR C MOV A,0dh RRC A MOV 0dh,A MOV A,0eh RRC A MOV 0eh,A MOV A,0fh RRC A MOV 0fh,A ;********** INC 0ch ;********** ORL A,0eh orl a,0dh JNZ EQ1 MOV A,R2 MOV 0ch,A ;r4" SJMP AS4 EQ3: MOV A,R2 JNB ACC.7,EQ2 EQ4: CLR C LCALL RR1 ;*************8 orl a,r4 ORL A,R3 JNZ EQ1 MOV A,0ch MOV R2,A AS4: JB F0,AS5 ;**************** MOV A,R5 ADD A,0fh MOV R5,A MOV A,R4 ADDC A,0eh MOV R4,A MOV A,R3 ADDC A,0dh MOV R3,A JNC AS2 LJMP RR1 AS5: CLR C MOV A,R5 SUBB A,0fh MOV B,A ;************ MOV A,R4 SUBB A,0eh mov r6,a;*****temp MOV A,R3 SUBB A,0dh JC AS6 MOV R5,B MOV R3,A mov r4,06h LJMP RLN AS6: CPL 1FH CLR C MOV A,0fh SUBB A,R5 MOV R5,A MOV A,0eh SUBB A,R4 MOV R4,A MOV A,0dh SUBB A,R3 MOV R3,A RLN: MOV A,R3 ORL A,R4 orl a,r5;****2002.6.18 JNZ RLN1 MOV R2,#0C1H RET RLN1: MOV A,R3 JB ACC.7,RLN2 CLR C LCALL RL1 SJMP RLN RLN2: CLR OV RET ;***************** RL1: MOV A,R5 RLC A MOV R5,a ;******* MOV A,R4 RLC A MOV R4,A MOV A,R3 RLC A MOV R3,A DEC R2 CJNE R2,#0C0H,RL1E CLR A MOV R3,A MOV R4,A MOV R5,A MOV R2,#0C1H RL1E: CLR OV RET RR1: MOV A,R3 RRC A MOV R3,A MOV A,R4 RRC A MOV R4,A ;********* MOV A,R5 RRC A MOV R5,A ;*********** INC R2 CLR OV CJNE R2,#40H,RR1E MOV R2,#3FH SETB OV RR1E: RET (9)标号: DTOF 功能:三字节十六进制定点数转换成格式化浮点数 入口条件:三字节定点数的绝对值在[R0]中,数符在位1FH中,整数部分的位数在A中。 出口信息:转换成格式化浮点数在[R0]中(四字节)。 DTOF: MOV R2,A ;;按整数的位数初始化阶码 MOV 03h,@R0 ;;将定点数作尾数 INC R0 MOV 04h,@R0 inc r0 mov 05h,@r0 dec r0 DEC R0 LCALL RLN ;;进行规格化 LJMP MOV0 ;;传送结果到[R0]中 (10) 标号: FINT 功能:浮点取整函数 入口条件:操作数在[R0]中。 出口信息:结果仍在[R0]中。 FINT: LCALL MVR0 LCALL INT LJMP MOV0 ;**************** INT: MOV A,R3 ORL A,R4 orl a,r5 JNZ INTA CLR 1FH MOV R2,#41H RET INTA: MOV A,R2 JZ INTB JB ACC.7,INTB CLR C SUBB A,#24 ;;24 wei JC INTD RET INTB: CLR A MOV R5,A MOV R4,A MOV C,1FH rrc a MOV R3,A Rl A ;2002.6.20!!!!!!!!!! MOV R2,A JNZ INTC MOV R2,#41H INTC: RET INTD: CLR F0 INTE: CLR C LCALL RR1 ORL C,F0 MOV F0,C CJNE R2,#24,INTE JNB F0,INTF JNB 1FH,INTF INC R5 MOV A,R5 JNZ INTF mov a,r4 add a,#01;;;;in mov a,r3 addc a,#00 INTF: LJMP RLN ADD0:CLR C;双精度加法子程序 ADC0:XCH A,R7;双精度带进位位加法子程序 ADDC A,R3 XCH A,R7 XCH A,R6 ADDC A,R2 XCH A,R6 RET SRA0:CLR C;尾数逻辑右移1位子程序 SRA:XCH A,R5;尾数带进位位右移1位 SRA1:RRC A;A R6 R7带进位位右移1位,结果在R5 R6 R7中 XCH A,R5 XCH A,R6 RRC A XCH A,R6 XCH A,R7 RRC A XCH A,R7 RET INC3: mov a,r7 add a,#1 mov r7,a mov a,r6 addc a,#0 mov r6,a mov a,r5 addc a,#0 jnz inc321 mov a,#80h inc321: mov r5,a mov a,09h addc a,#0;2002.6.18 mov 09h,a RET0:RET H0: XCH A,R7;尾数带进位左移1位 RLC A XCH A,R7 XCH A,R6 RLC A XCH A,R6 XCH A,R5 RLC A XCH A,R5 push a dec 09h mov a,09h CJNE a,#0C0H,RL1E11 MOV R5,#0 MOV R6,#0 mov r7,#0 MOV 09h,#0C1H RL1E11: pop a CLR OV RET (11)标号: FSGN 功能:浮点符号函数
入口条件:操作数在[R0]中。 出口信息:累加器 A=1 时为正数,A=0FFH时为负数,A=0 时为零。 FSGN: INC R0 ;;读尾数 MOV A,@R0 INC R0 ORL A,@R0 INC R0 ORL A,@R0 dec r0 DEC R0 DEC R0 JNZ SGN RET ;;尾数为零,结束 SGN: MOV A,@R0 ;;读取操作数的阶码 RLC A ;;取数符 MOV A,#1 ;;按正数初始化 JNC SGN1 ;;是正数,结束 MOV A,#0FFH ;;是负数,改变标志 SGN1: RET (12) 标号: FCLR 功能:浮点数清零 入口条件:操作数在[R0]中。 出口信息:操作数被清零。 FCLR: INC R0 INC R0 inc r0 CLR A MOV @R0,A DEC R0 MOV @R0,A DEC R0 MOV @R0,A DEC R0 MOV @R0,#41H RET (13) 标号: FZER 功能:浮点数判零 入口条件:操作数在[R0]中。 出口信息:若累加器A为零,则操作数[R0]为零,否则不为零。 FZER: INC R0 mov a,@r0 INC R0 orl A,@R0 inc r0 orl a,@r0 dec r0 DEC R0 DEC R0 JNZ ZERO MOV @R0,#41H ZERO: RET (14) 标号: FPUSH 功能:浮点数压栈 入口条件:操作数在[R0]中。 出口信息:操作数压入栈顶。 FPUSH: POP ACC ;将返回地址保存在R2R3r4中 MOV R2,A POP ACC MOV R3,A pop acc mov r4,a ;******* MOV A,@R0 ;将操作数压入堆栈 PUSH ACC INC R0 MOV A,@R0 PUSH ACC INC R0 MOV A,@R0 PUSH ACC inc r0 mov a,@r0 push a dec r0 DEC R0 DEC R0 mov a,r4 push a MOV A,R3 ;将返回地址压入堆栈 PUSH ACC MOV A,R2 PUSH ACC RET ;*************** (15) 标号: FPOP 功能:浮点数出栈 入口条件:操作数处于栈顶。 出口信息:操作数弹至[R0]中。 FPOP: POP ACC ;将返回地址保存在R2R3r4中 MOV R2,A POP ACC MOV R3,A pop a mov r4,a ;********** INC R0 INC R0 inc r0 POP ACC ;将操作数弹出堆栈,传送到[R0]中 MOV @R0,A DEC R0 POP ACC MOV @R0,A DEC R0 POP ACC MOV @R0,A dec r0 pop a mov @R0,A MOV A,R4 PUSH A MOV A,R3 ;将返回地址压入堆栈 PUSH ACC MOV A,R2 PUSH ACC RET (16) 标号: FTOD 功能:格式化浮点数转换成双字节定点数 入口条件:格式化浮点操作数在[R0]中。 出口信息:OV=1时溢出,OV=0时转换成功:定点数的绝对值在[R0]中(双字节),数符 在位1FH中,F0=1 时为整数,CY=1时为一字节整数一字节小数,否则为纯小数。 FTOD: LCALL MVR0 ;;将[R0]传送到第一工作区 MOV A,R2 JZ FTD4 ;;阶码为零,纯小数 JB ACC.7,FTD4;;阶码为负,纯小数 SETB C SUBB A,#10H JC FTD1 SETB OV ;;阶码大于16,溢出 RET FTD1: SETB C MOV A,R2 SUBB A,#8 ;;阶码大于8否? JC FTD3 FTD2: MOV B,#10H ;;阶码大于8,按双字节整数转换 LCALL FTD8 SETB F0 ;;设立双字节整数标志 CLR C CLR OV RET FTD3: MOV B,#8 ;;按一字节整数一字节小数转换 LCALL FTD8 SETB C ;;设立一字节整数一字节小数标志 CLR F0 CLR OV RET FTD4: MOV B,#0 ;;按纯小数转换 LCALL FTD8 CLR OV ;;设立纯小数标志 CLR F0 CLR C RET FTD8: MOV A,R2 ;;按规定的整数位数进行右规 CJNE A,B,FTD9 MOV A,R3 ;;将双字节结果传送到[R0]中 MOV @R0,A INC R0 MOV A,R4 MOV @R0,A inc r0 MOV A,R5 MOV @R0,A DEC R0 dec r0 RET FTD9: CLR C LCALL RR1 ;右规一次 SJMP FTD8 7.uClinux上的应用程序设计 在Project目录下的Makefile文件如下: ########################################################### # # Makefile – Whole Project makefile. # # Copyright (c) 2001-2002, Tsinghua MAC # ########################################################### # # Get the core stuff worked out # ROOT_DIR = $(shell pwd) SRC_DIR = $(ROOT_DIR)/src CONFIG_DIR = $(ROOT_DIR)/config SCRIPTS_DIR = $(ROOT_DIR)/scripts CONFIG_SHELL := $(shell if [ -x "$$BASH" ]; then echo $$BASH; \ else if [ -x /bin/bash ]; then echo /bin/bash; \ else echo sh; fi ; fi) TOPDIR := $(shell if [ "$$PWD" != "" ]; then echo $$PWD; else pwd; fi) HPATH = $(TOPDIR)/include FINDHPATH = $(HPATH)/asm $(HPATH)/linux $(HPATH)/scsi $(HPATH)/net export ROOT_DIR SRC_DIR CONFIG_DIR SCRIPTS_DIR HPATH FINDHPATH ########################################################### # normal make targets # # .PHONY: all all: $(MAKE) -C $(SRC_DIR) all ########################################################### # # Config stuff, we recall ourselves to load the new config.arch before # running the kernel and other config scripts # .PHONY: config config: $(CONFIG_DIR)/config.in cd $(CONFIG_DIR); $(CONFIG_SHELL) $(SCRIPTS_DIR)/Configure $(CONFIG_DIR)/config.in @rm -f $(SRC_DIR)/arch.config @if egrep "^CONFIG_DEFAULTS_INTEL_I386" $(CONFIG_DIR)/.config > /dev/null; then \ ln -s "$(CONFIG_DIR)/arch.i386" $(SRC_DIR)/arch.config; \ fi @if egrep "^CONFIG_DEFAULTS_MOTOROLA_M5272C3" $(CONFIG_DIR)/.config > /dev/null; then \ ln -s "$(CONFIG_DIR)/arch.m68k" $(SRC_DIR)/arch.config; \ fi @echo "#This dir.config file is automaticly generated by make config!" > $(SRC_DIR)/dir.config @echo "ROOT_DIR="$(ROOT_DIR) >> $(SRC_DIR)/dir.config @echo "CONFIG_DIR="$(CONFIG_DIR) >> $(SRC_DIR)/dir.config @echo "SRC_DIR="$(SRC_DIR) >> $(SRC_DIR)/dir.config @echo "SCRIPTS_DIR="$(SCRIPTS_DIR) >> $(SRC_DIR)/dir.config @echo "HPATH="$(HPATH) >> $(SRC_DIR)/dir.config @echo "FINDPATH="$(FINDPATH) >> $(SRC_DIR)/dir.config ########################################################### # # normal make dependancy # # .PHONY: dep dep: $(MAKE) -C $(SRC_DIR) dep # This one removes all executables from the tree and forces their relinking clean: $(MAKE) -C $(SRC_DIR) clean test: $(MAKE) -C $(SRC_DIR) test run: $(MAKE) -C $(SRC_DIR) run config_error: @echo "*************************************************" @echo "You have not run make config." @echo "The build sequence for this source tree is:" @echo "1. "make config" or "make xconfig"" @echo "2. "make dep"" @echo "3. "make"" @echo "*************************************************" @exit 1 ########################################################### src目录下的Makefile文件,如下: VERSION = 2 PATCHLEVEL = 0 SUBLEVEL = 39 UCRELEASE = uc2 .EXPORT_ALL_VARIABLES: CONFIG_SHELL := $(shell if [ -x "$$BASH" ]; then echo $$BASH; \ else if [ -x /bin/bash ]; then echo /bin/bash; \ else echo sh; fi ; fi) TOPDIR := $(shell if [ "$$PWD" != "" ]; then echo $$PWD; else pwd; fi) TARGET = ESGateway all: $(TARGET) # Include the make variables (CC, etc...) # SUBDIRS = public serial packet cal xml fifo main interface $(TARGET): @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i all_targets; done linuxsubdirs: dummy set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i; done clean: @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i clean; done dep: @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i fastdep; done .PHONY: test test: @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i test; done run: # @set -e; for i in $(SUBDIRS); do $(MAKE) -i -C $$i run; read junk; done make -C main run src目录下的Rules.make文件给出了编译的一些规则,如下: # # This file contains rules which are shared between multiple Makefiles. # # # False targets. # .PHONY: dummy # # Special variables which should not be exported # unexport EXTRA_ASFLAGS unexport EXTRA_CFLAGS ifneq "$(ARCH)" "h8300" unexport EXTRA_LDFLAGS endif unexport EXTRA_ARFLAGS unexport SUBDIRS unexport SUB_DIRS unexport ALL_SUB_DIRS unexport MOD_SUB_DIRS unexport O_TARGET unexport O_OBJS unexport L_OBJS unexport M_OBJS unexport MI_OBJS unexport ALL_MOBJS # objects that export symbol tables unexport OX_OBJS unexport LX_OBJS unexport MX_OBJS unexport MIX_OBJS unexport SYMTAB_OBJS unexport MOD_LIST_NAME include ../dir.config include $(SRC_DIR)/arch.config # # Get things started. # first_rule: sub_dirs $(MAKE) all_targets # # Common rules # INC_DIR = -I$(SRC_DIR)/cal -I$(SRC_DIR)/xml -I$(SRC_DIR)/serial -I$(SRC_DIR)/packet -I$(SRC_DIR)/fifo -I$(SRC_DIR)/ping -I$(SRC_DIR)/interface -I$(SRC_DIR)/public %.o: %.c @echo "Compiling..." @echo "$<" $(CXX) $(INC_DIR) $(CFLAGS) $(EXTRA_CFLAGS) -c -o $@ $< %.o: %.cpp @echo "Compiling..." @echo "$<" $(CXX) $(INC_DIR) $(CFLAGS) $(EXTRA_CFLAGS) -c -o $@ $< # Rule to compile a set of .o files into one .o file # ifeq (.depend,$(wildcard .depend)) include .depend else .depend: fastdep endif ifneq ($(O_TARGET),$(O_OBJS)) $(O_TARGET): .depend $(O_OBJS) @echo "Linking..." @echo $(O_OBJS) " --> " $@ @$(LD) $(EXTRA_LDFLAGS) -r -o $@ $(O_OBJS) else $(O_TARGET): .depend endif # # # all: $(O_OBJS) echo all all_targets: $(O_OBJS) $(O_TARGET) # # # Rule to compile a set of .o files into one .a file # ifdef L_TARGET $(L_TARGET): $(LX_OBJS) $(L_OBJS) rm -f $@ $(AR) $(EXTRA_ARFLAGS) rcs $@ $(LX_OBJS) $(L_OBJS) endif # # This make dependencies quickly # fastdep: dummy @echo "make fastdep" if [ -n "$(wildcard *.[chS])" ]; then \ $(SCRIPTS_DIR)/mkdep *.[chS] > .depend; fi if [ -n "$(wildcard *.cpp)" ]; then \ $(SCRIPTS_DIR)/mkdep *.cpp >> .depend; fi # # A rule to make subdirectories # sub_dirs: dummy ifdef SUB_DIRS set -e; for i in $(SUB_DIRS); do $(MAKE) -C $$i; done endif # # A rule to do nothing # dummy: config: cd $(ROOT_DIR); make config c clean: rm -f *.o rm -f *.gdb rm -f .depend rm -f test rm -f core rm -f *.elf rm -f *.elf2flt # # This is useful for testing # script: $(SCRIPT) run: test @echo ... running ... @echo `pwd`/test @./test # # This sets version suffixes on exported symbols # Uses SYMTAB_OBJS # Separate the object into "normal" objects and "exporting" objects # Exporting objects are: all objects that define symbol tables # $(MX_OBJS): $(CC) $(CFLAGS) -DEXPORT_SYMTAB -c $(@:.o=.c) $(LX_OBJS) $(OX_OBJS): $(CC) $(CFLAGS) -DMODVERSIONS -DEXPORT_SYMTAB -c $(@:.o=.c) $(M_OBJS): ifdef MAKING_MODULES $(O_OBJS) $(L_OBJS): endif 在config 目录下,编写两个和架构有关的文件,对于x86平台,是arch.i386,如下: .EXPORT_ALL_VARIABLES: ################################################################### # # Vendor specific settings # CONSOLE_BAUD_RATE = 19200 ################################################################### # # The makefiles need to know how to do things in different contexts # To save some pain we put it all here # # First settings we always want for all build # # ARCH = kernel, TARGET_ARCH = uClibc MACHINE = i386 ARCH = i386 CROSS_COMPILE = CROSS = $(CROSS_COMPILE) # We"ve used -m5307 here because the bulk of the 5272 instruction timings # happen to be closer to the 5307 than the 5200 series. Luckily, the # actual instructions on the two processors are essentially identical. # This should be fixed at some stage. CPUFLAGS = CC = $(CROSS_COMPILE)gcc AS = $(CROSS_COMPILE)as CXX = $(CROSS_COMPILE)g++ AR = $(CROSS_COMPILE)ar LD = $(CROSS_COMPILE)ld OBJCOPY = $(CROSS_COMPILE)objcopy RANLIB = $(CROSS_COMPILE)ranlib STRIPTOOL = $(CROSS_COMPILE)strip STRIP = $(STRIPTOOL) UCLINUX_BUILD_SET = 0 # have we set a special config below ################################################################### # # General purpose lib building rules, uClibc.config uses these when # possible # ################################################################### # Settings for building user apps # CFLAGS = -Wall -Wstrict-prototypes -O2 -g #CFLAGS = -Wstrict-prototypes -g LDFLAGS = -m elf_i386 ################################################################### # fall through, do other config options perhaps # ifeq ($(UCLINUX_BUILD_SET),1) endif ################################################################### 在config 目录下,对于嵌入式平台,是arch.m68k,如下: .EXPORT_ALL_VARIABLES: ################################################################### # # Vendor specific settings # CONSOLE_BAUD_RATE = 19200 ################################################################### # # The makefiles need to know how to do things in different contexts # To save some pain we put it all here # # First settings we always want for all build # # ARCH = kernel, TARGET_ARCH = uClibc MACHINE = m68k ARCH = m68knommu CROSS_COMPILE = m68k-elf- CROSS = $(CROSS_COMPILE) # We"ve used -m5307 here because the bulk of the 5272 instruction timings # happen to be closer to the 5307 than the 5200 series. Luckily, the # actual instructions on the two processors are essentially identical. # This should be fixed at some stage. CPUFLAGS = -m5200 CC = $(CROSS_COMPILE)gcc AS = $(CROSS_COMPILE)as CXX = $(CROSS_COMPILE)g++ AR = $(CROSS_COMPILE)ar LD = $(CROSS_COMPILE)ld OBJCOPY = $(CROSS_COMPILE)objcopy RANLIB = $(CROSS_COMPILE)ranlib ELF2FLT = elf2flt STRIPTOOL = $(CROSS_COMPILE)strip STRIP = $(STRIPTOOL) UCLINUX_BUILD_SET = 0 # have we set a special config below ################################################################### # # Settings for building user apps # #CFLAGS = -m5200 -msep-data -g CFLAGS = -m5200 -msep-data LDFLAGS = -Wl,-elf2flt SYSLIBS = -lc -lstdc++ -lgcc ################################################################### # # fall through, do other config options perhaps # ifeq ($(UCLINUX_BUILD_SET),1) endif ################################################################### 在config 目录下的config.in文件如下: mainmenu_name "uClinux Configuration" mainmenu_option next_comment comment "Target Platform Selection" comment "Choose a Vendor/Product combination." choice "Vendor/Product [Intel/i386 | Motorola/M5307C3] " "1 CONFIG_DEFAULTS_INTEL_I386 \ 2 CONFIG_DEFAULTS_MOTOROLA_M5307C3 \ " Intel/i386 endmenubsp; /*产生停止位*/ return (1); /*错误*/ Delay(10); SDA = 1; return (0); } } return (1); /*错误*/ } 3.8 T2中断服务程序 T2中断服务程序int_timer2_handler用于发送、接受数据,每次中断发送或接受一位数据。程序清单如下: void int_timer2_handler(void) interrupt 0x22 { if (TX_RX) {/*接收模式*/ SCL = 1; bit_count++; if (bit_count <= 8) { if (SDA) rec_data |= mask; /*接收字节存于变量rec_data中*/ else { time_out = period; /*用于延时*/ SCL = 1; } mask = mask >> 1; SCL = 0; if (bit_count == 8) { DSDA = 1; /*设置SDA为输出*/ if (Ackge) /*置应答位*/ SDA = 1; else SDA = 0; } } else if (bit_count == 9) {/*一个字节接收结束*/ if (bit_count == 9) /*延时*/ { SCL = 1; SCL = 1; SCL = 1; T2IE = 0; /*中断复位*/ T3IE = 0; T2IR = 0; T3R = 0; COM_ON = 0; /*通信结束*/ SCL = 0; } } } /*发送模式*/ else { SCL = 1; bit_count++; if (bit_count <= 8) { temp_SDA = 0; if (mask & input_data) /*准备下一位*/ temp_SDA = 1; mask = mask >> 1; SCL = 0; if (bit_count != 8) SDA = temp_SDA; /*当时钟为低时发送一位数据 */ else DSDA = 0; /*释放SDA以接收ack位*/ } else if (bit_count == 9) { RecAck = SDA; /*在第9个时钟周期读应答位*/ if (bit_count == 9) /*延时*/ { SCL = 1; /*1字节发送结束*/ T2IE = 0; T3IE = 0; T2IR = 0; T3R = 0; COM_ON = 0; /*通信结束*/ SCL = 0; } } } /*发送结束*/ } 虚拟软件包见文件:I2c_hw。 6.MCS-51四字节浮点库及其使用说明
浮点库程序清单如下: 程序清单: (1) 标号: BTOF 功能:浮点BCD码转换成格式化浮点数 入口条件:浮点BCD码操作数在[R0]中。 出口信息:转换成的格式化浮点数仍在[R0]中。 BTOF: INC R0 INC R0 inc r0;read L MOV 07h,@R0 DEC R0 MOV 06h,@R0 DEC R0 mov 05h,@r0 ;r5r6r7=0.hml(dec) dec r0 ;;r0 to jie_ma mov a,r7 ORL A,R6 orl a,r5 jnz btf0 ;jb r5r6r7=0 MOV @R0,#41H RET BTF0: MOV A,@R0 MOV C,ACC.7 MOV 1DH,C CLR 1FH MOV C,ACC.6 MOV ACC.7,C MOV @R0,A JNC BTF1 ADD A,#19 JC BTF2 MOV @R0,#41H INC R0 MOV @R0,#0 INC R0 MOV @R0,#0 inc r0 MOV @R0,#0 DEC R0 DEC R0 dec r0 RET BTF1: SUBB A,#19 JC BTF2 MOV A,#3FH MOV C,1DH MOV ACC.7,C MOV @R0,A INC R0 MOV @R0,#0FFH INC R0 MOV @R0,#0FFH inc r0 MOV @R0,#0FFH dec r0 DEC R0 DEC R0 RET BTF2: CLR A ;use r1.r2r3r4 MOV R4,A MOV R3,A MOV R2,a mov r1,#24 ;3byte =3*8=24 BTF3: MOV A,R7 ADD A,R7 DA A MOV R7,A MOV A,R6 ADDC A,R6 DA A MOV R6,A mov a,r5 addc a,r5 da a mov r5,a;r5r6r7*2 MOV A,R4 RLC A MOV R4,A MOV A,R3 RLC A MOV R3,A mov a,r2 rlc a mov r2,a ;count .r5r6r7(10)=>.r2r3r4(2) DEC R1 JNB ACC.7,BTF3 MOV A,R5 ADD A,#0B0H CLR A ADDC A,R4 MOV R4,A CLR A ADDC A,R3 MOV R3,A CLR A ADDC A,R2 MOV R2,A JNC BTF4 MOV R2,#80H INC R1 BTF4: MOV DPTR,#BTFL MOV A,@R0 ADD A,#19 MOV B,#4 ;4 byte MUL AB ADD A,DPL MOV DPL,A JNC BTF5 INC DPH BTF5: CLR A MOVC A,@A+DPTR MOV C,ACC.6 MOV ACC.7,C MOV 0ch,A ;r4"=0ch MOV A,#1 MOVC A,@A+DPTR MOV 0dh,A MOV A,#2 MOVC A,@A+DPTR MOV 0eh,A MOV A,#3 MOVC A,@A+DPTR MOV 0fh,A LCALL MUL1 MOV C,1DH MOV 1FH,C LJMP MOV0 (2) 标号: FTOB 功能:格式化浮点数转换成浮点BCD码 入口条件:格式化浮点操作数在[R0]中。 出口信息:转换成的浮点BCD码仍在[R0]中。 FTOB: INC R0 MOV A,@R0 ;h INC R0 ORL A,@R0 ;m inc r0 orl a,@r0 ;l dec r0 DEC R0 DEC R0 JNZ FTB0 MOV @R0,#41H RET FTB0: MOV A,@R0 MOV C,ACC.7 MOV 1DH,C CLR ACC.7 MOV @R0,A LCALL MVR0 MOV DPTR,#BFL0 MOV B,#0 MOV A,R2 JNB ACC.7,FTB1 MOV DPTR,#BTFL MOV B,#0EDH ADD A,#16 JNC FTB1 MOV DPTR,#BFLN MOV B,#0FAH FTB1: CLR A MOVC A,@A+DPTR MOV C,ACC.6 MOV ACC.7,C MOV 0ch,A ;r4" MOV A,#1 MOVC A,@A+DPTR MOV 0dh,A MOV A,#2 MOVC A,@A+DPTR MOV 0eh,A MOV A,#3 MOVC A,@A+DPTR MOV 0fh,A MOV A,0ch ;r4" jie_ma CLR C SUBB A,R2 JB ACC.7,FTB2 JNZ FTB3 MOV A,0dh ;0.r5"r6"r7"-0.r3r4r5 CLR C SUBB A,R3 JC FTB2 JNZ FTB3 MOV A,0eh;r6"-r4;;;2002.6.18 CLR C SUBB A,r4 JC FTB2 JNZ FTB3 MOV 0ah,B INC 0ah MOV 0dh,#10h;0.100000 MOV r6,#0 MOV r7,#0 SJMP FTB6 FTB2: INC DPTR INC DPTR INC DPTR inc dptr ;4byte INC B SJMP FTB1 FTB3: PUSH B CALL DIV3 FTB4: MOV A,r2 JZ FTB5 CLR C LCALL RR1 SJMP FTB4 FTB5: POP 0ah LCALL HB2 MOV 0dh,A;r5" LCALL HB2 MOV R6,A LCALL HB2 MOV R7,A MOV A,R3 RLC A CLR A ADDC A,R7 DA A MOV R7,A CLR A ADDC A,R6 DA A MOV R6,A JNC FTB6 MOV R6,#10H INC 0dh FTB6: INC R0 INC R0 inc r0 MOV A,R7 MOV @R0,A DEC R0 MOV A,R6 MOV @R0,A DEC R0 MOV A,0dh mov @r0,a dec r0 mov a,0ah MOV C,1DH MOV ACC.7,C MOV @R0,A RET ;[r3r4r5*100]\10=>bcd1,2 HB2: MOV A,R5 MOV B,#100 MUL AB MOV R5,A MOV A,B XCH A,R4 MOV B,#100 MUL AB ADD A,R4 MOV R4,A ;JNC HB21 mov a,B addc a,#0 xch a ,r3 mov b,#100 mul ab add a,r3 mov r3,a mov a,b addc a,#0 HB21: ;MOV A,B MOV B,#10 DIV AB SWAP A ORL A,B RET BTFL: DB 41H,0ECH,1EH ,4ah;10e-19 DB 45H,93H,92H,0efh;10e-18 DB 48H,0B8H,77H,0aah;10e-17 DB 4BH,0E6H,95H,95h;10e-16 DB 4FH,90H,1DH ,7dh;10e-15 DB 52H,0B4H,24H,0dch;10e-14 DB 55H,0E1H,2EH,13h;10e-13 DB 59H,8CH,0BcH,0cch;10e-12 DB 5CH,0AFH,0EbH,0ffh;10e-11 DB 5FH,0DBH,0E6H,0ffh;10e-10 DB 63H,89H,70H ,5fh;10e-9 DB 66H,0ABH,0CCH,77h;10e-8 DB 69H,0D6H,0bfH,95h;10e-7 BFLN: DB 6DH,86H,37H ,0bdh;10e-6 DB 70H,0A7H,0C5H,0ach;10e-5 DB 73H,0D1H,0B7H,17h;10e-4 DB 77H,83H,12H ,6fh;10e-3 DB 7AH,0A3H,0D7H,0ah;10e-2 DB 7DH,0CCH,0CcH,0cdh;10e-1 BFL0: DB 1,80H,00H ,00h;10e0 DB 4,0A0H,00H,00h;10e1 DB 7,0C8H,00H,00h;10e2 DB 0AH,0FAH,00H,00h;10e3 DB 0EH,9CH,40H,00h;10e4 DB 11H,0C3H,50H,00;10e5 DB 14H,0F4H,24H,00h;10e6 DB 18H,98H,96H,80h;10e7 DB 1BH,0BEH,0BCH,20h;10e8 DB 1EH,0EEH,6BH,28h;10e9 DB 22H,95H,02H,0f9h;10e10 DB 25H,0BAH,43H,0b7h;10e11 DB 28H,0E8H,0D4h,0a5h;10e12 DB 2CH,91H,84H,0e7h;10e13 DB 2FH,0B5H,0E6H,20h;10e14 DB 32H,0E3H,5fH,0a9h;10e15 DB 36H,8EH,1bH,0cah;10e16 DB 39H,0c1H,0A2H,0cdh;10e17 DB 3CH,0DEH,0BH,5bh;10e18 DB 40H,8AH,0d7H,23h;10e19 (3) 标号: FMUL 功能:浮点数乘法 入口条件:被乘数在[R0]中,乘数在[R1]中。 出口信息:OV=0时,积仍在[R0]中,OV=1时,溢出。 FMUL: LCALL MVR0 MOV A,@R0 XRL A,@R1 RLC A MOV 1FH,C LCALL MUL0 LJMP MOV0 MUL0: LCALL MVR1 mov 01h,02h mov 02h,03h mov 03h,04h mov 04h,05h ;;**************8 MUL1: ;*********** MOV A,R2 ;;第一尾数为零否? ORL A,R3 orl a,r4 JZ MUL6 MOV A,0dh ;;第二尾数为零否? ORL A,0eh orl a,0fh JZ MUL5;计算r2R3R4×r5R6R7-→r2R3R4 ;************ mov 08h,r0;jie_ma piont mov 09h,r1;jie_ma mov 01h,r2 mov 02h,r3 mov 03h,r4 ;************ MOV R0,#25;右移相加25次 CLR A MOV R6,A MOV R7,A;ACC,R6,R7为部分积累加器 CLR C LOOP1:JNC M2 CALL ADD0 ADDC A,R1;乘数移出位等于1 ,被乘数往部分积里加1次 M2:CALL SRA1 XCH A,R5 CPL RS0 CALL SRA CPL RS0;部分积带进位位整体右移1位 DJNZ R0,LOOP1 MOV R5,A JB ACC.7,M3;查积最高位 MOV A,0DH RLC A CALL H0;积最高位为0,积整体算术左移1位 JNB ACC.7,Mul3 CALL INC3;尾数截去部分四舍五入 SJMP mul3 M3: MOV A,0DH JNB ACC.7,mul3;2002 CALL INC3;尾数截去部分四舍五入 ;sjmp mul3 ;*************** MUL3: ;*********** mov r0,08h mov 03h,r5 mov 04h,r6 mov 05h,r7 ;************* MOV A,09h ADD A,0ch MD: MOV r2,A JB ACC.7,MUL4 JNB ACC.6,MUL6 MOV r2,#3FH SETB OV RET MUL4: JB ACC.6,MUL6 MUL5: CLR A mov r5,a ;out r2.r3r4r5=fu(2) MOV R3,A MOV R4,A MOV R2,#41H MUL6: CLR OV RET (4) 标号: FDIV 功能:浮点数除法 入口条件:被除数在[R0]中,除数在[R1]中。 出口信息:OV=0时,商仍在[R0]中,OV=1时,溢出。 FDIV: INC R0 MOV A,@R0 INC R0 ORL A,@R0 inc r0 orl a,@r0 dec r0 DEC R0 DEC R0 JNZ DIV1 MOV @R0,#41H CLR OV RET DIV1: INC R1 MOV A,@R1 INC R1 ORL A,@R1 inc r1 orl a,@r1 dec r1 DEC R1 DEC R1 JNZ DIV2 SETB OV RET DIV2: LCALL MVR0 MOV A,@R0 XRL A,@R1 RLC A MOV 1FH,C LCALL MVR1 LCALL DIV3 LJMP MOV0 DIV3: CLR C ;r3r4r5-r5"r6"r7" MOV A,R5 ;ASUBB A,0fh mov a,r4 subb a,0eh mov a,r3 subb a,0dh JC DIV4 CALL RR1 SJMP DIV3 DIV4: mov 08h,r0 mov 09h,r1 mov 0ah,r2 CLR A mov r0,a mov r1,a mov r2,a MOV B,#24 ;r3r4r5/r5"r6"r7"=>r0r1r2 DIV5: CLR C mov a,r2 rlc a mov r2,a MOV A,R1 RLC A MOV R1,A MOV A,R0 RLC A MOV R0,A MOV A,R5 RLC A MOV R5,A XCH A,R4 RLC A XCH A,R4 XCH A,R3 RLC A XCH A,R3 MOV F0,C CLR C SUBB A,0fh;r7" MOV r7,A ;r7 temp MOV A,R4 SUBB A,0eh MOV r6,A MOV A,R3 SUBB A,0dh ANL C,/F0 JC DIV6 MOV R3,A MOV 05h,07h;r7 mov 04h,06h INC R2 DIV6: DJNZ B,DIV5 MOV A,0dh CLR C RRC A SUBB A,R3 CLR A ADDC A,R2 MOV R5,A CLR A ADDC A,R1 MOV R4,A CLR A ADDC A,R0 MOV R3,A mov r0,08h mov r1,09h mov r2,0ah MOV A,R2 CLR C SUBB A,0ch LCALL MD LJMP RLN (5) 标号: FMOV 功能:浮点数传送 入口条件:源操作数在[R1]中,目标地址为[R0]。 出口信息:[R0]=[R1],[R1]不变。 FMOV: INC R0 INC R0 inc r0 INC R1 INC R1 inc r1 MOV A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R1 MOV @R0,A RET (6) 标号: FCMP 功能:浮点数代数值比较(不影响待比较操作数) 入口条件:待比较操作数分别在[R0]和[R1]中。 出口信息:若CY=1,则[R0] < [R1],若CY=0且A=0则 [R0] = [R1],否则[R0] > [R1]。 FCMP: MOV A,@R0 XRL A,@R1 JNB ACC.7,CMP2 MOV A,@R0 RLC A MOV A,#0FFH RET CMP2: MOV A,@R1 MOV C,ACC.6 MOV ACC.7,C MOV B,A MOV A,@R0 MOV C,ACC.7 MOV F0,C MOV C,ACC.6 MOV ACC.7,C CLR C SUBB A,B JZ CMP6 RLC A JNB F0,CMP5 CPL C CMP5: MOV A,#0FFH RET ;************ CMP6: INC R0 INC R0 inc r0 inc r1 INC R1 INC R1 CLR C MOV A,@R0 SUBB A,@R1 MOV B,A DEC R0 DEC R1 MOV A,@R0 SUBB A,@R1 DEC R0 DEC R1 ;*********** mov 0fh,a;r7" MOV A,@R0 SUBB A,@R1 dec r0 dec r1 ORL A,0fh orl a,b JZ CMP7 JNB F0,CMP7 CPL C CMP7: RET (7) 标号: FADD 功能:浮点数加法 入口条件:被加数在[R0]中,加数在[R1]中。 出口信息:OV=0时,和仍在[R0]中,OV=1时,溢出。 FADD: CLR F0 ;设立加法标志 SJMP AS ;计算代数和 FADD: CLR F0 SJMP AS (8) 标号: FSUB 功能:浮点数减法 入口条件:被减数在[R0]中,减数在[R1]中。 出口信息:OV=0时,差仍在[R0]中,OV=1时,溢出。 FSUB: SETB F0 AS: LCALL MVR1 MOV C,F0 RRC A XRL A,@R1 MOV C,ACC.7 ASN: MOV 1EH,C XRL A,@R0 RLC A MOV F0,C LCALL MVR0 LCALL AS1 MOV0: INC R0 INC R0 inc r0 mov a,r5 mov @r0,a dec r0 MOV A,R4 MOV @R0,A DEC R0 MOV A,R3 MOV @R0,A DEC R0 MOV A,R2 MOV C,1FH MOV ACC.7,C MOV @R0,A CLR ACC.7 CLR OV CJnE A,#3FH,MV01 SETB OV MV01: MOV A,@R0 RET MVR0: MOV A,@R0 MOV C,ACC.7 MOV 1FH,C MOV C,ACC.6 MOV ACC.7,C MOV R2,A INC R0 MOV A,@R0 MOV R3,A INC R0 MOV A,@R0 MOV R4,A inc r0 mov a,@r0 mov r5,a dec r0 DEC R0 DEC R0 RET MVR1: MOV A,@R1 MOV C,ACC.7 MOV 1EH,C MOV C,ACC.6 MOV ACC.7,C MOV 0ch,A ;r4" INC R1 MOV A,@R1 MOV 0dh,A INC R1 MOV A,@R1 MOV 0eh,A INC R1 MOV A,@R1 MOV 0fh,A dec r1 DEC R1 DEC R1 RET AS1: MOV A,0dh ORL A,0eh orl a,0fh JZ AS2 MOV A,R3 ORL A,R4 orl a,r5 JNZ EQ1 mov r3,0dh mov r4,0eh mov r5,0fh ;a2=>a1 ;************ MOV r2,0ch ;************ MOV C,1EH MOV 1FH,C AS2: RET EQ1: MOV A,R2 XRL A,0ch ;jie_ma JZ AS4 JB ACC.7,EQ3 MOV A,R2 CLR C SUBB A,0ch JC EQ4 EQ2: CLR C MOV A,0dh RRC A MOV 0dh,A MOV A,0eh RRC A MOV 0eh,A MOV A,0fh RRC A MOV 0fh,A ;********** INC 0ch ;********** ORL A,0eh orl a,0dh JNZ EQ1 MOV A,R2 MOV 0ch,A ;r4" SJMP AS4 EQ3: MOV A,R2 JNB ACC.7,EQ2 EQ4: CLR C LCALL RR1 ;*************8 orl a,r4 ORL A,R3 JNZ EQ1 MOV A,0ch MOV R2,A AS4: JB F0,AS5 ;**************** MOV A,R5 ADD A,0fh MOV R5,A MOV A,R4 ADDC A,0eh MOV R4,A MOV A,R3 ADDC A,0dh MOV R3,A JNC AS2 LJMP RR1 AS5: CLR C MOV A,R5 SUBB A,0fh MOV B,A ;************ MOV A,R4 SUBB A,0eh mov r6,a;*****temp MOV A,R3 SUBB A,0dh JC AS6 MOV R5,B MOV R3,A mov r4,06h LJMP RLN AS6: CPL 1FH CLR C MOV A,0fh SUBB A,R5 MOV R5,A MOV A,0eh SUBB A,R4 MOV R4,A MOV A,0dh SUBB A,R3 MOV R3,A RLN: MOV A,R3 ORL A,R4 orl a,r5;****2002.6.18 JNZ RLN1 MOV R2,#0C1H RET RLN1: MOV A,R3 JB ACC.7,RLN2 CLR C LCALL RL1 SJMP RLN RLN2: CLR OV RET ;***************** RL1: MOV A,R5 RLC A MOV R5,a ;******* MOV A,R4 RLC A MOV R4,A MOV A,R3 RLC A MOV R3,A DEC R2 CJNE R2,#0C0H,RL1E CLR A MOV R3,A MOV R4,A MOV R5,A MOV R2,#0C1H RL1E: CLR OV RET RR1: MOV A,R3 RRC A MOV R3,A MOV A,R4 RRC A MOV R4,A ;********* MOV A,R5 RRC A MOV R5,A ;*********** INC R2 CLR OV CJNE R2,#40H,RR1E MOV R2,#3FH SETB OV RR1E: RET (9)标号: DTOF 功能:三字节十六进制定点数转换成格式化浮点数 入口条件:三字节定点数的绝对值在[R0]中,数符在位1FH中,整数部分的位数在A中。 出口信息:转换成格式化浮点数在[R0]中(四字节)。 DTOF: MOV R2,A ;;按整数的位数初始化阶码 MOV 03h,@R0 ;;将定点数作尾数 INC R0 MOV 04h,@R0 inc r0 mov 05h,@r0 dec r0 DEC R0 LCALL RLN ;;进行规格化 LJMP MOV0 ;;传送结果到[R0]中 (10) 标号: FINT 功能:浮点取整函数 入口条件:操作数在[R0]中。 出口信息:结果仍在[R0]中。 FINT: LCALL MVR0 LCALL INT LJMP MOV0 ;**************** INT: MOV A,R3 ORL A,R4 orl a,r5 JNZ INTA CLR 1FH MOV R2,#41H RET INTA: MOV A,R2 JZ INTB JB ACC.7,INTB CLR C SUBB A,#24 ;;24 wei JC INTD RET INTB: CLR A MOV R5,A MOV R4,A MOV C,1FH rrc a MOV R3,A Rl A ;2002.6.20!!!!!!!!!! MOV R2,A JNZ INTC MOV R2,#41H INTC: RET INTD: CLR F0 INTE: CLR C LCALL RR1 ORL C,F0 MOV F0,C CJNE R2,#24,INTE JNB F0,INTF JNB 1FH,INTF INC R5 MOV A,R5 JNZ INTF mov a,r4 add a,#01;;;;in mov a,r3 addc a,#00 INTF: LJMP RLN ADD0:CLR C;双精度加法子程序 ADC0:XCH A,R7;双精度带进位位加法子程序 ADDC A,R3 XCH A,R7 XCH A,R6 ADDC A,R2 XCH A,R6 RET SRA0:CLR C;尾数逻辑右移1位子程序 SRA:XCH A,R5;尾数带进位位右移1位 SRA1:RRC A;A R6 R7带进位位右移1位,结果在R5 R6 R7中 XCH A,R5 XCH A,R6 RRC A XCH A,R6 XCH A,R7 RRC A XCH A,R7 RET INC3: mov a,r7 add a,#1 mov r7,a mov a,r6 addc a,#0 mov r6,a mov a,r5 addc a,#0 jnz inc321 mov a,#80h inc321: mov r5,a mov a,09h addc a,#0;2002.6.18 mov 09h,a RET0:RET H0: XCH A,R7;尾数带进位左移1位 RLC A XCH A,R7 XCH A,R6 RLC A XCH A,R6 XCH A,R5 RLC A XCH A,R5 push a dec 09h mov a,09h CJNE a,#0C0H,RL1E11 MOV R5,#0 MOV R6,#0 mov r7,#0 MOV 09h,#0C1H RL1E11: pop a CLR OV RET (11)标号: FSGN 功能:浮点符号函数
入口条件:操作数在[R0]中。 出口信息:累加器 A=1 时为正数,A=0FFH时为负数,A=0 时为零。 FSGN: INC R0 ;;读尾数 MOV A,@R0 INC R0 ORL A,@R0 INC R0 ORL A,@R0 dec r0 DEC R0 DEC R0 JNZ SGN RET ;;尾数为零,结束 SGN: MOV A,@R0 ;;读取操作数的阶码 RLC A ;;取数符 MOV A,#1 ;;按正数初始化 JNC SGN1 ;;是正数,结束 MOV A,#0FFH ;;是负数,改变标志 SGN1: RET (12) 标号: FCLR 功能:浮点数清零 入口条件:操作数在[R0]中。 出口信息:操作数被清零。 FCLR: INC R0 INC R0 inc r0 CLR A MOV @R0,A DEC R0 MOV @R0,A DEC R0 MOV @R0,A DEC R0 MOV @R0,#41H RET (13) 标号: FZER 功能:浮点数判零 入口条件:操作数在[R0]中。 出口信息:若累加器A为零,则操作数[R0]为零,否则不为零。 FZER: INC R0 mov a,@r0 INC R0 orl A,@R0 inc r0 orl a,@r0 dec r0 DEC R0 DEC R0 JNZ ZERO MOV @R0,#41H ZERO: RET (14) 标号: FPUSH 功能:浮点数压栈 入口条件:操作数在[R0]中。 出口信息:操作数压入栈顶。 FPUSH: POP ACC ;将返回地址保存在R2R3r4中 MOV R2,A POP ACC MOV R3,A pop acc mov r4,a ;******* MOV A,@R0 ;将操作数压入堆栈 PUSH ACC INC R0 MOV A,@R0 PUSH ACC INC R0 MOV A,@R0 PUSH ACC inc r0 mov a,@r0 push a dec r0 DEC R0 DEC R0 mov a,r4 push a MOV A,R3 ;将返回地址压入堆栈 PUSH ACC MOV A,R2 PUSH ACC RET ;*************** (15) 标号: FPOP 功能:浮点数出栈 入口条件:操作数处于栈顶。 出口信息:操作数弹至[R0]中。 FPOP: POP ACC ;将返回地址保存在R2R3r4中 MOV R2,A POP ACC MOV R3,A pop a mov r4,a ;********** INC R0 INC R0 inc r0 POP ACC ;将操作数弹出堆栈,传送到[R0]中 MOV @R0,A DEC R0 POP ACC MOV @R0,A DEC R0 POP ACC MOV @R0,A dec r0 pop a mov @R0,A MOV A,R4 PUSH A MOV A,R3 ;将返回地址压入堆栈 PUSH ACC MOV A,R2 PUSH ACC RET (16) 标号: FTOD 功能:格式化浮点数转换成双字节定点数 入口条件:格式化浮点操作数在[R0]中。 出口信息:OV=1时溢出,OV=0时转换成功:定点数的绝对值在[R0]中(双字节),数符 在位1FH中,F0=1 时为整数,CY=1时为一字节整数一字节小数,否则为纯小数。 FTOD: LCALL MVR0 ;;将[R0]传送到第一工作区 MOV A,R2 JZ FTD4 ;;阶码为零,纯小数 JB ACC.7,FTD4;;阶码为负,纯小数 SETB C SUBB A,#10H JC FTD1 SETB OV ;;阶码大于16,溢出 RET FTD1: SETB C MOV A,R2 SUBB A,#8 ;;阶码大于8否? JC FTD3 FTD2: MOV B,#10H ;;阶码大于8,按双字节整数转换 LCALL FTD8 SETB F0 ;;设立双字节整数标志 CLR C CLR OV RET FTD3: MOV B,#8 ;;按一字节整数一字节小数转换 LCALL FTD8 SETB C ;;设立一字节整数一字节小数标志 CLR F0 CLR OV RET FTD4: MOV B,#0 ;;按纯小数转换 LCALL FTD8 CLR OV ;;设立纯小数标志 CLR F0 CLR C RET FTD8: MOV A,R2 ;;按规定的整数位数进行右规 CJNE A,B,FTD9 MOV A,R3 ;;将双字节结果传送到[R0]中 MOV @R0,A INC R0 MOV A,R4 MOV @R0,A inc r0 MOV A,R5 MOV @R0,A DEC R0 dec r0 RET FTD9: CLR C LCALL RR1 ;右规一次 SJMP FTD8 7.uClinux上的应用程序设计 在Project目录下的Makefile文件如下: ########################################################### # # Makefile – Whole Project makefile. # # Copyright (c) 2001-2002, Tsinghua MAC # ########################################################### # # Get the core stuff worked out # ROOT_DIR = $(shell pwd) SRC_DIR = $(ROOT_DIR)/src CONFIG_DIR = $(ROOT_DIR)/config SCRIPTS_DIR = $(ROOT_DIR)/scripts CONFIG_SHELL := $(shell if [ -x "$$BASH" ]; then echo $$BASH; \ else if [ -x /bin/bash ]; then echo /bin/bash; \ else echo sh; fi ; fi) TOPDIR := $(shell if [ "$$PWD" != "" ]; then echo $$PWD; else pwd; fi) HPATH = $(TOPDIR)/include FINDHPATH = $(HPATH)/asm $(HPATH)/linux $(HPATH)/scsi $(HPATH)/net export ROOT_DIR SRC_DIR CONFIG_DIR SCRIPTS_DIR HPATH FINDHPATH ########################################################### # normal make targets # # .PHONY: all all: $(MAKE) -C $(SRC_DIR) all ########################################################### # # Config stuff, we recall ourselves to load the new config.arch before # running the kernel and other config scripts # .PHONY: config config: $(CONFIG_DIR)/config.in cd $(CONFIG_DIR); $(CONFIG_SHELL) $(SCRIPTS_DIR)/Configure $(CONFIG_DIR)/config.in @rm -f $(SRC_DIR)/arch.config @if egrep "^CONFIG_DEFAULTS_INTEL_I386" $(CONFIG_DIR)/.config > /dev/null; then \ ln -s "$(CONFIG_DIR)/arch.i386" $(SRC_DIR)/arch.config; \ fi @if egrep "^CONFIG_DEFAULTS_MOTOROLA_M5272C3" $(CONFIG_DIR)/.config > /dev/null; then \ ln -s "$(CONFIG_DIR)/arch.m68k" $(SRC_DIR)/arch.config; \ fi @echo "#This dir.config file is automaticly generated by make config!" > $(SRC_DIR)/dir.config @echo "ROOT_DIR="$(ROOT_DIR) >> $(SRC_DIR)/dir.config @echo "CONFIG_DIR="$(CONFIG_DIR) >> $(SRC_DIR)/dir.config @echo "SRC_DIR="$(SRC_DIR) >> $(SRC_DIR)/dir.config @echo "SCRIPTS_DIR="$(SCRIPTS_DIR) >> $(SRC_DIR)/dir.config @echo "HPATH="$(HPATH) >> $(SRC_DIR)/dir.config @echo "FINDPATH="$(FINDPATH) >> $(SRC_DIR)/dir.config ########################################################### # # normal make dependancy # # .PHONY: dep dep: $(MAKE) -C $(SRC_DIR) dep # This one removes all executables from the tree and forces their relinking clean: $(MAKE) -C $(SRC_DIR) clean test: $(MAKE) -C $(SRC_DIR) test run: $(MAKE) -C $(SRC_DIR) run config_error: @echo "*************************************************" @echo "You have not run make config." @echo "The build sequence for this source tree is:" @echo "1. "make config" or "make xconfig"" @echo "2. "make dep"" @echo "3. "make"" @echo "*************************************************" @exit 1 ########################################################### src目录下的Makefile文件,如下: VERSION = 2 PATCHLEVEL = 0 SUBLEVEL = 39 UCRELEASE = uc2 .EXPORT_ALL_VARIABLES: CONFIG_SHELL := $(shell if [ -x "$$BASH" ]; then echo $$BASH; \ else if [ -x /bin/bash ]; then echo /bin/bash; \ else echo sh; fi ; fi) TOPDIR := $(shell if [ "$$PWD" != "" ]; then echo $$PWD; else pwd; fi) TARGET = ESGateway all: $(TARGET) # Include the make variables (CC, etc...) # SUBDIRS = public serial packet cal xml fifo main interface $(TARGET): @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i all_targets; done linuxsubdirs: dummy set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i; done clean: @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i clean; done dep: @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i fastdep; done .PHONY: test test: @set -e; for i in $(SUBDIRS); do $(MAKE) -C $$i test; done run: # @set -e; for i in $(SUBDIRS); do $(MAKE) -i -C $$i run; read junk; done make -C main run src目录下的Rules.make文件给出了编译的一些规则,如下: # # This file contains rules which are shared between multiple Makefiles. # # # False targets. # .PHONY: dummy # # Special variables which should not be exported # unexport EXTRA_ASFLAGS unexport EXTRA_CFLAGS ifneq "$(ARCH)" "h8300" unexport EXTRA_LDFLAGS endif unexport EXTRA_ARFLAGS unexport SUBDIRS unexport SUB_DIRS unexport ALL_SUB_DIRS unexport MOD_SUB_DIRS unexport O_TARGET unexport O_OBJS unexport L_OBJS unexport M_OBJS unexport MI_OBJS unexport ALL_MOBJS # objects that export symbol tables unexport OX_OBJS unexport LX_OBJS unexport MX_OBJS unexport MIX_OBJS unexport SYMTAB_OBJS unexport MOD_LIST_NAME include ../dir.config include $(SRC_DIR)/arch.config # # Get things started. # first_rule: sub_dirs $(MAKE) all_targets # # Common rules # INC_DIR = -I$(SRC_DIR)/cal -I$(SRC_DIR)/xml -I$(SRC_DIR)/serial -I$(SRC_DIR)/packet -I$(SRC_DIR)/fifo -I$(SRC_DIR)/ping -I$(SRC_DIR)/interface -I$(SRC_DIR)/public %.o: %.c @echo "Compiling..." @echo "$<" $(CXX) $(INC_DIR) $(CFLAGS) $(EXTRA_CFLAGS) -c -o $@ $< %.o: %.cpp @echo "Compiling..." @echo "$<" $(CXX) $(INC_DIR) $(CFLAGS) $(EXTRA_CFLAGS) -c -o $@ $< # Rule to compile a set of .o files into one .o file # ifeq (.depend,$(wildcard .depend)) include .depend else .depend: fastdep endif ifneq ($(O_TARGET),$(O_OBJS)) $(O_TARGET): .depend $(O_OBJS) @echo "Linking..." @echo $(O_OBJS) " --> " $@ @$(LD) $(EXTRA_LDFLAGS) -r -o $@ $(O_OBJS) else $(O_TARGET): .depend endif # # # all: $(O_OBJS) echo all all_targets: $(O_OBJS) $(O_TARGET) # # # Rule to compile a set of .o files into one .a file # ifdef L_TARGET $(L_TARGET): $(LX_OBJS) $(L_OBJS) rm -f $@ $(AR) $(EXTRA_ARFLAGS) rcs $@ $(LX_OBJS) $(L_OBJS) endif # # This make dependencies quickly # fastdep: dummy @echo "make fastdep" if [ -n "$(wildcard *.[chS])" ]; then \ $(SCRIPTS_DIR)/mkdep *.[chS] > .depend; fi if [ -n "$(wildcard *.cpp)" ]; then \ $(SCRIPTS_DIR)/mkdep *.cpp >> .depend; fi # # A rule to make subdirectories # sub_dirs: dummy ifdef SUB_DIRS set -e; for i in $(SUB_DIRS); do $(MAKE) -C $$i; done endif # # A rule to do nothing # dummy: config: cd $(ROOT_DIR); make config c clean: rm -f *.o rm -f *.gdb rm -f .depend rm -f test rm -f core rm -f *.elf rm -f *.elf2flt # # This is useful for testing # script: $(SCRIPT) run: test @echo ... running ... @echo `pwd`/test @./test # # This sets version suffixes on exported symbols # Uses SYMTAB_OBJS # Separate the object into "normal" objects and "exporting" objects # Exporting objects are: all objects that define symbol tables # $(MX_OBJS): $(CC) $(CFLAGS) -DEXPORT_SYMTAB -c $(@:.o=.c) $(LX_OBJS) $(OX_OBJS): $(CC) $(CFLAGS) -DMODVERSIONS -DEXPORT_SYMTAB -c $(@:.o=.c) $(M_OBJS): ifdef MAKING_MODULES $(O_OBJS) $(L_OBJS): endif 在config 目录下,编写两个和架构有关的文件,对于x86平台,是arch.i386,如下: .EXPORT_ALL_VARIABLES: ################################################################### # # Vendor specific settings # CONSOLE_BAUD_RATE = 19200 ################################################################### # # The makefiles need to know how to do things in different contexts # To save some pain we put it all here # # First settings we always want for all build # # ARCH = kernel, TARGET_ARCH = uClibc MACHINE = i386 ARCH = i386 CROSS_COMPILE = CROSS = $(CROSS_COMPILE) # We"ve used -m5307 here because the bulk of the 5272 instruction timings # happen to be closer to the 5307 than the 5200 series. Luckily, the # actual instructions on the two processors are essentially identical. # This should be fixed at some stage. CPUFLAGS = CC = $(CROSS_COMPILE)gcc AS = $(CROSS_COMPILE)as CXX = $(CROSS_COMPILE)g++ AR = $(CROSS_COMPILE)ar LD = $(CROSS_COMPILE)ld OBJCOPY = $(CROSS_COMPILE)objcopy RANLIB = $(CROSS_COMPILE)ranlib STRIPTOOL = $(CROSS_COMPILE)strip STRIP = $(STRIPTOOL) UCLINUX_BUILD_SET = 0 # have we set a special config below ################################################################### # # General purpose lib building rules, uClibc.config uses these when # possible # ################################################################### # Settings for building user apps # CFLAGS = -Wall -Wstrict-prototypes -O2 -g #CFLAGS = -Wstrict-prototypes -g LDFLAGS = -m elf_i386 ################################################################### # fall through, do other config options perhaps # ifeq ($(UCLINUX_BUILD_SET),1) endif ################################################################### 在config 目录下,对于嵌入式平台,是arch.m68k,如下: .EXPORT_ALL_VARIABLES: ################################################################### # # Vendor specific settings # CONSOLE_BAUD_RATE = 19200 ################################################################### # # The makefiles need to know how to do things in different contexts # To save some pain we put it all here # # First settings we always want for all build # # ARCH = kernel, TARGET_ARCH = uClibc MACHINE = m68k ARCH = m68knommu CROSS_COMPILE = m68k-elf- CROSS = $(CROSS_COMPILE) # We"ve used -m5307 here because the bulk of the 5272 instruction timings # happen to be closer to the 5307 than the 5200 series. Luckily, the # actual instructions on the two processors are essentially identical. # This should be fixed at some stage. CPUFLAGS = -m5200 CC = $(CROSS_COMPILE)gcc AS = $(CROSS_COMPILE)as CXX = $(CROSS_COMPILE)g++ AR = $(CROSS_COMPILE)ar LD = $(CROSS_COMPILE)ld OBJCOPY = $(CROSS_COMPILE)objcopy RANLIB = $(CROSS_COMPILE)ranlib ELF2FLT = elf2flt STRIPTOOL = $(CROSS_COMPILE)strip STRIP = $(STRIPTOOL) UCLINUX_BUILD_SET = 0 # have we set a special config below ################################################################### # # Settings for building user apps # #CFLAGS = -m5200 -msep-data -g CFLAGS = -m5200 -msep-data LDFLAGS = -Wl,-elf2flt SYSLIBS = -lc -lstdc++ -lgcc ################################################################### # # fall through, do other config options perhaps # ifeq ($(UCLINUX_BUILD_SET),1) endif ################################################################### 在config 目录下的config.in文件如下: mainmenu_name "uClinux Configuration" mainmenu_option next_comment comment "Target Platform Selection" comment "Choose a Vendor/Product combination." choice "Vendor/Product [Intel/i386 | Motorola/M5307C3] " "1 CONFIG_DEFAULTS_INTEL_I386 \ 2 CONFIG_DEFAULTS_MOTOROLA_M5307C3 \ " Intel/i386 endmenu 1、 本站不保证以上观点正确,就算是本站原创作品,本站也不保证内容正确。 2、如果您拥有本文版权,并且不想在本站转载,请书面通知本站立即删除并且向您公开道歉! |
本站协议 |
版权信息 |
关于我们 |
本站地图 |
营业执照 |
发票说明 |
付款方式 |
联系方式
深圳市宝安区西乡五壹电子商行——粤ICP备16073394号-1;地址:深圳西乡河西四坊183号;邮编:518102 E-mail:51dz$163.com($改为@);Tel:(0755)27947428 工作时间:9:30-12:00和13:30-17:30和18:30-20:30,无人接听时可以再打手机13537585389 |