September Morn Update

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

@@ -1,3 +1,5 @@
+HELLO    CSECT
+         USING HELLO,15
          LA    1,MSGAREA     Point Register 1 to message area
          SVC   35            Invoke SVC 35 (Write to Operator)
          BR    14            Return

Task/Hello-world-Text/6502-Assembly/hello-world-text.6502

@@ -2,7 +2,7 @@
 ; String printing limited to strings of 256 characters or less.
 
 a_cr	= $0d		; Carriage return.
-bsout	= $ffd2		; C64 KERNAL ROM, output a character to current device.
+bsout	= $ffd2		; C64 KERNEL ROM, output a character to current device.
 			; use $fded for Apple 2
 	.code
 

Task/Hello-world-Text/Arc/hello-world-text.arc

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

Task/Hello-world-Text/B/hello-world-text.b

@@ -0,0 +1,5 @@
+main()
+{
+    putstr("Hello world!*n");
+    return(0);
+}

Task/Hello-world-Text/Commodore-BASIC/hello-world-text.commodore

@@ -0,0 +1,3 @@
+10 print chr$(147);chr$(14);:REM 147=clear screen, 14=switch to lowercase mode
+20 print "Hello world!"
+30 end

Task/Hello-world-Text/Dc/hello-world-text-2.dc

@@ -0,0 +1 @@
+5735816763073014741799356604682 P

Task/Hello-world-Text/Elena/hello-world-text.elena

@@ -0,0 +1,4 @@
+public program()
+{
+    console.writeLine:"Hello world!"
+}

Task/Hello-world-Text/J/hello-world-text-2.j

@@ -9,3 +9,27 @@ Hello world!
    NB. j pretty prints the train.
    Hello World!
 Hello World !
+
+
+   NB. j is glorious, and you should know this!
+
+   i. 2 3   NB. an array of integers
+0 1 2
+3 4 5
+
+   verb_with_infinite_rank =: 'Hello world!'"_
+
+   verb_with_infinite_rank i. 2 3
+Hello world!
+
+
+   verb_with_atomic_rank =: 'Hello world!'"0
+
+   verb_with_atomic_rank i. 2 3
+Hello world!
+Hello world!
+Hello world!
+
+Hello world!
+Hello world!
+Hello world!

Task/Hello-world-Text/LLVM/hello-world-text.llvm

@@ -1,5 +1,9 @@
-@str = internal constant [14 x i8] c"Hello, world!\00"
-declare i32 @puts(i8*)
+; const char str[14] = "Hello World!\00"
+@.str = private unnamed_addr constant  [14 x i8] c"Hello, world!\00"
+
+; declare extern `puts` method
+declare i32 @puts(i8*) nounwind
+
 define i32 @main()
 {
   call i32 @puts( i8* getelementptr ([14 x i8]* @str, i32 0,i32 0))

Task/Hello-world-Text/Nickle/hello-world-text.nickle

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

Task/Hello-world-Text/Oforth/hello-world-text.oforth

@@ -1 +1 @@
-"Hello world!" println
+"Hello world!" .

Task/Hello-world-Text/PowerBASIC/hello-world-text.powerbasic

@@ -0,0 +1,7 @@
+#COMPILE EXE
+#COMPILER PBCC 6
+
+FUNCTION PBMAIN () AS LONG
+  CON.PRINT "Hello world!"
+  CON.WAITKEY$
+END FUNCTION

Task/Hello-world-Text/R/hello-world-text-2.r

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

Task/Hello-world-Text/R/hello-world-text-3.r

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

Task/Hello-world-Text/Retro/hello-world-text.retro

@@ -1 +1 @@
-"Hello world!" puts
+'Hello_world! s:put

Task/Hello-world-Text/Rust/hello-world-text-1.rust

@@ -1,3 +1,3 @@
-fn main () {
+fn main() {
    print!("Hello world!");
 }

Task/Hello-world-Text/Rust/hello-world-text-2.rust

@@ -1,3 +1,3 @@
-fn main () {
+fn main() {
    println!("Hello world!");
 }

Task/Hello-world-Text/Visual-Basic/hello-world-text.vb

@@ -0,0 +1,19 @@
+Option Explicit
+
+Private Declare Function AllocConsole Lib "kernel32.dll" () As Long
+Private Declare Function FreeConsole Lib "kernel32.dll" () As Long
+'needs a reference set to "Microsoft Scripting Runtime" (scrrun.dll)
+
+Sub Main()
+  Call AllocConsole
+  Dim mFSO As Scripting.FileSystemObject
+  Dim mStdIn As Scripting.TextStream
+  Dim mStdOut As Scripting.TextStream
+  Set mFSO = New Scripting.FileSystemObject
+  Set mStdIn = mFSO.GetStandardStream(StdIn)
+  Set mStdOut = mFSO.GetStandardStream(StdOut)
+  mStdOut.Write "Hello world!" & vbNewLine
+  mStdOut.Write "press enter to quit program."
+  mStdIn.Read 1
+  Call FreeConsole
+End Sub

Task/Hello-world-Text/ZX-Spectrum-Basic/hello-world-text.zx

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