通达信【破茧成蝶】大富大贵人上人主图+选股指标用法详解
gspt1:=CLOSE=ZTPRICE(REF(CLOSE,1),0.1);
gspt2:=HIGH=ZTPRICE(REF(CLOSE,1),0.1) AND CLOSE<HIGH;
gspt3:=CLOSE=ZTPRICE(REF(CLOSE,1),0.2);
gspt4:=HIGH=ZTPRICE(REF(CLOSE,1),0.2) AND CLOSE<HIGH;
gspt5:=BARSLAST(CLOSE=LLV(CLOSE,60));
gspt6:=BETWEEN(gspt5,1,60) AND CLOSE/REF(CLOSE,1)>1.043;
gspt7:=gspt6 AND COUNT(gspt6,gspt5)=1;
gspt8:=BARSLAST(CLOSE=LLV(CLOSE,BARSLAST(gspt7)));
gspt9:=gspt8=1 AND CLOSE>REF(CLOSE,gspt8) AND HIGH>LOW;
gspt10:=STRCAT(HYBLOCK,' ');
gspt11:=STRCAT(gspt10,DYBLOCK);
gspt12:=STRCAT(gspt11,' ');
gspt13:=BARSLAST(COUNT(gspt9,BARSLAST(gspt7))=1 AND gspt9);
gspt14:=BARSLAST(COUNT(gspt9,BARSLAST(gspt7))=2 AND gspt9);
gspt15:=BARSLAST(COUNT(gspt9,BARSLAST(gspt7))=3 AND gspt9);
gspt16:=COUNT(gspt9,BARSLAST(gspt7))>3;
gspt17:=MAX(REF(CLOSE,gspt13),REF(CLOSE,gspt14));
gspt18:=MAX(gspt17,REF(CLOSE,gspt15));
gspt19:=IF(COUNT(gspt9,BARSLAST(gspt7))=1,REF(CLOSE,gspt13),0);
gspt20:=IF(COUNT(gspt9,BARSLAST(gspt7))=2,gspt17,0);
gspt21:=IF(COUNT(gspt9,BARSLAST(gspt7))=3,gspt18,0);
STICKLINE(gspt1,CLOSE,OPEN,2,0),COLORYELLOW;
STICKLINE(gspt2,CLOSE,OPEN,2,0),COLORMAGENTA;
STICKLINE(gspt3,CLOSE,OPEN,2,0),COLORRED;
STICKLINE(gspt4,CLOSE,OPEN,2,0),COLORWHITE;
STICKLINE(gspt7,HIGH*1.1,LOW*0.9,0.3,1);
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(gspt12,GNBLOCK)),COLORRED;
地平线:CONST(gspt19+gspt20+gspt21),COLORMAGENTA;
gspt22:=CLOSE>=地平线 AND CLOSE/REF(CLOSE,1)>1.043;
gspt23:=COUNT(gspt22,BARSLAST(gspt7))=1 AND gspt22;
{，公式源码 }
VAR28:=CONST(REF(CLOSE,BARSLAST(gspt23)));
VAR29:=IF(gspt16 OR BARSLAST(gspt23)>BARSLAST(gspt7),0,VAR28);
DRAWTEXT(gspt23,1.03*HIGH,'破茧成蝶'),COLORYELLOW;
DRAWTEXT(BARSLASTCOUNT(gspt16)=1,0.97*LOW,'作茧自缚'),COLORWHITE;
DRAWICON(gspt23,0.99*LOW,29);
DRAWICON(BARSLASTCOUNT(gspt16)=1,LOW,9);
起飞线:CONST(VAR29),COLORGREEN;
来函数检测结果如下：
该公式没有未来函数
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
GSPT1赋值:收盘价=ZTPRICE(1日前的收盘价,0.1)
GSPT2赋值:最高价=ZTPRICE(1日前的收盘价,0.1) AND 收盘价<最高价
GSPT3赋值:收盘价=ZTPRICE(1日前的收盘价,0.2)
GSPT4赋值:最高价=ZTPRICE(1日前的收盘价,0.2) AND 收盘价<最高价
GSPT5赋值:上次收盘价=60日内收盘价最低值距今天数
GSPT6赋值:BETWEEN(GSPT5,1,60) AND 收盘价/1日前的收盘价>1.043
GSPT7赋值:GSPT6 AND 统计GSPT5日满足GSPT6的天数=1
GSPT8赋值:上次收盘价=LLV(收盘价,BARSLAST(GSPT7距今天数))
GSPT9赋值:GSPT8=1 AND 收盘价>GSPT8日前的收盘价 AND 最高价>最低价
GSPT10:=STRCAT(HYBLOCK,' ')
GSPT11:=STRCAT(GSPT10,DYBLOCK)
GSPT12:=STRCAT(GSPT11,' ')
GSPT13:=上次COUNT(GSPT9,BARSLAST(GSPT7距今天数)=1 AND GSPT9)
GSPT14:=上次COUNT(GSPT9,BARSLAST(GSPT7距今天数)=2 AND GSPT9)
GSPT15:=上次COUNT(GSPT9,BARSLAST(GSPT7距今天数)=3 AND GSPT9)
GSPT16:=COUNT(GSPT9,上次GSPT7距今天数)>3
GSPT17:=GSPT13日前的收盘价和GSPT14日前的收盘价较大值
GSPT18:=GSPT17和GSPT15日前的收盘价较大值
GSPT19:=IF(COUNT(GSPT9,上次GSPT7距今天数)=1,GSPT13日前的收盘价,0)
GSPT20:=IF(COUNT(GSPT9,上次GSPT7距今天数)=2,GSPT17,0)
GSPT21:=IF(COUNT(GSPT9,上次GSPT7距今天数)=3,GSPT18,0)
当满足条件GSPT1时,在收盘价和开盘价之间画柱状线
当满足条件GSPT2时,在收盘价和开盘价之间画柱状线
当满足条件GSPT3时,在收盘价和开盘价之间画柱状线
当满足条件GSPT4时,在收盘价和开盘价之间画柱状线
当满足条件GSPT7时,在最高价*1.1和最低价*0.9之间画柱状线
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(GSPT12,GNBLOCK)),画红色
输出地平线:CONST(GSPT19+GSPT20+GSPT21),画洋红色
GSPT22:=收盘价>=地平线 AND 收盘价/1日前的收盘价>1.043
GSPT23:=COUNT(GSPT22,上次GSPT7距今天数)=1 AND GSPT22
{，公式源码 }VAR28赋值:CONST(REF(收盘价,上次GSPT23距今天数))
VAR29赋值:IF(GSPT16 OR 上次GSPT23距今天数>BARSLAST(GSPT7),0,VAR28)
当满足条件GSPT23时,在1.03*最高价和'破茧成蝶'位置书写文字
DRAWTEXT(BARSLASTCOUNT(GSPT16)=1,0.97*最低价,'作茧自缚'),画白色
当满足条件GSPT23时,在0.99*最低价和29之间画图标
DRAWICON(BARSLASTCOUNT(GSPT16)=1,最低价,9)
输出起飞线:CONST(VAR29),画绿色
