【正文】 1 movf tb1,0 iorwf tb2,0 movwf W_Minute clrf tb1 movf W_Second,0 班 號 單片機設計實驗報告 28 movwf tb2 movlw d39。 div1 subwf tb2,1 btfss status,C goto point4 incf tb1,1 goto div1 point4 movlw d39。 addwf tb2,1 swapf tb1,1 movf tb1,0 iorwf tb2,0 movwf W_Hour clrf tb1 movf W_Minute,0 movwf tb2 movlw d39。 div subwf tb2,1 btfss status,C goto point3 incf tb1,1 goto div point3 movlw d39。 tbcd clrf tb1 movf W_Hour,0 movwf tb2 movlw d39。 。*************************** delay 。指針位置計數器加 1 clrf jumpdec goto judge。 goto add。 call clearc。639。1039。***************是否顯示分針 *************** dec_min movf min,0 movwf minn addwf minn,1 movf minn,0 subwf counter,0 btfscstatus,Z call drawmin clrf minn btfss jumpdec,1 goto dec_hour 班 號 單片機設計實驗報告 26 goto sd04 。 subwf counter,0 btfscstatus,Z call draw1_2 。 subwf counter,0 btfscstatus,Z call draw1_1 movlw d39。 subwf counter,0 btfscstatus,Z call draw1_0 movlw d39。 subwf counter,0 btfscstatus,Z call drawgra movlw d39。 subwf counter,0 btfscstatus,Z call drawgra 班 號 單片機設計實驗報告 25 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_6 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_5 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_4 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_3 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_2 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_1 movlw d39。 subwf counter,0 btfscstatus,Z call draw9_0 movlw d39。 subwf counter,0 btfscstatus,Z 班 號 單片機設計實驗報告 24 call drawgra movlw d39。 subwf counter,0 btfscstatus,Z call drawgra movlw d39。 subwf counter,0 btfscstatus,Z call draw6_4 movlw d39。 subwf counter,0 btfscstatus,Z call draw6_3 movlw d39。 subwf counter,0 btfscstatus,Z call draw6_2 movlw d39。 subwf counter,0 btfscstatus,Z call draw6_1 movlw d39。 subwf counter,0 btfscstatus,Z call draw6_0 movlw d39。 subwf counter,0 btfscstatus,Z call drawgra movlw d39。 班 號 單片機設計實驗報告 23 subwf counter,0 btfscstatus,Z call drawgra movlw d39。 subwf counter,0 btfscstatus,Z call draw3_6 movlw d39。 subwf counter,0 btfscstatus,Z call draw3_5 movlw d39。 subwf counter,0 btfscstatus,Z call draw3_4 movlw d39。 subwf counter,0 btfscstatus,Z call draw3_3 movlw d39。 subwf counter,0 btfscstatus,Z call draw3_2 movlw d39。 subwf counter,0 btfscstatus,Z call draw3_1 movlw d39。 subwf counter,0 btfscstatus,Z call draw3_0 movlw d39。 subwf counter,0 btfscstatus,Z call drawgra movlw d39。 subwf counter,0 btfscstatus,Z call drawgra 班 號 單片機設計實驗報告 22 movlw d39。 subwf counter,0 btfscstatus,Z call draw2_3 movlw d39。 subwf counter,0 btfscstatus,Z call draw2_2 movlw d39。 subwf counter,0 btfscstatus,Z call draw2_1 movlw d39。 subwf counter,0 btfscstatus,Z call draw2_0 movlw d39。***************是否顯示刻度 *************** movlw d39。 subwf counter,0 btfscstatus,Z goto rsrn 。清表盤 movlw d39。 subwf readn,0 btfscstatus,Z call Get_DS1302 call bcdt decf readn,1 clrf counter。20 圈讀一次時間 show movlw d39。2039。顯示時間 班 號 單片機設計實驗報告 21 。返 回 begin call tbcd 。再次測開關 sw1 斷開否？是，跳過下條指令 goto check5 。測開關 sw1 斷開否？是，跳過下條指令 goto check5 。 subwf W_Second,0 。秒針加 1 movlw d39。再次測開關 sw1 按下否？是，跳過下條指令 goto check4 。測開關 sw1 按下否？是，跳過下條指令 goto setW_Second 。返回 setW_Second1btfss porta,1 goto setW_Second1 call delay btfss porta,1 goto setW_Second1 setW_Second btfss porta,1 。再次測開關 sw1 斷開否？是 ，跳過下條指令 goto check3 。測開關 sw1 斷開否？是，跳過下條指令 goto check3 。 subwf W_Minute,0 。分針加 1 movlw d39。再次測開關 sw1 按下否？是，跳過下條指令 goto check2 。測開關 sw1 按下否？是，跳過下條指令 goto setW_Minute 。sw2 松開否 goto setW_Minute1 call delay btfss porta,1 goto setW_Minute1 setW_Minute btfss porta,1 。否！則循環(huán)檢測 goto setW_Hour 。否！則循環(huán)檢測 call delay btfss porta,0 ?？词欠竦扔?12 btfsc status,Z clrf W_Hour movf W_Hour,0 movwf portc check1 btfss porta,0 。1239。否！則循環(huán)檢測 incf W_Hour,1 。否！則循環(huán)檢測 call delay btfsc porta,0 。sw2 是否按下 goto setW_Minute1 check btfsc porta,0 。體 0 clrf se clrf minn clrf hourn clrf jumpdec clrf portb 班 號 單片機設計實驗報告 19 clrf portc。a 口定義為輸入 movlw 06h movwf adcon1 。設置 b 口輸出 clrf trisd 。 0000h goto main 0005h main bsf status,rp0 clrf trisc 。