软件名称：[B]红K主图（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2019-10-06 02:00:18
软件简介:

A1:=EMA(CLOSE,3),COLORFFFF77;
VV2:=REF(CLOSE,1);{分析家公式网WWW.70822.com}
VV3:=((SMA((CLOSE - VV2),6,1) / SMA(ABS((CLOSE - VV2)),6,1)) * 100);
DRAWICON(((REF(VV3,1) > 81) AND (VV3 < 80)),HIGH,2);
HD10:=FILTER(BACKSET(FILTER(REF(H,10)=HHV(H,2*10+1),10),10+1),10);
LD10:=FILTER(BACKSET(FILTER(REF(H,10)=LLV(H,2*10+1),10),10+1),10);
A10:=REF(H,BARSLAST(HD10));
AX10:=REF(H,BARSLAST(HD10));
T10:=BARSLAST(HD10)<BARSLAST(LD10) AND NOT(HD10);
顶10:=IF(T10,AX10,A10);
HD30:=FILTER(BACKSET(FILTER(REF(H,30)=HHV(H,2*30+1),30),30+1),30);
LD30:=FILTER(BACKSET(FILTER(REF(H,30)=LLV(H,2*30+1),30),30+1),30);
HD20:=FILTER(BACKSET(FILTER(REF(H,20)=HHV(H,2*20+1),20),20+1),20);
LD20:=FILTER(BACKSET(FILTER(REF(H,20)=LLV(H,2*20+1),20),20+1),20);
AX30:=REF(H,BARSLAST(HD30));
AX20:=REF(H,BARSLAST(HD20));
T30:=BARSLAST(HD30)<BARSLAST(LD30) AND NOT(HD30);
T20:=BARSLAST(HD20)<BARSLAST(LD20) AND NOT(HD20);
顶30:IF(T30,AX30,AX30),COLORFF00FF,POINTDOT,LINETHICK3;
STICKLINE(T30,AX30,AX30,30,0),COLORFF00FF ;
顶20:IF(T20,AX20,AX20),COLORGREEN,POINTDOT,LINETHICK2;
STICKLINE(T20,AX20,AX20,20,0),COLORGREEN;

B30:=REF(CLOSE,BARSLAST(LD30));
底30:IF(T30,B30,B30),COLORBLUE,POINTDOT,LINETHICK2;
高开:=O>REF(C,1)*1.02 ;
VOLUME:=VOL;
B5:=MA(VOLUME,5);
B33:=MA(VOLUME,33);
B55:=MA(VOLUME,55);
B135:=MA(VOLUME,135);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
AAA1:=(DIF-DEA)*2*60;
VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);
QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
前高:=DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORMAGENTA;
黄柱:=MACD>前高 ;
B1:=AAA1-REF(AAA1,1);
LC1 := REF(CLOSE,1);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,43))/(0.015*AVEDEV(TYP,43));
涨停收盘:=(C-REF(C,1))*100/REF(C,1)>=4.8;
涨停收盘6.3:=(C-REF(C,1))*100/REF(C,1)>=6.3;
DIF2:=MA(CLOSE,4)-MA(CLOSE,25);
DIF3:=MA(CLOSE,7)-MA(CLOSE,21);
A:=(C-REF(C,1))*100/REF(C,1)>=8.6 ;
LONMA := MA(LON,10);
LONT := LON;
MAA3:=MA(CLOSE,33);
MAA5:=MA(CLOSE,55);
MA120:=MA(CLOSE,120),LINETHICK2;
MA250:=MA(CLOSE,250),LINETHICK2;

CR1:=(REF(C,1)-REF(C,2))/REF(C,2)*100<2.8;
VAR1X:=(CLOSE*2+HIGH+LOW)/4*10;
VAR2X:=EMA(VAR1X,13)-EMA(VAR1X,34);
VAR3X:=EMA(VAR2X,5);
VAR4X:=2*(VAR2X-VAR3X)*5.5;
主力:=VAR4X;
持股线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
NOTEXT001:IF(持股线>=REF(持股线,1),持股线,DRAWNULL),LINETHICK2 COLORRED;
NOTEXT002:IF(持股线<REF(持股线,1),持股线,DRAWNULL),LINETHICK2,COLORGREEN;

AA:=COUNT(A,5)=1;
XX:=COUNT(A,20)<3;
AAA:=(3*C+H+L+O)/6;
R1:=(8*XX+7*REF(XX,1)+6*REF(XX,2)+5*REF(XX,3)+4*REF(XX,4)+3*REF(XX,5)+2*REF(XX,6)+REF(XX,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>R1;
动能活跃度:=(MAA3-MAA5);
收盘涨9:=(C-REF(C,1))*100/REF(C,1)>=5.2 AND H-C<0.019 ;
STAR:=EVERY(CLOSE<OPEN,2);
AAX:=HIGH<(REF(LOW,1)-0.001) AND STAR;
买点3:=REF(REF(OPEN,1),BARSLAST(AAX)) ;
买点1:=REF(REF(LOW,1),BARSLAST(AAX)) ;
买点2:=REF(HIGH,BARSLAST(AAX)) ;
牛股:=收盘涨9 AND LON>-10   AND LON<286 AND DIF>=-0.08 AND  DEA<=0.06 AND ((CCI>105 AND CCI<113 AND MA120>MA250  AND ABS((顶30-底30)/顶30*100)<25) OR  (CCI>90  AND ABS((顶10-底30)/顶10*100)<20  AND CROSS(C,顶10)  AND LOW< MAA3 AND CCI<99)) ;
黑马1:= 主力>-0.7  AND (MAA3-MAA5)<0.36 AND MAA3>MA120 AND MACD>-0.8  AND MACD<0.18 AND  DIF>=-0.19 ;
黑马2:= 涨停收盘 AND DIF<0.02  AND  LON>0 AND LON<185 AND  DIF2>DIF3 AND B1>5 AND  MAA3-MA120<0.5 AND B5<B55 AND MAA3-MAA5>-0.10  AND MAA3-MAA5<0.25  AND MA250-MA120>-1.20 AND CCI<120 ;
黑马3:= 涨停收盘  AND CROSS(C,MAA3)  AND CR1 AND MAA3>MAA5 AND MAA3>REF(MAA3,1)  AND  MAA3-MAA5>0.02 AND CCI>35 AND B5>B55  AND MTM>-0.13 AND DIF<0.10  AND B33>=B55  AND CCI<40  AND  LON<300  ;
黑马4:= A  AND  CROSS(C,MAA3)AND CR1 AND MAA3>MAA5 AND MAA3>REF(MAA3,1) AND  MAA3-MAA5>0.02 AND CCI>35 AND  B5>B55 AND B33>=B55  AND DIF<0.10 AND MA250-MA120<1.2  AND (高开 AND LON<300) ;
黑马5:= A AND  CROSS(C,MAA3)AND CR1 AND MAA3>MAA5 AND MAA3>REF(MAA3,1) AND  MAA3-MAA5>0.02 AND CCI>35 AND  B5>B55 AND B33>=B55  AND DIF<0.10 AND MA250-MA120<1.2    AND  黄柱 ;
黑马6:=A  AND CROSS(C,MAA3) AND CR1 AND MAA3>MAA5 AND MAA3>REF(MAA3,1) AND  MAA3-MAA5>0.02 AND CCI>35 AND  B5>B55 AND B33>=B55  AND DIF<0.10 AND LON<300 AND MTM>-0.13   AND CCI<90;
黑马:=黑马1 AND ( 黑马6  OR 黑马2 OR 黑马3  OR  黑马4   OR 黑马5);
红K:=牛股 OR 黑马;
STICKLINE(红K,OPEN,CLOSE,6,0),COLORRED;
STICKLINE(红K,CLOSE,OPEN,0,0),COLORWHITE;
DRAWICON(红K,L-1,1);
STICKLINE(CLOSE,REF(HIGH,BARSLAST(红K)),REF(HIGH,BARSLAST(红K)),1,0),COLORCYAN;
STICKLINE(CLOSE,REF(LOW,BARSLAST(红K)),REF(LOW,BARSLAST(红K)),1,0),COLORYELLOW;
ZTTJ:=(C-REF(C,1))*100/REF(C,1)>=9.5;
AA1:=COUNT(ZTTJ,5)>=2;
AAB:=OPEN/REF(CLOSE,1)>=1+3/100 && LOW /HIGH<=1-3/100 && LOW/OPEN<=1-3/100 ;
CCB:= REF(AMO,1)>AMO;
涨幅:=C/REF(C,4)<3 AND C/REF(C,4)>2;
BR1:=(REF(C,1)-REF(C,2))/REF(C,2)*100>9.5 ;
绿K:=AAB  AND BR1 ;
STICKLINE(绿K,OPEN,CLOSE,5,0),COLORGREEN;
STICKLINE(绿K,CLOSE,OPEN,1,0),COLORRED;
DRAWICON(绿K,L-0.10,1);
 

[url=http://www.70822.com/soft/sort013/sort05/down-141413.html]红K主图（通达信公式 主图 源码 测试图）[/url]