通达信借盘下棋源码副图
S1:=IF(CODELIKE('300'),0,1);
{www.9m8.cn}通达信去掉*、S、ST}
S2:=IF(NAMELIKE('S'),0,1);
S3:=IF(NAMELIKE('*'),0,1);
{www.9m8.cn}通达信去掉停牌}
S4:=DYNAINFO(17)
去掉:= S2 AND S3 AND S4;
ZD2:= KDJ.J#DAY (9,3,3);
DIF11:=(EMA(DCLOSE,12)-EMA(DCLOSE,26))/EMA(DCLOSE,26)*100;
DEA22:=EMA(DIF11,9);
准备飞:=(DIF11-DEA22)*100;
集结号:=50;
穿:=准备飞-REF(准备飞,1)COLORRED LINETHICK2;
★集结号:CROSS(穿,集结号) AND C 20 AND 去掉,NODRAW;
DIF1:=(EMA(DCLOSE,12)-EMA(DCLOSE,26))/EMA(DCLOSE,26)*100;
DEA1:=EMA(DIF1,9);
AAA1:=(DIF1-DEA1)*120;
买:=45;
入:=AAA1-REF(AAA1,1);
正大:=CROSS(入,买),NODRAW;
DIF:=(EMA(DCLOSE,10)-EMA(DCLOSE,72))/EMA(DCLOSE,72)*100;
DEA:=EMA(DIF,17);
AAA:=(DIF-DEA)*100;
牛股:=CROSS(AAA-REF(AAA,1),45),NODRAW;
正大牛股:=(正大 AND 牛股),NODRAW;
角线:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);
角线MA:=MA(角线,5);
ANA:=PLOYLINE(CROSS(角线,角线MA),角线MA);
ANB:=PLOYLINE(CROSS(角线MA,角线),角线MA);
角买:=CROSS(角线,角线MA) AND ((ANB REF(ANB,1) AND ANB ANA AND 角线MA =0) OR ((角线MA =-45 OR CROSS(角线MA,-45)) AND (ANB -60 OR LLV( KDJ.J ,3) =-49) AND ANB
角买点:=角买=1;
AA10:=MA(CLOSE,8);
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
均线３０:=MA(CLOSE,30);
均线８９:=MA(CLOSE,89);
均线:=MA(CLOSE,16);
天马:=((((((OPEN = 均线) AND ((均线３０ - REF(均线３０,1)) 0))
AND (CLOSE 均线８９)) AND (BB10 1)) AND ((CLOSE / OPEN) 1.04)));
{www.9m8.cn}股价必涨}
AA:=IF(CLOSE/REF(CLOSE,1) 1.050 AND HIGH/CLOSE 1.010 AND IF(CLOSE REF(CLOSE,1),88,0) 0, 91, 0);
SS:=MA((LOW+HIGH+CLOSE)/3,5) REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1) REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C REF(C,1) AND C
MR:=SC AND COUNT(SS,2);
BB:=MR AND NOT(REF(MR,1));
股价必涨:=(AA OR BB OR 角买点 OR 天马);
{www.9m8.cn}抄底}
二十日换手率:=BETWEEN(SUM(HSCOL,20),10,200);{www.9m8.cn}意思是 20日换手率介于10---100之间}
DFO:=(C-REF(C,1))/REF(C,1)*100
AAO:=BARSLAST(DFO);
突破:=CROSS(C,REF(O,AAO));
抄底:=(二十日换手率 AND 突破),NODRAW;
大牛:(正大牛股 AND 股价必涨),NODRAW;
必涨:(正大牛股 AND 抄底),,NODRAW;
大牛股:(大牛 AND 必涨 AND 抄底),NODRAW;
共同富裕:=大牛股 OR 大牛 OR 必涨,NODRAW;
A:=EMA(C,21);
B:=A REF(A,1);
QN1:=MA(C,13);
QN:=ATAN((QN1-REF(QN1,1)))*180/2;
QN4:=QN 1 AND QN1 REF(QN1,1);
QN2:=MA(C,21);
QN3:=ATAN((QN2-REF(QN2,1)))*180/2;
LTP:=COUNT(C/REF(C,1) 1.098,10) 0 AND DYNAINFO(4) 0,NODRAW;
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
第二回调线:=(1-7/100)*DD;
第二回调:(C =第二回调线 AND LTP AND QN3 1 AND QN4 {www.9m8.cn}AND J =REF(J,5)})*2.5, COLORRED,NODRAW;
YT:=(第二回调 0 OR 共同富裕 OR ★集结号) ,NODRAW;
{www.9m8.cn}DRAWGBK(ISLASTBAR AND (P=1 OR YT),RGB(30,30,30),RGB(30,30,30),0,' ',1);}
A1:= KD.K#DAY (9,3,3);
A2:= KD.D#DAY (9,3,3);
AA1:=(A1+A2)/2;
A3:= KD.K#WEEK (9,3,3);
A4:= KD.D#WEEK (9,3,3);
A5:= KD.K#MONTH (9,3,3);
A6:= KD.D#MONTH (9,3,3);
A7:= KDJ.J#WEEK (9,3,3);
A8:= KD.K (9,3,3);
A9:= KD.D (9,3,3);
上面日Ｋ:A1,COLORYELLOW,NODRAW;
日Ｄ:A2,COLORYELLOW,NODRAW;
中间周Ｋ:A3,COLORWHITE,NODRAW;
周Ｄ:A4,COLORWHITE,NODRAW;
下面月Ｋ:A5,COLORGREEN,NODRAW;
月Ｄ:A6,COLORGREEN,NODRAW;
◎周Ｊ:A7,COLORWHITE,NODRAW;
{www.9m8.cn}STICKLINE(C 0,-0.3 ,3 ,5 ,0 ),COLORWHITE;}
STICKLINE( A1 A2,2 ,3 ,5 ,0 ),COLOR650000;
STICKLINE( A1 A2,2 ,3 ,5 ,0 ),COLOR111111;
STICKLINE( A3 A4,2 ,0.5 ,5 ,0 ),COLOR650000;
STICKLINE( A3 A4,2, 0.5 ,5 ,0 ),COLOR111111;
STICKLINE( A5 A6,-0.3 ,0.5 ,5 ,0 ),COLOR650000;
STICKLINE( A5 A6,-0.3 ,0.5 ,5 ,0 ),COLOR111111;
STICKLINE( C 0,0.5 ,0.5 ,5 ,0 ),COLOR555555;
STICKLINE( C 0,2 ,2,10 ,0 ),COLOR555555;
K:=A8*3/120;
D:=A9*3/120;
J:=A7*3/120;
AA2:=AA1*3/120;
{www.9m8.cn}A3*3/120;
A4*3/120;}
DRAWBAND(A3*3/120,RGB(250,00,250),A4*3/120,RGB(00,250,250));
DRAWTEXT(A3 =A4,J,'◎'),COLORFFFFFF;
DRAWTEXT(A3 A4,J,'◎'),COLOR00FFFF;
STICKLINE(K D,K,D,5,1),COLORFFFF00;
STICKLINE(K =D,K,D,5,1),COLORRED;
STICKLINE(C 0,1.25,1.25,3,0),COLOR555555;
{www.9m8.cn}STICKLINE(C 0,AA2,AA2,2,0),COLOR00FFFF;};
STICKLINE(CROSS(穿,集结号) AND ZD2 =50 AND C 20 AND 去掉,0,2.5,1,0),COLORMAGENTA;
STICKLINE(CROSS(穿,集结号) AND ZD2 50 AND C 20 AND 去掉,0,0.5,4,1),COLORCYAN;
DRAWTEXT(CROSS(穿,集结号) AND ZD2 50 AND C 20 AND 去掉,0.5,' ★★号'),COLORCYAN;
DRAWTEXT(CROSS(穿,集结号) AND ZD2 =50 AND C 20 AND 去掉,2,' ★集结号'),COLORMAGENTA;
DRAWICON(大牛 0,3,1);
DRAWICON(必涨 0,1,3);
DRAWICON(大牛股 0,0,23);
DRAWBAND(第二回调,RGB(200,0,0),0,RGB(200,0,0));
STICKLINE(第二回调,0,2,1,1);
