頂:=85;
中:=50;
底:=20;
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VARA:=IF(VAR9>100,VAR9-100,0);
VARB:=HHV(HIGH,34);
AAW:= VARA*2;
BB:= EMA((VAR6-VAR8)/(VARB-VAR8)*100,13);
VARC:=EMA(0.667*REF(BB,1)+0.333*BB,2);
CC:SMA(VAR5,20,1),COLORRED;
CC1:SMA(CC,5,1),COLORGREEN;
STICKLINE(CC>CC1,CC,CC1,1,0),COLORRED;
STICKLINE(CC1>CC,CC,CC1,1,0),COLORGREEN;
出擊:=IF((CROSS(CC,CC1) AND (CC1 < 頂) ),80,0);
STICKLINE(出擊,100,CC1,2,0.5),COLORRED;
{跑}
DRAWICON(CC < REF(CC,1) AND REF(CC,1) < REF(CC,2) AND CC > CC1,100,2);
DRAWICON(CROSS(CC1,CC),100,15);
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
短期底部:=LLV(OPEN,30);K:=SMA(RSV,3,1),COLORFFFFFF;D:=SMA(K,3,1),COLOR00FFFF;
J:=3*K-2*D;AA10:=MA(CLOSE,10);
AA1:=MA(CLOSE,12);BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
BB1:=((ATAN((AA1 - REF(AA1,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);VAR2Q:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3Q:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4Q:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5Q:=(((VAR2Q + (2 * VAR3Q)) + (3 * VAR4Q)) / 6);
VAR6Q:=MA(VAR5Q,3);GG1:=IF(VAR6Q ,20,0);
DRAWICON(CROSS(J,K) AND (GG1 >= 20) AND CC>CC1,40,13);
DRAWTEXT(CROSS(J,K) AND (GG1 >= 20) AND CC>CC1,55,'啟');
DRAWTEXT(CROSS(J,K) AND (GG1 >= 20) AND CC>CC1,44,'爆');
{★底部提示：通用}
VAR2T:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR3T:=SMA(SMA(VAR2T,3,1),3,1)/28.57;
VAR4T:=EMA(VAR3T,5);
VAR5T:=3*VAR3T-2*VAR4T;
AAT:=CROSS(VAR5T,VAR3T) AND VAR3T<2.1 AND C>O;
STICKLINE(AAT AND CC>CC1,0,20,20,1),COLORYELLOW;
STICKLINE(AAT AND CC>CC1,4,10,19,0),COLORRED;
STICKLINE(AAT AND CC>CC1,1,4,19,0),COLORRED;
STICKLINE(AAT AND CC>CC1,5,5,20,1),COLORYELLOW;
STICKLINE(AAT AND CC>CC1,10,20,5,0),COLORYELLOW;
STICKLINE(AAT AND CC>CC1,100,102,5,1),COLORRED;
STICKLINE(AAT AND CC>CC1,104,106,5,1),COLORRED;
STICKLINE(AAT AND CC>CC1,108,110,5,1),COLORRED;
STICKLINE(AAT AND CC>CC1,112,114,5,1),COLORRED;
STICKLINE(AAT AND CC>CC1,116,118,6,0),COLORFFCCCC;
DRAWTEXT(AAT AND CC>CC1,120,'底'),COLORYELLOW;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84))>100 COLORBLACK;
AA:COUNT(CCI=1,2)<=1 AND COUNT(CCI=1,2)>0 AND NOT(BARSLAST(CCI=1)>=1 AND BARSLAST(CCI=1)<2) AND C/REF(C,1)>1.095 AND C>MA(C,60);
IF(COUNT(BARSLAST(AA=1)>=1 ,2)>1 AND CCI=1 AND C>MA(C,14),CCI,DRAWNULL)COLOR0000F3;
STICKLINE(AA AND CC>CC1,0,8,1,1) COLOR00FFF3;
STICKLINE(AA AND CC>CC1,8,16,4,0)COLOR00D6F3;
STICKLINE(AA AND CC>CC1,16,24,6,1) COLOR00B2F3;
STICKLINE(AA AND CC>CC1,24,36,8,0) COLOR0085F3;
STICKLINE(AA AND CC>CC1,36,40,10,1) COLOR0018F3;
LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12));
XG: FILTER(LS,28);
A:=CROSS(SMA(CLOSE,2,1),SMA(LOW,5,1));
A1:=(SMA(HIGH,21,2)*1.05)*1.05;
A2:=IF(A,A1,SMA(LOW,5,1));
A3:=CROSS(SMA(CLOSE,2,1),(SMA(HIGH,21,2)*1.05));
A4:=IF(A3,(SMA(HIGH,21,2)*1.05)*1.10,(SMA(LOW,21,2)*0.95));
A5:=A2>SMA(LOW,5,1) AND CROSS(C,REF(MA(C,13),13/2+1)) AND VOL>0;
A6:=REF(H/O<1.02,1) AND REF(C<O,1);
在主升抓牛:=A4>(SMA(LOW,21,2)*0.95) OR A5 AND A6;
DRAWTEXT(在主升抓牛 AND CC>CC1,22,'<--在主升抓牛'),COLORRED;
STICKLINE(在主升抓牛 AND CC>CC1,40,25,1,0),COLORYELLOW;
STICKLINE(在主升抓牛 AND CC>CC1,25,10,2,0),COLOR00FF00;
STICKLINE(在主升抓牛 AND CC>CC1,10,0,2,0),COLORBLUE;
STICKLINE(在主升抓牛 AND CC>CC1,25,15,0.5,0),COLORRED;
STICKLINE(在主升抓牛 AND CC>CC1,15,6,1,0),COLOR00FF00;
STICKLINE(在主升抓牛 AND CC>CC1,6,0,2,0),COLORBLUE;
{絕對主升源碼}
清倉:=1.66*MA(FORCAST(CLOSE,2),40),COLORRED;
出貨:=1.36*MA(FORCAST(CLOSE,2),40),COLOR08FFFF;
高拋:=1.16*MA(FORCAST(CLOSE,2),40),COLORFF82FF;
低吸:=0.82*MA(FORCAST(CLOSE,2),40),COLORF7E300;
滿倉:=0.72*MA(FORCAST(CLOSE,2),40),COLORGREEN;
強通1:=清倉>REF(清倉,1);
強通2:=出貨>REF(出貨,1);
強通3:=高拋>REF(高拋,1);
強通4:=低吸>REF(低吸,1);
強通5:=滿倉>REF(滿倉,1);
上升通道:=強通1 AND 強通2 AND 強通3 AND 強通4 AND 強通5;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
五強:=MA5>REF(MA5,1);
十強:=MA10>REF(MA10,1);
二十強:=MA20>REF(MA20,1);
三十強:=MA30>REF(MA30,1);
六十強:=MA60>REF(MA60,1);
小均強:=五強 AND 十強;
均強:=十強 AND 二十強 AND 三十強;
大均強:=十強 AND 二十強 AND 三十強 AND 六十強;
JJD:=(H+L+C)/3;
強勢線1:=HHV(MA((((LOW + HIGH) + CLOSE) / 3),8),60),COLORRED,LINETHICK2;
強勢線2:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.18),8),20),COLORWHITE,LINETHICK2;
強勢線3:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.258),8),10),COLORYELLOW,LINETHICK2;
強勢線4:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.08),80),13),COLORLIMAGENTA,LINETHICK2;
開始走強1:=強勢線1>REF(強勢線1,1);
開始走強2:=強勢線2>REF(強勢線2,1);
開始走強3:=強勢線3>REF(強勢線3,1);
開始走強4:=強勢線4>REF(強勢線3,1);
雙強1:=開始走強1 AND 開始走強2;
雙強2:=開始走強2 AND 開始走強3;
雙強3:=開始走強2 AND 開始走強3;
雙強4:=開始走強3 AND 開始走強4;
三強:=開始走強1 AND 開始走強2 AND 開始走強3;
四強:=開始走強1 AND 開始走強2 AND 開始走強3 AND 開始走強4;
強勢為王:=雙強1 OR 雙強2 OR 雙強3 OR 雙強4 OR 三強 OR 四強;
VV:=(C+L+H)/3;
DSA:=SMA(MA(VV,15),2,1)LINETHICK3;
頂部1:=DSA*1.0888,COLORMAGENTA,LINETHICK1;
頂部2:=DSA*1.158,COLORBROWN,LINETHICK1;
頂部3:=DSA*1.218,COLORRED,LINETHICK1;
底部1:=DSA*0.9518,COLORLICYAN,LINETHICK1;
底部2:=DSA*0.888,COLORLIMAGENTA,LINETHICK1;
底部3:=DSA*0.8,COLORGREEN,LINETHICK1;
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
MA4:=MA(CLOSE,60);
五日走強:=MA1>REF(MA1,1);
十日走強:=MA2>REF(MA2,1);
二十日走強:=MA3>REF(MA3,1);
六十日走強:=MA4>REF(MA4,1);
低位主升:=五日走強 AND 十日走強 AND 六十日走強;
主升浪:=五日走強 AND 十日走強 AND 二十日走強;
大主升浪:=十日走強 AND 二十日走強 AND 六十日走強;
大主升浪2:=五日走強 AND 十日走強 AND 二十日走強 AND 六十日走強;
總主升:=主升浪 AND 大主升浪 AND 大主升浪2;
總主升浪:=低位主升 OR 主升浪 OR 大主升浪 OR 大主升浪2 OR 總主升;
強勢主升低買:L<底部1 AND 總主升浪 AND 強勢為王 AND C<DSA,COLORYELLOW,LINETHICK2;
獵股小王:L<底部1 AND C<DSA AND 強勢為王,COLORMAGENTA,LINETHICK2,LINESTICK;
DRAWICON(獵股小王>0 AND CC>CC1,11,1);
STICKLINE(獵股小王>0 AND CC>CC1,40,0,1,0),COLORYELLOW;
DRAWTEXT(獵股小王>0 AND CC>CC1,100,'獵');
DRAWTEXT(獵股小王>0 AND CC>CC1,90,'股');
DRAWTEXT(獵股小王>0 AND CC>CC1,80,'小');
DRAWTEXT(獵股小王>0 AND CC>CC1,70,'王');
獵股大王出擊:=強勢主升低買 AND 獵股小王 AND H<DSA,COLORRED;
AJ:=MA(C,30);
A1J:=AJ*1.1;
A4J:=AJ*0.9;
A2J:=A1J-(A1J-A4J)*0.191;
持倉:=IF(HIGH*1.01>A2J OR REF(HIGH,1)>REF(A2J,1),A1J,A4J),LINETHICK3,COLORRED;
生命線:=IF(HIGH*1.01>A2J OR REF(HIGH,1)>REF(A2J,1),A2J,A4J),LINETHICK3,COLORFFFFFF;
主升持倉:=持倉>生命線;
主升1:=持倉>REF(持倉,1);
主升2:=生命線>REF(生命線,1);
主升:=主升1 AND 主升2;
主升獵股王:=(獵股大王出擊 AND 主升持倉 AND 主升) OR (獵股小王 AND 主升持倉 AND 主升);
絕對的主升:(主升獵股王 AND 小均強) OR (獵股小王 AND 小均強),COLORYELLOW,LINETHICK4,STICK;
STICKLINE(絕對的主升>0 AND CC>CC1,100,0,1,1),COLORYELLOW;
DRAWTEXT(絕對的主升 AND CC>CC1,140,'絕');
DRAWTEXT(絕對的主升 AND CC>CC1,130,'對');
DRAWTEXT(絕對的主升 AND CC>CC1,120,'主');
DRAWTEXT(絕對的主升 AND CC>CC1,110,'升');
臥龍區:15,COLORGREEN;
蓄勢區:20,COLORGREEN;
臥龍出山:40,COLORRED;
A1S:=SUM(VOL,43)/CAPITAL;
AS:=LLV(DMA(CLOSE,VOL/CAPITAL),120);
龍抬頭:200*(CLOSE-AS)/AS,COLORRED,LINETHICK2;
DRAWICON(臥龍出山>40 AND REF(臥龍出山,1)<40 AND CC>CC1,40,13);
ST:=EXIST((C/REF(C,1)-1)*100>5.6,60);
停牌:=DYNAINFO(4)>0;
高價:=DYNAINFO(7)<40;
大盤股:=CAPITAL/1000000<=50;
基礎選股:=ST AND 停牌 AND 高價 AND 大盤股;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
JC1:=CROSS(DIF,DEA) AND DEA>0;
AA2:=COUNT(CROSS(DIF,DEA),20)=1;
LXJC1:=EVERY(DIF>0,5);
FL:=V>MA(V,5)*1.5;
QG:=HHV(H,10);
TPQG:=H>REF(QG,2);
HS:=VOL*100/CAPITAL<10;
YYLM:=JC1 AND FL AND TPQG AND LXJC1 AND HS;
ZSXG:基礎選股 AND YYLM;
DRAWTEXT(ZSXG AND CC>CC1,80,'捕');
DRAWTEXT(ZSXG AND CC>CC1,70,'捉');
DRAWTEXT(ZSXG AND CC>CC1,60,'主');
DRAWTEXT(ZSXG AND CC>CC1,50,'升');
{蒼狼主升}
較量:EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORWHITE;
STICKLINE(較量<-10,0,較量,0,0),COLORGREEN;
STICKLINE(較量>10,0,較量,0,0),COLORYELLOW;
買點1:IF(CROSS(較量,0) AND CC>CC1,20,0),COLORYELLOW,LINETHICK3;
A4Z:=(2*C+H+L)/4;
A5Z:=LLV(L,94);
A6Z:=HHV(H,89);
快信號:=EMA((C-A5Z)/(A6-A5Z)*100,8);
慢信號:=EMA(0.667*REF(快信號,1)+0.333*快信號,10);
AAZ:=COUNT(買點1>=40,5)>0;
買點2:IF(CROSS(快信號,慢信號) AND AAZ AND CC>CC1,20,0),COLORRED,LINETHICK3;
PA1:=EVERY(C>O,3) AND C>REF(C,1) AND REF(C,1)>REF(C,2);
PA2:=V/REF(V,1)>1.85;
PA3:=REF(V,1)/REF(V,2)>1.85;
PA4:=REF(V,1)<MAX(MA(V,40),MA(V,135));
JX:=C>MA(C,5) AND C>MA(C,10) AND C>MA(C,20) AND C>MA(C,30);
XG8:=PA1 AND PA2 AND PA3 AND PA4 AND JX;
DRAWTEXT(XG8 AND CC>CC1,80,'主升先兆');
{主升浪快了}
HDY:=EMA (100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);
主升浪K:COUNT(HDY<10,2) AND CROSS(CCI(84),-100) AND HHV(H,14)/LLV(L,6)>1.21 AND COUNT(C/REF(C,1)<0.95,6),COLORRED;
多空:EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORWHITE;
0,COLORRED;
STICKLINE(多空<-10,0,多空,0,0),COLORGREEN;
STICKLINE(多空>10,0,多空,0,0),COLORYELLOW;
RSVK:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
KK:=SMA(RSVK,3,1);
DK:=SMA(KK,3,1);
JK:=((3 * KK) - (2 * DK));
VARA1:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARA2:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARA3:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARA4:=(((VARA1 + (2 * VARA2)) + (3 * VARA3)) / 6);
VARA5:MA(VARA4,3);
STICKLINE((CROSS(JK,0) AND (VARA5 <= (0 - 7))),0,15,2,0),COLOR7AB500;
DRAWTEXT((CROSS(JK,0) AND (VARA5 <= (0 - 7))),15,'←抄底'),COLOR0000FF;
抄底:CROSS(JK,0) AND (VARA5 <= (0 - 7));
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
頂部:=CROSS(80,RSI)*35;
逃頂:=頂部;
頂K:IF(逃頂>REF(逃頂,1),35,0),COLOR7AB500;
DRAWICON(頂K=35,130,39);
DRAWTEXT(頂K=35,130,'←逃頂'),COLORFF0000;
主升K:=COUNT(HDY<10,2) AND CROSS(CCI(84),-100) AND HHV(H,14)/LLV(L,6)>1.21 AND COUNT(C/REF(C,1)<0.95,6),COLORRED;
STICKLINE(主升K,0,35,3,0),COLORRED;
DRAWTEXT(主升K,28,'★主升浪')COLORRED;