Hi Tony,

Here is the code that I used for the "El Cheapo" programmer I wrote about a
few weeks ago on:

http://www.rentron.com

Erase()                         //  Erase the 16F84's Program Memory
{                               //   Procedure Documented in DS30262A

int  i;


  PowerUp();

  CMDWrite( 0, 0x03FFF );       //  Code Protect Defeat Code
  for ( i = 0; i < 7; i++ )
    CMDSend( 6 );
  CMDSend( 1 );
  CMDSend( 7 );
  CMDSend( 8 );
  RTCDlay();                    //  Use the Long Delay
  CMDSend( 1 );
  CMDSend( 7 );

  RTCDlay();                    //  Wait for Everything to Complete

  PowerDown();

}  //  End Erase

It was taken directly from Microchip document DS30262A.  "CMDSend" sends the
six bit command string and "CMDWrite" sends the six bit command string with
a 14 bit data word (which is shifted up by two to get a sixteen bit word
that is serially sent to the PICMicro).

Good luck,

myke

-----Original Message-----
From: Tony Nixon <Tony.Nixon@ENG.MONASH.EDU.AU>
To: PICLIST@MITVMA.MIT.EDU <PICLIST@MITVMA.MIT.EDU>
Date: Monday, May 31, 1999 9:46 PM
Subject: Erasing


Hi all,

I bookmarked this URL for erasing PIC 16F84's that so I could use the
info later, but it has dissappered. It appeared on this list a few weeks
ago.

http://www.ee.oulu.fi/~lapi/KissPIC/erasepic.html

Does anyone else have the method of bulk erasing that was posted here.

--
Best regards

Tony

PicNPoke - Multimedia 16F84 Beginners PIC Tools.

http://www.picnpoke.com
Email picnpoke@cdi.com.au