黑馬主圖源碼(同花順)-同花順公式

黑馬主圖源碼(同花順)-同花順公式

上:=(SMA(HIGH,21,2)*1.05);

DRAWTEXT(FILTER(((((CLOSEREF(CLOSE,1))AND(CLOSEREF(CLOSE,1)))AND(HIGH上))AND(CLOSE上)),5),(HIGH+0.05),'-減倉'),colorFFFFFF;

下軌道:(SMA(LOW,21,2)*0.969),POINTDOT,color00FFFF;

BMA:=MA(CLOSE,118);

阻擋:=(SMA(HIGH,21,2)*1.05);

RSV:=(((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13)))*100);

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=((3*K)-(2*D));

RSV12:=(((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*100);

K12:=SMA(RSV12,3,1);

D12:=SMA(K12,3,1);

J12:=((3*K12)-(2*D12));

RSV24:=(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*100);

K24:=SMA(RSV24,3,1);

D24:=SMA(K24,3,1);

J24:=((3*K24)-(2*D24));

支撐位:=IF(crOSS(J,J24),LOW,REF(LOW,BARSLAST(CROSS(J,J24))));

壓力位:IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J)))),color00FF00;

{U2L:=IF((CLOSE=MA(CLOSE,20)),80,50);

L2L:=IF((CLOSE=MA(CLOSE,20)),50,20);

RH1:=IF(((JU2L)AND(REF(J,1)=U2L)),HHV(REF(HIGH,1),(BARSLAST(((J=U2L)AND(REF(J,1)U2L)))-1)),REF(HHV(REF(HIGH,1),(BARSLAST(((J=U2L)AND(REF(J,1)U2L)))-1)),BARSLAST(((JU2L)ANDREF(J,1)))));

RH4:=IF((HIGHRH1),LOW,REF(LOW,BARSLAST((HIGHRH1))));

RH42:=IF((HIGHRH1),J,REF(J,BARSLAST((HIGHRH1))));

RH5:=IF((((HIGHRH4)AND(JRH42))AND(JJ24)),HIGH,REF(HIGH,BARSLAST((((HIGHRH4)AND(JRH42))AND(JJ24)))));

RL1:=IF(((JL2L)AND(REF(J,1)=L2L)),LLV(REF(LOW,1),(BARSLAST(((J=L2L)AND(REF(J,1)L2L)))-1)),REF(LLV(REF(LOW,1),(BARSLAST(((J=L2L)AND(REF(J,1)L2L)))-1)),BARSLAST(((JL2L)ANDREF(J,1)))));

RL4:=IF((LOWRL1),HIGH,REF(HIGH,BARSLAST((LOWRL1))));

RL42:=IF((LOWRL1),J,REF(J,BARSLAST((LOWRL1))));

RL5:=IF((((LOWRL4)AND(JRL42))AND(JJ24)),LOW,REF(LOW,BARSLAST((((LOWRL4)AND(JRL42))AND(JJ24)))));}

CB:=((AMOUNT/vol)/100);

CD:=((CBHIGH)OR(CBLOW));

黑馬趨勢:=MA(CLOSE,3);

MAP:=MA(CLOSE,8);

AA5:=MA(CLOSE,21);

AA10:MA(CLOSE,8),color0000FF;

AA12:MA(CLOSE,12),color0000FF;

BB10:=((ATAN((AA10-REF(AA10,1)))*3.1416)*10);

BB12:=((ATAN((AA12-REF(AA12,1)))*3.1416)*10);

MA13:=MA(CLOSE,13);

DRAWTEXT(FILTER(((((((CLOSE/OPEN)1.04)AND((CLOSE-REF(CLOSE,1))0))AND(CLOSE下軌道))AND((AA10-REF(AA10,1))0))AND(CLOSE上)),3),(LOW-0.07),'追擊'),colorD1E768;

{STICKLINE((((AA12=AA10)AND(BB12=1))AND(BB10=1)),AA10,AA12,4,0),color0000FF;

STICKLINE((((AA12=AA10)AND(BB10=1))AND(BB10=1)),AA10,AA12,4,0),color00FF00;}

VARD:=((((OPEN+LOW)+HIGH)+CLOSE)/4);

支撐:=EMA(VARD,5);

短期底部:=LLV(OPEN,30);

{DRAWTEXT(((((((CROSS(黑馬趨勢,短期底部)AND((RL5-REF(RL5,1))0))AND((黑馬趨勢-REF(黑馬趨勢,1))0))AND(黑馬趨勢1))AND(LOW=支撐位))AND(CLOSE支撐位))AND(HIGH壓力位)),(LOW-0.15),'黑馬發(fā)現(xiàn)'),color00FFFF;

DRAWTEXT((((((((CROSS(黑馬趨勢,RL5)AND((黑馬趨勢-REF(黑馬趨勢,1))0))AND(HIGH壓力位))AND(LOW=短期底部))AND(CLOSE支撐位))AND(CD1))AND(CLOSEOPEN))AND(CLOSERL5)),LOW,'短買'),color00FF00;

DRAWTEXT(FILTER((((((((LOW=短期底部)AND((CLOSE-REF(CLOSE,1))CLOSE))AND((MA(CLOSE,10)-REF(MA(CLOSE,10),1))0))AND(WINNER(CLOSE)0.05))AND(短期底部=RL5))AND(LOW=RL5))AND(HIGH壓力位)),3),LOW,'★機(jī)會難得'),colorFFFFFF;

歷史大底:DRAWTEXT(FILTER((((((LLV(LOW,0)AND(WINNER(CLOSE)0.08))AND(LOW=短期底部))AND(CLOSE短期底部))AND(J80))AND((CLOSE/OPEN)1.08)),20),(LOW-0.45),'★★歷史大底');

DRAWTEXT(FILTER(((((((((LOW=短期底部)AND(CLOSE壓力位))AND((AA5-REF(AA5,1))0))AND(J80))AND(CLOSE支撐位))AND((黑馬趨勢-REF(黑馬趨勢,1))0))AND(WINNER(CLOSE)0.1))AND(CLOSEOPEN)),5),(LOW-0.15),'★黑馬登天'),colorCDEEC5;}

X1:=(((((3*CLOSE)+HIGH)+LOW)+OPEN)/6);

X2:=EMA(X1,10);

X3:=REF(X2,1);

X4:=((REF(HIGH,1)+REF(LOW,1))/2);

X5:=(MA(CLOSE,21)+(2*STD(CLOSE,21)));

X6:=REF(CLOSE,1);

X7:=((SMA(MAX((CLOSE-X6),0),7,1)/SMA(Abs((CLOSE-X6)),7,1))*100);

X8:=CROSS(79,X7);

X9:=FILTER(X8,4);

MAP1:=MA(CLOSE,60);

均線30:=MA(CLOSE,30);

均線89:=MA(CLOSE,89);

均線:=MA(CLOSE,16);

均線34:=MA(CLOSE,34);

均線55:=MA(CLOSE,55);

VAR1:=EMA(CLOSE,8);

VAR2:=EMA(VAR1,20);

VAR3:=CROSS(VAR1,VAR2);

VAR4:=(VAR1MA(CLOSE,60));

VAR5:=(((HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36)))*100);

VAR6:=SMA(VAR5,5,1);

VAR7:=SMA(VAR6,8,1);

VAR8:=(CROSS(VAR6,VAR7)AND(VAR716));

VAR9:=((CLOSE(LLV(CLOSE,60)+(0.3*LLV(CLOSE,60))))ANDVAR8);

VARA:=IF((CLOSE1000),VAR8,VAR9);

黑馬起步:=(VAR3ANDVAR4);

逃遁:=VARA;

均線20:=MA(CLOSE,20);

均線120:=MA(CLOSE,120);

牛熊線:=MA(CLOSE,250);

VA:=CROSS(MA(CLOSE,19),MA(CLOSE,120));

VB:=(MA(CLOSE,20)MA(CLOSE,120));

VC:=CROSS(MA(CLOSE,120),MA(CLOSE,89));

VD:=(MA(CLOSE,20)MA(CLOSE,120));

VE:=CROSS(MA(CLOSE,20),MA(CLOSE,250));

VF:=(MA(CLOSE,20)MA(CLOSE,250));

VG:=CROSS(MA(CLOSE,250),MA(CLOSE,20));

{DRAWTEXT(FILTER(((((((((OPEN均線120)AND(均線20均線120))AND(LOW=均線120))AND((均線20-REF(均線20,1))0))AND(CLOSEOPEN))AND((均線120-REF(均線120,1))0))AND(HIGHRH5))AND(CLOSE=均線120)),15),LOW,'★120跳馬'),color0089E0;

DRAWTEXT((((VAAND((均線120-REF(均線120,1))0))AND(HIGHRH5))AND(CLOSEOPEN)),LOW,'★寶馬望月'),colorFFFFFF;}

DRAWTEXT((((((均線-REF(均線,1))0)ANDCROSS(均線20,均線120))AND(LOW=均線120))AND(CLOSE=均線120)),LOW,'三線開花'),colorFFFFFF;

短期底部2:LLV(HIGH,30),LINETHICK2,color0000FF;

上軌:(SMA(HIGH,21,2)*1.092),POINTDOT,colorFFFFFF;

中軌道:(SMA(HIGH,21,2)*1.017),POINTDOT,colorFFFFFF;

DRAWTEXT(FILTER(((((LOW下軌道)AND(CLOSEMA(CLOSE,15)))AND(CLOSE短期底部2))AND(HIGH壓力位)),10),LOW,'★短線5%'),color9DC522;

DRAWTEXT(((((((HIGH=均線120)AND(CLOSEREF(CLOSE,1)))AND(CLOSEREF(CLOSE,1)))AND(HIGH上))AND(CLOSE上))AND(CLOSE均線120)),(HIGH+0.05),'減倉'),color00FF00;

DRAWTEXT(FILTER(((HIGH阻擋)AND(CLOSE阻擋)),5),(HIGH+0.15),'逃命');

DRAWTEXT(((VEVG)AND(HIGH阻擋)),(LOW-0.65),'★黑馬短線'),color00FFFF;

DRAWTEXT(FILTER(((((((((((OPENX2)AND(CLOSEX2))AND((支撐-REF(支撐,1))0))AND((支撐-REF(支撐,1))0))AND(CLOSE阻擋))AND((均線-REF(均線,1))0))AND(CLOSE=均線))AND(HIGH阻擋))AND((AA10-REF(AA10,1))0))AND((阻擋-REF(阻擋,2))0)),11),(LOW-0.11),'★快馬加鞭'),color0000FF;

DRAWTEXT(FILTER(((((((OPENX2)AND(WINNER(CLOSE)0.2))AND(CLOSEX2))AND((X2-REF(X2,1))0))AND(HIGH阻擋))AND((CLOSE-REF(CLOSE,1))0.35)),4),(LOW-0.05),'★黑馬狂奔'),colorD18073;

DRAWTEXT((((((((CROSS(支撐,均線)AND(HIGH中軌道))AND(WINNER(CLOSE)0.2))AND(CLOSE阻擋))AND(CLOSEOPEN))AND(LOW=X2))AND(CLOSE=X2))ANDCROSS(支撐,X2)),LOW,'★黑馬起步'),color00FFFF;

DRAWTEXT(CROSS(X4,X5),HIGH,'●減倉'),color00B4FF;

DRAWTEXT(X9,(HIGH*1.03),'出貨'),color9000F5;

DRAWTEXT((((黑馬起步0)AND(LOW=X2))AND((均線-REF(均線,1))0)),(LOW-0.11),'★黑馬起步'),color00FF00;

DRAWTEXT((逃遁0),(HIGH*1.14),'●逃命'),color0000FF;

RDV:=SMA(LOW,8,1);

DRAWTEXT(((((CROSS(K,D)AND(CLOSE=OPEN))AND((X2-REF(X2,1))0))AND((RDV-REF(RDV,1))0))AND(K=33)),(LOW-0.08),'★黑馬初現(xiàn)'),color8500DE;

DRAWTEXT(FILTER((((((((LOW=短期底部)AND(WINNER(CLOSE)0.2))AND(CLOSE牛熊線))AND(HIGH阻擋))AND((X2-REF(X2,1))0))AND(CLOSEOPEN))AND(HIGH=X3)),5),(LOW-0.03),'黑馬筑底'),color85B256;

RCK:=(SMA(LOW,21,2)*0.95);

趨勢線:=SMA(LOW,5,1);

大膽買入:DRAWTEXT(((CROSS(趨勢線,RCK)AND(LOW=X2))AND((X2-REF(X2,1))0)),LOW,'★大膽買入'),colorE50000;

B1:=(((HIGH+LOW)+CLOSE)/3);

B6:=HHV(B1,(4*15));

B7:=LLV(B1,(4*15));

B8:=(B6-B7);

飛龍頂?shù)拙€:=(MA(((B1-B7)/B8),2)*80);

DRAWTEXT(FILTER(((((((飛龍頂?shù)拙€=1)AND(WINNER(CLOSE)0.02))AND(HIGH趨勢線))AND(CLOSEOPEN))AND(LOW=短期底部))AND(CLOSE短期底部)),8),(LOW-0.02),'黑馬尋底'),colorE7DD1F;

DRAWTEXT(FILTER((((((((LOW=短期底部)AND(WINNER(CLOSE)0.015))AND((OPEN/CLOSE)0.99))AND((J-REF(J,1))0))AND(CLOSEOPEN))AND(HIGH支撐位))AND(CLOSE短期底部)),25),(LOW-0.09),'開始建倉'),color00FFFF;

DRAWTEXT(FILTER((((((((LOW=均線30)AND((AA10-REF(AA10,1))0))AND((均線-REF(均線20,1))0))AND((趨勢線-REF(趨勢線,1))0))AND(CLOSE=均線30))AND(WINNER(CLOSE)0.15))AND((CLOSE/OPEN)1.01)),3),LOW,'★天馬奔月'),color76B0FC;

DRAWTEXT((((((OPEN=均線)AND((均線30-REF(均線30,1))0))AND(CLOSE均線89))AND(BB101))AND((CLOSE/OPEN)1.04)),LOW,'★天馬過橋'),colorCC99FF;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,9,0),colorFF5B00;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,8,0),colorFF6C00;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,7,0),colorFF7B00;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,6,0),colorFF9C00;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,5,0),colorFFBE00;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,3.5,0),colorFFCC00;

STICKLINE((OPEN=CLOSE),CLOSE,OPEN,1.5,0),colorFFFF00;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,9,0),color070084;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,8,0),color0000A3;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,7,0),color0000B7;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,6,0),color0000CD;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,5,0),color0000E9;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,3,0),color0754E9;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,1.5,0),color076EF3;

STICKLINE((CLOSE=OPEN),CLOSE,OPEN,1,0),color077BF3;

STICKLINE((CLOSEOPEN),OPEN,LOW,1,0),color0726CA;

STICKLINE((CLOSEOPEN),CLOSE,HIGH,1,0),color0726CA;

STICKLINE((OPENCLOSE),CLOSE,LOW,1,0),colorDE9100;

STICKLINE((OPENCLOSE),OPEN,HIGH,1,0),colorDE9100;

STICKLINE(((((CLOSE/OPEN)1.04)AND(CLOSE阻擋))AND((CLOSE-REF(CLOSE,1))0)),CLOSE,OPEN,9,0),color0090FF;

STICKLINE(((((CLOSE/OPEN)1.04)AND(CLOSE阻擋))AND((CLOSE-REF(CLOSE,1))0)),CLOSE,OPEN,8,0),color009FFF;

STICKLINE(((((CLOSE/OPE