function listfind() {
// listfind(Name of item to find,
// Value of item to find,
// [Plain HTML output, Name of item
// the value of which to output]xN,
// [Plain HTML output], Array of
// records)
// Outputs a list using records that
// match conditions, outputting a mix
// of record item values and other
// HTML.
 argmntslf = listfind.arguments;
 lngthlf = argmntslf.length;
 namelf = argmntslf[0];
 valuelf = argmntslf[1];
 xdata = argmntslf[lngthlf - 1];
 lngthdata = xdata.length;
 idata = 0;
 markerlf = 0;
 while (markerlf == 0) {
  if (idata > lngthdata - 2) {
   markerlf = 1;
  } else {
   if (xdata[idata] == namelf) {
    if (xdata[idata + 1] == valuelf) {
     jlf = 2;
     markerlf2 = 0;
     while (markerlf2 == 0) {
      if (jlf > lngthlf - 2) {
       markerlf2 = 1;
      } else {
       document.write(argmntslf[jlf]);
       if (jlf + 1 > lngthlf - 2) {
        markerlf2 = 1;
       } else {
        markerlf3 = 0;
        while (markerlf3 == 0) {
         if (idata == 0) {
          markerlf3 = 1;
         } else {
          if (xdata[idata] == "") {
           idata = idata + 1;
           markerlf3 = 1;
          } else {
           idata = idata - 1;
        }}}
        markerlf3 = 0;
        while (markerlf3 == 0) {
         klf = argmntslf[jlf + 1];
         if (xdata[idata] == klf) {
          klf = xdata[idata + 1];
          document.write(klf);
          markerlf3 = 1;
         } else {
          if (idata + 4 > lngthdata) {
           markerlf3 = 1;
          } else {
           klf = xdata[idata + 1];
           if (klf == "") {
            markerlf3 = 1;
           } else {
            klf = xdata[idata + 2];
            if (klf == "") {
             markerlf3 = 1;
            } else {
             idata = idata + 2;
       }}}}}}
       jlf = jlf + 2;
     }}
     markerlf2 = 0;
     while (markerlf2 == 0) {
      if (idata > lngthdata - 2) {
       markerlf2 = 1;
      } else {
       if (xdata[idata] == "") {
        idata = idata + 1;
        markerlf2 = 1;
       } else {
        idata = idata + 1;
     }}}
    } else {
     idata = idata + 2;
    }
   } else {
    if (xdata[idata] == "") {
     idata = idata + 1;
    } else {
     idata = idata + 2;
}}}}}
