找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開(kāi)始

搜索
查看: 8128|回復(fù): 15
打印 上一主題 下一主題
收起左側(cè)

用STC15F104W單片機(jī)制作定時(shí)IC源碼，適用于各種需延時(shí)通斷、循環(huán)通斷的控制場(chǎng)合

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
本帖最后由 楊小強(qiáng) 于 2021-1-19 13:43 編輯

源碼分享：
用STC15F104W單片機(jī)芯片制作定時(shí)IC，適用于各種需延時(shí)通斷、循環(huán)通斷的控制場(chǎng)合
作者：楊小強(qiáng)，2021年1月
MCU：STC15F104W，內(nèi)部R/C時(shí)鐘，頻率選擇：11.0592MHz
顯示：(TM1637)4位數(shù)碼管顯示模塊
調(diào)整定時(shí)時(shí)間、設(shè)置：EC11帶按鍵5腳旋轉(zhuǎn)編碼器。也可以用兩只按鍵代替編碼器
定時(shí)范圍：10毫秒~100小時(shí)

描述：
    默認(rèn)導(dǎo)通定時(shí)時(shí)間10小時(shí)，上電就導(dǎo)通，可通過(guò)旋轉(zhuǎn)編碼器實(shí)時(shí)調(diào)整當(dāng)前定時(shí)時(shí)間，最大可調(diào)
到99小時(shí)59分59+1秒=100小時(shí)，最小為0；導(dǎo)通定時(shí)時(shí)間到0就斷開(kāi)，停止運(yùn)行，不循環(huán)，睡眠模式
為“始終顯示”，旋轉(zhuǎn)編碼器調(diào)整當(dāng)前導(dǎo)通定時(shí)時(shí)間，又開(kāi)始運(yùn)行。

    定時(shí)時(shí)間1小時(shí)以上顯示“時(shí):分”，冒號(hào)閃爍；小于1小時(shí)自動(dòng)切換為顯示“分:秒”，冒號(hào)不
閃爍；小于1分鐘自動(dòng)切換為顯示“秒:毫秒”，冒號(hào)不閃爍。

    用于固定定時(shí)時(shí)間的場(chǎng)合時(shí)，設(shè)置好各項(xiàng)參數(shù)，可取消數(shù)碼管顯示模塊、編碼器、按鍵，同時(shí)
把編碼器、按鍵I/O端口P3.1、P3.2、P3.3接到2腳VCC，避免萬(wàn)一端口受到干擾而產(chǎn)生誤動(dòng)作。
    設(shè)置共有2種方式：
    方式1（適合手頭上沒(méi)有TM1637數(shù)碼管顯示模塊的情況）：把源程序中“設(shè)置各項(xiàng)默認(rèn)值”處改
為需要的值，編譯為HEX文件，燒寫(xiě)時(shí)把“本次將EEPROM區(qū)域全部填充為FF”選項(xiàng)勾上。
    方式2：之1.長(zhǎng)按KEY3秒，顯示“--:--”時(shí)釋放，進(jìn)入“設(shè)置”狀態(tài)進(jìn)行設(shè)置。
           之2.轉(zhuǎn)動(dòng)編碼器一點(diǎn)點(diǎn)停留在半格，也就是兩格之間，讓A或B、或者AB都為ON并保持
3秒，顯示“--:--”時(shí)轉(zhuǎn)完一格，進(jìn)入“設(shè)置”狀態(tài)進(jìn)行設(shè)置。當(dāng)“主界面狀態(tài)下長(zhǎng)按快速加減使
能的常數(shù)”設(shè)為081H（允許）時(shí)此方式無(wú)效。


按鍵、編碼器動(dòng)作：
1.處于睡眠狀態(tài)時(shí)，按鍵、編碼器動(dòng)作只喚醒睡眠，恢復(fù)數(shù)碼管顯示，不影響正常運(yùn)行和數(shù)據(jù)。
2.處于始終導(dǎo)通狀態(tài)時(shí)，有按鍵、編碼器動(dòng)作將退出始終導(dǎo)通狀態(tài)，切換到“導(dǎo)通時(shí)間”結(jié)束的斷
   開(kāi)狀態(tài)，如果設(shè)置的是循環(huán)定時(shí)，就從“斷開(kāi)時(shí)間”繼續(xù)運(yùn)行。
3.同時(shí)處于睡眠狀態(tài)和終導(dǎo)通狀態(tài)時(shí)，先喚醒睡眠，退出睡眠狀態(tài)2秒后，再次有按鍵、編碼器動(dòng)
   作才退出始終導(dǎo)通狀態(tài)。
4.短按KEY1次，暫停計(jì)時(shí)，如果當(dāng)前是導(dǎo)通狀態(tài)將斷開(kāi)，再按恢復(fù)導(dǎo)通并繼續(xù)計(jì)時(shí)。
5.處于“導(dǎo)通”或“斷開(kāi)”工作狀態(tài)時(shí)，短按2次KEY，當(dāng)前時(shí)間清零，運(yùn)行下一項(xiàng)(如果設(shè)有)。
6.短按KEY3次：重新啟動(dòng)，相當(dāng)于重新上電。
7.間隔時(shí)間不超過(guò)0.5秒的2次或3次短按，為有效按鍵動(dòng)作。
8.長(zhǎng)按KEY3秒，顯示“--:--”時(shí)釋放，進(jìn)入“設(shè)置”，如果保持按下達(dá)到10秒，將恢復(fù)默認(rèn)設(shè)置。
9.長(zhǎng)按KEY10秒，恢復(fù)默認(rèn)設(shè)置，顯示88:88，然后按默認(rèn)值從“導(dǎo)通”開(kāi)始執(zhí)行。
10.處于“上電延時(shí)導(dǎo)通”、“導(dǎo)通”、“斷開(kāi)”工作狀態(tài)時(shí)，旋轉(zhuǎn)編碼器可進(jìn)行實(shí)時(shí)調(diào)整，最
   大99小時(shí)59分59+1秒=100小時(shí)，最小為0。
11.處于“上電延時(shí)導(dǎo)通”工作狀態(tài)，延時(shí)導(dǎo)通模式為2(延時(shí)時(shí)間到后從“斷開(kāi)”繼續(xù)運(yùn)行)時(shí)，上
   電4.2分鐘后，按下KEY達(dá)到設(shè)置的時(shí)長(zhǎng)，時(shí)間清零，之后不響應(yīng)按鍵動(dòng)作，繼續(xù)執(zhí)行“斷開(kāi)”、
  “導(dǎo)通”，執(zhí)行到“導(dǎo)通”狀態(tài)運(yùn)行結(jié)束時(shí)，恢復(fù)按鍵全部功能。
12.轉(zhuǎn)動(dòng)編碼器一點(diǎn)點(diǎn)停留在半格，也就是兩格之間，讓A或B、或者AB都為ON并保持3秒，這時(shí)顯示
   “--:--”（如果仍然保持不動(dòng)達(dá)到10秒，將恢復(fù)默認(rèn)設(shè)置）,然后轉(zhuǎn)完一格，進(jìn)入“設(shè)置”。
   當(dāng)“定義主界面狀態(tài)下長(zhǎng)按快速加減使能的常數(shù)”設(shè)為081H（允許）時(shí)此方式無(wú)效。


設(shè)置：
    進(jìn)入“設(shè)置”后，根據(jù)數(shù)碼管左邊顯示的內(nèi)容進(jìn)行相應(yīng)設(shè)置，旋轉(zhuǎn)編碼器加或減，設(shè)置好一項(xiàng)，
閃爍5秒無(wú)操作或者短按KEY釋放0.5秒后，跳到下一項(xiàng)。任何時(shí)候都可以短按2次KEY保存并退出，
或在最后一項(xiàng)無(wú)操作自動(dòng)保存退出。
    按住KEY不放，旋轉(zhuǎn)編碼器可向上/下轉(zhuǎn)移到任意一項(xiàng)設(shè)置，釋放按鍵后旋轉(zhuǎn)編碼器加或減。
1、顯示“1A”設(shè)置導(dǎo)通時(shí)間(時(shí))，0~99小時(shí)，默認(rèn)10小時(shí)
2、顯示“1b”設(shè)置導(dǎo)通時(shí)間(分)，0~59分鐘
3、顯示“1C”設(shè)置導(dǎo)通時(shí)間(秒)，0~59秒
4、顯示“1d”設(shè)置導(dǎo)通時(shí)間(×10毫秒)，0~99
5、顯示“o-”設(shè)置循環(huán)定時(shí)，0=無(wú)限循環(huán)；1=不循環(huán)；2~99=循環(huán)導(dǎo)通次數(shù)。默認(rèn)為1，不循環(huán)
6、顯示“C-”設(shè)置睡眠模式，0=始終顯示；1~59=無(wú)操作進(jìn)入睡眠（分鐘）。默認(rèn)為0，始終顯示
7、顯示“bC”設(shè)置實(shí)時(shí)調(diào)整時(shí)（步長(zhǎng)），3小時(shí)以下定時(shí)調(diào)整時(shí)，編碼器每轉(zhuǎn)動(dòng)一格的增(減)值：
              1~30分鐘，默認(rèn)1分鐘；3小時(shí)以上增(減)值30分鐘；10小時(shí)以上增(減)值1個(gè)小時(shí)；
              20小時(shí)以上增(減)值2個(gè)小時(shí)。
8、顯示“Ld”設(shè)置數(shù)碼管亮度，1~8級(jí)。默認(rèn)為3級(jí)
9、顯示“2A”設(shè)置斷開(kāi)時(shí)間(時(shí))，0~99小時(shí)
10、顯示“2b”設(shè)置斷開(kāi)時(shí)間(分)，0~59分鐘
11、顯示“2C”設(shè)置斷開(kāi)時(shí)間(秒)，0~59秒
12、顯示“2d”設(shè)置斷開(kāi)時(shí)間(×10毫秒)，0~99
13、顯示“3A”設(shè)置上電延時(shí)導(dǎo)通(時(shí))，0~99小時(shí)，默認(rèn)值為0
14、顯示“3b”設(shè)置上電延時(shí)導(dǎo)通(分)，0~59分鐘，默認(rèn)值為0
15、顯示“3C”設(shè)置上電延時(shí)導(dǎo)通(秒)，0~59秒，默認(rèn)值為0
16、顯示“d-”設(shè)置延時(shí)導(dǎo)通模式，0~2。默認(rèn)為2（延時(shí)時(shí)間到后從“斷開(kāi)”繼續(xù)運(yùn)行）
17、顯示“E-”設(shè)置“持續(xù)時(shí)間”秒計(jì)數(shù)0~99，按下KEY持續(xù)0~99秒結(jié)束“上電延時(shí)導(dǎo)通”狀態(tài)

保存失敗將顯示5秒E1。

導(dǎo)通時(shí)間：1~99(×10)毫秒~100小時(shí)，如果“上電延時(shí)導(dǎo)通”時(shí)間設(shè)為0(關(guān)閉)，則上電就執(zhí)行本項(xiàng)。
          如果設(shè)置為循環(huán)定時(shí)，本項(xiàng)時(shí)間結(jié)束就執(zhí)行“斷開(kāi)時(shí)間”。
循環(huán)定時(shí)：0=無(wú)限循環(huán)；1=不循環(huán)；2~99=導(dǎo)通次數(shù)；導(dǎo)通次數(shù)是指從上電到循環(huán)結(jié)束為止，總共導(dǎo)通
          的次數(shù)。如果“斷開(kāi)時(shí)間”設(shè)置的時(shí)間為0，循環(huán)無(wú)效，導(dǎo)通定時(shí)時(shí)間到后就斷開(kāi)，停止。
睡眠模式：0=始終顯示；1~59=無(wú)操作1~59分鐘關(guān)閉顯示繼續(xù)運(yùn)行；按鍵、編碼器有動(dòng)作就喚醒睡眠
斷開(kāi)時(shí)間：1~99(×10)毫秒~100小時(shí)，時(shí)間結(jié)束就運(yùn)行“導(dǎo)通時(shí)間”。默認(rèn)值為2小時(shí)。
上電延時(shí)導(dǎo)通：1秒~100小時(shí)。設(shè)置的時(shí)間全部為0=關(guān)閉；設(shè)置的時(shí)間不為0就啟用；
              本項(xiàng)上電只執(zhí)行一次，不參與循環(huán)定時(shí)。默認(rèn)為0
                  啟用上電延時(shí)導(dǎo)通，延時(shí)導(dǎo)通模式為2時(shí)，上電4.2分鐘內(nèi)不響應(yīng)按鍵動(dòng)作，編碼
              器可以正常使用，4.2分鐘之后，當(dāng)持續(xù)按下按鍵的時(shí)間達(dá)到設(shè)置的時(shí)長(zhǎng)(0~99秒)就
              清零，結(jié)束“上電延時(shí)導(dǎo)通”狀態(tài)，繼續(xù)不響應(yīng)按鍵動(dòng)作，執(zhí)行到“導(dǎo)通”狀態(tài)運(yùn)行
              結(jié)束時(shí)，按鍵功能恢復(fù)正常。
延時(shí)導(dǎo)通模式：0=延時(shí)時(shí)間到后始終導(dǎo)通。旋轉(zhuǎn)編碼器或按下KEY就退出始終導(dǎo)通狀態(tài)，切換到
               “導(dǎo)通時(shí)間”的結(jié)束狀態(tài)，如果設(shè)置的是循環(huán)定時(shí)，就從“斷開(kāi)時(shí)間”繼續(xù)運(yùn)行。
              1=延時(shí)時(shí)間到后從“導(dǎo)通”繼續(xù)運(yùn)行，如果“導(dǎo)通時(shí)間”設(shè)置的時(shí)間為0就結(jié)束
              2=延時(shí)時(shí)間到后從“斷開(kāi)”繼續(xù)運(yùn)行，如果“斷開(kāi)時(shí)間”設(shè)置的時(shí)間為0就轉(zhuǎn)到“導(dǎo)
                通”繼續(xù)運(yùn)行。

下面用電動(dòng)車(chē)充電定時(shí)器等電路舉例其應(yīng)用：





上面是“導(dǎo)通時(shí)間”和“斷開(kāi)時(shí)間”設(shè)為最小值1（10毫秒），“循環(huán)定時(shí)”設(shè)為“無(wú)限循環(huán)”的情況，P3.0的輸出為50Hz方波。

下面是源程序：
  1.     ;----------------------------- 端口定義 ------------------------------------
  2.             MOC      EQU  P3.0   ;5腳，導(dǎo)通狀態(tài)輸出低電平；斷開(kāi)狀態(tài)輸出高電平
  3.             KEY      EQU  P3.1   ;6腳，按鍵KEY
  4.             EC11A    EQU  P3.2   ;7腳，接編碼器的A引腳
  5.             EC11B    EQU  P3.3   ;8腳，接編碼器的B引腳
  6.             DIO      EQU  P3.4   ;1腳，接顯示模塊TM1637的DIO
  7.             CLK      EQU  P3.5   ;3腳，接顯示模塊TM1637的CLK

  9.     ;---------------------------- 位地址及RAM的使用 ----------------------------
  10.     ;(20H)第0位：1=編碼器有旋轉(zhuǎn)動(dòng)作；0=沒(méi)有旋轉(zhuǎn)動(dòng)作
  11.     ;(20H)第1位：1=編碼器順時(shí)針正轉(zhuǎn)；0=編碼器逆時(shí)針?lè)崔D(zhuǎn)
  12.     ;(20H)第2位：1=暫停；0=正常運(yùn)行
  13.     ;(20H)第3位：1=禁止；0=允許。進(jìn)行各項(xiàng)設(shè)置時(shí)使用，允許/禁止檢查剩余時(shí)間
  14.     ;(20H)第4位：1=閃爍顯示；0=不閃爍。進(jìn)行各項(xiàng)設(shè)置時(shí)用
  15.     ;(20H)第5位：1=不顯示，0=顯示，數(shù)字及冒號(hào)閃爍時(shí)用，每0.5秒變化一次
  16.     ;(20H)第6位：1=關(guān)閉時(shí)間顯示，3秒88:88或5秒E1顯示占用；0=正常顯示
  17.     ;(20H)第7位：1=已進(jìn)入“上電延時(shí)導(dǎo)通”的始終導(dǎo)通狀態(tài)；0=正常
  18.     ;(21H)第8位：1=禁止響應(yīng)按鍵動(dòng)作；0=正常
  19.     ;(21H)第9位：1=允許恢復(fù)響應(yīng)按鍵動(dòng)作；0=正常

  21.     FWBZ1    EQU   022H     ;復(fù)位判斷標(biāo)志1，也作EEPROM數(shù)據(jù)判斷標(biāo)志
  22.     FWBZ2    EQU   023H     ;復(fù)位判斷標(biāo)志2，也作EEPROM數(shù)據(jù)判斷標(biāo)志
  23.     DTS      EQU   024H     ;導(dǎo)通時(shí)間(時(shí))，0~99
  24.     DTF      EQU   025H     ;導(dǎo)通時(shí)間(分)，0~59
  25.     DTM      EQU   026H     ;導(dǎo)通時(shí)間(秒)，0~59
  26.     DTHM     EQU   027H     ;導(dǎo)通時(shí)間，100(0~99)×10毫秒
  27.     XHDS     EQU   028H     ;循環(huán)定時(shí)，0=無(wú)限循環(huán)；1=不循環(huán)；2~99=循環(huán)次數(shù)
  28.     SMMS     EQU   029H     ;睡眠模式，0=始終顯示；1~59=無(wú)操作進(jìn)入睡眠（分鐘）
  29.     BMQZJ    EQU   02AH     ;編碼器每轉(zhuǎn)動(dòng)一小格的增/減值，1~30分鐘
  30.     SMGLD    EQU   02BH     ;數(shù)碼管亮度，1~8級(jí)
  31.     DKS      EQU   02CH     ;斷開(kāi)時(shí)間(時(shí))，0~99
  32.     DKF      EQU   02DH     ;斷開(kāi)時(shí)間(分)，0~59
  33.     DKM      EQU   02EH     ;斷開(kāi)時(shí)間(秒)，0~59
  34.     DKHM     EQU   02FH     ;斷開(kāi)時(shí)間，100(0~99)×10毫秒
  35.     SDYSS    EQU   030H     ;上電延時(shí)導(dǎo)通(時(shí))，0~99
  36.     SDYSF    EQU   031H     ;上電延時(shí)導(dǎo)通(分)，0~59
  37.     SDYSM    EQU   032H     ;上電延時(shí)導(dǎo)通(秒)，0~59
  38.     YSMS     EQU   033H     ;延時(shí)導(dǎo)通模式，0~2
  39.     YSJS     EQU   034H     ;在上電延時(shí)導(dǎo)通狀態(tài)時(shí)，按下KEY持續(xù)0~99秒結(jié)束該狀態(tài)
  40.     YSXY     EQU   035H     ;延時(shí)響應(yīng)，在上電延時(shí)導(dǎo)通狀態(tài)時(shí)，此處為0才響應(yīng)按鍵動(dòng)作
  41.     DSSJS    EQU   036H     ;定時(shí)時(shí)間，時(shí)
  42.     DSSJF    EQU   037H     ;定時(shí)時(shí)間，分
  43.     DSSJM    EQU   038H     ;定時(shí)時(shí)間，秒
  44.     DSSJHM   EQU   039H     ;定時(shí)時(shí)間，毫秒，100(0~99)×10毫秒=1秒
  45.     SMJSF    EQU   03AH     ;睡眠計(jì)時(shí)(分)
  46.     SMJSM    EQU   03BH     ;睡眠計(jì)時(shí)(秒)
  47.     SMJS     EQU   03CH     ;睡眠處理計(jì)時(shí)用
  48.     XHJS     EQU   03DH     ;循環(huán)定時(shí)用，導(dǎo)通次數(shù)計(jì)數(shù)
  49.     SHMJS    EQU   03EH     ;(10)毫秒計(jì)數(shù)，每10毫秒減1，直到為0
  50.     HMJS     EQU   03FH     ;(10)毫秒計(jì)數(shù)2，為0后自動(dòng)重新放入99
  51.     MJS      EQU   040H     ;秒計(jì)數(shù)，每秒減1，直到為0
  52.     DQZT     EQU   041H     ;當(dāng)前狀態(tài)，0=導(dǎo)通、1=斷開(kāi)，2=上電延時(shí)導(dǎo)通
  53.     XSHC1    EQU   042H     ;緩存1，與上次不同就立即顯示，否則0.5秒顯示一次
  54.     XSHC2    EQU   043H     ;緩存2，與上次不同就立即顯示，否則0.5秒顯示一次
  55.     XXSZ     EQU   044H     ;下限數(shù)值，進(jìn)行各項(xiàng)設(shè)置時(shí)用
  56.     SXSZ     EQU   045H     ;上限數(shù)值，進(jìn)行各項(xiàng)設(shè)置時(shí)用
  57.     ZXM1     EQU   046H     ;顯示用，待發(fā)送到TM1637的字形碼1
  58.     ZXM2     EQU   047H     ;顯示用，待發(fā)送到TM1637的字形碼2
  59.     ZXM3     EQU   048H     ;顯示用，待發(fā)送到TM1637的字形碼3
  60.     ZXM4     EQU   049H     ;顯示用，待發(fā)送到TM1637的字形碼4
  61.     DSZJ     EQU   04AH     ;加減定時(shí)時(shí)間使用
  62.     DISPL    EQU   04BH     ;要顯示的項(xiàng)目
  63.     ;
  64.     ;定義主界面狀態(tài)下長(zhǎng)按快速加減使能的常數(shù)：
  65.     KSJJ        EQU        080H     ;禁止主界面狀態(tài)下長(zhǎng)按快速加減
  66.     ;KSJJ        EQU        081H    ;允許主界面狀態(tài)下長(zhǎng)按快速加減
  67.     ;當(dāng)使用按鍵代替編碼器，需要“長(zhǎng)按快速加減”功能時(shí)，把080H改為081H。
  68.     ;
  69.     ;--------------- 看門(mén)狗、EEPROM特殊功能寄存器地址 ---------------
  70.     AUXR          EQU   08EH   ;輔助寄存器
  71.     WDT_CONTR     EQU   0C1H   ;看門(mén)狗地址
  72.     IAP_DATA      EQU   0C2H   ;數(shù)據(jù)寄存器，讀出、寫(xiě)入的數(shù)據(jù)放在此處
  73.     IAP_ADDRH     EQU   0C3H   ;地址寄存器高八位
  74.     IAP_ADDRL     EQU   0C4H   ;地址寄存器低八位
  75.     IAP_CMD       EQU   0C5H   ;命令寄存器，0=關(guān)閉，1=讀，2=寫(xiě)，3=擦除
  76.     IAP_TRIG      EQU   0C6H   ;命令觸發(fā)寄存器，每次操作先放入5A再放入A5，命令立即被觸發(fā)起動(dòng)
  77.     IAP_CONTR     EQU   0C7H   ;控制寄存器，F(xiàn)lash操作允許/禁止及等待時(shí)間
  78.     ENABLE_IAP    EQU   083H   ;定義Flash操作等待時(shí)間及允許IAP/ISP/EEPROM操作的常數(shù)，時(shí)鐘<12MHz時(shí)為83H

  80.     ;======================= 程序代碼開(kāi)址 =======================
  81.             ORG    0000H
  82.             LJMP   START

  84.             ORG    000BH         ;T0中斷入口
  85.             LJMP   T0INT         ;T0中斷入口

  87.             ORG    0030H         ;程序代碼始址安排在30H

  89.     ;--------------- 定時(shí)器0中斷(10毫秒產(chǎn)生一次中斷) ---------------
  90.     T0INT:
  91.             PUSH  ACC
  92.             PUSH  PSW
  93.             SETB  RS1          ;RS1、RS0組合為11，選擇第3組工作寄存器，R0~R7地址為18H~1FH
  94.             SETB  RS0          ;退出中斷時(shí)恢復(fù)默認(rèn)的工作寄存器（第0組：R0~R7地址為00H~07H）
  95.             LCALL TIME         ;處理各項(xiàng)時(shí)間、狀態(tài)切換
  96.             LCALL DISPLAY      ;顯示
  97.             JB    02H,T0INT0   ;如果位地址02H為1(暫停)就轉(zhuǎn)移，斷開(kāi)
  98.             JB    07H,T0INT1   ;如果位地址07H為1(始終導(dǎo)通)就轉(zhuǎn)移，導(dǎo)通
  99.             MOV   A,DQZT       ;裝入“當(dāng)前狀態(tài)”
  100.             JNZ   T0INT0       ;不是0(導(dǎo)通時(shí)間)就轉(zhuǎn)移，斷開(kāi)
  101.             MOV   A,DSSJHM     ;是“導(dǎo)通時(shí)間”，裝入定時(shí)時(shí)間(毫秒)到寄存器A
  102.             JNZ   T0INT1       ;不是0就轉(zhuǎn)移，導(dǎo)通
  103.             MOV   A,DSSJM      ;裝入定時(shí)時(shí)間(秒)到寄存器A
  104.             JNZ   T0INT1       ;不是0就轉(zhuǎn)移，導(dǎo)通
  105.             MOV   A,DSSJF      ;裝入定時(shí)時(shí)間(分)到寄存器A
  106.             JNZ   T0INT1       ;不是0就轉(zhuǎn)移，導(dǎo)通
  107.             MOV   A,DSSJS      ;裝入定時(shí)時(shí)間(時(shí))到寄存器A
  108.             JNZ   T0INT1       ;不是0就轉(zhuǎn)移，導(dǎo)通
  109.     T0INT0:
  110.             SETB  MOC          ;定時(shí)時(shí)間為0，置MOC為高電平，斷開(kāi)
  111.             LJMP  T0INT2
  112.     T0INT1:
  113.             CLR   MOC          ;置MOC為低電平，可控硅(或繼電器)導(dǎo)通,通電
  114.     T0INT2:
  115.             POP   PSW
  116.             POP   ACC
  117.             RETI

  119.     ;--------------- 設(shè)置各項(xiàng)默認(rèn)值（#號(hào)后面都為十進(jìn)制數(shù)） ----------------
  120.     SZMRZ:
  121.             MOV        DTS,#10    ;導(dǎo)通時(shí)長(zhǎng)(時(shí))，0~99。默認(rèn)10小時(shí)
  122.             MOV        DTF,#0     ;導(dǎo)通時(shí)長(zhǎng)(分)，0~59
  123.             MOV        DTM,#0     ;導(dǎo)通時(shí)長(zhǎng)(秒)，0~59
  124.             MOV        DTHM,#0    ;導(dǎo)通時(shí)長(zhǎng)，0~99(×10毫秒)
  125.             MOV        XHDS,#1    ;循環(huán)定時(shí)，0=無(wú)限循環(huán)；1=不循環(huán)；2~99=導(dǎo)通次數(shù)
  126.             MOV        SMMS,#0    ;睡眠模式，0=始終顯示；1~59=無(wú)操作進(jìn)入睡眠（分鐘）
  127.             MOV        BMQZJ,#1   ;實(shí)時(shí)調(diào)整時(shí)，編碼器每轉(zhuǎn)動(dòng)一格的+、-值（分鐘)
  128.             MOV        SMGLD,#3   ;數(shù)碼管亮度，8級(jí)亮度最高
  129.             MOV        DKS,#2     ;斷開(kāi)時(shí)長(zhǎng)(時(shí))，0~99
  130.             MOV        DKF,#0     ;斷開(kāi)時(shí)長(zhǎng)(分)，0~59
  131.             MOV        DKM,#0     ;斷開(kāi)時(shí)長(zhǎng)(秒)，0~59
  132.             MOV        DKHM,#0    ;斷開(kāi)時(shí)長(zhǎng)，0~99(×10毫秒)
  133.             MOV        SDYSS,#0   ;上電延時(shí)導(dǎo)通時(shí)長(zhǎng)(時(shí))，0~99
  134.             MOV        SDYSF,#0   ;上電延時(shí)導(dǎo)通時(shí)長(zhǎng)(分)，0~59
  135.             MOV        SDYSM,#0   ;上電延時(shí)導(dǎo)通時(shí)長(zhǎng)(秒)，0~59
  136.             MOV        YSMS,#0    ;延時(shí)導(dǎo)通模式，0~2；
  137.             MOV        YSJS,#99   ;結(jié)束“上電延時(shí)導(dǎo)通”的“按下持續(xù)時(shí)間”秒計(jì)數(shù)，0~99
  138.             RET

  140.     ;--------------- 定時(shí)器T0設(shè)置(10毫秒產(chǎn)生一次中斷) ----------------
  141.     SETINT:                                ;10毫秒@11.0592MHz
  142.             ANL  AUXR,#7FH   ;定時(shí)器時(shí)鐘12T模式
  143.             ANL  TMOD,#0F0H  ;設(shè)置定時(shí)器模式
  144.             MOV  TL0,#000H   ;設(shè)置定時(shí)初值
  145.             MOV  TH0,#0DCH   ;設(shè)置定時(shí)初值
  146.             CLR  TF0         ;清除TF0標(biāo)志
  147.             SETB TR0         ;定時(shí)器0開(kāi)始計(jì)時(shí)
  148.             SETB ET0         ;允許定時(shí)器0中斷
  149.             SETB EA          ;允許全局中斷
  150.             RET

  152.     ;---- 啟動(dòng)看門(mén)狗及喂狗，11.0592MHz預(yù)分頻數(shù)=2(71.1毫秒)，00111000B(38H) ----
  153.     WG:        
  154.             MOV   WDT_CONTR,#00111000B
  155.             RET

  157.     ;*********************************** 主程序開(kāi)始 ***********************************
  158.     START:
  159.             MOV    SP,#050H        ;設(shè)置堆棧指針
  160.             MOV    A,FWBZ1         ;檢查復(fù)位判斷標(biāo)志，不相同就是初次上電，從初始化開(kāi)始運(yùn)行
  161.             CJNE   A,#0C8H,START0  ;檢查復(fù)位判斷標(biāo)志，不相同就是初次上電，從初始化開(kāi)始運(yùn)行
  162.             MOV    A,FWBZ2         ;檢查復(fù)位判斷標(biāo)志，不相同就是初次上電，從初始化開(kāi)始運(yùn)行
  163.             CJNE   A,#0D9H,START0  ;檢查復(fù)位判斷標(biāo)志，不相同就是初次上電，從初始化開(kāi)始運(yùn)行
  164.             LCALL  SETINT          ;相同，定時(shí)器設(shè)置(10毫秒產(chǎn)生一次中斷)
  165.             LJMP   START2          ;相同，跳過(guò)初始化繼續(xù)運(yùn)行
  166.     START0:
  167.             CLR    A               ;初始化，RAM從20H開(kāi)始清零30H個(gè)字節(jié)
  168.             MOV    R0,#30H         ;初始化，RAM從20H開(kāi)始清零30H個(gè)字節(jié)
  169.             MOV    R1,#20H         ;初始化，RAM從20H開(kāi)始清零30H個(gè)字節(jié)
  170.     START1:
  171.             MOV    @R1,A           ;初始化，RAM從20H開(kāi)始清零30H個(gè)字節(jié)
  172.             INC    R1              ;初始化，RAM從20H開(kāi)始清零30H個(gè)字節(jié)
  173.             DJNZ   R0,START1       ;初始化，RAM從20H開(kāi)始清零30H個(gè)字節(jié)
  174.             MOV    FWBZ1,#0C8H     ;初始化，放入復(fù)位判斷標(biāo)志1到RAM
  175.             MOV    FWBZ2,#0D9H     ;初始化，放入復(fù)位判斷標(biāo)志2到RAM
  176.             MOV    YSXY,#0FFH      ;初始化，放入結(jié)束“上電延時(shí)導(dǎo)通”的延時(shí)響應(yīng)時(shí)間，4.2分鐘
  177.             LCALL  SETINT          ;初始化，定時(shí)器設(shè)置(10毫秒產(chǎn)生一次中斷)
  178.             LCALL  REEP            ;初始化，讀EEPROM保存的各項(xiàng)設(shè)置，沒(méi)有就設(shè)為默認(rèn)值并保存
  179.     START2:
  180.             CLR    06H             ;位地址06H置為0，正常顯示
  181.             MOV    DISPL,#0        ;設(shè)置要顯示的目標(biāo)，0=顯示定時(shí)時(shí)間
  182.             LCALL  SKEY            ;掃描KEY
  183.             JC     START3          ;有按鍵動(dòng)作(C=1)就轉(zhuǎn)移
  184.             LCALL  Scan1           ;掃描編碼器（有方向標(biāo)志）
  185.             JNB    00H,START2      ;如果位地址00H為0（編碼器沒(méi)有轉(zhuǎn)動(dòng)）就轉(zhuǎn)移
  186.             LCALL  BMQCL           ;調(diào)用編碼器動(dòng)作處理子程序
  187.             LJMP   START2
  188.     START3:
  189.             LCALL  AJDZCL          ;調(diào)用按鍵動(dòng)作處理子程序
  190.             LJMP   START2
  191.     ;*********************************** 主程序結(jié)束 ***********************************
  192.     ;
  193.     ;----------------------------------------------------------------------------------------
  194.     ;子程序：編碼器動(dòng)作處理，實(shí)時(shí)調(diào)整定時(shí)時(shí)間
  195.     ;如果是用按鍵代替編碼器，支持長(zhǎng)按快速加減(需要把“長(zhǎng)按快速加減使能常數(shù)”由080H改為081H)。
  196.     ;----------------------------------------------------------------------------------------
  197.     BMQCL:
  198.             MOV    A,#KSJJ        ;裝入“長(zhǎng)按快速加減使能常數(shù)”
  199.             CJNE   A,#081H,BMQCL5 ;如果不是“支持長(zhǎng)按快速加減”就轉(zhuǎn)移
  200.             MOV    SHMJS,#50      ;設(shè)置有效長(zhǎng)按所需時(shí)長(zhǎng)，50×10毫秒=500毫秒
  201.     BMQCL1:
  202.             MOV    A,SHMJS        ;裝入(10)毫秒計(jì)數(shù)
  203.             JZ     BMQCL2         ;如果時(shí)長(zhǎng)達(dá)到(為0)就轉(zhuǎn)移
  204.             LCALL  Scan2          ;掃描編碼器（無(wú)方向標(biāo)志）
  205.             JB     00H,BMQCL1     ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  206.             LCALL  DSSJZJ         ;動(dòng)作結(jié)束，根據(jù)方向加/減定時(shí)時(shí)間
  207.             RET
  208.     BMQCL2:
  209.             LCALL  DSSJZJ       ;根據(jù)方向加/減定時(shí)時(shí)間
  210.             MOV    SHMJS,#13    ;加/減間隔時(shí)間，(×10)毫秒
  211.     BMQCL3:
  212.             MOV    A,SHMJS      ;裝入(10)毫秒計(jì)數(shù)
  213.             JNZ    BMQCL4       ;時(shí)間未到(不為0)就轉(zhuǎn)移
  214.             LJMP   BMQCL2       ;已達(dá)到設(shè)定的時(shí)長(zhǎng)，轉(zhuǎn)移，根據(jù)方向加/減定時(shí)時(shí)間
  215.     BMQCL4:
  216.             LCALL  DELAY10      ;延時(shí)10毫秒
  217.             LCALL  Scan2        ;掃描編碼器（無(wú)方向標(biāo)志）
  218.             JB     00H,BMQCL3   ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  219.             LCALL  DELAY10      ;延時(shí)10毫秒
  220.             LCALL  Scan2        ;第2次掃描編碼器（無(wú)方向標(biāo)志）
  221.             JB     00H,BMQCL3   ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  222.             LCALL  DELAY10      ;延時(shí)10毫秒
  223.             LCALL  Scan2        ;第3次掃描編碼器（無(wú)方向標(biāo)志）
  224.             JB     00H,BMQCL3   ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  225.             RET                 ;動(dòng)作結(jié)束，退出
  226.     BMQCL5:
  227.             MOV    MJS,#10      ;設(shè)置等待時(shí)間(秒)
  228.     BMQCL6:
  229.             LCALL  Scan2        ;掃描編碼器（無(wú)方向標(biāo)志）
  230.             JB     00H,BMQCL7   ;如果還沒(méi)轉(zhuǎn)到卡點(diǎn)位置就轉(zhuǎn)移
  231.             LCALL  DSSJZJ       ;已經(jīng)旋轉(zhuǎn)到卡點(diǎn)位置，根據(jù)旋轉(zhuǎn)方向增/減定時(shí)時(shí)間
  232.             RET
  233.     BMQCL7:
  234.             MOV    A,MJS        ;裝入秒計(jì)數(shù)到寄存器A
  235.             CJNE   A,#7,BMQCL6  ;檢查剩余時(shí)間，如果不是7(10秒-3秒=7)就轉(zhuǎn)移，繼續(xù)掃描
  236.             SETB   06H          ;達(dá)到3秒了，把位地址06H設(shè)置為1，數(shù)碼管顯示“--:--”
  237.             MOV    ZXM1,#0C0H   ;-
  238.             MOV    ZXM2,#0C0H   ;-
  239.             MOV    ZXM3,#0C0H   ;-
  240.             MOV    ZXM4,#0C0H   ;-
  241.             LCALL  DISP         ;顯示“--:--”
  242.     BMQCL8:
  243.             LCALL  Scan2        ;掃描編碼器（無(wú)方向標(biāo)志）
  244.             MOV    A,MJS        ;裝入秒計(jì)數(shù)到寄存器A
  245.             JZ     BMQCL9       ;如果秒計(jì)數(shù)為0（達(dá)到10秒）就轉(zhuǎn)移
  246.             JB     00H,BMQCL8   ;如果還沒(méi)轉(zhuǎn)到卡點(diǎn)位置就轉(zhuǎn)移，繼續(xù)掃描
  247.             MOV    SMJSF,#0FFH  ;已經(jīng)旋轉(zhuǎn)到卡點(diǎn)位置，先放入一個(gè)數(shù)值，等退出后才恢復(fù)睡眠計(jì)時(shí)
  248.             LCALL  TZGXSZ       ;調(diào)用“調(diào)整各項(xiàng)設(shè)置”子程序
  249.             MOV    SMJSF,SMMS   ;睡眠模式
  250.             MOV    SMJSM,#0
  251.             RET
  252.     BMQCL9:
  253.             MOV    ZXM1,#0FFH   ;達(dá)到了10秒，顯示3秒88:88
  254.             MOV    ZXM2,#0FFH   ;8
  255.             MOV    ZXM3,#0FFH   ;8
  256.             MOV    ZXM4,#0FFH   ;8
  257.             LCALL  DISP         ;顯示
  258.             MOV    MJS,#3       ;顯示3秒
  259.     BMQCL10:
  260.             MOV    A,MJS        ;裝入秒計(jì)數(shù)到寄存器A
  261.             LCALL  WG           ;喂狗
  262.             JNZ    BMQCL10      ;等待MJS變?yōu)?秒
  263.             LCALL  SZMRZ        ;延時(shí)時(shí)間到，恢復(fù)各項(xiàng)默認(rèn)設(shè)置
  264.             LCALL  WSET         ;保存設(shè)置
  265.     BMQCL11:
  266.             LCALL  Scan2        ;掃描編碼器（無(wú)方向標(biāo)志）
  267.             JB     00H,BMQCL11  ;如果還沒(méi)轉(zhuǎn)到卡點(diǎn)位置就繼續(xù)掃描
  268.             LCALL  REEPR        ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”，從“導(dǎo)通”開(kāi)始運(yùn)行。
  269.             CLR    02H          ;位地址02H置為0（正常運(yùn)行）
  270.             MOV    MJS,#2       ;延時(shí)2秒才退出
  271.     BMQCL12:
  272.             MOV    A,MJS        ;裝入秒計(jì)數(shù)到寄存器A
  273.             LCALL  WG           ;喂狗
  274.             JNZ    BMQCL12
  275.             RET

  277.     ;-------------------------------------------------------------------------------------
  278.     ;子程序：根據(jù)編碼器旋轉(zhuǎn)方向加減定時(shí)時(shí)間
  279.     ;3小時(shí)及以下，按設(shè)置的值加減：1~30分鐘
  280.     ;3小時(shí)以上每次增(減)30分鐘；10小時(shí)以上每次增(減)1個(gè)小時(shí)；20小時(shí)以上每次增(減)2個(gè)小時(shí)
  281.     ;-------------------------------------------------------------------------------------
  282.     DSSJZJ:
  283.             MOV   DSSJM,#0       ;放入0到定時(shí)時(shí)間(秒)
  284.             MOV   DSSJHM,#99
  285.             CLR   05H
  286.             MOV   A,DSSJS        ;裝入定時(shí)時(shí)間（時(shí)）
  287.             CJNE  A,#20,DSZJ1    ;當(dāng)前“時(shí)”是否等于或大于20
  288.     DSZJ1:
  289.             JC    DSZJ2          ;小于就轉(zhuǎn)移
  290.             MOV   DSZJ,#2        ;等于或大于20，加減2個(gè)小時(shí)
  291.             LJMP  DSZJ4
  292.     DSZJ2:
  293.             CJNE  A,#10,DSZJ3    ;當(dāng)前“時(shí)”是否等于或大于10
  294.     DSZJ3:
  295.             JC    DSZJ8          ;小于就轉(zhuǎn)移
  296.             MOV   DSZJ,#1        ;等于或大于10，加減1個(gè)小時(shí)
  297.     DSZJ4:
  298.             JNB   01H,DSZJ6      ;如果位地址01H為0（逆時(shí)針?lè)崔D(zhuǎn)）就轉(zhuǎn)移
  299.             ADD   A,DSZJ         ;是正轉(zhuǎn)，加
  300.             CJNE  A,#100,DSZJ5   ;加完后是否等于或大于100
  301.     DSZJ5:
  302.             JC    DSZJ7          ;如果小于就轉(zhuǎn)移，把A放回到DSSJS
  303.             MOV   DSSJS,#99      ;已經(jīng)大于99了，直接設(shè)置為99:59:59+DSSJHM(1秒)，100小時(shí)
  304.             MOV   DSSJF,#59      ;已經(jīng)大于99了，直接設(shè)置為99:59:59+DSSJHM(1秒)，100小時(shí)
  305.             MOV   DSSJM,#59      ;已經(jīng)大于99了，直接設(shè)置為99:59:59+DSSJHM(1秒)，100小時(shí)
  306.             RET
  307.     DSZJ6:
  308.             SUBB  A,DSZJ         ;是反轉(zhuǎn)，減
  309.     DSZJ7:
  310.             MOV   DSSJS,A        ;把計(jì)算結(jié)果放入DSSJS
  311.             RET
  312.     DSZJ8:
  313.             MOV   DSZJ,BMQZJ     ;把設(shè)置的“增(減)值”放入DSZJ
  314.             CJNE  A,#3,DSZJ11    ;當(dāng)前“時(shí)”不是3就轉(zhuǎn)移
  315.             JB    01H,DSZJ12     ;是3，如果位地址01H為1(正轉(zhuǎn))就轉(zhuǎn)移，把DSZJ處的“增(減)值”改為30（分鐘）
  316.             MOV   A,DSSJF        ;是反轉(zhuǎn)，裝入定時(shí)時(shí)間（分）
  317.             JZ    DSZJ13         ;如果當(dāng)前“分”為0（3:00）就轉(zhuǎn)移，按設(shè)置的增(減)值減
  318.             CJNE  A,#30,DSZJ9    ;“分”不為0，是否等于或大于30
  319.     DSZJ9:
  320.             JC    DSZJ10         ;小于就轉(zhuǎn)移，把0放入定時(shí)時(shí)間（分），使時(shí)間變?yōu)?:00
  321.             SUBB  A,#30          ;等于或大于，減30分
  322.             MOV   DSSJF,A        ;把計(jì)算結(jié)果放入定時(shí)時(shí)間（分）
  323.             RET
  324.     DSZJ10:
  325.             MOV   DSSJF,#0       ;小于30，把0放入定時(shí)時(shí)間（分），使時(shí)間變?yōu)?:00
  326.             RET
  327.     DSZJ11:
  328.             JC    DSZJ13         ;小于3就轉(zhuǎn)移
  329.     DSZJ12:
  330.             MOV   DSZJ,#30       ;大于3:00，把DSZJ處的“增(減)值”改為30（分鐘）
  331.     DSZJ13:
  332.             MOV   A,DSSJF        ;裝入定時(shí)時(shí)間（分）
  333.             JNB   01H,DSZJ17     ;如果位地址01H為0（逆時(shí)針?lè)崔D(zhuǎn)）就轉(zhuǎn)移
  334.             ADD   A,DSZJ         ;是正轉(zhuǎn)，當(dāng)前“分”直接加DSZJ處的“增(減)值”
  335.             CJNE  A,#60,DSZJ14   ;加完后“分”是否等于或大于60
  336.     DSZJ14:
  337.             JC    DSZJ15         ;小于60就轉(zhuǎn)移，把A放入定時(shí)時(shí)間（分）
  338.             SUBB  A,#60          ;等于或大于60，就減60，然后小時(shí)加1
  339.             MOV   DSSJF,A        ;把A放入定時(shí)時(shí)間（分）
  340.             MOV   A,DSSJS        ;裝入“時(shí)”
  341.             INC   A              ;小時(shí)加1
  342.             MOV   DSSJS,A
  343.             CJNE  A,#3,DSZJ16    ;加完后“時(shí)”不是3就轉(zhuǎn)移，退出
  344.             CLR   A              ;加完后大于3:00了，把0放入定時(shí)時(shí)間（分），使時(shí)間變?yōu)?:00
  345.     DSZJ15:
  346.             MOV   DSSJF,A
  347.     DSZJ16: RET
  348.     DSZJ17:
  349.             CJNE  A,DSZJ,DSZJ18 ;是逆時(shí)針?lè)崔D(zhuǎn)，當(dāng)前“分”是否等于或大于DSZJ處的“增(減)值”
  350.     DSZJ18:
  351.             JC    DSZJ19        ;小于就轉(zhuǎn)移
  352.             SUBB  A,DSZJ        ;等于或大于，定時(shí)時(shí)間（分）減“增(減)值”
  353.             MOV   DSSJF,A       ;把計(jì)算結(jié)果放入定時(shí)時(shí)間（分）
  354.             RET
  355.     DSZJ19:
  356.             MOV   A,DSZJ        ;“分”小于“增(減)值”，裝入DSZJ處的“增(減)值”
  357.             CLR   C             ;進(jìn)位標(biāo)志清0
  358.             SUBB  A,DSSJF       ;“增(減)值”減“定時(shí)時(shí)間（分）”
  359.             MOV   DSSJF,A       ;減完后的結(jié)果暫時(shí)放入DSSJF
  360.             MOV   A,#60
  361.             SUBB  A,DSSJF       ;60減上面的計(jì)算結(jié)果，得出定時(shí)時(shí)間（分），然后小時(shí)減1
  362.             MOV   DSSJF,A       ;得出的數(shù)放入定時(shí)時(shí)間（分）
  363.             MOV   A,DSSJS       ;裝入定時(shí)時(shí)間（時(shí)）
  364.             JZ    DSSJQL        ;如果“時(shí)”為0就轉(zhuǎn)移
  365.             DEC   DSSJS         ;“時(shí)”不為0，減1
  366.             RET
  367.     DSSJQL:
  368.             MOV   DSSJF,#0      ;把“分”置為0
  369.             MOV   DSSJHM,#0
  370.             RET

  372.     ;-------------------------------------------------------------------------------------
  373.     ;子程序：按鍵動(dòng)作處理
  374.     ;短按1次暫停計(jì)時(shí)；短按2次當(dāng)前項(xiàng)時(shí)間(當(dāng)次)清零；短按3次重新啟動(dòng)，相當(dāng)于重新上電。
  375.     ;長(zhǎng)按3秒顯示“--:--”時(shí)釋放，進(jìn)入“設(shè)置”；長(zhǎng)按10秒，恢復(fù)默認(rèn)設(shè)置，顯示88:88。
  376.     ;
  377.     ;啟用“上電延時(shí)導(dǎo)通”，“延時(shí)導(dǎo)通模式”為2時(shí)，上電4.2分鐘內(nèi)按鍵失效，4.2分鐘之后
  378.     ;按鍵只有時(shí)間清零功能，持續(xù)按下按鍵的時(shí)間達(dá)到設(shè)置的時(shí)長(zhǎng)（0~99秒）就清零，清零后
  379.     ;繼續(xù)執(zhí)行下一項(xiàng)，執(zhí)行到“導(dǎo)通”狀態(tài)運(yùn)行結(jié)束時(shí)，按鍵功能恢復(fù)正常。
  380.     ;-------------------------------------------------------------------------------------
  381.     AJDZCL:
  382.             JB     08H,JSYSDT2  ;位地址08H為1就轉(zhuǎn)移，不響應(yīng)按鍵動(dòng)作。
  383.             MOV    A,DQZT       ;裝入“當(dāng)前狀態(tài)”，0=導(dǎo)通、1=斷開(kāi)，2=上電延時(shí)導(dǎo)通
  384.             CJNE   A,#2,KEY0    ;不是“上電延時(shí)導(dǎo)通”狀態(tài)就轉(zhuǎn)移
  385.             MOV    A,YSMS       ;裝入“延時(shí)導(dǎo)通模式”
  386.             CJNE   A,#2,KEY0    ;不是2（延時(shí)時(shí)間到后從“斷開(kāi)”繼續(xù)運(yùn)行）就轉(zhuǎn)移
  387.             MOV    A,YSXY       ;裝入“延時(shí)響應(yīng)”
  388.             JNZ    JSYSDT2      ;延時(shí)響應(yīng)時(shí)間未到就轉(zhuǎn)移退出
  389.             MOV    MJS,YSJS     ;把設(shè)置的“按下持續(xù)時(shí)間”秒計(jì)數(shù)放入MJS
  390.     JSYSDT1:
  391.             MOV    A,MJS
  392.             JNZ    JSYSDT3      ;等待秒計(jì)數(shù)為0
  393.             MOV    DSSJS,A      ;持續(xù)按下的時(shí)間到，定時(shí)時(shí)間（時(shí)）清零
  394.             MOV    DSSJF,A      ;持續(xù)按下的時(shí)間到，定時(shí)時(shí)間（分）清零
  395.             MOV    DSSJM,A      ;持續(xù)按下的時(shí)間到，定時(shí)時(shí)間（秒）清零
  396.             MOV    DSSJHM,A     ;持續(xù)按下的時(shí)間到，定時(shí)時(shí)間（毫秒）清零
  397.             LCALL  KEYEX        ;等待按鍵釋放
  398.             SETB   08H          ;位地址08H置為1，不響應(yīng)按鍵動(dòng)作。
  399.     JSYSDT2:
  400.             RET
  401.     JSYSDT3:
  402.             LCALL  SKEY0
  403.             JC     JSYSDT1      ;如果C=1(按鍵還沒(méi)釋放)，就繼續(xù)掃描等待
  404.             RET
  405.     KEY0:
  406.             MOV    MJS,#10      ;放入等待時(shí)間，10秒
  407.     KEY1:
  408.             MOV    A,MJS        ;裝入等待時(shí)間
  409.             CJNE   A,#7,KEY5    ;按下未達(dá)到3秒(10-3=7)就轉(zhuǎn)移
  410.             SETB   06H          ;到3秒了，把位地址06H設(shè)置為1，數(shù)碼管顯示“--:--”
  411.             MOV    ZXM1,#0C0H   ;-
  412.             MOV    ZXM2,#0C0H   ;-
  413.             MOV    ZXM3,#0C0H   ;-
  414.             MOV    ZXM4,#0C0H   ;-
  415.             LCALL  DISP         ;顯示“--:--”
  416.     KEY2:
  417.             MOV    A,MJS        ;裝入等待時(shí)間
  418.             JZ     KEY3         ;如果為0(長(zhǎng)按達(dá)到了10秒)就轉(zhuǎn)移
  419.             LCALL  SKEY         ;掃描按鍵
  420.             JC     KEY2         ;如果C=1(按鍵還沒(méi)釋放)，就繼續(xù)掃描
  421.             MOV    SMJSF,#0FFH  ;先放入一個(gè)數(shù)值，等退出后才恢復(fù)睡眠計(jì)時(shí)
  422.             LCALL  TZGXSZ       ;調(diào)用“調(diào)整各項(xiàng)設(shè)置”子程序
  423.             MOV    SMJSF,SMMS   ;睡眠模式
  424.             MOV    SMJSM,#0     ;
  425.             RET
  426.     KEY3:
  427.             MOV    ZXM1,#0FFH  ;達(dá)到了10秒，顯示3秒88:88
  428.             MOV    ZXM2,#0FFH  ;8
  429.             MOV    ZXM3,#0FFH  ;8
  430.             MOV    ZXM4,#0FFH  ;8
  431.             LCALL  DISP        ;顯示
  432.             MOV    MJS,#3      ;顯示3秒
  433.     KEY4:
  434.             MOV    A,MJS       ;顯示3秒
  435.             LCALL  WG          ;喂狗
  436.             JNZ    KEY4        ;等待MJS為0秒
  437.             LCALL  SZMRZ       ;延時(shí)時(shí)間到，恢復(fù)各項(xiàng)默認(rèn)設(shè)置
  438.             LCALL  WSET        ;保存設(shè)置
  439.             LCALL  KEYEX       ;等待按鍵釋放
  440.             LCALL  REEPR       ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”，從“導(dǎo)通”開(kāi)始運(yùn)行。
  441.             CLR    02H         ;位地址02H置為0（正常運(yùn)行）
  442.             RET
  443.     KEY5:
  444.             LCALL  SKEY       ;掃描按鍵
  445.             JC     KEY1       ;如果C=1(按鍵還沒(méi)釋放)，就繼續(xù)掃描
  446.             MOV    A,DSSJHM   ;裝入定時(shí)時(shí)間(毫秒)到寄存器A
  447.             JNZ    KEY6       ;不是0就轉(zhuǎn)移
  448.             MOV    A,DSSJM    ;裝入定時(shí)時(shí)間(秒)到寄存器A
  449.             JNZ    KEY6       ;不是0就轉(zhuǎn)移
  450.             MOV    A,DSSJF    ;裝入定時(shí)時(shí)間(分)到寄存器A
  451.             JNZ    KEY6       ;不是0就轉(zhuǎn)移
  452.             MOV    A,DSSJS    ;裝入定時(shí)時(shí)間(時(shí))到寄存器A
  453.             JNZ    KEY6       ;不是0就轉(zhuǎn)移
  454.             CLR    02H        ;定時(shí)時(shí)間為0，位地址02H置為0（正常）
  455.             LJMP   KEY7
  456.     KEY6:
  457.             CPL    02H        ;位地址02H取反，暫停/正常切換
  458.     KEY7:
  459.             LCALL  KEYA       ;第1次按鍵釋放了，再次掃描按鍵500毫秒
  460.             JZ     KEY8       ;如果500毫秒內(nèi)有按鍵動(dòng)作就轉(zhuǎn)移
  461.             RET
  462.     KEY8:
  463.             LCALL  KEYEX      ;有按鍵動(dòng)作，等待第2次按鍵釋放
  464.             LCALL  KEYA       ;按鍵釋放了，掃描按鍵500毫秒
  465.             JZ     KEY9       ;如果500毫秒內(nèi)有按鍵動(dòng)作就轉(zhuǎn)移
  466.             MOV    DSSJS,#0   ;沒(méi)有按鍵動(dòng)作，按了2次，把當(dāng)前時(shí)間清零
  467.             MOV    DSSJF,#0   ;把當(dāng)前時(shí)間清零
  468.             MOV    DSSJM,#0   ;把當(dāng)前時(shí)間清零
  469.             MOV    DSSJHM,#0  ;把當(dāng)前時(shí)間清零
  470.             CLR    02H        ;位地址02H置為0（正常）
  471.             RET
  472.     KEY9:
  473.             LCALL  KEYEX      ;等待第3次按鍵釋放
  474.             CLR    EA         ;關(guān)閉全局中斷
  475.             INC    FWBZ1      ;加1，改變復(fù)位判斷標(biāo)志1
  476.             LJMP   START      ;跳轉(zhuǎn)到START，重新初始化

  478.     ;------------------------------------------------------------------
  479.     ;子程序：調(diào)整各項(xiàng)設(shè)置值
  480.     ;短按2次KEY保存并退出，或在最后一項(xiàng)無(wú)操作自動(dòng)保存退出。
  481.     ;閃爍5秒無(wú)操作或者短按KEY釋放0.5秒后，跳到下一項(xiàng)設(shè)置。
  482.     ;按住KEY不放，旋轉(zhuǎn)編碼器可向上/下跳到任意一項(xiàng)設(shè)置
  483.     ;如果是用按鍵代替編碼器，支持長(zhǎng)按快速加/減
  484.     ;------------------------------------------------------------------
  485.     TZGXSZ:
  486.             CLR    06H            ;位地址06H置為0，正常顯示
  487.             MOV    DISPL,#1       ;第一項(xiàng)，導(dǎo)通時(shí)間(時(shí))，0~99小時(shí)
  488.     SZTZ:
  489.             MOV    MJS,#7         ;放入無(wú)操作等待時(shí)間(秒)到MJS
  490.             CLR    03H            ;位地址03H置為0，允許檢查剩余時(shí)間
  491.     SZTZ1:
  492.             LCALL  SKEY0          ;掃描按鍵
  493.             JNC    SZTZ7          ;沒(méi)有按鍵動(dòng)作(C=0)就轉(zhuǎn)移
  494.             CLR    04H            ;已經(jīng)按下，把位地址04H置為0，不閃爍顯示
  495.     SZTZ2:        
  496.             LCALL  Scan10         ;掃描編碼器（有方向標(biāo)志）
  497.             JB     00H,SZTZ4      ;如果編碼器有旋轉(zhuǎn)動(dòng)作(位地址00H為1)就轉(zhuǎn)移
  498.             LCALL  SKEY0          ;掃描按鍵
  499.             JC     SZTZ2          ;按鍵未釋放(C=1)就轉(zhuǎn)移
  500.             LCALL  KEYA           ;釋放了，再次掃描按鍵500毫秒
  501.             JNZ    SZTZ3          ;沒(méi)有第2次按鍵動(dòng)作就轉(zhuǎn)移
  502.             LCALL  WSET           ;已經(jīng)第2次按下，保存設(shè)置
  503.             LCALL  KEYEX          ;等待按鍵釋放
  504.             RET
  505.     SZTZ3:
  506.             SETB   01H            ;把位地址01H置為1，順時(shí)針正轉(zhuǎn)（切換到下一項(xiàng)）
  507.             LCALL  QHXM           ;根據(jù)位地址01H的方向，切換到上/下一項(xiàng)
  508.             LJMP   SZTZ
  509.     SZTZ4:
  510.             LCALL  QHXM           ;根據(jù)位地址01H的方向，切換到上/下一項(xiàng)
  511.     SZTZ5:
  512.             LCALL  Scan20         ;掃描編碼器（無(wú)方向標(biāo)志）
  513.             JB     00H,SZTZ5      ;編碼器動(dòng)作未結(jié)束就繼續(xù)掃描，等待
  514.     SZTZ6:
  515.             LCALL  SKEY0          ;掃描按鍵
  516.             JNC    SZTZ           ;按鍵釋放(C=0)就轉(zhuǎn)移
  517.             LCALL  Scan10         ;掃描編碼器（有方向標(biāo)志）
  518.             JB     00H,SZTZ4      ;編碼器有動(dòng)作(位地址00H為1)就轉(zhuǎn)移，切換到上/下一項(xiàng)
  519.             LJMP   SZTZ6
  520.     SZTZ7:
  521.             LCALL  Scan10         ;掃描編碼器（有方向標(biāo)志）
  522.             JB     00H,SZTZ9      ;如果編碼器有旋轉(zhuǎn)動(dòng)作(位地址00H為1)就轉(zhuǎn)移
  523.             MOV    A,MJS          ;沒(méi)有轉(zhuǎn)動(dòng)，裝入秒計(jì)數(shù)到寄存器A
  524.             JZ     SZTZ8          ;如果秒計(jì)數(shù)為0(等待時(shí)間到)就轉(zhuǎn)移
  525.             JB     03H,SZTZ1      ;不為0，如果位地址03H為1就轉(zhuǎn)移，不檢查剩余時(shí)間
  526.             CJNE   A,#5,SZTZ1     ;檢查剩余時(shí)間，不到就轉(zhuǎn)移，繼續(xù)掃描編碼器
  527.             SETB   04H            ;把位地址04H置為1，設(shè)置為閃爍顯示
  528.             SETB   03H            ;位地址03H置為1，禁止檢查剩余時(shí)間
  529.             LJMP   SZTZ1
  530.     SZTZ8:
  531.             CLR    04H            ;等待時(shí)間到，把位地址04H置為0，不閃爍顯示
  532.             MOV    A,DISPL        ;裝入當(dāng)前目標(biāo)項(xiàng)
  533.             CJNE   A,#17,SZTZ3    ;不是最后一項(xiàng)就轉(zhuǎn)移，跳到下一項(xiàng)
  534.             LCALL  WSET           ;保存設(shè)置
  535.             RET
  536.     SZTZ9:
  537.             CLR    04H            ;編碼器已經(jīng)轉(zhuǎn)動(dòng)，把位地址04H置為0，不閃爍顯示
  538.             MOV    SHMJS,#50      ;設(shè)置有效長(zhǎng)按所需時(shí)長(zhǎng)，50×10毫秒=500毫秒
  539.     SZTZ10:
  540.             MOV    A,SHMJS        ;裝入(10)毫秒計(jì)數(shù)
  541.             JZ     SZTZ11         ;如果時(shí)長(zhǎng)達(dá)到(為0)就轉(zhuǎn)移
  542.             LCALL  Scan20         ;掃描編碼器（無(wú)方向標(biāo)志）
  543.             JB     00H,SZTZ10     ;動(dòng)作未結(jié)束就轉(zhuǎn)移，繼續(xù)掃描
  544.             LCALL  MBSZ           ;動(dòng)作結(jié)束了，調(diào)整DISPL指向的對(duì)象，加/減1
  545.             LJMP   SZTZ
  546.     SZTZ11:
  547.             LCALL  MBSZ           ;加/減1。已經(jīng)為有效長(zhǎng)按，下面進(jìn)入長(zhǎng)按快速加/減
  548.             MOV    SHMJS,#13      ;間隔加/減時(shí)間，(×10)毫秒
  549.     SZTZ12:
  550.             MOV    A,SHMJS        ;裝入(10)毫秒計(jì)數(shù)
  551.             JNZ    SZTZ13         ;時(shí)間未到(不為0)就轉(zhuǎn)移
  552.             LJMP   SZTZ11         ;已達(dá)到設(shè)定的間隔時(shí)長(zhǎng)，轉(zhuǎn)移，加/減1
  553.     SZTZ13:
  554.             LCALL  DELAY10        ;延時(shí)10毫秒
  555.             LCALL  Scan20         ;掃描編碼器（無(wú)方向標(biāo)志）
  556.             JB     00H,SZTZ12     ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  557.             LCALL  DELAY10        ;延時(shí)10毫秒
  558.             LCALL  Scan20         ;第2次掃描編碼器（無(wú)方向標(biāo)志）
  559.             JB     00H,SZTZ12     ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  560.             LCALL  DELAY10        ;延時(shí)10毫秒
  561.             LCALL  Scan20         ;第3次掃描編碼器（無(wú)方向標(biāo)志）
  562.             JB     00H,SZTZ12     ;動(dòng)作未結(jié)束就轉(zhuǎn)移
  563.             LJMP   SZTZ           ;動(dòng)作結(jié)束
  564.     MBSZ:
  565.             MOV    A,DISPL        ;裝入要調(diào)整的目標(biāo)項(xiàng)
  566.             LCALL  SXXFW          ;設(shè)置上下限限值
  567.             DEC    A              ;減1
  568.             ADD    A,#DTS         ;加上各項(xiàng)設(shè)置的起始地址
  569.             MOV    R0,A           ;把得出的目標(biāo)項(xiàng)地址放入R0
  570.             JB     01H,MBSZ2      ;如果位地址01H為1（順時(shí)針正轉(zhuǎn)）就轉(zhuǎn)移
  571.             INC    XXSZ           ;是反轉(zhuǎn)，下限值先加1
  572.             MOV    A,@R0          ;裝入R0指向的目標(biāo)數(shù)值
  573.             CJNE   A,XXSZ,MBSZ0   ;與加1后的下限值比較
  574.     MBSZ0:
  575.             JC     MBSZ1          ;如果小于“下限值+1”（不夠減）就轉(zhuǎn)移
  576.             DEC    @R0            ;等于或大于下限值，目標(biāo)數(shù)值減1
  577.             DEC    XXSZ           ;減1，恢復(fù)下限值
  578.             RET
  579.     MBSZ1:
  580.             DEC    XXSZ           ;減1，恢復(fù)下限值
  581.             MOV    @R0,XXSZ       ;不夠減了，直接放入下限值
  582.             RET
  583.     MBSZ2:
  584.             MOV    A,@R0          ;是正轉(zhuǎn)，裝入R0指向的RAM地址的目標(biāo)數(shù)值
  585.             INC    A              ;加1
  586.             CJNE   A,SXSZ,MBSZ3   ;加完后與上限數(shù)值比較
  587.     MBSZ3:
  588.             JC     MBSZ4          ;如果小于就轉(zhuǎn)移
  589.             MOV    @R0,SXSZ       ;等于或大于上限值，直接放入上限值
  590.             RET
  591.     MBSZ4:
  592.             MOV    @R0,A          ;小于上限值，把計(jì)算結(jié)果放回去
  593.             RET

  595.     ;-------------------------------------------------------------------------
  596.     ;子程序：切換項(xiàng)目。根據(jù)位地址01H的方向標(biāo)志，把當(dāng)前設(shè)置項(xiàng)切換到上/下一項(xiàng)
  597.     ;-------------------------------------------------------------------------
  598.     QHXM:
  599.             MOV   A,DISPL     ;裝入當(dāng)前項(xiàng)目號(hào)
  600.             JB    01H,QHXM2   ;如果位地址01H為1(正轉(zhuǎn))就轉(zhuǎn)移，切換到下一項(xiàng)
  601.             CJNE  A,#1,QHXM1  ;是反轉(zhuǎn)，如果不是1就轉(zhuǎn)移
  602.             MOV   DISPL,#17   ;切換到上一項(xiàng)17
  603.             RET
  604.     QHXM1:
  605.             DEC   DISPL       ;減1，切換到上一項(xiàng)
  606.             RET
  607.     QHXM2:
  608.             CJNE  A,#17,QHXM3 ;是正轉(zhuǎn)，如果不是17就轉(zhuǎn)移
  609.             MOV   DISPL,#1    ;切換到下一項(xiàng)1
  610.             RET
  611.     QHXM3:
  612.             INC   DISPL       ;加1，切換到下一項(xiàng)
  613.             RET

  615.     ;-------------------------------------------------------------------------
  616.     ;子程序：根據(jù)當(dāng)前項(xiàng)目號(hào)設(shè)置加/減調(diào)整的上下限值。入口參數(shù)：A=項(xiàng)目號(hào)。
  617.     ;-------------------------------------------------------------------------
  618.     SXXFW:
  619.             CJNE  A,#1,SXXFW1    ;1=顯示“1A”設(shè)置導(dǎo)通時(shí)間(時(shí))，0~99小時(shí)
  620.             MOV   XXSZ,#0        ;下限為0
  621.             MOV   SXSZ,#99       ;上限為99
  622.             RET
  623.     SXXFW1:
  624.             CJNE  A,#2,SXXFW2    ;2=顯示“1b”設(shè)置導(dǎo)通時(shí)間(分)，0~59分鐘
  625.             MOV   XXSZ,#0        ;下限為0
  626.             MOV   SXSZ,#59       ;上限為59
  627.             RET
  628.     SXXFW2:
  629.             CJNE  A,#3,SXXFW3    ;3=顯示“1C”設(shè)置導(dǎo)通時(shí)間(秒)，0~59秒
  630.             MOV   XXSZ,#0        ;下限為0
  631.             MOV   SXSZ,#59       ;上限為59
  632.             RET
  633.     SXXFW3:
  634.             CJNE  A,#4,SXXFW4    ;4=顯示“1d”設(shè)置導(dǎo)通時(shí)間(×10毫秒)，0~99
  635.             MOV   XXSZ,#0        ;下限為0
  636.             MOV   SXSZ,#99       ;上限為99
  637.             RET
  638.     SXXFW4:
  639.             CJNE  A,#5,SXXFW5    ;5=顯示“o-”設(shè)置循環(huán)定時(shí)，0~99
  640.             MOV   XXSZ,#0        ;下限為0
  641.             MOV   SXSZ,#99       ;上限為99
  642.             RET
  643.     SXXFW5:
  644.             CJNE  A,#6,SXXFW6    ;6=顯示“C-”設(shè)置睡眠模式，0~59
  645.             MOV   XXSZ,#0        ;下限為0
  646.             MOV   SXSZ,#59       ;上限為59
  647.             RET
  648.     SXXFW6:
  649.             CJNE  A,#7,SXXFW7    ;7=顯示“bC”設(shè)置實(shí)時(shí)調(diào)整時(shí)的增/減值(步長(zhǎng))：1~30分鐘
  650.             MOV   XXSZ,#1        ;下限為1
  651.             MOV   SXSZ,#30       ;上限為30
  652.             RET
  653.     SXXFW7:
  654.             CJNE  A,#8,SXXFW8    ;8=顯示“Ld”設(shè)置數(shù)碼管亮度，1~8級(jí)。
  655.             MOV   XXSZ,#1        ;下限為1
  656.             MOV   SXSZ,#8        ;上限為8
  657.             RET
  658.     SXXFW8:
  659.             CJNE  A,#9,SXXFW9    ;9=顯示“2A”設(shè)置斷開(kāi)時(shí)間(時(shí))，0~99小時(shí)
  660.             MOV   XXSZ,#0        ;下限為0
  661.             MOV   SXSZ,#99       ;上限為99
  662.             RET
  663.     SXXFW9:
  664.             CJNE  A,#10,SXXFW10  ;10=顯示“2b”設(shè)置斷開(kāi)時(shí)間(分)，0~59分鐘
  665.             MOV   XXSZ,#0        ;下限為0
  666.             MOV   SXSZ,#59       ;上限為59
  667.             RET
  668.     SXXFW10:
  669.             CJNE  A,#11,SXXFW11  ;11=顯示“2C”設(shè)置斷開(kāi)時(shí)間(秒)，0~59秒
  670.             MOV   XXSZ,#0        ;下限為0
  671.             MOV   SXSZ,#59       ;上限為59
  672.             RET
  673.     SXXFW11:
  674.             CJNE  A,#12,SXXFW12  ;12=顯示“2d”設(shè)置斷開(kāi)時(shí)間(×10毫秒)，0~99
  675.             MOV   XXSZ,#0        ;下限為0
  676.             MOV   SXSZ,#99       ;上限為99
  677.             RET
  678.     SXXFW12:
  679.             CJNE  A,#13,SXXFW13  ;13=顯示“3A”設(shè)置上電延時(shí)導(dǎo)通(時(shí))，0~99小時(shí)
  680.             MOV   XXSZ,#0        ;下限為0
  681.             MOV   SXSZ,#99       ;上限為99
  682.             RET
  683.     SXXFW13:
  684.             CJNE  A,#14,SXXFW14  ;14=顯示“3b”設(shè)置上電延時(shí)導(dǎo)通(分)，0~59分鐘
  685.             MOV   XXSZ,#0        ;下限為0
  686.             MOV   SXSZ,#59       ;上限為59
  687.             RET
  688.     SXXFW14:
  689.             CJNE  A,#15,SXXFW15  ;15=顯示“3C”設(shè)置上電延時(shí)導(dǎo)通(秒)，0~59秒
  690.             MOV   XXSZ,#0        ;下限為0
  691.             MOV   SXSZ,#59       ;上限為59
  692.             RET
  693.     SXXFW15:
  694.             CJNE  A,#16,SXXFW16  ;16=顯示“d-”設(shè)置延時(shí)導(dǎo)通模式，0~2。默認(rèn)為0
  695.             MOV   XXSZ,#0        ;下限為0
  696.             MOV   SXSZ,#2        ;上限為2
  697.             RET
  698.     SXXFW16:                     ;17=顯示“E-”設(shè)置“持續(xù)按下時(shí)間”秒計(jì)數(shù)0~99
  699.             MOV   XXSZ,#0        ;下限為0
  700.             MOV   SXSZ,#99       ;上限為99
  701.             RET

  703.     ;----------------------------------------------------------------------------------------
  704.     ;子程序：掃描編碼器是否有旋轉(zhuǎn)動(dòng)作并設(shè)置好方向標(biāo)志
  705.     ;出口參數(shù)：位地址第00位=1已經(jīng)轉(zhuǎn)動(dòng)，=0沒(méi)有轉(zhuǎn)動(dòng)；位地址第01位=1順時(shí)針正轉(zhuǎn)，=0逆時(shí)針?lè)崔D(zhuǎn)
  706.     ;----------------------------------------------------------------------------------------
  707.     Scan1:
  708.             LCALL  Scan10        ;掃描編碼器
  709.             JNB    00H,Scan1E    ;如果沒(méi)有旋轉(zhuǎn)動(dòng)作就轉(zhuǎn)移退出
  710.             LCALL  SMCL          ;有旋轉(zhuǎn)動(dòng)作，調(diào)用睡眠處理子程序
  711.             JZ     Scan1E        ;如果是0(從睡眠狀態(tài)喚醒)就轉(zhuǎn)移，下次才退出“始終導(dǎo)通”狀態(tài)
  712.             LCALL  TCSZDT        ;退出上電延時(shí)導(dǎo)通的“始終導(dǎo)通”狀態(tài)
  713.     Scan1E: RET
  714.     Scan10:
  715.             LCALL  WG            ;喂狗
  716.             SETB   EC11A         ;拉高編碼器A引腳電平
  717.             SETB   EC11B         ;拉高編碼器B引腳電平
  718.             JNB    EC11A,Scan11  ;如果為0(低電平)就轉(zhuǎn)移，編碼器有旋轉(zhuǎn)動(dòng)作，順時(shí)針正轉(zhuǎn)
  719.             JNB    EC11B,Scan12  ;如果為0(低電平)就轉(zhuǎn)移，編碼器有旋轉(zhuǎn)動(dòng)作，逆時(shí)針?lè)崔D(zhuǎn)
  720.             CLR    00H           ;沒(méi)有旋轉(zhuǎn)動(dòng)作，把位地址00H置為0
  721.             RET
  722.     Scan11:
  723.             SETB   01H           ;順時(shí)針正轉(zhuǎn)，把位地址01H置為1
  724.             SETB   00H           ;有旋轉(zhuǎn)動(dòng)作，把位地址00H置為1
  725.             RET  
  726.     Scan12:
  727.             CLR    01H           ;逆時(shí)針?lè)崔D(zhuǎn)，把位地址01H置為0
  728.             SETB   00H           ;有旋轉(zhuǎn)動(dòng)作，把位地址00H置為1
  729.     Scan13: RET

  731.     ;-----------------------------------------------------------
  732.     ;子程序：掃描編碼器是否有旋轉(zhuǎn)動(dòng)作，不設(shè)置方向標(biāo)志
  733.     ;出口參數(shù)：位地址第0位=1已經(jīng)轉(zhuǎn)動(dòng)，=0沒(méi)有轉(zhuǎn)動(dòng)
  734.     ;-----------------------------------------------------------
  735.     Scan2:
  736.             LCALL  Scan20        ;掃描編碼器
  737.             JNB    00H,Scan2E    ;如果沒(méi)有旋轉(zhuǎn)動(dòng)作就轉(zhuǎn)移退出
  738.             LCALL  SMCL          ;有旋轉(zhuǎn)動(dòng)作，調(diào)用睡眠處理子程序
  739.             JZ     Scan2E        ;如果是0(從睡眠狀態(tài)喚醒)就轉(zhuǎn)移，下次才退出“始終導(dǎo)通”狀態(tài)
  740.             LCALL  TCSZDT        ;退出上電延時(shí)導(dǎo)通的“始終導(dǎo)通”狀態(tài)
  741.     Scan2E: RET
  742.     Scan20:
  743.             LCALL  WG            ;喂狗
  744.             SETB   EC11A         ;拉高編碼器A引腳電平
  745.             SETB   EC11B         ;拉高編碼器B引腳電平
  746.             JNB    EC11A,Scan21  ;如果為0(低電平)就轉(zhuǎn)移，編碼器有旋轉(zhuǎn)動(dòng)作
  747.             JNB    EC11B,Scan21  ;如果為0(低電平)就轉(zhuǎn)移，編碼器有旋轉(zhuǎn)動(dòng)作
  748.             CLR    00H           ;沒(méi)有旋轉(zhuǎn)動(dòng)作，把位地址00H置為0
  749.             RET
  750.     Scan21:
  751.             SETB   00H           ;有旋轉(zhuǎn)動(dòng)作，把位地址00H置為1
  752.     Scan22: RET

  754.     ;-----------------------------------------------------------
  755.     ;子程序：掃描按鍵，未按C=0，已按下C=1
  756.     ;-----------------------------------------------------------
  757.     SKEY:
  758.             LCALL  SKEY0      ;掃描按鍵
  759.             JNC    SKEYE      ;如果沒(méi)有按鍵動(dòng)作(C為0)就轉(zhuǎn)移退出
  760.             LCALL  SMCL       ;有按鍵動(dòng)作，調(diào)用睡眠處理子程序
  761.             JZ     SKEYE      ;如果是0(從睡眠狀態(tài)喚醒)就轉(zhuǎn)移，下次才退出“始終導(dǎo)通”狀態(tài)
  762.             LCALL  TCSZDT     ;退出上電延時(shí)導(dǎo)通的“始終導(dǎo)通”狀態(tài)
  763.     SKEYE:  RET
  764.     SKEY0:
  765.             LCALL  WG         ;喂狗
  766.             SETB   KEY        ;按鍵端口置為高電平
  767.             JNB    KEY,SKEY1  ;為0(低電平)就轉(zhuǎn)移，表示按鍵已經(jīng)被按下
  768.             CLR    C          ;C置為0，沒(méi)有按鍵動(dòng)作
  769.             RET
  770.     SKEY1:
  771.             LCALL  DELAY10    ;延時(shí)10毫秒
  772.             LCALL  DELAY10    ;延時(shí)10毫秒
  773.             SETB   KEY        ;延時(shí)結(jié)束后再次把按鍵端口置為高電平
  774.             JNB    KEY,SKEY2  ;為0(低電平，按鍵被有效按下)就轉(zhuǎn)移
  775.             CLR    C          ;C置為0，沒(méi)有按鍵動(dòng)作
  776.             RET               ;按鍵未被有效按下，退出
  777.     SKEY2:
  778.             SETB   C          ;C置為1，按鍵已有效按下
  779.             RET

  781.     ;------------------ 掃描按鍵500毫秒，有按鍵動(dòng)作A=0，無(wú)按鍵動(dòng)作A=1 ------------------
  782.     KEYA:
  783.             MOV    SHMJS,#50  ;等待500毫秒
  784.     KEYB:
  785.             MOV    A,SHMJS    ;裝入(10)毫秒計(jì)數(shù)
  786.             JZ     KEYC       ;為0（時(shí)間到）就轉(zhuǎn)移
  787.             LCALL  SKEY0      ;掃描按鍵
  788.             JNC    KEYB       ;沒(méi)有按鍵動(dòng)作(C=0)就轉(zhuǎn)移
  789.             CLR    A          ;有按鍵動(dòng)作A=0
  790.             RET
  791.     KEYC:
  792.             MOV    A,#1       ;等待時(shí)間已到，A=1沒(méi)有按鍵動(dòng)作
  793.             RET

  795.     ;------------------ 等待按鍵釋放 ------------------
  796.     KEYEX:        
  797.             LCALL  SKEY0      ;掃描按鍵
  798.             JC     KEYEX      ;如果C=1(按鍵還沒(méi)釋放)就繼續(xù)掃描
  799.             RET

  801.     ;------------------ 延時(shí)10毫秒 ------------------
  802.     DELAY10:   ;@11.0592MHz
  803.             NOP
  804.             NOP
  805.             NOP
  806.             PUSH   16H
  807.             PUSH   17H
  808.             MOV    16H,#87
  809.             MOV    17H,#10
  810.     NEXT:
  811.             DJNZ   17H,NEXT
  812.             DJNZ   16H,NEXT
  813.             POP    17H
  814.             POP    16H
  815.             RET

  817.     ;-----------------------------------------------------------------------------------
  818.     ;子程序：睡眠模式處理，如果當(dāng)前處于睡眠狀態(tài)就重新放入睡眠倒計(jì)時(shí)，恢復(fù)顯示，等待
  819.     ;編碼器或按鍵動(dòng)作結(jié)束并延時(shí)2秒才退出；如果不是睡眠狀態(tài)，重新放入睡眠計(jì)時(shí)，返回
  820.     ;出口參數(shù)：A=0從睡眠狀態(tài)喚醒
  821.     ;-----------------------------------------------------------------------------------
  822.     SMCL:
  823.             MOV    A,SMMS       ;裝入睡眠模式設(shè)置值
  824.             JNZ    SMCL1        ;不為0就轉(zhuǎn)移
  825.             INC    A            ;為0，加1，使返回時(shí)A不為0
  826.             RET                 ;當(dāng)前睡眠模式為“始終顯示”，返回
  827.     SMCL1:
  828.             MOV    A,SMJSF      ;裝入睡眠計(jì)時(shí)(分)
  829.             JNZ    SMCL2        ;不為0就轉(zhuǎn)移
  830.             MOV    A,SMJSM      ;裝入睡眠計(jì)時(shí)(秒)
  831.             JZ     SMCL3        ;是0就轉(zhuǎn)移
  832.     SMCL2:
  833.             MOV    SMJSF,SMMS   ;不為0，還沒(méi)進(jìn)入睡眠狀態(tài)，重新放入倒計(jì)時(shí)
  834.             MOV    SMJSM,#0     ;不為0，還沒(méi)進(jìn)入睡眠狀態(tài)，重新放入倒計(jì)時(shí)
  835.             RET
  836.     SMCL3:
  837.             MOV    SMJSF,SMMS   ;已進(jìn)入睡眠狀態(tài)，重新放入倒計(jì)時(shí)，喚醒睡眠，恢復(fù)顯示
  838.             MOV    SMJSM,#0     ;已進(jìn)入睡眠狀態(tài)，重新放入倒計(jì)時(shí)，喚醒睡眠，恢復(fù)顯示
  839.             INC    XSHC1        ;改變XSHC1數(shù)據(jù)，觸發(fā)“立即顯示”
  840.     SMCL4:
  841.             MOV    SMJS,#2      ;放入秒計(jì)時(shí)
  842.     SMCL5:
  843.             LCALL  WG           ;喂狗
  844.             SETB   KEY          ;按鍵端口置為高電平
  845.             SETB   EC11A        ;編碼器A引腳置為高電平
  846.             SETB   EC11B        ;編碼器B引腳置為高電平
  847.             JNB    KEY,SMCL4    ;為0(低電平)未釋放就轉(zhuǎn)移
  848.             JNB    EC11A,SMCL4  ;為0(低電平)未釋放就轉(zhuǎn)移
  849.             JNB    EC11B,SMCL4  ;為0(低電平)未釋放就轉(zhuǎn)移
  850.             MOV    A,SMJS       ;裝入計(jì)時(shí)
  851.             JNZ    SMCL5        ;不為0就轉(zhuǎn)移繼續(xù)掃描按鍵和編碼器
  852.             CLR    C            ;C置為0，沒(méi)有按鍵動(dòng)作
  853.             CLR    00H          ;把位地址00H置為0，沒(méi)有旋轉(zhuǎn)動(dòng)作
  854.             RET

  856.     ;-------------------------------------------------------------------------------------
  857.     ;子程序：退出始終導(dǎo)通狀態(tài)處理。當(dāng)進(jìn)入“延時(shí)時(shí)間到后始終導(dǎo)通”狀態(tài)時(shí)，按鍵、編碼器有
  858.     ;動(dòng)作就退出始終導(dǎo)通狀態(tài)，切換到“導(dǎo)通時(shí)間”的結(jié)束(斷開(kāi))狀態(tài)，如設(shè)置為循環(huán)定時(shí)，就轉(zhuǎn)
  859.     ;換到“斷開(kāi)時(shí)間”繼續(xù)運(yùn)行。
  860.     ;-------------------------------------------------------------------------------------
  861.     TCSZDT:
  862.             JB     07H,TC1   ;如果為1(已進(jìn)入“上電延時(shí)導(dǎo)通”的始終導(dǎo)通狀態(tài))就轉(zhuǎn)移
  863.             RET
  864.     TC1:
  865.             MOV    A,XHDS    ;裝入“循環(huán)定時(shí)”設(shè)置
  866.             CJNE   A,#1,TC2  ;不是1(不循環(huán))就轉(zhuǎn)移
  867.             MOV    DQZT,#0   ;把當(dāng)前狀態(tài)切換到“導(dǎo)通”
  868.             CLR    07H       ;位地址07H置為0(正常)
  869.             LCALL  SMCL4     ;等待編碼器或按鍵動(dòng)作結(jié)束后延時(shí)2秒才退出
  870.             RET
  871.     TC2:
  872.             MOV    DQZT,#1      ;把當(dāng)前狀態(tài)設(shè)為1，從“斷開(kāi)時(shí)間”繼續(xù)運(yùn)行
  873.             MOV    DSSJS,DKS    ;裝入“斷開(kāi)時(shí)間”
  874.             MOV    DSSJF,DKF    ;裝入“斷開(kāi)時(shí)間”
  875.             MOV    DSSJM,DKM    ;裝入“斷開(kāi)時(shí)間”
  876.             MOV    DSSJHM,DKHM  ;裝入“斷開(kāi)時(shí)間”
  877.             CLR    07H          ;位地址07H置為0(正常)
  878.             LCALL  SMCL4        ;等待編碼器或按鍵動(dòng)作結(jié)束后延時(shí)2秒才退出
  879.             RET

  881.     ;------------------------------------------------------------------------
  882.     ;子程序：T0中斷調(diào)用，時(shí)間計(jì)數(shù)及倒計(jì)時(shí)處理、狀態(tài)切換
  883.     ;------------------------------------------------------------------------
  884.     TIME:
  885.             LCALL  TIME6          ;部分時(shí)間計(jì)數(shù)及倒計(jì)時(shí)處理
  886.             JB     02H,TIME1      ;如果位地址02H為1(暫停)就轉(zhuǎn)移退出，停止計(jì)時(shí)
  887.             MOV    A,DSSJHM       ;裝入定時(shí)時(shí)間(10)毫秒計(jì)數(shù)
  888.             JZ     TIME2          ;如果是0就轉(zhuǎn)移
  889.             DEC    A              ;DSSJHM不是0，減1
  890.             MOV    DSSJHM,A       ;DSSJHM不是0，減1
  891.             JNZ    TIME1          ;減1后不為0就轉(zhuǎn)移退出
  892.             MOV    A,DSSJM        ;裝入定時(shí)時(shí)間(秒)到寄存器A
  893.             JNZ    TIME1          ;如果(秒)不是0就轉(zhuǎn)移退出
  894.             MOV    A,DSSJF        ;裝入定時(shí)時(shí)間(分)到寄存器A
  895.             JNZ    TIME1          ;如果(分)不是0就轉(zhuǎn)移退出
  896.             MOV    A,DSSJS        ;裝入定時(shí)時(shí)間(時(shí))到寄存器A
  897.             JNZ    TIME1          ;如果(時(shí))不是0就轉(zhuǎn)移退出
  898.             LCALL  ZTQH           ;時(shí)、分、秒都是0了，狀態(tài)切換
  899.     TIME1:  RET
  900.     TIME2:
  901.             MOV    A,DSSJM        ;裝入定時(shí)時(shí)間(秒)到寄存器A
  902.             JZ     TIME3          ;如果是0就轉(zhuǎn)移
  903.             DEC    DSSJM          ;不是0，減1秒
  904.             MOV    DSSJHM,#99     ;重新放入(10)毫秒計(jì)數(shù)值
  905.             MOV    HMJS,#99       ;重新放入(10)毫秒計(jì)數(shù)值，使DSSJHM與HMJS同步
  906.             RET
  907.     TIME3:
  908.             MOV    A,DSSJF        ;裝入定時(shí)時(shí)間(分)到寄存器A
  909.             JZ     TIME4          ;如果是0就轉(zhuǎn)移
  910.             DEC    DSSJF          ;不是0，減1分
  911.             MOV    DSSJM,#59      ;把59放入定時(shí)時(shí)間(秒)
  912.             MOV    DSSJHM,#99     ;重新放入(10)毫秒計(jì)數(shù)值
  913.             MOV    HMJS,#99       ;重新放入(10)毫秒計(jì)數(shù)值
  914.             RET
  915.     TIME4:
  916.             MOV    A,DSSJS        ;裝入定時(shí)時(shí)間(時(shí))到寄存器A
  917.             JNZ    TIME5          ;不是0就轉(zhuǎn)移
  918.             LCALL  ZTQH           ;狀態(tài)切換
  919.             RET
  920.     TIME5:        
  921.             DEC    DSSJS          ;不是0，小時(shí)減1
  922.             MOV    DSSJM,#59      ;把59放入定時(shí)時(shí)間(秒)
  923.             MOV    DSSJF,#59      ;把59放入定時(shí)時(shí)間(分)
  924.             MOV    DSSJHM,#99     ;重新放入(10)毫秒計(jì)數(shù)值
  925.             MOV    HMJS,#99       ;重新放入(10)毫秒計(jì)數(shù)值
  926.             RET
  927.     TIME6:
  928.             MOV    A,SHMJS        ;裝入(10)毫秒計(jì)數(shù)
  929.             JZ     TIME7          ;如果是0就轉(zhuǎn)移
  930.             DEC    SHMJS          ;每10毫秒減1，直到為0
  931.     TIME7:
  932.             MOV    A,HMJS         ;裝入(10)毫秒計(jì)數(shù)2
  933.             JZ     TIME9          ;如果是0就轉(zhuǎn)移
  934.             DEC    HMJS           ;不是0，減1
  935.             CJNE   A,#50,TIME8    ;如果不是50就轉(zhuǎn)移退出
  936.             SETB   05H            ;位地址第05位置為1，數(shù)字及冒號(hào)閃爍時(shí)用，每0.5秒變化一次
  937.     TIME8:  RET
  938.     TIME9:
  939.             CLR    05H            ;位地址第05位置為0，數(shù)字及冒號(hào)閃爍時(shí)用，每0.5秒變化一次
  940.             MOV    HMJS,#99       ;重新放入計(jì)數(shù)值(1秒)
  941.             MOV    A,MJS          ;裝入秒計(jì)數(shù)
  942.             JZ     TIME10         ;如果是0就轉(zhuǎn)移
  943.             DEC    MJS            ;每秒減1，直到為0
  944.     TIME10:
  945.             MOV    A,YSXY         ;裝入“延時(shí)響應(yīng)”秒計(jì)數(shù)
  946.             JZ     TIME11         ;如果是0就轉(zhuǎn)移
  947.             DEC    YSXY           ;每秒減1，直到為0
  948.     TIME11:
  949.             JNB     09H,TIME12    ;位地址09H不為1(允許恢復(fù)響應(yīng)按鍵動(dòng)作)就轉(zhuǎn)移
  950.             JNB     08H,TIME12    ;位地址08H不為1(禁止響應(yīng)按鍵動(dòng)作)就轉(zhuǎn)移
  951.             SETB    KEY           ;按鍵端口置為高電平
  952.             JNB     KEY,TIME12    ;為0(低電平，按鍵為按下?tīng)顟B(tài))就轉(zhuǎn)移
  953.             CLR     08H           ;位地址08H置為0（恢復(fù)響應(yīng)按鍵動(dòng)作）
  954.             CLR     09H           ;位地址09H置為0（正常）
  955.     TIME12:
  956.             MOV     A,SMJS        ;裝入睡眠模式處理計(jì)時(shí)
  957.             JZ      TIME13        ;如果是0就轉(zhuǎn)移
  958.             DEC     SMJS          ;不是0，減1秒
  959.     TIME13:        
  960.             MOV     A,SMJSM       ;裝入睡眠倒計(jì)時(shí)(秒)
  961.             JZ      TIME14        ;如果是0就轉(zhuǎn)移
  962.             DEC     SMJSM         ;(秒)減1
  963.             RET
  964.     TIME14:
  965.             MOV     A,SMJSF       ;裝入睡眠倒計(jì)時(shí)(分)
  966.             JNZ     TIME15        ;如果不是0就轉(zhuǎn)移
  967.             RET
  968.     TIME15:        
  969.             DEC     SMJSF         ;(分)減1
  970.             MOV     SMJSM,#59     ;放入59(秒)
  971.             RET
  972.     ZTQH:
  973.             MOV     A,DQZT        ;裝入“當(dāng)前狀態(tài)”，0=導(dǎo)通、1=斷開(kāi)，2=上電延時(shí)導(dǎo)通
  974.             CJNE    A,#2,ZTQH2    ;不是“上電延時(shí)導(dǎo)通”狀態(tài)就轉(zhuǎn)移
  975.             MOV     A,YSMS        ;裝入延時(shí)導(dǎo)通模式
  976.             JNZ     ZTQH0         ;如果不是0(延時(shí)時(shí)間到后始終導(dǎo)通)就轉(zhuǎn)移
  977.             SETB    07H           ;位地址07H置為1，始終導(dǎo)通
  978.             RET
  979.     ZTQH0:
  980.             CJNE    A,#1,ZTQH6    ;不是1(從“導(dǎo)通時(shí)間”繼續(xù)運(yùn)行)就轉(zhuǎn)移,從“斷開(kāi)時(shí)間”繼續(xù)運(yùn)行
  981.     ZTQH1:
  982.             MOV     DQZT,#0       ;切換到“導(dǎo)通時(shí)間”狀態(tài)
  983.             MOV     DSSJS,DTS     ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  984.             MOV     DSSJF,DTF     ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  985.             MOV     DSSJM,DTM     ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  986.             MOV     DSSJHM,DTHM   ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  987.             RET
  988.     ZTQH2:
  989.             CLR     07H          ;位地址07H置為0(正常)
  990.             JNZ     ZTQH1        ;是1(斷開(kāi)時(shí)間)狀態(tài)就轉(zhuǎn)移，切換到“導(dǎo)通時(shí)間”狀態(tài)
  991.             MOV     A,XHDS       ;是“導(dǎo)通時(shí)間”狀態(tài)，裝入循環(huán)模式
  992.             SETB    09H          ;位地址09H置為1(允許恢復(fù)響應(yīng)按鍵動(dòng)作)
  993.             CJNE    A,#1,ZTQH3   ;不是1(不循環(huán))就轉(zhuǎn)移，0=無(wú)限循環(huán)；1=不循環(huán)；2~99=導(dǎo)通次數(shù)
  994.             RET                  ;是不循環(huán)，退出
  995.     ZTQH3:
  996.             JZ      ZTQH5        ;是0(無(wú)限循環(huán))就轉(zhuǎn)移
  997.             MOV     A,XHJS       ;裝入導(dǎo)通次數(shù)計(jì)數(shù)
  998.             DEC     A            ;檢查導(dǎo)通次數(shù)是否已到，不到就轉(zhuǎn)移
  999.             JNZ     ZTQH4        ;檢查導(dǎo)通次數(shù)是否已到，不到就轉(zhuǎn)移
  1000.             RET
  1001.     ZTQH4:
  1002.             DEC     XHJS         ;導(dǎo)通次數(shù)減1
  1003.     ZTQH5:
  1004.             MOV     A,DKS        ;
  1005.             JNZ     ZTQH7        ;檢查“斷開(kāi)時(shí)間”不為0才切換到“斷開(kāi)時(shí)間”
  1006.             MOV     A,DKF        ;
  1007.             JNZ     ZTQH7        ;檢查“斷開(kāi)時(shí)間”不為0才切換到“斷開(kāi)時(shí)間”
  1008.             MOV     A,DKM        ;
  1009.             JNZ     ZTQH7        ;檢查“斷開(kāi)時(shí)間”不為0才切換到“斷開(kāi)時(shí)間”
  1010.             MOV     A,DKHM       ;
  1011.             JNZ     ZTQH7        ;檢查“斷開(kāi)時(shí)間”不為0才切換到“斷開(kāi)時(shí)間”
  1012.             RET
  1013.     ZTQH6:
  1014.             SETB    08H          ;位地址08H置為1，不響應(yīng)按鍵動(dòng)作。
  1015.     ZTQH7:
  1016.             MOV     DQZT,#1      ;切換到“斷開(kāi)時(shí)間”狀態(tài)
  1017.             MOV     DSSJS,DKS    ;把“斷開(kāi)時(shí)間”放入“定時(shí)時(shí)間”
  1018.             MOV     DSSJF,DKF    ;把“斷開(kāi)時(shí)間”放入“定時(shí)時(shí)間”
  1019.             MOV     DSSJM,DKM    ;把“斷開(kāi)時(shí)間”放入“定時(shí)時(shí)間”
  1020.             MOV     DSSJHM,DKHM  ;把“斷開(kāi)時(shí)間”放入“定時(shí)時(shí)間”
  1021.             RET

  1023.     ;-----------------------------------------------------------------------
  1024.     ;子程序：T0中斷調(diào)用，顯示定時(shí)時(shí)間及各項(xiàng)設(shè)置的內(nèi)容
  1025.     ;-----------------------------------------------------------------------
  1026.     DISPLAY:
  1027.             JB    06H,DPYSZ1     ;如果位地址06H為1就轉(zhuǎn)移退出，主程序顯示88:88或E1
  1028.             MOV   A,DISPL        ;裝入要顯示的目標(biāo)(項(xiàng)目號(hào))
  1029.             JZ    DISPL0         ;如果是0(顯示定時(shí)時(shí)間)就轉(zhuǎn)移
  1030.             MOV   B,#2
  1031.             MUL   AB             ;項(xiàng)目號(hào)乘2
  1032.             DEC   A
  1033.             DEC   A              ;把計(jì)算結(jié)果減2
  1034.             PUSH  ACC            ;寄存器A的內(nèi)容壓入堆棧
  1035.             MOV   DPTR,#SEGTAB2  ;字形碼首址
  1036.             MOVC  A,@A+DPTR      ;查表獲取字形碼
  1037.             MOV   ZXM1,A         ;項(xiàng)目字形碼放到待發(fā)送TM1637區(qū)1
  1038.             POP   ACC            ;彈出上面壓入堆棧的內(nèi)容到寄存器A
  1039.             INC   A              ;地址加1
  1040.             MOVC  A,@A+DPTR      ;查表獲取字形碼
  1041.             MOV   ZXM2,A         ;項(xiàng)目字形碼放到待發(fā)送TM1637區(qū)2
  1042.             MOV   A,DISPL        ;裝入項(xiàng)目號(hào)
  1043.             DEC   A              ;減1
  1044.             ADD   A,#DTS         ;加各項(xiàng)設(shè)置值始址，得出設(shè)置項(xiàng)目的實(shí)際地址
  1045.             MOV   R1,A           ;地址放入R1
  1046.             MOV   A,@R1          ;裝入設(shè)置值
  1047.             MOV   B,A            ;放進(jìn)寄存器B
  1048.             CJNE  A,XSHC1,DPYSZ3 ;當(dāng)前設(shè)置值與顯示緩存1不相同就轉(zhuǎn)移，立即顯示
  1049.             MOV   A,HMJS         ;相同，裝入(10)毫秒計(jì)數(shù)2
  1050.             CJNE  A,#99,DPYSZ2   ;不是99就轉(zhuǎn)移，每0.5秒顯示一次
  1051.             LJMP  DPYSZ3         ;是，顯示
  1052.     DPYSZ1: RET
  1053.     DPYSZ2:
  1054.             CJNE   A,#49,DPYSZ1 ;不是49就轉(zhuǎn)移退出，每0.5秒顯示一次
  1055.     DPYSZ3:
  1056.             MOV    XSHC1,B      ;當(dāng)前設(shè)置值放入顯示緩存1
  1057.             MOV    A,B          ;當(dāng)前設(shè)置值放入A寄存器
  1058.             MOV    R0,#ZXM3     ;待發(fā)送TM1637區(qū)3地址
  1059.             LCALL  BCD          ;轉(zhuǎn)換并獲取字形碼放到待發(fā)送TM1637區(qū)3和4
  1060.             JNB    04H,DPYSZ4   ;如果位地址04H為0(不閃爍)就轉(zhuǎn)移
  1061.             JNB    05H,DPYSZ4   ;為1，閃爍顯示，如果位地址05H為0(顯示)就轉(zhuǎn)移
  1062.             MOV    ZXM3,#0      ;處于閃爍顯示中的“不顯示”狀態(tài)，放入消隱碼
  1063.             MOV    ZXM4,#0      ;處于閃爍顯示中的“不顯示”狀態(tài)，放入消隱碼
  1064.     DPYSZ4:
  1065.             LCALL  disp         ;發(fā)送4個(gè)字節(jié)數(shù)據(jù)到TM1637顯示
  1066.             RET
  1067.     DISPL0:
  1068.             MOV    R1,#DSSJS    ;把定時(shí)時(shí)間“時(shí)”的地址放入R1
  1069.             MOV    A,@R1        ;裝入“時(shí)”
  1070.             JZ     DISPL1       ;如果“時(shí)”為0就轉(zhuǎn)移
  1071.             LJMP   DISPL3
  1072.     DISPL1:
  1073.             CLR    05H          ;“時(shí)”為0，把位地址05H置為0，始終顯示冒號(hào)
  1074.             INC    R1           ;地址加1，指向“分”
  1075.             MOV    A,@R1        ;裝入“分”
  1076.             JZ     DISPL2       ;如果“分”為0就轉(zhuǎn)移
  1077.             LJMP   DISPL3
  1078.     DISPL2:
  1079.             INC    R1           ;地址加1，指向“秒”
  1080.             MOV    A,@R1        ;裝入“秒”
  1081.     DISPL3:
  1082.             CJNE   A,XSHC1,DISPL6  ;寄存器A的數(shù)據(jù)與顯示緩存1不相同就轉(zhuǎn)移，立即顯示
  1083.             INC    R1              ;地址加1
  1084.             MOV    A,@R1           ;裝入
  1085.             DEC    R1              ;地址減1
  1086.             CJNE   A,XSHC2,DISPL6  ;寄存器A的數(shù)據(jù)與顯示緩存2不相同就轉(zhuǎn)移，立即顯示
  1087.             MOV    A,HMJS          ;都相同，裝入(10)毫秒時(shí)間計(jì)數(shù)2
  1088.             CJNE   A,#99,DISPL5    ;不是99就轉(zhuǎn)移
  1089.             LJMP   DISPL6          ;是，顯示（每0.5秒顯示一次）
  1090.     DISPL4: RET
  1091.     DISPL5:
  1092.             CJNE   A,#49,DISPL4    ;不是49就轉(zhuǎn)移退出，每0.5秒顯示一次
  1093.     DISPL6:
  1094.             INC    R1          ;地址加1
  1095.             MOV    A,@R1       ;裝入后面一位時(shí)間
  1096.             MOV    XSHC2,A     ;放入緩存2
  1097.             DEC    R1          ;地址減1
  1098.             MOV    A,@R1       ;裝入前面一位時(shí)間
  1099.             MOV    XSHC1,A     ;放入緩存1
  1100.             MOV    R0,#ZXM1    ;待發(fā)送TM1637區(qū)1地址
  1101.             LCALL  BCD         ;轉(zhuǎn)換并獲取字形碼放到待發(fā)送TM1637區(qū)1、2
  1102.             INC    R1          ;地址加1
  1103.             MOV    R0,#ZXM3    ;待發(fā)送TM1637區(qū)3地址
  1104.             MOV    A,@R1       ;裝入后面一位時(shí)間
  1105.             LCALL  BCD         ;轉(zhuǎn)換并獲取字形碼放到待發(fā)送TM1637區(qū)3、4
  1106.             JB     02H,DISPL7  ;如果02H為1(暫停)就轉(zhuǎn)移，始終顯示冒號(hào)
  1107.             JB     05H,DISPL8  ;如果05H為1就轉(zhuǎn)移，不顯示冒號(hào)
  1108.     DISPL7:
  1109.             ORL    ZXM2,#10000000B   ;把最高位置為1（最高位為1就顯示冒號(hào)）
  1110.     DISPL8:
  1111.             LCALL  disp        ;發(fā)送4個(gè)字節(jié)數(shù)據(jù)到TM1637顯示
  1112.             RET
  1113.     BCD:
  1114.             MOV    B,#10       ;轉(zhuǎn)換為BCD碼
  1115.             DIV    AB          ;轉(zhuǎn)換為BCD碼
  1116.             MOV    DPTR,#SEGTAB   ;查表獲取字形碼
  1117.             MOVC   A,@A+DPTR   ;查表獲取字形碼
  1118.             MOV    @R0,A       ;字形碼放入待發(fā)送TM1637區(qū)
  1119.             XCH    A,B         ;A、B寄存器內(nèi)容交換
  1120.             MOVC   A,@A+DPTR   ;查表獲取字形碼
  1121.             INC    R0          ;地址加1
  1122.             MOV    @R0,A       ;字形碼放入待發(fā)送TM1637區(qū)
  1123.             RET

  1125.     ;------------------ 發(fā)送4個(gè)字節(jié)數(shù)據(jù)到TM1637顯示，地址自動(dòng)加1 ------------------
  1126.     disp:
  1127.             MOV    A,SMMS     ;裝入設(shè)置的睡眠模式
  1128.             JZ     disp0      ;如果為0（始終顯示）就轉(zhuǎn)移
  1129.             MOV    A,SMJSF    ;裝入睡眠計(jì)時(shí)(分)
  1130.             JNZ    disp0      ;不為0(未進(jìn)入睡眠狀態(tài))就轉(zhuǎn)移
  1131.             MOV    A,SMJSM    ;裝入睡眠計(jì)時(shí)(秒)
  1132.             JNZ    disp0      ;不為0(未進(jìn)入睡眠狀態(tài))就轉(zhuǎn)移
  1133.             CLR    A          ;已進(jìn)入睡眠狀態(tài)，放入消隱碼（0）
  1134.             MOV    ZXM1,A     ;放入消隱碼
  1135.             MOV    ZXM2,A     ;放入消隱碼
  1136.             MOV    ZXM3,A     ;放入消隱碼
  1137.             MOV    ZXM4,A     ;放入消隱碼
  1138.     disp0:
  1139.             LCALL  Srt
  1140.             MOV    A,#040H    ;數(shù)據(jù)命令設(shè)置40H：地址自動(dòng)加1，寫(xiě)數(shù)據(jù)到顯示寄存器
  1141.             LCALL  Writebyte  ;發(fā)送一個(gè)字節(jié)
  1142.             LCALL  Stop
  1143.             NOP
  1144.             LCALL  Srt
  1145.             MOV    A,#0C0H    ;地址命令設(shè)置C0H：初始地址為00H
  1146.             LCALL  Writebyte  ;發(fā)送一個(gè)字節(jié)
  1147.             MOV    R6,#4      ;發(fā)送4個(gè)字節(jié)數(shù)據(jù)
  1148.             MOV    R1,#ZXM1   ;等待發(fā)送的字形碼始址
  1149.     disp1:
  1150.             MOV    A,@R1      ;裝入要發(fā)送的字形碼
  1151.             LCALL  Writebyte  ;發(fā)送一個(gè)字節(jié)
  1152.             INC    R1         ;地址加1
  1153.             DJNZ   R6,disp1   ;如果還未發(fā)送完就繼續(xù)
  1154.             LCALL  Stop
  1155.             LCALL  Srt
  1156.             MOV    A,SMGLD    ;裝入設(shè)置的數(shù)碼管亮度(1~8)
  1157.             ADD    A,#087H    ;加上87H后即為對(duì)應(yīng)的亮度控制命令88H~8FH
  1158.             LCALL  Writebyte  ;按設(shè)置的亮度開(kāi)顯示
  1159.             LCALL  Stop
  1160.             RET

  1162.     ;------------------ 發(fā)送8bit(一個(gè)字節(jié))數(shù)據(jù)到TM1637，A=要發(fā)送的數(shù)據(jù)，從低位開(kāi)始 ------------------
  1163.     Writebyte:
  1164.             MOV   R7,#8       ;發(fā)送8位數(shù)據(jù)
  1165.     WBY1:
  1166.             CLR   CLK         ;拉低CLK
  1167.             JNB   ACC.0,WBY2  ;A寄存器的低位（0位）如果為0就轉(zhuǎn)移
  1168.             SETB  DIO         ;為1，拉高DIO
  1169.             SJMP  WBY3
  1170.     WBY2:
  1171.             CLR   DIO       ;為0，拉低DIO
  1172.     WBY3:
  1173.             MOV   R4,#13    ;延時(shí)
  1174.     WBY4:
  1175.             DJNZ  R4,WBY4   ;延時(shí)
  1176.             SETB  CLK       ;拉高CLK
  1177.             CLR   C         ;進(jìn)位標(biāo)志清0
  1178.             RRC   A         ;A寄存器內(nèi)容帶進(jìn)位循環(huán)右移
  1179.             DJNZ  R7,WBY1   ;如果還未發(fā)送完8bit數(shù)據(jù)就繼續(xù)
  1180.             CLR   CLK       ;8位數(shù)據(jù)發(fā)送完了
  1181.             MOV   R7,#20    ;設(shè)置等待應(yīng)答信號(hào)延時(shí)計(jì)數(shù)
  1182.     WBY5:
  1183.             JNB   DIO,WBY6  ;判斷TM1637發(fā)過(guò)來(lái)的ACK應(yīng)答信號(hào)，應(yīng)答就轉(zhuǎn)移(0，低電平)
  1184.             DJNZ  R7,WBY5   ;
  1185.     WBY6:
  1186.             MOV   R4,#13    ;延時(shí)
  1187.     WBY7:
  1188.             DJNZ  R4,WBY7   ;延時(shí)
  1189.             SETB  CLK
  1190.             MOV   R4,#13    ;延時(shí)
  1191.     WBY8:
  1192.             DJNZ  R4,WBY8   ;延時(shí)
  1193.             RET         

  1195.     ;------------------ Start子程序 ------------------
  1196.     Srt:
  1197.             SETB   DIO       ;拉高DIO
  1198.             SETB   CLK       ;拉高CLK
  1199.             MOV    R4,#13    ;延時(shí)
  1200.     SrtY1:
  1201.             DJNZ   R4,SrtY1  ;延時(shí)
  1202.             SETB   DIO       ;拉高DIO
  1203.             MOV    R4,#13    ;延時(shí)
  1204.     SrtY2:
  1205.             DJNZ   R4,SrtY2  ;延時(shí)
  1206.             CLR    DIO       ;拉低DIO
  1207.             MOV    R4,#13    ;延時(shí)
  1208.     SrtY3:
  1209.             DJNZ   R4,SrtY3  ;延時(shí)
  1210.             CLR   CLK        ;拉低CLK
  1211.             RET         

  1213.     ;------------------ Stop子程序 ------------------
  1214.     Stop:
  1215.             CLR   CLK
  1216.             MOV   R4,#30
  1217.     StopY1:
  1218.             DJNZ  R4,StopY1
  1219.             CLR   DIO
  1220.             MOV   R4,#30
  1221.     StopY2:
  1222.             DJNZ  R4,StopY2
  1223.             SETB  CLK
  1224.             MOV   R4,#40
  1225.     StopY3:
  1226.             DJNZ  R4,StopY3
  1227.             SETB  DIO
  1228.             MOV   R4,#30
  1229.     StopY4:
  1230.             DJNZ  R4,StopY4
  1231.             CLR   CLK
  1232.             CLR   DIO
  1233.             RET         

  1235.     ;********************** 以下為EEPROM操作子程序 **********************
  1236.     ;STC15F104W有1K字節(jié)的EEPROM，共2個(gè)扇區(qū)，第1扇區(qū)：0000H~01FFH；第2扇區(qū)：0200H~03FFH
  1237.     ;-------------------------------------------
  1238.     ;讀一字節(jié)，A=讀出的數(shù)據(jù)
  1239.     Byte_Read:
  1240.             MOV  IAP_CONTR,#ENABLE_IAP  ;打開(kāi)IAP功能，設(shè)置Flash操作等待時(shí)間（83H）
  1241.             MOV  IAP_CMD,#01            ;設(shè)置為IAP/ISP/EEPROM字節(jié)讀模式命令(1)
  1242.             MOV  IAP_TRIG,#05AH         ;先送5AH
  1243.             MOV  IAP_TRIG,#0A5H         ;再送A5H，ISP/IAP命令立即被觸發(fā)起動(dòng)
  1244.             NOP
  1245.             MOV  A,IAP_DATA             ;讀出的數(shù)據(jù)在IAP_DATA單元中,送入累加器A
  1246.             RET
  1247.     ;-------------------------------------------
  1248.     ;字節(jié)編程，A=需寫(xiě)入的數(shù)據(jù)
  1249.     Byte_Program:
  1250.             MOV  IAP_CONTR,#ENABLE_IAP  ;打開(kāi)IAP功能，設(shè)置Flash操作等待時(shí)間（83H）
  1251.             MOV  IAP_CMD,#02            ;設(shè)置為IAP/ISP/EEPROM字節(jié)編程模式命令(2)
  1252.             MOV  IAP_DATA,A             ;要編程的數(shù)據(jù)先送進(jìn)IAP_DATA寄存器
  1253.             MOV  IAP_TRIG,#05AH         ;先送5AH
  1254.             MOV  IAP_TRIG,#0A5H         ;再送A5H，ISP/IAP命令立即被觸發(fā)起動(dòng)
  1255.             RET
  1256.     ;-------------------------------------------
  1257.     ;擦除扇區(qū)
  1258.     Sector_Erase:
  1259.             MOV  IAP_CONTR,#ENABLE_IAP  ;打開(kāi)IAP功能，設(shè)置Flash操作等待時(shí)間（83H）
  1260.             MOV  IAP_CMD,#03            ;設(shè)置為IAP/ISP/EEPROM扇區(qū)擦除模式命令(3)
  1261.             MOV  IAP_TRIG,#05AH         ;先送5AH
  1262.             MOV  IAP_TRIG,#0A5H         ;再送A5H，ISP/IAP命令立即被觸發(fā)起動(dòng)
  1263.             NOP
  1264.             RET

  1266.     ;---------- 讀EEPROM保存的各項(xiàng)設(shè)置，如果沒(méi)有就設(shè)置為默認(rèn)值并保存 ------------
  1267.     REEP:
  1268.             LCALL  RE00          ;讀EEPROM保存的各項(xiàng)設(shè)置
  1269.             MOV    XHJS,XHDS     ;循環(huán)定時(shí)
  1270.             MOV    SMJSF,SMMS    ;睡眠模式
  1271.             MOV    A,SDYSS       ;裝入上電延時(shí)導(dǎo)通(時(shí))
  1272.             JNZ    REYS          ;不是0就轉(zhuǎn)移
  1273.             MOV    A,SDYSF       ;裝入上電延時(shí)導(dǎo)通(分)
  1274.             JNZ    REYS          ;不是0就轉(zhuǎn)移
  1275.             MOV    A,SDYSM       ;裝入上電延時(shí)導(dǎo)通(秒)
  1276.             JZ     REEPR         ;都為0就轉(zhuǎn)移
  1277.     REYS:
  1278.             MOV    DSSJS,SDYSS   ;把“上電延時(shí)導(dǎo)通”時(shí)間放入“定時(shí)時(shí)間”
  1279.             MOV    DSSJF,SDYSF   ;把“上電延時(shí)導(dǎo)通”時(shí)間放入“定時(shí)時(shí)間”
  1280.             MOV    DSSJM,SDYSM   ;把“上電延時(shí)導(dǎo)通”時(shí)間放入“定時(shí)時(shí)間”
  1281.             MOV    DSSJHM,#0  
  1282.             MOV    DQZT,#2       ;設(shè)置當(dāng)前狀態(tài)，0=導(dǎo)通、1=斷開(kāi)，2=上電延時(shí)導(dǎo)通
  1283.             RET
  1284.     REEPR:
  1285.             MOV    DSSJS,DTS     ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  1286.             MOV    DSSJF,DTF     ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  1287.             MOV    DSSJM,DTM     ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  1288.             MOV    DSSJHM,DTHM   ;把“導(dǎo)通時(shí)間”放入“定時(shí)時(shí)間”
  1289.             MOV    DQZT,#0       ;設(shè)置當(dāng)前狀態(tài)，0=導(dǎo)通、1=斷開(kāi)，2=上電延時(shí)導(dǎo)通
  1290.             RET
  1291.     RE00:
  1292.             MOV    IAP_ADDRH,#00H  ;從第一個(gè)扇區(qū)開(kāi)始搜索，地址的高8位
  1293.     RE01:
  1294.             MOV    IAP_ADDRL,#00H  ;從第一個(gè)扇區(qū)開(kāi)始搜索，地址的低8位
  1295.             LCALL  Byte_Read     ;讀第一個(gè)字節(jié)，返回：A=讀出的數(shù)據(jù)
  1296.             CJNE   A,FWBZ1,RE03  ;是否保存在當(dāng)前扇區(qū)，不是就轉(zhuǎn)移到RE03
  1297.             INC    IAP_ADDRL     ;EEPROM字節(jié)地址增1
  1298.             LCALL  Byte_Read     ;讀第二個(gè)字節(jié)
  1299.             CJNE   A,FWBZ2,RE03  ;第二個(gè)字節(jié)是否相符
  1300.             MOV    R1,#FWBZ2     ;相符，從FWBZ2+1處開(kāi)始放置讀出的設(shè)置值
  1301.             MOV    R2,#17        ;再讀出17個(gè)字節(jié)
  1302.     RE02:
  1303.             INC    R1            ;RAM地址增1
  1304.             INC    IAP_ADDRL     ;EEPROM字節(jié)地址增1
  1305.             LCALL  Byte_Read     ;讀一個(gè)字節(jié)，返回：A=讀出的數(shù)據(jù)
  1306.             MOV    @R1,A         ;放到R1指向的RAM地址
  1307.             DJNZ   R2,RE02       ;未讀完就繼續(xù)
  1308.             RET                  ;讀完了，退出
  1309.     RE03:
  1310.             MOV    A,IAP_ADDRH  ;裝入扇區(qū)地址的高8位
  1311.             ADD    A,#2         ;扇區(qū)增1
  1312.             MOV    IAP_ADDRH,A  ;放入IAP_ADDRH
  1313.             CJNE   A,#04H,RE01  ;如果未搜索完最后一個(gè)扇區(qū)+2(02H+2=04H)就轉(zhuǎn)移，繼續(xù)搜索
  1314.             LCALL  SZMRZ        ;已經(jīng)搜索全部扇區(qū)，未找到保存的內(nèi)容，設(shè)置為默認(rèn)值
  1315.             MOV    R0,#2        ;總扇區(qū)數(shù)量，共2個(gè)扇區(qū)
  1316.             LJMP   WSET3        ;跳轉(zhuǎn)到WSET3保存設(shè)置

  1318.     ;------------------ 保存設(shè)置，不固定保存到某個(gè)扇區(qū)，各扇區(qū)輪流使用 ------------------
  1319.     WSET:
  1320.             MOV    R0,#2           ;扇區(qū)總數(shù)量，共2個(gè)扇區(qū)
  1321.             MOV    IAP_ADDRH,#00H  ;從第一個(gè)扇區(qū)開(kāi)始搜索上次保存的設(shè)置
  1322.     WSET1:
  1323.             MOV    IAP_ADDRL,#00H  ;地址低位指向第一個(gè)字節(jié)
  1324.             LCALL  Byte_Read       ;讀第一個(gè)字節(jié)，返回：A=讀出的數(shù)據(jù)
  1325.             CJNE   A,FWBZ1,WSET7   ;如果與EEPROM數(shù)據(jù)判斷標(biāo)志1不相同就轉(zhuǎn)移
  1326.             INC    IAP_ADDRL       ;第一個(gè)字節(jié)相同，EEPROM字節(jié)地址增1
  1327.             LCALL  Byte_Read       ;讀第二個(gè)字節(jié)
  1328.             CJNE   A,FWBZ2,WSET7   ;如果與EEPROM數(shù)據(jù)判斷標(biāo)志2不相同就轉(zhuǎn)移
  1329.             MOV    IAP_ADDRL,#0    ;是在當(dāng)前扇區(qū)，地址指向扇區(qū)第一個(gè)字節(jié)
  1330.             LCALL  Sector_Erase    ;擦除當(dāng)前扇區(qū)，另?yè)Q一個(gè)扇區(qū)保存
  1331.     WSET2:
  1332.             MOV    A,IAP_ADDRH     ;裝入扇區(qū)地址高位到寄存器A
  1333.             CJNE   A,#00H,WSET3    ;當(dāng)前扇區(qū)地址高位如果不是00H(第一個(gè)扇區(qū))就轉(zhuǎn)移
  1334.             MOV    IAP_ADDRH,#04H  ;是00H，把IAP_ADDRH設(shè)置為最后一個(gè)扇區(qū)+2(02H+2=04H)
  1335.     WSET3:
  1336.             DEC    IAP_ADDRH      ;減1
  1337.             DEC    IAP_ADDRH      ;再減1，指向上一個(gè)扇區(qū)首址
  1338.             MOV    IAP_ADDRL,#0   ;低8位指向扇區(qū)第一個(gè)字節(jié)
  1339.             LCALL  Sector_Erase   ;擦除整個(gè)扇區(qū)
  1340.             MOV    R1,#FWBZ1      ;要保存的內(nèi)容始址
  1341.             MOV    R2,#19         ;共19個(gè)字節(jié)
  1342.     WSET4:
  1343.             MOV    A,@R1          ;裝入R1指向的RAM地址的內(nèi)容到A
  1344.             LCALL  Byte_Program   ;字節(jié)編程(寫(xiě)入EEPROM)
  1345.             INC    IAP_ADDRL      ;EEPROM地址加1
  1346.             INC    R1             ;RAM地址增1
  1347.             DJNZ   R2,WSET4       ;未保存完就繼續(xù)
  1348.             MOV    IAP_ADDRL,#0   ;保存完了，扇區(qū)地址低位指向0(當(dāng)前扇區(qū)首址)
  1349.             LCALL  Byte_Read      ;讀出來(lái)檢查看是否寫(xiě)入成功
  1350.             CJNE   A,FWBZ1,WSET5  ;如果與EEPROM數(shù)據(jù)判斷標(biāo)志1不相同就轉(zhuǎn)移
  1351.             INC    IAP_ADDRL      ;EEPROM地址加1
  1352.             LCALL  Byte_Read      ;讀第二個(gè)字節(jié)
  1353.             CJNE   A,FWBZ2,WSET5  ;如果與EEPROM數(shù)據(jù)判斷標(biāo)志2不相同就轉(zhuǎn)移
  1354.             RET                   ;成功了，退出
  1355.     WSET5:
  1356.             DJNZ   R0,WSET2      ;如果未試完全部扇區(qū)就轉(zhuǎn)移到WSET2繼續(xù)往前一個(gè)扇區(qū)寫(xiě)
  1357.             SETB   06H           ;已經(jīng)試完全部扇區(qū)，都失敗了，位地址06H置為1
  1358.             MOV    MJS,#5        ;顯示5秒E1
  1359.             MOV    ZXM1,#0       ;消隱碼
  1360.             MOV    ZXM2,#079H    ;E
  1361.             MOV    ZXM3,#006H    ;1
  1362.             MOV    ZXM4,#0       ;消隱碼
  1363.             LCALL  DISP          ;顯示
  1364.     WSET6:
  1365.             MOV    A,MJS
  1366.             LCALL  WG            ;喂狗
  1367.             JNZ    WSET6         ;等待MJS為0秒
  1368.             CLR    06H           ;顯示結(jié)束，位地址06H置為0
  1369.             RET
  1370.     WSET7:
  1371.             MOV    A,IAP_ADDRH   ;裝入扇區(qū)地址高位
  1372.             ADD    A,#2          ;加2，指向下一個(gè)扇區(qū)首址
  1373.             MOV    IAP_ADDRH,A   ;放回IAP_ADDRH
  1374.             CJNE   A,#04H,WSET1  ;如果未到最后一個(gè)扇區(qū)地址高位+2(02H+2=04H)就轉(zhuǎn)移到WSET1繼續(xù)搜索
  1375.             LJMP   WSET3         ;已經(jīng)搜索完所有扇區(qū)，未找到上次保存的數(shù)據(jù)，跳轉(zhuǎn)到WSET3保存當(dāng)前設(shè)置

  1377.     ;**************************** 以上為EEPROM操作子程序 ****************************

  1379.     ;------------------ 字形表 ------------------
  1380.     SEGTAB:
  1381.             DB  00111111B  ;0（3FH）
  1382.             DB  00000110B  ;1（06H）
  1383.             DB  01011011B  ;2（5BH）
  1384.             DB  01001111B  ;3（4FH）
  1385.             DB  01100110B  ;4（66H）
  1386.             DB  01101101B  ;5（6DH）
  1387.             DB  01111101B  ;6（7DH）
  1388.             DB  00000111B  ;7（07H）
  1389.             DB  01111111B  ;8（7FH）
  1390.             DB  01101111B  ;9（6FH）
  1391.     SEGTAB2:
  1392.             DB  00000110B,01110111B  ;1A（06H,77H）
  1393.             DB  00000110B,01111100B  ;1b（06H,7CH）
  1394.             DB  00000110B,00111001B  ;1C（06H,39H）
  1395.             DB  00000110B,01011110B  ;1d（06H,5EH）
  1396.             DB  01011100B,01000000B  ;o-（5CH,40H）
  1397.             DB  00111001B,01000000B  ;C-（39H,40H）
  1398.             DB  01111100B,00111001B  ;bC（7CH,39H）
  1399.             DB  00111000B,01011110B  ;Ld（38H,5EH）
  1400.             DB  01011011B,01110111B  ;2A（5BH,77H）
  1401.             DB  01011011B,01111100B  ;2b（5BH,7CH）
  1402.             DB  01011011B,00111001B  ;2C（5BH,39H）
  1403.             DB  01011011B,01011110B  ;2d（5BH,5EH）
  1404.             DB  01001111B,01110111B  ;3A（4FH,77H）
  1405.             DB  01001111B,01111100B  ;3b（4FH,7CH）
  1406.             DB  01001111B,00111001B  ;3C（4FH,39H）
  1407.             DB  01011110B,01000000B  ;d-（5EH,40H）
  1408.             DB  01111001B,01000000B  ;E-（79H,40H）

  1410.     ;------------------------------------------------------------------------------------------

  1412.             END
復(fù)制代碼
壓縮文件的內(nèi)容：

全部資料51hei下載地址：
用STC15F104W制作定時(shí)IC.rar (4.65 MB, 下載次數(shù): 141)




評(píng)分

參與人數(shù) 1黑幣 +100 收起 理由
admin + 100 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏21 分享淘帖 頂頂2 踩踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:689120 發(fā)表于 2021-1-19 16:16 | 只看該作者
樓主您好，您辛苦了。謝謝分享！本人有個(gè)設(shè)想：就是此定時(shí)器的顯示器能不能用LCD12864的，這樣可更方便定時(shí)器的設(shè)置。
回復(fù)

使用道具 舉報(bào)

板凳
ID:396309 發(fā)表于 2021-1-20 13:58 | 只看該作者
獨(dú)行者stc 發(fā)表于 2021-1-19 16:16
樓主您好，您辛苦了。謝謝分享！本人有個(gè)設(shè)想：就是此定時(shí)器的顯示器能不能用LCD12864的，這樣可更方便定時(shí) ...

需要修改程序才能用LCD12864，我手頭上也有很多LCD12864，實(shí)際使用時(shí)，定時(shí)器的設(shè)置操作不經(jīng)常用到，體積越小越簡(jiǎn)潔越好，所以就設(shè)計(jì)為用數(shù)碼管的
回復(fù)

使用道具 舉報(bào)

地板
ID:396309 發(fā)表于 2021-1-30 20:48 | 只看該作者
補(bǔ)充一張圖


回復(fù)

使用道具 舉報(bào)

5#
ID:71233 發(fā)表于 2021-2-7 09:55 | 只看該作者
STC15F104W只有8個(gè)引腳，兩個(gè)接電源，其他引腳都是IO口，體積小，外部不用晶振，用來(lái)制作定時(shí)精度不用太高的定時(shí)器（如生活普通定時(shí)器）是最好不過(guò)的，我也經(jīng)常用這款單片機(jī)來(lái)制作定時(shí)器。
回復(fù)

使用道具 舉報(bào)

6#
ID:36172 發(fā)表于 2023-3-30 16:42 | 只看該作者
匯編的，樓主歷害
回復(fù)

使用道具 舉報(bào)

7#
ID:292518 發(fā)表于 2023-4-3 14:01 | 只看該作者
大神，能不能用STC8G1K08A代替STC15F104W?
回復(fù)

使用道具 舉報(bào)

8#
ID:292518 發(fā)表于 2023-4-7 10:00 | 只看該作者
大神，能不能用STC8G1K08A代替STC15F104W?
回復(fù)

使用道具 舉報(bào)

9#
ID:1094329 發(fā)表于 2023-9-23 16:12 | 只看該作者
long2018 發(fā)表于 2023-4-7 10:00
大神，能不能用STC8G1K08A代替STC15F104W?

回復(fù)可以，加改頭文件等
回復(fù)

使用道具 舉報(bào)

10#
ID:72088 發(fā)表于 2023-9-24 12:01 | 只看該作者
好貼，好匯編語(yǔ)言
回復(fù)

使用道具 舉報(bào)

11#
ID:292518 發(fā)表于 2023-9-26 10:13 | 只看該作者

能不能幫忙改一下，生成固件，謝謝，@錯(cuò)人了
回復(fù)

使用道具 舉報(bào)

12#
ID:292518 發(fā)表于 2023-9-26 10:17 | 只看該作者
mwxpk 發(fā)表于 2023-9-23 16:12
回復(fù)可以，加改頭文件等

不懂匯編，能不能幫忙改一下，生成固件，謝謝
回復(fù)

使用道具 舉報(bào)

13#
ID:1094329 發(fā)表于 2023-9-28 12:32 | 只看該作者
long2018 發(fā)表于 2023-9-26 10:17
不懂匯編，能不能幫忙改一下，生成固件，謝謝

你需要什么？ 主貼程序可以修改，也可用C編寫(xiě)。不同的老師講的字多小也不同，目標(biāo)一樣。
回復(fù)

使用道具 舉報(bào)

14#
ID:156094 發(fā)表于 2024-3-22 22:24 | 只看該作者
感謝大神分享！！新手一個(gè)，照著電路圖做了一個(gè)，下載程序后，數(shù)碼管顯示正常，編碼器正常，按照說(shuō)明設(shè)置，設(shè)置的10秒通10秒斷，循環(huán)模式，但是在循環(huán)過(guò)程中，驅(qū)動(dòng)不了繼電器。檢測(cè)P3.0引腳的電平變化是0v----0.6v----0v-----0.6v，請(qǐng)問(wèn)正常嗎？
回復(fù)

使用道具 舉報(bào)

15#
ID:437129 發(fā)表于 2024-10-24 11:18 | 只看該作者
感謝大神分享，有空做一個(gè)試試。
回復(fù)

使用道具 舉報(bào)

16#
ID:1067504 發(fā)表于 2024-10-25 17:25 來(lái)自手機(jī) | 只看該作者
技術(shù)大牛！現(xiàn)在會(huì)匯編的人越來(lái)越少了，要是C就好了，匯編實(shí)在看不懂
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表