/*
****************************************************************************************************
*               沈陽市萬柳塘路56號
*       (c)著作權2005,世信匯誠電子版權所有
*     世信匯誠電子的源代碼是不公開, 屬于世信匯誠電子的企業機密文件, 任何未經允許使用
* 或發表的行為都是違法行,任何個人或組織嘗試或者參與修改源代碼的行為,都應盡早得到世信
* 匯誠電子設計組的同意.
*             
* 版本號:1.0
* 作  者:linan4526
* 日  期:2005-05-08
*---------------------------------------------------------------------------------------------------
* 描  述:SXHC－I型MCU51實驗
****************************************************************************************************
*/
#pragma REGPARMS CD DB SB OE OT(5)
#include <all.h>

/************************************************************************
函數功能:	初始化數據緩沖區
入口參數:	bLen:	長度
			*bpData:數據緩沖區首地址
			bValue:	初始化值
出口參數:	無
************************************************************************/
void Init_Array_Func(byte bLen,byte *bpData,byte bValue)
{
	for (; bLen!=0; bLen--)
	{
		*bpData=bValue;
		bpData++;
	}
}
/************************************************************************
函數功能:	二進制數轉換為十進制數
入口參數:	dwBin:		二進制數（無符號長整型）
			*bpBcd:		轉換后的十進制數首址
出口參數:	轉換的十進制數的個數
************************************************************************/
byte Bin_Bcd_Func(dword dwBin,byte *bpBcd) 
{
	byte bpTemp[10],bI,bJ;
	dword dwTemp;
	
	if(!dwBin)
	{
		bpBcd[0] = 0;
		return 1;
	}
	dwTemp = dwBin;
	bI = 0;
	while(1)
	{
		if(!dwTemp)
			break;
		bJ = dwTemp % 10;
		dwTemp /= 10;
		bpTemp[bI] = bJ;
		bI++;
	}
	for(bJ = 0; bJ < bI; bJ++)
		bpBcd[bJ] = bpTemp[bI-bJ-1];
	return bI;
}
/************************************************************************
函數功能:	將數組數據右移若干位
入口參數:	*bpData:	數據流首址
			bSteps:		右移位數
			bLen:		移動前數據流長度
			bFill:		補入的數據值
出口參數:	移動后數據流長度
************************************************************************/
byte Right_Move(byte *bpData,byte bSteps,byte bLen,byte bFill)
{
	byte bI;

	for(bI = bLen; bI > 0; bI--)
		bpData[bI + bSteps - 1] = bpData[bI - 1];
	for(bI = 0; bI < bSteps; bI++)
		bpData[bI] = bFill;
	return (bSteps + bLen);
}