aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Another update from ingydotnet^djgoku

Browse source
This commit is contained in:
Ingy döt Net 2015-11-18 06:14:39 +00:00
parent 91df62d461
commit 948b86eafa
7604 changed files with 108452 additions and 22726 deletions
Download patch file Download diff file Expand all files Collapse all files

11
Task/Hello-world-Graphical/ALGOL-68/hello-world-graphical.alg Normal file
View file

@ -0,0 +1,11 @@
BEGIN
FILE window;
open (window, "Hello!", stand draw channel);
draw device (window, "X", "600x400");
draw erase (window);
draw move (window, 0.25, 0.5);
draw colour (window, 1, 0, 0);
draw text (window, "c", "c", "Goodbye, world!");
draw show (window);
close (window)
END