Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/strings.asm @ 681:6e456a6398e0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Hardware4 support
author heinrichsweikamp
date Fri, 25 Jan 2013 18:00:49 +0100
parents cdba979821ee
children d68c6a6b1f38
comparison
equal deleted inserted replaced
680:c6220d340684 681:6e456a6398e0
146 return 146 return
147 147
148 ;============================================================================= 148 ;=============================================================================
149 149
150 box_std_block: ; Use standard color (CF#35) 150 box_std_block: ; Use standard color (CF#35)
151 call PLED_standard_color 151 call DISP_standard_color
152 bra box_common 152 bra box_common
153 box_color_block: ; Use color from WREG 153 box_color_block: ; Use color from WREG
154 call PLED_set_color 154 call DISP_set_color
155 bra box_common 155 bra box_common
156 box_black_block: ; Use black color 156 box_black_block: ; Use black color
157 clrf WREG 157 clrf WREG
158 movff WREG,win_color1 ; Bank-safe addressing. 158 movff WREG,win_color1 ; Bank-safe addressing.
159 movff WREG,win_color2 159 movff WREG,win_color2
160 movff WREG,win_color3
160 box_common: 161 box_common:
161 VARARGS_BEGIN 162 VARARGS_BEGIN
162 VARARGS_GET8 win_top 163 VARARGS_GET8 win_top
163 VARARGS_GET8 win_height 164 VARARGS_GET8 win_height
164 VARARGS_GET8 win_leftx2 165 VARARGS_GET8 win_leftx2
165 VARARGS_GET8 win_width 166 VARARGS_GET8 win_width
166 VARARGS_END 167 VARARGS_END
167 goto PLED_box 168 goto DISP_box
168 169
169 box_frame_std: 170 box_frame_std:
170 call PLED_standard_color 171 call DISP_standard_color
171 172
172 box_frame_common: 173 box_frame_common:
173 VARARGS_BEGIN 174 VARARGS_BEGIN
174 VARARGS_GET8 win_top 175 VARARGS_GET8 win_top
175 VARARGS_GET8 win_height 176 VARARGS_GET8 win_height
176 VARARGS_GET8 win_leftx2 177 VARARGS_GET8 win_leftx2
177 VARARGS_GET8 win_width 178 VARARGS_GET8 win_width
178 VARARGS_END 179 VARARGS_END
179 goto PLED_frame 180 goto DISP_frame
180 181
181 box_frame_color: 182 box_frame_color:
182 call PLED_set_color 183 call DISP_set_color
183 bra box_frame_common 184 bra box_frame_common