A0:=HHV(H,13)-LLV(L,13); {13日最高價與最低價之差}
A1:=HHV(H,13)-C;{13日最高價與收盤價之差}
A2:=C-LLV(L,13);{收盤價與最低價之差}
A3:= A1/A0*100-70;{思路之高價差在整個差值中比例減掉70，即獲取三成權(quán)重}
A4:=(C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100;
      {收盤價與60最低點距離，與60最高價最低價距離之比}
A5:=(2*C+H+L)/4;{今日均價收盤雙倍權(quán)重}
A6:=SMA(A2/A0*100,3,1); {低價比例平滑處理}
A7:=LLV(L,34);{34日最低價}
A8:=SMA(A6,3,1)-SMA(A3,9,1);{再取移動平均，
高出收盤部分與低于收盤部分的差距，兩個不一致的權(quán)重？必要性？}
A9:=IF(A8>100,A8-100,0); {差距大于100的話，那么就要減掉100，}
AA:=HHV(H,34); {34日高價}
AB:=A9*2; {差距的兩倍，是兩條移動均線的距離}
AC:=EMA((A5-A7) / (AA-A7)*100,13);{34日高低價之間的比例關(guān)系平均移動曲線}
AD:= EMA(0.667*REF(AC,1)+0.333*AC,2);
AE:=SMA(A4,20,1); AF:=SMA(AB,2,1)-AB;
B0:=EMA(0.667*REF(AC,1)+0.333*AC,2)-AC; 織夢好，好織夢
B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70;
B2:=SMA(B1,9,1)+100; B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2; B7:=IF(B6>60,B6-60,0);
STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),5,0),COLORRED;
STICKLINE(REF(B7,1)>B7,B7,REF(B7,1),5,0),COLORFFFF00;
主力:EMA((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2),LINETHICK2,COLORRED;
散戶:EMA((CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7),LINETHICK2,COLORWHITE;
DRAWTEXT(CROSS(主力,散戶) AND 主力<-10,-20,'升'),COLORYELLOW;
DRAWICON(CROSS(主力,散戶) AND 主力<-10 AND 散戶>REF(散戶,1)OR CROSS(主力,散戶) AND 散戶<-35 ,-15,1);
加速探底:IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,40,0.85),COLORYELLOW;
機(jī)會來臨1:REF(IF(REF(C,1)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,40,0),1),COLOR9999FF;
A11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑馬線:=EMA(A11,5); A21:=(黑馬線-REF(黑馬線,1))/REF(黑馬線,1)*100; A31:=EMA(C,5); 本文來自織夢
A41:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趨勢線:=(MA(3*SMA(A41,6,1)-2*SMA(SMA(A41,5,1),5,1),2));
A51:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100;
DRAWTEXT(FILTER(REF(黑馬線,1)>90  AND A21<0,7),黑馬線,'跑'),COLOR00FF00;
DRAWTEXT(CROSS(A11,黑馬線)AND 黑馬線<A51,黑馬線,'黑馬'),COLORYELLOW; DRAWTEXT(CROSS(黑馬線,A51)
AND 趨勢線<80,黑馬線,'追漲'),COLOR688EC1;
DRAWTEXT(CROSS(趨勢線,0)AND 黑馬線<40,5,'大黑馬 '),COLORFFFF00;
底部:=(A21<-10 AND A21>REF(A21,1))*25; DRAWICON(底部 AND A31>REF(A31,1),25,1);
機(jī)會來臨2:REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,65,0),1),COLORF00FF0;