通達信黑馬換手指標公式
2020/12/27 18:42:04
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
VOLPERCENT:=VOL*10000/FINANCE(7);
VVOL:IF(CURRBARSCOUNT=1,VOLPERCENT*TOTAL/CTIME,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0 || SETCODE=1),VVOL,0,-1,-1),COLOR00C0C0;
VOL_TR:VOLPERCENT,COLORLIGREEN,VOLSTICK;
MAVOL5:MA(VOL_TR,5);
MAVOL35:MA(VOL_TR,35)LINETHICK3;
MAVOL60:MA(VOL_TR,60);
MAVOL135:MA(VOL_TR,135),LINETHICK2;
BL:=VOLPERCENT=HHV(VOLPERCENT,20);
STICKLINE(BL AND C>O,VOL_TR,0,1.5,0),COLORYELLOW;{符合選股條件在K線上用黃色顯示}
STICKLINE(BL AND C<O,VOL_TR,0,1.5,0),COLOR00FF00;{符合選股條件在K線上用綠色顯示}
DL5:=VOLPERCENT=LLV(VOLPERCENT,5) AND C<O;
STICKLINE(DL5,0,VOL_TR,1.5,0),COLOR00FF00;
百日低量:=VOLPERCENT<=LLV(VOLPERCENT,100);
DRAWTEXT(百日低量,VOLPERCENT,'百'),COLORGREEN;
即時虛擬量:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOLPERCENT/FROMOPEN*240,DRAWNULL);
虛擬量:=IF(CURRBARSCOUNT>1,VOLPERCENT,即時虛擬量);
即時量比:=虛擬量/REF(MA(虛擬量,5),1);
YD:=IF(C>O AND VOLPERCENT>REF(VOLPERCENT,1)*1.10,1,IF(C<O AND VOLPERCENT<REF(VOLPERCENT,1)*0.90,1,IF(VOLPERCENT>REF(VOLPERCENT,1)*0.90 AND VOLPERCENT<REF(VOLPERCENT,1)*1.1,0,-1)));
量價異動:SUM(YD,10) * IF(HHV(即時量比,10)>1.5,1,0),NODRAW;
紅勝:=C>O AND C>REF(C,1);
三日不破頂:=MIN(LLV(C,2),C)>=REF(C,3) AND REF(C,3)>REF(O,3) AND REF(C,3)>REF(C,4);
三日不破底:=MIN(LLV(C,2),C)>=REF(O,3) AND REF(C,3)>REF(O,3) AND REF(C,3)>REF(C,4);
三日量縮:=MAX(HHV(V,2),V)<REF(V,3);
三日價漲:=MIN(LLV(C,2),C)>=REF(C,3);
三日價不破:=MIN(LLV(C,2),C)>=REF(O,3);
縮倍柱:=VOLPERCENT*1.95<=REF(VOLPERCENT,1);
倍量柱:=VOLPERCENT>=REF(VOLPERCENT,1)*1.95 AND 紅勝;
四日倍量柱:=REF(VOLPERCENT,3)>1.95*REF(VOLPERCENT,4);
黃金柱:=四日倍量柱 AND 三日不破頂 AND 三日量縮 AND 三日價漲;
BACKSET101:=BACKSET(黃金柱,4);
FILTER101:=FILTER(BACKSET101,3);
ISNOTGOLDLINE:=IF(FILTER101,0,1);
將軍柱:=四日倍量柱 AND 三日不破底 AND 三日量縮 AND 三日價不破;
BACKSET102:=BACKSET(將軍柱,4);
FILTER102:=FILTER(BACKSET102,3) AND ISNOTGOLDLINE;
T:=VOLPERCENT>0;
VO:=VOLPERCENT=LLV(VOLPERCENT,100) AND T;
地量柱:VOLPERCENT * VO,COLORBLUE;
DRAWTEXT(地量柱,VOLPERCENT,'地'),COLORBLUE;
BLZ:=VOLPERCENT>REF(VOLPERCENT,1)*1.9;
BLZ1:=VOLPERCENT<REF(LLV(VOLPERCENT,13),1);
BLZ2:=VOLPERCENT<REF(LLV(VOLPERCENT,55),1);
倍量:VOLPERCENT*倍量柱,COLORYELLOW;
HJZ:=(3*C+H+L+O)/6;
HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;
HJZ3:=VOLPERCENT=HHV(VOLPERCENT,10) AND VOLPERCENT>2*REF(VOLPERCENT,1) AND CLOSE>HJZ2 AND C>O;
黃金:FILTER(HJZ3,5)*VOLPERCENT,STICK,COLORRED,LINETHICK4;
DRAWTEXT(FILTER101,VOLPERCENT,'黃'),COLORRED;
DRAWTEXT(FILTER102,VOLPERCENT,'將'),COLORMAGENTA;
DRAWICON(CROSS(MA(V,5),MA(V,60)),0,23);
FLZ:=VOLPERCENT>REF(VOLPERCENT,1)*0.98 AND VOLPERCENT<REF(VOLPERCENT,1)*1.02,LINETHICK0;
DRAWTEXT(FLZ,VOLPERCENT,'平'),COLORMAGENTA;
{對手盤:(PERIOD=5)*(COUNT(C>REF(C,1) AND OPEN<CLOSE AND VOLPERCENT>REF(VOLPERCENT,1),10)-COUNT(C<REF(C,1) AND VOLPERCENT>REF(VOLPERCENT,1),10)),NODRAW}
十日換手:SUM(VOLPERCENT,10),NODRAW;
看 股吧公式 www. kanguba.com
其它股票公式列表
