Reprise du message précédent :
mais dites moi, ca feature sec, ce soir !

Zion a écrit a écrit :     Ouaiii, une seule ligne

 
ah, un duel d'expert sur l'identation en pascal, rien de tel pour occuper ses soirées !

voila ca devrait être bon

ceci dit antp, j'ai pas ta word list pour le pascal

[pascal]
if machin then
bidule;
[/pascal]
 
[pascal]
if machin then
begin
bidule;
end;
[/pascal]
 
 
[pascal]
if machin then
begin
while truc do
begin
bidule;
end;
end;
[/pascal]
 
[pascal]
if machin then
begin
bidule;
end
else
begin
chose;
end;
[/pascal]

joce a écrit a écrit : ceci dit antp, j'ai pas ta word list pour le pascal

 
ARRAY
BEGIN
CASE CLASS CONST CONSTRUCTOR
DESTRUCTOR DOWNTO
END ELSE EXCEPT EXPORTS
FILE FINALLY FUNCTION
GOTO
IMPLEMENTATION IN INHERITED INLINE INTERFACE INITIALIZATION INVALIDATE
LABEL LIBRARY
OBJECT
PACKED PRIVATE PROTECTED PROCEDURE PROGRAM PROPERTY PUBLIC PUBLISHED
RAISE RECORD REPEAT
STRING
THEN TYPE
UNIT USES

y a tj un prob : il indente le begin, alors qu'il faut pas

heu je comprends toujours pas comment marche la fin de l'identation pour le if

Pour le Pascal Objet :
 
Pas sensible à la casse.
 
Commentaires (en italique, bleu foncé dans Delphi mais perso je préfère en vert) :
(* commentaire *)
{ commentaire }
// commentaire
 
(* *) est un niveau en plus par rapport à { }  
 
(*
  commentaire
    {
       commentaire
    }
  commentaire
*)
 
Chaînes (perso je préfère en bleu foncé) : 'chaine'
 
Mots clé (en gras) : and array as asm at automated begin case class const constructor destructor dispid dispinterface div do downto else end except exports file finalization finally for function goto if implementation in inherited initialization inline interface is label library message mod nil not object of on or out packed private procedure program property protected public published raise record repeat resourcestring set shl shr string then threadvar to try type unit until uses var while with xor
 
Y a aussi des cas speciaux : dans la définition d'une property read, write et index sont des mots clés
 
Nombre (perso je préfère en bleu) : commence par un chiffre (décimal), un $(hexa), ou un # (code ASCII d'un caractère)

faut pas indenter après le if

bon ce que ça doit faire:
 

joce a écrit a écrit :   faut pas indenter après le if

 
que si y a pas de begin
et si y a pas de begin y a pas de end

En fait les begin/end c'est comme les { } du C... La règle est la même je pense

 
 
y'a une balise speciale pour le cpp ou c le "code" standart ? si oui la y'a un bleme d'indentation (truc devrait etre decalé)

j'ai pas géré l'indentation pour les if sans {} pour le cpp

AHHHHHH ok ! faut mettre un begin / end après un if alors ?

joce a écrit a écrit :   j'ai pas géré l'indentation pour les if sans {} pour le cpp

 
pas que les if, y'a aussi les for, while....

chrisbk a écrit a écrit :     pas que les if, y'a aussi les for, while....

ouais je sais hein

joce a écrit a écrit :   ouais je sais hein

je soulignais ce point pour eviter de futurs bugs potentiels dus a un malheureux oubli

on peut les mettre après if...then, for...do, while...do, with...do mais on peut aussi ne pas les mettre (comme les { }) si y a une seule ligne dans le if

ha et pour t'embêter :
 
try
truc1;
truc2;
finally
truc3;
truc4;
end;
 
try
truc1;
truc2;
except
truc3;
truc4;
end;
 
là y a pas de begin/end, qu'il y ait 1 ou plusieurs lignes, mais faut quand même indenter tous les "truc"

l'identation automatique, ca c'est de l'idée pour meubler les soirées

bon ca doit être ok pour le pascal, je vais rajouter les mots clés (vous pouvez pas me rendre service et mettre un mot clé par ligne )

bon moi je vais dormir, y a Zion qui est là pour la suite

les écoute pas
le php fct très bien, c le principal  

joce a écrit a écrit : bon ca doit être ok pour le pascal, je vais rajouter les mots clés (vous pouvez pas me rendre service et mettre un mot clé par ligne )

 
ok:
 
 
and
array
as
asm
automated
begin
case
class
const
constructor
destructor
dispid
dispinterface
div
do
downto
else
end
except
exports
file
finalization
finally
for
function
goto
if
implementation
in
inherited
initialization
inline
interface
is
label
library
message
mod
nil
not
object
of
on
or
out
packed
private
procedure
program
property
protected
public
published
raise
record
repeat
resourcestring
set
shl
shr
string
then
threadvar
to
try
type
unit
until
uses
var
while
with
xor

ils y sont tous là ?

Et les cas speciaux : dans la définition d'une property read, write et index sont des mots clés
 
property Machin: Integer read GetMachin write SetMachin;
 
index je sais plus à quoi il sert et où on le met
 
edit : ha et y a aussi default qui doit pas être loin d'index mais comme je l'emploie jamais non plus je sais plus comment ça marche

joce a écrit a écrit : bon ca doit être ok pour le pascal, je vais rajouter les mots clés (vous pouvez pas me rendre service et mettre un mot clé par ligne )

 
ca aurait été avec plaisir mais la je vais aller méditer au fond de mon pieu sur la difficulé de générer des textures en tps réel qui ne soient pas moche, ca devrait me faire tomber comme une mouche
 
 
++

bon j'ai mis en place la word list du pascal

J'ai viré "at" de la liste parce que c'est pas un mot clé permanent, c'est comme read/write/index/default, il n'est mot clé en gras que dans des cas précis, mais je ne sais plus quand

[pascal]if machin or truc then
begin
with bidule.brol do
begin
chose('machin';
end;
truc := bazard / truc;
end;
[/pascal]
 
ça se met pas fort en gras tout ça

sinon dans ton code d'avant t'as oublié un ; à la fin du end

où ça

tiens les apostrophes se transforment en #9
 
edit: tiens c'est réparé

merdoume, il décrémente plus les indentation sur les end

ah ba voala

fuck, c'est pas encore ca

voala !