Un pequeño ejemplo de lo anterior
Código Delphi
[-]
processor 16F628;
cfgword cp_off,pwrte_on,wdt_off,intrc_osc_noclkout,lvp_off,bod_off;
uses delay20M;
Begin
PORTA:=0;
TRISA:=1;
PORTB:=0;
TRISB:=0;
repeat
inc(PORTB);
delay(10);
until PORTB=255;
end.
__________________
Código Delphi
[-]
try
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;