Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode.asm @ 532:f5a06b9e2fef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cleanup debug stuff
author heinrichsweikamp
date Sat, 17 Dec 2011 10:28:29 +0100
parents e33a8ac4b660
children 3091628b2742
comparison
equal deleted inserted replaced
531:d0f719aa5166 532:f5a06b9e2fef
720 GETCUSTOM8 d'26' 720 GETCUSTOM8 d'26'
721 movwf divisor_cns ; Reload divisor from CF 721 movwf divisor_cns ; Reload divisor from CF
722 return 722 return
723 723
724 store_dive_decodebug: 724 store_dive_decodebug:
725 ; Dump 9 bytes, int_O_DBS_bitfield .. char_O_NDL_at_20mtr 725 ; do something here
726 lfsr FSR2, int_O_DBS_bitfield
727 movf POSTINC2,W
728 call write_external_eeprom ; Store in EEPROM
729 movf POSTINC2,W
730 call write_external_eeprom ; Store in EEPROM
731 movf POSTINC2,W
732 call write_external_eeprom ; Store in EEPROM
733 movf POSTINC2,W
734 call write_external_eeprom ; Store in EEPROM
735 movf POSTINC2,W
736 call write_external_eeprom ; Store in EEPROM
737 movf POSTINC2,W
738 call write_external_eeprom ; Store in EEPROM
739 movf POSTINC2,W
740 call write_external_eeprom ; Store in EEPROM
741 movf POSTINC2,W
742 call write_external_eeprom ; Store in EEPROM
743 movf POSTINC2,W
744 call write_external_eeprom ; Store in EEPROM
745 GETCUSTOM8 d'25' 726 GETCUSTOM8 d'25'
746 movwf divisor_deco_debug ; Reload divisor from CF 727 movwf divisor_deco_debug ; Reload divisor from CF
747 return 728 return
748 729
749 store_dive_ppo2: 730 store_dive_ppo2:
1294 swapf temp1,F ; swap nibbels 0-3 with 4-7 1275 swapf temp1,F ; swap nibbels 0-3 with 4-7
1295 GETCUSTOM8 d'24' ; Divisor pp02 1276 GETCUSTOM8 d'24' ; Divisor pp02
1296 addwf temp1,W ; copy to bits 0-3, result in WREG 1277 addwf temp1,W ; copy to bits 0-3, result in WREG
1297 call write_external_eeprom 1278 call write_external_eeprom
1298 1279
1299 movlw d'9' ; information size Decodebug 1280 movlw d'0' ; information size Decodebug
1300 movwf temp1 ; copy to bits 0-3 1281 movwf temp1 ; copy to bits 0-3
1301 swapf temp1,F ; swap nibbels 0-3 with 4-7 1282 swapf temp1,F ; swap nibbels 0-3 with 4-7
1302 GETCUSTOM8 d'25' ; Divisor Decodebug 1283 GETCUSTOM8 d'25' ; Divisor Decodebug
1303 addwf temp1,W ; copy to bits 0-3, result in WREG 1284 addwf temp1,W ; copy to bits 0-3, result in WREG
1304 call write_external_eeprom 1285 call write_external_eeprom