飞狐真人均线公式源码 飞狐指标公式源码(2)

d12:=F10FIND(stx,d11);
tj1:=BETWEEN(d12,d11,d21);
if tj1 then begin
d13:=F10FIND(tx,d12+10);
bt1:=F10TEXT(d12,0);
d14:=STRLEN(bt1)+4;
dtx1:=F10TEXT(d12+d14,d13-d12-d14);
end;
d22:=F10FIND(stx,d21);
tj2:=BETWEEN(d22,d21,d31);
if tj2 then begin
d23:=F10FIND(tx,d22+10);
bt2:=F10TEXT(d22,0);
d24:=STRLEN(bt2)+4;
dtx2:=F10TEXT(d22+d24,d23-d22-d24);
end;
d32:=F10FIND(stx,d31);
tj3:=BETWEEN(d32,d31,d41);
if tj3 then begin
d33:=F10FIND(tx,d32+10);
bt3:=F10TEXT(d32,0);
d34:=STRLEN(bt3)+4;
dtx3:=F10TEXT(d32+d34,d33-d32-d34);
end;
d42:=F10FIND(stx,d41);
tj4:=d42>d41;
if tj4 then begin
d43:=F10FIND(tx,d42+10);
bt4:=F10TEXT(d42,0);
d44:=STRLEN(bt4)+4;
dtx4:=F10TEXT(d42+d44,d43-d42-d44);
end;
P:=SYSPARAM(1);
EXPLAIN(tj1,tx1+'\n'+bt1),COLORRED;
EXPLAIN(tj1,dtx1),COLORWHITE;
EXPLAIN(tj2,tx2+'\n'+bt2),COLORYELLOW;
EXPLAIN(tj2,dtx2),COLORWHITE;
EXPLAIN(tj3,tx3+'\n'+bt3),COLORBLUE;
EXPLAIN(tj3,dtx3),COLORWHITE;
EXPLAIN(tj4,tx4+'\n'+bt4),COLORMAGENTA;
EXPLAIN(tj4,dtx4),COLORWHITE;
fy1:=year;fd1:=date;txs1:=0*date;
for iP= DATACOUNT-Np to DATACOUNT do BEGIN
stx1:=tx+NUMTOSTR(fy1[IP],0)+'-'+STRMID(NUMTOSTR(fd1[IP],0),4,2)+'-'+STRRIGHT(NUMTOSTR(fd1[IP],0), 2)+'】';
DRAWTEXT(P=BARPOS,SYSPARAM(5),STX),ALIGN2;
txs1[IP]:=if(F10FIND(STX1,D11)<>-1,1,0);
DRAWTEXT(txs1=1 ,SYSPARAM(4),'信\n息'),PXDN20,ALIGN0;//信息显示
DRAWICON(txs1=1 ,SYSPARAM(4),10),ALIGN0;//信息显示
END;

上一页  [1] [2] [3] 下一页