Hello world/Graphical: Difference between revisions

Added Vim Script solution
(Add example for Crystal programming language)
(Added Vim Script solution)
(4 intermediate revisions by 3 users not shown)
Line 1,266:
 
window = SF::RenderWindow.new(SF::VideoMode.new(800, 600), "Hello world/Graphical")
 
# A font file(s) MUST be in the directory of the Crystal file itself.
# CrSFML does NOT load font files from the filesystem root!
font = SF::Font.from_file("DejaVuSerif-Bold.ttf")
 
Line 1,563 ⟶ 1,566:
}
</syntaxhighlight>
 
=={{header|Fennel}}==
==={{libheader|LÖVE}}===
<syntaxhighlight lang="fennel">
(fn love.load []
(love.window.setMode 300 300 {"resizable" false})
(love.window.setTitle "Hello world/Graphical in Fennel!"))
 
(let [str "Goodbye, World!"]
(fn love.draw []
(love.graphics.print str 95 150)))
</syntaxhighlight>
To run this, you need to have LÖVE installed in your machine, and then run this command <code>fennel --compile love_test.fnl > main.lua; love .</code>. Since LÖVE has no compatibility with Fennel, we need to AOT-compile the file to a Lua file called <code>main.lua</code>, so then LÖVE can execute the program.
 
=={{header|Forth}}==
Line 1,644 ⟶ 1,660:
Compile with
<code>gfortran gtk2_mini.f90 -o gtk2_mini.x `pkg-config --cflags --libs gtk-2-fortran`</code>
 
 
=={{header|Fennel}}==
==={{libheader|LÖVE}}===
<syntaxhighlight lang="fennel">
(fn love.load []
(love.window.setMode 300 300 {"resizable" false})
(love.window.setTitle "Hello world/Graphical in Fennel!"))
 
(let [str "Goodbye, World!"]
(fn love.draw []
(love.graphics.print str 95 150)))
</syntaxhighlight>
To run this, you need to have LÖVE installed in your machine, and then run this command <code>fennel --compile love_test.fnl > main.lua; love .</code>. Since LÖVE has no compatibility with Fennel, we need to AOT-compile the file to a Lua file called <code>main.lua</code>, so then LÖVE can execute the program.
 
 
 
=={{header|FreeBASIC}}==
Line 3,947:
(widget-make-label "Goodbye, world!")))
(window-show-and-run gui "Goodbye")</syntaxhighlight>
 
=={{header|SmallBASIC}}==
<syntaxhighlight lang="qbasic">
w = window()
w.alert("Goodbye, World!")
</syntaxhighlight>
 
=={{header|Smalltalk}}==
Line 4,208 ⟶ 4,214:
Displaying a dialog box with the message and default OK button:
<syntaxhighlight lang="vedit">Dialog_Input_1(1,"`Vedit example`,`Goodbye, World!`")</syntaxhighlight>
 
=={{header|Vim Script}}==
There are several ways to do this. From Normal mode, one way (which requires Vim version 8.2 with patch 1522) is:
<syntaxhighlight lang="vimscript">
:call popup_notification("Hello world", {})
</syntaxhighlight>
 
Another way (which requires Vim version 9.0 with patch 337) is:
<syntaxhighlight lang="vimscript">
:echow "Hello world"
</syntaxhighlight>
 
'''NB: Neither of these will work with Neovim.'''
 
=={{header|Visual Basic}}==
25

edits