软件名称：[B]火焰山（源码 副图 通达信 贴图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：12.0 KB
官方主页：Home Page
更新时间：2015-08-20 18:41:13
软件简介:
分享一个不错的指标源码
DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'11',0); YM:=MA(((WINNER((CLOSE * 0.9)) * 100) * CLOSE),3);
DC:=(IF((YM > 10),YM,0) / 2);
主力资金:DC,STICK,LINETHICK4,COLORRED;
资金均量:MA(DC,5),COLORGREEN;
资金流入线:DC,COLORYELLOW,LINETHICK1;
资金均量线:MA(DC,5),COLORMAGENTA;
盘1:=COST(0.33);
盘2:=COST(5);
盘3:=COST(15);
盘4:=COST(55);
盘5:=COST(97);
获利:=WINNER(CLOSE)*100;
套牢:=100-WINNER(CLOSE)*100;
DRAWTEXT_FIX(1,0.02,0,0,EXTERNSTR(0,1)),COLOR719FFF;
DRAWTEXT_FIX (1,0.4,0,1,'升浪:'),COLOR00FFFF;
DRAWNUMBER_FIX(1,0.41,0,0,CONST(COST(55))),COLOR007DFB;
DRAWTEXT_FIX (1,0.5,0,0,'预测:'),COLOR00FFFF;
DRAWNUMBER_FIX(1,0.55,0,0,CONST(COST(97))),COLOR007DFB;
{DRAWTEXTABS(675,25,'升浪:'+NUMTOSTRN(盘4,2)),COLOR00FFFF;
DRAWTEXTABS(520,40,'获利:'+NUMTOSTRN(获利,2)+'%'),COLOR00FFFF;
DRAWTEXTABS(600,40,'套牢:'+NUMTOSTRN(套牢,2)+'%'),COLOR00FFFF;
DRAWTEXTABS(675,40,'预测:'+NUMTOSTRN(盘5,2)),COLOR00FFFF;}
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
MA4:=MA(CLOSE,30);
多头排列:= MA1>MA2 AND MA2>MA3 AND MA3>MA4 ;
MA60:=MA(C,60),COLORFFCC66; MA13:=MA(C,13),COLORFFCC66;
MA75:=MA(C,75),COLORFFCC66;
空头排列:= MA1<MA2 AND MA2<MA3 AND MA3<MA4 ;
下跌趋势:=MA4<REF(MA4,3)AND MA4<REF(MA4,1);
上升趋势:=MA4>REF(MA4,3) AND MA4>REF(MA4,1) ;
下降成:=CONST(IF(下跌趋势 AND MA1<REF(MA1,1) AND REF(NOT(下跌趋势),1),1,0));
上升成:=CONST(IF(上升趋势 AND REF(NOT(上升趋势),1),1,0));
DRAWTEXT_FIX(ISLASTBAR AND 下降成=1,0.8,0.2,0,'下降趋势成'),COLORFFFF00;
DRAWTEXT_FIX(ISLASTBAR AND 上升成=1,0.8,0.2,0,'上升趋势成'),COLOR8080FF;
一阴穿2线:=C/O<0.985 AND H>MA1 AND C<MA3;
一阳穿2线:=C/O>1.016 AND L<MIN(MA1,MA3)AND C>MAX(MA1,MA3);
发散度:=MA1/MA4;
均线下发散:=下跌趋势 AND 发散度<0.9 AND 发散度<0.99*REF(发散度,1);
均线上发散:=MA1>REF(MA1,1) AND MA2>REF(MA2,1) AND MA3>REF(MA3,1) AND MA4>REF(MA4,1) AND MA1>MA2 AND MA2>MA3 AND MA3>MA4;
AAAA1:=MAX(MAX(MA(V,5),MA(V,10)),MA(V,60))/MIN(MIN(MA(V,5),MA(V,10)),MA(V,60))<=1.4;
AAAA2:=MAX(MA(C,5),MA(C,10))/MIN(MA(C,5),MA(C,10))<=1.4;
DIFF:=EMA(C,12)-EMA(C,26);
DEA:=EMA(DIFF,9);
升:=CONST(IF( DIFF>0,1,0)),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND 升=1,0.1,0.35,0,'处于上升趋势'),COLOR8080FF;
降:=CONST(IF( DIFF<-0,1,0)),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND 降=1,0.1,0.35,0,'处于下降趋势'),COLORFFFF00;
VARF:=LOW*0.9;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
均线密集:=DIFF>DEA AND K >D AND(MA5-MA10)<0.05 AND (MA20-MA5)<0.05 AND (MA10-MA5)<0.05 AND (MA5-MA20)<0.05;
A:=MA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),19);
B:=-100*(HHV(H,14)-C)/(HHV(H,14)-LLV(L,14));
DD:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),4);
长线:=A+100;
短线:=B+100;
中线:=DD+100;
见顶:=(REF(中线,1)>85 AND REF(短线,1)>85 AND REF(长线,1)>65 AND CROSS(长线,短线));
顶区:=(中线 >REF(中线,1) AND REF(中线,1)>80 AND REF(短线,1)>95 OR REF(短线,2)>95
AND 长线>60 AND 短线<83.5 AND 短线<中线 AND 短线<长线+4);
底区:=长线<20 AND 中线<18 AND 短线<40 AND REF(短线,1)<5 AND 中线 >REF(中线,1)AND 短线 >REF(短线,1);
顶部:=FILTER(顶区,4);
{STICKLINE(见顶,H,(H+L)/2,3,0), ,COLORRED;
STICKLINE(顶部,H,(H+L)/2,3,0), ,COLORRED;}
VAR2N:=LLV(LOW,3)<=LLV(LOW,60);
VAR3N:= C>O AND (C/O>1.03 OR C>1.03*REF(C,1));
绝地反击:=IF(VAR2N AND VAR3N,90,0),COLORYELLOW,LINETHICK2;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
A1:=SMA(MAX(C-LC,0),6,1);
B1:=SMA(ABS(C-LC),6,1);
界:=IF(C>LC,(REF(A1,1)*5-REF(B1,1)*5*0.5)/(0.5-1)+LC,LC+REF(B1,1)*5-REF(A1,1)*5/0.5),COLORWHITE;
MACD:=4*(DIFF-DEA);
{STICKLINE(MACD>0,中轴,中轴+MACD,0,1),COLORRED;
STICKLINE(MACD<0,中轴,中轴+MACD,0,1),COLORLIBLUE;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,中轴,中轴+MACD,0,0 ),COLOR00BBFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,中轴,中轴+MACD,0,0 ),COLOR0011BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,中轴,中轴+MACD,0,0),COLORBB11BB;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,中轴,中轴+MACD,0,0),COLORFFBB11;}
缩头:=IF(MACD>0 AND REF(MACD,1)>REF(MACD,2) AND MACD< REF(MACD,1),1,0);
缩脚:=IF(MACD<0 AND REF(MACD,1)< REF(MACD,2) AND MACD>REF(MACD,1),1,0);
{ DRAWICON( 缩脚,(中轴+MACD)-0.1,1),COLOR00FF00;
DRAWICON(FILTER(缩头,3) AND 缩头,(中轴+MACD)+0.1,2),COLORFF00FF;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100,COLORRED;
DRAWICON(SAT>=100 AND MACD>0,(中轴+MACD)+0.2,12);}
ZDIF:=EMA(INDEXC,12)-EMA(INDEXC,26);
ZHIDEA:=EMA(ZDIF,9);
ZEMACD:=(ZDIF-ZHIDEA)*2/100,COLORSTICK;DK:=ZEMACD;
{STICKLINE(DK<REF(DK,1)AND DK>0,RC,RC+DK,0,0 ),COLOR00BBFF;
STICKLINE(DK>=REF(DK,1)AND DK>0,RC,RC+DK,0,0 ),COLOR0011BB;
STICKLINE(DK>REF(DK,1)AND DK<0,RC,RC+DK,0,0),COLORBB11BB;
STICKLINE(DK<=REF(DK,1)AND DK<0,RC,RC+DK,0,0),COLORFFBB11;}
Z缩头:=IF(DK>0 AND REF(DK,1)>REF(DK,2) AND DK< REF(DK,1),1,0);
Z缩脚:=IF(DK<0 AND REF(DK,1)< REF(DK,2) AND DK>REF(DK,1),1,0);
{ DRAWICON( Z缩脚,(RC+DK)-0.1,1),COLOR00FF00;
DRAWICON(FILTER(Z缩头,3) AND Z缩头,(RC+DK)+0.1,2),COLORFF00FF; }
TT:=240/FROMOPEN;
比:=TT;
J12:=(HIGH - ((HIGH - LOW) / 3));
J23:=(LOW + ((HIGH - LOW) / 3));
AAA1:=CONST(HHV(H,90));
BBB:=CONST(LLV(L,30))+2;
T1:=CONST(IF(CLOSE>界,1,0));
T2:=CONST(IF(CLOSE<界,1,0));
T3:=CONST(IF(C<MA(C,75),1,0));
T4:=CONST(IF(CROSS(CLOSE,界),1,0));
T5:=CONST(IF(CROSS(MA(CLOSE,13),CLOSE),1,0));
T6:=CONST(IF(C>=MA(C,5) AND C<MA(C,13),1,0));
T7:=CONST(IF(C>=MA(C,75),1,0));
VAR1Y:=VOL/CAPITAL*100;
VAR2Y:=LLVBARS(LOW,10);
VAR3Y:=(CLOSE-REF(OPEN,VAR2Y))/REF(OPEN,VAR2Y)*100;
VAR4Y:=REF(CLOSE,2)*0.865;
VAR5Y:=REF(CLOSE,13)*0.772;
VAR6Y:=MAX(VAR4Y,VAR5Y);
T9:=(CLOSE-VAR6Y)/CLOSE>0.2 AND VAR3Y<50 AND SUM(VAR1Y,5)/5>5;
T10:=CONST(IF(VAR2N AND VAR3N,1,0));
T11:=CONST(IF(缩脚,1,0));
T12:=CONST(IF( ZDIF<0 ,1,0));
T14:=CONST(IF(ZEMACD>=REF(ZEMACD,1) AND ZEMACD>0 AND ZDIF>=0 ,1,0));
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.2,0,'看 均 线★'),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.35,0,'看MACD★'),COLORFFFFFF;
&n
[url=http://www.70822.com/soft/sort013/sort05/down-87560.html]火焰山（源码 副图 通达信 贴图）[/url]