通达信一笑之变天图公式
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
AA10:=MA(C,10);
AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
AA30:=MA(C,30);
三拾日乖离率:=(C-AA30)/AA30*100;
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND
AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND
AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
DRAWICON(加仓,L*0.99,23);
IF(等待>REF(等待,1),等待,DRAWNULL),LINETHICK2,COLOR00FFFF;
IF(辰星线>REF(辰星线,1),辰星线,DRAWNULL),LINETHICK2,COLOR0000FF;
IF(辰星线<REF(辰星线,1),辰星线,DRAWNULL),COLOR00FF00,LINETHICK1;
STICKLINE(ISLASTBAR AND (红持股 OR REF(红持股,1)=1),今离场价,今离场价,15,1),COLOR0000FF;
STICKLINE(ISLASTBAR AND (阴观望 OR REF(阴观望,1)=1),今进场价,今进场价,15,1),COLOR00FF00;
DRAWICON(卖出,(HIGH * 1.002),15);
{DRAWTEXT(秋离场,HHV(H,3),"→→→→"),COLORFF99FF;}
DRAWICON(老鼠仓 OR 金叉,(LOW - (LOW * 0.01)),1);
{DRAWTEXT(短买春,LLV(L,3),"←←←←"),COLOR00FF00;}
{----------------------------}
{严冬:}STICKLINE((VAR4 > 0.1),HIGH,LOW,0,0),COLORFFFFFF;
{早春:}STICKLINE(((((VAR4 < 天下有雪) AND (VAR4 > 无痕))
OR ((VAR4 < VAR5) AND (VAR4 > 无痕))) OR ((VAR4 > 无痕)
AND (VAR111 > 无痕))),HIGH,LOW,0,0),COLOR00FF00;
{初夏:}STICKLINE((((((VAR4 > 天下有雪) AND (VAR4 > VAR111))
AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1))) OR ((((VAR4 > VAR222)
AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1)))),
HIGH,LOW,0,0),COLOR0000FF;
{深秋:}STICKLINE(((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))
AND (VAR111 > REF(VAR111,1))),HIGH,LOW,0,0),COLOR00FFFF;
STICKLINE(((VAR4 > 0.1) AND (CLOSE < OPEN)),OPEN,CLOSE,2.8,0),COLORCCCCCC;
STICKLINE(((VAR4 > 0.1) AND (CLOSE >= OPEN)),OPEN,CLOSE,2.8,1),COLORCCCCCC;
STICKLINE(((VAR4 > 0.1) AND (CLOSE >= OPEN)),OPEN,OPEN+(CLOSE-OPEN)/3,2.8,0),COLORFFFFFF;
STICKLINE((((((VAR4 < 天下有雪) AND (VAR4 > 无痕)) AND (CLOSE < OPEN))
OR (((VAR4 < VAR5) AND (VAR4 > 无痕)) AND (CLOSE < OPEN)))
OR (((VAR4 > 无痕) AND (VAR111 > 无痕)) AND (CLOSE < OPEN))),
OPEN,CLOSE,2.8,0),COLOR00FF00;
STICKLINE((((((VAR4 < 天下有雪) AND (VAR4 > 无痕)) AND (CLOSE > OPEN))
OR (((VAR4 < VAR5) AND (VAR4 > 无痕)) AND (CLOSE > OPEN)))
OR (((VAR4 > 无痕) AND (VAR111 > 无痕)) AND (CLOSE >= OPEN)))
,OPEN,CLOSE,2.8,1),COLOR00FF00;
STICKLINE(((((((VAR4 > 天下有雪) AND (VAR4 > VAR111)) AND (VAR4 > VAR5))
AND (VAR222 > REF(VAR222,1))) AND (CLOSE < OPEN)) OR (((((VAR4 > VAR222)
AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,2)))
AND (CLOSE < OPEN))),OPEN,CLOSE,2.8,0),COLOR0000FF;
STICKLINE(((((((VAR4 > 天下有雪) AND (VAR4 > VAR111)) AND (VAR4 > VAR5))
AND (VAR222 > REF(VAR222,1))) AND (CLOSE > OPEN)) OR (((((VAR4 > VAR222)
AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1)))
AND (CLOSE >= OPEN))),OPEN,CLOSE,2.8,1),COLOR0000FF;
STICKLINE((((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))
AND (VAR111 > REF(VAR111,1))) AND (CLOSE < OPEN)),OPEN,CLOSE,2.8,0)
,COLOR00FFFF;
STICKLINE((((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))
AND (VAR111 > REF(VAR111,1))) AND (CLOSE >= OPEN)),OPEN,CLOSE,2.8,1)
,COLOR00FFFF;
TAB:=CURRBARSCOUNT=25;
IF(( BARSLAST(TAB)>10),REF((C*2-REF(C,3)),3),DRAWNULL),LINETHICK1,DOTLINE,COLORYELLOW;
{顶底背离}
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),"底背离"),COLORRED;
{DRAWICON(CROSS(FF,MA15),(LOW * 0.99),7); }
{顶背离}
RSI1:=((SMA(MAX((CLOSE - (REF(CLOSE,1))),0),3,1) / SMA(ABS((CLOSE - (REF(CLOSE,1)))),3,1))* 100);
DRAWTEXT(CROSS(88,RSI1) AND (MA(C,3))>(EMA(C,3)) ,(HIGH + 0.3),"顶背离"),COLORGREEN;
{DRAWICON(CROSS(88,RSI1) AND (MA(C,3))>(EMA(C,3)) ,(HIGH + 0.3),8); };
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1))+1)>C AND
REF("MACD.DIF",BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1))+1)
<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")
>0,L-0.02,"MACD底背离"),COLORRED;{MACD底背离}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1))+1)>C AND
REF("KDJ.K",BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1))+1)<"KDJ.K" AND
