Hi, Boroko
Here's an example of what I usually do ...
Looks EXACTLY what Darrel told you ... no ???Code:mesure VAR WORD duree VAR WORD dureeprog VAR WORD dureeral VAR WORD dureesafe VAR WORD echantillon VAR WORD lastok VAR WORD delay VAR BYTE wrong VAR BYTE ohoh VAR BYTE side VAR BIT flagbougie VAR BIT battok VAR BIT dejavu VAR BIT PORTA = 0 PORTB = 0 'Pour 16F628 CMCON = 7 CCP1CON = 0 ' End of Config. '****************************************************************************** ' EEPROM checking '****************************************************************************** Read 2,dureeprog.lowbyte Read 1,dureeprog.highbyte Read 3,side Read 5,dureesafe.lowbyte Read 4,dureesafe.highbyte Read 7,dureeral.lowbyte Read 6,dureeral.highbyte ' Read 8,flagbougie 'Seulement si déverrouillé, sinon 0 IF ( dureeprog <> $FFFF ) AND ( dureesafe <> $FFFF ) AND ( dureeral <> $FFFF ) Then lastok = dureesafe ' If memory programmed flagbougie = 0 ' Start on locked position ... for safety. GoTo locked ' Starting address EndIF '****************************************************************************** ' Measure of programming pulse '****************************************************************************** IF reset = 0 Then mesurepro ' If jumper ON jump to programming mode '****************************************************************************** ' Check if programming jumper ON and lock if not '****************************************************************************** oubli: error = 1 Pause 50 error = 0 Pause 50 GoTo oubli '******************************************************************** mesurepro: ' Programming mode led = 1 : error = 1 mesurepro1: Pause 50 led = 0 : error = 0 ... ...
Alain





Bookmarks