+sub spawn_gui {
+ my $base = shift;
+ open(APPLET,"|appletviewer -J-Djava.security.policy=applet.policy /dev/stdin");
+ print APPLET '<HTML><HEAD><TITLE>RSB S2 User Interface</TITLE></HEAD>';
+ print APPLET '<BODY>';
+ print APPLET '<object width="640" height="480">';
+ print APPLET '<param name="code" value="com/agilent/rmc/mgui/RmcUI.class">';
+ print APPLET '<param name="codebase" value="'.$base.'/">';
+ print APPLET '<param name="archive" value="gui.jar, msa_shared.jar, msa_shared_comm.jar, msa_shared_oem.jar">';
+ print APPLET '</object>';
+ print APPLET '</BODY></HTML>';
+ close(APPLET);
+}
+