Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/menu_gassetup.asm @ 576:ab2686087bce

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
faster font display, code cleaning
author heinrichsweikamp
date Sun, 22 Apr 2012 14:38:10 +0200
parents cbdcbbc91877
children 2cecac640202
comparison
equal deleted inserted replaced
575:cbdcbbc91877 576:ab2686087bce
28 movwf menupos 28 movwf menupos
29 29
30 menu_gassetup_prelist: 30 menu_gassetup_prelist:
31 call PLED_ClearScreen 31 call PLED_ClearScreen
32 call gassetup_sort_gaslist ; Sorts Gaslist according to change depth 32 call gassetup_sort_gaslist ; Sorts Gaslist according to change depth
33 clrf timeout_counter2 33 call menu_pre_loop_common ; Clear some menu flags, timeout and switches
34 bcf sleepmode
35 bcf menubit2
36 bcf menubit3
37 call PLED_topline_box 34 call PLED_topline_box
38 WIN_INVERT .1 ; Init new Wordprocessor 35 WIN_INVERT .1 ; Init new Wordprocessor
39 DISPLAYTEXT .106 ; Gas List 36 DISPLAYTEXT .106 ; Gas List
40 WIN_INVERT .0 ; Init new Wordprocessor 37 WIN_INVERT .0 ; Init new Wordprocessor
41 clrf decodata+0 ; Here: # of gas 0-4 38 clrf decodata+0 ; Here: # of gas 0-4
275 menu_gassetup_page1: 272 menu_gassetup_page1:
276 movlw d'1' 273 movlw d'1'
277 movwf menupos 274 movwf menupos
278 bcf gas_setup_page2 ; Page 1 of gassetup 275 bcf gas_setup_page2 ; Page 1 of gassetup
279 bcf menubit4 276 bcf menubit4
280 bcf cursor
281 bcf sleepmode 277 bcf sleepmode
282 bcf first_FA ; Here: =1: -, =0: + 278 bcf first_FA ; Here: =1: -, =0: +
283 279
284 menu_gassetup0: 280 menu_gassetup0:
285 call PLED_ClearScreen 281 call PLED_ClearScreen
286 DISPLAYTEXT .147 ; More... 282 DISPLAYTEXT .147 ; More...
287 DISPLAYTEXT .11 ; Exit 283 DISPLAYTEXT .11 ; Exit
288 284
289 menu_gassetup1: 285 menu_gassetup1:
290 clrf timeout_counter2 286 call menu_pre_loop_common ; Clear some menu flags, timeout and switches
291 bcf menubit2
292 bcf menubit3
293 287
294 rcall gassetup_title_bar2 ; Displays the title bar with the current Gas info 288 rcall gassetup_title_bar2 ; Displays the title bar with the current Gas info
295 289
296 WIN_LEFT .20 290 WIN_LEFT .20
297 WIN_TOP .65 291 WIN_TOP .65
619 bcf second_FA ; Here: =1: Is first gas 613 bcf second_FA ; Here: =1: Is first gas
620 DISPLAYTEXT .107 ; Depth +/- 614 DISPLAYTEXT .107 ; Depth +/-
621 DISPLAYTEXT .11 ; Exit 615 DISPLAYTEXT .11 ; Exit
622 616
623 next_gas_page1: 617 next_gas_page1:
624 clrf timeout_counter2 618 call menu_pre_loop_common ; Clear some menu flags, timeout and switches
625 bcf menubit2
626 bcf menubit3
627 619
628 WIN_TOP .65 620 WIN_TOP .65
629 WIN_LEFT .20 621 WIN_LEFT .20
630 lfsr FSR2,letter 622 lfsr FSR2,letter
631 OUTPUTTEXT .88 ; First Gas? 623 OUTPUTTEXT .88 ; First Gas?