alarm_yi.asm

辞典 dict3.asm.grammar.asm,newword.asm 学习 learn.asm 名片 userinf.asm 备忘 userinf.asm 提醒 userinf

; ***************************************************************************
; *     Project : Electronic Dictionary                                     *
; *        Date : 2003.9                                                    *
; *   File Name : ALARM_YI.ASM                                              *
; ***************************************************************************

        pw      128
        case    off
        externs on
        include st2202.def      ;; Include ST2100 I/O define.
        include st2202.mac
        include Data.def        ;; Data RAM define.
        include Bios.h
        include Graphics.h
        include Graph.def
        include KeyDef.def
        include DataBank.def
        public  alarm_bak_event
        public	Alarm_yiMode
        public  bendishi

DS0     .SECTION                ;; Data ROM location 10000h(Bank#2)
;;=====================================================
;;[V]-----------------------------------------------[V]
;;       Event process vector.
;;[V]-----------------------------------------------[V]

alarm_bak_event:
        dw      alarm_bakBank
        dw      THSec-1         ;; 半秒钟事件
        dw      TSec-1          ;; 一秒钟事件
        dw      TMin-1          ;; 一分钟事件
        dw      alarm_bak_TKeyDown-1      ;; Key Down 事件
        dw      TKeyUp-1        ;; Key Up 事件
        dw      TTimer-1        ;; Timer 事件
        dw      TKeyPress-1     ;; Key press 事件
        dw      TLoad-1         ;; Enter Mode 事件
        dw      THelpRet-1      ;; Return from help mode.

;;======================================================================
PS7             .SECTION                ;; Program ROM location 4000h
BankNo          equ     alarm_bakBank       ;; For check only.

Alarm_yiMode	equ	15

TLoad:
        jsr     ljsr
        dw      AlarmBank
        dw      AlarmLoad-1

        lsetscreen  1
        lda     #<alarm_menu
        sta     StrAddrL
        lda     #>alarm_menu
        sta     StrAddrH
        stz     ItemStart
        stz     ItemOffset
        stz     MenuBufNO
AlarmLoad_0:
        ldx     <Mode                  ;mode of system
        stx     <ModeSave              ;Save last mode
        lda     #MenuMode
        sta     <Mode                  ;Enter Menu Select Mode
        lda	#80h
        sta    <EFlag                 ;enter this mode flag
jmp_LMAINU:
        LMAINU

alarm_bak_TKeyDown:
        lread_key_again
        lda     ItemNo
        cmp   #9
        beq     bendishi
        lda     #16
        sta     <Mode
        lda     #8
        sta     <EFlag
ExitNoUpdate:
        jmp	jmp_LMAINU


bendishi:
        lda     #clock_Mode
        sta     <Mode
        lda     #80h
        sta     <EFlag
        bra     ExitNoUpdate
TKeyUp:
TTimer:
TKeyPress:
THelpRet:
THSec:
TSec:
TMin:
        jmp	jmp_LMAINU

        end