darmigmar:
por tu culpa perdí 10 pesos (3.5 dolares). Es que con mi hermano le apsté Italia pero termió llegando 5ta y mi hermano que jugó a francia gano siendo 2do. (LA apuesta era de 10 pesos)
Miré el código fuente y nose si seguis escribiendo así pero la verdad que parese algo de como si estuviese escrito en una Commodore 64.
IF X7=78 THEN BEGIN
TEXTCOLOR(WHITE);
GOTOXY(31,3);
WRITE('EL GANADOR ES ');
TEXTCOLOR(RED);
WRITE('C');
TEXTCOLOR(YELLOW);
WRITE('H');
TEXTCOLOR(RED);
WRITE('N');
END;
Se acostumbra:
Constantes en mayusculas
Palabras reservadas en minusculas
Variables alternando mayusculas con minusculas (Corredor1, NotaAlta, AutoVer)
Dejar espacio despues de cada begin en el reglon de abajo para remarcar el nivel de cada bloque de esta manera:
if a > b then
begin{nivel 1}
if x < w then
begin{nivel 2}
HacerAlgo;
HecerOtro;
end;{.nivel 2}
if z < w then
begin{nivel 2}
...
...
if j < k then
begin{nivel 3}
end;{.nivel 3}
end;{.nivel 2}
end;{.nivel 1}
if b > a then {nivel 1}
asi tu codigo se connvierte en
if X7 = 78 then
begin
TextColor(WHITE);
GotoXY(31, 3);
Write('EL GANADOR ES ');
TextColor(RED);
Write('C');
TextColor(YELLOW);
Write('H');
TextColor(RED);
Write('N');
end;
por supuesto es muy personal pero, de esta manera se hace más legible para la mayoría de los programadores.
