股票公式：合并即漲/十年一劍

一、合并即漲

var0:=(close-llv(low,60))/(hhv(high,60)-llv(low,60))*100;
var3:=sma(var0,3,1);
var1:=sma(var3,4,1)-10;
var4:=(hhv(high,60)-close)/(hhv(high,60)-llv(low,60))*100;
var5:=sma(var4,3,1);
var2:=sma(var5,4,1)-90;
stickline(ref(var1,1) 0, circledot;
stickline(ref(var1,1)>var1,var1,ref(var1,1),5,0),color00ff00;
stickline(ref(var2,1)>var2,var2,ref(var2,1),10,0),color0000ff;
stickline(ref(var2,1) 0,color0000ff;

?

二、十年一劍

var1:=(100 - ((90 * (hhv(high,21) - close)) / (hhv(high,21) - llv(low,21))));
var2:=(100 - ((90 * (hhv(high,21) - close)) / (hhv(high,21) - llv(low,21))));
var3:=(100 - ma(((100 * (hhv(high,6) - close)) / (hhv(high,6) - llv(low,6))),34));
drawicon(cross(var2,ma(var3,6)),(low * 0.998),8);
drawicon(cross(ma(var3,6),var1),(high * 1.013),9);
drawtext(cross(var2,ma(var3,6)),(low * 0.984),'b '),color4440ff;
drawtext(cross(ma(var3,6),var1),(high * 1.035),'s '),colorffff34;
年:ma(close,26),color00ff00,linethick2;
stickline(c>=年 and c>=o,c,o,7,0),colorred;
stickline(c>=年 and c>=o,h,l,0,0),colorred;
stickline(c>=年 and c stickline(c>=年 and c stickline(c>=年 and c stickline(c<年 and c>o,c,o,7,1),colorffff00;
stickline(c <年 and c<=o,c,o,7,1),colorffff00;
stickline(c <年 and c<=o,h,l,0,1),colorffff00;
stickline(c<年 and c>o,c,h,0,1),colorffff00;
stickline(c<年 and c>o,o,l,0,1),colorffff00;
s:=ma(vol,5)/ma(vol,60),colorred,,linethick2;
a:=ma(s,5),colorgreen,,linethick2;
bias:=(close-ma(close,5))/ma(close,5)*100;
f:=ma(s,121);
rsv:=(close-llv(low,45))/(hhv(high,45)-llv(low,45))*100;
k:=sma(rsv,15,1);
d:=sma(k,15,1);
j:=3*k-2*d;
lc:=ref(close,1);
rsi:=sma(max(close-lc,0),6,1)/sma(abs(close-lc),6,1)*100;
drawtext(cross(84,rsi) , high 0.05,'逃 ▼頂 '),coloryellow ;
drawtext(cross(rsi,11) , low-0.05,' 低 ▲吸 '),colorred ;
mid := ma(close,26);
upper:= mid 2*std(close,26);
lower:= mid - 2*std(close,26);
s1:=if((j<11 and bias>-11 and cross( s,f) and (s-f)>0.010),2,0),stick,linethick3,colorgreen;
drawtext(s1=2,low-0.05,'關(guān) ▲注 '), colorblue;
drawicon( filter(cross(s,a) and a<0.5 and j<20,13),low,1 );

ma3:ma(close,3),colorffffff,linethick1;
ma8:ma(close,8),color00ffff,linethick1;
ma1000:ma(close,1000),colorf00ff0,linethick1;
ma2000:ma(close,2000),color00ff00,linethick1;
ma2500:ma(close,2500),color00ffff,linethick1;

angel:ema(c,2),color000000;
devil:ema(slope(c,21)*20 c,42),pointdot,color000000;
buy:=cross(angel,devil);
sel:=cross(devil,angel);

drawtext(buy,low*0.98,'a買'),colorf00ff0,linethick2;
drawtext(sel,high*1.02,'v賣'),color00ff00,linethick2;