相關標簽:

?

//股市DNA+股市振蕩波DRAWGBK(CLOSE>0, COLORRGB(1,3333,6666), COLORRGB(1,8888,8888),3);
CXH0:=(((LOW + HIGH) + CLOSE) / 3);
CXH4T:=MA(CXH0,5);
操作T:=HHV(CXH4T,13);
拉升T:=LLV(CXH4T,13);
買賣T:=(0 - (((操作T - CXH4T) / CXH4T) * 100));
J1T:=(0 - (((操作T - 拉升T) / 拉升T) * 100));
J2T:=(買賣T - J1T);
J3T:=IF((買賣T < (0 - 15)),(買賣T + 15),0);
DBXJ1:=IF(((買賣T < (0 - 10)) AND (J1T < (0 - 15))),(J1T + 15),0);
DBXJ2:=((J3T + DBXJ1) / 2);
D:IF((DBXJ2 > 0),0,DBXJ2),POINTDOT;
DBXJ:=INTPART((((SMA(MAX((CLOSE - REF(CLOSE,1)),0),6,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),6,1)) * 10) - 2));
N:IF((DBXJ < 0),0,DBXJ),POINTDOT;
STICKLINE((DBXJ2 < (0 - 50)),0,(0 - 60),10,0),colorFF00FF;
STICKLINE((DBXJ2 < (0 - 40)),0,(0 - 50),10,0),colorFF;
STICKLINE((DBXJ2 < (0 - 30)),0,(0 - 40),10,0),colorFFFF;
STICKLINE((DBXJ2 < (0 - 20)),0,(0 - 30),10,0),colorFF00;
STICKLINE((DBXJ2 < (0 - 10)),0,(0 - 20),10,0),colorFFFF00;
STICKLINE((DBXJ2 < 0),0,(0 - 10),10,0),colorFFFFFF;
STICKLINE((DBXJ > 5),0,60,10,0),colorFF00FF;
STICKLINE((DBXJ > 4),0,50,10,0),colorFF;
STICKLINE((DBXJ > 3),0,40,10,0),colorFFFF;
STICKLINE((DBXJ > 2),0,30,10,0),colorFF00;
STICKLINE((DBXJ > 1),0,20,10,0),colorFFFF00;
STICKLINE((DBXJ > 0),0,10,10,0),colorFFFFFF;
A:STICKLINE((CLOSE > 0),(0 - 3),3,10,0),colorFF0000;
DBXK:=INBLOCK('ST板塊');
KB:=INBLOCK('*ST板塊');
KC:=IF(((DBXK = 1) OR (KB = 1)),0,1);
ST:=MAX((0 - D),(0 - REF(D,1)));
DC:=IF((SYSPARAM(1) = (BARSSINCE((CLOSE > 0)) + 1)),1,0);
DRAWTEXT(((DC > 0) AND ((N = REF(N,1)) OR (N < REF(N,1)))),80,'請先參考并完成昨日的指示操作\n昨日無指示則今日無需操作。'),ALIGN0,colorFFFF00;
DRAWTEXT((((((DC > 0) AND (N > REF(N,1))) AND (D = 0)) AND (REF(D,1) = 0)) AND (N = 1)),80,'請先參考并完成昨日的指示操作!\n昨日無指示則今日無需操作。'),ALIGN0,colorFFFF00;
DRAWTEXT((((((DC > 0) AND (N > REF(N,1))) AND (N = 1)) AND ((D < 0) OR (REF(D,1) < 0))) AND (((J3T > REF(J3T,1)) OR (DBXJ1 > REF(DBXJ1,1))) OR (DBXJ2 = REF(DBXJ2,1)))),80,'今日可適量買進，倉量%:\n如果是補倉增倉則必須有較多空閑資金或處于虧損才操作！'),ALIGN2,colorFF00;
DRAWTEXT((((((DC > 0) AND (N > REF(N,1))) AND (N = 1)) AND ((D < 0) OR (REF(D,1) < 0))) AND (J3T < REF(J3T,1))),80,'請先參考并完成昨日的指示操作!\n昨日無指示則今日無需操作！'),ALIGN2,colorFFFF00;
DRAWNUMBER((((((DC > 0) AND (N > REF(N,1))) AND (N = 1)) AND ((D < 0) OR (REF(D,1) < 0))) AND (((J3T > REF(J3T,1)) OR (DBXJ1 > REF(DBXJ1,1))) OR (DBXJ2 = REF(DBXJ2,1)))),80,ST,0),ALIGN1,colorFF;
DRAWTEXT(((((DC > 0) AND (N > REF(N,1))) AND (N = 2)) AND ((D < 0) OR (REF(D,1) < 0))),80,'如果已經持股，那么虧則買進，倉量%:\n盈利則減半！'),ALIGN2,colorFFFF00;
DRAWNUMBER(((((DC > 0) AND (N > REF(N,1))) AND (N = 2)) AND ((D < 0) OR (REF(D,1) < 0))),80,ST,0),ALIGN1,colorFF;
DRAWTEXT((((((DC > 0) AND (N = 2)) AND (N > REF(N,1))) AND (D = 0)) AND (REF(D,1) = 0)),80,'如果已經持股，那么盈利則賣出，虧損則繼續持股！'),ALIGN0,colorFFFF;
DRAWTEXT((((DC > 0) AND (N = 3)) AND (N > REF(N,1))),80,'如果已經持股，那么盈利則賣出！虧損則繼續持股！'),ALIGN0,colorFFFF;
DRAWTEXT((((DC > 0) AND (N = 4)) AND (N > REF(N,1))),80,'如果已經持股，那么盈利則賣出,虧損則減三分之一！'),ALIGN0,colorFFFF;
DRAWTEXT((((DC > 0) AND (N = 5)) AND (N > REF(N,1))),80,'如果已經持股，那么盈利則賣出,虧損則減半！'),ALIGN0,colorFFFF;
DRAWTEXT((((DC > 0) AND (N > 5)) AND (N > REF(N,1))),80,'如果還有持股，那么請立即無條件賣出！'),ALIGN0,colorFF00FF;
DRAWTEXT(((DC > 0) AND (CLOSE > 0)),(0 - 15),'買賣參考價（元）:'),ALIGN2,colorFF0000;
DRAWNUMBER(((DC > 0) AND (CLOSE > 0)),(0 - 15),CLOSE,2),ALIGN1,colorFF;
初選范圍:10*IF(((D < 0) OR (REF(D,1) < 0)),1,0),POINTDOT,color808080;
出擊時機:10*IF((((N > REF(N,1)) AND ((N = 1) OR (N = 2))) AND ((D < 0) OR (REF(D,1) < 0))),1,0),POINTDOT,colorFF00;
CXH1:=(HIGH+LOW+CLOSE)/3;
CXH2:=(CXH1-MA(CXH1,14))/(0.015*AVEDEV(CXH1,14));
CXH3:=(CXH1-MA(CXH1,70))/(0.015*AVEDEV(CXH1,70));
CXH4:=IF(CXH2>=150 AND CXH2<200 AND CXH3>=150 AND CXH3<200,-10,0);
CXH5:=IF(CXH2<=-150 AND CXH2>-200 AND CXH3<=-150 AND CXH3>-200,10,0);
天線:IF(BARSCOUNT(CLOSE)<70,120,IF(CXH3>=200 AND CXH2>=150,-15,CXH4)+120),Linethick2,colorccff66;
地線:IF(BARSCOUNT(CLOSE)<70,-120,IF(CXH3<=-200 AND CXH2<=-150,15,CXH5)-120),Linethick2,colorff99cc;
CXH6:=SMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100,4,1);
CXH60:SMA((CXH6-50)*2,3,1),Linethick2,colorff0033;
CXH7:=SMA((CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*100,4,1);
CXH70:SMA((CXH7-50)*2,3,1),Linethick2,colorff2233;
CXH71:(SMA((CXH7-50)*2,3,1)+SMA((CXH6-50)*2,3,1))/2,Linethick2,colorff4433;
CXH8:=SMA((CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100,4,1);
CXH80:SMA((CXH8-50)*2,3,1),Linethick2,colorff6633;
CXH81:(SMA((CXH8-50)*2,3,1)+SMA((CXH7-50)*2,3,1))/2,Linethick2,colorff8833;
CXH9:=SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100,4,1);
CXHa:SMA((CXH9-50)*2,3,1),Linethick2,colorff9933;
CXHb:(SMA((CXH9-50)*2,3,1)+SMA((CXH8-50)*2,3,1))/2,Linethick2,colorffaa33;
CXH10:=SMA((CLOSE-LLV(LOW,14))/(HHV(HIGH,14)-LLV(LOW,14))*100,4,1);
CXH100:SMA((CXH10-50)*2,3,1),Linethick2,colorffbb33;
CXH11:=SMA((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100,4,1);
波浪線:SMA((CXH11-50)*2,3,1)+SMA((CXH10-50)*2,3,1)/2,COLORSTICK,color888888;CXH12:=(CXH11-50)*6-2*SMA((CXH11-50)*2,3,1);
CXH13:=FILTER(波浪線>REF(波浪線,1)AND 波浪線<-20,10);
CXH14:=FILTER(波浪線<REF(波浪線,3)AND 波浪線>REF(波浪線,1)AND 波浪線<-10,7);
CXH15:=FILTER(波浪線<REF(波浪線,1),10);
CXH16:=FILTER(波浪線<REF(波浪線,1)AND 波浪線>110,10);
CXH17:=CXH11<REF(CXH11,3)AND CXH11>REF(CXH11,2)AND CXH11<30;
DRAWICON(FILTER(CXH13 OR CXH14 OR CXH17,5)AND CXHa>REF(CXHa,1),波浪線,1);
DRAWICON(FILTER(CROSS(波浪線,CXH12)OR CXH15,5)AND CXH12>60,波浪線*1.05,2);
DRAWTEXT(FILTER(CROSS(100,波浪線)OR CXH16,3),110,'頂部'),COLOR00FF00;
DRAWTEXT(CROSS(波浪線,地線),地線*0.6,'抄底'),colorred;

?

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

?