Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 314:c61d94186f8f @5 variant

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
@5 "Escape TTS" translations
author JeanDo
date Tue, 03 May 2011 19:41:24 +0200
parents 11be2470b9eb
children 676d18bce8d7
comparison
equal deleted inserted replaced
313:11be2470b9eb 314:c61d94186f8f
3125 ; 3125 ;
3126 PLED_show_@5: 3126 PLED_show_@5:
3127 call PLED_divemask_color ; Set Color for Divemode mask 3127 call PLED_divemask_color ; Set Color for Divemode mask
3128 3128
3129 WIN_FONT FT_SMALL 3129 WIN_FONT FT_SMALL
3130 WIN_LEFT .160-.63 ; 9 chars aligned right. 3130 WIN_LEFT .160-.70 ; 10 chars aligned right.
3131 WIN_TOP .170 3131 WIN_TOP .170
3132 STRCPY_PRINT "ExtraTime" ; Title 3132 lfsr FSR2,letter
3133 3133 OUTPUTTEXTH .305 ; "TTS in ..."
3134 WIN_LEFT .102 3134 call word_processor
3135
3136 WIN_LEFT .97
3135 WIN_TOP .194 3137 WIN_TOP .194
3136 STRCPY "@" 3138 STRCPY "@"
3137 GETCUSTOM8 d'58' 3139 GETCUSTOM8 d'58'
3138 movwf lo 3140 movwf lo
3139 bsf leftbind 3141 bsf leftbind
3140 output_8 3142 output_8
3141 bcf leftbind 3143 bcf leftbind
3142 STRCAT_PRINT "':" 3144 STRCAT_PRINT "':"
3143 3145
3144 WIN_LEFT .102+7*5 ; "@10':" is 5 chars long 3146 WIN_LEFT .97+7*5 ; "@10':" is 5 chars long
3145 call PLED_standard_color 3147 call PLED_standard_color
3146 3148
3147 lfsr FSR2,letter 3149 lfsr FSR2,letter
3148 movff int_O_extra_ascenttime+0,lo 3150 movff int_O_extra_ascenttime+0,lo
3149 movff int_O_extra_ascenttime+1,hi 3151 movff int_O_extra_ascenttime+1,hi