Is there a expert adviser for the darvas box indicator located at this link http://forum.equis.com/viewtopic.php?t=352 something along the lines of a bull/bear ribbon at the bottom of the chart to indicate when it is a buy or sell. Thank you for your time.

It looks like you're going to have to do some of the work yourself. ;) Try using the "Darvas Box - Buy & Sell" formula found in the MACDH Divergence kit's documentation. jose '-)

Ok thanks for all the help. Sorry if I'm being a pain but I dont have the first clue about programing in metastock or any programing at all. I was hoping someone would have a explorer for the darvas box that I could copy and past into my metastock program, but it seems that is not the case and thats fine.

Here is my version for both buy and sell LL:=If(L=LLV(L,5),L,If(Ref(L,-1)=LLV(L,5),Ref(L,-1),If(Ref(L,-2)=LLV(L,5),Ref(L,-2),If(Ref(L,-3)=LLV(L,5),Ref(L,-3),If(Ref(L,-4)=LLV(L,5),Ref(L,-4),0))))); HH:=If(H=HHV(H,5),H,If(Ref(H,-1)=HHV(H,5),Ref(H,-1),If(Ref(H,-2)=HHV(H,5),Ref(H,-2),If(Ref(H,-3)=HHV(H,5),Ref(H,-3),If(Ref(H,-4)=HHV(H,5),Ref(H,-4),0))))); NH:=ValueWhen(1,H>Ref(HHV(H,5),-1),H); NL:=ValueWhen(1,L<Ref(LLV(L,5),-1),L); Set1:=HHV(H,3)<HHV(H,4); Set2:=LLV(L,3)>LLV(L,4); Val1:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND Set1=true,NH); Val2:=ValueWhen(1,BarsSince(L<Ref(LLV(L,5),-1))=3 AND Set2=true,NL); Val3:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND Set1=true,LL); Val4:=ValueWhen(1,BarsSince(L<Ref(LLV(L,5),-1))=3 AND Set2=true,HH); Per1:=Input("max length",10,100,30); RWH:=(H-Ref(L,-Per1))/(ATR(Per1)*Sqrt(Per1)); RWL:=(Ref(H,-Per1)-L)/(ATR(Per1)*Sqrt(Per1)); Pk:=Mov((RWH-RWL),3,W); TB:=If(Pk>0,Val1,Val4); BB:=If(Pk>0,Val3,Val2); If(Cross(C,TB),1,If(Cross(BB,C),-1,0)); Here is the original version for long LL:=If(L=LLV(L,5),L,If(Ref(L,-1)=LLV(L,5),Ref(L,-1),If(Ref(L,-2)=LLV(L,5),Ref(L,-2),If(Ref(L,-3)=LLV(L,5),Ref(L,-3),If(Ref(L,-4)=LLV(L,5),Ref(L,-4),0))))); NH:=ValueWhen(1,H>Ref(HHV(H,5),-1),H); Set1:=HHV(H,3)<HHV(H,4); Val1:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND Set1=true,NH); Val2:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND Set1=true,LL); TB:=Val1; BB:=Val2; If(Cross(C,TB),1,If(Cross(BB,C),-1,0)); The explorations will give +1 for a close crossing above the top band and -1 for a close crossing below the Bottom band

LL:=If(L=LLV(L,5),L,If(Ref(L,-1)=LLV(L,5),Ref(L,-1),If(Ref(L,-2)=LLV(L,5),Ref(L,-2),If(Ref(L,-3)=LLV(L,5),Ref(L,-3),If(Ref(L,-4)=LLV(L,5),Ref(L,-4),0))))); HH:=If(H=HHV(H,5),H,If(Ref(H,-1)=HHV(H,5),Ref(H,-1),If(Ref(H,-2)=HHV(H,5),Ref(H,-2),If(Ref(H,-3)=HHV(H,5),Ref(H,-3),If(Ref(H,-4)=HHV(H,5),Ref(H,-4),0))))); NH:=ValueWhen(1,H>Ref(HHV(H,5),-1),H); NL:=ValueWhen(1,L<Ref(LLV(L,5),-1),L); Set1:=HHV(H,3)<HHV(H,4); Set2:=LLV(L,3)>LLV(L,4); Val1:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND Set1=true,NH); Val2:=ValueWhen(1,BarsSince(L<Ref(LLV(L,5),-1))=3 AND Set2=true,NL); Val3:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND Set1=true,LL); Val4:=ValueWhen(1,BarsSince(L<Ref(LLV(L,5),-1))=3 AND Set2=true,HH); Per1:=30; RWH:=(H-Ref(L,-Per1))/(ATR(Per1)*Sqrt(Per1)); RWL:=(Ref(H,-Per1)-L)/(ATR(Per1)*Sqrt(Per1)); Pk:=Mov((RWH-RWL),3,W); TB:=If(Pk>0,Val1,Val4); BB:=If(Pk>0,Val3,Val2); If(Cross(C,TB),1,If(Cross(BB,C),-1,0)); This just uses a default 30 for the peak osc which if >0 displays the long version, <0 displays the short version of a darvas box