Time for an 2014 update…
This commit is contained in:
parent
372c577f83
commit
09687c4926
2520 changed files with 34227 additions and 7318 deletions
|
|
@ -1,5 +1,5 @@
|
|||
Gui, Add, Text, x4 y4, To be announced:
|
||||
Gui, Add, Edit, xp+90 yp-3, Goodbye, World!
|
||||
Gui, Add, Button, xp+98 yp-1, OK
|
||||
Gui, Show, w226 h22 , Rosetta Code
|
||||
Gui, Show, w226 h22 , Rosetta Code
|
||||
Return
|
||||
|
|
|
|||
|
|
@ -0,0 +1,13 @@
|
|||
@echo off
|
||||
|
||||
::Output to console
|
||||
echo Goodbye, World!
|
||||
|
||||
::Output to message box
|
||||
msg * "Goodbye, World!"
|
||||
|
||||
::Output to file and open it
|
||||
echo Goodbye, World!>temp.txt
|
||||
start temp.txt
|
||||
|
||||
pause>nul
|
||||
|
|
@ -1,19 +1,19 @@
|
|||
program-id. ghello.
|
||||
data division.
|
||||
working-storage section.
|
||||
01 var pic x(1).
|
||||
01 lynz pic 9(3).
|
||||
01 colz pic 9(3).
|
||||
01 msg pic x(15) value "Goodbye, world!".
|
||||
procedure division.
|
||||
accept lynz from lines end-accept
|
||||
divide lynz by 2 giving lynz.
|
||||
accept colz from columns end-accept
|
||||
divide colz by 2 giving colz.
|
||||
subtract 7 from colz giving colz.
|
||||
display msg
|
||||
at line number lynz
|
||||
column number colz
|
||||
end-display
|
||||
accept var end-accept
|
||||
stop run.
|
||||
program-id. ghello.
|
||||
data division.
|
||||
working-storage section.
|
||||
01 var pic x(1).
|
||||
01 lynz pic 9(3).
|
||||
01 colz pic 9(3).
|
||||
01 msg pic x(15) value "Goodbye, world!".
|
||||
procedure division.
|
||||
accept lynz from lines end-accept
|
||||
divide lynz by 2 giving lynz.
|
||||
accept colz from columns end-accept
|
||||
divide colz by 2 giving colz.
|
||||
subtract 7 from colz giving colz.
|
||||
display msg
|
||||
at line number lynz
|
||||
column number colz
|
||||
end-display
|
||||
accept var end-accept
|
||||
stop run.
|
||||
|
|
|
|||
|
|
@ -1,6 +1,6 @@
|
|||
(ns experimentation.core
|
||||
(:import (javax.swing JOptionPane JFrame JTextArea JButton)
|
||||
(java.awt FlowLayout)))
|
||||
(java.awt FlowLayout)))
|
||||
|
||||
(JOptionPane/showMessageDialog nil "Goodbye, World!")
|
||||
(let [button (JButton. "Goodbye, World!")
|
||||
|
|
|
|||
|
|
@ -3,12 +3,12 @@
|
|||
use Gtk
|
||||
|
||||
class MainProgram
|
||||
def main
|
||||
Application.init
|
||||
dialog = MessageDialog(nil,
|
||||
DialogFlags.DestroyWithParent,
|
||||
MessageType.Info,
|
||||
ButtonsType.Ok,
|
||||
"Goodbye, World!")
|
||||
dialog.run
|
||||
dialog.destroy
|
||||
def main
|
||||
Application.init
|
||||
dialog = MessageDialog(nil,
|
||||
DialogFlags.DestroyWithParent,
|
||||
MessageType.Info,
|
||||
ButtonsType.Ok,
|
||||
"Goodbye, World!")
|
||||
dialog.run
|
||||
dialog.destroy
|
||||
|
|
|
|||
|
|
@ -4,11 +4,11 @@ import dojo.widgets.*;
|
|||
handler HelloWorld type RUIhandler{initialUI =[ui]}
|
||||
|
||||
ui Box {columns=1, children=[nameField, helloLabel, goButton]};
|
||||
|
||||
|
||||
nameField DojoTextField {placeHolder = "What's your name?", text = "World"};
|
||||
helloLabel TextLabel {};
|
||||
goButton DojoButton {text = "Say Goodbye", onClick ::= onClick_goButton};
|
||||
|
||||
|
||||
function onClick_goButton(e Event in)
|
||||
helloLabel.text = "Goodbye, " + nameField.text + "!";
|
||||
end
|
||||
|
|
|
|||
1
Task/Hello-world-Graphical/GML/hello-world-graphical.gml
Normal file
1
Task/Hello-world-Graphical/GML/hello-world-graphical.gml
Normal file
|
|
@ -0,0 +1 @@
|
|||
draw_text(0,0,"Goodbye World!");
|
||||
|
|
@ -14,8 +14,8 @@ begin
|
|||
gtk_window_set_title (GTK_WINDOW (window), 'Goodbye, World');
|
||||
g_signal_connect (G_OBJECT (window),
|
||||
'delete-event',
|
||||
G_CALLBACK (@gtk_main_quit),
|
||||
NULL);
|
||||
G_CALLBACK (@gtk_main_quit),
|
||||
NULL);
|
||||
gtk_widget_show_all (window);
|
||||
|
||||
gtk_main();
|
||||
|
|
|
|||
|
|
@ -0,0 +1 @@
|
|||
text("Goodbye, World!",0,height/2);
|
||||
|
|
@ -2,4 +2,4 @@ import vis::Figure;
|
|||
import vis::Render;
|
||||
|
||||
public void GoodbyeWorld() =
|
||||
render(box(text("Goodbye World")));
|
||||
render(box(text("Goodbye World")));
|
||||
|
|
|
|||
|
|
@ -1,5 +1,5 @@
|
|||
#_Note: this code MUST be executed through the Shoes GUI!!
|
||||
|
||||
Shoes.app do
|
||||
para "CHUNKY BACON!", :size => 72
|
||||
para "CHUNKY BACON!", :size => 72
|
||||
end
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue