当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码:牛股启动,缠论绝密指标,缠论中枢

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

牛股启动:

在优化其他人的主图指标并添加我自己的想法之后,该公式已集成。 再次感谢其他人的想法!

  我感觉很好。 一看便知,我可以看到盈亏。 购买价格,购买次数和持有天数都显示在主地图上。 有提示。 将其下载给喜欢它的朋友。
  购买股票后,打开主图片的源代码并填写提示,显示在主图片上购买的股票的状况。 您可以同时显示三只股票。 如果要显示更多,可以修改源代码。


{牛股启动主图}
代码1:=CODELIKE('603596');{分别在年、月、日及买入价位、买入股数等处填入实际数据}
买入时间1:=YEAR{年}=2019 AND MONTH{月}=8 AND DAY{日}=15;
买入价位1:=13.45;
买入股数1:=8000;
天数1:=BARSLAST(买入时间1);
{第二只个股,填入代码、买入时间、价位及股数}
代码2:=CODELIKE('300356');{在[0]位置处填写个股代码}
买入时间2:=YEAR{年}=2019 AND MONTH {月}=12 AND DAY{日}=30;
买入价位2:=7.78;
买入股数2:=9000;
天数2:=BARSLAST(买入时间2);
{第三只个股,填入代码、买入时间、价位及股数}
代码3:=CODELIKE('0');
买入时间3:=YEAR{年}=0 AND MONTH{月}=0 AND DAY{日}=0;
买入价位3:=0;
买入股数3:=0;
天数3:=BARSLAST(买入时间3);
{1}
买入个股时间1:=IF(代码1,买入时间1,0);
买入价格1:=IF(买入个股时间1,买入价位1,0);
买入价1:=REF(买入价位1,BARSLAST(买入个股时间1));
现价1:=IF(BARSLAST(买入个股时间1)+1>=1,CONST(C),0);
最高价条件1:=IF(BARSLAST(买入个股时间1)+1>=1,H=HHV(H,BARSLAST(买入个股时间1)+1),0);
最高价横线1:=IF(BARSLAST(最高价条件1)>=0 AND BARSLAST(买入个股时间1)+1>=1,CONST(REF(H,BARSLAST(最高价条件1))),0);
最低价条件1:=IF(BARSLAST(买入个股时间1)+1>=1,L=LLV(L,BARSLAST(买入个股时间1)+1),0);
最低价横线1:=IF(BARSLAST(最低价条件1)+1>=1 AND BARSLAST(买入个股时间1)+1>=1,
CONST(REF(L,BARSLAST(最低价条件1))),0);
{2}
买入个股时间2:=IF(代码2,买入时间2,0);
买入价格2:=IF(买入个股时间2,买入价位2,0);
买入价2:=REF(买入价位2,BARSLAST(买入个股时间2));
现价2:=IF(BARSLAST(买入个股时间2)+1>=1,CONST(C),0);
最高价条件2:=IF(BARSLAST(买入个股时间2)+1>=1,H=HHV(H,BARSLAST(买入个股时间2)+1),0);
最高价横线2:=IF(BARSLAST(最高价条件2)+1>=1 AND BARSLAST(买入个股时间2)+1>=1,
CONST(REF(H,BARSLAST(最高价条件2))),0);
最低价条件2:=IF(BARSLAST(买入个股时间2)+1>=1,L=LLV(L,BARSLAST(买入个股时间2)+1),0);
最低价横线2:=IF(BARSLAST(最低价条件2)+1>=1 AND BARSLAST(买入个股时间2)+1>=1,
CONST(REF(L,BARSLAST(最低价条件2))),0);
{3}
买入个股时间3:=IF(代码3,买入时间3,0);
买入价格3:=IF(买入个股时间3,买入价位3,0);
买入价3:=REF(买入价位3,BARSLAST(买入个股时间3));
现价3:=IF(BARSLAST(买入个股时间3)+1>=1,CONST(C),0);
最高价条件3:=IF(BARSLAST(买入个股时间3)+1>=1,H=HHV(H,BARSLAST(买入个股时间3)+1),0);
最高价横线3:=IF(BARSLAST(最高价条件3)+1>=1 AND BARSLAST(买入个股时间3)>=0,
CONST(REF(H,BARSLAST(最高价条件3))),0);
最低价条件3:=IF(BARSLAST(买入个股时间3)+1>=1,L=LLV(L,BARSLAST(买入个股时间3)+1),0);
最低价横线3:=IF(BARSLAST(最低价条件3)+1>=1 AND BARSLAST(买入个股时间3)+1>=1,
CONST(REF(L,BARSLAST(最低价条件3))),0);
 
持股数量【股】:IF(代码1,买入股数1,IF(代码2,买入股数2,IF(代码3,买入股数3,DRAWNULL))),NODRAW;
持股天数:IF(代码1,天数1,IF(代码2,天数2,IF(代码3,天数3,DRAWNULL))),NODRAW;
最高价:=IF(代码1,最高价横线1,IF(代码2,最高价横线2,IF(代码3,最高价横线3,DRAWNULL))),COLOR00FFFF,LINETHICK2;
最低价:=IF(代码1,最低价横线1,IF(代码2,最低价横线2,IF(代码3,最低价横线3,DRAWNULL))),COLORFF0000,LINETHICK2;
买入价:IF(代码1,买入价1,IF(代码2,买入价2,IF(代码3,买入价3,DRAWNULL))),COLORFF00FF,LINETHICK4;
现价:IF(代码1,现价1,IF(代码2,现价2,IF(代码3,现价3,DRAWNULL))),COLORFFFF00,LINETHICK2;
买入时间:=IF(代码1,买入时间1,IF(代码2,买入时间2,IF(代码3,买入时间3,DRAWNULL)));
股数:=IF(代码1,买入股数1,IF(代码2,买入股数2,IF(代码3,买入股数3,DRAWNULL)));
DRAWBAND(现价,RGB(150,0,0),买入价,RGB(0,180,180));
DRAWBAND(买入价,RGB(0,180,180),买入价,RGB(0,180,180));
DRAWBAND(现价,RGB(180,0,180),现价,RGB(180,0,180));
DRAWKLINE(H,O,L,C);
 
 
D1:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三','日'))));
AA5:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(D1,0.78,0,0,AA5),COLORFFFF00;
现赢利:=(现价-买入价)/买入价*100;
金额:=买入价*现赢利*股数/100;
WW3:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','现赢利'),'】'),':'),CON2STR(现赢利,2)),'﹪');
WW4:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','现亏损'),'】'),':'),CON2STR(现赢利,2)),'﹪');
WW5:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','利润'),'】'),':'),CON2STR(金额,0)),'元');
WW6:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','亏损'),'】'),':'),CON2STR(金额,0)),'元');
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 现价>=买入价,0.64,1,0,WW3),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND
现价>=买入价,0.67,1,0,WW3),COLORRED;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 现价<买入价,0.64,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND
现价<买入价,0.67,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 现价>=买入价,0.8,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND
现价>=买入价,0.83,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 现价<买入价,0.8,1,0,WW6),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND
现价<买入价,0.83,1,0,WW6),COLORWHITE;
 
YDD:=L=REFX(L,1) OR L=REFX(L,2) OR L=REFX(L,3) OR L=REFX(L,4) OR L=REFX(L,5) OR L=REFX(L,6) OR L=REFX(L,7) OR L=REFX(L,8) OR L=REFX(L,9) OR L=REFX(L,10) OR L=REFX(L,11) OR L=REFX(L,12) OR L=REFX(L,13) OR
L=REFX(L,14) OR L=REFX(L,15) OR L=REFX(L,16) OR L=REFX(L,17) OR L=REFX(L,18) OR L=REFX(L,19) OR L=REFX(L,20);
EDD:=BARSLAST(YDD)>0 AND L=REF(L,BARSLAST(YDD));
DRAWLINE(YDD AND CURRBARSCOUNT<20,L,EDD AND CURRBARSCOUNT<20,L,1)COLORYELLOW;
 
{======================================================}
高点位:=REFDATE(HHV(H,350),DATE);
低点位:=REFDATE(LLV(L,350),DATE);
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
曾最大涨幅:=(高位价-低位价)/低位价*100;
当前涨幅:=(C-低位价)/低位价*100;
ZFA:=CON2STR(CONST(曾最大涨幅),2);
ZFB:=CON2STR(CONST(当前涨幅),2);
ZFC:=STRCAT('【曾最大涨幅】:',ZFA);
ZFD:=STRCAT(ZFC,'﹪');
ZFE:=STRCAT(ZFD,'【当前总涨幅】:');
ZFF:=STRCAT(ZFE,ZFB);
ZFG:=STRCAT(ZFF,'﹪');
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
 
{========================额外==========================}
Z11:=STRCAT(DYBLOCK,' ');
Z22:=STRCAT(Z11,HYBLOCK);
Z33:=STRCAT(Z22,' ');
Z44:=STRCAT(Z33,GNBLOCK);
Z55:=STRCAT(Z44,' ');
Z66:=STRCAT(Z55,FGBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.1350,0.01,0,STRCAT(Z66,ZHBLOCK)),COLORCYAN;
DRAWTEXT_FIX(1,0.45,0.065,0,STRCAT('【自定板块】:',ZDBLOCK)),COLORYELLOW;
 
 
MA89:MA(C,89)COLORGREEN;
牛股启动线D:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,LINETHICK2,;
牛股启动线L:(MA(CLOSE,6)+MA(CLOSE,18)+MA(CLOSE,54)+MA(CLOSE,162))/4,COLORCYAN,LINETHICK2;
DRAWICON(CROSS(牛股启动线D,牛股启动线L),L*0.985,7);
 
{九转序列}
A1:=C>REF(C,4);
NT:=BARSLASTCOUNT(A1);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H*1.002,VAR2STR(AY,0)),COLORRED;
DRAWTEXT(NT=9,H*1.002,'9'),COLORLIGREEN;
B1:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B1);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L*0.998,VAR2STR(AY1,0))COLORLIGREEN;
DRAWTEXT(NT0=9,L*0.998,'9'),COLORLIMAGENTA;
 
 
{选股}
牛股启动线D:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,LINETHICK2,;
牛股启动线L:=(MA(CLOSE,6)+MA(CLOSE,18)+MA(CLOSE,54)+MA(CLOSE,162))/4,COLORCYAN,LINETHICK2;
CROSS(牛股启动线D,牛股启动线L);




缠论绝密指标:

公式不加密,在主图可以一目了然看到个股的趋势

缠论源代码而已。
 
{缠论}
{N1:1,100,10;N2:1,100,10;DISP:=1,3,2}
N1:=10;N2:=10;DISP:=2;
K:=IF(PERIOD=5,1,{日}
IF(PERIOD=6,1,{周}
IF(PERIOD=7,1,{月}
IF(PERIOD=8,1,{多分钟}
IF(PERIOD=9,1,{多日}
IF(PERIOD=10,1,{季}
IF(PERIOD=11,2,{年}
IF(PERIOD=4,1,{60F}
IF(PERIOD=3,1,{30F}
IF(PERIOD=2,1,{15F}
IF(PERIOD=1,1{5F},1{1F})))))))))))/10;
P1:=PEAK(1,K*N1,1);
P2:=PEAK(1,K*N1,2);
WP1:=PEAKBARS(1,K*N1,1);
WP2:=PEAKBARS(1,K*N1,2);
T1:=TROUGH(2,K*N2,1);
T2:=TROUGH(2,K*N2,2);
WT1:=TROUGHBARS(2,K*N2,1);
WT2:=TROUGHBARS(2,K*N2,2);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);
TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);{www.70822.com}
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,DRAWNULL);
ZSG:=IF(TJ8,ZG,DRAWNULL);
ZSH:=IF(TJ8,HH,DRAWNULL);
ZSL:=IF(TJ8,LL,DRAWNULL);
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;
DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;
中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLORLIRED;
中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CROSSDOT,COLORLIGREEN;
中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;
中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;
趋势高:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;
趋势低:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;
局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高点预选C=1);
距前低天:=BARSLAST(局部低点预选C=-1);
小值周期:=LOWRANGE(L);
大值周期:=TOPRANGE(H);
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);
预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);
判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);
判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);
预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW LINETHICK8;
DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIRED;
DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORYELLOW;
DD1:=BARSLAST(ABS(极点保留)!=1);
DRAWTEXT(极点保留=1,局部极点,'卖'),COLORGREEN;
DRAWTEXT(极点保留=-1,局部极点,'买'),COLORRED;




缠论中枢:

缠师说,有多少不同构的自同构结构,就有多少种分析股市的正确道路。若按缠师的顶底分型有新笔、旧笔之争,本人按均线,同样可以找到一种自同构性,而且简单,当然均线可以改成很多其它的指标,同样可以完整展示整个中枢形成的过程,股票的前世今生完全体现。( 顶尖财经 股票学院: http://www.58188.com )

{缠论中枢操作}

MA10:=MA(C,5);

MA20:=MA(C,21);

JX:=CROSS(MA10,MA20);

SX:=CROSS(MA20,MA10);

LL:=IF(REFX(JX,1),LLV(L,BARSLAST(SX)+1),DRAWNULL);

HH:=IF(REFX(SX,1),HHV(H,BARSLAST(JX)+1),DRAWNULL);

LD:=IF(MA10<MA20 AND L=REFX(LL,BARSNEXT(LL)),L,0);

HD:=IF(MA10>MA20 AND H=REFX(HH,BARSNEXT(HH)),H,0);

DRAWLINE(MA10>MA20 AND H=REFX(HH,BARSNEXT(HH)),H,MA10<MA20 AND L=REFX(LL,BARSNEXT(LL)),L,0);

DRAWLINE(MA10<MA20 AND L=REFX(LL,BARSNEXT(LL)),L,MA10>MA20 AND H=REFX(HH,BARSNEXT(HH)),H,0);

LC0:=REF(L,BARSLAST(LD));

LC1:=IF(SUM(LD>0,0)>=2,REF(LC0,BARSLAST(LD)+1),0);

LC2:=IF(SUM(LD>0,0)>=3,REF(LC1,BARSLAST(LD)+1),0);

LC3:=IF(SUM(LD>0,0)>=4,REF(LC2,BARSLAST(LD)+1),0);

LC4:=IF(SUM(LD>0,0)>=5,REF(LC3,BARSLAST(LD)+1),0);

LC5:=IF(SUM(LD>0,0)>=6,REF(LC4,BARSLAST(LD)+1),0);

LC6:=IF(SUM(LD>0,0)>=7,REF(LC5,BARSLAST(LD)+1),0);

LC7:=IF(SUM(LD>0,0)>=8,REF(LC6,BARSLAST(LD)+1),0);

LC8:=IF(SUM(LD>0,0)>=9,REF(LC7,BARSLAST(LD)+1),0);

HC0:=REF(H,BARSLAST(HD));

HC1:=IF(SUM(HD>0,0)>=2,REF(HC0,BARSLAST(HD)+1),0);

HC2:=IF(SUM(HD>0,0)>=3,REF(HC1,BARSLAST(HD)+1),0);

HC3:=IF(SUM(HD>0,0)>=4,REF(HC2,BARSLAST(HD)+1),0);

HC4:=IF(SUM(HD>0,0)>=5,REF(HC3,BARSLAST(HD)+1),0);

HC5:=IF(SUM(HD>0,0)>=6,REF(HC4,BARSLAST(HD)+1),0);

HC6:=IF(SUM(HD>0,0)>=7,REF(HC5,BARSLAST(HD)+1),0);

HC7:=IF(SUM(HD>0,0)>=8,REF(HC6,BARSLAST(HD)+1),0);

HC8:=IF(SUM(HD>0,0)>=9,REF(HC7,BARSLAST(HD)+1),0);

ZD0:=LC0,NODRAW;

ZD1:=IF(LC1<HC0 AND ZD0>0,LC1,0),NODRAW;

ZD2:=IF(LC2<MIN(HC0,HC1) AND ZD1>0,LC2,0),NODRAW;

ZD3:=IF(LC3<MIN(HC0,MIN(HC1,HC2)) AND ZD2>0,LC3,0),NODRAW;

ZD4:=IF(LC4<MIN(HC0,MIN(HC1,MIN(HC2,HC3))) AND ZD3>0,LC4,0),NODRAW;

ZD5:=IF(LC5<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,HC4)))) AND ZD4>0,LC5,0),NODRAW;

ZD6:=IF(LC6<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,MIN(HC4,HC5))))) AND ZD5>0,LC6,0),NODRAW;

ZD7:=IF(LC7<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,MIN(HC4,MIN(HC5,HC6)))))) AND ZD6>0,LC7,0),NODRAW;

ZD8:=IF(LC8<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,MIN(HC4,MIN(HC5,MIN(HC6,HC7))))))) AND ZD7>0,LC8,0),NODRAW;

ZD:=MAX(ZD0,MAX(ZD1,MAX(ZD2,MAX(ZD3,MAX(ZD4,MAX(ZD5,MAX(ZD6,MAX(ZD7,ZD8)))))))),NODRAW;

ZG0:HC0,NODRAW;

ZG1:IF(HC1>MAX(LC0,LC1),HC1,9999),NODRAW;

ZG2:IF(HC2-ZD>0 AND HC2>MAX(LC0,LC1) AND ZG1!=9999,HC2,9999),NODRAW;

ZG3:=IF(HC3-ZD>0 AND HC3>MAX(LC0,MAX(LC1,LC2)) AND ZG2!=9999,HC3,9999),NODRAW;

ZG4:=IF(HC4-ZD>0 AND HC4>MAX(LC0,MAX(LC1,MAX(LC2,LC3))) AND ZG3!=9999,HC4,9999),NODRAW;

ZG5:=IF(HC5-ZD>0 AND HC5>MAX(LC0,MAX(LC1,MAX(LC2,MAX(LC3,LC4)))) AND ZG4!=9999,HC5,9999),NODRAW;

ZG6:=IF(HC6-ZD>0 AND HC6>MAX(LC0,MAX(LC1,MAX(LC2,MAX(LC3,MAX(LC4,LC5))))) AND ZG5!=9999,HC6,9999),NODRAW;

ZG7:=IF(HC7-ZD>0 AND HC7>MAX(LC0,MAX(LC1,MAX(LC2,MAX(LC3,MAX(LC4,MAX(LC5,LC6)))))) AND ZG6!=9999,HC7,9999),NODRAW;

ZG8:=IF(HC8-ZD>0 AND HC8>MAX(LC0,MAX(LC1,MAX(LC2,MAX(LC3,MAX(LC4,MAX(LC5,MAX(LC6,LC7))))))) AND ZG7!=9999,HC8,9999),NODRAW;

ZG:=MIN(ZG0,MIN(ZG1,MIN(ZG2,MIN(ZG3,MIN(ZG4,MIN(ZG5,MIN(ZG6,MIN(ZG7,ZG8))))))));

A:=REF(ZG,BARSLAST(ZG!=REF(ZG,1)));

B:=REF(ZD,BARSLAST(ZD!=REF(ZD,1)));

压力:IF(1,A,A),COLORRED,POINTDOT,LINETHICK4;

支撑:IF(1,B,B),COLORYELLOW,POINTDOT,LINETHICK4;


上一篇:通达信源码:真正的筹码突破主图,双线通道 主升浪 收阴买,伏击涨停1号

下一篇:通达信源码:三线共振,长牛排队,自用RSI副图指标