源代碼
{參數範圍:0-0.9,意思:上到下0.0-0.9,左到右0.0-0.9}
右:=0.7;
上1:=0.6;
上2:=0.8;
YYA4:=MA(CLOSE,20);
YYA5:=(CLOSE > MA(CLOSE,5));
YYA6:=(MA(CLOSE,5)>MA(CLOSE,10));
YYA7:=(CLOSE > MA(CLOSE,10));
YYA8:=(MA(CLOSE,5)>MA(CLOSE,20));
YYA9:=(CLOSE > MA(CLOSE,20));
YYA10:=REF(YYA4,1);
YYA11:=(YYA4 > YYA10);
YYAVX:=(((((IF(YYA5,10,(0-10))+IF(YYA6,10,(0-10)))+IF(YYA7,10,(0-10)))+IF(YYA8,10,(0-10)))+IF(YYA9,10,(0-10)))+IF(YYA11,10,(0-10)));
DSLX:=(CLOSE/INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
YYV1:=MA(VOL,5);
YYV2:=MA(VOL,30); {修改30-60}
情況1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1>=YYV2)) AND (DSLX>=DSLX1)),1,0));
情況2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1<yyv2>=DSLX1)),1,0));/<yyv2>
情況3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1>YYV2)) AND (DSLX<dslx1>
情況4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1<=YYV2)) AND (DSLX<dslx1>
情況5:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1>=YYV2)) AND (DSLX>=DSLX1)),1,0));
情況6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1<yyv2>=DSLX1)),1,0));/<yyv2>
情況7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1>=YYV2)) AND (DSLX<dslx1>
情況8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1< YYV2)) AND (DSLX<dslx1>
情況9:=CONST(IF(((((YYAVX>=1) AND (REF(YYAVX,1)>0)) AND (YYV1>=YYV2)) AND (DSLX >= DSLX1)),1,0));
情況10:=CONST(IF(((((YYAVX>=1) AND (REF(YYAVX,1)>0)) AND (YYV1<yyv2>= DSLX1)),1,0));/<yyv2>
情況11:=CONST(IF(((((YYAVX>=1) AND (REF(YYAVX,1)>0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
情況12:=CONST(IF(((((YYAVX>=1) AND (REF(YYAVX,1)>0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
情況13:=CONST(IF(((((YYAVX<1) AND (REF(YYAVX,1)<0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情況14:=CONST(IF(((((YYAVX<1) AND (REF(YYAVX,1)<0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
情況15:=CONST(IF(((((YYAVX<1) AND (REF(YYAVX,1)<0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
情況16:=CONST(IF(((((YYAVX<1) AND (REF(YYAVX,1)<0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
大盤1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >=YYV2)),1,0));
大盤2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 <yyv2>
大盤3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >=YYV2)),1,0));
大盤4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 <yyv2>
大盤5:=CONST(IF((((YYAVX>=1) AND (REF(YYAVX,1)> 0)) AND (YYV1 >= YYV2)),1,0));
大盤6:=CONST(IF((((YYAVX>=1) AND (REF(YYAVX,1)> 0)) AND (YYV1 < YYV2)),1,0));
大盤7:=CONST(IF((((YYAVX<1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
大盤8:=CONST(IF((((YYAVX<1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
DRAWTEXT_FIX(情況1=1 ,右,上1,0,'量能理想,明顯走強,中線參與,倉位在2/3右'),COLORFF00FF;
DRAWTEXT_FIX(情況2=1 ,右,上1,0,'走勢趨強量能不足,短線進場,倉位在1/2右'),COLORFF00FF;
DRAWTEXT_FIX(情況3=1 ,右,上1,0,'量價良好,並沒有明顯走強,短線進場,倉位1/2右。'),COLORFF00FF;
DRAWTEXT_FIX(情況4=1 ,右,上1,0,'形態尚可,量能不足,未完全走強,短線參與,倉位1/3右。'),COLORFF00FF;
DRAWTEXT_FIX(情況5=1 ,右,上1,0,'形態變壞,走勢尚可,重倉減大半,清倉者觀望。'),COLOR00FFFF;
DRAWTEXT_FIX(情況6=1 ,右,上1,0,'隨大盤一起下跌,明顯縮量走勢,考慮大盤風險,減持或清倉。'),COLOR00FFFF;
DRAWTEXT_FIX(情況7=1 ,右,上1,0,'該股放量下跌,走勢明顯偏弱,離場觀望。'),COLORFFFFFF;
DRAWTEXT_FIX(情況8=1 ,右,上1,0,'該股縮量下跌,走勢偏弱,離場觀望。'),COLORFFFF00;
DRAWTEXT_FIX(情況9=1 ,右,上1,0,'該股形態良好,強勢明顯,量能充足,可以繼續持有。'),COLOR00FFFF;
DRAWTEXT_FIX(情況10=1,右,上1,0,'該股上行趨勢不變,強勢依然,但量能開始轉弱,注意風險'),COLOR00FFFF;
DRAWTEXT_FIX(情況11=1,右,上1,0,'該股仍然具備上漲潛力,但股性偏弱,可考慮減倉。'),COLORFFFFFF;
DRAWTEXT_FIX(情況12=1,右,上1,0,'該股走勢趨弱,量能不足,減持大部分籌碼'),COLORFFFF00;
DRAWTEXT_FIX(情況13=1,右,上1,0,'該股形態不佳,注意成交量的變化,但目前不適合參與。'),COLORFFFF00;
DRAWTEXT_FIX(情況14=1,右,上1,0,'該股趨勢不明,股價偏弱,注意量能變化,目前不宜參與。'),COLORFFFF00;
DRAWTEXT_FIX(情況15=1,右,上1,0,'有走強跡象,但量能不足,趨勢不明,不適合操作'),COLORFFFF00;
DRAWTEXT_FIX(情況16=1,右,上1,0,'該股走勢太弱,沒有參與價值。'),COLORFFFFFF;
DRAWTEXT_FIX(大盤1,右,上2,0,'總勢量能理想,2/3倉位, 前一輪下跌,是否最佳買點,否則謹慎介入。'),COLOR00FF00;
DRAWTEXT_FIX(大盤2,右,上2,0,'總勢趨強,量能不足,若前一輪下跌,短線進場1/2,量能放大加倉。'),COLORFF00FF;
DRAWTEXT_FIX(大盤3,右,上2,0,'總勢形態走壞,重倉者可以減去大部分倉位。'),COLORAAAAAA;
DRAWTEXT_FIX(大盤4,右,上2,0,'總勢縮量調整,注意風險,短線清倉觀望。'),COLORFFFFFF;
DRAWTEXT_FIX(大盤5,右,上2,0,'總勢走勢良好,量能理想,可以繼續持有強勢股。'),COLOR00FFFF;
DRAWTEXT_FIX(大盤6,右,上2,0,'總勢形態良好,但量能稍顯不足,隨時準備減倉'),COLOR00FF00;
DRAWTEXT_FIX(大盤7,右,上2,0,'總勢趨勢不明,注意成交量變化,目前不適宜進場。'),COLORFFFFFF;
DRAWTEXT_FIX(大盤8,右,上2,0,'總勢趨勢向下,量能萎縮,不適合進場。'),COLORFFFFFF;
E5:=EMA(C,5),COLORWHITE;
MA5:=MA(C,5);
MA25:MA(C,25),COLORYELLOW;
E12:EMA(C,12),COLORFF00FF;
MA99:MA(C,99),COLOR0000FF;
MA177:MA(C,177),COLOR008000;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK),COLORYELLOW;
GD:=MAX(HHV(C,30),HHV(O,30)),COLORWHITE,DOTLINE;
E17:=EMA(C,17);
VAR1:=1;
VAR2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100*VAR1;
DF:= SMA(SMA(VAR2,2,1)+3*VAR1,2,1),LINETHICK2,COLORRED;
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:= DMP*100/MTR,;
MDI:= DMM*100/MTR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=EXPMEMA(ADX,6);
DBQD:=CROSS(DF,20) AND EXIST(C>REF(C,1)*1.095,2) ;
{DRAWTEXT(DBQD,LOW-1.5,'底部啟動'),COLORYELLOW;}
ZT:=C>1.095*REF(C,1);
NPZ:=CROSS(PDI,ADX) AND ADX<30 AND CROSS(DF,50) AND PDI>REF(PDI,1) AND PDI>30
AND REF(COUNT(ZT,6),1)>=2 AND FINANCE(7)<800000000 ;
{DRAWTEXT(NPZ,LOW-1.5,'↖牛胚'),COLORYELLOW;}
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
買:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)) AND C>MA25 ;
DRAWTEXT(FILTER(買=1,5) ,LOW-0.001,'↖買進'),COLORYELLOW;
STICKLINE(買,OPEN,CLOSE,0.05,0),COLORYELLOW;
九買:=FILTER(買=1,5) AND CROSS(C,MA99) AND C>=1.07*REF(C,1) AND LAST(MA99>REF(MA99,1),10,0);
{DRAWTEXT(九買,LOW-0.45,'↖九買'),COLORRED;}
A9:=買 AND C>1.095*REF(C,1);
{DRAWTEXT(A9,LOW-0.9,'↖絕買'),COLORRED;}
FA:=BARSLAST(CROSS(E12,E5)) AND CROSS(E5,E12);
FB:=FA AND E5>MA25 AND E12>MA25 AND E12>REF(E12,1) AND KDJ.D<50;
{DRAWTEXT(FB,L-0.1,'↖追漲'),COLORFF00FF;}
H1:=EMA(C,5);
H2:=EMA(H1,13);
錢來:=CROSS(H1,H2) AND H2>=REF(H2,1);
{DRAWICON(錢來,L*0.98,9);}
NOTP:=DYNAINFO(8);
NOST:=NOT(FINDSTR(GNBLOCK,'ST'));
BBB:=MACD.MACD<0 AND CROSS(MACD.MACD,REF(MACD.MACD,1)) ;
A34:=100*(C-LLV(L,34))/(HHV(C,34)-LLV(L,34));
WK:=KDJ.D<20 AND KDJ.J<20 AND CROSS(KDJ.J,KDJ.D);
CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13);
CYS:=(CLOSE-CYC13)/CYC13*100;
AAAA:=WINNER(C);
CDFT:= REF(A34,1)<5 AND A34>5 AND NOTP AND NOST AND
REF(CYS,1)
{ DRAWTEXT(CDFT,L-0.01,'↖反彈'),COLORYELLOW; }
SC:=CROSS(MA99,MA25);
TSC:=BARSLAST(SC);
JC:=CROSS(MA25,MA99);
JD1:=ATAN((MA25/REF(MA25,1)-1)*100)*180/3.1416;
JD2:=ATAN((MA99/REF(MA99,1)-1)*100)*180/3.1416;
NJD:=JD1-JD2<25 ;
SS:=MA99>REF(MA99,TSC) AND LAST(MA99>REF(MA99,1),TSC,0);
NTT:= JC AND COUNT(ZT,TSC)>=1 AND NJD AND SS ;
{DRAWTEXT(NTT,MA25-0.25,'↖牛抬頭'),COLORYELLOW;}
ZG:=WINNER(C)>0.95 AND DYNAINFO(37)<0.03;
DIF:=EMA(CLOSE,10)-EMA(CLOSE,20);
DEA:=EMA(DIF,21);
MACD:=(DIF-DEA)*2;
CA:=CROSS(DIF,DEA);
CA1:=BARSLAST(REF(CROSS(DIF,DEA),1));
CB:=REF(CLOSE,CA1+1)>CLOSE AND DIF>REF(DIF,CA1+1) AND CROSS(DIF,DEA);
CC:= CA AND CB AND COUNT(CA,10)=2 AND LAST(DIF<0,13,1) AND LAST(DEA<0,13,1)
AND FINANCE(7)<1000000000 ;
{DRAWTEXT(CC,L-0.25,'↖底買'),COLORYELLOW;}
DIFIF1:=EMA(CLOSE,10) - EMA(CLOSE,20);
DEAEA1:=EMA(DIFIF1,21);
MAC:=2*(DIFIF1-DEAEA1);
DD:= H>REF(H,1) AND L>REF(L,1) AND REF(L,1)=LLV(L,30)
AND REF(L,2)>REF(L,1) AND REF(H,2)>REF(H,1);
DD1:=REF(LLV(L,30),5);
T1:=LLVBARS(REF(L,5),30);
MAC1:=REF(MAC,T1);
DB:= ABS(REF(MAC,1))<0.4*ABS(MAC1) AND REF(MAC,1)<0 AND MAC1<0
AND REF(L,T1)>REF(L,1) AND T1<30 AND T1>4;
ZT5:=C>=1.08*REF(C,1);
HJMD:=EXIST(DB,3) AND EXIST(DD,3) AND DYNAINFO(37)>0 AND COUNT(ZT5,3)>=1;
DRAWTEXT(HJMD,L-0.25,'↖黃金買'),COLORYELLOW;
操盤線:=MA(C,4),NODRAW,COLORRED;
安全線:=MA(C,19),LINETHICK2,COLORYELLOW;
空:=EMA(CLOSE,5);
均衡:=EMA(空,0),COLORFFFFFF;
下趨勢雙線持幣:=HHV(MA(HIGH,3),2),LINETHICK2,COLORGREEN;
上趨勢單線持股:=LLV(MA(HIGH,3),1),LINETHICK2,COLORRED;
{STICKLINE(CROSS(操盤線,安全線) AND (操盤線>安全線) AND
(CLOSE>安全線),OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(CROSS(操盤線,安全線) AND (操盤線>安全線) AND
(CLOSE>安全線),H,L,0,0),COLORYELLOW;}
VAR5:=FILTER(均衡>REF(均衡,1) AND 下趨勢雙線持幣REF(CLOSE,1),11) ;
IF(VAR5>=1,L*0.996,DRAWNULL),COLORMAGENTA,CIRCLEDOT;
{DRAWTEXT(VAR5>=1 AND C>MA(C,20),L-0.02,'↖啟動點'),COLORMAGENTA;}
V20:=MA(V,20);
ZD:=L>=0.98*E17 AND L<=1.02*E12 ;
ZF:=O/L<1.035 AND REF(C,1)/O<1.02;
ZTTO:= COUNT(ZT,12)>=1 AND DYNAINFO(37)>0 AND ZD AND ZF ;
DRAWTEXT(VAR5>=1 AND C>MA(C,20) AND ZTTO ,L-0.02,'↖牛啟動點'),COLORMAGENTA;
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZSHTL:=SHCM/(ZLCM+SHCM)*100;
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
QBD:=CROSS(ZZLKP,20) AND ZZLKP>25 AND C>1.05*REF(C,1);
DRAWTEXT(QBD ,L-0.32,'起爆'),COLORYELLOW;
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
RSV4:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
短期B:=SMA(RSV1,3,1);
短期A:=SMA(短期B,3,1);
K4:=SMA(RSV4,8,1);
中期波段:=SMA(K4,3,1);
VV1:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1);
VV2:=SMA(VV1,3,1);
VV3:=3*VV1-2*VV2;
趨勢:=EMA(VV3,3);
VV4:=(趨勢-REF(趨勢,1))/REF(趨勢,1)*100;
準備資金:=趨勢<13;
開始建倉:=趨勢<13 AND VV4>13;
VA1:=(CLOSE*2+HIGH+LOW)/4*10;
VA2:=EMA(VA1,13);
VA3:=EMA(VA1,34);
VA4:=VA2-VA3;
VA5:=EMA(VA4,5);
VA6:=2*(VA4-VA5)*5.5;
主力進場:=VA6>=0 AND 趨勢<13;
轉折:=REF(中期波段,1)REF(中期波段,1);
先機共振抄底:=EXIST(開始建倉,3) AND EXIST( 主力進場,1) AND 中期波段>REF(中期波段,1);
短線波段:=(EXIST(轉折,1) AND 短期B>=短期A) OR (REF(短期B,1)=短期A AND 中期波段>REF(中期波段,1));
ZTT:=C>REF(C,1)*1.045;
MA60:=MA(C,60);
LSC:= 短線波段 AND C>MA(C,25) AND MACD.MACD>0 AND EXIST(ZTT,8) AND LAST(MA60>REF(MA60,1),4,1) ;
{DRAWTEXT(LSC,L+0.155,'↖暴漲牛'),COLORYELLOW;}
;
倍量柱:=IF(V/REF(V,1)>1.9 AND C>REF(C,1),1,0);
縮量柱:=IF(V 改良縮倍量柱:倍量柱 AND REF(縮量柱,1) AND MA(C,5)>MA(C,20) AND MA(C,5)>REF(MA(C,5),1) AND MA(C,20)>REF(MA(C,20),1)
閱讀更多 指標龍捲風 的文章