Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/menu_gassetup.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 aebb6d039249
children e9b7232b4f56
comparison
equal deleted inserted replaced
716:d333c8462844 717:91ae251d379f
29 29
30 menu_gassetup_prelist: 30 menu_gassetup_prelist:
31 call DISP_ClearScreen 31 call DISP_ClearScreen
32 call gassetup_sort_gaslist ; Sorts Gaslist according to change depth 32 call gassetup_sort_gaslist ; Sorts Gaslist according to change depth
33 call menu_pre_loop_common ; Clear some menu flags, timeout and switches 33 call menu_pre_loop_common ; Clear some menu flags, timeout and switches
34 call DISP_topline_box 34 call DISP_divemask_color
35 WIN_INVERT .1 ; Init new Wordprocessor
36 DISPLAYTEXT .106 ; Gas List 35 DISPLAYTEXT .106 ; Gas List
37 WIN_INVERT .0 ; Init new Wordprocessor 36 call DISP_standard_color
38 clrf decodata+0 ; Here: # of gas 0-4 37 clrf decodata+0 ; Here: # of gas 0-4
39 clrf divemins+0 ; Here: # of Gas * 4 38 clrf divemins+0 ; Here: # of Gas * 4
40 movlw d'5' 39 movlw d'5'
41 movwf waitms_temp ; here: stores row for gas list 40 movwf waitms_temp ; here: stores row for gas list
42 movlw d'2' 41 movlw d'2'
895 bra next_gas_page1 894 bra next_gas_page1
896 895
897 896
898 ; Changed v1.44se 897 ; Changed v1.44se
899 gassetup_title_bar2: 898 gassetup_title_bar2:
900 call DISP_topline_box 899 ; call DISP_topline_box
901 WIN_INVERT .1 ; Init new Wordprocessor 900 call DISP_divemask_color
902 WIN_TOP .2 901 WIN_TOP .2
903 WIN_LEFT .0 902 WIN_LEFT .0
904 lfsr FSR2,letter 903 lfsr FSR2,letter
905 OUTPUTTEXT .95 ; Gas# 904 OUTPUTTEXT .95 ; Gas#
906 movff decodata+0,lo 905 movff decodata+0,lo
990 movwf EEADR 989 movwf EEADR
991 call read_eeprom ; Low-value 990 call read_eeprom ; Low-value
992 movff EEDATA,lo 991 movff EEDATA,lo
993 output_8 992 output_8
994 STRCAT_PRINT TXT_METER2 993 STRCAT_PRINT TXT_METER2
995 994 call DISP_standard_color
996 WIN_INVERT .0 ; Init new Wordprocessor
997 return 995 return
998 996
999 gassetup_show_ppO2: 997 gassetup_show_ppO2:
1000 movf divemins+0,W 998 movf divemins+0,W
1001 addlw 0x06 999 addlw 0x06