diff --git a/p/hello_world.pl1 b/p/hello_world.pl1
new file mode 100644
index 00000000..fb855638
--- /dev/null
+++ b/p/hello_world.pl1
@@ -0,0 +1,4 @@
+World: Procedure options(main);
+          Put List( 'Hello world' );
+
+          End World;
diff --git a/q/Qbasic.bas b/q/Qbasic.bas
new file mode 100644
index 00000000..e04cbdc0
--- /dev/null
+++ b/q/Qbasic.bas
@@ -0,0 +1,2 @@
+
+PRINT "hello world"