Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 119:f24137eb85de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Background debugger now shows STKPTR
author heinrichsweikamp
date Sun, 26 Dec 2010 18:34:28 +0100
parents 14a074e1a375
children e0f29e20bd24
comparison
equal deleted inserted replaced
118:a5eacfafd37f 119:f24137eb85de
280 call word_processor 280 call word_processor
281 return 281 return
282 282
283 283
284 PLED_resetdebugger: 284 PLED_resetdebugger:
285 bcf LED_blue
286 call PLED_boot ; PLED boot 285 call PLED_boot ; PLED boot
287 call PLED_ClearScreen ; clean up OLED 286 call PLED_ClearScreen ; clean up OLED
288 call PLED_standard_color 287 call PLED_standard_color
289 WIN_INVERT .0 ; Init new Wordprocessor 288 WIN_INVERT .0 ; Init new Wordprocessor
290 289
297 WIN_LEFT .10 296 WIN_LEFT .10
298 WIN_FONT FT_SMALL 297 WIN_FONT FT_SMALL
299 WIN_INVERT .0 ; Init new Wordprocessor 298 WIN_INVERT .0 ; Init new Wordprocessor
300 call PLED_standard_color 299 call PLED_standard_color
301 lfsr FSR2,letter 300 lfsr FSR2,letter
301 movff temp10,lo
302 output_8
303 movlw ' '
304 movwf POSTINC2
302 movf debug_char+0,W 305 movf debug_char+0,W
303 movwf POSTINC2 306 movwf POSTINC2
304 movf debug_char+1,W 307 movf debug_char+1,W
305 movwf POSTINC2 308 movwf POSTINC2
306 movf debug_char+2,W 309 movf debug_char+2,W
375 movwf POSTINC2 378 movwf POSTINC2
376 movff flag12,lo 379 movff flag12,lo
377 output_8 380 output_8
378 call word_processor 381 call word_processor
379 382
383 bcf switch_left
380 PLED_resetdebugger_loop: 384 PLED_resetdebugger_loop:
381 btfss switch_left 385 btfss switch_left
382 bra PLED_resetdebugger_loop ; Loop 386 bra PLED_resetdebugger_loop ; Loop
383 bcf LED_red
384 return 387 return
385 388
386 PLED_divemode_mask: ; Displays mask in Dive-Mode 389 PLED_divemode_mask: ; Displays mask in Dive-Mode
387 call PLED_divemask_color ; Set Color for Divemode mask 390 call PLED_divemask_color ; Set Color for Divemode mask
388 DISPLAYTEXTH .267 ; Max. 391 DISPLAYTEXTH .267 ; Max.
647 WIN_FONT FT_SMALL 650 WIN_FONT FT_SMALL
648 return 651 return
649 652
650 653
651 PLED_diveclock: 654 PLED_diveclock:
652 call PLED_divemask_color ; Set Color for Divemode mask 655 call PLED_divemask_color ; Set Color for Divemode mask
653 DISPLAYTEXT d'255' ; Clock 656 DISPLAYTEXT d'255' ; Clock
654 call PLED_standard_color 657 call PLED_standard_color
655 658
656 PLED_diveclock2: 659 PLED_diveclock2:
657 ; GETCUSTOM8 d'39' ; =1: Show clock in Divemode
658 ; movwf lo
659 ; movlw d'1'
660 ; cpfseq lo ; =1?
661 ; return ; No, Done.
662
663 ; btfsc menubit ; is the Dive mode menu displayed?
664 ; return ; Yes
665
666 WIN_TOP .192 660 WIN_TOP .192
667 WIN_LEFT .123 661 WIN_LEFT .123
668 WIN_FONT FT_SMALL 662 WIN_FONT FT_SMALL
669 WIN_INVERT .0 ; Init new Wordprocessor 663 WIN_INVERT .0 ; Init new Wordprocessor
670 call PLED_standard_color 664 call PLED_standard_color
2413 2407
2414 WIN_TOP .216 2408 WIN_TOP .216
2415 WIN_LEFT .110 2409 WIN_LEFT .110
2416 WIN_FONT FT_SMALL 2410 WIN_FONT FT_SMALL
2417 call PLED_standard_color 2411 call PLED_standard_color
2418
2419 2412
2420 lfsr FSR2,letter 2413 lfsr FSR2,letter
2421 movff avr_rel_pressure+0,lo 2414 movff avr_rel_pressure+0,lo
2422 movff avr_rel_pressure+1,hi 2415 movff avr_rel_pressure+1,hi
2423 call adjust_depth_with_salinity ; computes salinity setting into lo:hi [mBar] 2416 call adjust_depth_with_salinity ; computes salinity setting into lo:hi [mBar]