主题：求助编写公式，谢谢！

cd30:=callstock(stklabel,vtclose,4);
cd301:=callstock(stklabel,vtclose,4,-1);

cd3:=callstock(stklabel,vtclose,17);
cd31:=callstock(stklabel,vtclose,17,-1);

tb:=(cd>cd1 and cd30>cd301 and cd3>cd31) or (cd<cd1 and cd30<cd301 and cd3<cd301);

h1:=callstock(stklabel,vthigh,6,-1);
oo:=valuewhen(todaybar,o);

if oo>h1+20*mindiff and isdown and ref(isup,1) and (((h-o)/ref(c-o,1)>(1/3)) or ((o-c)>ref(c-o,1))) then begin
 
 buyshort(holding=0,1,marketr);
end