Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/altimeter.asm @ 717:91ae251d379f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"ostc3-style" menu titles
author heinrichsweikamp
date Thu, 23 May 2013 10:59:34 +0200
parents 6e456a6398e0
children a5d44fb115a8
comparison
equal deleted inserted replaced
716:d333c8462844 717:91ae251d379f
108 btfss WREG,0 ; Enabled ? 108 btfss WREG,0 ; Enabled ?
109 return ; NO: return 109 return ; NO: return
110 110
111 WIN_TOP .35 ; Custom view drawing zone... 111 WIN_TOP .35 ; Custom view drawing zone...
112 WIN_LEFT .90 112 WIN_LEFT .90
113 WIN_INVERT .0
114 WIN_FONT .0 113 WIN_FONT .0
115 call DISP_standard_color 114 call DISP_standard_color
116 115
117 STRCPY TXT_ALT5 116 STRCPY TXT_ALT5
118 117
228 bnz altimeter_menu_1 ; Yes: skip reset... 227 bnz altimeter_menu_1 ; Yes: skip reset...
229 rcall altimeter_reset 228 rcall altimeter_reset
230 229
231 altimeter_menu_1: 230 altimeter_menu_1:
232 call DISP_ClearScreen ; Menu header. 231 call DISP_ClearScreen ; Menu header.
232 call DISP_divemask_color
233 DISPLAYTEXTH .288 ; Title bar
233 call DISP_standard_color 234 call DISP_standard_color
234 call DISP_topline_box
235 WIN_INVERT .1 ; Init new Wordprocessor
236 DISPLAYTEXTH .288 ; Title bar
237 235
238 movlw 2 ; Start menu on line 2. 236 movlw 2 ; Start menu on line 2.
239 movwf menupos 237 movwf menupos
240 238
241 altimeter_menu_2: 239 altimeter_menu_2:
242 WIN_INVERT 0
243 WIN_FONT 0 240 WIN_FONT 0
244 WIN_LEFT .20 ; First line: 241 WIN_LEFT .20 ; First line:
245 WIN_TOP .35 242 WIN_TOP .35
246 lfsr FSR2,letter 243 lfsr FSR2,letter
247 OUTPUTTEXTH .289 ; Sea ref: 244 OUTPUTTEXTH .289 ; Sea ref: