三线反转源码.docVIP

三线反转，又称三价线，是《股票K线战法》一书中记录的，日本证券界常用的股票价格线图。该图的绘制中，仅考虑股票的价格，而不考虑时间，故无法与常用的阴阳线同图显示。本源码对此进行改进，根据三线反转图中黑白块对应的时间，对其宽度进行调整，使三线反转图可以与标准的阴阳线图对应显示。 源码如下，适用于飞狐交易师软件： VARIABLE: fc:=close,fh:=h,fl:=l,fcolor:=0,ft1:=0,fb1:=0,fi:=0,t[4]=0,b[4]=0,pt=1,pb=1; if datacount2 then exit; for i=1 to 4 do begin t[i]:=i;b[i]:=1; end; for i=2 to datacount do begin if fc[i]fc[t[pt]] then begin fh[i]:=fc[i];fl[i]:=fc[t[1]];fcolor[i]:=1; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=t[1]; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=i; pt:=1; pb:=if(pb=3,3,pb+1); end; else if