all tasks

Task/Window-creation/J/window-creation-1.j

@@ -0,0 +1,3 @@
+   title=: '"Hamlet -- Act 3, Scene 1"'
+   text=: '"To be, or not to be: that is the question:"'
+   wd 'mb ',title,text

Task/Window-creation/J/window-creation-2.j

@@ -0,0 +1,16 @@
+MINWDW=: noun define
+pc minwdw;
+pas 162 85;pcenter;
+rem form end;
+)
+
+minwdw_run=: monad define
+  wd MINWDW
+  wd 'pshow;'
+)
+
+minwdw_close=: monad define
+  wd'pclose'
+)
+
+minwdw_run ''