TRZ亮景 （附图 源码 贴图）

{TRZ亮景 N:5}
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD :=1000* (2*(DIFF-DEA))/EMA(C,30);
VARA:=EMA(REF(CLOSE,1),4);
色彩峰:=(SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100);
准备:=色彩峰<3.5,COLORDBDBDB;
出航:=FILTER(MACD<0 AND MACD>REF(MACD,1) AND 色彩峰<20,5), COLORBROWN;
飞燕:=CROSS(色彩峰,90),COLOR00FF00;
回归:=CROSS(色彩峰,90),COLORDBDBDB;
STICKLINE(色彩峰,0,120,10,0),COLOR8BA400;
STICKLINE(色彩峰,0,90,10,0),COLOR8BA433;
STICKLINE(色彩峰,0,75,10,0),COLOR8BA466;
STICKLINE(色彩峰,0,60,10,0),COLOR8BA488;
STICKLINE(色彩峰,0,50,10,0),COLOR8BA4AA;
STICKLINE(色彩峰,0,40,10,0),COLOR8BA4BB;
STICKLINE(色彩峰,0,35,10,0),COLOR8BA4CC;
STICKLINE(色彩峰,0,25,10,0),COLOR8BA4EE;
STICKLINE(色彩峰,0,15,10,0),COLOR8BA5FF;
STICKLINE(色彩峰,0,-50,10,0),COLOR8BA433;
{STICKLINE(色彩峰,0,-30,10,0),COLOR8BA444;
STICKLINE(色彩峰,0,-10,10,0),COLOR8BA455;
STICKLINE(色彩峰,0,-5,10,0),COLOR8BA466;}
STICKLINE(色彩峰>0,0,色彩峰,10,0),COLOR66FF00;
STICKLINE(色彩峰>0,0,色彩峰*0.9,10,0),COLOR66EE00;
STICKLINE(色彩峰>0,0,色彩峰*0.8,10,0),COLOR66CC00;
STICKLINE(色彩峰>0,0,色彩峰*0.7,10,0),COLOR66AA00;
STICKLINE(色彩峰>0,0,色彩峰*0.6,10,0),COLOR668800;
STICKLINE(色彩峰>0,0,色彩峰*0.5,10,0),COLOR666600;
STICKLINE(色彩峰>0,0,色彩峰*0.4,10,0),COLOR664400;
STICKLINE(色彩峰>0,0,色彩峰*0.3,10,0),COLOR662200;
STICKLINE(色彩峰,0,-色彩峰*0.2,10,0),COLOR324D00;
RSV:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV,3,1);
龙Ｋ:=SMA(FASTK,2,1);
龙Ｄ:=SMA(龙Ｋ,5,1);
狗:=LLV(LOW,10);
年:=HHV(H,25);
到来:=EMA((C-狗)/(年-狗)*4,4);
{顶底摸块}
神:=2*SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1)-(3*HHV(SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1),2)-2*SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1));
奇:=(2*神+EMA((2*(C+L)/2+(H+C)/2+L+O)/5,2)+2*((EMA((C*2+H+L+O)/5,5)+MA((C*2+H+L+O)/5,13)+MA((C*2+H+L+O)/5,21))/3)+((EMA
((C*2+H+L+O)/5,13)+MA((C*2+H+L+O)/5,21)+MA((C*2+H+L+O)/5,34))/3)+((EMA((C*2+H+L+O)/5,21)+MA((C*2+H+L+O)/5,34)+MA((C*2+H+L+O)/5,55))/3))/7;
分清:=(FORCAST(HHV((C+L)/2,1),21)+(EMA(((C+L)/2+L+(H+C)/2)/3,55)-(C-EMA(((C+L)/2+L+(H+C)/2)/3,55))))/2;
放心买入:=(((C+L)/2+(H+C)/2+L)/3+(3*(C+H+L+(O+C+L)/3)/4-2*(C+L)/2))/2;
强:=(EMA((分清+3*((EMA(放心买入,5)*5+分清)/6+((EMA(奇,5)+EMA(奇,8)+EMA(奇,13))/3))/2)/4,3)/3),POINTDOT,COLOR00FFFF;
验证:=((((C+L)/2-LLV(L,24))/(HHV((H+C)/2,24)-LLV(L,24))*1.1*(C+L)/2));
续持验证:=EMA((2*(5*((EMA((2*C+L)/3,2)-EMA((2*C+H)/3,5))
-EMA((EMA((2*C+L)/3,2)-EMA((2*C+H)/3,5)),21)))
+(((C*2+H)/3+(C*2+H)/3)/2)+EMA(验证,2))/4,2),COLOR555555;
TT:=240/FROMOPEN;
比:=TT;
WJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-WJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,WJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5);
V7:=(V2*V5);
V8:=(V3*V5);
V9:=(V4*V5);
买盘1:=DYNAINFO(23)*比;
卖盘1:=DYNAINFO(22)*比;
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C<300,买盘1,买盘2);
卖盘:=IF(ISLASTBAR AND PERIOD=5 AND C<300,卖盘1,卖盘2);
买卖差1:=买盘-卖盘;
换手买:=IF(PERIOD=5 AND C<300,买盘/CAPITAL*100,买盘/3)*2;
换手卖:=IF(PERIOD=5 AND C<300,卖盘/CAPITAL*100,卖盘/3)*2;
买卖差:=换手买-换手卖;
买卖:=换手买+换手卖;
STICKLINE(C>=O,-50,((换手买+换手卖)*N)-50,2.2,1),COLORRED;
STICKLINE(C<O,-50,((换手买+换手卖)*N)-50,2.2,1),COLORFFFF00;
STICKLINE(买卖差>=0,-50,(换手买*N)-50,1.5,0),COLORRED;
STICKLINE(买卖差>=0 AND C>=MA(C,30),-50,(换手买*N)-50,2.2,0),COLORRED;
STICKLINE(买卖差>=0,-50,(换手卖*N)-50,0.8,0),COLOR998800;
STICKLINE(买卖差>=0 AND C>=MA(C,30),-50,(换手卖*N)-50,1,0),COLORDDCC00;
STICKLINE(买卖差<0,-50,(换手买*N)-50,1.8,0),COLORRED;
STICKLINE(买卖差<0 AND C>=MA(C,30),-50,(换手买*N)-50,2.2,0),COLORRED;
STICKLINE(买卖差<0,-50,(换手卖*N)-50,0.8,0),COLOR998800;
STICKLINE(买卖差<0 AND C>=MA(C,30),-50,(换手卖*N)-50,1,0),COLORDDCC00;
STICKLINE(1,-50,MAX((换手买*N)-50,(换手卖*N)-50),0,0),COLORFFFFFF;
龙行凤影:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1),LINETHICK0;
双起双飞:IF(龙行凤影<=10,-30,-50),COLOR0000FF,LINETHICK2;
{顶上第一排小方块为波段信号}
STICKLINE(续持验证<强,-55,-60,3,1),COLORYELLOW;
STICKLINE(续持验证>=强,-55,-60,3,1),COLORMAGENTA;
{第二排小方块为走势强弱信号}
STICKLINE(续持验证>= REF(续持验证,1),-65,-70,3,1),COLORMAGENTA;
STICKLINE(续持验证< REF(续持验证,1),-65,-70,3,1),COLORYELLOW;
DRAWTEXT(准备,-10,'ャ'),COLORDBDBDB;
DRAWTEXT(准备,-10,'︼'),COLOR688EC1;
DRAWTEXT(CROSS( 0,MACD)AND 色彩峰>75,110,'☆'),COLORFFFFFF;
DRAWTEXT(飞燕,70,'ヲ'),COLORDBDBDB;
DRAWTEXT(出航,-10,'Ψ'), COLORBROWN;
红红的天:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1);
IF(CROSS(红红的天,2),70,-50),COLOR0000FF;
有心就有:IF(CROSS(红红的天,2),70,DRAWNULL),CROSSDOT,LINETHICK6,COLORFF77FF;
好运！:IF(CROSS(红红的天,2),70,DRAWNULL),POINTDOT,LINETHICK4,COLOR00CCFF;
恭喜:STICKLINE(CROSS(到来,0.3),-70,-50,3,0), COLOR00AAFF,LINETHICK1;
STICKLINE(CROSS(到来,0.3),-60,-50,3,0),COLORRED,LINETHICK1;
发财:STICKLINE(CROSS(3.5,到来),100,120,2,0), COLORRED,LINETHICK2;
STICKLINE(CROSS(3.5,到来),110,120,2,0),COLORYELLOW,LINETHICK2;
L1:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*200-60;
凤Ｋ:SMA(L1,3,1),COLORAACCAA;
凤Ｄ:SMA(凤Ｋ,3,1),COLORAACCAA;

再加主图

{顾比移动平均线}
MA3:EMA(CLOSE,3),COLOR007618;
MA5:EMA(CLOSE,5),COLOR007618;
MA8:EMA(CLOSE,8),COLOR007618;
MA10:EMA(CLOSE,10),COLOR007618;
MA12:EMA(CLOSE,12),COLOR007618;
MA15:EMA(CLOSE,15),COLOR007618;
MA30:EMA(CLOSE,30),COLOR808860;
MA35:EMA(CLOSE,35),COLOR808080;
MA40:EMA(CLOSE,40),COLOR808080;
MA45:EMA(CLOSE,45),COLOR808080;
MA50:EMA(CLOSE,50),COLOR808080;
MA60:EMA(CLOSE,60),COLOR808860;
IF(MA30>REF(MA30,1),MA30,DRAWNULL),COLORRED;
IF(MA35>REF(MA35,1),MA35,DRAWNULL),COLORRED;
IF(MA40>REF(MA40,1),MA40,DRAWNULL),COLORRED;
IF(MA45>REF(MA45,1),MA45,DRAWNULL),COLORRED;
IF(MA50>REF(MA50,1),MA50,DRAWNULL),COLORRED;
IF(MA60>REF(MA60,1),MA60,DRAWNULL),COLORRED;