Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/strings.asm @ 123:6a94f96e9cea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
The big cleanup, again.
author JeanDo
date Thu, 30 Dec 2010 23:45:20 +0100
parents dc349e4264bb
children cdba979821ee
comparison
equal deleted inserted replaced
122:3003a8040b78 123:6a94f96e9cea
142 VARARGS_BEGIN 142 VARARGS_BEGIN
143 VARARGS_GET8 win_leftx2 143 VARARGS_GET8 win_leftx2
144 VARARGS_GET8 win_top 144 VARARGS_GET8 win_top
145 VARARGS_END 145 VARARGS_END
146 return 146 return
147
148 ;=============================================================================
149
150 box_std_block: ; Use standard color (CF#35)
151 call PLED_standard_color
152 bra box_common
153 box_color_block: ; Use color from WREG
154 call PLED_set_color
155 bra box_common
156 box_black_block: ; Use black color
157 clrf WREG
158 movff WREG,win_color1 ; Bank-safe addressing.
159 movff WREG,win_color2
160 box_common:
161 VARARGS_BEGIN
162 VARARGS_GET8 win_top
163 VARARGS_GET8 win_height
164 VARARGS_GET8 win_leftx2
165 VARARGS_GET8 win_width
166 VARARGS_END
167 goto PLED_box
168
169 box_frame_std:
170 call PLED_standard_color
171 VARARGS_BEGIN
172 VARARGS_GET8 win_top
173 VARARGS_GET8 win_height
174 VARARGS_GET8 win_leftx2
175 VARARGS_GET8 win_width
176 VARARGS_END
177 goto PLED_frame