DEF FOCUSHANDLER Script {
      eventIn SFNode 
  requestFocus
      field   SFNode currentFocus NULL
      field   SFNode inputHandler USE INPUTHANDLER
      field   SFInt32 oldMask 0
      url "vrmlscript:
   
         function initialize()
          {
              // tell what events
              oldMask = Browser.eventMask;
              Browser.eventMask = 1<<5; // KeyDown Only...
              // add event observer
              Browser.addRoute(Browser,'event_changed',inputHandler,'onEvent');
   
         }
          function shutdown()
          {
              requestFocus(null,0);
              // remove event observer
              Browser.eventMask = oldMask;
              Browser.deleteRoute(Browser,'event_changed',inputHandler,'onEvent');
   
         }
          function requestFocus(value,time) {
              if(currentFocus != null) {
  //                Browser.print('Removing keyboard focus from thing...');
                  Browser.deleteRoute(inputHandler,'charCode',
   
                                     currentFocus,'characterInput');
                  currentFocus.setTransparency = 0.8;
              }
              currentFocus = null;
              if(value != null) {
  //                Browser.print('Adding keyboard focus for thing...');
                  currentFocus 
  = value;
                  Browser.addRoute(inputHandler,'charCode',
                                   currentFocus,'characterInput');
                  currentFocus.setTransparency 
  = 0;
              }
          }
      "
  }