通达信新猪腾四海 优化版
新版猪腾四海。。希望大家喜欢，底层红绿颜色是kdj,买点是：当两种同时变成红柱和橙柱时发出时是买点
底部:=-10;
STICKLINE(15,100,0,5,0),COLOR8B0000;
RSV:=(CLOSE-LLV(LOW,85))/(HHV(HIGH,85)-LLV(LOW,85))*100;
K:=SMA(RSV,7,1);
D:=SMA(K,6,1);
J:=3*K-2*D;
DRAWBAND(D,RGB(0,100,10),J,RGB(60,0,0));
VAR1:=(CLOSE+HIGH+LOW+OPEN)/4;
VAR2:=SUMBARS(VOL,CAPITAL);
VAR3:=HHV(VAR1,VAR2);
VAR4:=LLV(VAR1,VAR2);
VAR5:=(2*VAR1-VAR4-REF(VAR4,1))/(VAR3-VAR4);
VAR6:=(VAR1-VAR4)/(VAR3-VAR4);
VAR7:=IF(VAR1<=VAR4,VAR5*60,VAR6*60);
VAR8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30);
VAR9:=EMA(VAR8,7);
VARA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100;
VARB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5;
波段买入: IF(VARA+VARB<7 AND CROSS(VAR8,VAR9) AND VAR9<-18 AND VAR9<VARB,60,50),COLORYELLOW , ;
DRAWICON(波段买入=60,70,1),COLORRED;
猪腾四海:100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)),COLORFFFFFF,LINETHICK1;
海面:20,LINETHICK1,COLORGREEN;
海天分界线:50,LINETHICK1,COLORYELLOW;
天际:80,LINETHICK1,COLORRED;
RSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*60;
K1:=SMA(RSV1,5,1);
D1:=SMA(K1,5,1);
J1:=3*K1-2*D1;
AA1:=EMA(J1,5);
AA2:=REF(AA1,1);
STICKLINE(AA1>AA2,AA1,AA2,2.5,0),COLOR0055AA;
STICKLINE(AA1>AA2,AA1,AA2,0.5,0),COLORWHITE;
STICKLINE(AA1<=AA2,AA1,AA2,2.53,0),COLOR00BB00;
STICKLINE(AA1<=AA2,AA1,AA2,0.1,0),COLORWHITE;
RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K2:=SMA(RSV2,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
BB1:=EMA(J2,5);
BB2:=REF(BB1,1);
STICKLINE(BB1>BB2,BB1,BB2,2.8,0),COLOR000088;
STICKLINE(BB1>BB2,BB1,BB2,1,0),COLOR0000BB;
STICKLINE(BB1<=BB2,BB1,BB2,2.8,0),COLOR353500;
STICKLINE(BB1<=BB2,BB1,BB2,1.3,0),COLOR757500;
STICKLINE(BB1<=BB2,BB1,BB2,0.1,0),COLOR858500;
LCK := REF(CLOSE,1);
RSIK:=SMA(MAX(CLOSE-LCK,0),6,1)/SMA(ABS(CLOSE-LCK),6,1)*100;
T0K:=BARSCOUNT(C)>12;
T1K:=C=LLV(C,12);
T2K:=RSIK>LLV(RSIK,12);
T3K:=RSIK<21;
TRSI:=T0K AND T1K AND T2K AND T3K AND C/HHV(C,120)<0.7;
RSI成W底:IF((REF(TRSI,1) AND C>REF(C,1)),60,0),LINETHICK2,COLORRED;
拉升力:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,33)-LLV(LOW,46))*1.8*CLOSE;
拉升力A:=SMA(拉升力,9,1);
波峰波谷:=SMA(拉升力A,4,1);
拉升力B:=3*拉升力A-2*波峰波谷;
空方:=3*波峰波谷-1* 拉升力A;
短线:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*88;
中线:=(CLOSE-MA(CLOSE,4))/MA(CLOSE,4)*88;
红柱:=SMA(短线,3,1);
蓝柱:=SMA(中线,3,1);
{红柱}
STICKLINE(红柱<REF(红柱,1)AND 红柱>0,0,红柱,2.4,0),COLOR0000AA;
STICKLINE(红柱<REF(红柱,1)AND 红柱>0,0,红柱,1,0),COLOR0000FF;
STICKLINE(红柱>REF(红柱,1)AND 红柱>0,0,红柱,2.6,0),COLOR0000AA;
STICKLINE(红柱>REF(红柱,1)AND 红柱>0,0,红柱,1,0),COLOR0000FF;
STICKLINE(蓝柱<REF(蓝柱,1) AND 蓝柱>0,0,蓝柱,2.6,0),COLOR0000FF;
STICKLINE(蓝柱<REF(蓝柱,1) AND 蓝柱>0,0,蓝柱,1.3,0),COLOR00BBFF;
{蓝柱}
STICKLINE(红柱>REF(红柱,1)AND 红柱<0,0,红柱,2.6,0),COLORFF0000;
STICKLINE(红柱>REF(红柱,1)AND 红柱<0,0,红柱,1.3,0),COLORFFBB00;
STICKLINE(红柱<REF(红柱,1)AND 红柱<0,0,红柱,2.3,0),COLORFF0000;
STICKLINE(红柱<REF(红柱,1)AND 红柱<0,0,红柱,2.2,0),COLORFFBB00;
STICKLINE(蓝柱>REF(蓝柱,1)AND 蓝柱<0,0,蓝柱,2.7,0),COLOR998800;
STICKLINE(蓝柱>REF(蓝柱,1)AND 蓝柱<0,0,蓝柱,1.3,0),COLORDDCC99;
VAR3Q:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR4Q:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR5Q:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR6Q:=(VAR3Q+VAR4Q+VAR5Q)/3;
VAR7Q:=EMA(VAR6Q,5);
指标:=EMA(EMA(VAR3Q,5),5)*3;
VAR8Q:=IF(VAR6Q<=-20,10,0);
VAR9Q:=HHV(VAR8Q,10);
VARAQ:=IF(VAR9Q AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
DRAWTEXT(VAR8Q=10 AND FILTER(VAR8Q=10,5),-10{15},'近底部'),LINETHICK1,COLORYELLOW;
DRAWTEXT(VARAQ=20,15,'底部'),LINETHICK1,COLORWHITE;
VAR2A:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3A:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4A:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5A:=(((VAR2A + (2 * VAR3A)) + (3 * VAR4A)) / 6);
VAR6A:=MA(VAR5A,3);
底部1:IF((VAR6A < 底部),20,0),COLORFFFF00;
STICKLINE((CROSS(J,K) AND (底部1 >= 20)),35,0,0.1,0),COLORFFFFFF;
DRAWTEXT((CROSS(J,K) AND (底部1 >= 20)),38,'全仓');
