P:=5; P1:=21; {參數N 2 90 9 M 2 30 3} §82§
VAR1:=4*SMA((CLOSE-LLV(LOW,P))/(HHV(HIGH,P)-LLV(LOW,P))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,P))/(HHV(HIGH,P)-LLV(LOW,P))*100,5,1),3.2,1),COLORYELLOW,LINETHICK1;
VAR2:=8,COLORGREEN,LINETHICK0;
低吸: IF(CROSS(VAR1,VAR2),8,0),STICK,COLORRED;
DRAWICON(低吸>0,8,4);
主力在動: IF(VAR1<=8,15,0),STICK,COLORCYAN,LINETHICK2;
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
開倉區: IF((VARO7<10),100,118) ,COLOR00CCFF,LINETHICK1;
CD1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(L,9))-0.7;
CD2:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9));
CD3:=SMA(SMA(CD2,3,1),3,1);
CD4:=(CD3-SMA(CD1,9,1))-0.5;
CD5:=IF(CD4>0.00,CD4,0.00);
CD6:=REF(CD5,1);
VAR81:=MA(C,9),COLORRED;
空頭1:=IF(CD6-CD5,CD6,CD5),LINETHICK3,COLORGREEN;
減倉空倉:CROSS(CD6,CD5),COLORGREEN,;
DRAWICON(減倉空倉>0,113,9);
綠賣:STICKLINE(CROSS(CD6,CD5),125,120,3,0),COLORLIGREEN;
VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2A:=SMA(VAR1A,9,1)+100;
VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4A:=SMA(VAR3A,3,1);
VAR5A:=SMA(VAR4A,3,1)+100;
VAR6A:=VAR5A-VAR2A;
持旭:=IF(VAR6A>P1,VAR6A-P1,0),COLORLIRED;
持旭出擊:IF(CROSS(持旭,0.01),18,0),STICK,COLOR0000CC,LINETHICK2;
DRAWICON(持旭出擊>0,18,11);
紅買:STICKLINE(CROSS(持旭,0.01),-10,-5,3,0),COLORLIMAGENTA;
XG:=CROSS(持旭,0.01);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
E:=CROSS(83,RSI);
STICKLINE(REF(持旭,1)<持旭,持旭,REF(持旭,1),3,0),COLORRED;
STICKLINE(REF(持旭,1)>持旭,持旭,REF(持旭,1),3,0),COLOR00FF00;
LOWV:=LLV(LOW,N);
HIGHV:=HHV(HIGH,N);
RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,M);
K:EMA(RSV,M);
D:MA(K,M);
DRAWTEXT(K<50 AND D<30 AND CROSS(K,D),D*0.8,'低位金叉看BS線'),LINETHICK2, COLORYELLOW;
DRAWTEXT(K>50 AND D>70 AND CROSS(D,K),D*1.15,'高位死叉破BS線賣'),LINETHICK2, COLORGREEN;
DRAWICON(CROSS(K,D),D*0.9,7);
DRAWICON(CROSS(D,K),D*1.1,8);
0,COLORRED;
20,COLORLIRED;
50,COLORWHITE;
80,COLORYELLOW;
100,COLORCYAN;
70,COLORLIBLUE,POINTDOT;
30,COLORLIMAGENTA,POINTDOT;
DRAWTEXT(ISLASTBAR,0,'0'),COLORRED;
DRAWTEXT(ISLASTBAR,20,'20'),COLORLIRED;
DRAWTEXT(ISLASTBAR,50,'50'),COLORWHITE;
