Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/simulator.asm @ 184:016c45a0caaf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Enable to compile p2_deco.c on other platforms.
author JeanDo
date Sun, 06 Feb 2011 19:32:11 +0100
parents e26f49674956
children f15e804ff67f
comparison
equal deleted inserted replaced
183:f720ce017244 184:016c45a0caaf
156 simulator_show_decoplan: 156 simulator_show_decoplan:
157 call PLED_ClearScreen 157 call PLED_ClearScreen
158 call PLED_simdata_screen 158 call PLED_simdata_screen
159 call divemenu_see_decoplan 159 call divemenu_see_decoplan
160 160
161 WIN_LEFT .0
162 call PLED_standard_color
163
161 ; Display TTS, if any... 164 ; Display TTS, if any...
162 movff int_O_ascenttime+0,lo 165 movff int_O_ascenttime+0,lo
163 movff int_O_ascenttime+1,hi 166 movff int_O_ascenttime+1,hi
164 movf lo,W 167 movf lo,W
165 iorwf hi,W 168 iorwf hi,W
166 bz simulator_decoplan_notts 169 bz simulator_decoplan_notts
167 170
168 WIN_LEFT .0
169 WIN_TOP .160 171 WIN_TOP .160
170 call PLED_standard_color 172 lfsr FSR2, letter
171 173 OUTPUTTEXT .85 ; TTS (for translation).
172 STRCPY "TTS: " 174 STRCAT ": "
175 bsf leftbind
176 output_16
177 STRCAT_PRINT "'"
178
179 simulator_decoplan_notts:
180 movff int_I_pres_surface+0,lo
181 movff int_I_pres_surface+1,hi
182
183 WIN_TOP .190 ; Print Pamb used for compute
184 lfsr FSR2, letter
173 bsf leftbind 185 bsf leftbind
174 output_16 186 output_16
175 bcf leftbind 187 bcf leftbind
176 STRCAT_PRINT "'" 188 STRCAT_PRINT " mbar"
177 simulator_decoplan_notts:
178 189
179 WIN_INVERT .1 ; Init new Wordprocessor 190 WIN_INVERT .1 ; Init new Wordprocessor
180 DISPLAYTEXT .188 ; Sim. Results: 191 DISPLAYTEXT .188 ; Sim. Results:
181 WIN_INVERT .0 ; Init new Wordprocessor 192 WIN_INVERT .0 ; Init new Wordprocessor
182 193