通达信印钞机副图源码

[复制链接]
查看49 | 回复0 | 2022-7-24 05:12:49 | 显示全部楼层 |阅读模式

暴张线:=MA(CLOSE,181);
牛:=EMA(CLOSE,144)>=REF(EMA(CLOSE,144),1);

黄昏之星:=((((((REF(CLOSE,2) / REF(OPEN,2)) > 1.03) AND (REF(OPEN,1) >
 REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) /
 REF(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE <REF(CLOSE,2)));

射击之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *
 (MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));

锤头:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
 MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));
吊颈:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
 MIN(OPEN,CLOSE))))));

穿头破脚:=((((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)
 < 0.96)) AND (CLOSE < REF(OPEN,1))) AND (OPEN > REF(CLOSE,1))) OR
 (((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
 1.04)) AND (CLOSE > REF(OPEN,1))) AND (OPEN < REF(CLOSE,1))));
身怀六甲:=(((((ABS((REF(CLOSE,1) - REF(OPEN,1))) / REF(CLOSE,1)) > 0.04)
 AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <
 MAX(REF(CLOSE,1),REF(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1))));


乌云盖顶:=(((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <
 0.97)) AND (OPEN > REF(CLOSE,1))) AND (CLOSE < REF(CLOSE,1)));
曙光初现:=(((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
 1.03)) AND (OPEN < REF(CLOSE,1))) AND (CLOSE > REF(CLOSE,1)));
倾盆雨:=(((((REF(CLOSE,1) / REF(OPEN,1)) >= 1.03) AND (OPEN <
 REF(CLOSE,1))) AND (OPEN > REF(OPEN,1))) AND (CLOSE < REF(OPEN,1)));
 DRAWTEXT(倾盆雨,H*1.03,'倾盆大雨'),COLORCYAN;
 DRAWTEXT(黄昏之星,H*1.02,'黄昏之星'),COLORCYAN;
 DRAWTEXT(射击之星,H*1.03,'射击之星可能见顶'),COLORCYAN;
 DRAWTEXT(锤头,L-L*0.02,'锤头可能见底'),COLORGREEN;
 DRAWTEXT(吊颈,H*1.03,'吊颈'),COLORCYAN;
 DRAWTEXT(穿头破脚,H*1.05,'穿头破脚'),COLORCYAN;
 DRAWTEXT(乌云盖顶,H*1.03,'乌云盖顶'),COLORCYAN;
 DRAWTEXT(曙光初现,L-L*0.02,'曙光初现(放量)'),COLORGREEN;
 DRAWTEXT(身怀六甲,L-L*0.02,'身怀六甲,底升顶落'),COLORGREEN;
阳涨幅:=4;
阳倍量:=2;
单阳:=C>O*(1+阳涨幅/100) AND VOL>REF(VOL,1)*阳倍量;
DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.98,'阳'),COLOR00FFFF;

高不破价:=REF(C,BARSLAST(单阳));
中不破价:=REF((C+L)/2,BARSLAST(单阳));
低不破价:=REF(L,BARSLAST(单阳));

单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价);
STICKLINE(单阳不破,低不破价-低不破价*0.003,低不破价,4,0),COLORRED;

DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价*0.98,'1'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价*0.98,'2'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价*0.98,'3'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价*0.98,'4'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价*0.98,'5'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价*0.98,'6'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价*0.98,'7'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价*0.98,'8'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价*0.98,'9'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价*0.98,'10'),COLORGREEN;


两天:=LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价;
一般:=LLV(L,BARSLAST(单阳)-2)>低不破价 OR LLV(L,BARSLAST(单阳)-2)=低不破价;

MA05:MA(C,5)LINETHICK3,COLOR00CCFF;
 MA10:=MA(C,10);
 MA20:=MA(C,20);
 MA30:=MA(C,30);
五日乖离率:=(C-MA05)/MA05*100;
 BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
 IF(BB05>30 AND MA05>REF(MA05,1), MA05,DRAWNULL),LINETHICK3,COLORRED;
 BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;
 IF(BB05<0 AND MA05<REF(MA05,1), MA05,DRAWNULL),LINETHICK3,COLORGREEN;
三拾日乖离率:=(C-MA30)/MA30*100,NODRAW;
 VAR1:=(MA20-MA30)>REF((MA20-MA30),1) AND MA20>REF(MA20,1) AND MA30>REF(MA30,1);
 VAR2:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1);
 BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416;
强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1)
 AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>MA30 OR O>MA30) AND MA05<REF(MA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10<REF(MA10,1),10);
 DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORRED;
 JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10>REF(MA10,1) ;
减仓:=FILTER(JC,10);
 MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA05>REF(MA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30;
买入:=FILTER(MR,10);
 DRAWTEXT(减仓,HIGH*1.02,'←风险'),COLORCYAN;
 DRAWTEXT(买入,LOW*0.98,'←买入'),COLORYELLOW;
 DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORGREEN;
 DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORYELLOW;
 VAR21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));
 VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);
 MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50;
压力:MA(REF(HHV(C,30),1),2),COLOR9DFFFF;
支撑:MA(REF(LLV(C,30),1),2),COLORABFF46;

A:EMA(C,21)COLORBLUE,LINETHICK3;
 B:=A<REF(A,1);
 IF(B-1,A,DRAWNULL)COLORRED,LINETHICK3;
 AA:=EMA(C,3) > EMA(C,21);
 BB:=EMA(C,3) < EMA(C,21);
 CC:= EMA(C,3) > EMA(C,8);
 CC1:=EMA(C,3) < EMA(C,8);
 DD:=CLOSE<OPEN;
 STICKLINE(AA,H,L,0,0),COLOR007FFF;
 STICKLINE(AA,O,C,3,1),COLOR007FFF;
 STICKLINE(AA AND DD,O,C,3,0),COLOR007FFF;
 STICKLINE(BB,H,L,0,0),COLORGREEN;
 STICKLINE(BB,O,C,3,1),COLORGREEN;
 STICKLINE(BB AND DD,O,C,3,0),COLORGREEN;
 STICKLINE(BB AND CC,H,L,0,1),COLORF00FF0;
 STICKLINE(BB AND CC,O,C,3,1),COLORF00FF0;
 STICKLINE(BB AND CC AND DD,O,C,3,0),COLORF00FF0;
 STICKLINE(AA AND CC1,H,L,0,0),COLORBLUE;
 STICKLINE(AA AND CC1,O,C,3,1),COLORBLUE;
 STICKLINE(AA AND CC1 AND DD,O,C,3,0),COLORBLUE;
买线:=MA(CLOSE,9),LINETHICK2;
卖线:=MA(CLOSE,20);
 BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWTEXT(BU,L-0.1,'建仓')COLORYELLOW;
 DRAWTEXT(SEL,H+0.1,'空仓');
A2:=(C-REF(C,1))/REF(C,1)*100<1.02;
 A3:=H>MA(C,5)*1.12;
 AAA:= A2 AND A3;
 DRAWTEXT(AAA,H*1.05,'卖点'),COLORWHITE;
 EMA13:=EMA(C,13),COLOR0000FF,LINETHICK2;
 EMA34:=EMA(C,34),COLORYELLOW;
 EMA55:=EMA(C,55),COLORFF00FF;
 EMA120:=EMA(C,120),COLORFFCC66;
 AR1:=EMA55>EMA34 AND EMA34>EMA13;
 AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);
 AR3:=EMA13>=REF(EMA13,2);
 AR4:=COUNT(CROSS(C,EMA13),AR2)=1;
 AR5:=AR1 AND AR2 AND AR3 AND AR4;
 AR6:=AR5 AND FILTER(AR5,10);
 DRAWTEXT(AR6,L-0.09,'启动'),COLORYELLOW;
 STICKLINE(AR6,H,L,3,0),LINETHICK2,COLORYELLOW;
 BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
 BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2;
 BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5));
 BR4:=BR1 AND BR2 AND BR3;
 DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'上升'),COLOR00C5FF;
 STICKLINE(BR4 AND FILTER(BR4,10),O,C,3,1),LINETHICK2,COLOR00C5FF;
 CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;
 CR2:=V>MA(V,5)*0.6;
 CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;
 CR4:=ABS(EMA34-EMA55)/EMA55<0.03;
 CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);
 CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);
 STICKLINE(CR6,O,C,3,1),LINETHICK2,COLORF00FF0;
 DRAWTEXT(CR6,L-0.09,'涨升'),COLORF00FF0;
 DR1:=EMA13>EMA34 AND EMA34<EMA55;
 DR2:=BARSLAST(CROSS(C,EMA55) );
 DR3:=H=HHV(H,DR2);
 DR4:=BARSLAST(DR3);
 DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA55 AND BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1;
 DR6:=C>REF(C,1) ;
 DR7:= DR1 AND DR5 AND DR6 ;
 DR8:=DR7 AND FILTER(DR7 ,10);
 DRAWTEXT(DR8,L-0.09,'出击'),COLORD6BA63;
 ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55);
 DRAWTEXT(ER,L-0.09,'金叉'),COLOR0099FF;
 FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34);
 DRAWTEXT(FR,L-0.09,'加仓'),COLORWHITE;
 GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) );
 GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1);
 GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);
 GR4:=H=HHV(H,GR1);
 GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);
 GR6:=GR2 AND GR3 AND GR4;
 GR7:=GR2 AND GR3 AND GR4 AND GR5;
 DRAWTEXT(GR6 AND GR7,H+0.13,'了结'),COLOR00FF00;
 HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55);
 DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.3,'推进'),COLORFFC8FF;
 STICKLINE(HR2 AND FILTER(HR2,10),O,C,3,1),LINETHICK2,COLORFFC8FF;


6888457.jpg

6888457.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则