📄 sdrv_puts.lst
字号:
##############################################################################
# #
# IAR Z80/64180 C-Compiler V4.04B/WIN #
# Front End V4.20N 26/Dec/106 14:12:52 #
# Global Optimizer V1.05D #
# #
# Target option = Z80 #
# Memory model = large #
# Source file = d:\case_i_d90f\drv\ui_ssd1332\sdrv\sdrv_puts.c #
# List file = d:\case_i_d90f\drv\ui_ssd1332\ui_ssd13_t\list\sdrv_puts.lst#
# Object file = d:\case_i_d90f\drv\ui_ssd1332\ui_ssd13_t\obj\sdrv_puts.r01#
# ASM file = d:\case_i_d90f\drv\ui_ssd1332\ui_ssd13_t\list\sdrv_puts.s01#
# Command line = -v0 -ml -uu #
# -OD:\case_i_d90f\drv\Ui_SSD1332\UI_SSD13_T\Obj\ -e #
# -K -w -gA -s9 -RCODE -r0 -DIC3951 -DNAPDEBUG #
# -LD:\case_i_d90f\drv\Ui_SSD1332\UI_SSD13_T\List\ #
# -q -t8 #
# -AD:\case_i_d90f\drv\Ui_SSD1332\UI_SSD13_T\List\ #
# -Id:\sdk_i_90f\inc\ -Id:\case_i_d90f\inc\ #
# -Id:\case_i_d90f\drv\Ui_SSD1332\inc\ #
# D:\CASE_I_D90F\DRV\UI_SSD1332\SDRV\sdrv_puts.c #
# #
# (c) Copyright IAR Systems 1996 #
##############################################################################
\ 0000 NAME sdrv_puts(16)
\ 0000 RSEG BBC_PUTS(0)
\ 0000 RSEG IDATA0(0)
\ 0000 RSEG CDATA0(0)
\ 0000 EXTERN AsciiSelect
\ 0000 EXTERN Sdrv_PutChar
\ 0000 PUBLIC Sdrv_PutS
\ 0000 PUBLIC StrHeight
\ 0000 EXTERN region
\ 0000 EXTERN ?CLZ80L_4_04_L00
\ 0000 RSEG BBC_PUTS
\ 0000 Sdrv_PutS:
1 /*
2 ********************************************************************************
3 * ACTOS
4 * ui dirver show picture
5 *
6 * (c) Copyright 2002-2003, Actions Co,Ld.
7 * All Right Reserved
8 *
9 * File : Sdrv_PutS.c
10 * By : Rcmai
11 * Version: 1> v1.00 first version 10/17/2003 10:46PM
12 ********************************************************************************
13 */
14 #include "display.h"
15 #include "Drv_S6B33B0A.h"
16
17 #pragma memory=constseg(BBS_PUTS)
18 #pragma memory=default
19
20 #pragma memory=dataseg(BBD_PUTS)
21 #pragma memory=default
22
23 #pragma codeseg(BBC_PUTS)
24
25 //BYTE lineNum_sav;//行号记录
26
27 //如果一行都是small ascii则高度为8(默认),如有一行中有一个是汉字或是 large 模式 ascii
28 // 则高度都为 16
29 BYTE StrHeight = ASCII_SMALL_HEIGHT_DEF;//一行字的高度
30
31 ////*******************************************************************************/
32 ///*
33 //** FUNCTION: Sdrv_PutS
34 //**
35 //** Description: 在屏幕上输出一个字符串，如串的长度超过屏幕，则多出部分不显示
36 //** 指针停在最后一个能显示的字的下一个字符左上角,碰到回车或
37 //** 串尾时退出，碰到换行时从下一行开始显示
38 //** input
39 //** str: 字符串首址 ;
40 //** strlen: 字符串的长度
41 //**
42 //** output
43 //** none
44 //********************************************************************************/
45 non_banked char *Sdrv_PutS(const char *str, signed char strlen)
46 {
\ 0000 FDE5 PUSH IY
\ 0002 DDE5 PUSH IX
\ 0004 DD210000 LD IX,0
\ 0008 DD39 ADD IX,SP
\ 000A C5 PUSH BC
\ 000B F5 PUSH AF
\ 000C F5 PUSH AF
\ 000D F5 PUSH AF
\ 000E F5 PUSH AF
\ 000F D5 PUSH DE
\ 0010 FDE1 POP IY
47 int code;
48 char result;
49 char *lastcharpt;//记录上一个字符的指针
50 BYTE lineNum_sav,rowNum_sav;//行号记录
51
52 lineNum_sav = region.y;
\ 0012 3A0100 LD A,(region+1)
\ 0015 DD77F6 LD (IX-10),A
53 rowNum_sav = region.x;
\ 0018 3A0000 LD A,(region)
\ 001B DD77F7 LD (IX-9),A
54 /*
55 //判断要输出的行的高度
56 if (AsciiSelect == FONT_TYPE_SMALL)
57 {
58 StrHeight = ASCII_SMALL_HEIGHT_DEF;//一行字符的高度
59 }
60 else
61 {
62 StrHeight = ASCII_LARGE_HEIGHT_DEF;//一行字符的高度
63 }
64 */
65
66 // 炬力更新为下面的
67
68 //判断要输出的行的高度
69 if (AsciiSelect == FONT_TYPE_SMALL)
\ 001E ?0000:
70 {
71 StrHeight = CHINESE_HEIGHT_DEF1;//一行字符的高度
72 }
73 else
\ 001E ?0001:
74 {
75 StrHeight = CHINESE_HEIGHT_DEF1;//一行字符的高度
\ 001E 3E10 LD A,16
\ 0020 320000 LD (StrHeight),A
\ 0023 ?0002:
\ 0023 ?0004:
76 }
77
78
79
80 while ( (*str != '\r') //碰到回车时退出
81 && (*str != '\0') //碰到结束符时退出
82 && (strlen != NULL) ) //碰到字符长度为0时退出
\ 0023 FD7E00 LD A,(IY+0)
\ 0026 FE0D CP 13
\ 0028 CABA00 JP Z,?0003
\ 002B AF XOR A
\ 002C FDB600 OR (IY+0)
\ 002F CABA00 JP Z,?0003
\ 0032 AF XOR A
\ 0033 DDB6FE OR (IX-2)
\ 0036 CABA00 JP Z,?0003
\ 0039 ?0007:
\ 0039 ?0006:
\ 0039 ?0005:
83 {
84 lastcharpt = str;
\ 0039 FDE5 PUSH IY
\ 003B E1 POP HL
\ 003C DD75FA LD (IX-6),L
\ 003F DD74FB LD (IX-5),H
85 //下面是碰到换行符时要作换行处理
86 if (*str == '\n')
\ 0042 FD7E00 LD A,(IY+0)
\ 0045 FE0A CP 10
\ 0047 201A JR NZ,?0012
\ 0049 ?0008:
87 {
88 str++;
89 //region.x = 0;
90 region.x = rowNum_sav;
\ 0049 DD7EF7 LD A,(IX-9)
\ 004C 320000 LD (region),A
91 region.y -= StrHeight;
\ 004F 210100 LD HL,region+1
\ 0052 3A0000 LD A,(StrHeight)
\ 0055 47 LD B,A
\ 0056 7E LD A,(HL)
\ 0057 90 SUB B
\ 0058 77 LD (HL),A
92 lineNum_sav = region.y;//保存当前行顶的y轴坐标
\ 0059 DD77F6 LD (IX-10),A
93 if (AsciiSelect == FONT_TYPE_SMALL)
\ 005C ?0010:
94 {
95 StrHeight = CHINESE_HEIGHT_DEF1;//一行字符的高度
96 }
97 else
\ 005C ?0011:
98 {
99 StrHeight = CHINESE_HEIGHT_DEF1;//一行字符的高度
\ 005C 3E10 LD A,16
\ 005E 320000 LD (StrHeight),A
\ 0061 FD23 INC IY
\ 0063 ?0012:
\ 0063 ?0009:
100 }
101
102 }
103
104 //汉字和ASCII的不同处理
105 if (*str >= FirstSectionCode)
\ 0063 FD7E00 LD A,(IY+0)
\ 0066 FEA1 CP 161
\ 0068 3810 JR C,?0014
\ 006A ?0013:
106 {//汉字
107 code = *(int *)str;
\ 006A FD6E00 LD L,(IY+0)
\ 006D DD75F8 LD (IX-8),L
\ 0070 FD6601 LD H,(IY+1)
\ 0073 DD74F9 LD (IX-7),H
108 str++;//汉字指针要比ASCII多加一,
109 StrHeight = CHINESE_HEIGHT_DEF1;//把当前行的高度设为汉字的高度
\ 0076 FD23 INC IY
\ 0078 180A JR ?0025
110 }
111 else
\ 007A ?0014:
112 {//ASCII
113 code = *str;
\ 007A FD4E00 LD C,(IY+0)
\ 007D DD71F8 LD (IX-8),C
\ 0080 DD36F900 LD (IX-7),0
114 //这里保证ascii码与汉字下对齐
115 /*
116 if (AsciiSelect == FONT_TYPE_SMALL)
117 {
118 region.y += (StrHeight-ASCII_SMALL_HEIGHT_DEF);
119 }
120 else
121 {
122 region.y += (StrHeight-ASCII_LARGE_HEIGHT_DEF);
123 }
124 */
125 StrHeight = CHINESE_HEIGHT_DEF1;//把当前行的高度设为汉字的高度
\ 0084 ?0025:
\ 0084 3E10 LD A,16
\ 0086 320000 LD (StrHeight),A
\ 0089 ?0015:
126 }
127 str++;
128 result = Sdrv_PutChar(code);
\ 0089 DD5EF8 LD E,(IX-8)
\ 008C DD56F9 LD D,(IX-7)
\ 008F CD0000 CALL Sdrv_PutChar
129 if (!result) //输出字符
\ 0092 B7 OR A
\ 0093 FD23 INC IY
\ 0095 2008 JR NZ,?0017
\ 0097 ?0016:
130 {
131 //当输出区域超出范围时退出
132 return lastcharpt;//返回上一个字符的指针，因为当前指针已加一了
\ 0097 DD6EFA LD L,(IX-6)
\ 009A DD66FB LD H,(IX-5)
133 }
\ 009D 181E JR ?0022
\ 009F ?0017:
134 (unsigned char)strlen--;//不理负号直接减(因为0xff时表示显示全部)
\ 009F DD35FE DEC (IX-2)
135 region.y = lineNum_sav;//恢复当前行顶y的轴坐标
\ 00A2 DD7EF6 LD A,(IX-10)
\ 00A5 320100 LD (region+1),A
136 //暂时不让某些地方显示过长
137 if ( ((unsigned char)strlen > 200) && (region.x > 188) )
\ 00A8 3EC8 LD A,200
\ 00AA DDBEFE CP (IX-2)
\ 00AD D22300 JP NC,?0002
\ 00B0 3A0000 LD A,(region)
\ 00B3 47 LD B,A
\ 00B4 3EBC LD A,188
\ 00B6 B8 CP B
\ 00B7 D22300 JP NC,?0002
\ 00BA ?0021:
\ 00BA ?0020:
\ 00BA ?0018:
138 {
139 break;
\ 00BA ?0019:
\ 00BA ?0003:
140 }
141 }
142 return str;
\ 00BA FDE5 PUSH IY
\ 00BC E1 POP HL
143 }
\ 00BD ?0022:
\ 00BD DDF9 LD SP,IX
\ 00BF DDE1 POP IX
\ 00C1 FDE1 POP IY
\ 00C3 C9 RET
\ 0000 RSEG IDATA0
\ 0000 StrHeight:
\ 0001 DEFS 1
\ 0000 RSEG CDATA0
\ 0000 08 DEFB 8
\ 0001 END
Errors: none
Warnings: none
Code size: 196
Constant size: 1
Static variable size: Data(1) Iram(0)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -