Mercurial > public > hwos_code
comparison src/tft_outputs.asm @ 605:5ce603c29750
gas color coding fixed
author | heinrichsweikamp |
---|---|
date | Sun, 25 Nov 2018 13:21:52 +0100 |
parents | ca4556fb60b9 |
children | d866684249bd |
comparison
equal
deleted
inserted
replaced
604:ca4556fb60b9 | 605:5ce603c29750 |
---|---|
79 retlw color_scheme_divemode_mask4 ;3 | 79 retlw color_scheme_divemode_mask4 ;3 |
80 | 80 |
81 | 81 |
82 global TFT_memo_color | 82 global TFT_memo_color |
83 TFT_memo_color: ; information, values within normal range, things without a need to react upon | 83 TFT_memo_color: ; information, values within normal range, things without a need to react upon |
84 bra TFT_standard_color ; mH (Color schemes!) | |
85 movlw color_white | 84 movlw color_white |
86 bra TFT_standard_color0 | 85 bra TFT_standard_color0 |
87 ;TFT_memo_color_dive: | 86 TFT_memo_color_dive: |
88 ; retlw color_white | 87 retlw color_white |
89 | 88 |
90 global TFT_advice_color | 89 global TFT_advice_color |
91 TFT_advice_color: ; advices to do something, but without essential need to actually do it | 90 TFT_advice_color: ; advices to do something, but without essential need to actually do it |
92 movlw color_green | 91 movlw color_green |
93 bra TFT_standard_color0 | 92 bra TFT_standard_color0 |
2050 | 2049 |
2051 TFT_active_setpoint_bail: ; bailout case | 2050 TFT_active_setpoint_bail: ; bailout case |
2052 tstfsz menupos2 ; any option shown? | 2051 tstfsz menupos2 ; any option shown? |
2053 bra TFT_active_gas_divemode_oc ; YES - do not overwrite with bailout text | 2052 bra TFT_active_gas_divemode_oc ; YES - do not overwrite with bailout text |
2054 WIN_SMALL dm_active_dil_column, dm_active_dil_row | 2053 WIN_SMALL dm_active_dil_column, dm_active_dil_row |
2055 call TFT_attention_color ; print plaint in yellow | 2054 call TFT_attention_color ; print in yellow |
2056 STRCPY_TEXT_PRINT tDiveBailout ; "Bailout" | 2055 STRCPY_TEXT_PRINT tDiveBailout ; "Bailout" |
2057 TFT_active_gas_divemode_oc: ; common part for OC and bailout | 2056 TFT_active_gas_divemode_oc: ; common part for OC and bailout |
2058 movff int_O_breathed_ppO2+0,lo ; color-code the output of the gas by the ppO2 it yields | 2057 movff int_O_breathed_ppO2+0,lo ; color-code the output of the gas by the ppO2 it yields |
2059 movff int_O_breathed_ppO2+1,hi ; | 2058 movff int_O_breathed_ppO2+1,hi ; |
2060 call TFT_color_code_ppo2 ; with ppO2 [cbar] in hi:lo | 2059 call TFT_color_code_ppo2 ; with ppO2 [cbar] in hi:lo |
4272 | 4271 |
4273 ;============================================================================= | 4272 ;============================================================================= |
4274 | 4273 |
4275 global TFT_surface_lastdive | 4274 global TFT_surface_lastdive |
4276 TFT_surface_lastdive: | 4275 TFT_surface_lastdive: |
4277 call TFT_divemask_color | 4276 call TFT_standard_color |
4278 WIN_TINY surf_gaslist_column,surf_gaslist_row+.5 | 4277 WIN_TINY surf_gaslist_column,surf_gaslist_row+.5 |
4279 STRCAT_TEXT_PRINT tLastDive ; "Last Dive:" | 4278 STRCAT_TEXT_PRINT tLastDive ; "Last Dive:" |
4280 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.1)+.5 | 4279 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.1)+.5 |
4281 STRCAT_TEXT_PRINT tDivetime ; "Divetime:" | 4280 STRCAT_TEXT_PRINT tDivetime ; "Divetime:" |
4282 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.2)+.5 | 4281 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.2)+.5 |
4283 STRCAT_TEXT_PRINT tMaxDepth ; "Max. Depth" | 4282 STRCAT_TEXT_PRINT tMaxDepth ; "Max. Depth" |
4284 call TFT_standard_color | 4283 |
4285 WIN_SMALL surf_gaslist_column+.48,surf_gaslist_row | 4284 WIN_SMALL surf_gaslist_column+.48,surf_gaslist_row |
4286 movff int_O_desaturation_time+0,lo ; bank-safe copies | 4285 movff int_O_desaturation_time+0,lo ; bank-safe copies |
4287 movff int_O_desaturation_time+1,WREG | 4286 movff int_O_desaturation_time+1,WREG |
4288 iorwf lo,W ; check if desaturation time is zero | 4287 iorwf lo,W ; check if desaturation time is zero |
4289 bz TFT_surface_lastdive_1 ; YES - show last dive time | 4288 bz TFT_surface_lastdive_1 ; YES - show last dive time |