/*************************************************************************************
*????步進電機（雙四拍方式）															?*
*?																					?*
*????										?*
*;???雙四拍工作方式：???????????????????????????????????????????????????????????	?*
*;???正轉：A/B???AB???AB/??A/B/??????								?????????????????*
*????反轉：A/B/??AB/??AB???A/B
*????
*????UDN2916電流控制真值表：
*	?I0????I1???????輸出電流
*	??L	????L		??最大
*	??H		L		??最大*2/3
*	??L		H		??最大*1/3
*?????H?????H?????????0	?????????????????????????????????????????????????????????????*
*???????????????????	??????????????????????????						*
**************************************************************************************/??


#define?speed?2
?//Motor
sbit?PH1?=?P1^0;	??//定義管腳
sbit?PH2?=?P1^1;
sbit?I01?=?P1^2;
sbit?I11?=?P1^3;
sbit?I02?=?P1^4;
sbit?I12?=?P1^5;



void?delay（int?time）;

/***************************************
函數功能：產生脈沖控制步進機
正轉：A/B???AB???AB/??A/B/?
I0?I1?為低電平時，均以最大電流輸出
**************************************/
//正轉

void?Go1（）
{	?//A
????????PH1?=?0;??//PH1為0?則A線圈為反向電流
????????I01?=?0;
	I11?=?0;
	

	PH2?=?1;???//PH2為1?則B線圈為正向電流
	I02?=?0;
	I12?=?0;

	delay（speed）;
	//0
	PH1?=?1;??//PH1為1?則A線圈為正向電流
????????I01?=?0;
	I11?=?0;
	

	PH2?=?1;??//PH2為1?則B線圈為正向電流
	I02?=?0;
	I12?=?0;

	delay（speed）;
	//B
	PH1?=?1;??//PH1為1?則A線圈為正向電流
????????I01?=?0;
	I11?=?0;
	

	PH2?=?0;???//PH2為0?則B線圈為反向電流
	I02?=?0;
	I12?=?0;
	
	delay（speed）;
	//0
	PH1?=?0;??//PH1為0?則A線圈為反向電流
	I01?=?0;
	I11?=?0;
	

	PH2?=?0;??//PH2為0?則B線圈為反向電流?
	I02?=?0;
	I12?=?0;
?????????????
	delay（speed）;
	
	
}



//反轉

void?Go2（）
{
????????
????????//B
	PH1?=?1;??//PH1為1?則A線圈為正向電流
????????I01?=?0;
	I11?=?0;
	

	PH2?=?0;???//PH2為0?則B線圈為反向電流
	I02?=?0;
	I12?=?0;
	
	delay（speed）;

????????//0
	PH1?=?1;??//PH1為1?則A線圈為正向電流
????????I01?=?0;
	I11?=?0;
	

	PH2?=?1;??//PH2為1?則B線圈為正向電流
	I02?=?0;
	I12?=?0;

	delay（speed）;

????????//A
????????PH1?=?0;??//PH1為0?則A線圈為反向電流
????????I01?=?0;
	I11?=?0;
	

	PH2?=?1;???//PH2為1?則B線圈為正向電流
	I02?=?0;
	I12?=?0;

	delay（speed）;
????????

????????//0
	PH1?=?0;??//PH1為0?則A線圈為反向電流
	I01?=?0;
	I11?=?0;
	

	PH2?=?0;??//PH2為0?則B線圈為反向電流?
	I02?=?0;
	I12?=?0;
?????????????
	delay（speed）;

????????
	
	
	
	
	
	
}
/*******************延時函數****************************/
void?delay（int?time）
{?
??int?ij;
??
??for（j=0;?j?<=?time;?j++）
???for（i?=0?;?i?<=?120;?i++）;
}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????17529??2014-06-02?00:01??太陽追蹤系統\C語言程序.docx

?????文件?????141703??2014-05-27?13:09??太陽追蹤系統\介紹\1323312033.jpg

?????文件??????77688??2014-05-27?13:11??太陽追蹤系統\介紹\20093261012373499.jpg

?????文件?????207870??2014-05-27?15:21??太陽追蹤系統\介紹\460642_145321186151_2.jpg

?????文件?????132438??2014-05-27?15:20??太陽追蹤系統\介紹\Img319465053.jpg

?????文件?????116888??2014-05-27?15:21??太陽追蹤系統\介紹\OOOPIC_shawlei_200911188292a51f12a8becb.jpg

?????文件??????75448??2014-05-27?13:10??太陽追蹤系統\介紹\proxy.jpg

?????文件??????25275??2014-05-27?13:11??太陽追蹤系統\介紹\Step_motor1_3.gif

?????文件????2933760??2014-05-31?13:59??太陽追蹤系統\介紹\基于51的太陽追蹤系統.ppt

?????文件???????2702??2014-05-20?16:13??太陽追蹤系統\工程文件\BJ.c

?????文件???????6893??2014-05-19?21:07??太陽追蹤系統\工程文件\BJ.LST

?????文件???????3554??2014-05-19?21:07??太陽追蹤系統\工程文件\BJ.OBJ

?????文件???????3429??2014-05-24?13:13??太陽追蹤系統\工程文件\i2c.c

?????文件????????417??2013-09-02?10:08??太陽追蹤系統\工程文件\i2c.H

?????文件???????6854??2014-06-03?00:22??太陽追蹤系統\工程文件\i2c.LST

?????文件???????4493??2014-06-03?00:22??太陽追蹤系統\工程文件\i2c.OBJ

?????文件???????6498??2014-06-03?00:21??太陽追蹤系統\工程文件\main.c

?????文件??????16975??2014-06-03?00:22??太陽追蹤系統\工程文件\main.LST

?????文件??????15115??2014-06-03?00:22??太陽追蹤系統\工程文件\main.OBJ

?????文件???????6376??2009-05-07?14:37??太陽追蹤系統\工程文件\STARTUP.A51

?????文件??????14048??2014-06-03?00:22??太陽追蹤系統\工程文件\STARTUP.LST

?????文件????????749??2014-06-03?00:22??太陽追蹤系統\工程文件\STARTUP.OBJ

?????文件??????17743??2014-06-03?00:22??太陽追蹤系統\工程文件\taiyang

?????文件???????4786??2014-06-03?00:22??太陽追蹤系統\工程文件\taiyang.hex

?????文件?????????71??2014-06-03?00:22??太陽追蹤系統\工程文件\taiyang.lnp

?????文件??????23759??2014-06-03?00:22??太陽追蹤系統\工程文件\taiyang.M51

?????文件???????4939??2014-06-03?00:22??太陽追蹤系統\工程文件\taiyang.plg

????.......?????56257??2014-06-03?00:22??太陽追蹤系統\工程文件\taiyang.uvopt

?????文件??????13571??2014-05-19?22:08??太陽追蹤系統\工程文件\taiyang.uvproj

????.......?????56251??2014-05-28?23:44??太陽追蹤系統\工程文件\taiyang_uvopt.bak

............此處省略8個文件信息