理想超赢 雨杨公式接口(源码)
说明：雨杨DDEDATA.DLL公式接口 数据 才能用。
C/C++ Code复制内容到剪贴板
- {LX散户线}
- TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT;
- HS:=vol/capital;
- DD1:=-(BIGORDER(1,1)-BIGORDER(2,1));
- DD2:=-("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(2,1));
- DD:IF(TODAY,DD2,DD1),linethick0;
- DT:=HS*DD*100;
- 散户持仓: Sum(DT,0),COLORFFFFFF,linethick2;
- {当日增减度: DT, linethick0;
- STICKLINE(DT>0,散户持仓,散户持仓+DT,5,0),COLORRed;
- STICKLine(DT<0,散户持仓+DT,散户持仓,5,0),COLORGreen;}
- DRAWTEXTREL(0,0,'LX超赢散户线'),COLORYELLOW;
C/C++ Code复制内容到剪贴板
- {LX-SVZJ}
- JE:=((amount*BIGORDER(1,2))-(amount*BIGORDER(2,2)))/10000;
- TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT;
- JE1:=((amount*"DDEDATA@BIGORDER"(1,2))-(amount*"DDEDATA@BIGORDER"(2,2)))/10000;
- 净额:IF(TODAY,JE1,JE),linethick0;
- 十日飘红:count(净额>0,10),colorred;
- 连续飘红:last(净额>0);
- stickline(净额>0,0,净额,3,0),colorred,linethick2;
- stickline(净额<0,净额,0,3,0),colorgreen,linethick2;
- 0,dotline,colorwhite;
- drawtextabs(0,0,'理想资金流');
C/C++ Code复制内容到剪贴板
- {LX-SVZL}
- TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT;
- HS:=vol/capital;
- DD1:=BIGORDER(1,3)-BIGORDER(2,3);
- DD2:= "DDEDATA@BIGORDER"(1,3)- "DDEDATA@BIGORDER"(2,3);
- DD:=IF(TODAY,DD2,DD1);
- DT:=HS*DD*100;
- 机构持仓: Sum(DT,0),linethick2;
- 当日增减度: DT, linethick0;
- STICKLINE(DT>0,机构持仓,机构持仓+DT,2,0),COLORRed;
- STICKLine(DT<0,机构持仓+DT,机构持仓,2,0),COLORGreen;
- 当日成交 := (DT * capital) * DYNAINFO(11)/10000;
- 买入手数 := (capital*DT)/100;
- if (当日成交>=0) then
- begin
- Str1:= '净买入：'+ NUMTOSTRN(当日成交,0)+'万元,';
- Str2 := '净买入：'+ NUMTOSTRN(买入手数,0)+'手,';
- Str3 := '当日增减度：' + NUMTOSTRN(DT,3);
- end;
- if 当日成交<0 then
- begin
- Str1:= '净卖出：'+ NUMTOSTRN(当日成交,0)+'万元,';
- Str2 := '净卖出：'+ NUMTOSTRN(买入手数,0)+'手,';
- Str3 := '当日增减度：' + NUMTOSTRN(DT,3);
- end;
- DRAWFLAGTEXT(DT>=0,机构持仓,Str1+str2+str3),COLORRED;
- DRAWFLAGTEXT(DT<0,机构持仓,Str1+str2+str3),COLORGREEN;
- DRAWTEXTREL(0,0,'理想超赢主力持仓'),COLORYELLOW;
