|
עמוד:414
ACTIVATE–ALARM–AGAIN : הפעל התראה באמצעות זמזם ודפ " א CALL OPERATE–ALARM ; קלט מקש CALL SCAN–DIGIT ; בדיקה אם הסתיים קלט קוד האזעקה CMP LAST–DIGIT , 04 h ; לא הסתיים קלט קוד אזעקה JNZ ACTIVATE–ALARM–AGAIN ; חזור לביצוע התראה ; השוואה קוד אזעקה שנשמר לקוד שנקלט CMP CX , CODE–ALARM ; קודים אינם זהים , חזור לביצוע התראה JNZ ACTIVATE–ALARM ; קודים זהים , סיים תכנית JMP EXITDOS ; השהיה 20 שניות לפני הפעלת התראה ; WAITING : מונה משמש להשהיה ארוכה דרושה של 20 שניות MOV COUNTER , 0 FF ; אתחול אוגר CX שמכיל את קוד האזעקה MOV CX , 0 FFFFh ; אתחול סיבית אחרונה שהוצגה MOV Ah , 09 MOV DX , OFFSET MS 3 MOV LAST–DIGIT , 0 h ; SSS : INT 21 h הצגת מצב מערכת האזעקה CALL DDELAY CALL DISPLAY–STATUS ; קלט מקש CALL SCAN–DIGIT ; בדיקה אם הסתיים קלט קוד אזעקה CMP LAST–DIGIT , 04 h ; הסתיים קלט קוד אזעקה JZ CHECK–CODE ; המשך השהיה וקלט קוד אזעקה YYY : ; עדכון מונה השהיה ארוכה DEC COUNTER ; בדיקה אם הסתיימה השהיה של 20 שניות CMP COUNTER , 00 h ; השהיה לא הסתיימה JNZ SSS ; השהיה של 20 שניות הסתיימה JMP ACTIVATE–ALARM ;
|
|