24dot.inc

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

; ***************************************************************************
; *     Project : Electronic Dictionary                                     *
; *        Date : 2003.9                                                    *
; *   File Name : 24DOT.INC                                                 *
; ***************************************************************************

statusflag      equ     8fh
carryflag       equ     Statusflag      ;bit7
minusflag       equ     StatusFlag      ;bit6
shiftflag       equ     StatusFlag      ;bit5
refreshFlag     equ     StatusFlag      ;bit4
funcflag        equ     StatusFlag      ;bit3
errflag         equ     StatusFlag      ;bit2
kflag           equ     StatusFlag      ;bit1
perflag         equ     StatusFlag      ;bit0
memstatus       equ     90h
memflag         equ     MemStatus       ;bit7
pcflag          equ     MemStatus       ;bit6
hypflag         equ     MemStatus       ;bit5
expflag         equ     MemStatus       ;bit4
expminflag      equ     MemStatus       ;bit3

textbuf         equ     cal_buffor
textbuf2        equ     TextBuf+32
textbuf3        equ     TextBuf+64
temp1exp        equ     TextBuf3+0
temp1ho         equ     TextBuf3+1
temp1moh        equ     TextBuf3+2
temp1mo         equ     TextBuf3+3
temp1lo         equ     TextBuf3+4
charnum         equ     TextBuf3+5
decexp          equ     TextBuf3+6
keycode         equ     TextBuf3+7
memory          equ     TextBuf3+8
numstack        equ     TextBuf3+16
kkeycode        equ     TextBuf3+17
pkeycode        equ     TextBuf3+18
kmem            equ     TextBuf3+19
perbuf          equ     TextBuf3+26
perbuf1         equ     TextBuf3+32
txtptr          equ     TextBuf3+38     ;and TxtPtr+1
funckey         equ     TextBuf3+40
dectext         equ     TextBuf3+41
textbuf4        equ     TextBuf3+43

shiftk              equ      13              ;Shift
dotk                equ      10              ;'.'

;for  hs_flag
bit_if_count        equ      01h
little_dot          equ      22h ;27

;ac_key              equ     LanKey

TEMP3_EXP      EQU $8A
TEMP3_HO       EQU $8B
TEMP3_MOH      EQU $8C
TEMP3_MO       EQU $8D
TEMP3_LO       EQU $8E

TEMP1_EXP      EQU $93
TEMP1_HO       EQU $94
TEMP1_MOH      EQU $95
TEMP1_MO       EQU $96
TEMP1_LO       EQU $97

TEMP2_EXP      EQU $98
TEMP2_HO       EQU $99
TEMP2_MOH      EQU $9A
TEMP2_MO       EQU $9B
TEMP2_LO       EQU $9C

FAC_EXP        EQU $9D
FAC_HO         EQU $9E
FAC_MOH        EQU $9F
FAC_MO         EQU $A0
FAC_LO         EQU $A1
FAC_SGN        EQU $A2

ARG_EXP        EQU $A5
ARG_HO         EQU $A6
ARG_MOH        EQU $A7
ARG_MO         EQU $A8
ARG_LO         EQU $A9
ARG_SGN        EQU $AA
STATE_BUF      EQU $AB
STATE_BUF1     EQU $AC

CALDATA        EQU B0H
INXMOV         EQU CALDATA
INXMOV1        EQU CALDATA+1
FMULBUF0       EQU CALDATA+2
FMULBUF1       EQU CALDATA+3
FMULBUF2       EQU CALDATA+4
FMULBUF3       EQU CALDATA+5
FMULBUF4       EQU CALDATA+6
STRLT2         EQU CALDATA+7
CMPFLAG        EQU CALDATA+8  ;原本APPLE2 的 16H 暂存器
STRBUF1        EQU CALDATA+9
STRBUF2        EQU CALDATA+10
STRBUF3        EQU CALDATA+11
ERR_FLAG       EQU CALDATA+12 ;运算错误存错误讯息,原APPLE $DE 暂存器
CMPFAC1        EQU CALDATA+13 ;FAC的比较暂存器
CMPFAC2        EQU CALDATA+14 ;FAC的比较暂存器
;==========================================
SUB_BUF        EQU 80H        ;程式返回位置.
TEMP4_EXP      EQU 81H
TEMP4_HO       EQU 82H
TEMP4_MOH      EQU 83H
TEMP4_MO       EQU 84H
TEMP4_LO       EQU 85H
FLOAT_STAT     EQU 86H  ;BIT 7 6 5 4 3 2 1 0
float_bit      equ  0a4h