Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/menu_settime.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 ab2686087bce
children 91ae251d379f
comparison
equal deleted inserted replaced
680:c6220d340684 681:6e456a6398e0
23 ; known bugs: 23 ; known bugs:
24 ; ToDo: 24 ; ToDo:
25 25
26 26
27 menu_settime: 27 menu_settime:
28 call PLED_ClearScreen 28 call DISP_ClearScreen
29 call menu_pre_loop_common ; Clear some menu flags, timeout and switches 29 call menu_pre_loop_common ; Clear some menu flags, timeout and switches
30 30
31 bcf set_minutes 31 bcf set_minutes
32 bcf menubit4 32 bcf menubit4
33 bcf set_year 33 bcf set_year
34 bcf set_day 34 bcf set_day
35 bcf set_month 35 bcf set_month
36 clrf menupos2 36 clrf menupos2
37 37
38 call PLED_topline_box 38 call DISP_topline_box
39 WIN_INVERT .1 ; Init new Wordprocessor 39 WIN_INVERT .1 ; Init new Wordprocessor
40 DISPLAYTEXT .29 ; Set Time 40 DISPLAYTEXT .29 ; Set Time
41 WIN_INVERT .0 ; Init new Wordprocessor 41 WIN_INVERT .0 ; Init new Wordprocessor
42 DISPLAYTEXT .22 ; Time: 42 DISPLAYTEXT .22 ; Time:
43 DISPLAYTEXT .23 ; Date: 43 DISPLAYTEXT .23 ; Date:
92 OUTPUTTEXT .23 ; "Date: " (actual length depends on translation) 92 OUTPUTTEXT .23 ; "Date: " (actual length depends on translation)
93 93
94 movff month,convert_value_temp+0 94 movff month,convert_value_temp+0
95 movff day,convert_value_temp+1 95 movff day,convert_value_temp+1
96 movff year,convert_value_temp+2 96 movff year,convert_value_temp+2
97 call PLED_convert_date ; converts into "DD/MM/YY" or "MM/DD/YY" or "YY/MM/DD" in postinc2 97 call DISP_convert_date ; converts into "DD/MM/YY" or "MM/DD/YY" or "YY/MM/DD" in postinc2
98 STRCAT_PRINT " " 98 STRCAT_PRINT " "
99 return 99 return
100 100
101 set_time_done: ; Check date 101 set_time_done: ; Check date
102 movff month,lo ; new month 102 movff month,lo ; new month
132 set_time_done2: 132 set_time_done2:
133 WIN_LEFT .0 133 WIN_LEFT .0
134 WIN_TOP .215 134 WIN_TOP .215
135 movlw (.160-.0)/7 ; full line length, for various translations. 135 movlw (.160-.0)/7 ; full line length, for various translations.
136 movwf temp1 136 movwf temp1
137 call PLED_display_clear_common_y1 137 call DISP_display_clear_common_y1
138 138
139 movlw d'5' 139 movlw d'5'
140 movwf wait_temp 140 movwf wait_temp
141 clrf secs 141 clrf secs
142 bcf onesecupdate 142 bcf onesecupdate
186 dcfsnz menupos3,F 186 dcfsnz menupos3,F
187 bsf set_year 187 bsf set_year
188 188
189 WIN_LEFT .0 189 WIN_LEFT .0
190 WIN_TOP .215 190 WIN_TOP .215
191 call PLED_standard_color 191 call DISP_standard_color
192 lfsr FSR2,letter 192 lfsr FSR2,letter
193 OUTPUTTEXT .94 ; Set 193 OUTPUTTEXT .94 ; Set
194 194
195 movff menupos2,menupos3 195 movff menupos2,menupos3
196 decfsz menupos3,F 196 decfsz menupos3,F