看了瑞趣的《降補(bǔ)必死》，試圖將其“搞活”，故合成了一個(gè)公式，供參考。

{據(jù)《降補(bǔ)必死》和《成本和諧》合編，當(dāng)“小心”和“烏云”出現(xiàn)并呈壓頂態(tài)勢(shì)時(shí)，保守的策略是空倉(cāng)，到了末期伺機(jī)建倉(cāng)。謝謝原作者提供的源碼。}
DRAWTEXT(sysparam(2)=BARPOS,c,'總股本='+NUMTOSTR(FINANCE(1) ,0 )+'萬(wàn)股'+' 流通A股='+ NUMTOSTR(FINANCE(7),0)+'萬(wàn)股'+' 凈資產(chǎn)='+NUMTOSTR(FINANCE(34),2 ) +' 收益='+ NUMTOSTR(FINANCE(33),2)+' 公積金='+
NUMTOSTR(FINANCE(18),2)+'  市盈率='+NUMTOSTR(DYNAINFO(39),2)+' 振幅='+ NUMTOSTR((h/l-1)*100,2)+'%'+' 換手率='+NUMTOSTR(100*VOL/CAPITAL,2)+'%'),COLORccffcc,ALIGN4;

ma5:ma(c,5),ColorFFFFFF;
ma10:ma(c,10),color00cc99;
ma30:ma(c,30),ColorBCFF8B;
ma60:ma(c,60),Color00ccff;
Var1:=REF(CLOSE,1);
Var2:=SMA(MAX(CLOSE-Var1,0),4.1,1)/SMA(ABS(CLOSE-Var1),4.1,1)*100;
DRAWTEXT(CROSS(Var2,5)AND Var2<30 ,l*0.99,'買(mǎi)'),COLORRED,ALIGN1;
DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5)AND Var2<30 AND C>O,LOW,'☆'), COLORMAGENTA;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
Var3:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
Var4:=SMA(VARF,3,1);
Var5:=(REF(Var3,1)>=5) AND CROSS(VARJ,VARE) AND (Var4>79);
DRAWTEXT(FILTER((REF(Var3,1)>=5) AND CROSS(VARJ,VARE) AND (Var4>Var5),5),h*1.02,'☆'),colorgreen;
Var6:=ema(hhv(h,1),8),colorMAGENTA;
Var7:=EMA(CLOSE,8);
Var8:=EMA(Var7,30);
Var9:=(h+l+3*c)/5;
Var10:=EMA(Var9,5);Var11:=EMA(Var9,13);
Var12:=EMA(Var9,21);Var13:=EMA(Var9,34);
Var13:=(Var10+Var11+Var12+Var13)/4;
成本和諧:MA(Var13,5),colorred,linethick2;
持股:stickline(成本和諧>ref(成本和諧,1) , 成本和諧*0.998,成本和諧*1.002,8,0),colorred,linethick2;
Var14:=Var7<ref(Var7,1) and c<Var7;
小心:stickline(Var6<ref(Var6,1) or Var14, Var6*0.998,Var6*1.004,8,0),colorblue,linethick3;
烏云:stickline(成本和諧<ref(成本和諧,1) , 成本和諧*0.997,成本和諧*1.003,10,0),colorgray,linethick4;
Var15:=if((c-ref(c,1))/ref(c,1)>0.025,1,0);
stickline(c>ref(o,barslast(Var15 =1)),ref(o,barslast(Var15=1)),ref(o,barslast(Var15 =1)),10,0),colorgreen;
DRAWTEXT(Var7>Var8 and CROSS(84,Var2), HIGH*1.02,'賣(mài)！'),coloryellow;股票論壇 www.