跟着庄家吸筹，识别庄家拉升启动点。调试之中，慎用！ // MaxDays:最大天数;
// INCR:增仓天数比;
M:=55;
N:=34;
ZERO:0,nodraw;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
//DRAWTEXT(CROSS(85,RSI),75,'▼'),colorgreen;
VAR1:=IF(YEAR>=2038 AND MONTH>=1,0,1);
VAR2:=REF(LOW,1)*VAR1;
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1;
VAR5:=LLV(LOW,30)*VAR1;
VAR6:=HHV(VAR4,30)*VAR1;
VAR7:=IF(MA(CLOSE,58),1,0)*VAR1;
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1;
吸筹:IF(VAR8>100,100,VAR8)*VAR1,colorred;
庄家吸筹:STICKLINE(吸筹>-150,0,吸筹,8,0),colorred;
散户: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M)),colorgreen,LINETHICK1;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
庄家:EMA(J,6),coloryellow,LINETHICK2;
主力持仓=庄家;
庄增=庄家>0,nodraw;
庄减=庄家<0,nodraw;
Inc=COUNT(庄家>REF(庄家,1),PASTDAYS);
庄连增:Inc==PASTDAYS,nodraw;
Acc=COUNT(吸筹<REF(吸筹,1),PASTDAYS);
吸筹降:Acc==PASTDAYS,nodraw;
抄底:庄连增 AND 吸筹 >= LOWV AND 吸筹<=HIGHV AND 吸筹降,nodraw;
启动点:CROSS(庄家,散户),nodraw;
卖点:CROSS(散户,庄家),nodraw;
DRAWICON(卖点,散户,'sell');
DRAWTEXT(卖点,散户*1.3,'顶');
DRAWICON(启动点,REF(庄家,1),'buy');
DRAWICON(抄底,庄家*0.9,'buy');
DRAWTEXT(抄底 AND REF(抄底,1)<>1,庄家*0.6,'底');
抄底期:COUNT(抄底,PASTDAYS)>0,nodraw;
启动期:COUNT(启动点,PASTDAYS)>0,nodraw;
//--------------------主力持仓_GSW-------------------------------------------------
主力增仓:庄家>REF(庄家,1),nodraw;
主力减仓:庄家<REF(庄家,1),nodraw;
连续增仓:COUNT(主力增仓,2)==2,colorcyan,nodraw;
连续减仓:COUNT(主力减仓,2)==2,colorgreen,nodraw;
增仓天数:COUNT(主力增仓,MAXDAYS),colorcyan,nodraw;
增仓天数比:增仓天数 >= MAXDAYS*INCR,nodraw;
连续增仓天数:0,nodraw;
连续减仓天数:0,nodraw;
flag=1;
Inc = 1;
IF 主力增仓 THEN
{
连续增仓天数=0;;
WHILE(Inc < MAXDAYS)
{
flag = COUNT(主力增仓,Inc)>=Inc;
IF flag THEN
{
连续增仓天数:连续增仓天数+1,nodraw;
Inc=Inc+1;
}
ELSE BREAK;
}
}
IF 主力减仓 THEN
{
连续减仓天数=0;;
WHILE(Inc < MAXDAYS)
{
flag = COUNT(主力减仓,Inc)>=Inc;
IF flag THEN
{
连续减仓天数:连续减仓天数+1,nodraw;
Inc=Inc+1;
}
ELSE BREAK;
}
}
连续增仓前溯:REF(连续增仓天数,1),nodraw;
// COUNT(主力增仓,PASTDAYS),colorcyan,nodraw;
//连续减仓天数=COUNT(主力减仓,PASTDAYS),colorgreen,nodraw;
主力增仓放量:=主力增仓 AND ( VOL/REF(VOL,1) > VOLINCR),nodraw;
主力增仓价升:=主力增仓 AND C > (1+PRICEINCRA)*REF(CLOSE,1),nodraw;
主力减仓放量:=主力减仓 AND( VOL/REF(VOL,1) > VOLINCR),nodraw;
主力减仓价跌:=主力减仓 AND C <(1-PRICEINCRA)*REF(CLOSE,1),nodraw;
强升:(主力增仓>0 AND 连续增仓>0 AND CLOSE > (1+PRICEINCRA)*REF(CLOSE,1)) OR 主力增仓放量 OR 主力增仓价升,nodraw;
暴跌:(主力减仓>0 AND 连续减仓>0 AND CLOSE < (1-PRICEINCRA)*REF(CLOSE,1)) OR 主力减仓放量 OR 主力减仓价跌 ,nodraw;
首增=主力增仓>0 AND REF(主力减仓,1)>0;
首减=主力减仓>0 AND REF(主力增仓,1)>0;
DRAWICON(首增,主力持仓,'buy'); //
DRAWICON(首减,主力持仓,'SELL');
DRAWICON((连续增仓>0 AND 主力增仓>0) ,主力持仓,'buy');
DRAWICON((连续减仓>0 AND 主力减仓>0),主力持仓,'SELL');
DRAWICON(强升>0 AND 主力增仓>0,主力持仓,'buy');
短期启动:首增>0 AND COUNT(REF(主力减仓,1),KEEPDAYS)==KEEPDAYS,nodraw;
DRAWTEXT(短期启动,主力持仓*POSCOEF*0.9,'启'),coloryellow;
DRAWICON( (暴跌>0 AND 主力减仓>0),主力持仓,'SELL');
DRAWTEXT((主力增仓>0 AND 强升 AND(REF(强升,1)<1)) AND 短期启动<1,主力持仓*POSCOEF,'强'),colorcyan;
k=1;
WHILE(k<=连续增仓天数)
{
DRAWICON(k,主力持仓-(k/100),'buy');
k=K+1;
}
//DRAWTEXT(强升 AND 主力增仓 AND REF(强升,1)<1 AND 短期启动<1,主力持仓*POSCOEF,'强'),colorred;
DRAWTEXT( (暴跌>0 AND 主力减仓>0 AND (REF(暴跌,1)<1) ), 主力持仓*POSCOEF,'弱'),colorwhite ;
//DRAWTEXT(暴跌 AND 主力减仓 AND REF(暴跌,1)<1,主力持仓*POSCOEF,'弱'),colorFF33FF;
|
