相關標簽:抄底逃頂指標公式源碼 、 提前抄底逃頂指標公式 、 rsi抄底逃頂指標公式 、 波段抄底逃頂指標公式 、 2016抄底逃頂指標公式 、 抄底必殺主圖指標公式 、 通達信抄底逃頂指標 、 準確抄底逃頂指標 、 楊百萬抄底逃頂指標 、 抄底逃頂終結指標 、 文華抄底逃頂指標 、 經典抄底逃頂指標 、 抄底逃頂絕品指標 、 同花順抄底逃頂指標 、 預告逃頂抄底指標 、

?

抄底逃頂趨勢決策主圖公式源碼

?

?

//#@Fname=抄底逃頂趨勢決策
//#@comment=
//#@control=Check#1 趨勢線
//#|Check#2 決策密碼
//#@FuncType=
//#@style=:Line516,成交價格,1,0,1,4,920515;
//#@availperiod=2147430400
//#@param=N1=1.0000000001,0.0000000001,1.0000000001,1;N2=0.0000000001,0.0000000001,1.0000000001,1;
//#@isDrawCurve=1
//#@Fdesc=抄底逃頂趨勢決策
//#@defaultperiod=16384
//#@coord=M
//#@ordinate=0,0.000000;0,0.000000;1,20487.000000;0,0.000000;0,0.000000;0;0,0.000000
//#@@FUNCSPEC@=source
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
Varb:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
Varc:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
Vard:=BARSCOUNT(CLOSE);
主力:=EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5;
散戶:=EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5;
dpLC:=REF(INDEXC,1);
dpRSI1:=SMA(MAX(INDEXC-dpLC,0),6,1)/SMA(ABS(INDEXC-dpLC),6,1)*100;
dpAR:=SUM(INDEXH-INDEXO,26)/SUM(INDEXO-INDEXL,26)*100;
dpVarb:=SMA(MAX(INDEXC-dpLC,0),7,1)/SMA(ABS(INDEXC-dpLC),7,1)*100;
dpVarc:=SMA(MAX(INDEXC-dpLC,0),13,1)/SMA(ABS(INDEXC-dpLC),13,1)*100;
dpVard:=BARSCOUNT(INDEXC);
dpzl:=EMA( (INDEXC-MA(INDEXC,7))/MA(INDEXC,7)*480,2)*5;
dpsh:=EMA( (INDEXC-MA(INDEXC,11))/MA(INDEXC,11)*480,7)*5;
DRAWTEXT(CROSS(85,RSI1),HIGH*1.02,'頂'),colorgreen;
DRAWTEXT(CROSS(85,dpRSI1),HIGH*1.02,'系統風險'),coloryellow;
de1:=CROSS(RSI1,25) AND (CROSS(dpRSI1,25) OR dpzl>dpsh);
DRAWTEXT(de1,LOW*0.98,'底'),colorred;IF((n1<1 AND n2<1) OR(n1>0 AND n2>0))
{
IF(CLOSE>OPEN)
RETURN "陽";
ELSE IF(CLOSE<OPEN)
RETURN "陰";
ELSE IF(CLOSE==OPEN AND OPEN>=CLOSE[1])
RETURN "陽";
ELSE IF(CLOSE==OPEN AND OPEN<=CLOSE[1])
RETURN "陰";
MONEY;
K線換手;
}
ELSE IF((n1<1 AND n2>0))
{
Var1=MONEY/VOL;
A=SMA(Var1,5,1)-SMA(Var1,55,1);
B=SMA((A-SMA(A,5,1)),5,1);
風險系數:B;
IF(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1))
RETURN ("colorred");
IF(CLOSE<MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1))
RETURN ("colorwhite");
IF(A<REF(A,3) AND B<REF(B,3) AND CLOSE>=MA(CLOSE,20))
RETURN ("colorwhite");
IF(A<REF(A,3) AND B<REF(B,3) AND CLOSE<MA(CLOSE,20))
RETURN ("colorgreen");
IF(A>REF(A,1) AND B<REF(B,1))
RETURN ("colorwhite");
IF(A<REF(A,1) AND B>REF(B,1))
RETURN ("colorwhite");
}
ELSE IF(n1>0 AND n2<1)
{
大單凈差BBD:=BIGBUYCOUNT1+WAITBUYCOUNT1-BIGSELLCOUNT1-WAITSELLCOUNT1;
dd:=大單凈差BBD;
DIFF:=EMA(大單凈差BBD,2) - EMA(大單凈差BBD,4),coloryellow;
DIFF2:=EMA(大單凈差BBD,6) - EMA(大單凈差BBD,12),coloryellow;
m34:=MA(C,34);
m5:=MA(C,5);
r5:=COUNT(大單凈差BBD>0,5);
r6:=COUNT(大單凈差BBD>0,6);
a1:=IF(C<REF(C,2)*1.0200,1,0);
a2:=IF(C<REF(C,2)*1.0050,1,0);
a3:=IF(C<REF(C,2)*0.0985,1,0);
a4:=IF(C<REF(C,2)*0.0970,1,0);
a5:=IF(DIFF>0,2,0);
a6:=IF(DIFF2>0,2,0);
a7:=IF(C>m34,2,0);
a8:=IF(C>m5,2,0);
a9:=IF(r5>3,2,0);
a10:=IF(r6>3,1,0);
az:=a1+a2+a3+a4+a5+a6+a7+a8+a9+a10;
IF(C<m5)
green:=C<m5;
ELSE IF(az>2.5)
red:=az>2.5;
ELSE green:=az<2.5;
ENTERLONG:=(REF(green,1)=1 AND red=1 ) AND COUNT(REF(green,1)=1 AND red=1,BARSLAST(REF(red,1)=1 AND green=1))=1;
EXITLONG:=REF(red,1)=1 AND green=1 AND COUNT(REF(red,1)=1 AND green=1,BARSLAST(REF(green,1)=1 AND red=1))=1;
VERLINE(ENTERLONG,1),colorred;
VERLINE(EXITLONG,1),colorgreen;
IF(C<m5)
RETURN ("colorgreen");
IF(az>2.5)
RETURN ("colorRED");
IF(az<2.5)
RETURN ("colorgreen");
}
SHGZG;
MONEY;
HIGH;
LOW;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?