Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 127:245de99d1d15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
FIX SetPoint list color.
author JeanDo
date Tue, 04 Jan 2011 02:49:15 +0100
parents 2907b42c195b
children 4c588c3d1f12 06c4899ddb4b
comparison
equal deleted inserted replaced
126:ed275788a291 127:245de99d1d15
1162 1162
1163 PLED_pre_dive_screen3: 1163 PLED_pre_dive_screen3:
1164 WIN_LEFT .90 1164 WIN_LEFT .90
1165 WIN_FONT FT_SMALL 1165 WIN_FONT FT_SMALL
1166 bsf leftbind 1166 bsf leftbind
1167 call PLED_standard_color
1167 1168
1168 ; list three SP in Gaslist 1169 ; list three SP in Gaslist
1169 movlw d'35' ; 36 = current SP position in EEPROM 1170 movlw d'35' ; 36 = current SP position in EEPROM
1170 movwf wait_temp ; here: stores eeprom address for gas list 1171 movwf wait_temp ; here: stores eeprom address for gas list
1171 movlw d'0' 1172 movlw d'0'
1199 read_int_eeprom d'33' ; Read byte (stored in EEDATA) 1200 read_int_eeprom d'33' ; Read byte (stored in EEDATA)
1200 movff EEDATA,active_gas ; Read start gas (1-5) 1201 movff EEDATA,active_gas ; Read start gas (1-5)
1201 decf active_gas,W ; Gas 0-4 1202 decf active_gas,W ; Gas 0-4
1202 mullw d'4' 1203 mullw d'4'
1203 movf PRODL,W 1204 movf PRODL,W
1204 addlw d'7' ; = address for He ratio
1205 movwf EEADR
1206 call read_eeprom ; Read He ratio
1207 movff EEDATA,hi ; And copy into hold register
1208 decf active_gas,W ; Gas 0-4
1209 mullw d'4'
1210 movf PRODL,W
1211 addlw d'6' ; = address for O2 ratio 1205 addlw d'6' ; = address for O2 ratio
1212 movwf EEADR 1206 movwf EEADR
1213 call read_eeprom ; Read O2 ratio 1207 call read_eeprom ; Read O2 ratio
1214 movff EEDATA, lo ; O2 ratio 1208 movff EEDATA, lo ; O2 ratio
1209 incf EEADR,F ; = address for He
1210 call read_eeprom ; Read He ratio
1211 movff EEDATA,hi ; And copy into hold register
1215 1212
1216 WIN_LEFT .90 1213 WIN_LEFT .90
1217 WIN_TOP .100 1214 WIN_TOP .100
1218 STRCPY "Dil:" 1215 STRCPY "Dil:"
1219 output_8 ; O2 Ratio 1216 output_8 ; O2 Ratio
2475 2472
2476 PLED_splist_start: 2473 PLED_splist_start:
2477 WIN_LEFT .100 2474 WIN_LEFT .100
2478 WIN_FONT FT_SMALL 2475 WIN_FONT FT_SMALL
2479 bsf leftbind 2476 bsf leftbind
2477 call PLED_standard_color
2480 2478
2481 ; list three SP in Gaslist 2479 ; list three SP in Gaslist
2482 movlw d'35' ; 36 = current SP position in EEPROM 2480 movlw d'35' ; 36 = current SP position in EEPROM
2483 movwf wait_temp ; here: stores eeprom address for gas list 2481 movwf wait_temp ; here: stores eeprom address for gas list
2484 movlw d'231' 2482 movlw d'231'