控制步進(jìn)電機(jī)正反轉(zhuǎn)的實(shí)際應(yīng)用程序:/*這是一個控制步進(jìn)電機(jī)正反轉(zhuǎn)的實(shí)際應(yīng)用程序*/ /*選用的是三相步進(jìn)電機(jī)驅(qū)動器,p14口線用做步進(jìn)電機(jī)的脈沖控制*/ /*p13口線用做步進(jìn)電機(jī)的方向控制。p15,p16,p17是光耦開關(guān)量輸入*/ /*信號端，p20,p21,p22,p23與x25045看門狗存儲器相連*/ /*k7,k8鍵是設(shè)定步進(jìn)電機(jī)轉(zhuǎn)動速度參數(shù)的加減鍵*/ /*k9是啟動運(yùn)行鍵，按一下k9，步進(jìn)電機(jī)開始運(yùn)行，直到p17口線有信號輸入才停止*/ /*k10是停止鍵，任何時候按下k10都將停止步進(jìn)電機(jī)當(dāng)前的運(yùn)行*/ /*k11是步進(jìn)運(yùn)行鍵，按一下，步進(jìn)電機(jī)動一下*/ /*k12鍵是反向運(yùn)行鍵，按一下，步進(jìn)電機(jī)開始反向運(yùn)行，知道p15口線有信號才停止*/ /*如果p16口線有信號輸入，則只有k12鍵才起作用，其它鍵都沒反應(yīng)。*/ START:do; $INCLUDE(REG51.DCL) DECLARE (addrl,n,I,j,ok,ds) byte; /*定義變量*/ declare l(5) byte; declare (dat,data) byte at (30h); declare delay word; DECLARE ACO(11) BYTE CONSTANT (05h,9fh,23h,0bh,99h,49h,/*定義LED段碼表*/ 41h,1fh,01h,09h,00h); declare si literally 'p21',sck literally 'p20'; /*X25045囗線定義*/ declare so literally 'p22',cs literally 'p23'; dog:procedure; /* 初始化看門狗x25045 */ cs=1; call time(1); cs=0; call time(1); cs=1; end dog;
run:procedure; /*步進(jìn)電機(jī)運(yùn)行脈沖輸出程序*/ if ok=1 then call dog; do;