Data update

Task/Hello-world-Text/360-Assembly/hello-world-text-3.360

@@ -0,0 +1,6 @@
+HELLO    CSECT
+         BASR 12,0
+         USING *,12
+         WRTERM 'HELLO WORLD'
+         BR 14
+         END

Task/Hello-world-Text/8086-Assembly/hello-world-text-2.8086

@@ -0,0 +1,11 @@
+  org 100h
+
+  mov dx, msg
+  mov ah, 9
+  int 21h
+
+  mov ax, 4c00h
+  int 21h
+
+msg:
+  db "Hello world!$"

Task/Hello-world-Text/8086-Assembly/hello-world-text-3.8086

@@ -0,0 +1,35 @@
+use16
+format MZ
+entry code:start
+
+segment code
+start:
+;----Define the data segment----
+    mov    ax, data0     ;load the address of data segment into ax
+    mov    ds, ax        ;load address of the data segment into
+                         ;data segment register
+;-------------------------------
+    lea    di, [msg]     ;load address of message into di
+    call   pascalprint   ;call the routine that prints a pascal string
+
+exit:
+    mov    ax, 0x4c00    ;load 4c into ah, al is error code.
+    int    0x21          ;exit to dos
+
+pascalprint:             ;routine to print a pascal string.
+    movzx  cx, byte[di]  ;load the first byte into cx. The length of string
+    mov    dx, di        ;load into dx the address of string
+    inc    dx            ;add one to dx, because the second byte is the
+                         ;start of the string.
+    mov    bx, 1         ;1 is file description of stdout
+    mov    ax, 0x4000    ;service 40h writes a string to file
+                         ;in this case the file is stdout.
+    int    0x21          ;call the interrupt.
+    ret                  ;return from routine.
+
+segment data0
+;A pascal string is a string where the first byte is the length
+;of the string. That means that the string is limited to 255 bytes long.
+;the length is calculated by the assembler.
+msg:     db @f-$-1, "Hello world!"
+ @@:

Task/Hello-world-Text/Ada/hello-world-text.adb

@@ -0,0 +1,5 @@
+with Ada.Text_IO; use Ada.Text_IO;
+procedure Main is
+begin
+  Put_Line ("Hello world!");
+end Main;

Task/Hello-world-Text/AutoIt/hello-world-text.au3

@@ -0,0 +1 @@
+ConsoleWrite("Hello world!" & @CRLF)

Task/Hello-world-Text/AutoLISP/hello-world-text.lsp

@@ -0,0 +1 @@
+(print "Hello World!")

Task/Hello-world-Text/Ballerina/hello-world-text.ballerina

@@ -1,5 +1,5 @@
 import ballerina/io;
 
 public function main() {
-    io:println("Hello World!");
+    io:println("Hello world!");
 }

Task/Hello-world-Text/Batch-File/hello-world-text-3.bat

@@ -0,0 +1,26 @@
+@echo off
+setlocal enableextensions
+call :char 72
+call :char 101
+call :char 108
+call :char 108
+call :char 111
+call :space
+call :char 119
+call :char 111
+call :char 114
+call :char 108
+call :char 100
+call :char 33
+exit /b 0
+
+:space
+:: https://stackoverflow.com/a/9865960
+:: https://stackoverflow.com/a/31396993
+for /f %%A in ('"prompt $H &echo on &for %%B in (1) do rem"') do <nul set /p=".%%A "
+goto :eof
+
+:char
+cmd /c exit %1
+<nul set /p=%=ExitCodeAscii%
+goto :eof

Task/Hello-world-Text/Brainf---/hello-world-text-1.bf

@@ -13,47 +13,38 @@
 <<<<<<<<< -		go back to counter and subtract 1
 ]
 
-printing G
->>>> + .
-
-o twice
->>>> + ..
-
-d
-< .
-
-b
-< +++++ +++ .
-
-y
->>> + .
+printing H
+>>>> ++ .
 
 e
-<< + .
+>>>+.
 
-COMMA
-<<<< ++++ .
-
-SPACE
-< ++ .
-
-W
->>> +++++ ++ .
+l twice
++++++++..
 
 o
->>> .
+>+.
+
+SPACE
+<<<<<<++.
+
+w
+>>>>>>>-.
+
+o
+<.
 
 r
-+++ .
++++.
 
 l
-< +++++ ++ .
+<.
 
 d
------ --- .
+--------.
 
 !
-<<<<< + .
+<<<<<+.
 
 CRLF
 < +++ . --- .

Task/Hello-world-Text/Brainf---/hello-world-text-2.bf

@@ -1,4 +1,4 @@
 ++++++++++[>+>+++>++++>+++++++>++++++++>+++++++++>++
-++++++++>+++++++++++>++++++++++++<<<<<<<<<-]>>>>+.>>>
->+..<.<++++++++.>>>+.<<+.<<<<++++.<++.>>>+++++++.>>>.+++.
-<+++++++.--------.<<<<<+.<+++.---.
+++++++++>+++++++++++>++++++++++++<<<<<<<<<-]
+>>>>++.>>>+.+++++++..>+.<<<<<<++.>>>>>>>-.
+<.+++.<.--------.<<<<<+.<+++.---.

Task/Hello-world-Text/COBOL/hello-world-text-1.cob

@@ -0,0 +1,4 @@
+	program-id. hello.
+	procedure division.
+		display "Hello world!".
+		stop run.

Task/Hello-world-Text/COBOL/hello-world-text-2.cob

@@ -0,0 +1 @@
+display"Hello, world".

Task/Hello-world-Text/Chapel/hello-world-text.chpl

@@ -0,0 +1 @@
+writeln("Hello world!");

Task/Hello-world-Text/Dragonstone/hello-world-text.dragonstone

@@ -0,0 +1 @@
+echo "Hello world!"

Task/Hello-world-Text/Emacs-Lisp/hello-world-text-1.el

@@ -0,0 +1 @@
+(message "Hello world!")

Task/Hello-world-Text/Emacs-Lisp/hello-world-text-2.el

@@ -0,0 +1 @@
+(princ "Hello world!\n")

Task/Hello-world-Text/Haxe/hello-world-text.hx

@@ -0,0 +1 @@
+trace("Hello world!");

Task/Hello-world-Text/Jactl/hello-world-text-1.jactl

@@ -0,0 +1,2 @@
+print 'Hello'
+println 'World'

Task/Hello-world-Text/Jactl/hello-world-text-2.jactl

@@ -0,0 +1,3 @@
+def x = 'Hello'
+println "$x World"
+println "There are ${60 * 60 * 24} seconds in a day"

Task/Hello-world-Text/Langur/hello-world-text.langur

@@ -1 +1 @@
-writeln "Hello"
+writeln "Hello world!"

Task/Hello-world-Text/Loglan82/hello-world-text-1.loglan82

@@ -0,0 +1,5 @@
+program hello;
+
+begin
+  writeln("Hello, World!")
+end

Task/Hello-world-Text/Loglan82/hello-world-text-2.loglan82

@@ -0,0 +1,5 @@
+block
+
+begin
+  writeln("Hello, World!")
+end;

Task/Hello-world-Text/MoonBit/hello-world-text.moonbit

@@ -0,0 +1,4 @@
+///|
+fn main {
+  println("Hello world!")
+}

Task/Hello-world-Text/PowerShell/hello-world-text.ps1

@@ -0,0 +1 @@
+'Hello world!'

Task/Hello-world-Text/ReScript/hello-world-text.res

@@ -0,0 +1 @@
+Js.log("Hello world!")

Task/Hello-world-Text/Rebol/hello-world-text.rebol

@@ -0,0 +1 @@
+print "Hello world!"

Task/Hello-world-Text/Rocq/hello-world-text.rocq

@@ -0,0 +1,3 @@
+Require Import Coq.Strings.String.
+
+Eval compute in ("Hello world!"%string).

Task/Hello-world-Text/Rye/hello-world-text.rye

@@ -0,0 +1 @@
+print "Hello world!"

Task/Hello-world-Text/SIL/hello-world-text.sil

@@ -0,0 +1 @@
+printLine Hello world!

Task/Hello-world-Text/SapbotVM/hello-world-text-1.sapbot

@@ -0,0 +1,3 @@
+[
+    "DEBUG;THello, World!"
+]

Task/Hello-world-Text/SapbotVM/hello-world-text-2.sapbot

@@ -0,0 +1,2 @@
+# Simple Hello World program in SVM2 format
+10 DEBUG;Thello World

Task/Hello-world-Text/VBScript/hello-world-text.vbs

@@ -0,0 +1 @@
+WScript.Echo "Hello world!"

Task/Hello-world-Text/VHDL/hello-world-text.vhd

@@ -0,0 +1,16 @@
+LIBRARY std;
+USE std.TEXTIO.all;
+
+entity test is
+end entity test;
+
+architecture beh of test is
+begin
+  process
+    variable line_out : line;
+  begin
+    write(line_out, string'("Hello world!"));
+    writeline(OUTPUT, line_out);
+    wait; -- needed to stop the execution
+  end process;
+end architecture beh;

Task/Hello-world-Text/X86-64-Assembly/hello-world-text-7.x86-64

@@ -0,0 +1,44 @@
+format PE console
+entry start
+include 'win32ax.inc'
+
+section '.rdata' data readable
+  message       db 'Hello, World!', 13, 10
+  ; `=` is used to define the constant. `$` is the address of current position
+  message_len   = $ - message
+
+section '.code' code readable executable
+  ; `invoke <PROC>, <...ARGS>` is a macro, equivalent to pushing arguments on the stack and `call`ing the procedure
+  start:
+    ; Get a handle to standard output. Result is stored in EAX.
+    invoke GetStdHandle, \   ; https://learn.microsoft.com/en-us/windows/console/getstdhandle
+    	   STD_OUTPUT_HANDLE ; -11
+
+    ; Print the message to the console using the handle from EAX
+    invoke WriteConsoleA, \ ; https://learn.microsoft.com/en-us/windows/console/writeconsole
+    	   eax,			  \ ; HANDLE  hConsoleOutput
+    	   message, 	  \	; void    *lpBuffer
+    	   message_len,   \	; DWORD   nNumberOfCharsToWrite
+    	   NULL,          \	; LPDWORD lpNumberOfCharsWritten (optional)
+    	   NULL				; void    *lpReserved 			 (must be null)
+
+    ; Exit the program
+    invoke ExitProcess, 0
+
+; Import Section (used to interface with dynamic libraries)
+section '.idata' import data readable
+  ; `library` is a macro that must be placed directly in the beginning of the import data.
+  ; It defines from what libraries the functions will be imported.
+  ; It should be followed by any amount of the pairs of parameters,
+  ; each pair being the label for the table of imports from the given library,
+  ; and the quoted string defining the name of the library.
+  library kernel32, 'kernel32.dll'
+
+  ; `import` macro generates the import table.
+  ; It needs first parameter to define the label for the table (the same as declared earlier to the library macro),
+  ; and then the pairs of parameters each containing the label for imported pointer and the quoted string
+  ; defining the name of function exactly as exported by library.
+  import kernel32,                       \
+         GetStdHandle,  'GetStdHandle',  \
+         WriteConsoleA, 'WriteConsoleA', \
+         ExitProcess,   'ExitProcess'