新猪腾四海源码附图优化版

底部:=-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,'全仓');