/* Remove extra lines from WD LC output */
Parse Arg F
Started=0
Do While Lines(F)>0
   a=Linein(F)
   If Started=0 then Do
      Parse Var a First Second Rest
      First=Strip(First)
      Second=Strip(Second)
   End
/* Say First ">" Second */
   If First="Y" & Second="Sky" & Started=0 then Do
      Started=1
      Iterate
   End
   If a="" & Started=1 then Leave
   If Started=1 then Say a
End
Exit