N:=80;M:=3;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
買賣決策①:EXPMA(CLOSE,60),CIRCLEDOT,COLORBLUE;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
VAR11:=MA(C,9),COLORRED;
上升通道:IF(VAR11>REF(VAR11,1),VAR11,DRAWNULL),LINETHICK5,COLORRED;
下降通道:IF(VAR11 A0:=(L+H+C*2)/4;
AA:=EMA(A0,14)COLORYELLOW,LINETHICK1;
BB:=EMA(A0,25)COLORYELLOW,LINETHICK2;
A1X:=(AA-REF(AA,1))/REF(AA,1)*100;
A2X:=(BB-REF(BB,1))/REF(BB,1)*100;
G:=BARSLAST(CROSS(A1X,0));
必賣止損價位:REF(A0,G),COLORFFFFFF,LINETHICK3;
CC:IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORBLUE;
止損價位:1.05*CC,COLORYELLOW;
DRAWTEXT(ISLASTBAR,HHV(C,5)*1.05,’止損價位’),COLORRED;
STICKLINE(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95,50,0),COLORWHITE,LINETHICK4;
DRAWTEXT(ISLASTBAR,HHV(C,5)*0.95,’止損價位’),COLORRED,LINETHICK4;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
見底:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;
見頂:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.3,REF(A0,BARSLAST(CROSS(A1X,0)))*1.3,DRAWNULL),COLORGREEN,CIRCLEDOT;
MA5:=MA(C,5);
MA13:=MA(C,13);
高:=REF(HHV(H,N),M);
低:=REF(LLV(L,N),M);
H19:=高-(高-低)*0.191;
H38:=高-(高-低)*0.382,LINETHICK2;
H中:=高-(高-低)*0.5;
H61:=高-(高-低)*0.618;
H80:=高-(高-低)*0.809;
頂點(diǎn):REFDATE(高,DATE),POINTDOT,COLORRED,LINETHICK4;
瘋牛%19.8:REFDATE(H19,DATE),POINTDOT,COLORFF00FF,LINETHICK4;
突破%50:REFDATE(H38,DATE),POINTDOT,COLORCC9900,LINETHICK4;
平衡%38.2:REFDATE(H中,DATE),POINTDOT,COLORRED,LINETHICK5;
回落%61.8:REFDATE(H61,DATE),POINTDOT,COLORFF3798,LINETHICK4;
次低%80.9:REFDATE(H80,DATE),POINTDOT,COLOR00FFFF,LINETHICK4;
低點(diǎn):REFDATE(低,DATE),POINTDOT,COLORWHITE,LINETHICK4;
DRAWTEXT(ISLASTBAR,頂點(diǎn),’頂點(diǎn)’),COLOR00FFFF,LINETHICK4;
DRAWTEXT(ISLASTBAR,瘋牛%19.8,’瘋牛％19.8′),COLOR00FFFF,LINETHICK4;
DRAWTEXT(ISLASTBAR,突破%50,’突破％50′),COLOR00FFFF,LINETHICK2;
DRAWTEXT(ISLASTBAR,平衡%38.2,’平衡％38.2′),COLOR00FFFF;
DRAWTEXT(ISLASTBAR,回落%61.8,’回落％61.8′),COLOR00FFFF;
DRAWTEXT(ISLASTBAR,次低%80.9,’次低％80.9′),COLOR00FFFF;
DRAWTEXT(ISLASTBAR,低點(diǎn),’低點(diǎn)’),COLOR00FFFF;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4);
散戶:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
莊家:=EMA(0.667*REF(散戶,1)+0.333*散戶,2)*VAR3;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,L-0.05,'←低吸'),COLORLIRED;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,H+0.05,’←高拋’),COLORGREEN;
DRAWICON(CROSS(散戶,莊家) AND 散戶<30,L-0.05,1);
DRAWICON(CROSS(莊家,散戶) AND 散戶>70,H+0.05,2);
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(ABS(VAR9),5),5);
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20);
賣出:=IF(VARA>0 AND CROSS(VARC,VARA),90,100);
DRAWICON(賣出<0,H+0.05,2);
S1:IF(CROSS(80,RSI)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3;
S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORGREEN;
看多:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL),COLORMAGENTA{,LINETHICK2};
逃頂:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL),COLORCYAN,{LINETHICK2};
STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR9933FF;
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC;
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF;
STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33;
MACS:=”MACD.MACD#WEEK”;
起點(diǎn)0:=BARSLAST(MACS<0);
DRAWTEXT_FIX(1,0.00,0,0,’所屬地區(qū)：’)COLOR00FFFF;
DRAWTEXT_FIX(1,0.07,0,0,DYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.00,0.06,0,’所屬行業(yè)：’)COLORFF00FF;
DRAWTEXT_FIX(1,0.07,0.06,0,HYBLOCK)COLORFF00FF;
DRAWTEXT_FIX(1,0.18,0.06,0,’主題投資：’)COLOR0000FF;
DRAWTEXT_FIX(1,0.25,0.06,0,EXTERNSTR(0,1))COLOR0000FF;