WindowTitle {Find}
WindowSize 520 340		# Taille
#ForeColor	{black}
#BackColor	{grey85}
#ShadowColor	{grey55}
#HilightColor	{grey100}
#Font		-adobe-helvetica-bold-r-*-*-12-*

Init
 Begin
  Set $CMD0={sh -c "cd; pwd"}
  Set $PATH=(GetOutput $CMD0 0 0)
  Set $NAME={}
  Set $NAMEOPT={}
  Set $NAMEOPT2={}
  Set $BODY={}
  Set $BODYOPT={}
  Set $REC={-maxdepth 1 }
  ChangeTitle 5 $PATH
  ChangeTitle 7 $NAME
  ChangeTitle 9 $BODY
 End

PeriodicTasks
 Begin
  Set $MSG=(ReceivFromScript $BROWSER)
  If $MSG <> {No message} Then
   ChangeTitle 5 $MSG
 End

Widget 1
Property
 Size 70 18
 Position 25 300
 Flags NoReliefString
 Type PushButton
 Title {Search}
Main
 Case message of
  SingleClic :
  Begin
   If (GetValue 12) == 1 Then
    Set $REC={}
   Else
    Set $REC={-maxdepth 1 }
   Set $PATH=(GetTitle 5)
   Set $NAME=(GetTitle 7)
   If $NAME == {} Then
    Set $NAMEOPT={}
   Else
    Set $NAMEOPT={-name } $NAME
   Set $BODY=(GetTitle 9)
   If $BODY == {} Then
    Begin
    Set $BODYOPT={}
    Set $TYPE={}
    End
   Else
    Begin
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
    Set $TYPE={-in
    Set $BODYOPT={|xargs grep -l "} $BODY {"}
 