|
{好成交量} DRAWGBK(C>0,RGB(48,48,8),RGB(48,48,8),0,'8',0); 倍量:=V/REF(V,1)>2; DRAWTEXT(倍量,V,'倍量'),COLORLIGRAY; {引用} HSL:IF((SETCODE==0||SETCODE==1),100*VOL,VOL)/(FINANCE(7)/100); VOLUME:VOL,NODRAW; VA8:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); OBV18:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA8),0); OBV28:=EMA(OBV18,3)-MA(OBV18,9); OBV38:=EMA(IF(OBV28>0,OBV28,0),3); MAC38:=MA(C,3); QS:=OBV38>REF(OBV38,1) AND MAC38>REF(MAC38,1); STICKLINE(QS,0,V,3.5,0),COLORYELLOW; 吸:=XLPL.NOTEXT吸,COLORLIRED,CIRCLEDOT,LINETHICK3,NODRAW; 拉:=XLPL.NOTEXT拉,COLORRED,CIRCLEDOT,LINETHICK3,NODRAW; 派:=XLPL.NOTEXT派,COLORGREEN,CIRCLEDOT,LINETHICK3,NODRAW; 落:=XLPL.NOTEXT落,COLORWHITE,CIRCLEDOT,LINETHICK3,NODRAW; {吸:=MACD<0 AND MACD>REF(MACD,1); 拉:=MACD>0 AND MACD>REF(MACD,1); 派:=MACD>0 AND MACD<REF(MACD,1); 落:=MACD<0 AND MACD<REF(MACD,1);} STICKLINE(吸,0,V,2,0),COLORMAGENTA; STICKLINE(拉,0,V,2,0),COLORRED; STICKLINE(派,0,V,2,0),COLORGREEN; STICKLINE(落,0,V,2,0),COLORGRAY; QSLS:=QS AND 拉 AND 拉!=派; STICKLINE(QSLS,0,V,2,0),COLORRED; {量能潮} VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0); OBV2:=EMA(OBV1,3)-MA(OBV1,9); OBV3:=EMA(IF(OBV2>0,OBV2,0),3); MAC3:=MA(C,3); 量能潮:OBV3,NODRAW,COLORBROWN; STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,OBV3,0.1,0),COLORBROWN; {135均線} V5:MA(VOL,5),COLORWHITE; V35:MA(VOL,35); V135:MA(VOL,135); FL4:=V=HHV(V,250); FL3:=V=HHV(V,120) AND V!=HHV(V,250); FL2:=V=HHV(V,60) AND V!=HHV(V,120) AND V!=HHV(V,250); FL1:=V=HHV(V,30) AND V!=HHV(V,60) AND V!=HHV(V,120) AND V!=HHV(V,250); DRAWTEXT(FL4,V*1.18,'④'),COLORLIGRAY; DRAWTEXT(FL3,V*1.18,'③'),COLORLIGRAY; DRAWTEXT(FL2,V*1.18,'②'),COLORLIGRAY; DRAWTEXT(FL1,V*1.18,'①'),COLORLIGRAY; 多方籌碼:(EMA(WINNER(C)*10,1))*10,NODRAW; 籌碼增加:多方籌碼-REF(多方籌碼,1),NODRAW; 地線:HHV(V,60)/6,COLOR00FF00,LINETHICK2; STICKLINE(V>V5,V5,V,2,0),COLORYELLOW; N1:=9;N2:=5; MTM:=C-REF(C,1); 主力軌跡:=200*EMA(EMA(MTM,N1),N1)/EMA(EMA(ABS(MTM),N1),N1); 主力增加:=2*(主力軌跡-REF(主力軌跡,1)); DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.9,0,0,主力增加),COLOR007DFB; DRAWTEXT_FIX (1,0.8,0,0,' 主力增加:'),COLOR00FFFF; DRAWICON(CROSS(REF(ZIG(3,6),1),ZIG(3,6)),HIGH*0.2,9); VARQ1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1); VARQ2:=SMA(ABS(LOW-VARQ1),13,1)/SMA(MAX(LOW-VARQ1,0),10,1); VARQ3:=EMA(VARQ2,10); VARQ4:=LLV(LOW,33); VARQ5:=EMA(IF(LOW<=VARQ4,VARQ3,0),3)*100; VAR3:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4; VAR4:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),44)/4; VAR5:=EMA(CLOSE,1)-EMA(CLOSE,1297); VAR6:=EMA(VAR5,715); VAR7:=2*(VAR5-VAR6); VAR8:=POW(VAR7,3)*0.1+POW(VAR7,2); VARA:=EMA(CLOSE,2)-EMA(CLOSE,34); VARB:=EMA(VARA,33); VARC:=2*(VARA-VARB); VARD:=POW(VARC,3)*0.1+POW(VARC,3); VARF:=EMA(CLOSE,2)-EMA(CLOSE,89); VAR10:=EMA(VARF,30); VAR11:=2*(VARF-VAR10)*10; VAR12:=POW(VAR11,3)*0.1+POW(VAR11,2); VAR13:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)); VAR14:=EMA(VAR13*0.97,3); VAR15:=(HIGH+LOW+CLOSE)/3; VAR16:=(VAR15-MA(VAR15,14))/(0.015*AVEDEV(VAR15,14)); VAR17:=IF(VAR11>0.015,VAR12,0)*100; VAR18:=(CLOSE-LLV(CLOSE,95))/(HHV(CLOSE,95)-LLV(CLOSE,95))*100; VAR19:=VOL/240>MA(VOL,6)/240 AND CLOSE>OPEN*1.003; VAR1A:=VAR19 AND CLOSE<MA(CLOSE,10)*1.05 AND CLOSE<MA(CLOSE,10)*1.3; VAR1B:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),0-VOL,0)),0)/1000; VAR1C:=MA(VAR1B,13); VAR1D:=VAR1B-VAR1C; VAR1E:=EMA(VAR1D,3); VAR1F:=CROSS(VAR1D,VAR1E); VAR01:=EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5); VAR02:=(HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5); VAR03:=CROSS(VAR02,VAR01); VAR04:=REF(VAR02,2)<REF(VAR02,1) AND VAR02<REF(VAR02,1); VAR05:=COUNT(VAR03,7)>0 AND VAR04; {神秘買點(diǎn)} B1:=(EMA(CLOSE,4)+MA(CLOSE,4*2)+MA(CLOSE,4*4))/3; B2:=(EMA(CLOSE,6)+MA(CLOSE,6*2)+MA(CLOSE,6*4))/3; B3:=(EMA(CLOSE,9)+MA(CLOSE,9*2)+MA(CLOSE,9*4))/3; B4:=(EMA(CLOSE,13)+MA(CLOSE,13*2)+MA(CLOSE,13*4))/3; B5:=(EMA(CLOSE,18)+MA(CLOSE,18*2)+MA(CLOSE,18*4))/3; B6:=(EMA(CLOSE,24)+MA(CLOSE,24*2)+MA(CLOSE,24*4))/3; B7:=B6>B5 AND B5>B4 AND B4>B3 AND B3>B2 AND B2>B1; A1:=(((2 * CLOSE) + HIGH) + LOW) / 4;A2:=LLV(LOW,34);A3:=HHV(HIGH,34); A4:=EMA((((A1 - A2) / (A3 - A2)) * 100),13);A5:=EMA(((0.667 * (REF(A4,1))) + (0.333 * A4)),2); A6:=(HHV(HIGH,9)) - (LLV(LOW,9));A7:=(HHV(HIGH,9)) - CLOSE;A8:=CLOSE - (LLV(LOW,9)); A9:=((A7 / A6) * 100) - 70;A10:=((CLOSE - (LLV(LOW,60))) / ((HHV(HIGH,60)) - (LLV(LOW,60)))) * 100; AA11:=SMA(((A8 / A6) * 100),3,1);A12:=(SMA(AA11,3,1)) - (SMA(A9,9,1)); ZZ2:=REF(C>O OR O>C,2) AND REF(C>O OR O>C,1) AND REF(C>O OR O>C,6); A13:=IF((A12 > 100),(A12 - 100),0);GG:=EMA((((A1 - A2) / (A3 - A2)) * 100),5); HH:=EMA(GG,13);AS:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70; AD:=SMA(AS,9,1)+100;AF:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; AG:=SMA(AF,3,1);AH:=SMA(AG,3,1)+100;AJ:=AH-AD;KK:=IF(AJ>45,AJ-45,0); RSVL:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100; KL:=SMA(RSVL,15,1); DL:=SMA(KL,15,1); JL:=3*KL-2*DL; FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); TTJ:=CROSS(FF,MA15); 上:=EMA(C,3),COLORBLUE,LINETHICK1; MML:=上>REF(上,1) AND REF(上,1)<REF(上,2); VVAR02:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4); VVAR04:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1); 金叉L:=CROSS(JL,DL); 買1:=(VAR14 OR VAR15) AND VAR11; 買2:=(VAR14 OR VAR15) AND VVAR04; 買3:=(VAR14 OR VAR15) AND VVAR02; 買4:=(VVAR02 AND VAR11) OR (VVAR04 AND VAR11); 買5:=(金叉L AND VVAR04) OR (金叉L AND VVAR02) OR (金叉L AND VAR11); TTJ0:=VAR16; TTJ1:=買1 OR 買2 OR 買3 OR 買4 OR 買5 AND MML; XG0:=TTJ AND TTJ0; XG1L:=TTJ AND TTJ1; XG11:=XG0 OR XG1L; EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3); PL10:=ZIG(3,10); EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3); PL20:=ZIG(3,20); EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3); 走強(qiáng)2:=BARSLAST(PL10<REF(PL10,1)); 走強(qiáng)3:=BARSLAST(PL20<REF(PL20,1)); 走弱3:=BARSLAST(PL20>REF(PL20,1)); ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強(qiáng)2),0); ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強(qiáng)3),0); DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0); TJ11:=EN2 AND ZTJZ5=1; TJ22:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2; TJ33:=EN2 AND DTJZ10=1; TJ44:=EN3 AND ZTJZ10=1; TJ55:=EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2; XG22:=TJ11 OR TJ22 OR TJ33 OR TJ44 OR TJ55; 放心買:=XG11 OR XG22 COLORCYAN; DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26); DEA1:=EMA(DIF1,9); 黑馬線1:=16; DDL:=CROSS(DIF1,DEA1); 陶金上:=DDL AND 黑馬線1; 陶金1:=(DIF1-DEA1)*2*60; 主力L:=陶金1-REF(陶金1,1); 主力信號:=主力L>5 AND 主力L>REF(主力L,1); VAR20:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3); VAR21L:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3); VAR22L:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3); VAR23L:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3); VAR24L:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3); VAR25L:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3); VAR26L:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3); VAR27:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3); 買點(diǎn)二:=(VAR20+VAR22L+VAR24L+VAR26L); 賣點(diǎn)一:=(VAR21L+VAR23L+VAR25L+VAR27); 買待漲:=(VAR20+VAR22L+VAR24L+VAR26L)COLOR00FFFF; 快賣欲跌:=(VAR21L+VAR23L+VAR25L+VAR27) COLOR00FF00; ZDZ:=買待漲 AND 放心買 AND 陶金上 AND 主力信號 COLOR00FFFF; 真漲:ZDZ,STICK,COLORCYAN; DRAWTEXT(真漲>0,V5,'真漲'),COLORCYAN; {DRAWICON(真漲>0,真漲,24);} {操盤線:MA(CLOSE,9),COLORGREEN,LINETHICK2;} F:=100*(C-REF(C,1))/REF(C,1); 今小昨:=IF(C<REF(O,1) AND F<0,1,0); S1:=今小昨; 今小前:=IF(C<REF(O,2) AND F<0,1,0),LINETHICK0; S2:=今小前; A111:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,3) ,REF(ZIG(3 ,3),1)); A112:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,5) ,REF(ZIG(3 ,5),1)); A113:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)); STICKLINE(A111 AND A112 ,0,3,3,0)COLORGREEN; STICKLINE(A111 AND A112 ,0,1,3,0)COLORBLUE; STICKLINE(A111 AND A112 AND A13,0,5,3,0); STICKLINE(A111 AND A112 AND A13,0,3,3,0); STICKLINE(A111 AND A112 AND A13,0,1,3,0); DRAWTEXT(A113=1,V*1.08,'長攻!'),COLORYELLOW; 智勇出擊: ZIG(3,6)>REF(ZIG(3,6),1)AND REF(ZIG(3,6),1)<REF(ZIG (3,6),2),COLORWHITE,LINETHICK2; DRAWTEXT(智勇出擊=1,V,'出擊!'),COLORWHITE; 小獲且退: ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG (3,10),2),COLORYELLOW,LINETHICK2; DRAWTEXT(小獲且退=1,V*1.1,'逃!'),COLORYELLOW; VAR113:=PEAKBARS(2,15,1)<10; VAR115:=IF(VAR113=1,2,0); 頂:= IF(VAR115=2,2,0); 大勝且歸:IF(頂>REF(頂,1),2,0),COLORRED,LINETHICK2; DRAWTEXT(大勝且歸=2,V*1.1,'逃!'),COLORRED; {資金流向1:LLJX,COLORCYAN,LINETHICK2;}; T1:=5; T2:=4; P:=((2)*(CLOSE) + HIGH + LOW + OPEN)/(5); AA1:=HHV(P,15); AA2:=LLV(P,15); AA3:=AA1 - AA2; AA4:=(EMA((P - AA2)/(AA3),2))*(100); IF(AA4>=95,V5,DRAWNULL),COLORRED,LINETHICK4; IF(AA4<=10,V5,DRAWNULL),COLORGREEN,LINETHICK3; {量漲:V-REF(V,1);}; {資金線1} N:=55;N1:=13;M:=13; WR1:=100-100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)); WR2:=100*(HHV(HIGH,N1)-CLOSE)/(HHV(HIGH,N1)-LLV(LOW,N1)); A:=MA(WR2,M); STICKLINE(CROSS(WR1,50),50,60,3,0),COLORGRAY; DRAWBAND(WR1,255,60,0); 資金:WR1-A; STICKLINE(CROSS(資金,0),0,30,3,0),COLORLIRED; 0,COLORLIMAGENTA; 60; ZBVAR22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)); ZBVAR23:=MA(ZBVAR22,3); ZBVAR24:=EMA(AMOUNT/VOL/100,5); ZBVAR25:=EMA(AMOUNT/VOL/100,13); ZBVAR26:=ZBVAR24-ZBVAR25; 勢能: IF(1000*ZBVAR26/ZBVAR24>0,1000*ZBVAR26/ZBVAR24,0),COLORRED,LINETHICK2; 勢能倍數(shù):勢能/REF(勢能,1); {波段倒倉} N:=9;M:=14;N1:=6; TYP := (HIGH + LOW + CLOSE)/3; CC1:(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF; C1:=SMA(CC1,3,1); C2:=SMA(C1,3,1); C3:=3*C1-2*C2; CB1:=EMA(C3,5); CB2:=REF(CB1,1); DRAWBAND(CC1,RGB(0,244,244),0,RGB(255,200,90)); DRAWBAND(100,0,-100,0); 100,LINETHICK1,COLORRED; -100,LINETHICK1,COLORGREEN; LC := REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100; RSI: (RSI1-50)*5,LINETHICK2,COLORFFFFFF; {財(cái)神SB} {量能平臺} {N1:=30; T1:=CONST(HHVBARS(V,N1)); T0:=IF(CURRBARSCOUNT<=N1+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),LINETHICK3; IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT; DRAWTEXT(ISLASTBAR,T0,' 量能平臺'); STICKLINE(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95,100,0),COLORWHITE,LINETHICK3; DRAWNUMBER(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95),LINETHICK3; 止損點(diǎn):=(ISLASTBAR,HHV(C,3)*0.95,HHV(C,3)*0.95),LINETHICK3; DRAWTEXT(ISLASTBAR ,止損點(diǎn),' 止損點(diǎn)'),LINETHICK3;} {所屬板塊} Z11:=STRCAT(HYBLOCK,' '); Z2:=STRCAT(Z11,DYBLOCK); Z3:=STRCAT(Z2,' '); DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE; DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORYELLOW;{老王} DRAWTEXT_FIX(ISLASTBAR,0,0.10,0,FGBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0,0.10,0,EXTERNSTR(0,1)),COLORYELLOW;{融勝} {做多:LLV((O+H+L+2*C)/5*2-H,8),COLORLIRED,DOTLINE; 做空:HHV((O+H+L+2*C)/5*2-L,8),COLORLIRED,DOTLINE;} 利潤同比:=STRCAT(STRCAT('利潤同比：',CON2STR(FINANCE(43),2)),'%'); 收入同比:=STRCAT(STRCAT('收入同比：',CON2STR(FINANCE(44),2)),'%'); 主營利潤率:=STRCAT(STRCAT('主營利潤率：',CON2STR(FINANCE(23)/FINANCE(20)*100,2)),'%'); 毛利率:=STRCAT(STRCAT('【毛利率】',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)),'%'); {穿籌量:=(WINNER(CLOSE)-REF(WINNER(C),1))*100; DRAWTEXT_FIX(1,0.00,0.35,0,穿籌量),COLORYELLOW;} DRAWTEXT_FIX(1,0.00,0.15,0,利潤同比),COLORYELLOW; DRAWTEXT_FIX(1,0.11,0.15,0,收入同比),COLORYELLOW; DRAWTEXT_FIX(1,0.22,0.15,0,主營利潤率),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.3,0,毛利率),COLORYELLOW; DRAWTEXT_FIX(1,0.4,0.01,0,'趨勢為王 結(jié)構(gòu)修邊 做波段'),COLORRED; {DRAWTEXT_FIX(1,0.56,0.01,0,'倉位90%; 財(cái)神OR信心買=買入，財(cái)走+S（5天內(nèi)）=賣出'),COLORGREEN; DRAWTEXT_FIX(1,0.56,0.06,0,' 買入成功75%，錯(cuò)誤25%，賣出成功97%，注意修正'),COLORGREEN; DRAWTEXT_FIX(1,0.56,0.11,0,' 波長：10-50%，5-2次/年，目標(biāo):25次/5年'),COLORGREEN; DRAWTEXT_FIX(1,0.56,0.16,0,' 復(fù)利增長。5日線向上，反包，做短線。'),COLORGREEN;} 做多68:= LLV((HIGH+LOW+OPEN+2*CLOSE)/5*2-H,8),COLORGREEN; MA5:MA(CLOSE,5),COLORWHITE,LINETHICK1; IF(MA5>=REF(MA5,1),MA5,DRAWNULL),COLORRED,LINETHICK3; IF(MA5<=REF(MA5,1),MA5,DRAWNULL),COLORGREEN,LINETHICK2; M10:=MA(CLOSE,10); M30:=MA(CLOSE,30); M60:MA(CLOSE,60); VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25); VAR2:=HIGH-REF(HIGH,1); VAR3:=REF(LOW,1)-LOW; VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25); VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25); VAR6:=VAR4*100/VAR1; VAR7:=VAR5*100/VAR1; VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15); VAR9:=(VAR8+REF(VAR8,15))/2; BUY1:=ZIG(3,10); SELL1:=MA(BUY1,2); DRAWICON(CROSS(BUY1,SELL1),L-0.1,7); DRAWICON(CROSS(SELL1,BUY1),H+0.1,8); STICKLINE(BUY1>SELL1 AND O>=C,C,O,-1,0),COLORRED; STICKLINE(BUY1>SELL1 AND O>=C,L,H,0,0),COLORRED; STICKLINE(BUY1<SELL1 AND O<=C,O,C,-1,1),COLORCYAN; STICKLINE(BUY1<SELL1 AND O<=C,O,L,0,1),COLORCYAN; STICKLINE(BUY1<SELL1 AND O<=C,C,H,0,1),COLORCYAN; VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; VAR12:=SMA(VAR11,3,1); VAR13:=SMA(VAR12,3,1); VAR14:=VAR13 AND VAR13<20; LJB:=1/WINNER(CLOSE); AAAA:=AMOUNT/100000000; 金額億:AAAA,NODRAW; {波段高低} 波段高:(XMA(XMA(HIGH,60),60)-XMA(XMA(LOW,60),60))*2.5+XMA(XMA(HIGH,60),60),COLORWHITE,LINETHICK2; 波段低:XMA(XMA(LOW,60),60)-(XMA(XMA(HIGH,60),60)-XMA(XMA(LOW,60),60))*2.5,COLORWHITE,LINETHICK2; 俞言友情:(波段高+波段低)/2,DOTLINE,COLOR909090; IF(波段高>=REF(波段高,1),波段高,DRAWNULL),COLOR000088,LINETHICK2; IF(波段低>=REF(波段低,1),波段低,DRAWNULL),COLOR000088,LINETHICK2; IF(波段高<=REF(波段高,1),波段高,DRAWNULL),COLOR008800,LINETHICK2; IF(波段低<=REF(波段低,1),波段低,DRAWNULL),COLOR008800,LINETHICK2; {機(jī)構(gòu)進(jìn)場} {KAR5:=LLV(LOW,26); KAR6:=HHV(HIGH,34); KAR7:=EMA((CLOSE-KAR5)/(KAR6-KAR5)*4,4)*25;} {DRAWTEXT(KAR7<10,L-L*0.02,'建倉'),COLORGREEN;} {VAR111:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3); DRAWTEXT(VAR111 AND COUNT(VAR111,30)=1,LOW*0.96,'機(jī)構(gòu)進(jìn)場'),LINETHICK1,COLORFF00FF;} {進(jìn)出} 高:=REF(HHV(H,150),3); 近期頂:=REFDATE(高,DATE); 最頂:=REFDATE(近期頂,DATE); 出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)); 低:=REF(LLV(L,150),3); 近期底:=REFDATE(低,DATE); 最底:=REFDATE(近期底,DATE); 進(jìn):=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)); DRAWTEXT(出=1,L*0.97,'波段頂'),LINETHICK1,COLORFF00FF; DRAWTEXT(進(jìn)=1,L*0.98,'波段底'),LINETHICK1,COLORFF00FF; {低位跟進(jìn)} {跟A7:=C-REF(C,1); 跟A8:=100*EMA(EMA(跟A7,6),6)/EMA(EMA(ABS(跟A7),6),6); 買A:=LLV(跟A8,2)=LLV(跟A8,7) AND COUNT(跟A8<0,2) AND CROSS(跟A8,MA(跟A8,2)); 跟進(jìn):=FILTER(買A=1,5); BB1:=EMA(C,3); BB2:=EMA(C,26); BB3:=BB1-BB2; WDIF:=EMA(EMA(EMA(C,3),3),3)+BB3; 高1:=REF(HHV(H,150),3); 低1:=REF(LLV(L,150),3); H7:=高1-(高1-低1)*0.946; TT:=REFDATE(H7,DATE); 低位:=TT>WDIF; 低位跟進(jìn):=跟進(jìn) AND 低位; DRAWTEXT(低位跟進(jìn)=1,H*1.02,'跟進(jìn)'),LINETHICK1,COLORFF00FF;} {漲勢確立} {B:=ZIG(3,50/5)*1; G:=MA(B,2); D:=CROSS(B,G)*10; W:=CROSS(G,B)*10; DRAWTEXT(W=10,L*0.98,'↓跌勢確立' ),COLORGREEN,; DRAWTEXT(D=10,H*1.02,'▲漲勢確立'),COLORYELLOW;} {轉(zhuǎn)向} {ZL:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3); F11:=ZIG(3,15); FXX:=IF((F11> REF(F11,1)),5,105); 轉(zhuǎn)向:=CROSS(ZL,FXX); 高點(diǎn):=CROSS(FXX,ZL); DRAWTEXT(轉(zhuǎn)向=1,L*0.976,'轉(zhuǎn)向上' ),COLORGREEN; DRAWTEXT(高點(diǎn)=1,H*1.02,'轉(zhuǎn)向下'),COLORYELLOW;} {起爆} {DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26); DEA:=EMA(DIF,9); AAA:=(DIF-DEA)*2*60; 起爆:=CROSS(AAA-REF(AAA,1),15); DRAWTEXT(起爆=1,H*1.02,'起爆' ),COLORYELLOW;} {九轉(zhuǎn)} A11:=C>REF(C,4); A22:=BARSLASTCOUNT(A11); A33:=REF(A22,1)=8 AND A22>REF(A22,1); A44:=REF(BETWEEN(A22,5,8),1) AND A22<REF(A22,1); A55:=ISLASTBAR AND BETWEEN(A22,6,8); A66:=(BACKSET(A33>0,9) OR BACKSET(A44>0,A22+1)*0 OR BACKSET(A55>0,A22))*A22; DRAWTEXT(A66>0,H+H*0.02,VAR2STR(A66,0)),COLORFF00FF; DRAWTEXT(A22=9,H+H*0.02,'9'),COLOR00FF00; B11:=C<REF(C,4); B22:=BARSLASTCOUNT(B11); B33:=REF(B22,1)=8 AND B22>REF(B22,1); B44:=REF(BETWEEN(B22,5,8),1) AND B22<REF(B22,1); B55:=ISLASTBAR AND BETWEEN(B22,6,8); B66:=(BACKSET(B33>0,9) OR BACKSET(B44>0,B22+1)*0 OR BACKSET(B55>0,B22))*B22; DRAWTEXT(B66>0,L-L*0.02,VAR2STR(B66,0)),COLOR00FF00; DRAWTEXT(B22=9,L-L*0.02,'9'),COLORFF00FF; {小虛線} {NS:=5; AA:=REF(H,NS)=HHV(H,2*NS+1); AA1:=REF(L,NS)=LLV(L,2*NS+1); QY:=BACKSET(AA,NS+1); QY1:=BACKSET(AA1,NS+1); CC:=FILTER(QY,NS) AND H=HHV(H,NS+1); CC1:=FILTER(QY1,NS) AND L=LLV(L,NS+1); DDD:=BARSLAST(CC); DD2:=BARSLAST(CC1); GDTS:=IF(CC,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0); DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD2,REF(DDTS,DD2),DDTS); GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1); GDCS13:=CONST(REF(HIGH,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1)); DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD2+1); GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);GDCS23:=CONST(REF(HIGH,DINGBUTS1-1)); DDCS23:=CONST(REF(L,DDTS2-1)); XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1); XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2); STICKLINE(XG2,GDCS23,GDCS23,2,0),COLORWHITE; STICKLINE(XG1,GDCS13,GDCS13,2,0),COLORYELLOW; STICKLINE(XD2,DDCS23,DDCS23,2,0),COLORGRAY; STICKLINE(XD1,DDCS13,DDCS13,2,0),COLORCYAN;} {財(cái)神買入} 短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6) +13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12) +7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+ REF(H,20))/210,COLORBLUE,LINETHICK1; 短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6) +13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12) +7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+ REF(L,20))/210,COLORBLUE,LINETHICK1; D90H:=EMA(短高H,90),COLORRED,LINETHICK1; D90L:=EMA(短低L,90),COLORRED,LINETHICK1; D90差:=D90H-D90L; D90頂:=D90H+D90差*2,COLORRED,LINETHICK1; D90底:=D90L-D90差*2,COLORRED,LINETHICK1; 高0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,COLORWHITE; 低0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORWHITE; 多頭定位:=低0>=D90底 AND 高0>=D90頂; 空頭定位:=高0<=D90頂 AND 低0<=D90底; 震蕩定位:=低0>=D90底 AND 高0<=D90頂; 短頂:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*2+XMA(XMA(H,25),25),LINETHICK2,COLORGREEN; 短底:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*2,LINETHICK2,COLORGREEN; 短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED; 短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED; 短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED; 短線低盤:=(L-短底)/(短頂-短底)*100000,LINETHICK0,COLORRED; 震蕩頂:=(XMA(XMA(短線高盤,25),25)-XMA(XMA(短線低盤,25),25))*1+XMA(XMA(短線高盤,25),25); 震蕩底:=XMA(XMA(短線低盤,25),25)-(XMA(XMA(短線高盤,25),25)-XMA(XMA(短線低盤,25),25))*1; 做空:=80000,COLORWHITE,LINETHICK1; 做多:=20000,COLORWHITE,LINETHICK1; 多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1; 多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0; 空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1; 空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0; 震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1; 震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1; 買入:=多頭多定位=1 OR 震蕩多定位=1; {賣出:空頭空定位=1 OR 震蕩空定位=1;}; N日內(nèi)搶反彈:=COUNT(買入,1)>0 ;{這里N取30，可以自己修改}; DRAWTEXT(N日內(nèi)搶反彈=1,L*0.976,'財(cái)神' ),COLORGREEN; 賣出:=多頭平定位=1 OR 空頭空定位=1 OR 震蕩空定位=1; DRAWTEXT(賣出=1,H*1.02,'財(cái)走' ),COLORYELLOW; {信心買入} Q_1:=C-REF(C,1); Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6); Q_3:=CROSS(EMA(C,19),EMA(C,7)); Q_4:=CROSS(EMA(C,7),EMA(C,19)); Z1:=L=LLV(L,BARSLAST(Q_3)+1); ZZ2:=LLV(L,BARSLAST(Q_3)+1); ZZ3:=H=HHV(H,BARSLAST(Q_4)+1); ZZ4:=HHV(H,BARSLAST(Q_4)+1); Q_A:=DRAWLINE(Z1,ZZ2,Z1,ZZ2,0); Y1:=H=HHV(H,BARSLAST(Q_4)+1); Y2:=HHV(H,BARSLAST(Q_4)+1); Y3:=L=LLV(L,BARSLAST(Q_3)+1); Y4:=LLV(L,BARSLAST(Q_3)+1); Q_B:=DRAWLINE(Y1,Y2,Y3,Y4,0); TJ:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0); 信心買:=REF(TJ,1)=0 AND TJ>=1; DRAWTEXT(信心買=1,L*0.972,'信心買' ),COLORGREEN; {波段買入} VAAR1:=(CLOSE+HIGH+LOW+OPEN)/4; VAAR2:=SUMBARS(VOL,CAPITAL); VAAR3:=HHV(VAAR1,VAAR2); VAAR4:=LLV(VAAR1,VAAR2); VAAR5:=(2*VAAR1-VAAR4-REF(VAAR4,1))/(VAAR3-VAAR4); VAAR6:=(VAAR1-VAAR4)/(VAAR3-VAAR4); VAAR7:=IF(VAAR1<=VAAR4,VAAR5*60,VAAR6*60); VAAR8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30); VAAR9:=EMA(VAAR8,7); VAARA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100; VAARB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5; 波段買入:=VAARA+VAARB<7 AND CROSS(VAAR8,VAAR9) AND VAAR9<-18 AND VAAR9<VAARB; DRAWTEXT(波段買入=1,H*1.02,'波段買入' ),COLORCYAN; {1.機(jī)構(gòu)部分} {買線:=ZIG(3,10); 賣線:=MA(買線,2); BU:=CROSS(買線,賣線); SEL:=CROSS(賣線,買線); DRAWTEXT(BU,L*0.95,'機(jī)構(gòu)進(jìn)場'),COLORYELLOW; DRAWTEXT(SEL,H*1.05,'機(jī)構(gòu)清倉'),COLORGREEN;} {滿血復(fù)活} {B3:DRAWTEXT(CROSS(ZIG(3,4),REF(ZIG(3,4),1)),H*1.02,'+20'),COLORRED; B6:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),H*1.03,'+40'),COLORRED;} B9:DRAWTEXT(CROSS(ZIG(3,12),REF(ZIG(3,12),1)),H*1.04,'+60'),COLORRED; B12:DRAWTEXT(CROSS(ZIG(3,16),REF(ZIG(3,16),1)),H*1.06,'+80'),COLORRED; B15:DRAWTEXT(CROSS(ZIG(3,20),REF(ZIG(3,20),1)),H*1.08,'+100必買'),COLORRED; S15:DRAWTEXT(CROSS(REF(ZIG(3,20),1),ZIG(3,20)),L*1.08,'-100必賣'),COLORGREEN; S12:DRAWTEXT(CROSS(REF(ZIG(3,16),1),ZIG(3,16)),L*1.06,'-80'),COLORGREEN; S9:DRAWTEXT(CROSS(REF(ZIG(3,12),1),ZIG(3,12)),L*1.04,'-60'),COLORGREEN; {S6:DRAWTEXT(CROSS(REF(ZIG(3,8),1),ZIG(3,8)),L*1.04,'-40'),COLORGREEN; S3:DRAWTEXT(CROSS(REF(ZIG(3,4),1),ZIG(3,4)),L*1.02,'-20'),COLORGREEN;} {MTM:=C-REF(C,1); DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6); 買:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)); DRAWTEXT(FILTER(買=1,5),LOW*0.97,'★大機(jī)構(gòu)進(jìn)場'),COLORRED;}; {底部} D:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4),LINETHICK2; 中期線:=D+100,COLORYELLOW,LINETHICK2;{中期線是生命指數(shù)}; STICKLINE(中期線<20,OPEN,0.5*(C-O)+O,2,0),COLORYELLOW; {STICKLINE(中期線>80,OPEN,0.5*(C-O)+O,2,0),COLORYELLOW;} A:=MA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),19),COLORRED; 長期線:=A+100,COLORRED; STICKLINE(長期線<20 AND 中期線<20,OPEN,0.25*(C-O)+O,2,0),COLOR0000FF; {STICKLINE(長期線>85,OPEN,0.25*(C-O)+O,2,0),COLORYELLOW;}; {撿錢} {SHORT:=7; LONG:=19; RMA:=EMA(CLOSE,SHORT); NMA:=EMA(CLOSE,LONG); UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),0); DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),0); A8:=(HHV(HIGH,9)) - (LLV(LOW,9)); 買進(jìn):=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1); 撿錢了未來:=IF(買進(jìn),0,1); DRAWTEXT(撿錢了未來=1,LOW*0.97,'★買進(jìn)'),COLORRED;}; {基底建倉} OSC:=100*(CLOSE-MA(CLOSE,20)); MAOSC:=EXPMEMA(OSC,6); BIAS:=(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100; BIASMA:=MA(BIAS,6); F:=100*(C-REF(C,1))/REF(C,1); P1:=IF(C<REF(O,1) AND F<0,1,0); P2:=IF(C<REF(O,2) AND F<0,1,0); LIN:=IF(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,1,0); E:=-100*(HHV(HIGH,84)-CLOSE)/(HHV(HIGH,84)-LLV(LOW,84)); DJ1:=CROSS(OSC,MAOSC) AND LIN AND REF(EVERY(C<O,3),1) AND REF((E<-98)*50,1); RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1); DD:=SMA(K,3,1); JJ:=3*K-2*DD; X:=LLV(JJ,2)=LLV(JJ,8); DJ2:=CROSS(JJ,REF(JJ+0.01,1)) AND X AND JJ<20 AND REF((E<-98)*50,1) AND REF(EVERY(C<O,3),1); F1:=100*(C-REF(C,1))/REF(C,1); KX:=IF(C<REF(O,1) AND F1<0,1,0); LH:=IF(C<REF(O,2) AND F1<0,1,0); BE:=KX=0 AND REF(KX,1)=1 AND LH=0 AND REF(LH,1)=1; VVAR1:=REF(CLOSE,1); VVAR2:=SMA(MAX(CLOSE-VVAR1,0),7,1)/SMA(ABS(CLOSE-VVAR1),7,1)*100; SS1:=FILTER(REF(VVAR2,1)<20 AND VVAR2>REF(VVAR2,1),5); SM01:=MA((2*C+H+L)/4,5); SM02:=SM01*(200-102)/100; SM03:=(1-7/100)*DMA(C,ABS((2*C+H+L)/4-MA(C,20))/MA(C,20)); SM04:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; SM05:=3*SMA(SM04,3,1)-2*SMA(SMA(SM04,3,1),3,1); SM06:=((H+L+C)/3-MA((H+L+C)/3,14))/(0.015*AVEDEV((H+L+C)/3,14)); SM07:=SM02<SM03 AND SM05>REF(SM05,1) AND REF(SM05,1)<REF(SM05,2) AND SM06<-100 AND SM06>REF(SM06,1); BZ:=SS1 AND SM07; CC1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); DD1:=DMA(CLOSE,CC1); EE:=(1-14/100)*DD1; DI:=BETWEEN(C,EE*0.98,EE*1.01); WZ:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100; WZBP:=CROSS(-27,WZ) AND COUNT(H=L,5)<1; QSX:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100; KJ:=CROSS(-20,QSX); XG:=(BE AND BZ AND DI) OR WZBP OR KJ OR DJ1 OR DJ2; DRAWTEXT(XG=1,LOW*0.97,'★建倉'),COLORRED; {絕底} X_1:=EMA(CLOSE,4)<EMA(CLOSE,10) AND MA(CLOSE,11)<MA(CLOSE,19); X_2:=HIGH<EMA(HIGH,9); X_3:=COUNT(X_2,6)>=2; X_4:=REF(X_3,1) AND HIGH>MA(CLOSE,6); X_5:=NOT(X_1); X_6:=BARSLAST(X_5); X_7:=EVERY(X_1,X_6); X_8:=COUNT(X_4,X_6)>=2; X_9:=X_8 AND CLOSE>MA(CLOSE,4); X_10:=EMA(CLOSE,12)-EMA(CLOSE,28); X_11:=EMA(X_10,8); X_12:=(X_10-X_11)*2; X_13:=X_12<=0; X_14:=EMA(CLOSE,9)/CLOSE>=1.029; X_15:=EMA(HIGH,60)/HIGH>=1.177; X_16:=REF(HHV(LOW,20)/LLV(LOW,20)>=1.27,1); X_17:=REF(HHV(VOL,30)/LLV(VOL,32)<11,1); X_18:=VOL<MA(VOL,65)*1.45; X_19:=VOL<REF(LLV(VOL,18),1)*4.5; X_20:=REF(VOL,1)<REF(LLV(VOL,18),2)*5; X_21:=REF(VOL,1)<=REF(MA(VOL,65),1)*1.19; X_22:=OPEN/CLOSE>=1.054; X_23:=COUNT(X_22,6)>=1; X_24:=REF(OPEN,2)<=CLOSE; X_25:=FILTER(X_9,2) AND X_13 AND X_14 AND X_15 AND X_16 AND X_17 AND X_18 AND X_19 AND X_20 AND X_21 AND X_23 AND X_24; 絕底:=X_25; DRAWTEXT(絕底=1,LOW*0.97,'★絕底'),COLORRED; {真漲} JRH:=HHV(C,2); JRL:=LLV(C,2); MA3:=MA(CLOSE,3); YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6; VVAAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2)); VVAAR2:=(REF(VVAAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR3:=(REF(VVAAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR4:=(REF(VVAAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR5:=(REF(VVAAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR6:=(REF(VVAAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR7:=(REF(VVAAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR8:=(REF(VVAAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR9:=(REF(VVAAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAARA:=(REF(VVAAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAARB:=(REF(VVAARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAARC:=(REF(VVAARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2)); VVAARE:=(REF(VVAARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAARF:=(REF(VVAARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR10:=(REF(VVAARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR11:=(REF(VVAAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR12:=(REF(VVAAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR13:=(REF(VVAAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR14:=(REF(VVAAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR15:=(REF(VVAAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR16:=(REF(VVAAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR17:=(REF(VVAAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VVAAR18:=(REF(VVAAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VVAAR19:=((REF(VVAARD OR VVAARE OR VVAARF OR VVAAR10 OR VVAAR11 OR VVAAR12 OR VVAAR13 OR VVAAR14 OR VVAAR15 OR VVAAR16 OR VVAAR17 OR VVAAR18,1)) AND VVAAR1); 曹薇短買:=VVAAR19,COLORRED; RSVL:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100; KL:=SMA(RSVL,15,1); DL:=SMA(KL,15,1); JL:=3*KL-2*DL; FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); TTJ:=CROSS(FF,MA15); 上:=EMA(C,3),COLORBLUE,LINETHICK1; MML:=上>REF(上,1) AND REF(上,1)<REF(上,2); VAR02:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4); VAR04:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1); 金叉L:=CROSS(JL,DL); 買1:=(VVAAR14 OR VVAAR15) AND VVAAR11; 買2:=(VVAAR14 OR VVAAR15) AND VAR04; 買3:=(VVAAR14 OR VVAAR15) AND VAR02; 買4:=(VAR02 AND VVAAR11) OR (VAR04 AND VVAAR11); 買5:=(金叉L AND VAR04) OR (金叉L AND VAR02) OR (金叉L AND VVAAR11); TTJ0:=VVAAR16; TTJ1:=買1 OR 買2 OR 買3 OR 買4 OR 買5 AND MML; XG0:=TTJ AND TTJ0; XG1L:=TTJ AND TTJ1; XG11:=XG0 OR XG1L; EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3); PL10:=ZIG(3,10); EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3); PL20:=ZIG(3,20); EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3); 走強(qiáng)2:=BARSLAST(PL10<REF(PL10,1)); 走強(qiáng)3:=BARSLAST(PL20<REF(PL20,1)); 走弱3:=BARSLAST(PL20>REF(PL20,1)); ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強(qiáng)2),0); ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強(qiáng)3),0); DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0); TJ11:=EN2 AND ZTJZ5=1; TJ22:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2; TJ33:=EN2 AND DTJZ10=1; TJ44:=EN3 AND ZTJZ10=1; TJ55:=EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2; XG22:=TJ11 OR TJ22 OR TJ33 OR TJ44 OR TJ55; 放心買:=XG11 OR XG22 COLORCYAN; DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26); DEA1:=EMA(DIF1,9); 黑馬線:=16; DDL:=CROSS(DIF1,DEA1); 陶金上:=DDL AND 黑馬線 COLORRED; 陶金1:=(DIF1-DEA1)*2*60; 主力L:=陶金1-REF(陶金1,1); 主力信號:=主力L>5 AND 主力L>REF(主力L,1)COLORRED; VAR20:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3); VAR21L:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3); VAR22L:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3); VAR23L:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3); VAR24L:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3); VAR25L:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3); VAR26L:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3); VAR27:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3); 買點(diǎn)二:=(VAR20+VAR22L+VAR24L+VAR26L); 賣點(diǎn)一:=(VAR21L+VAR23L+VAR25L+VAR27); 買待漲:=(VAR20+VAR22L+VAR24L+VAR26L)COLOR00FFFF; 快賣欲跌:=(VAR21L+VAR23L+VAR25L+VAR27) COLOR00FF00; ZDZ:=買待漲 AND 放心買 AND 陶金上 AND 主力信號 COLOR00FFFF; 真漲:=ZDZ; DRAWTEXT(真漲=1,LOW*0.97,'真漲'),COLORCYAN; {短買} AA:=REF(CLOSE,1); BBB:=SMA(MAX(CLOSE-AA,0),21,1)/SMA(ABS(CLOSE-AA),21,1)*1000; HHH:=BBB-LLV(BBB,27); CCC:=LLV(BBB,27)-BBB; QQ:=(MA(HHH,2)*3+HHH*13)/16,COLORFF00FF,LINETHICK1; SS:=(MA(CCC,2)*3+CCC*13)/16,COLORFF00FF,LINETHICK1; GG:=MA(HHH,5),LINETHICK1,COLORGREEN; MM:=MA(CCC,5),LINETHICK1,COLORGREEN; WW:=IF(QQ<GG,SS,MM),LINETHICK1,COLOR0000FF; EED:=IF(SS<MM,GG,QQ),COLORFFFFCC,LINETHICK1; ★買:=IF(EED-WW<5.6,200,0); RSVV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100; VARB2:=(RSVV/2+22)*1; 量:=EMA(VOL,13); 資金:=EMA(AMOUNT,13); 過濾:=((資金 /量) / 100); 提純:=(((CLOSE -過濾) / 過濾) * 100); 黃金:=((提純 < (0)) AND ZXNH),COLORRED; 買:=IF(黃金 AND RSVV<VARB2-2,180,0); DRAWTEXT(買>0,LOW*0.97,'買'),COLORFFFFFF; 倍量:=V/REF(V,1)>2; 倍1:=V>REF(V,2);倍2:=V>REF(V,3); 建倉量:=倍量 AND 倍1 AND 倍2; DRAWTEXT(建倉量=1,L*0.972,'建1' ),COLORGREEN; ZL:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3); F11:=ZIG(3,15); FXX:=IF((F11> REF(F11,1)),5,105); 轉(zhuǎn)向:=CROSS(ZL,FXX); DRAWTEXT(轉(zhuǎn)向=1,H*1.015,'轉(zhuǎn)上'),COLORYELLOW; 出擊:=ZIG(3,6)>REF(ZIG(3,6),1)AND REF(ZIG(3,6),1)<REF(ZIG (3,6),2); DRAWTEXT(出擊=1,L*0.972,'出擊' ),COLORYELLOW; AC:=AMOUNT/(VOL); YY:=MA(AC,13); LLL:=(C-YY)/YY*100; MIDC := MA(CLOSE,22); UPPERC:= MIDC + 2*STD(C,22); LOWERC:= MIDC - 2*STD(C,22); BBA:=(C-LOWERC)/(UPPERC-LOWERC); LIFENGCYC:=(REF(LLL,1)< -15 AND REF(BBA,1)< 0 AND LLL>REF(LLL,1)); 探頭:=LIFENGCYC>0; DRAWTEXT(探頭=1,H*1.01,'探頭' ),COLORYELLOW; AZ:=(3*CLOSE+LOW+OPEN+HIGH)/6; D1:=(20*AZ+19*REF(AZ,1)+18*REF(AZ,2)+17*REF(AZ,3)+16*REF(AZ,4)+15*REF(AZ,5)+14*REF(AZ,6) +13*REF(AZ,7)+12*REF(AZ,8)+11*REF(AZ,9)+10*REF(AZ,10)+9*REF(AZ,11)+8*REF(AZ,12) +7*REF(AZ,13)+6*REF(AZ,14)+5*REF(AZ,15)+4*REF(AZ,16)+3*REF(AZ,17)+2*REF(AZ,18)+REF(AZ,20))/211; D2:=EMA(D1,2); D3:=EMA(D2,2); K1:=EMA(D3,2); 起漲:=IF(CROSS(D1,K1),1,0); DRAWTEXT(起漲=1,H*1.01,'起漲' ),COLORYELLOW; {大牛啟動(dòng)} DIIF:=EMA(CLOSE,5)-EMA(CLOSE,10); DEIA:=EMA(DIIF,5); MAICD:=(DIIF-DEIA)*2; MACD12:=REF(MAICD/2,BARSLAST(MAICD=HHV(MAICD,12))); MACD50:=REF(MAICD/2,BARSLAST(MACD=HHV(MAICD,50))); 大行情:=NOT(REF(MACD12,1)=REF(MACD50,1)) AND MACD12=MACD50; STICKLINE(大行情,O,CLOSE,4.5,0),COLORLIMAGENTA; STICKLINE(大行情,O,CLOSE,1.5,0), COLORCYAN; DRAWTEXT(大行情=1,LOW-0.022*LOW,'亮劍'), COLORYELLOW; AL2:=ABS((REF(C,1)-(REF(O,1)))/(REF(O,1))); AL3:=ABS((REF(H,1)-(REF(O,1)))/(REF(O,1))); AL4:=ABS((REF(L,1)-(REF(O,1)))/(REF(O,1))); ELE:=(((REF(HIGH,1))+(REF(LOW,1))+(REF(OPEN,1))+2*(REF(CLOSE,1)))/5); 上升突破價(jià):=(ELE+((REF(HIGH,1))-(REF(LOW,1)))); 上升阻力價(jià):=(2*ELE-(REF(LOW,1))); 下跌支撐價(jià):=(2*ELE-(REF(HIGH,1))); 下跌反轉(zhuǎn)價(jià):=(ELE-((REF(HIGH,1))-(REF(LOW,1)))); 預(yù)測低一:O-(O*(ABS((AL2+AL3+AL4)/3))),COLORYELLOW,DOTLINE,NODRAW; 預(yù)測低二:=(預(yù)測低一+((((ELE+上升突破價(jià)+上升阻力價(jià)+下跌支撐價(jià)+下跌反轉(zhuǎn)價(jià))/5)+O)/2))/2; {預(yù)測當(dāng)天最高價(jià)公式} 預(yù)測高一:O+(O*(ABS((AL2+AL3+AL4)/3))),DOTLINE,NODRAW; 預(yù)測高二:=MA(REF(HIGH,1)/REF(CLOSE,2),35)*REF(CLOSE,1); ZTJ:=ZTPRICE(REF(CLOSE,1),0.1); DTJ:=DTPRICE(REF(CLOSE,1),0.1); {K線} 陽線:=C>O; 上影線:=(H-MAX(C,O))/REF(C,1); K線實(shí)體:=ABS(C-O)/REF(C,1); 漲停:=C/REF(C,1)>1.098&&H=C; 昨日漲停:=REF(C,1)=REF(ZTJ,1); 兩連板:=EVERY(漲停,2); 五連板:=EVERY(漲停,5); 昨日非漲停:=REF(C,1)/REF(C,2)<1.098&&REF(H,1)>REF(C,1); 不存在五連板:=NOT(EXIST(五連板,90)); 不存在二連板:=NOT(EXIST(兩連板,7)); 最低跌停:=L=DTJ; {成交量} 雙倍放量:=V/REF(V,1)>=2&&V/MA(V,100)>=2; 三倍放量:=V/REF(V,1)>=3&&V/MA(V,100)>1.1; 主力上班量0:=(三倍放量 OR 雙倍放量)&&不存在五連板&&不存在二連板&&不存在五連板&&COUNT(最低跌停,10)<2&&昨日非漲停&&陽線; 主力上班量:=FILTER(主力上班量0,3); SPX0:=H/REF(C,1)>=1.07&&陽線&&昨日非漲停&&H>C&&EXIST(主力上班量,5)&&上影線>0.01&&不存在二連板&&不存在五連板&&V=HHV(V,5); 試盤K線:=FILTER(SPX0,15); STICKLINE(試盤K線,H,L,0,0),COLOR0000FF; STICKLINE(試盤K線,C,O,3,0),COLOR000099; STICKLINE(試盤K線,C,O,5.3,0),COLOR0000BB; STICKLINE(試盤K線,C,O,2.7,0),COLOR0000DD; STICKLINE(試盤K線,C,O,0.6,0),COLOR0000FF; SPZQ:=BARSLAST(試盤K線); KK1:=SUMBARS(試盤K線,1); STICKLINE(KK1<17&&NOT(ISLASTBAR),REF(O,SPZQ)*0.9998,REF(O,SPZQ)*1.0002,8.3,0),COLOR00AAFF; DRAWTEXT(KK1=16,REF(O,SPZQ),'↖決策線'),COLOR00AAFF; DRAWTEXT(ISLASTBAR&&KK1<17,REF(O,SPZQ),'↖決策線'),COLOR00AAFF; DRAWTEXT(NOT(ISLASTBAR)&&KK1=2,REF(O,SPZQ)*1.01,'↖線上首板起爆'),COLOR00AAFF; 昨日長實(shí)體漲停:=昨日漲停&&REF(K線實(shí)體,1)>0.05; 組合試盤:=昨日長實(shí)體漲停&&NOT(EXIST(兩連板,10))&&COUNT(主力上班量,2)>=1&&O>REF(C,1)&&上影線>0.02 &&V/REF(V,1)>2&&L>REF(O,1)&&C<O; ZHSPZQ:=BARSLAST(組合試盤); 試盤無新低:=COUNT(C<REF(O,SPZQ),SPZQ)<2; 起爆點(diǎn)1:=漲停&&EXIST(試盤K線,15)&&試盤無新低&&COUNT(漲停,SPZQ)=1; 起爆點(diǎn)2:=EXIST(組合試盤,15)&&漲停&&C>O&&LLV(L,ZHSPZQ)>=REF(O,ZHSPZQ+1)&&COUNT(漲停,ZHSPZQ)=1; 起爆點(diǎn)3:=EXIST(起爆點(diǎn)1,14)&&漲停&&C>O&&試盤無新低&&COUNT(漲停,SPZQ)=2&&昨日非漲停; 起爆點(diǎn):=起爆點(diǎn)1 OR 起爆點(diǎn)2 OR 起爆點(diǎn)3; STICKLINE(起爆點(diǎn),OPEN,CLOSE,3.1,0),COLOR00AAFF; STICKLINE(起爆點(diǎn),OPEN,CLOSE,4.3,0),COLOR00BBFF; STICKLINE(起爆點(diǎn),OPEN,CLOSE,3.9,0),COLOR00CCFF; STICKLINE(起爆點(diǎn),OPEN,CLOSE,2.7,0),COLOR00DDFF; STICKLINE(起爆點(diǎn),OPEN,CLOSE,1.5,0),COLOR00EEFF; STICKLINE(起爆點(diǎn),OPEN,CLOSE,0.5,0),COLOR00FFFF; STICKLINE(起爆點(diǎn),H,L,0,0),COLOR00FFFF; DRAWTEXT(起爆點(diǎn)1 OR 起爆點(diǎn)2,L*0.975,'↖起爆點(diǎn)'),COLOR00AAFF; DRAWTEXT(起爆點(diǎn)3,H*1.03,'↙漲?；伛R槍'),COLOR00AAFF; DRAWICON(起爆點(diǎn),L*0.9,28); DRAWTEXT(試盤K線,H*1.05,'↙試盤K線'),COLOR0000FF; DRAWTEXT(組合試盤,H*1.01,'↙組合試盤'),COLOR0000FF; 兩連板1:=EVERY(漲停,2)&&EXIST(C>O,2); 三連板:=EVERY(漲停,3); 四連板:=EVERY(漲停,4); 三天兩板:=COUNT(漲停&&C>O,3)=2&&C>REF(C,2)&&NOT(EXIST(兩連板,3)); 強(qiáng)莊10:=EVERY(C>O,6)&&H<HHV(H,90)&&NOT(EXIST(起爆點(diǎn),60))&&EXIST(V>MA(V,100),5); 強(qiáng)莊1:=FILTER(強(qiáng)莊10,30); 強(qiáng)莊20:=(兩連板1 OR 三天兩板)&&NOT(三連板)&&NOT(EXIST(四連板,180))&&NOT(EXIST(起爆點(diǎn),60)); 強(qiáng)莊2:=FILTER(強(qiáng)莊20,30); 強(qiáng)莊3:=EVERY(H=ZTJ,2)&&EXIST(C<ZTJ,2)&&EVERY(C/REF(C,1)>0.07,2)&&EVERY(V=HHV(V,60),2)&&NOT(EXIST(強(qiáng)莊2,3))&&NOT(EXIST(起爆點(diǎn),60)); 強(qiáng)莊0:=強(qiáng)莊1 OR 強(qiáng)莊2 OR 強(qiáng)莊3; 強(qiáng)莊:=TFILTER(強(qiáng)莊0,EMA(C,10)<EMA(C,32),1); DRAWTEXT(強(qiáng)莊2,H*1.02,'↙強(qiáng)莊進(jìn)場'),COLORRED; DRAWTEXT(強(qiáng)莊3,H*1.02,'↙強(qiáng)莊進(jìn)場'),COLORRED; DRAWTEXT(強(qiáng)莊1,L*0.98,'↖連陽吸籌'),COLORRED; DRAWTEXT(強(qiáng)莊2,L*0.98,'↖連板搶籌'),COLORRED; DRAWTEXT(強(qiáng)莊3,L*0.98,'↖爆量陽搶籌'),COLORRED; A0:=((L+H+C*2)/4); 中:=EMA(A0,14)*1.0618,COLORWHITE,LINETHICK2; 下:=EMA(A0,14),COLORRED,LINETHICK2; 多空:=EMA((EMA(CLOSE,29)+EMA(CLOSE,31)+EMA(CLOSE,33))/3,3),COLORYELLOW,LINETHICK3; {動(dòng)能節(jié)奏} AAB:=EMA((2*C+H+L)/4,3); A1:=SLOPE(AAB*5-REF(AAB,5),5)+C; DIF:=EMA(A1,3) - EMA(A1,13); DEA:=EMA(DIF,3); 動(dòng)能線:=IF(C>中 AND C>下 AND C>多空 AND (DIF-DEA)>0,(DIF-DEA),0),COLORYELLOW; 動(dòng)能:=C>中 AND C>下 AND C>多空 AND (動(dòng)能線 > 0); T:=BARSLAST(動(dòng)能); TJ1:=T<15; DRAWTEXT(出擊 AND TJ1 =1,L*0.972,'重?fù)?#39; ),COLORYELLOW; 新凈金額:DYNAINFO(100)/100000000,NODRAW; {頂?shù)紫戎獇 {量能平臺} {N1:=30; T1:=CONST(HHVBARS(V,N1)); T0:=IF(CURRBARSCOUNT<=N1+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),LINETHICK3; IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT; DRAWTEXT(ISLASTBAR,T0,' 量能平臺'); STICKLINE(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95,100,0),COLORWHITE,LINETHICK3; DRAWNUMBER(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95),LINETHICK3; 止損點(diǎn):=(ISLASTBAR,HHV(C,3)*0.95,HHV(C,3)*0.95),LINETHICK3; DRAWTEXT(ISLASTBAR ,止損點(diǎn),' 止損點(diǎn)'),LINETHICK3;} {所屬板塊} Z11:=STRCAT(HYBLOCK,' '); Z2:=STRCAT(Z11,DYBLOCK); Z3:=STRCAT(Z2,' '); DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE; DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORYELLOW;{老王} DRAWTEXT_FIX(ISLASTBAR,0,0.10,0,FGBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0,0.10,0,EXTERNSTR(0,1)),COLORYELLOW;{融勝} {做多:LLV((O+H+L+2*C)/5*2-H,8),COLORLIRED,DOTLINE; 做空:HHV((O+H+L+2*C)/5*2-L,8),COLORLIRED,DOTLINE;} 利潤同比:=STRCAT(STRCAT('利潤同比：',CON2STR(FINANCE(43),2)),'%'); 收入同比:=STRCAT(STRCAT('收入同比：',CON2STR(FINANCE(44),2)),'%'); 主營利潤率:=STRCAT(STRCAT('主營利潤率：',CON2STR(FINANCE(23)/FINANCE(20)*100,2)),'%'); 毛利率:=STRCAT(STRCAT('【毛利率】',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)),'%'); {穿籌量:=(WINNER(CLOSE)-REF(WINNER(C),1))*100; DRAWTEXT_FIX(1,0.00,0.35,0,穿籌量),COLORYELLOW;} DRAWTEXT_FIX(1,0.00,0.15,0,利潤同比),COLORYELLOW; DRAWTEXT_FIX(1,0.11,0.15,0,收入同比),COLORYELLOW; DRAWTEXT_FIX(1,0.22,0.15,0,主營利潤率),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.3,0,毛利率),COLORYELLOW; DRAWTEXT_FIX(1,0.4,0.01,0,'趨勢為王 結(jié)構(gòu)修邊 做波段'),COLORRED; A1:=REF(HIGH,10)=HHV(HIGH,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); D1:=FILTER(C1,10);{高點(diǎn)} A2:=REF(LOW,10)=LLV(LOW,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); D2:=FILTER(C2,10);{低點(diǎn)} E1:=(REF(LLV(LOW,2*10),1)+REF(HHV(HIGH,2*10),1))/2; E2:=(HIGH+LOW)/2; H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; L1:=(D2 AND NOT((D1 AND E1<E2))); H2:=D1 AND NOT((D2 AND E1>=E2)); X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1)); G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{過濾后低點(diǎn)} L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2)); G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{過濾后高點(diǎn)} 浪折線上:DRAWLINE(LD,L,HD,H,0),COLOR00FFFF,LINETHICK1; 下:DRAWLINE(HD,H,LD,L,0),COLOR00FFFF,LINETHICK1; J1:=BACKSET(ISLASTBAR ,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1); 新浪頂?shù)拙€:DRAWLINE(J2,IF(HD,H,L),ISLASTBAR ,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLOR00FF00; UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); VV:=UU>REF(UU,1); WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2); XX:=WW>REF(WW,1); 浪底粗線:DRAWLINE(XX,L,VV,L,1),COLORFFFFFF,LINETHICK2,DOTLINE; UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); VV2:=UU2>REF(UU2,1); WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2); XX2:=WW2>REF(WW2,1); 浪頂細(xì)線:DRAWLINE(XX2,H,VV2,H,1),COLORFFFF00,LINETHICK1,DOTLINE; N:=WEEKDAY; AA:=REF(H,N)=HHV(H,2*N+1); AA1:=REF(L,N)=LLV(L,2*N+1); QY:=BACKSET(AA,N+1); QY1:=BACKSET(AA1,N+1); CC:=FILTER(QY,N) AND H=HHV(H,N+1); CC1:=FILTER(QY1,N) AND L=LLV(L,N+1); DDD:=BARSLAST(CC); DD1:=BARSLAST(CC1); GDTS:=IF(CC,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0); DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1); GDCS13:=CONST(REF(HIGH,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1)); DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD1+1); GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2); GDCS23:=CONST(REF(HIGH,DINGBUTS1-1)); DDCS23:=CONST(REF(L,DDTS2-1)); XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1); XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2); EXP1:=EMA(CLOSE, 12), COLORYELLOW, LINETHICK1; EXP2:=EMA(CLOSE, 47), COLORLIMAGENTA, LINETHICK1; STICKLINE(C>EXP1 AND C>EXP2, H, L, 0, 0), COLORRED;{上下影線，可不畫} STICKLINE(C>EXP1 AND C>EXP2 AND C>=O, O, C, 2.3, 1), COLORRED; STICKLINE(C>EXP1 AND C>EXP2 AND C<O, O, C, 2.3, 0), COLORRED; STICKLINE(C<EXP1 AND C>EXP2, H, L, 0, 0), COLORYELLOW;{上下影線，可不畫} STICKLINE(C<EXP1 AND C>EXP2 AND C>=O, O, C, 2.3, 1), COLORYELLOW; STICKLINE(C<EXP1 AND C>EXP2 AND C<O, O, C, 2.3, 0),COLORYELLOW; STICKLINE(C>EXP1 AND C<EXP2, H, L, 0, 0),COLORFF8000;{上下影線，可不畫} STICKLINE(C>EXP1 AND C<EXP2 AND C>=O, O, C, 2.3, 1), COLORFF8000; STICKLINE(C>EXP1 AND C<EXP2 AND C<O, O, C, 2.3, 0),COLORFF8000; STICKLINE(C<EXP1 AND C<EXP2, H, L, 0, 0), COLORGREEN;{上下影線，可不畫} STICKLINE(C<EXP1 AND C<EXP2 AND C>=O, O, C, 2.3, 1), COLORGREEN; STICKLINE(C<EXP1 AND C<EXP2 AND C<O, O, C, 2.3, 0), COLORGREEN; STICKLINE(XG2,GDCS23,GDCS23,2,0),COLORFF8000; STICKLINE(XG1,GDCS13,GDCS13,2,0),COLORYELLOW; STICKLINE(XD2,DDCS23,DDCS23,2,0),COLORGRAY; STICKLINE(XD1,DDCS13,DDCS13,2,0),COLORCYAN; 買買:=EMA(((100 * (CLOSE - LLV(LOW,34))) / (HHV(HIGH,34) - LLV(LOW,34))),3); 賣賣:=SMA((((HHV(HIGH,34) - CLOSE) / (HHV(HIGH,34) - LLV(LOW,34))) * 100),2,1); A:=(CROSS(買買,賣賣) AND (買買 >= 45)); DRAWTEXT(A=1,L*0.98,'阻擊龍頭'),LINETHICK1,COLORFF00FF; 出擊:=ZIG(3,6)>REF(ZIG(3,6),1)AND REF(ZIG(3,6),1)<REF(ZIG (3,6),2); DRAWTEXT(出擊=1,L*0.972,'出擊' ),COLORYELLOW; 倍量:=V/REF(V,1)>2; 倍1:=V>REF(V,2);倍2:=V>REF(V,3); 建倉量:=倍量 AND 倍1 AND 倍2; DRAWTEXT(建倉量=1,L*0.972,'建1' ),COLORGREEN; AAAA:=AMOUNT/100000000; 金額億:AAAA,NODRAW,COLORYELLOW; {資金主} DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'11',0); MA10:MA(C,10); MA60:MA(C,60); VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL); VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL); VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL); VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100))))); 加倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED; 減倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORBLUE; 洗盤:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORWHITE; 高拋:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORMAGENTA; 地量:VAR9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORGREEN; DRAWKLINE(H,O,L,C); TY:=C; A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10); A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10); 前期高位:REF(H,BARSLAST(HD)), COLORFF00FF,POINTDOT,LINETHICK3; 前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK3; STICKLINE(加倉,O,C,1,0),COLORRED; STICKLINE(洗盤,O,C,1,0),COLORWHITE; STICKLINE(減倉,O,C,1,0),COLORBLUE; STICKLINE(高拋,O,C,1,0),COLORMAGENTA; STICKLINE(地量,O,C,1,0),COLORGREEN; JJ:=(3*C+H+L+O)/6; VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1); LJL:=FILTER(TJ1,5); STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORRED; STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORYELLOW; STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW; DRAWTEXT_FIX(1,0.0,0.0,0,'藍(lán)芯-主力低位深度洗盤或高位出貨堅(jiān)決'),COLORBLUE,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.06,0,'白芯-主力輕度洗盤'),COLORWHITE,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.12,0,'棕芯-出現(xiàn)了近期相對地量'),COLORGREEN,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.18,0,'粉芯-主力在做高拋低吸或低吸高拋'),COLORFF00FF,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.24,0,'紅芯-主力吸籌進(jìn)貨積極主動(dòng)'),COLORRED,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.3,0,'黃芯-主力吸籌進(jìn)貨強(qiáng)并且成交量出現(xiàn)黃金柱'),COLORYELLOW,LINETHICK1; DRAWTEXT_FIX(C>0,0.004,1,0,DYBLOCK),COLORYELLOW,LINETHICK2; DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2; DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2; EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3); PL10:=ZIG(3,10); 走強(qiáng)2:=BARSLAST(PL10<REF(PL10,1)); ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強(qiáng)2),0); 追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2; 追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3; DRAWTEXT(追2 OR 追4,LOW*0.978,'追'),COLORYELLOW; PL5:=ZIG(3,5); EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3); EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3); EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3); PL20:=ZIG(3,20); EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3); EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3); PL40:=ZIG(3,40); 走強(qiáng)1:=BARSLAST(PL5<REF(PL5,1)); 走弱1:=BARSLAST(PL5>REF(PL5,1)); 走弱2:=BARSLAST(PL10>REF(PL10,1)); 走強(qiáng)3:=BARSLAST(PL20<REF(PL20,1)); 走弱3:=BARSLAST(PL20>REF(PL20,1)); {ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強(qiáng)2),0);} ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走強(qiáng)2),0); DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0); DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0); ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強(qiáng)3),0); ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走強(qiáng)3),0); DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0); DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0); DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'反彈低點(diǎn)'),COLORLIRED; DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'反彈高點(diǎn)！'),COLORLIBLUE; DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'底'),COLORYELLOW; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'減倉'),COLORFFFF00; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'----買'),COLOR0000FF; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'短賣'),COLORGREEN; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'----短買'),COLOR0000FF; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'短賣'),COLORGREEN; DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'Ⅰ'),COLORFF00FF; DRAWTEXT(EX2 AND DTJD10=2,H*1.03,'Ⅱ'),COLORFF6000; DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORYELLOW; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLORFFFF00; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORYELLOW; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'清倉!'),LINETHICK3,COLORWHITE; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORYELLOW; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,'⑷'),COLORYELLOW; EMA13:=EMA(C,13); EMA34:=EMA(C,34); EMA55:=EMA(C,55); EMA120:=EMA(C,120); CR1:=(C-REF(C,1))/REF(C,1)*100>0.5; CR2:=V>MA(V,5)*0.6; CR3:=COUNT(CROSS(EMA13,EMA55),3)=1; CR4:=ABS(EMA34-EMA55)/EMA55<0.03; CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1); CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2); DRAWTEXT(CR6,C*0.98,'風(fēng)險(xiǎn)'),COLORWHITE; |
|
|
