Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode.asm @ 630:6526a5b058b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fill char_O_deco_time_for_log array with stop times
author heinrichsweikamp
date Fri, 07 Sep 2012 14:48:31 +0200
parents 8d2dc109ecfc
children 6cbdfd1b9dcf
comparison
equal deleted inserted replaced
629:e755ed869a3b 630:6526a5b058b7
713 movlw d'3' ; Information length 713 movlw d'3' ; Information length
714 addwf ProfileFlagByte,F ; add to ProfileFlagByte 714 addwf ProfileFlagByte,F ; add to ProfileFlagByte
715 check_extended4: 715 check_extended4:
716 decfsz divisor_deco_debug,W; Check divisor 716 decfsz divisor_deco_debug,W; Check divisor
717 bra check_extended5 717 bra check_extended5
718 movlw d'9' ; Information length 718 movlw d'15' ; Information length
719 addwf ProfileFlagByte,F ; add to ProfileFlagByte 719 addwf ProfileFlagByte,F ; add to ProfileFlagByte
720 check_extended5: 720 check_extended5:
721 decfsz divisor_cns,W ; Check divisor 721 decfsz divisor_cns,W ; Check divisor
722 bra check_extended6 722 bra check_extended6
723 movlw d'1' ; Information length 723 movlw d'1' ; Information length
847 GETCUSTOM8 d'26' 847 GETCUSTOM8 d'26'
848 movwf divisor_cns ; Reload divisor from CF 848 movwf divisor_cns ; Reload divisor from CF
849 return 849 return
850 850
851 store_dive_decodebug: 851 store_dive_decodebug:
852 ; do something here 852 movff char_O_deco_time_for_log+.0,WREG ; 3m
853 call write_external_eeprom
854 movff char_O_deco_time_for_log+.1,WREG
855 call write_external_eeprom
856 movff char_O_deco_time_for_log+.2,WREG
857 call write_external_eeprom
858 movff char_O_deco_time_for_log+.3,WREG
859 call write_external_eeprom
860 movff char_O_deco_time_for_log+.4,WREG
861 call write_external_eeprom
862 movff char_O_deco_time_for_log+.5,WREG
863 call write_external_eeprom
864 movff char_O_deco_time_for_log+.6,WREG
865 call write_external_eeprom
866 movff char_O_deco_time_for_log+.7,WREG
867 call write_external_eeprom
868 movff char_O_deco_time_for_log+.8,WREG
869 call write_external_eeprom
870 movff char_O_deco_time_for_log+.9,WREG
871 call write_external_eeprom
872 movff char_O_deco_time_for_log+.10,WREG
873 call write_external_eeprom
874 movff char_O_deco_time_for_log+.11,WREG
875 call write_external_eeprom
876 movff char_O_deco_time_for_log+.12,WREG
877 call write_external_eeprom
878 movff char_O_deco_time_for_log+.13,WREG
879 call write_external_eeprom
880 movff char_O_deco_time_for_log+.14,WREG ; 45m
881 call write_external_eeprom
853 GETCUSTOM8 d'25' 882 GETCUSTOM8 d'25'
854 movwf divisor_deco_debug ; Reload divisor from CF 883 movwf divisor_deco_debug ; Reload divisor from CF
855 return 884 return
856 885
857 store_dive_ppo2: 886 store_dive_ppo2:
1439 swapf temp1,F ; swap nibbels 0-3 with 4-7 1468 swapf temp1,F ; swap nibbels 0-3 with 4-7
1440 GETCUSTOM8 d'24' ; Divisor pp02 1469 GETCUSTOM8 d'24' ; Divisor pp02
1441 addwf temp1,W ; copy to bits 0-3, result in WREG 1470 addwf temp1,W ; copy to bits 0-3, result in WREG
1442 call write_external_eeprom 1471 call write_external_eeprom
1443 1472
1444 movlw d'0' ; information size Decodebug 1473 movlw d'15' ; information size Decodebug
1445 movwf temp1 ; copy to bits 0-3 1474 movwf temp1 ; copy to bits 0-3
1446 swapf temp1,F ; swap nibbels 0-3 with 4-7 1475 swapf temp1,F ; swap nibbels 0-3 with 4-7
1447 GETCUSTOM8 d'25' ; Divisor Decodebug 1476 GETCUSTOM8 d'25' ; Divisor Decodebug
1448 addwf temp1,W ; copy to bits 0-3, result in WREG 1477 addwf temp1,W ; copy to bits 0-3, result in WREG
1449 call write_external_eeprom 1478 call write_external_eeprom