股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[飞狐] 涨幅量尺(主图 源码 帖图)


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2023-10-25 14:40:52

以下是涨幅量尺(主图 源码 帖图)

此指标是以不同条件综合研判作参考买卖。以EMA17为价托参考涨幅度X% MACD 量 布林线做决断。只作为参考提示!!
指标无好坏,不同设定的条件理解就是好的。

{草根 涨幅量尺}
INPUT:XS(0,0,1),CY1(0,0,5),p2(0,0,255),df(0,0,555),BOL(0,0,999),FA(0,0,3),高H(0,0,255);
STICKLINE(C>=O,low,high,0.5,0),colorFF;
STICKLINE(C>=O,close,open,8,0),color102088;
STICKLINE(C>=O,close,open,7,0),color102099;
STICKLINE(C>=O,close,open,6,0),color1020AA;
STICKLINE(C>=O,close,open,5,0),color1020BB;
STICKLINE(C>=O,close,open,4,0),color1020CC;
STICKLINE(C>=O,close,open,3,0),color1020DD;
STICKLINE(C>=O,close,open,2,0),color1020EE;
STICKLINE(C>=O,close,open,1,0),color1020FF;
STICKLINE(C<=O,low,high,0.5,0),colorFF8800;
STICKLINE(C<=O,close,open,8,0),colorFF7700;
STICKLINE(C<=O,close,open,7,0),colorFF8800;
STICKLINE(C<=O,close,open,6,0),colorFF9900;
STICKLINE(C<=O,close,open,5,0),colorFFAA00;
STICKLINE(C<=O,close,open,4,0),colorFFBB00;
STICKLINE(C<=O,close,open,3,0),colorFFCC00;
STICKLINE(C<=O,close,open,2,0),colorFFDD00;
STICKLINE(C<=O,close,open,1,0),colorFFEE00;
TTt:=ISLASTBAR=1;
AS1:=((H-L)/L)*100;
AS2:=H-L;
MAI:=C*1.015;
MAII:=C*1.03;
DRAWTEXTEX(TTT,0,310,1,'▼明短线赢利[1.5%--3%:]'+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+'--'+NUMTOSTR(MAII [SYSPARAM(1)],2)),Color00dd00;
DRAWTEXTEX(TTt,0,176,1,'【振幅:'+NUMTOSTR(AS1[SYSPARAM(1)],2)+'% '+NUMTOSTR(AS2[SYSPARAM(1)],2)+'元 】'+''),Colordddd00;
DRAWTEXTEX(TTT,0,1,1,'【代码:'+STKLABEL+' 名称:'+STKNAME+'】'),ColorffFFFF;DRAWTEXTEX(TTT,0,270,14,'【创于2010.11.20晚】'),ColorffFFFF;
TT1:=ISLASTBAR=1;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC1:IF(JJJT,0.01*EMA(AMOUNT,CY1)/EMA(VOL,5),EMA((HIGH+LOW+CLOSE)/3,CY1)),COLORFFFFFF;
DRAWTEXT(TT1,CYC1,'5:'+NUMTOSTR(CYC1,2)),COLORffffff;
as:=(o+h+l+c)/4;
BLM: MA(C,p2),linethick1,Color00FF00;
BLT:=BARSTATUS=2;
DRAWTEXT(BLT AND BLM>REF(BLM,1),BLM,'↑'+NUMTOSTR(p2,0)+':'+NUMTOSTR(BLM,2)),COLORCC00CC;
DRAWTEXT(BLT AND BLM<REF(BLM,1),BLM,'↓'+NUMTOSTR(p2,0)+':'+NUMTOSTR(BLM,2)),Color00CC00;
BQ:=IF((SYSPARAM(1) = (BARSSINCE((C > 0)) + 1)),1,0);
BQ1:=(H<REF(L,1));BQ2:=(L>REF(H,1));
BQ3:=REF(L,1)-H; BQ4:=L-REF(H,1);
BQ5:=REF(L,1); BQ6:=H;
BQ7:=REF(H,1); BQ8:=L;
QZH:=IF(BQ1,BQ1,BQ2);
QZH1:=IF(BQ1,BQ5,BQ7);
QZH2:=IF(BQ1,BQ6,BQ8);
QK:=IF(C>O,C,O);
QK1:=IF(C>O,O,C);
QKA:=IF(C>O,o+(c-o)*0.65,o+(c-o)*0.35);
QKB:=IF(C>O,o+(c-o)*0.35,o+(c-o)*0.65);
STICKLINE(BQ1,QKA,QK,5.5,0),colorEE0000;
STICKLINE(BQ2,QKB,QK1,5,0),color20CEEE;
DRAWTEXT(((BQ > 0) AND Bq1),H,'↓缺口 '+'\n '+NUMTOSTR(BQ3[SYSPARAM(1)],2)+' '+'\n '+NUMTOSTR(BQ5[SYSPARAM(1)],2)+'-'+NUMTOSTR(BQ6[SYSPARAM(1)],2)+' '),colorFFFFEE,pxdn10,ALIGN2;
DRAWTEXT(((BQ > 0) AND Bq2),L,'↑缺口 '+'\n '+NUMTOSTR(BQ4[SYSPARAM(1)],2)+' '+'\n '+NUMTOSTR(BQ7[SYSPARAM(1)],2)+'-'+NUMTOSTR(BQ8[SYSPARAM(1)],2)+' '),color00FFEE,pxup20,ALIGN2;
DRAWSL(SYSPARAM(1)=BARPOS AND QZH,QZH1,0,0,0),COLOR888888;
DRAWSL(SYSPARAM(1)=BARPOS AND QZH,QZH2,0,0,0),COLOR888888;
QKD:=BQ8[DATACOUNT]; QKE:=0;
QK:=IF(BQ2,1,IF(BQ1,-1,0));
for I=DATACOUNT-1 downto 2 do begin
IF BQ8[I ]<QKD then QKD:=BQ8 [I ];
IF BQ6[I ]>QKE then QKE:=BQ6 [I ];
IF QK[I ]=1 and QKD<=BQ6[I-1] then QK [I ]:=0;
IF QK[I ]=-1 and QKE>=BQ8[I-1] then QK [I ]:=0;
end;
DRAWTEXT(QK=1,BQ8,'未补'),COLOR999999,PXUP;
DRAWTEXT(QK=-1,BQ6,'未补 '),COLOR999999,PXDN ;
BLx:EMA(as,17),color00ffFF,linethick2;
DRAWTEXT(BLT AND BLX>REF(BLX,1),BLX,'↑'+NUMTOSTR(BLX,2)),COLOR00CCCC;
DRAWTEXT(BLT AND BLX<REF(BLX,1),BLX,'↓'+NUMTOSTR(BLX,2)),Color00CCCC;
xgm:=CROSS(c,BLx);
PARTLINE(BLX<REF(BLX,1),BLX),colorff0000,linethick2;
DRAWTEXT((BQ>0) AND xgm,BLx,'上穿E17 '),pxDN6,COLORYELLOW,ALIGN1;
PARTLINE(xgm,BLx),CROSSDOT,LINETHICK1,COLOR00FFfff;
BLS: BLX+2.58*STDP(C,BOL),linethick1,Color00FFFF,LINEDOT;
BL2: BLX+1.96*STDP(C,BOL),linethick1,ColorFF00FF,LINEDOT;
BL3: BLX-1.96*STDP(C,BOL),linethick1,ColorF0FF00,LINEDOT;
BLY: BLX-2.58*STDP(c,BOL),linethick1,Color00FF00,LINEDOT;
BLT:=BARSTATUS=2;
DRAWTEXT(BLT AND BLS>REF(BLS,1),BLS,'↑:'+NUMTOSTR(BLS,2)),COLOR00ffff;
DRAWTEXT(BLT AND BLS<REF(BLS,1),BLS,'↓:'+NUMTOSTR(BLS,2)),Color4BFACE;
DRAWTEXT(BLT AND BL2>REF(BL2,1),BL2,'↑:'+NUMTOSTR(BL2,2)),COLORMAGENTA;
DRAWTEXT(BLT AND BL2<REF(BL2,1),BL2,'↓:'+NUMTOSTR(BL2,2)),ColorF29BE1;
DRAWTEXT(BLT AND BL3>REF(BL3,1),BL3,'↑:'+NUMTOSTR(BL3,2)),COLORffff00;
DRAWTEXT(BLT AND BL3<REF(BL3,1),BL3,'↓:'+NUMTOSTR(BL3,2)),ColorFAD994;
DRAWTEXT(BLT AND BLY>REF(BLY,1),BLY,'↑:'+NUMTOSTR(BLY,2)),COLOR00ff00;
DRAWTEXT(BLT AND BLY<REF(BLY,1),BLY,'↓:'+NUMTOSTR(BLY,2)),ColorB7FD91;
LC := REF(CLOSE,1);
RSI1:=



回复

举报

QQ|

GMT+8, 2024-11-16 22:40

快速回复 返回顶部 返回列表