- Moved file
This commit is contained in:
24
test-file/pret-pas_test.tex
Normal file
24
test-file/pret-pas_test.tex
Normal file
@@ -0,0 +1,24 @@
|
||||
\installprettytype[PAS][PAS]
|
||||
\setupcolors[state=start]
|
||||
\setuptyping[option=color]
|
||||
\definetyping[PAS][option=PAS, escape=yes, tab=4, numbering=line]
|
||||
\setuplinenumbering[location=text]
|
||||
|
||||
\starttext
|
||||
\startPAS
|
||||
blub { Comment } blub
|
||||
blub {$R- compiler directive} blub
|
||||
procedure TForm1.Button1.Click(Sender: TObject);
|
||||
var // Delphi Comment
|
||||
Number, I, X: Integer;
|
||||
begin
|
||||
Number := 12345 * (2 + 9);
|
||||
Caption := 'The number is ' + IntToStr(Number);
|
||||
asm
|
||||
MOV AX,1234h
|
||||
MOV Number,AX
|
||||
end;
|
||||
X := 10;
|
||||
end;
|
||||
\stopPAS
|
||||
\stoptext
|
||||
Reference in New Issue
Block a user