Mercurial > public > hwos_code

comparison src/logbook.asm @ 502:0910c227018f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
BUGFIX: PSCR mode showed bailout gaslist instead of diluent gaslist NEW: More customviews in surface mode for PSCR mode BUGFIX: several minor graphic issues in logbook fixed
author heinrichsweikamp
date Fri, 09 Jun 2017 14:47:02 +0200
parents 989917fe2d9f
children d36f9fca10ae
comparison
equal deleted inserted replaced
501:69a98f3f3b84 502:0910c227018f
232 global logbook 232 global logbook
233 logbook: 233 logbook:
234 clrf logbook_flags 234 clrf logbook_flags
235 clrf CCP1CON ; stop PWM 235 clrf CCP1CON ; stop PWM
236 bcf PORTC,2 ; Pull PWM out to GND 236 bcf PORTC,2 ; Pull PWM out to GND
237 call TFT_ClearScreen ; Clear screen 237 call TFT_boot
238 ; call TFT_standard_color 238 ; call TFT_standard_color
239 clrf menupos3 ; Here: used rows on current logbook-page 239 clrf menupos3 ; Here: used rows on current logbook-page
240 clrf logbook_page_number ; Here: # of current displayed page 240 clrf logbook_page_number ; Here: # of current displayed page
241 clrf logbook_divenumber ; # of dive in list during search 241 clrf logbook_divenumber ; # of dive in list during search
242 clrf divemins+0 ; Here: used as temp variables 242 clrf divemins+0 ; Here: used as temp variables
399 399
400 display_profile2: 400 display_profile2:
401 ; call speed_fastest 401 ; call speed_fastest
402 clrf CCP1CON ; stop PWM 402 clrf CCP1CON ; stop PWM
403 bcf PORTC,2 ; Pull PWM out to GND 403 bcf PORTC,2 ; Pull PWM out to GND
404 call TFT_ClearScreen ; Clear screen 404 call TFT_boot
405 ;call TFT_ClearScreen ; Clear screen
405 ; Set ext_flash pointer to "#divesecs-oldest" dive 406 ; Set ext_flash pointer to "#divesecs-oldest" dive
406 ; compute read_int_eeprom .2 - divesecs 407 ; compute read_int_eeprom .2 - divesecs
407 ; Read required header data for profile display 408 ; Read required header data for profile display
408 ; look in header for pointer to begin of diveprofile (Byte 2-4) 409 ; look in header for pointer to begin of diveprofile (Byte 2-4)
409 ; Set pointer (ext_flash_log_pointer:3) to this address, start drawing 410 ; Set pointer (ext_flash_log_pointer:3) to this address, start drawing
1431 bcf all_dives_shown 1432 bcf all_dives_shown
1432 clrf menupos3 ; here: used row on current page 1433 clrf menupos3 ; here: used row on current page
1433 movlw logbook_row_number 1434 movlw logbook_row_number
1434 movwf menupos ; here: active row on current page 1435 movwf menupos ; here: active row on current page
1435 ; call TFT_DisplayOff 1436 ; call TFT_DisplayOff
1436 ; call TFT_boot 1437 call TFT_boot
1437 clrf CCP1CON ; stop PWM 1438 clrf CCP1CON ; stop PWM
1438 bcf PORTC,2 ; Pull PWM out to GND 1439 bcf PORTC,2 ; Pull PWM out to GND
1439 call TFT_ClearScreen ; clear details/profile 1440 call TFT_boot
1441 ; call TFT_ClearScreen ; clear details/profile
1440 goto logbook2 ; start search 1442 goto logbook2 ; start search
1441 1443
1442 next_logbook2: 1444 next_logbook2:
1443 btfsc all_dives_shown ; all shown 1445 btfsc all_dives_shown ; all shown
1444 goto logbook ; all reset 1446 goto logbook ; all reset
1447 movwf menupos 1449 movwf menupos
1448 incf logbook_page_number,F ; start new screen 1450 incf logbook_page_number,F ; start new screen
1449 bsf keep_cursor_new_page ; Keep cursor on "next page" 1451 bsf keep_cursor_new_page ; Keep cursor on "next page"
1450 clrf CCP1CON ; stop PWM 1452 clrf CCP1CON ; stop PWM
1451 bcf PORTC,2 ; Pull PWM out to GND 1453 bcf PORTC,2 ; Pull PWM out to GND
1452 call TFT_ClearScreen 1454 call TFT_boot
1455 ;call TFT_ClearScreen
1453 goto logbook2 ; start search 1456 goto logbook2 ; start search
1454 1457
1455 next_logbook3: 1458 next_logbook3:
1456 incf menupos,F ; +1 1459 incf menupos,F ; +1
1457 movlw logbook_row_number+.2 1460 movlw logbook_row_number+.2
1868 1871
1869 1872
1870 log_details_header: 1873 log_details_header:
1871 clrf CCP1CON ; stop PWM 1874 clrf CCP1CON ; stop PWM
1872 bcf PORTC,2 ; Pull PWM out to GND 1875 bcf PORTC,2 ; Pull PWM out to GND
1873 call TFT_ClearScreen ; Clear screen 1876 call TFT_boot
1877 ;call TFT_ClearScreen ; Clear screen
1874 1878
1875 ; Set ext_flash pointer to "#divesecs-oldest" dive 1879 ; Set ext_flash pointer to "#divesecs-oldest" dive
1876 ; compute read_int_eeprom .2 - divesecs 1880 ; compute read_int_eeprom .2 - divesecs
1877 ; Read required header data for profile display 1881 ; Read required header data for profile display
1878 ; look in header for pointer to begin of diveprofile (Byte 2-4) 1882 ; look in header for pointer to begin of diveprofile (Byte 2-4)