Cita:
Empezado por Neftali
|
Código Delphi
[-]
Mamu.First;
while NOT(Mamu.Loco) do
begin
HacerReportes('ComoUnaMulaDeCarga');
Mamu.Next;
end;
Código Delphi
[-]try
Descansar(Mamu);
except
HacerReportes('ComoUnaMulaDeCarga');
end;
Código Delphi
[-]asm
Mamu: JMP HacerReporte
HacerReport: MulaDeCarga,1
goto Mamu
end;
Código Delphi
[-]if Mamu.Loco=False
then HacerReportes('ComoUnaMulaDeCarga')
else Valium(500);
__________________
Código Delphi
[-]
try
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;