Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 370:61742b3ef842 64kByte Logbook

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged with dive interval
author JeanDo
date Fri, 10 Jun 2011 01:31:39 +0200
parents 544a96faa9f3 93c0cb14b0d2
children f2d5d93b4ca3
comparison
equal deleted inserted replaced
367:584741726190 370:61742b3ef842
513 ; Update simulator menu with time/depth 513 ; Update simulator menu with time/depth
514 ; Note: because translations might change a bit the string length, we reprint 514 ; Note: because translations might change a bit the string length, we reprint
515 ; that part of the mask to be sure the numbers fit in the right places. 515 ; that part of the mask to be sure the numbers fit in the right places.
516 PLED_simulator_data: 516 PLED_simulator_data:
517 WIN_LEFT .20 517 WIN_LEFT .20
518 WIN_TOP .65 518 WIN_FONT FT_SMALL
519 WIN_FONT FT_SMALL 519 call PLED_standard_color
520 call PLED_standard_color 520
521 lfsr FSR2,letter 521 ;---- Updates interval line ----------------------------------------------
522 WIN_TOP .35
523 lfsr FSR2,letter
524 OUTPUTTEXTH .307 ; Interval:
525
526 movff char_I_dive_interval,lo
527 movf lo,W
528 bnz PLED_simulator_data_1
529 OUTPUTTEXTH .308 ; Now
530 clrf POSTINC2 ; End buffer.
531 bra PLED_simulator_data_2
532
533 PLED_simulator_data_1:
534 bsf leftbind
535 output_8
536 STRCAT "0min"
537
538 PLED_simulator_data_2:
539 call word_processor
540
541 ;---- Updates bottom time line -------------------------------------------
542 WIN_TOP .95
543 lfsr FSR2,letter
522 OUTPUTTEXTH .277 ; Bottom Time: 544 OUTPUTTEXTH .277 ; Bottom Time:
523 545
524 movff logbook_temp1,lo 546 movff logbook_temp1,lo
525 bsf leftbind 547 bsf leftbind
526 output_8 548 output_8
527 bcf leftbind
528 STRCAT_PRINT "min " 549 STRCAT_PRINT "min "
529 550
530 WIN_LEFT .20 551 ;---- Updates depth line -------------------------------------------------
531 WIN_TOP .95 552 WIN_TOP .125
532 lfsr FSR2,letter 553 lfsr FSR2,letter
533 OUTPUTTEXTH .278 ; Max. Depth: 554 OUTPUTTEXTH .278 ; Max. Depth:
534 555
535 movff logbook_temp2,lo 556 movff logbook_temp2,lo
536 bsf leftbind 557 bsf leftbind
537 output_8 558 output_8
538 bcf leftbind
539 STRCAT_PRINT "m " 559 STRCAT_PRINT "m "
560
561 bcf leftbind
540 return 562 return
541 563
542 ;============================================================================= 564 ;=============================================================================
543 565
544 PLED_display_velocity: 566 PLED_display_velocity:
930 952
931 PLED_simulator_mask: 953 PLED_simulator_mask:
932 call PLED_topline_box 954 call PLED_topline_box
933 WIN_INVERT .1 ; Init new Wordprocessor 955 WIN_INVERT .1 ; Init new Wordprocessor
934 DISPLAYTEXT .248 ; OSTC Simulator 956 DISPLAYTEXT .248 ; OSTC Simulator
935 WIN_INVERT .0 ; Init new Wordprocessor 957 WIN_INVERT .0 ; Init new Wordprocessor
936 DISPLAYTEXT .249 ; Start Dive 958 DISPLAYTEXTH .307 ; Interval:
937 DISPLAYTEXTH .277 ; Bottom Time: 959 DISPLAYTEXT .249 ; Start Dive
938 DISPLAYTEXTH .278 ; Max. Depth: 960 DISPLAYTEXTH .277 ; Bottom Time:
939 DISPLAYTEXTH .279 ; Calculate Deco 961 DISPLAYTEXTH .278 ; Max. Depth:
940 DISPLAYTEXTH .280 ; Show Decoplan 962 DISPLAYTEXTH .279 ; Calculate Deco
941 DISPLAYTEXT .11 ; Exit 963 DISPLAYTEXT .11 ; Exit
942 return 964 return
943 965
944 PLED_temp_surfmode: 966 PLED_temp_surfmode:
945 ostc_debug 'e' 967 ostc_debug 'e'
946 SAFE_2BYTE_COPY temperature, last_temperature 968 SAFE_2BYTE_COPY temperature, last_temperature