📄 dd.asm
字号:
extract_and_show_all_00:
show_mode4:
stz <temp
lda #iconDown&0ffh
trb Icondown>>8
lda #iconUp&0ffh
trb IconUp>>8
lda #' ' ;;清除3~6行
ldy star_textbuffor ;#20 ;#40 ;;yiadds
?1:
sta textbuffor,y
iny
cpy end_textbuffor ;#100 ;#120 ;;yiadds
bcc ?1
stz yinbiaoinfbuff
stz yinbiaoinfbuff+3
stz yinbiaoinfbuff+6
stz yinbiaoinfbuff+9
;jsr store_pageXaddr ;保存此页首地址
lda textpagenum_study
beq ?_Offup
lda #IconUp&0ffh
tsb IconUp>>8
?_Offup:
;Lsetcur 0,2 ;;yiadds
;lsetcur 0,1
?_loop:
jsr store_inf
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
lda ItemNo ;screenmode
cmp #5 ;#1
beq ?_is_tfill_mode
jsr ljsr
dw newenchbank
dw store_jieshiyinbiao-1 ;;调用英汉保存音标程序
bra ?_all_go_here
?_is_tfill_mode:
;jsr store_jieshiyinbiao_yiadd
jsr ljsr
dw alarmbank
dw store_jieshiyinbiao_yiadd-1
?_all_go_here:
lda <CharL
sta <CharH
cmp #0bh ;如果是有保存此例句地址
bne ?_notappearliju
;jsr store_lijuaddr ;保存例句地址
jsr inc1_indxd
jsr inc1_indxd
jsr inc1_indxd
?_notappearliju:
jsr push_inf
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
lda <CharH
cmp <CharL
bne ?_0 ;;不是结束
cmp #0ah
bne ?_0 ;;不是结束
jsr restore_inf
loff_lcd_icon icondown
;lda #1
;sta temp_study4 ;;置无下屏
?_jieshiend:
rts
?_0:
cmp #80h
bcc ?_enchar
;;yiadd2-10-23 15:10 ;;temp=1此词解释中有中文
;;temp=1此词解释无中文
lda #1
sta <temp
jsr ljsr
dw newenchbank
dw changejieshich_onehanzi-1
lda <CharL
cmp #0aah
bne ?_usefulchar
lda <CharH
cmp #0a1h
bcc ?_specialenchar
?_usefulchar:
lda <CurX
cmp #19
bcs ?_3
?_4:
ldx <CharL
ldy <CharH
Lputchar
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcs ?_yi_1029
jmp ?_loop
?_yi_1029:
jmp ?_exit
?_3:
lcheckcrlf
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcc ?_4
jsr restore_inf
?_braexit:
jmp ?_exit
?_enchar:
jsr pop_inf
?_specialenchar:
lda <CharH
cmp #0ah
bne ?_compnext
?_checkscreenend:
lcheckcrlf
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcs ?_braexit
jmp ?_loop
?_compnext:
cmp #0bh
bne ?_purityen
lda <CurX
cmp #19
bcs ?_1
?_2:
;ldx #LiQu ;#0c0h
;ldy #LiWei;#0fdh
;Lputchar
lda <CharL
cmp #0ah ;;[例]后有回车是结尾
bne ?_checkscreenend
jmp ?_jieshiend
?_1:
lcheckcrlf
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcc ?_2
jsr restore_inf
bra ?_exit
?_purityen:
lda <CurX
cmp #18
bcs ?_01
?_02:
ldx <CharH
Lputchar
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcs ?_exit
jmp ?_loop
?_01:
lda <CharH
jsr judgeaz
beq ?_02
lda <CharL
jsr judgeaz
beq ?_02
lda <CurX
cmp #19
beq ?_03
cmp #18
bne ?_04
jsr push_inf
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
jsr pop_inf
lda <CharL
jsr judgeaz
beq ?_02
?_04:
ldx <CharH
Lputchar
ldx #1ah ;'~'
Lputchar
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcs ?_exit
jmp ?_loop
?_03:
lcheckcrlf
lda <CurY
cmp curymax_bak ;#6 ;;yiadds
bcc ?_02
jsr restore_inf
?_exit:
jsr push_inf
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
lda <CharL
sta <CharH
;;yiadd b
cmp #0bh
bne ?_1025
jsr inc1_indxd
jsr inc1_indxd
jsr inc1_indxd
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
lda <charl
cmp #0ah
bne ?_Notend
bra ?_end
?_1025:
;yiadd e
cmp #0ah
bne ?_Notend
jsr ljsr
dw newenchbank
dw extract_jieshi_oneByte-1
lda <charL
cmp #0ah
beq ?_end
?_Notend:
lda #iconDown&0ffh
tsb Icondown>>8
jsr pop_inf
rts
?_end:
jsr pop_inf
;lda #1
;sta temp_study4 ;;置无下屏
loff_lcd_icon icondown
rts
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -