Index: doc-rnd/gpmi/rosetta/12_hello_menu/ID.desc
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ID.desc	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ID.desc	(revision 684)
@@ -0,0 +1,3 @@
+Create a new action hello() that prints "Hello world!" in a popup window, create a menu (under "Plugins/GPMI scripting/") that executes the action.
+
+
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ID.name
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ID.name	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ID.name	(revision 684)
@@ -0,0 +1 @@
+hello world (popup window + submenu)
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.awk
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.awk	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.awk	(revision 684)
@@ -0,0 +1,20 @@
+BEGIN {
+	PkgLoad("pcb-rnd-gpmi/actions", 0);
+	PkgLoad("pcb-rnd-gpmi/dialogs", 0);
+}
+
+function ev_action(id, name, argc, x, y)
+{
+	dialog_report("Greeting window", "Hello world!");
+}
+
+function ev_gui_init(id, argc, argv)
+{
+	create_menu("Plugins/GPMI scripting/hello", "hello()", "h", "Ctrl<Key>w", "tooltip for hello");
+}
+
+BEGIN {
+	Bind("ACTE_action", "ev_action");
+	Bind("ACTE_gui_init", "ev_gui_init");
+	action_register("hello", "", "log hello world", "hello()");
+}
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.bash
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.bash	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.bash	(revision 684)
@@ -0,0 +1,24 @@
+#!/bin/bash
+
+function load_packages()
+{
+	GPMI PkgLoad "pcb-rnd-gpmi/actions" 0
+	GPMI PkgLoad "pcb-rnd-gpmi/dialogs" 0
+}
+
+function ev_action() {
+	GPMI dialog_report "Greeting window" "Hello world!"
+}
+
+function ev_gui_init()
+{
+	GPMI create_menu "Plugins/GPMI scripting/hello" "hello()" "h" "Ctrl<Key>w" "tooltip for hello"
+}
+
+function main()
+{
+	load_packages
+	GPMI Bind "ACTE_action"  "ev_action"
+	GPMI Bind "ACTE_gui_init" "ev_gui_init"
+	GPMI action_register "hello" "" "log hello world" "hello()"
+}
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.html
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.html	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.html	(revision 684)
@@ -0,0 +1,33 @@
+Load packages the script depends on:
+<ul>
+	<li> <ref>actions</ref> for registering the new action;
+	<li> <ref>dialogs</ref> for creating a dialog box.
+</ul>
+<p>
+Create a function <i>ev_action</i> that will be called when any of
+the actions registered by the script is executed. The script registers
+only one action, so it does not need to check which action caused
+the function to be called.
+<p>
+When the action event is called, use <ref>dialog_report</ref> to pop
+up a report dialog. First argument donates the name (title) of the window,
+the second is the text printed in the window.
+<p>
+Create a function <i>ev_gui_init</i> that will be called when the
+gui has been initialized - this is the right moment to register
+new menus in the GUI. Put the new menu item in the
+"Plugins/GPMI scripting/" menu by convention, and set hot key to ctrl+w.
+The menu should execute action hello().
+<p>
+In the "main" section of the script, bind event <ref>ACTE_action</ref> to
+our local function <i>ev_action</i> - this gets <i>ev_action</i> to
+be called when any of the actions registered by this script is executed.
+Also bind ev_gui_init so that the new menu can be safely created.
+<p>
+Finally use <ref>action_register</ref> to register the action:
+<ul>
+	<li> first argument is the name of the action
+	<li> second is the xy query string; it is empty since this action won't need coordinates to operate on
+	<li> third is the description that shows up in dumps and helps
+	<li> fourth is the syntax description (also for helps)
+</ul>
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.lua
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.lua	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.lua	(revision 684)
@@ -0,0 +1,14 @@
+PkgLoad("pcb-rnd-gpmi/actions", 0);
+PkgLoad("pcb-rnd-gpmi/dialogs", 0);
+
+function ev_action(id, name, argc, x, y)
+	dialog_report("Greeting window", "Hello world!");
+end
+
+function ev_gui_init(id, argc, argv)
+	create_menu("Plugins/GPMI scripting/hello", "hello()", "h", "Ctrl<Key>w", "tooltip for hello");
+end
+
+Bind("ACTE_action", "ev_action");
+Bind("ACTE_gui_init", "ev_gui_init");
+action_register("hello", "", "log hello world", "hello()");
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.pl
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.pl	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.pl	(revision 684)
@@ -0,0 +1,17 @@
+PkgLoad("pcb-rnd-gpmi/actions", 0);
+PkgLoad("pcb-rnd-gpmi/dialogs", 0);
+
+sub ev_action {
+	my($id, $name, $argc, $x, $y) = @_;
+	dialog_report("Greeting window", "Hello world!");
+}
+
+sub ev_gui_init
+{
+	my($id, $name, $argc, $argv) = @_;
+	create_menu("Plugins/GPMI scripting/hello", "hello()", "h", "Ctrl<Key>w", "tooltip for hello");
+}
+
+Bind("ACTE_action", "ev_action");
+Bind("ACTE_gui_init", "ev_gui_init");
+action_register("hello", "", "log hello world", "hello()");
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.py
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.py	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.py	(revision 684)
@@ -0,0 +1,12 @@
+PkgLoad("pcb-rnd-gpmi/actions", 0);
+PkgLoad("pcb-rnd-gpmi/dialogs", 0);
+
+def ev_action(id, name, argc, x, y):
+	dialog_report("Greeting window", "Hello world!");
+
+def ev_gui_init(id, argc, argv):
+	create_menu("Plugins/GPMI scripting/hello", "hello()", "h", "Ctrl<Key>w", "tooltip for hello");
+
+Bind("ACTE_action", "ev_action");
+Bind("ACTE_gui_init", "ev_gui_init");
+action_register("hello", "", "log hello world", "hello()");
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.rb
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.rb	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.rb	(revision 684)
@@ -0,0 +1,14 @@
+PkgLoad("pcb-rnd-gpmi/actions", 0);
+PkgLoad("pcb-rnd-gpmi/dialogs", 0);
+
+def ev_action(id, name, argc, x, y)
+	dialog_report("Greeting window", "Hello world!");
+end
+
+def ev_gui_init(id, argc, argv)
+	create_menu("Plugins/GPMI scripting/hello", "hello()", "h", "Ctrl<Key>w", "tooltip for hello");
+end
+
+Bind("ACTE_action", "ev_action");
+Bind("ACTE_gui_init", "ev_gui_init");
+action_register("hello", "", "log hello world", "hello()");
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.scm
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.scm	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.scm	(revision 684)
@@ -0,0 +1,12 @@
+(PkgLoad "pcb-rnd-gpmi/actions" 0)
+(PkgLoad "pcb-rnd-gpmi/dialogs" 0)
+
+(define ev_action (lambda (id name argc x y)
+  (dialog_report "Greeting window" "Hello world!")))
+
+(define ev_gui_init (lambda (id argc argv)
+  (create_menu "Plugins/GPMI scripting/hello" "hello()" "h" "Ctrl<Key>w" "tooltip for hello")))
+
+(Bind "ACTE_action" "ev_action")
+(Bind "ACTE_gui_init" "ev_gui_init")
+(action_register "hello" "" "log hello world" "hello()")
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.stt
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.stt	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.stt	(revision 684)
@@ -0,0 +1,12 @@
+(PkgLoad "pcb-rnd-gpmi/actions" 0)
+(PkgLoad "pcb-rnd-gpmi/dialogs" 0)
+
+(defun ev_action (id name argc x y)
+	(dialog_report "Greeting window" "Hello world!"))
+
+(defun ev_gui_init (id argc argv)
+	(create_menu "Plugins/GPMI scripting/hello" "hello()" "h" "Ctrl<Key>w" "tooltip for hello"))
+
+(Bind "ACTE_action" "ev_action")
+(Bind "ACTE_gui_init" "ev_gui_init")
+(action_register "hello" "" "log hello world" "hello()")
Index: doc-rnd/gpmi/rosetta/12_hello_menu/ex.tcl
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/ex.tcl	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/ex.tcl	(revision 684)
@@ -0,0 +1,15 @@
+PkgLoad pcb-rnd-gpmi/actions 0
+PkgLoad pcb-rnd-gpmi/dialogs 0
+
+proc ev_action {id, name, argc, x, y} {
+	dialog_report "Greeting window" "Hello world!"
+}
+
+proc ev_gui_init {id, argc, argv} {
+	create_menu "Plugins/GPMI scripting/hello" "hello()" "h" "Ctrl<Key>w" "tooltip for hello"
+}
+
+Bind ACTE_action ev_action
+Bind ACTE_gui_init ev_gui_init
+action_register "hello" "" "log hello world" "hello()"
+
Index: doc-rnd/gpmi/rosetta/12_hello_menu/index.html
===================================================================
--- doc-rnd/gpmi/rosetta/12_hello_menu/index.html	(nonexistent)
+++ doc-rnd/gpmi/rosetta/12_hello_menu/index.html	(revision 684)
@@ -0,0 +1,58 @@
+<html><body>
+<!-- ******* DO NOT EDIT THIS FILE, it is generated by rosetta_genpages.sh ******* -->
+&lt;-- back to the <a href="../index.html">index of Rosetta examples</a>
+<h1>hello world (popup window + submenu)</h1>
+Create a new action hello() that prints "Hello world!" in a popup window, create a menu (under "Plugins/GPMI scripting/") that executes the action.
+<H2> Example implementations </H2>
+<a href="ex.awk">awk</a>
+ | 
+<a href="ex.bash">bash</a>
+ | 
+<a href="ex.lua">lua</a>
+ | 
+<a href="ex.pl">pl</a>
+ | 
+<a href="ex.py">py</a>
+ | 
+<a href="ex.rb">rb</a>
+ | 
+<a href="ex.scm">scm</a>
+ | 
+<a href="ex.stt">stt</a>
+ | 
+<a href="ex.tcl">tcl</a>
+<h2> Explanation, step by step </h2>
+Load packages the script depends on: 
+<ul> 	
+<li> 
+<i>actions</i>
+ for registering the new action; 	
+<li> 
+<i>dialogs</i>
+ for creating a dialog box. </ul>
+ 
+<p> Create a function 
+<i>ev_action</i>
+ that will be called when any of the actions registered by the script is executed. The script registers only one action, so it does not need to check which action caused the function to be called. 
+<p> When the action event is called, use 
+<i><a href="../../packages/dialogs.html">dialog_report</a></i>
+ to pop up a report dialog. First argument donates the name (title) of the window, the second is the text printed in the window. 
+<p> Create a function 
+<i>ev_gui_init</i>
+ that will be called when the gui has been initialized - this is the right moment to register new menus in the GUI. Put the new menu item in the "Plugins/GPMI scripting/" menu by convention, and set hot key to ctrl+w. The menu should execute action hello(). 
+<p> In the "main" section of the script, bind event 
+<i><a href="../../packages/actions.html">ACTE_action</a></i>
+ to our local function 
+<i>ev_action</i>
+ - this gets 
+<i>ev_action</i>
+ to be called when any of the actions registered by this script is executed. Also bind ev_gui_init so that the new menu can be safely created. 
+<p> Finally use 
+<i><a href="../../packages/actions.html">action_register</a></i>
+ to register the action: 
+<ul> 	
+<li> first argument is the name of the action 	
+<li> second is the xy query string; it is empty since this action won't need coordinates to operate on 	
+<li> third is the description that shows up in dumps and helps 	
+<li> fourth is the syntax description (also for helps) </ul>
+ 
Index: doc-rnd/gpmi/rosetta/index.html
===================================================================
--- doc-rnd/gpmi/rosetta/index.html	(revision 683)
+++ doc-rnd/gpmi/rosetta/index.html	(revision 684)
@@ -37,6 +37,11 @@
  <td> awk bash lua perl python ruby scheme stutter tcl
  <td>Create a new action hello() that prints &quot;Hello world!&quot; in a popup window.
 <tr>
+ <td>12
+ <td><a href="12_hello_menu/index.html">hello world (popup window + submenu)</a>
+ <td> awk bash lua perl python ruby scheme stutter tcl
+ <td>Create a new action hello() that prints &quot;Hello world!&quot; in a popup window, create a menu (under &quot;Plugins/GPMI scripting/&quot;) that executes the action.
+<tr>
  <td>30
  <td><a href="30_move/index.html">action: move selected objects</a>
  <td> awk bash lua perl python ruby scheme stutter tcl