漂亮實用的主圖指標公式源碼

作者：同花順來源：cxh99.com 發布時間：2013年04月16日

相關標簽: 股市最實用的主圖指標、通天心主圖指標源碼、布林通道主圖指標、最牛股票主圖指標公式、狙擊牛熊萬能主圖指標、通達信分時主圖指標、最好的通達信主圖指標、分時t十0主圖指標公式、通達信建倉主圖指標、

漂亮實用的主圖指標公式源碼

//N:1,100,5////時間:71068,1,80000//
//DRAWBKBMP(C>=MA(C,5),'sun');
DRAWBKBMP(C<=MA(C,5),'4786');
DRAWBKBMP(C>=MA(C,20),'sun2');
DRAWBKBMP(C<=MA(C,20),'moon');
DRAWBKBMP(C>=MA(C,250),'sun01');// //本文來至CXH99.COM//

n:=5;
時間:=71068;
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
AA10:MA(CLOSE,3),COLOR0000FF;
AA12:MA(CLOSE,5),COLOR0000FF;
BB10:=((ATAN((AA10 - ref(AA10,1))) * 3.1416) * 10);
BB12:=((ATAN((AA12 - ref(AA12,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);
fillrgn(AA10>aa12,aa10,aa12),coloryelLOW;
fillrgn(aa10<AA12,aa10,aa12),colorgreen;
趨勢:EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),42),POINTDOT,COLORFF00FF,LINETHICK4;
STICKLINE(CLOSE> ref(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;
STICKLINE(CLOSE> ref(CLOSE,1) ,OPEN,CLOSE,7.8,0 ),COLOR000077;
STICKLINE(CLOSE> ref(CLOSE,1) ,OPEN,CLOSE,5.7,0 ),COLOR000099;
STICKLINE(CLOSE> ref(CLOSE,1) ,OPEN,CLOSE,4.1,0 ),COLOR0000AA;
STICKLINE(CLOSE> ref(CLOSE,1) ,OPEN,CLOSE,2.5,0 ),COLOR0000BB;
STICKLINE(CLOSE> ref(CLOSE,1) ,OPEN,CLOSE,1.9,0 ),COLOR0000DD;
STICKLINE(CLOSE> ref(CLOSE,1) ,OPEN,CLOSE,0.8,0 ),COLOR0000FF; //本文來至CXH99.COM//
STICKLINE(CLOSE= ref(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
STICKLINE(CLOSE= ref(CLOSE,1) ,OPEN,CLOSE,7.8,0 ),COLOR777777;
STICKLINE(CLOSE= ref(CLOSE,1) ,OPEN,CLOSE,5.7,0 ),COLOR999999;
STICKLINE(CLOSE= ref(CLOSE,1) ,OPEN,CLOSE,4.1,0 ),COLORAAAAAA;
STICKLINE(CLOSE= ref(CLOSE,1) ,OPEN,CLOSE,2.5,0 ),COLORBBBBBB;
STICKLINE(CLOSE= ref(CLOSE,1) ,OPEN,CLOSE,1.9,0 ),COLORDDDDDD;
STICKLINE(CLOSE= ref(CLOSE,1) ,OPEN,CLOSE,0.8,0 ),COLORFFFFFF;
STICKLINE(CLOSE< ref(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE(CLOSE< ref(CLOSE,1) ,OPEN,CLOSE,7.8,0 ),COLOR990000;
STICKLINE(CLOSE< ref(CLOSE,1) ,OPEN,CLOSE,5.7,0 ),COLORCC0000;
STICKLINE(CLOSE< ref(CLOSE,1) ,OPEN,CLOSE,4.1,0 ),COLORFF4400;
STICKLINE(CLOSE< ref(CLOSE,1) ,OPEN,CLOSE,2.5,0 ),COLORFF8800;
STICKLINE(CLOSE< ref(CLOSE,1) ,OPEN,CLOSE,1.9,0 ),COLORFFCC00;
STICKLINE(CLOSE< ref(CLOSE,1) ,OPEN,CLOSE,0.8,0 ),COLORCYAN;
X1:=(C+L+H)/3;BB13:=ATAN(EMA(X1,13)-ref(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>ref(EMA(X1,8),1),10),
EMA8,'∠45上升'),COLORWHITE;
壓力:MA(ref(HHV(C,30),1),2),COLOR00FF00;
支撐:MA(ref(LLV(C,30),1),2),COLOR0000FF;
AA1:=AMOUNT/V;BB1:=L<AA1*0.9;
CC1:=(C-ref(C,1))/ref(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.tumamayizhan.com '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');
FF1:=BB1 AND CC1 AND DD1 AND EE1;DRAWTEXT(FF1,(LOW* 0.99),'鼠'),COLOR4080FF;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑馬線:=EMA(A51,5);A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趨勢線:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
DRAWTEXT(CROSS(趨勢線,0)AND 黑馬線<40,(HIGH* 0.97),'▲大馬'),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);
STICKLINE(CROSS(88,RSI),O,C,2.9,0),COLOR113311;
STICKLINE(CROSS(FF,MA15),O,C,2.9,0),COLOR00FFFF;
VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*25;
注意買:=IF((VAR4<10),80,100);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J<0,10,0);BDDD:=LLV(J,2)=LLV(J,8);
買入:=IF(CROSS(J,ref(J+0.01,1)) AND BDDD AND J<20,30,0);
DRAWTEXT(買入 AND 注意買=100 AND 超跌=0,LOW,'B'),COLOR8000FF;
MTM:=C-ref(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
買:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(FILTER(買=1,5),LOW-0.03,'拉'),COLOR0000FF;
GET:ZIG(3,N),COLORYELLOW;
PL5:=ZIG(3,5);
EN1:=ZIG(3,5)>ref(ZIG(3,5),1) AND ref(ZIG(3,5),1)<=ref(ZIG(3,5),2) AND ref(ZIG(3,5),2)<=ref(ZIG(3,5),3);
EX1:=ZIG(3,5)<ref(ZIG(3,5),1) AND ref(ZIG(3,5),1)>=ref(ZIG(3,5),2) AND ref(ZIG(3,5),2)>=ref(ZIG(3,5),3);
PL10:=ZIG(3,10);
EN2:=ZIG(3,10)>ref(ZIG(3,10),1) AND ref(ZIG(3,10),1)<=ref(ZIG(3,10),2) AND ref(ZIG(3,10),2)<=ref(ZIG(3,10),3);
EX2:=ZIG(3,10)<ref(ZIG(3,10),1) AND ref(ZIG(3,10),1)>=ref(ZIG(3,10),2) AND ref(ZIG(3,10),2)>=ref(ZIG(3,10),3); //本文來至CXH99.COM//
PL20:=ZIG(3,20);
EN3:=ZIG(3,20)>ref(ZIG(3,20),1) AND ref(ZIG(3,20),1)<=ref(ZIG(3,20),2) AND ref(ZIG(3,20),2)<=ref(ZIG(3,20),3);
EX3:=ZIG(3,20)<ref(ZIG(3,20),1) AND ref(ZIG(3,20),1)>=ref(ZIG(3,20),2) AND ref(ZIG(3,20),2)>=ref(ZIG(3,20),3);
PL40:=ZIG(3,40);
走強1:=BARSLAST(PL5<ref(PL5,1));
走弱1:=BARSLAST(PL5>ref(PL5,1));
走強2:=BARSLAST(PL10<ref(PL10,1));
走弱2:=BARSLAST(PL10>ref(PL10,1));
走強3:=BARSLAST(PL20<ref(PL20,1));
走弱3:=BARSLAST(PL20>ref(PL20,1));
ZTJZ5:=IF(PL10>ref(PL10,1),COUNT(EN1,走強2),0);
ZTJD5:=IF(PL10>ref(PL10,1),COUNT(EX1,走強2),0);
DTJZ5:=IF(PL10<ref(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<ref(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20>ref(PL20,1),COUNT(EN2,走強3),0);
ZTJD10:=IF(PL20>ref(PL20,1),COUNT(EX2,走強3),0);
DTJZ10:=IF(PL20<ref(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<ref(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN1 AND DTJZ5=1,L*0.95,'(A)'),COLORFFFF00;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)'),COLORFF00FF;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.95,'(C)'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10>ref(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10>ref(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10>ref(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10>ref(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF;
DRAWTEXT(EX2 AND PL20>ref(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLOR0000FF;
DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'Ⅰ'),COLORFF00FF;
DRAWTEXT(EX2 AND DTJD10=2,H*1.01,'Ⅱ'),COLORFFFF00;
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.93,'Ⅲ'),COLOR0000FF;
DRAWTEXT(EX2 AND PL20>ref(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20>ref(PL20,1) AND ZTJZ10=2,L*0.94,'②'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EX2 AND PL20>ref(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,'③'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20>ref(PL20,1) AND ZTJZ10=3,L*0.94,'④'),LINETHICK3,COLOR00FFFF;
HH:=HIGH; LL:=LOW; OO:=OPEN; CC:=CLOSE;
<%
vh=ffl.vardata("hh")
vl=ffl.vardata("ll")
vo=ffl.vardata("oo")
vc=ffl.vardata("cc")
last=ubound(vh)
if last<101 then
b=last+1
else
b=0
for i=last-101 to last-51
vh(i)=vh(i+51)
vl(i)=vl(i+51)
vo(i)=vo(i+51)
vc(i)=vc(i+51)
next
a=(vh(last-51)+vl(last-51))/2
j=1
for i=last-49 to last
j=j+2
vh(i)=2*a-vl(i-j)
vl(i)=2*a-vh(i-j)
vo(i)=2*a-vc(i-j)
vc(i)=2*a-vo(i-j)
next
end if
ffl.vardata("hh")=vh
ffl.vardata("ll")=vl
ffl.vardata("oo")=vo
ffl.vardata("cc")=vc
ffl.varstartindex("hh")=b
ffl.varstartindex("ll")=b
ffl.varstartindex("oo")=b
ffl.varstartindex("cc")=b
%>
A:=BACKSET(ISLASTBAR,50);
STICKLINE(A AND CC>=OO,OO,CC,6,0),COLOR990099,SHIFT50;
STICKLINE(A AND CC>=OO,OO,CC,4,0),COLORbb00bb,SHIFT50;
STICKLINE(A AND CC>=OO,OO,CC,2,0),COLORdd00dd,SHIFT50;
STICKLINE(A AND CC>=OO,OO,CC,1,0),COLORff00ff,SHIFT50;
STICKLINE(A AND CC>=OO,LL,OO,0.1,1),COLORMAGENTA,SHIFT50;
STICKLINE(A AND CC>=OO,CC,HH,0.1,1),COLORMAGENTA,SHIFT50;
STICKLINE(A AND CC<OO,OO,CC,6,0),COLOR009900,SHIFT50;
STICKLINE(A AND CC<OO,OO,CC,4,0),COLOR00bb00,SHIFT50;
STICKLINE(A AND CC<OO,OO,CC,2,0),COLOR00dd00,SHIFT50;
STICKLINE(A AND CC<OO,OO,CC,1,0),COLOR00ff00,SHIFT50;
STICKLINE(A AND CC<OO,LL,HH,0.1,0),COLORGREEN,SHIFT50;
VERTLINE(ISLASTBAR),COLORYELLOW,POINTDOT;
BBI:="BBI";
中:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORFF00FF,LINETHICK2;
上:=BBI+3*STD(BBI,10),COLOR00FF00;
下:=BBI-3*STD(BBI,10),COLOR0000FF;
安全:=MA(C,30),CIRCLEDOT,COLORFF00FF;
TJ1:=下*1.05>中 AND 中*1.05>上 AND 中>=ref(中,1) AND ref(中,1)>=ref(中,2);
TJ2:=LLV(ref(VOL,1),60);
VAR91:=ref(V,1)+ref(V,2)+ref(V,3)+ref(V,4)+ref(V,5);
VAR92:=VAR91/5;
LB:=V/VAR92;
TJ8:=C>LLV(LOW,120)*1.38;
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
GG:=(VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE > OPEN);
TJ3:=LB>2 OR VOL/ref(VOL,1)>2 AND GG;
WLT1:=EMA(C,3);
WLT2:=EMA(C,5);
WLT3:=EMA(WLT2,5);
QQ:= C<上;
MM:=WLT1<ref(WLT1,1);
DD:=QQ AND MM;
TJ6:=COUNT(DD,7)=1;
TJ7:=C<LLV(LOW,250)*2.1;
XG:=TJ1 AND TJ7 AND TJ3;
DRAWICON(XG,LOW*0.96,6);
DRAWICON(TJ6 AND MM AND TJ8 AND 上>中*1.1,HIGH*1.01,5); //本文來至程序化交易網 cxh99.com//