Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/menu_gassetup.asm @ 41:3ab1188651af

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
1.63 in work...
author heinrichsweikamp
date Sun, 20 Jun 2010 17:16:32 +0200
parents 3c38ba950dfb
children 475a9e536d77
comparison
equal deleted inserted replaced
40:92001c045088 41:3ab1188651af
1252 movff logbook_temp1,EEDATA ; Change depth -> EEDATA 1252 movff logbook_temp1,EEDATA ; Change depth -> EEDATA
1253 write_int_eeprom d'28' ; Write Change Depth Gas 1 1253 write_int_eeprom d'28' ; Write Change Depth Gas 1
1254 return 1254 return
1255 1255
1256 gassetup_sort_sort: 1256 gassetup_sort_sort:
1257 clrf logbook_temp2 ; Gas (0-4) 1257 clrf logbook_temp2 ; Gas (0-4)
1258 clrf logbook_temp1 ; Here: Change depth in m 1258 clrf logbook_temp1 ; Here: Change depth in m
1259 clrf logbook_temp3 ; Gas (0-4) 1259 clrf logbook_temp3 ; Gas (0-4)
1260 1260
1261 lfsr FSR2,letter+.20 ; Change depths... 1261 lfsr FSR2,letter+.20 ; Change depths...
1262 gassetup_sort_gaslist2: 1262 gassetup_sort_gaslist2:
1263 movf POSTINC2,W ; Get Change depth into WREG 1263 movf POSTINC2,W ; Get Change depth into WREG
1264 1264
1265 cpfsgt logbook_temp4 ; logbook_temp4 < W? Here: Change depth of last sort run 1265 cpfsgt logbook_temp4 ; logbook_temp4 < W? Here: Change depth of last sort run
1266 bra gassetup_sort_gaslist3 ; Skip, tested depth > max. Depth from last run 1266 bra gassetup_sort_gaslist3 ; Skip, tested depth > max. Depth from last run