📄 dicchen.asm
字号:
; ***************************************************************************
; * Project : Electronic Dictionary *
; * Date : 2003.9 *
; * File Name : DICCHEN.ASM *
; ***************************************************************************
pw 128
case off
externs on
include ST2202.def ; Include ST2100 I/O define.
include Data.def ; Data RAM define.
include Bios.h
include Graphics.h
include Keydef.def
include Graph.def
include extract.h
include xyhaddr.h
include fulu.h
INCLUDE ST2202.MAC
;=====================================================
; >>> Subrounting declare <<
public dicchenevent
public chenflag
public init_dicchen
public dicchenmode
public Cheninputbuff
public find_machedchinawordaddr
public ChenjieshiDkey
public ChenjieshiUkey
public ChenjieshiRkey
public ChenjieshiLkey
public ChenjieshiUPkey
public ChenjieshiDPkey
public ChenjieshiEnterkey
public chenstatusflag
public ViewEnChlijuStatusNum
public ChenFanchaChEnStatusNum
public ChenFanChaEnchStatusNum
public ViewEnChUPkey
public ViewEnChDPkey
public DicchenjieshiHelp
public Dicchen_Help
public store_ChenjieshiInf
public restore_ChenjieshiInf
PUBLIC viewjieshilkey
PUBLIC viewjieshidpkey
PUBLIC viewjieshiupkey
PUBLIC viewjieshidkey
PUBLIC viewjieshiukey
PUBLIC viewjieshiesckey
PUBLIC viewenchcigenkey
PUBLIC viewenchlizhengkey
PUBLIC viewenchenterkey
PUBLIC viewenchesckey
public viewidiomenterkey
public ViewEnchBianXistatusnum
public ViewEnchfenlistatusnum
public ViewEnchfanyistatusnum
public ViewEnchtongystatusnum
;;==============================================
;; >>>lib addr<<<
hyEndformataddr equ 0175F872H
HyLastwordformataddr equ 0175F867H
;;;==============状态表的常量定义====================
inputcharstatusNum equ 1 ;输入模式
viewidiomstatusNum equ 2 ;浏览中文词条模式
viewjieshistatusNum equ 3 ;浏览解释模式
ViewEnChstatusNum equ 4 ;浏览英文解释的解释模式
ViewEnChlijuStatusNum equ 5 ;浏览英文解释的解释的例句状态
ViewEnChAlllijuStatusNum equ 6 ;浏览英文解释的解释的全部例句状态
ChenFanchaChEnStatusNum equ 7 ;反查汉英状态
ChenFanChaEnchStatusNum equ 8 ;反查英汉状态
ViewEnchBianXistatusnum equ 9 ;辩析
ViewEnchfenlistatusnum equ 10
ViewEnchfanyistatusnum equ 11
ViewEnchtongystatusnum equ 12
;;;===============常量定义===========================
ChhanziQu equ 0b0h ;汉字区码的开始值
;;===================================================
;; >>>Zero Page Variable Define<<<
chenflag equ Cdata+50
chenstatusflag equ Cdata+49
;;==================================================
;; >>>Not zero Variable Defind<<
;;为避免反查时本程序中的变量与NEWENCH.ASM冲突,故此程序中只使用Ndata的前60H字节。 Y.L
CEdata equ Ndata ;79eh;7a2h ;794h
tmpcount equ CEdata+1;41 ;临时变量
tmpcount1 equ CEdata+2;42 ;临时变量
tmpcount2 equ CEdata+3;43 ;临时变量
tmpcount3 equ CEdata+4;44 ;临时变量
az16regL equ CEdata+5;45 ;记载有多少个8分索引低位
az16regH equ CEdata+6;46 ;记载有多少个8分索引高位
firstlinebuff equ CEdata+9;49 ;保存第一行信息(five bytes)
nowlinebuff equ CEdata+14;54 ;记载刚解压词条的信息five byte)
idiomchOY equ CEdata+19;59 ;保存中文词条的<OY
JieshiNum equ CEdata+20;60 ;保存英文解释的条数
JishiOY equ CEdata+21;61 ;保存解释的<OY
JieshiNumBak equ CEdata+22;62 ;保存解释的个数
Cheninputbuff equ CEdata+23 ;800h+162 ;输入的单词18byte
CheninputBak equ CEdata+41 ;反查时汉英输入的备份18byte
ChenjieshiInfBuff equ CEdata+59 ;反查时汉英解释的信息(7bytes)
;;===================>>>变量替换<<<============
Icondownpage equ icon_downpage
IconUPpage equ Icon_Uppage
UpPagekey equ pgUp
DownPagekey equ PgDown
;;==========标志位的意义=======================
;ChenFlag
;+-+-+-+-+-+-+-+-+
;|7|6|5|4|3|2|1|0|
;+-+-+-+-+++++++++
; | | | | | | | +-- {0:. 1:词典结尾.}
; | | | | | | +---- {0:. 1:浏览中文词条进入解释.}
; | | | | | +------ {0:. 1:本词条解释结尾.}
; | | | | +-------- {0:. 1:.}
; | | | +---------- {0:. 1:.}
; | | +------------ {0:. 1:.}
; | +-------------- {0:. 1:.}
; +---------------- {0:. 1:.}
;;==================================================
DS0 .SECTION ; Data ROM location
Include Bookbmp.Asm
diccheninputtittle:
db ' 汉英词典',0dh
db '请输入中文:',0
DicchenFirstHelp:
db '输入要查的中文.',0dh
db '[返回]返回',0
DiccheninputHelp:
db '[',f8h,d2h,']或[删除]删除字符.',0dh
db '[',f8h,d0h,'][',f8h,d1h,']或[',f8h,ceh,'][',f8h,cfh,']浏览.',0dh
db '[返回]返回',0
DicchenIdiomHelp:
db '[',f8h,d0h,'][',f8h,d1h,']或[',f8h,ceh,'][',f8h,cfh,']浏览.',0dh
db '[输入]查看解释.',0dh
db '[返回]返回',0
DicchenjieshiHelp:
db '[',f8h,d0h,']或[',f8h,d1h,']浏览.',0dh
db '[',f8h,d2h,']或[',f8h,b9h,']浏览超长的单词,',0dh
db '[',f8h,ceh,']或[',f8h,cfh,']浏览相邻中文的解释,',0dh
db '[输入]查看解释.',0dh
db '[返回]返回',0
dicchenevent:
dw DicchenBank
dw Thsec-1 ;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -