Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 133:35567a646fe5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor merge fixes...
author JeanDo
date Wed, 05 Jan 2011 12:24:58 +0100
parents 03df42de03e1
children 5c8569f95d7e
comparison
equal deleted inserted replaced
132:49bb155ddfbf 133:35567a646fe5
2581 PLED_tsg_1: 2581 PLED_tsg_1:
2582 WIN_FRAME_STD .169, .239, .90, .159 ; Divemode 2582 WIN_FRAME_STD .169, .239, .90, .159 ; Divemode
2583 PLED_tsg_2: 2583 PLED_tsg_2:
2584 2584
2585 ;---- Draw grid ---------------------------------------------------------- 2585 ;---- Draw grid ----------------------------------------------------------
2586 btfss divemode
2587 bra PLED_no_graph_grid
2588
2586 movlw color_grey 2589 movlw color_grey
2587 call PLED_set_color 2590 call PLED_set_color
2588 2591
2589 movlw .25+.1 ; surfmode
2590 btfsc divemode
2591 movlw .169+.1 ; divemode 2592 movlw .169+.1 ; divemode
2592 movff WREG,win_top 2593 movff WREG,win_top
2593
2594 movlw .120-.25-.1 ; surfmode
2595 btfsc divemode
2596 movlw .239-.169-.1 ; divemode 2594 movlw .239-.169-.1 ; divemode
2597 movff WREG,win_height 2595 movff WREG,win_height
2598 2596
2599 movlw 1 2597 movlw 1
2600 movff WREG,win_width 2598 movff WREG,win_width
2609 movff WREG,win_leftx2 2607 movff WREG,win_leftx2
2610 call PLED_box 2608 call PLED_box
2611 movlw .149 2609 movlw .149
2612 movff WREG,win_leftx2 2610 movff WREG,win_leftx2
2613 call PLED_box 2611 call PLED_box
2612 PLED_no_graph_grid:
2614 2613
2615 ;---- Draw N2 Tissues ---------------------------------------------------- 2614 ;---- Draw N2 Tissues ----------------------------------------------------
2616 lfsr FSR2, char_O_tissue_saturation+.000 ; N2 2615 lfsr FSR2, char_O_tissue_saturation+.000 ; N2
2617 movlw d'16' 2616 movlw d'16'
2618 movwf wait_temp ; 16 tissues 2617 movwf wait_temp ; 16 tissues
2621 call PLED_standard_color 2620 call PLED_standard_color
2622 movlw .1 2621 movlw .1
2623 movff WREG,win_height ; row bottom (0-239) 2622 movff WREG,win_height ; row bottom (0-239)
2624 movlw .82+.18 ; surfmode 2623 movlw .82+.18 ; surfmode
2625 btfsc divemode 2624 btfsc divemode
2626 movlw .90+.10 ; divemode 2625 movlw .90+.18 ; divemode
2627 movff WREG,win_leftx2 ; column left (0-159) 2626 movff WREG,win_leftx2 ; column left (0-159)
2628 2627
2629 PLED_tissue_saturation_graph3: 2628 PLED_tissue_saturation_graph3:
2630 movlw .25+3 ; surfmode: 3pix below top border 2629 movlw .25+3 ; surfmode: 3pix below top border
2631 btfsc divemode 2630 btfsc divemode
2639 movf POSTINC2,W 2638 movf POSTINC2,W
2640 bcf STATUS,C ; Clear carry 2639 bcf STATUS,C ; Clear carry
2641 rrcf WREG ; And divide by 4 2640 rrcf WREG ; And divide by 4
2642 bcf STATUS,C 2641 bcf STATUS,C
2643 rrcf WREG 2642 rrcf WREG
2644 movff WREG,win_width 2643 movwf temp1
2645 movlw d'57' ; limit display 2644
2646 cpfslt win_width ; skip if 157 (WREG) < box_temp+4 2645 movlw .57 ; surfmode: max 57pix
2647 movwf win_width 2646 btfsc divemode
2647 movlw .57-8 ; divemode: 8pix less...s
2648 cpfslt temp1 ; skip if 57 (WREG) < win_width
2649 movwf temp1
2650 movff temp1,win_width
2648 2651
2649 call PLED_box 2652 call PLED_box
2650 2653
2651 decfsz wait_temp,F 2654 decfsz wait_temp,F
2652 bra PLED_tissue_saturation_graph3 2655 bra PLED_tissue_saturation_graph3
2671 movf POSTINC2,W 2674 movf POSTINC2,W
2672 bcf STATUS,C ; Clear carry 2675 bcf STATUS,C ; Clear carry
2673 rrcf WREG ; And divide by 4 2676 rrcf WREG ; And divide by 4
2674 bcf STATUS,C 2677 bcf STATUS,C
2675 rrcf WREG 2678 rrcf WREG
2676 movff WREG,win_width 2679 movwf temp1
2677 movlw d'57' ; limit display 2680 movlw .57 ; surfmode: max 57pix
2678 cpfslt win_width ; skip if 157 (WREG) < box_temp+4 2681 btfsc divemode
2679 movwf win_width 2682 movlw .57-8 ; divemode: 8pix less...s
2683 cpfslt temp1 ; skip if 57 (WREG) < win_width
2684 movwf temp1
2685 movff temp1,win_width
2680 2686
2681 call PLED_box 2687 call PLED_box
2682 2688
2683 decfsz wait_temp,F 2689 decfsz wait_temp,F
2684 bra PLED_tissue_saturation_graph2 2690 bra PLED_tissue_saturation_graph2