Ðåôåðàòû. Ðàçðàáîòêà ìèêðîïðîöåññîðíîé ñèñòåìû "Àâòîìîáèëüíûå ÷àñû-òåðìîìåòð-âîëüòìåòð" íà áàçå ìèêðîêîíòðîëëåðà

         INCF ML,1 ;ÈÍÀ×Å ÓÂÅËÈ×ÈÌ ÌÈÍÓÒÛ.

         RETURN

MIH

         BSF   FLAG1,4    ;ÏÐÎØËÎ 10 ÌÈÍÓÒ ÊÓÐÑÎÐ ÂÛÊËÞ×ÀÅÒÑß.

         BCF  FLAG,7      ;ÍÅÒ ÓÑÒÀÍÎÂÊÈ.

         CLRF         KYPC         ;ÍÅÒ ÊÓÐÑÎÐÀ.

         CLRF         ML    ;ÎÁÍÓËÈÌ ÅÄÈÍÈÖÛ ÌÈÍÓÒ.

         MOVFW    MH    ;ÅÑËÈ ÄÅÑßÒÊÈ ÌÈÍÓÒ

         ADDLW     -5H    ;ÐÀÂÍÛ 5,

         BZ     HOL  ;ÈÄÅÌ ÑÐÀÂÍÈÂÀÒÜ ×ÀÑÛ.

         INCF MH,1 ;ÈËÈ ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ÌÈÍÓÒ.

         RETURN

HOL

         BCF  FLAG1,5    ;ÍÀÏÎÌÈÍÀÍÈÅ ÎÁ ÀÂÀÐÈÈ ÍÀÏÐßÆÅÍÈß.

         CLRF         MH    ;ÎÁÍÓËÈÌ ÄÅÑßÒÊÈ ÌÈÍÓÒ.

         MOVFW    HH    ;ÅÑËÈ ÄÅÑßÒÊÈ ×ÀÑÎÂ

         ADDLW     -2H    ;ÐÀÂÍÛ 2,

         BZ     HL4   ;ÏÐÎÂÅÐÈÌ ÅÄÈÍÈÖÛ ×ÀÑÎÂ.

         MOVFW    HL     ;ÅÑËÈ ÅÄÈÍÈÖÛ ×ÀÑΠÐÀÂÍÛ 9,

         ADDLW     -9H    ;

         BZ     $+3    ;ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ×ÀÑÎÂ.

         INCF HL,1  ;ÈËÈ ÓÂÅËÈ×ÈÌ ÅÄÈÍÈÖÛ ×ÀÑÎÂ.

         RETURN

         CLRF         HL     ;

         INCF HH,1 ;

         RETURN

HL4

         MOVFW    HL     ;ÅÑËÈ ÅÄÈÍÈÖÛ ×ÀÑÎÂ

         ADDLW     -3H    ;ÐÀÂÍÛ 3,

         BZ     HOH ;ÈÄÅÌ ÎÁÍÓËßÒÜ.

         INCF HL,1  ;ÈËÈ ÏÐÈÁÀÂÈÌ ÅÄÈÍÈÖÓ.

         RETURN


HOH

         CLRF         HL     ;

         CLRF HH   ;ÎÁÍÓËÈÌ ÄÅÑßÒÊÈ ×ÀÑÎÂ.

         RETURN             ;

;=============================================

; 14. ÒÀÉÌÅÐ.

;=============================================

TAIM

         BSF   FLAG,5      ;ÑËÅÄÓÞÙÀß ÎÑÒÀÍÎÂÊÀ ÒÀÉÌÅÐÀ.

         MOVLW    .9       ;ÅÑËÈ ÓÆÅ 9 ÑÅÊÓÍÄ,

         SUBWF      TCL,0         ;

         BC    $+3    ;ÈÄÅÌ ÍÀ ÑÐÀÂÍÅÍÈÅ ÄÅÑßÒÊÎÂ ÑÅÊÓÍÄ.

         INCF TCL,1         ;ÈÍÀ×Å ÏÐÈÁÀÂÈÌ ÅÄÈÍÈÖÓ.

         RETURN

         CLRF         TCL  ;ÎÁÍÓËÈÌ ÑÅÊÓÍÄÛ.

         MOVFW    TCH  ;ÅÑËÈ ÄÅÑßÒÊÈ ÑÅÊÓÍÄ

         ADDLW     -5H    ;ÐÀÂÍÛ 5,

         BZ     $+3    ;ÈÄÅÌ ÑÐÀÂÍÈÂÀÒÜ ÌÈÍÓÒÛ.

         INCF TCH,1        ;ÈÍÀ×Å ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ÑÅÊÓÍÄ.

         RETURN

         CLRF         TCH  ;ÎÁÍÓËÈÌ ÄÅÑßÒÊÈ ÑÅÊÓÍÄ.

         MOVFW    TML  ;ÅÑËÈ ÅÄÈÍÈÖÛ ÌÈÍÓÒ

         ADDLW     -9H    ;ÐÀÂÍÛ 9,

         BZ     $+3    ;ÈÄÅÌ ÑÐÀÂÍÈÂÀÒÜ ÄÅÑßÒÊÈ.

         INCF TML,1        ;ÈÍÀ×Å ÓÂÅËÈ×ÈÌ ÌÈÍÓÒÛ.

         RETURN

         CLRF         TML  ;ÎÁÍÓËÈÌ ÅÄÈÍÈÖÛ ÌÈÍÓÒ.

         MOVFW    TMH ;ÅÑËÈ ÄÅÑßÒÊÈ ÌÈÍÓÒ

         ADDLW     -5H    ;ÐÀÂÍÛ 5,

         BZ     $+3    ;ÓÂÅËÈ×ÈÌ ×ÀÑÛ.

         INCF TMH,1        ;ÈËÈ ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ÌÈÍÓÒ.

         RETURN

         CLRF         TMH ;ÎÁÍÓËÈÌ ÄÅÑßÒÊÈ ÌÈÍÓÒ.

         MOVFW    THL  ;ÅÑËÈ ÅÄÈÍÈÖÛ ×ÀÑΠÐÀÂÍÛ 9,

         ADDLW     -9H    ;

         BZ     $+3    ;ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ×ÀÑÎÂ.

         INCF THL,1         ;ÈËÈ ÓÂÅËÈ×ÈÌ ÅÄÈÍÈÖÛ ×ÀÑÎÂ.

         RETURN

         CLRF         THL  ;ÎÁÍÓËÈÌ ×ÀÑÛ.

         MOVFW    THH  ;ÅÑËÈ ÄÅÑßÒÊÈ ×ÀÑΠÐÀÂÍÛ 9,

         ADDLW     -9H    ;

         BZ     $+3    ;ÎÁÍÓËÈÌ.

         INCF THH,1        ;ÈËÈ ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ×ÀÑÎÂ.

         RETURN

         CLRF         THH  ;

         RETURN

T00

         BTFSS       FLAG,5      ;

         GOTO        $+4    ;

         BCF  FLAG,2      ;ÒÀÉÌÅÐ ÂÛÊËÞ×ÅÍ.

         BCF  FLAG,5      ;ÑËÅÄÓÞÙÅÅ ÂÊËÞ×ÅÍÈÅ ÒÀÉÌÅÐÀ.

         RETURN             ;

         CLRF         TCL  ;ÂÑÅ ÎÁÍÓËßÅÌ.

         CLRF         TCH  ;

         CLRF         TML  ;

         CLRF         TMH ;

         CLRF         THL  ;

         CLRF         THH  ;

         BSF   FLAG,2      ;ÂÊËÞ×ÈÌ ÒÀÉÌÅÐ.

         RETURN

;===================================================

; 15. ÀÖÏ - ÏÐÅÎÁÐÀÇÎÂÀÍÈß (ÈÇÌÅÐÅÍÈÅ ÂÕÎÄÍÛÕ ÂÅËÈ×ÈÍ).

;===================================================

ADP

MOVLW    B'10000001' ;ÑÈÍÕÐÎÍÈÇÀÖÈß ÎÒ RC

MOVWF    ADCON0             ;ÃÅÍÅÐÀÒÎÐÀ, ÂÕÎÄ 0, ÂÊËÞ×ÅÍÈÅ ÀÖÏ (YBX).

         CALL         ZAD           ;

BSF   ADCON0,1 ;ÂÊËÞ×ÈÌ ÏÐÅÎÁÐÀÇÎÂÀÍÈÅ.

BTFSC       ADCON0,1 ;ÎÆÈÄÀÅÌ ÇÀÂÅÐØÅÍÈß

GOTO        $-1     ;ÏÐÅÎÁÐÀÇÎÂÀÍÈß.

MOVFW    ADRESH    ;ÏÅÐÅÏÈØÅÌ ÐÅÇÓËÜÒÀÒ ÏÐÅÎÁÐÀÇÎÂÀÍÈß

MOVWF    TEKH                  ;Â ÑÒÀÐØÈÉ ÒÅÊÓÙÈÉ ÐÅÃÈÑÒÐ.

         BSF   STATUS,5  ;ÏÅÐÅÕÎÄÈÌ Â ÁÀÍÊ 1.

         MOVLW    58               ;

         MOVWF    FSR            ;ÏÎ ÊÎÑÂÅÍÍÎÉ ÀÄÐÅÑÀÖÈÈ

         MOVFW    ADRESL              ;ÇÀÏÈÑÜ ÌË. ÐÅÃÈÑÒÐÀ ÀÖÏ

         MOVWF    INDF          ;Â ÐÅÃÈÑÒÐ TEKL.

         BCF  STATUS,5  ;ÏÅÐÅÕÎÄÈÌ Â ÁÀÍÊ 0.

         CALL         COMPA               ;

         GOTO        BINDEC               ;ÏÅÐÅÊÎÄÈÐÓÅÌ Â 2_10 ÊÎÄ.

ZAD

         MOVLW    .5                ;ÇÀÄÅÐÆÊÀ 20 ÌÊÑ.

         ADDLW     -1                ;

         BTFSS       STATUS,2  ;

         GOTO        $-2              ;

         RETURN

;===========================

; 16. ÑÐÀÂÍÅÍÈÅ Ñ ÓÑÒÀÍÎÂÊÎÉ.

;===========================

COMPA

         TSTF          TEKL         ;

         BTFSC       STATUS,2;

         GOTO        VUKL         ;

         MOVFW    YCTL         ;ÓÑÒÀÍÎÂÊÀ ÌÀÊÑÈÌÓÌÀ.

         SUBWF      TEKL,0       ;ÈÇÌÅÐÅÍÈÅ,

         BTFSC       STATUS,0;ÅÑËÈ ÁÎËÜØÅ ÈËÈ ÐÀÂÍÎ,

         GOTO        VUKL         ;ÒÎ ÂÊËÞ×ÀÅÒÑß ÇÓÌÌÅÐ.

         MOVFW    YCTLI        ;ÓÑÒÀÍÎÂÊÀ ÌÈÍÈÌÓÌÀ.

         SUBWF      TEKL,0       ;ÈÇÌÅÐÅÍÈÅ,

         BTFSS       STATUS,0;ÅÑËÈ ÌÅÍÜØÅ,

         GOTO        VUKL         ;ÒÎ ÂÊËÞ×ÀÅÒÑß ÇÓÌÌÅÐ.

         BTFSC       STATUS,2;ÅÑËÈ ÐÀÂÍÎ,

         GOTO        VUKL         ;ÒÎ ÂÊËÞ×ÀÅÒÑß ÇÓÌÌÅÐ.

         BCF  FLAG1,4    ;ÇÓÌÌÅÐ ÂÛÊËÞ×ÅÍ.

         BCF  FLAG1,5    ;ÇÓÌÌÅÐ ÂÛÊËÞ×ÅÍ.

         BCF  PORTC,0   ;ÂÛÊËÞ×ÈÌ ÑÈÃÍÀË.

         RETURN

VUKL

         BTFSC       PORTA,KY;

         GOTO        $+5    ;

         BSF   FLAG1,5    ;ÏÎÑÒÀÂÈÌ ÑÒÎÐÎÆÎÊ ÍÀ 1 ×ÀÑ.

         BCF  PORTC,0   ;ÂÛÊËÞ×ÈÌ ÑÈÃÍÀË.

         BTFSC       FLAG1,5    ;ÅÑËÈ 1 ×ÀÑ ÏÐÎØÅË, ÒÎ ÂÊËÞ×ÈÌ ÑÈÃÍÀË.

         RETURN

         BTFSC       FLAG1,4    ;ÅÑËÈ ÂÛÕÎÄ ÓÆÅ ÂÛÊËÞ×ÅÍ,

         RETURN             ;ÑÐÀÂÍÅÍÈÉ ÍÅÒ.

         BSF   PORTC,0   ;ÂÊËÞ×ÈÌ ÑÈÃÍÀË.

         BSF   FLAG1,4    ;ÇÓÌÌÅÐ ÂÊËÞ×ÅÍ.

         RETURN

;======================================================

; 17. ÏÅÐÅÊÎÄÈÐÎÂÊÀ ÈÇ 16-È ÐÀÇÐßÄÍÎÃÎ 2-ÃÎ Â 5- ÐÀÇÐßÄÍÎÅ 2-10-Å.

; ÀËÃÎÐÈÒÌ ÏÅÐÅÊÎÄÈÐÎÂÊÈ ÎÑÍÎÂÛÂÀÅÒÑß ÍÀ ÏÐÈÁÀÂËÅÍÈÈ 3 Â ÌËÀÄØÈÉ

; È ÑÒÀÐØÈÉ ÏÎËÓÁÀÉÒÛ. ÅÑËÈ ÐÅÇÓËÜÒÀÒ ÑÏÅÐÅÍÎÑÎÌ 1  3 ÐÀÇÐßÄ (10=7+3), ÒÎ ÇÀÏÈÑÛÂÀÅÌ

; ÍÎÂÎÅ ÇÍÀ×ÅÍÈÅ Â ÐÅÃÈÑÒÐ. ÂÛÏÎËÍßÅÌ 16 ÐÀÇ ÑÄÂÈÃÀß ÁÈÒÛ ÐÅÃÈÑÒÐÎÂ.

;======================================================

BINDEC

MOVLW .16 ;ÇÀÏÈØÅÌ ×ÈÑËÎ ÑÄÂÈÃÎÂ

MOVWF COU ; Ñ×ÅÒ×ÈÊ.

BIDE

BCF STATUS,0 ;ÎÁÍÓËÈÌ ÁÈÒ "Ñ".

RLF TEKL,1 ;ÑÄÂÈÍÅÌ ÏÅÐÅÊÎÄÈÐÓÅÌÎÅ

RLF TEKH,1 ;×ÈÑËÎ ÏÅÐÅÌÅÙÀß ÅÃÎ ÑÒÀÐØÈÉ ÁÈÒ

RLF EDA,1 ;Â ÌËÀÄØÈÉ ÁÈÒ ÐÅÃÈÑÒÐÎÂ

RLF DEA,1 ;ÐÅÇÓËÜÒÀÒÀ.

DECFSZ COU,1 ;ÇÀÔÈÊÑÈÐÓÅÌ ÑÄÂÈà  Ñ×ÅÒ×ÈÊÅ.

GOTO RASDEC ;ÏÐÎÂÅÐÈÌ ÏÎËÓÁÀÉÒÛ ÍÀ ÑÅÌÅÐÊÓ.

GOTO MESTO ;ÅÑËÈ Ñ×ÅÒ×ÈÊ ÏÓÑÒ, ÇÀÏÎËÍÈÌ ÐÅÃÈÑÒÐÛ ÈÍÄÈÊÀÖÈÈ.

RASDEC

MOVLW EDA ;ÇÀÏÈØÅÌ ÀÄÐÅÑ ÐÅÃÈÑÒÐÀ

MOVWF FSR ;Â ÐÅÃÈÑÒÐ ÊÎÑÂÅÍÍÎÉ ÀÄÐÅÑÀÖÈÈ.

CALL BCD ;ÏÐÎÂÅÐÈÌ ÇÍÀ×ÅÍÈÅ ÐÅÃÈÑÒÐÀ ÍÀ 7.

MOVLW DEA ;ÀÍÀËÎÃÈ×ÍÛÅ ÎÏÅÐÀÖÈÈ ÏÐÎÄÅËÀÅÌ

MOVWF FSR ;Ñ ÄÐÓÃÈÌÈ ÐÅÃÈÑÒÐÀÌÈ.

CALL BCD ;

GOTO BIDE ;ÏÎÉÄÅÌ ÏÎÂÒÎÐßÒÜ ÑÄÂÈÃ.

BCD

MOVLW 3 ;0000 0011

ADDWF 0,0 ;ÏÐÈÁÀÂÈÌ 3 Ê ÐÅÃÈÑÒÐÓ È ÐÅÇÓËÜÒÀÒ

MOVWF TEMP ;ÇÀÏÈØÅÌ ÂÎ ÂÐÅÌÅÍÍÛÉ ÐÅÃÈÑÒÐ.

BTFSC TEMP,3 ;ÏÐÎÂÅÐÈÌ 3 ÁÈÒ È ÅÑËÈ ÎÍ ÐÀÂÅÍ ÍÓËÞ,

MOVWF 0 ;ÏÐÎÏÓÑÊÀÅÌ ÇÀÏÈÑÜ ÐÅÇÓËÜÒÀÒÀ Â ÐÅÃÈÑÒÐ.

MOVLW 30 ;48=0011 0000

ADDWF 0,0 ;ÏÐÈÁÀÂÈÌ 3 Ê ÑÒÀÐØÅÌÓ ÏÎËÓÁÀÉÒÓ ÐÅÃÈÑÒÐÀ È ÐÅÇÓËÜÒÀÒ

MOVWF TEMP ;ÇÀÏÈØÅÌ ÂÎ ÂÐÅÌÅÍÍÛÉ ÐÅÃÈÑÒÐ.

BTFSC TEMP,7 ;ÅÑËÈ ÁÈÒ ÅÄÈÍÈ×ÍÛÉ,

MOVWF 0 ;ÒÎ ÇÀÏÈØÅÌ ÍÎÂÎÅ ÇÍÀ×ÅÍÈÅ Â ÐÅÃÈÑÒÐ.

RETURN ;ÂÅÐÍÅÌÑß ÄËß ÇÀÃÐÓÇÊÈ ÍÎÂÎÃÎ ÇÍÀ×ÅÍÈß ÐÅÃÈÑÒÐÀ.

;======================================================

; 18. ÈÇÂËÅÊÀÅÌ ÏÎËÓÁÀÉÒÛ ÈÇ ÐÅÃÈÑÒÐΠÑ×ÅÒÀ  ÐÅÃÈÑÒÐÛ ÈÍÄÈÊÀÖÈÈ.

;======================================================

MESTO

         MOVLW    B'00001111' ;ÈÇÂËÅÊÀÅÌ ÏÎËÓÁÀÉÒÛ

         ANDWF     DEA,0                  ;Â ÐÅÃÈÑÒÐÛ ÈÍÄÈÊÀÖÈÈ.

         MOVWF    COI            ;

         MOVLW    B'11110000' ;

         ANDWF     EDA,0         ;

         MOVWF    DEI   ;

         SWAPF      DEI,1          ;

         MOVLW    B'00001111' ;

         ANDWF     EDA,0                  ;

         MOVWF    EDI             ;

         CLRF         EDA           ;

         CLRF         DEA           ;

         RETURN                       ;

;==================================================

; 19. ÑÌÅÍÀ ÈÍÄÈÊÀÖÈÈ ÏÐÈ ÑÌÅÍÅ ÐÅÆÈÌÀ.

;==================================================

INDH

         BTFSC       FLAG,7      ;ÅÑËÈ ÊÓÐÑÎÐ ÅÑÒÜ,

         CALL         YCT  ;ÒÎ ÈÄÅÌ ÍÀ ÓÑÒÀÍÎÂÊÓ.

         MOVLW    .10     ;ÏÓÑÒÎ.

         CALL         SEG  ;ÇÀÏÎËÍÈÌ ÐÅÃÈÑÒÐÛ ÈÍÄÈÊÀÖÈÈ.

         MOVWF    R1     ;

         MOVWF    R2     ;

         MOVWF    R8     ;

         BTFSS       FLAG,6      ;

         GOTO        $+6    ;

         MOVLW    .11     ;ÏÐÎ×ÅÐÊ ÑÐÅÄÍÈÉ.

         CALL         SEG  ;

         MOVWF    R5     ;

         BCF  FLAG,6      ;

         GOTO        $+5    ;

         MOVLW    .12     ;ÏÐÎ×ÅÐÊ ÍÈÆÍÈÉ.

         CALL         SEG  ;

         MOVWF    R5     ;

         BSF   FLAG,6      ;

         MOVFW    ML    ;

         CALL         SEG  ;

         MOVWF    R3     ;

         MOVFW    MH    ;

         CALL         SEG  ;

         MOVWF    R4     ;

         MOVFW    HL     ;

         CALL         SEG  ;

         MOVWF    R6     ;

         MOVFW    HH    ;

         CALL         SEG  ;

         MOVWF    R7     ;

         BSF   FLAG,1      ;ÂÊËÞ×ÈÌ ÐÅÆÈÌ ×ÀÑÎÂ.

         CLRF         ZPT   ;

         RETURN             ;

INDT

         BTFSS       PORTA,KY;ÅÑËÈ ÊÍÎÏÊÀ ÍÀÆÀÒÀ,

         CALL         T00   ;ÒÎ ÈÄÅÌ ÎÁÍÓËßÒÜ ÒÀÉÌÅÐ.

         MOVFW    TCL  ;ÇÀÏÎËÍÈÌ ÐÅÃÈÑÒÐÛ ÈÍÄÈÊÀÖÈÈ

         CALL         SEG  ;ÌÈÍÓÒ È ÑÅÊÓÍÄ ÏÐÀÂÛÕ ×ÀÑÎÂ.

         MOVWF    R1     ;

         MOVFW    TCH  ;

         CALL         SEG  ;

         MOVWF    R2     ;

         MOVFW    TML  ;

         CALL         SEG  ;

         MOVWF    R4     ;

         MOVFW    TMH ;

         CALL         SEG  ;

         MOVWF    R5     ;

         MOVLW    .11     ;ÏÐÎ×ÅÐÊ.

         CALL         SEG  ;

         MOVWF    R3     ;

         MOVWF    R6     ;

         MOVFW    THL  ;

         CALL         SEG  ;

         MOVWF    R7     ;

         MOVFW    THH  ;

         CALL         SEG  ;

         MOVWF    R8     ;

         BCF  FLAG,1      ;ÐÅÆÈÌ ×ÀÑÛ ÂÛÊËÞ×ÅÍ.

         BCF  FLAG,7      ;ÍÅÒ ÓÑÒÀÍÎÂÊÈ.

         RETURN             ;

INDU

         MOVLW    .10     ;ÏÓÑÒÎ.

         CALL         SEG  ;ÇÀÏÎËÍÈÌ ÐÅÃÈÑÒÐÛ ÈÍÄÈÊÀÖÈÈ.

         MOVWF    R1     ;

         MOVWF    R2     ;

         MOVWF    R3     ;

         MOVWF    R7     ;

         MOVWF    R8     ;

MOVFW COI      ;

         CALL         SEG  ;

         MOVWF    R6     ;

MOVFW DEI       ;

         CALL         SEG  ;

         MOVWF    R5     ;

MOVFW EDI       ;

         CALL         SEG  ;

         MOVWF    R4     ;

         BSF   ZPT,4         ;

         RETURN             ;

;===================================================

; 20. ÐÀÑÏÐÅÄÅËÈÒÅËÜ.

;===================================================

PAC

         BTFSS       FLAG1,1    ;ÆÄÅÌ 1 ÑÅÊÓÍÄÓ.

         GOTO        $-1     ;

         CALL         ADP  ;

         CALL         KHOP         ;ÍÀ ÏÐÎÂÅÐÊÓ ÊÍÎÏÎÊ.

         CALL         IND   ;ÍÀ ÈÍÄÈÊÀÖÈÞ.

         BCF  FLAG1,1    ;

         GOTO        PAC  ;ÏÎÂÒÎÐÈÌ.

;=====================================================

; 21. ÓÑÒÀÍÎÂÊÀ ÂÐÅÌÅÍÈ.

;=====================================================

YC0

         INCF ML,1           ;ÓÂÅËÈ×ÈÌ ÅÄÈÍÈÖÛ ÌÈÍÓÒ.

         MOVLW    .10              ;ÍÅ ÁÎËÅÅ 9.

         SUBWF      ML,0           ;

         SKPNC                         ;ÅÑËÈ ÁÎËÜØÅ ÈËÈ ÐÀÂÍÎ 10,

         CLRF         ML             ;ÒÎ ÎÁÍÓËÈÌ.

         RETURN

YC1

INCF MH,1          ;ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ÌÈÍÓÒ.

MOVLW    .6                ;ÍÅ ÁÎËÅÅ 5.

SUBWF      MH,0          ;

SKPNC                         ;ÅÑËÈ ÁÎËÜØÅ ÈËÈ ÐÀÂÍÎ 6,

CLRF         MH             ;ÒÎ ÎÁÍÓËÈÌ.

RETURN

YC2

         INCF HL,1           ;ÓÂÅËÈ×ÈÌ ÅÄÈÍÈÖÛ ×ÀÑÎÂ.

         MOVLW    .10              ;ÍÅ ÁÎËÅÅ 9.

         SUBWF      HL,0           ;

         SKPNC                         ;

         CLRF         HL              ;ÅÑËÈ ÁÎËÜØÅ, ÒÎ ÎÁÍÓËÈÌ.

         MOVFW    HH              ;ÏÅÐÅÊÎÄÈÐÓÅÌ Â ÄÂÎÈ×ÍÛÉ

         CALL         DEBIN                 ;ÊÎÄ ÄÅÑßÒÊÈ.

         ADDWF     HL,0           ;ÏÐÈÁÀÂÈÌ ÅÄÈÍÈÖÛ

         MOVWF    HOU           ;ÄÂÎÈ×ÍÎÅ ÇÍÀ×ÅÍÈÅ ÍÅ ÄÎËÆÍÎ

ADDLW     -18H           ;ÏÐÅÂÛØÀÒÜ - 24.

         SKPC                            ;ÅÑËÈ ÁÎËÜØÅ ÈËÈ ÐÀÂÍÎ 24,

         RETURN

         CLRF         HOU          ;ÒÎ ÎÁÍÓËÈÌ ×ÀÑÛ ÄÂÎÈ×ÍÛÅ

         CLRF         HL              ;È ÐÀÇÐßÄÛ ÑÒÀÐØÈÉ

         CLRF         HH              ;È ÌËÀÄØÈÉ.

         RETURN

YC3

INCF HH,1           ;ÓÂÅËÈ×ÈÌ ÄÅÑßÒÊÈ ×ÀÑÎÂ.

MOVLW    .3                ;ÍÅ ÁÎËÅÅ 2.

SUBWF      HH,0           ;

SKPNC                         ;

CLRF         HH              ;ÅÑËÈ ÁÎËÜØÅ, ÒÎ ÎÁÍÓËÈÌ.

         MOVFW    HH              ;ÏÅÐÅÊÎÄÈÐÓÅÌ Â ÄÂÎÈ×ÍÛÉ

         CALL         DEBIN                 ;ÊÎÄ ÄÅÑßÒÊÈ.

         ADDWF     HL,0           ;ÏÐÈÁÀÂÈÌ ÅÄÈÍÈÖÛ

         MOVWF    HOU           ;È ÏÎËÓ×ÈÌ ÄÂÎÈ×ÍÎÅ ×ÈÑËÎ.

ADDLW     -18H           ;

         SKPC                            ;ÅÑËÈ ÁÎËÜØÅ ÈËÈ ÐÀÂÍÎ 24,

         RETURN

         CLRF         HOU           ;ÒÎ ÎÁÍÓËÈÌ ×ÀÑÛ ÄÂÎÈ×ÍÛÅ

         CLRF         HL              ;È ÐÀÇÐßÄÛ ÑÒÀÐØÈÉ

         CLRF         HH              ;È ÌËÀÄØÈÉ.

RETURN                       ;ÂÅÐÍÅÌÑß.

YCE

         CLRF         CL              ;ÎÁÍÓËÅÍÈÅ.

         CLRF         CH              ;

         CLRF         ML             ;

         RETURN                       ;

;======================================================

END

;======================================================


Ñòðàíèöû: 1, 2, 3, 4, 5, 6



2012 © Âñå ïðàâà çàùèùåíû
Ïðè èñïîëüçîâàíèè ìàòåðèàëîâ àêòèâíàÿ ññûëêà íà èñòî÷íèê îáÿçàòåëüíà.