作者:
sonone (有容之行)
2016-04-25 22:49:10※ 引述《xxyyzzxyz627 (MrWUYUAN)》之銘言:
: inputs:VL(20) ;
: vars : intrabarpersist TUpVol(0),intrabarpersist TDVol(0),
: intrabarpersist TUpTicks(0),intrabarpersist TDownTicks(0),
: intrabarpersist TPreTime_s(0),intrabarpersist TTime_s(0), intrabarpersist
: TTimes_s(0), intrabarpersist TUVol(0),
: TColor(0);
: if LastBarOnChart_s then begin
: TPreTime_s=TTime_s;
: TTimes_s=BarNumber;
>>這邊缺End;
: if TPreTime_s<>TTime_s then begin
: TUVol=0;
: TDVol=0;
: end;
>>我沒看錯的話,你把這段歸零拿掉就好了
如果你是要做跨日從新計算,就把條件句改成:
if date<>date[1] then begin
這樣就好了
: if UpTicks - TUpTicks >= VL then TUVol=TUVol+UpTicks-TUpTicks;
: if DownTicks -TDownTicks >= VL then TDVol=TDVol+DownTicks-TDownTicks;
: if TUVol > TDVol then TColor = Red else TColor = green ;
: TUpTicks=UpTicks;
: TDownTicks = DownTicks;
: end;
: Plot1(TUVol-TDVol,"",TColor);
: 上面的文法 只會出現當根累積量 請問要刪掉那些 才會變持續累積量呢 謝謝