Mercurial > public > mk2
diff code_part1/OSTC_code_asm_part1/outputs.asm @ 758:3096294bb06e
Show the bailout list in surfacemode (CC Modes)
author | heinrichsweikamp |
---|---|
date | Tue, 26 Nov 2013 12:11:23 +0100 |
parents | a98365da41d3 |
children | ae830d5e63ef |
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/outputs.asm Sun Nov 03 13:37:04 2013 +0100 +++ b/code_part1/OSTC_code_asm_part1/outputs.asm Tue Nov 26 12:11:23 2013 +0100 @@ -1393,6 +1393,38 @@ goto DISP_set_color ; grey out inactive gases! ; return +DISP_bailoutgas: ; Show the first bailout gas + WIN_TOP .25 + WIN_LEFT .90 + WIN_FONT FT_SMALL + WIN_INVERT .0 ; Init new Wordprocessor + call DISP_standard_color + lfsr FSR2,letter + OUTPUTTEXT .137 ; Bailout + call word_processor + WIN_TOP .50 + WIN_LEFT .90 + bsf leftbind + lfsr FSR2,letter + STRCAT TXT_G1_3 + movlw .6 ; Gas #1: %O2 - Set address in internal EEPROM + movwf EEADR + call read_eeprom ; get byte (stored in EEDATA) + movff EEDATA,lo ; copy to lo + output_8 ; outputs into Postinc2! + PUTC '/' + movlw .7 ; Gas #1: %He - Set address in internal EEPROM + movwf EEADR + call read_eeprom ; get byte (stored in EEDATA) + movff EEDATA,lo ; copy to lo + output_8 ; outputs into Postinc2! + bcf leftbind + call word_processor + return + +DISP_bailoutlist: ; Show the bailout list: + bra DISP_pre_dive_screen2 + ;----------------------------------------------------------------------------- ; Display Pre-Dive Screen