同花顺翮银天地源码附图

lastp:=REF(CLOSE,1);

weekvol:=SMA(MAX(CLOSE-lastp,0),8,1)/SMA(ABS(CLOSE-lastp),8,1)*100,COLOR0080FF,LINETHICK2;

DRAWTEXT((CROSS(weekvol,15)),45,'捡'),coloryellow;

DRAWTEXT((CROSS(weekvol,15)),40,'金'),coloryellow;

STICKLINE(CROSS(weekvol,15),50,0,3,0),colormagenta;

Var5:=LLV(LOW,75);

Var6:=HHV(HIGH,75);

Var7:=(Var6-Var5)/100;

Var8:=SMA((CLOSE-Var5)/Var7,23,1);

VarA:=3*Var8-2*SMA(Var8,13,1);

趋势:-(100-VarA)+100,color0099ff,linethick2;

VReady:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);

direction:=EMA(VReady,3);

V12:=(direction-REF(direction,1))/REF(direction,1)*100;

STICKLINE(direction =13,0,7,8,0),ColorFF00FF;

sell_v:=2*(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34)-EMA(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34),5))*5.5;

sell_p:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);

STICKLINE(IF(sell_v =0,sell_v,1)AND EMA(sell_p,3) 90,0,7,6,0),colorgreen;

p_var1:=HHV((O+H+L+C)/4,14);

p_var2:=LLV((O+H+L+C)/4,31);

power_var:=p_var1-p_var2;

p_bar3:=HHV((O+H+L+C)/4,23);

p_bar4:=LLV((O+H+L+C)/4,96);

p_barv:=p_bar3-p_bar4;

power_r:=EMA(((O+H+L+C)/4-p_var2)/power_var,1)*100,colorred;

power_b:=EMA(((O+H+L+C)/4-p_bar4)/p_barv,1)*100,colorliblue;

POWer_line:(power_r+power_b)/2,colorliblue;

top_varb:=PEAKBARS(3,15,1)

top_var:=IF(top_varb=1,2,0);

top:=IF(top_var=2,2,0);

top_f:=IF(top REF(top,1),50,150),colorgreen,linethick2;

DRAWTEXT(top_f=50,73,' 清'),colorgreen;

STICKLINE(top_f=50,90,55,8,0),colorgreen;

VARa:=(2*CLOSE+HIGH+LOW)/4;

VARb:=LLV(LOW,23);

VARc:=HHV(HIGH,23);

VARd:=EMA((VARa-VARb)/(VARc-VARb)*100,13);

VARe:=EMA(0.778*REF(VARd,1)+0.222*VARd,1);

STICKLINE(VARd-VARe 0,VARd,VARe,8,0),colorred;

STICKLINE(VARd-VARe 0,VARd,VARe,8,0),COLOR00FF0F;

DOGE生命线:EMA(VARe,3),colorred;

逃顶临界:90,colorred;

买:IF(CROSS(VARd,VARe)AND VARd VARe AND VARd 35,90,0),STICK,colorlired;

买买:IF(CROSS(VARd,VARe)AND VARd VARe AND VARd 25,70,0),STICK,colorred;

买买买:IF(CROSS(VARd,VARe)AND VARd VARe AND VARd 15,50,0),STICK,colormagenta;