⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dd.asm

📁 辞典 dict3.asm.grammar.asm,newword.asm 学习 learn.asm 名片 userinf.asm 备忘 userinf.asm 提醒 userinf
💻 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 + -