Changed empty day files to a template; Added template.a60 file

main
Der Teufel 2021-12-12 20:59:27 +01:00
parent b20eb6085b
commit 92b3fd7242
24 changed files with 216 additions and 0 deletions

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end

9
src/template.a60 Normal file
View File

@ -0,0 +1,9 @@
procedure printresults(r1, r2);
integer r1, r2;
code;
begin
integer result1, result2;
result1 := 0; result2 := 0;
printresults(result1, result2);
end