Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode_menu.asm @ 221:448478ceccea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
new sorted_gaslist_active flag register
author heinrichsweikamp
date Tue, 01 Mar 2011 11:48:11 +0100
parents b6dd54b3567c
children 3dbeacf42e9e
comparison
equal deleted inserted replaced
220:3cf6649e89ac 221:448478ceccea
250 250
251 divemenu_de_activate2_exit: 251 divemenu_de_activate2_exit:
252 bra timeout_divemenu2 ; quit underwater menu! 252 bra timeout_divemenu2 ; quit underwater menu!
253 253
254 divemenu_de_activate2_g1: 254 divemenu_de_activate2_g1:
255 read_int_eeprom d'27' ; read flag register 255 btg sorted_gaslist_active,0 ; Toggle flag
256 btg EEDATA,.0 ; Toggle flag
257 write_int_eeprom d'27' ; write flag register
258 movlw d'2' 256 movlw d'2'
259 movwf menupos ; reset cursor 257 movwf menupos ; reset cursor
260 call PLED_de_activelist ; show (de)active gaslist 258 call PLED_de_activelist ; show (de)active gaslist
261 return 259 return
262 260
263 divemenu_de_activate2_g2: 261 divemenu_de_activate2_g2:
264 read_int_eeprom d'27' ; read flag register 262 btg sorted_gaslist_active,1 ; Toggle flag
265 btg EEDATA,.1 ; Toggle flag
266 write_int_eeprom d'27' ; write flag register
267 movlw d'3' 263 movlw d'3'
268 movwf menupos ; reset cursor 264 movwf menupos ; reset cursor
269 call PLED_de_activelist ; show (de)active gaslist 265 call PLED_de_activelist ; show (de)active gaslist
270 return 266 return
271 267
272 divemenu_de_activate2_g3: 268 divemenu_de_activate2_g3:
273 read_int_eeprom d'27' ; read flag register 269 btg sorted_gaslist_active,2 ; Toggle flag
274 btg EEDATA,.2 ; Toggle flag
275 write_int_eeprom d'27' ; write flag register
276 movlw d'4' 270 movlw d'4'
277 movwf menupos ; reset cursor 271 movwf menupos ; reset cursor
278 call PLED_de_activelist ; show (de)active gaslist 272 call PLED_de_activelist ; show (de)active gaslist
279 return 273 return
280 274
281 divemenu_de_activate2_g4: 275 divemenu_de_activate2_g4:
282 read_int_eeprom d'27' ; read flag register 276 btg sorted_gaslist_active,3 ; Toggle flag
283 btg EEDATA,.3 ; Toggle flag
284 write_int_eeprom d'27' ; write flag register
285 movlw d'5' 277 movlw d'5'
286 movwf menupos ; reset cursor 278 movwf menupos ; reset cursor
287 call PLED_de_activelist ; show (de)active gaslist 279 call PLED_de_activelist ; show (de)active gaslist
288 return 280 return
289 281
290 divemenu_de_activate2_g5: 282 divemenu_de_activate2_g5:
291 read_int_eeprom d'27' ; read flag register 283 btg sorted_gaslist_active,4 ; Toggle flag
292 btg EEDATA,.4 ; Toggle flag
293 write_int_eeprom d'27' ; write flag register
294 movlw d'6' 284 movlw d'6'
295 movwf menupos ; reset cursor 285 movwf menupos ; reset cursor
296 call PLED_de_activelist ; show (de)active gaslist 286 call PLED_de_activelist ; show (de)active gaslist
297 return 287 return
298 288