P:=5; P1:=21; {參數(shù)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);   
主力在動(dòng): 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;   
開倉區(qū): 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;