黃金礦

VAR1:=REF(LOW,1);
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),13,1)*4;
VAR3:=EMA(VAR2,13);
VAR4:=LLV(LOW,34);
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
主力進場:STICKLINE(VAR5>REF(VAR5,1),0,50,3,0 ),COLORF00FF0;
ZL:=VAR5>REF(VAR5,1) AND FILTER(VAR5>REF(VAR5,1),15);
DRAWTEXT (ZL,45,'■■■■'),COLOR000000;
DRAWTEXT (ZL,55,'主力建倉'),COLORRED;
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);
V4:=2*(V2-V3)*5.5;
主力撤:=IF(V4<=0,V4,0),COLORGREEN;
主力進:=IF(V4>=0,V4,0); V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8; V6:=EMA(3*V5-2*SMA
(V5,18,1),5); V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10; V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34); VA:=EMA(V9,3); VB:=(V9-VA)/2;
資金進: IF(VB>=0,VB,0),COLORYELLOW;
資金撤: IF(VB<=0,VB,0),COLOR00FF00;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趨勢線: EMA(V11,3); V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100;
準備現金: STICKLINE(趨勢線<=13,0,20,3,0),COLORCC9900;
{AA:=(趨勢線<=13) AND FILTER((趨勢線<=13),15);
DRAWTEXT (AA,30,'準備現金'),COLORCC9900;}
買入股票: STICKLINE(趨勢線<=13 AND V12>13,0,50,3,0),COLORYELLOW;
買入指標:IF (趨勢線<=13 AND V12>13,1,0);
BB:= (趨勢線<=13 AND V12>13) AND FILTER((趨勢線<=13 AND V12>13),10) ;
DRAWTEXT (BB,70,'買入▲股票'),COLOR0099FF;
見頂清倉: STICKLINE(趨勢線>=90 AND V12,0,50,5,0),COLORGRAY;
CC:=(趨勢線>=90 AND V12) AND FILTER((趨勢線>=90 AND V12),10); DRAWTEXT (CC,60,'見頂清倉'),COLORYELLOW;
主力進場1:STICKLINE(VAR5>REF(VAR5,1),0,30,3,0 ),COLORF00FF0;
準備現金1: STICKLINE(趨勢線<=13,0,10,3,0),COLORCC9900;

AA:=(趨勢線<=13) AND FILTER((趨勢線<=13),15);
DRAWTEXT (AA,35,'準備現金'),COLORCC9900;
{買點出現}
{HLM1:=MA(HHV(H,485),17);
HLM2:=MA(HHV(H,222),17);
HLM3:=MA(HHV(H,96),17);
HLM4:=MA(LLV(L,485),17);
HLM5:=MA(LLV(L,222),17);
HLM6:=MA(LLV(L,96),17);
HLM7:=MA((HLM1*0.558+HLM2*0.558+HLM3*0.558+HLM4*0.96+HLM5*0.96+HLM6*0.96)/6,17);
HLM8:=MA((HLM1*0.55+HLM2*0.55+HLM3*0.65+HLM4*1.25+HLM5*1.23+HLM6*1.2)/6,17);
HLM9:=MA((HLM1*0.68+HLM2*0.68+HLM3*0.68+HLM4*1.3+HLM5*1.3+HLM6*1.3)/6,17);
HLM10:=MA((HLM7*3+HLM8*2+HLM9)/6*1.738,17);
HLM11:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;
HLM12:=MA(IF(C*1.35<=HLM10,HLM11*10,HLM11/10),3);
HLMH:=HHV(HLM12,30);
關注:=MA(IF(L<=LLV(L,13),(HLMH+HLM11*2)/2,0),3)/200,COLORFFFFFF;
DRAWTEXT(CROSS(關注,1.2),關注*0.5-6,'▲'),COLORFF00FF;
DRAWTEXT(CROSS(關注,4.5),-20,'買點'),COLOR00FFFF;
DRAWICON(CROSS(關注,7.0),關注*0.5-20,14);}

KVAR1:=EMA(EMA(CLOSE,9),9);
控盤:=(KVAR1-REF(KVAR1,1))/REF(KVAR1,1)*1000;
STICKLINE(控盤<0,控盤*2,0,3,0),COLORGRAY;
A10:=CROSS(控盤,0);
無莊控盤:=IF(控盤<0,控盤,0),COLORWHITE,POINTDOT;
開始控盤:IF(A10,15,0),LINETHICK2,COLORYELLOW;
{DRAWTEXT(開始控盤,0,'買點出現'),COLORYELLOW ;}
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤*4,0,3,0),COLORRED;
有莊控盤:=IF(控盤>REF(控盤,1) AND 控盤>0,控盤,0),COLORRED;
KVAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(KVAR2>50 AND COST(85)<CLOSE AND 控盤>0,控盤*4,0,3,0),COLORFF00FF;
高度控盤:=IF(KVAR2>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0),COLORFF00FF;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤*4,0,3,0),COLOR00FF00;
主力出貨:=IF(控盤<REF(控盤,1) AND 控盤>0,控盤,0),COLOR00FF00;
{DRAWTEXT(開始控盤,-5,'買點出現'),COLORYELLOW ;}
XX:=開始控盤 AND FILTER(CROSS(控盤,0),15);
{DRAWTEXT(XX,-12,'抬轎'),COLORYELLOW;
DRAWTEXT(開始控盤,-0,'▲'),COLORFF00FF; }

WVAR1:=MA(WINNER(CLOSE),9)*100;
買！:=CROSS(WVAR1,2)*30,COLOR0000FF ,LINETHICK3 ;
WVAR2:=(1-EMA((HHV(HIGH,15)-CLOSE)/(HHV(HIGH,15)-LLV(LOW,15)),15))*100;
WVAR3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
WVAR4:=SMA(WVAR3,9,1);
WVAR5:=SMA(WVAR4,9,1);
WVAR6:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100);
WVAR7:=REF(WVAR6,1)>13 AND REF(WVAR6,1)/WVAR6>1.23 AND CLOSE/REF(CLOSE,1)>1.03;
春筍:=IF(WVAR7 AND REF(CLOSE,1)<=COST(5),20,0),LINESTICK ,COLOR00FF00,LINETHICK2;
WVAR8:=MA(CLOSE,27);
WVAR9:=(CLOSE-WVAR8)/WVAR8*100;
WVARA:=MA(WVAR9,2);
WVARB:=BARSLAST(CROSS(-10,WVARA)=1);
WVARC:=BARSLAST(CROSS(WVARA,10)=1);
WVARD:=WVARA<-10 AND WVARB>3;
WVARE:=WVARA>10 AND WVARC>3;
黃金礦:IF(WVARD,WVARA*1.5,0),LINETHICK3,LINESTICK,COLOR0055FF;
金礦:=IF(WVARD,WVARA,0) AND FILTER(WVARD,15);
DRAWTEXT(金礦,-30,'黃金寶礦'),COLOR0055FF;
財神到:=IF(WVARE,WVARA,0),LINESTICK , COLORGREEN;
想我樂:=IF(WVARA>REF(WVARA,1) AND WVARD AND WVARA<-15,30,0),LINETHICK1,LINESTICK,COLORFFA2AF;
{DRAWICON(想我樂>0,40,1);}
WVARF:=REF(LOW,1)*0.9;
WVAR10:=LOW*0.9;
WVAR11:=(WVAR10*VOL+WVARF*(CAPITAL-VOL))/CAPITAL;
WVAR12:=EMA(WVAR11,30);
WVAR13:=CLOSE-REF(CLOSE,1);
WVAR14:=MAX(WVAR13,0);
WVAR15:=ABS(WVAR13);
WVAR16:=SMA(WVAR14,7,1)/SMA(WVAR15,7,1)*100;
WVAR17:=SMA(WVAR14,13,1)/SMA(WVAR15,13,1)*100;
WVAR18:=BARSCOUNT(CLOSE);
WVAR19:=SMA(MAX(WVAR13,0),6,1)/SMA(ABS(WVAR13),6,1)*100;
WVAR1A:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
WVAR1B:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
WVAR1C:=SMA((SMA(WVAR1B,4,1)-50)*2,3,1);
WVAR1D:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
WVAR1E:=SMA(WVAR1D,4,1);
WVAR1F:=SMA(WVAR1E,3,1);
WVAR20:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
WVAR21:=WVAR19<=25 AND WVAR1A<-95 AND WVAR20>20 AND WVAR1C<-30 AND WVAR1F<30 AND WVAR12-CLOSE>=-0.25 AND
WVAR16<22 AND WVAR17<28 AND WVAR18>50;
{血戰超跌:IF(WVAR21,WVAR21,WVAR21); }
血戰超跌:IF(WVAR21,1,0);
超跌:STICKLINE(WVAR21,0,60,5,0),COLORYELLOW;
血戰超跌1:=FILTER(血戰超跌,15);
DRAWTEXT(血戰超跌1,90,'血戰超跌'),COLORYELLOW;

JC_VAR1:=HHV(HIGH,3);
JC_VAR2:=(IF(WINNER(1.1*CLOSE)<0,0,WINNER(1.1*CLOSE))-IF(WINNER(0.9*CLOSE)<0,0,WINNER(0.9*CLOSE)))*100;
JC_VAR3:=IF(JC_VAR1<0,0,JC_VAR1);
JC_VAR4:=IF(JC_VAR2<0,0,JC_VAR2);
主力動向:=PWINNER(10,JC_VAR3),COLORFF00FF;
主力震倉:=PWINNER(10,JC_VAR4),COLORWHITE;
JC_VAR5:=COST(10);
JC_VAR6:=(CLOSE-JC_VAR5)/JC_VAR5*100;
JC_VAR7:=COUNT(JC_VAR6<-2.05,3);
主力基地: IF(JC_VAR7>=3,20,0),COLORRED,LINETHICK3;
{風險區域: 1,COLORRED,POINTDOT;}
0.9,COLOR0099FF,POINTDOT;
JC_VAR8:=(CLOSE-MA(CLOSE,10))/STD(CLOSE,35)*0.3;
強弱動向:=EMA(JC_VAR8,18),COLOR00FF00;
JC_VAR9:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
JC_VAR10:=SMA(JC_VAR9,3,1);
JC_VAR11:=SMA(JC_VAR10,3,1),COLOR0000FF;
JC_VAR12:=SMA(JC_VAR11,3,1),COLOR00FFFF;
金叉:IF(CROSS(JC_VAR11,JC_VAR12) AND (JC_VAR11<40),0.7,0),COLOR0055FF,LINETHICK1;
STICKLINE(金叉,0,50,4,1),COLORRED;
{STICKLINE(金叉,0.45,0.6,2,0),COLORBLUE;}
加碼:DRAWTEXT(金叉,0,'▲'),LINETHICK2,COLORRED;
DRAWTEXT(金叉,-12,'金叉'),LINETHICK2,COLORYELLOW;

上升線:=EMA(C,3),COLORRED,LINETHICK1;
下降線:=EMA(C,5),COLOR00FF00,LINETHICK1;
中間線:=EMA(下降線,5),COLORWHITE,LINETHICK1;
MMVAR1:=(HIGH+LOW+OPEN+2*CLOSE)/5;
MMVAR2:=REF(MMVAR1,1);
MMVAR3:=SMA((CLOSE-MMVAR2),6,1)/SMA(ABS(CLOSE-MMVAR2),6,1)*100;
MMVAR4:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
MMVAR5:=EMA(0.667*REF(MMVAR4,1)+0.333*MMVAR4,5);
MMVAR6:=IF(VOL>=1.3*MA(VOL,5) AND COUNT(MMVAR4>=MMVAR5 AND MMVAR4<-17,3) AND REF(LOW,1)=LLV(LOW,120),1,0);
MMVAR7:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
MMVAR8:=SMA(MAX(MMVAR1-MMVAR2,0),10,1)/SMA(ABS(MMVAR1-MMVAR2),10,1)*100;
MMVAR9:=IF(COUNT(MMVAR8<20,5)>=1 AND COUNT(MMVAR1=LLV(MMVAR1,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0);
DRAWICON(FILTER(REF(MMVAR3,1)>81 AND MMVAR3<80 OR CROSS(82,MMVAR7),5),50,2);
DRAWICON(FILTER(CROSS(上升線,下降線)AND 中間線>=REF(中間線,1)AND MMVAR3<50,5),50,1);
買賣極品買點:IF(CROSS(上升線,下降線)AND 中間線>=REF(中間線,1)AND MMVAR3<50,1,0);

DTLDVAR3:=MA(CLOSE,13);
DTLDVAR4:=100-ABS(((CLOSE-DTLDVAR3)/(DTLDVAR3))*(100));
DTLDVAR5:=LLV(LOW,75);
DTLDVAR6:=HHV(HIGH,75);
DTLDVAR7:=(DTLDVAR6-DTLDVAR5)/(100);
DTLDVAR8:=SMA((CLOSE-DTLDVAR5)/(DTLDVAR7),20,1);
DTLDVAR9:=SMA((OPEN-DTLDVAR5)/(DTLDVAR7),20,1);
DTLDVARA:=(3)*(DTLDVAR8)-(2)*(SMA(DTLDVAR8,15,1));
DTLDVARB:=(3)*(DTLDVAR9)-(2)*(SMA(DTLDVAR9,15,1));
DTLDVARC:=100-DTLDVARB;
DTLDVARD:=(REF(LOW,1))*(0.89999997);
DTLDVARE:=(LOW)*(0.89999997);
DTLDVARF:=((DTLDVARE)*(VOL)+(DTLDVARD)*(CAPITAL-VOL))/(CAPITAL);
DTLDVAR10:=EMA(DTLDVARF,30);
DTLDVAR11:=CLOSE-REF(CLOSE,1);
DTLDVAR12:=MAX(DTLDVAR11,0);
DTLDVAR13:=ABS(DTLDVAR11);
DTLDVAR14:=((SMA(DTLDVAR12,7,1))/(SMA(DTLDVAR13,7,1)))*(100);
DTLDVAR15:=((SMA(DTLDVAR12,13,1))/(SMA(DTLDVAR13,13,1)))*(100);
DTLDVAR16:=BARSCOUNT(CLOSE);
DTLDVAR17:=((SMA(MAX(DTLDVAR11,0),6,1))/(SMA(ABS(DTLDVAR11),6,1)))*(100);
DTLDVAR18:=(((-200))*(HHV(HIGH,60)-CLOSE))/(HHV(HIGH,60)-LLV(LOW,60))+100;
DTLDVAR19:=((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*(100);
DTLDVAR1A:=SMA((SMA(DTLDVAR19,4,1)-50)*(2),3,1);
DTLDVAR1B:=((INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14)))*(100);
DTLDVAR1C:=SMA(DTLDVAR1B,4,1);
DTLDVAR1D:=SMA(DTLDVAR1C,3,1);
DTLDVAR1E:=((HHV(HIGH,30)-CLOSE)/(CLOSE))*(100);
DTLDVAR1F:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
DTLDVAR20:=REVERSE(DTLDVAR1F);
DTLDVAR21:=SMA(DTLDVAR1F,3,1);
趨勢:=SMA(DTLDVAR21,3,1),COLOR0000FF,LINETHICK2;
人氣:=SMA(趨勢,3,1),COLORYELLOW,LINETHICK2;
DTA1:=CROSS(趨勢,人氣);
DTAA:=DTA1 AND 趨勢 >30 AND 趨勢<75 AND DYNAINFO(37)<8;
出擊:IF(CROSS(趨勢,人氣) AND (趨勢<30),-40,-60),COLOR0000FF,LINETHICK2;
短賣:IF(CROSS(人氣,趨勢) AND (人氣>75),85,100),COLOR00FF00,LINETHICK2;
DRAWTEXT(短賣=85,85,'賣'),COLORFF00FF;
STICKLINE(DTAA,40,65,3,0);

X:=C-REF(MA(C,20),11);
LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
WR1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100*X;
WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100*X; BIAS1:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)
*100+10)*5;
BIAS2:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5; BIAS3:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6*X;
S2:=EMA(S1,3); S3:=ABS(BIAS1-BIAS3); SX:=(S1+S3)/2;
XC1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50; CCC:=XC1+SX; ZJZ:=IF( LGL>0 AND CCC<0,200,0)*X; LXL:=IF(SX<0 AND
C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,-50,0);
JBJ:=IF(CCC<0 AND LXL=-50,100,0)*X; MA3:= MA(C,3); C0:=REF(C,2)*0.865; C1:=REF(C,13)*0.772;
BOT:=MIN(C0,C1);
HSL:=100*VOL/CAPITAL*X;
MA13:=MA(C,13)*X; CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0);
VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),10,0);
滿倉:=IF((VMC>0),60,0),COLORRED;
滿倉搜索:IF((VMC>0),1,0),COLORRED; {滿倉搜索>0}
STICKLINE(滿倉,-30,0,12,0),COLORRED;
DRAWTEXT(VMC>0,-35,'滿'),COLORRED;
DRAWTEXT(VMC>0,90,'滿▲倉'),COLORRED;
半倉:=IF(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)) OR (((ZJZ>0
AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) AND VMC<10 ,40,0),COLORYELLOW;
STICKLINE(半倉,-20,0,8,0),COLORYELLOW;
半倉1:=FILTER(半倉,5);
DRAWTEXT(半倉1,-45,'半▲倉'),COLORYELLOW;
V93:=(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) ;
V90:=((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902));
買一點:=IF((V93 OR V90),10,0);
STICKLINE(買一點,0,-10,4,0),COLORBLUE;
VAR2Q:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
神奇線:= MA((CLOSE-VAR2Q)/VAR2Q,1);
買二點:IF(CROSS(神奇線,0) AND LOW/REF(HIGH,1)<1.012 AND ((C-REF(C,2))/C)>0.06,20,0); YY:=SMA(SMA((CLOSE-LLV
(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,18,1),12,1); YT:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))
*100,12,1); ST:=IF(CROSS(YT,YY),30,0); VAR5PT:=(HIGH+LOW+CLOSE)/3;
VAR6PT:=(VAR5PT-MA(VAR5PT,14))/(0.015*AVEDEV(VAR5PT,14));
VAR7PT:=(VAR5PT-MA(VAR5PT,85))/(0.015*AVEDEV(VAR5PT,85)); SA:=IF(VAR7PT>=200 AND VAR6PT>=150,10,0); VAR3QQ:=REF
(CLOSE,1);
VAR4QQ:=SMA(MAX(CLOSE-VAR3QQ,0),6,1)/SMA(ABS(CLOSE-VAR3QQ),6,1)*100;
SM:=IF(CROSS(80,VAR4QQ),30,0);
賣點:IF((SM AND (SA OR ST)),-30,0),COLOR00FF00,LINETHICK2;
{STICKLINE(賣點,0,-40,6,0),COLOR00FF00;}
DRAWTEXT(賣點,-33,'危險'),COLOR00FF00;

畫底:IF(1,-60,-0),COLORGREEN,POINTDOT;