求救:分價量
版主大大您好:
我把Close>MaxVolC 貼在程式最後一行,可是他卻出現
行25:條件選股只能有一個輸出表達式
如下:
UseSC:=C;
UseSV:=V;
UseCP:=UseSC;
UseVP:=V;
//以價大小排序
x:=SORT(UseSC,0,1,datacount); //排序後將結果存入 UseC
x:=SORTPos(UseCP,0,1,datacount); //排序後將原本位置存入 UseCP
//將量依據前面排序結果位置存放入 UseSV
for i=1 to datacount do begin
UseSV[i]:=UseVP[UseCP[i]];
end;
//標示每個價的起點(StP=1)
StP:=barpos=1 or ref(UseSC,1)<UseSC;
//加總每個價的量
SVV:=sum(UseSV,barslast(StP)+1);
//找出最大量的價的位置
HVP:=hhvbars(SVV,0);
HVP:=datacount-HVP[datacount];
MaxVolC:UseSC[HVP];
MaxVolV:SVV[HVP];
Close>MaxVolC
懇請版主賜教,要如何修改才能條件選股選出成交價大於成交量最大價位的股票,謝謝!
|