Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode.asm @ 656:5063fb9f07db

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
2.55beta release
author heinrichsweikamp
date Mon, 29 Oct 2012 20:05:59 +0100
parents 8c01edcf57fc
children ef198c1669f1
comparison
equal deleted inserted replaced
655:8c01edcf57fc 656:5063fb9f07db
1379 call write_external_eeprom 1379 call write_external_eeprom
1380 movf hi,W ; 1380 movf hi,W ;
1381 call write_external_eeprom 1381 call write_external_eeprom
1382 1382
1383 ; Gases.... 1383 ; Gases....
1384 btfsc FLAG_const_ppO2_mode
1385 bra end_dive3 ; Store diluents instead of gases
1386
1384 read_int_eeprom d'6' ; Read byte (stored in EEDATA) 1387 read_int_eeprom d'6' ; Read byte (stored in EEDATA)
1385 movf EEDATA,W 1388 movf EEDATA,W
1386 call write_external_eeprom 1389 call write_external_eeprom
1387 read_int_eeprom d'7' ; Read byte (stored in EEDATA) 1390 read_int_eeprom d'7' ; Read byte (stored in EEDATA)
1388 movf EEDATA,W 1391 movf EEDATA,W
1389 call write_external_eeprom 1392 call write_external_eeprom
1390
1391 read_int_eeprom d'10' ; Read byte (stored in EEDATA) 1393 read_int_eeprom d'10' ; Read byte (stored in EEDATA)
1392 movf EEDATA,W 1394 movf EEDATA,W
1393 call write_external_eeprom 1395 call write_external_eeprom
1394 read_int_eeprom d'11' ; Read byte (stored in EEDATA) 1396 read_int_eeprom d'11' ; Read byte (stored in EEDATA)
1395 movf EEDATA,W 1397 movf EEDATA,W
1396 call write_external_eeprom 1398 call write_external_eeprom
1397
1398 read_int_eeprom d'14' ; Read byte (stored in EEDATA) 1399 read_int_eeprom d'14' ; Read byte (stored in EEDATA)
1399 movf EEDATA,W 1400 movf EEDATA,W
1400 call write_external_eeprom 1401 call write_external_eeprom
1401 read_int_eeprom d'15' ; Read byte (stored in EEDATA) 1402 read_int_eeprom d'15' ; Read byte (stored in EEDATA)
1402 movf EEDATA,W 1403 movf EEDATA,W
1403 call write_external_eeprom 1404 call write_external_eeprom
1404
1405 read_int_eeprom d'18' ; Read byte (stored in EEDATA) 1405 read_int_eeprom d'18' ; Read byte (stored in EEDATA)
1406 movf EEDATA,W 1406 movf EEDATA,W
1407 call write_external_eeprom 1407 call write_external_eeprom
1408 read_int_eeprom d'19' ; Read byte (stored in EEDATA) 1408 read_int_eeprom d'19' ; Read byte (stored in EEDATA)
1409 movf EEDATA,W 1409 movf EEDATA,W
1410 call write_external_eeprom 1410 call write_external_eeprom
1411
1412 read_int_eeprom d'22' ; Read byte (stored in EEDATA) 1411 read_int_eeprom d'22' ; Read byte (stored in EEDATA)
1413 movf EEDATA,W 1412 movf EEDATA,W
1414 call write_external_eeprom 1413 call write_external_eeprom
1415 read_int_eeprom d'23' ; Read byte (stored in EEDATA) 1414 read_int_eeprom d'23' ; Read byte (stored in EEDATA)
1416 movf EEDATA,W 1415 movf EEDATA,W
1417 call write_external_eeprom 1416 call write_external_eeprom
1418 1417 bra end_dive4
1418
1419 end_dive3:
1420 read_int_eeprom d'96' ; Read byte (stored in EEDATA)
1421 movf EEDATA,W
1422 call write_external_eeprom
1423 read_int_eeprom d'97' ; Read byte (stored in EEDATA)
1424 movf EEDATA,W
1425 call write_external_eeprom
1426 read_int_eeprom d'98' ; Read byte (stored in EEDATA)
1427 movf EEDATA,W
1428 call write_external_eeprom
1429 read_int_eeprom d'99' ; Read byte (stored in EEDATA)
1430 movf EEDATA,W
1431 call write_external_eeprom
1432 read_int_eeprom d'100' ; Read byte (stored in EEDATA)
1433 movf EEDATA,W
1434 call write_external_eeprom
1435 read_int_eeprom d'101' ; Read byte (stored in EEDATA)
1436 movf EEDATA,W
1437 call write_external_eeprom
1438 read_int_eeprom d'102' ; Read byte (stored in EEDATA)
1439 movf EEDATA,W
1440 call write_external_eeprom
1441 read_int_eeprom d'103' ; Read byte (stored in EEDATA)
1442 movf EEDATA,W
1443 call write_external_eeprom
1444 read_int_eeprom d'104' ; Read byte (stored in EEDATA)
1445 movf EEDATA,W
1446 call write_external_eeprom
1447 read_int_eeprom d'105' ; Read byte (stored in EEDATA)
1448 movf EEDATA,W
1449 call write_external_eeprom
1450
1451 end_dive4:
1419 read_int_eeprom d'24' ; % O2 Gas6 1452 read_int_eeprom d'24' ; % O2 Gas6
1420 movf EEDATA,W 1453 movf EEDATA,W
1421 call write_external_eeprom 1454 call write_external_eeprom
1422 read_int_eeprom d'25' ; % He Gas6 1455 read_int_eeprom d'25' ; % He Gas6
1423 movf EEDATA,W 1456 movf EEDATA,W
1424 call write_external_eeprom 1457 call write_external_eeprom
1425 read_int_eeprom d'33' ; start gas 1458
1459 movlw .33 ; Start gas
1460 btfsc FLAG_const_ppO2_mode ; In CCR mode?
1461 movlw .106 ; Yes, use start Diluent instead
1462 movwf EEADR
1463 call read_eeprom
1426 movf EEDATA,W 1464 movf EEDATA,W
1427 call write_external_eeprom 1465 call write_external_eeprom
1428 1466
1429 movlw softwareversion_x ; Firmware version 1467 movlw softwareversion_x ; Firmware version
1430 call write_external_eeprom 1468 call write_external_eeprom