find key(s) I/O


          function findkey(wString){ 
                  keyid = 0;
                  found = false;
                  testkey(wString);
                  if( keyid >= keyNotFound ){ keyid = keyNotFound; }
                    return keyid;                  
          }