FZ西方赤兑宫

Var41:=(3*c+l+o+h)/6;
Var42:=(20*Var41+19*ref(Var41,1)+18*ref(Var41,2)+17*ref(Var41,3)+16*ref(Var41,4)+15*ref(Var41,5)+14*ref(Var41,6)+13*ref(Var41,7)+12*ref(Var41,8)+11*ref(Var41,9)+10*ref(Var41,10)+9*ref(Var41,11)+8*ref(Var41,12)+7*ref(Var41,13)+6*ref(Var41,14)+5*ref(Var41,15)+4*ref(Var41,16)+3*ref(Var41,17)+2*ref(Var41,18)+ref(Var41,20))/210;
主力1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1), linethick0,COLORECCEFD;
散户1:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)), linethick0,COLORFDB8BA;

主力:FILLRGN(主力1>散户1,主力1,散户1),COLORECCEFD;
散户:FILLRGN(散户1>主力1,主力1,散户1),COLORFDB8BA;

反弹行情:STICKLINE(CLOSE>0,COUNT(CLOSE>REF(CLOSE,3),5)/5,0,4,0),COLOR178543;
荒漠行情:STICKLINE(CLOSE>0,COUNT(LOW>REF(LOW,3),5)/5,0,4,0),COLORACB98A;
鸡肋行情:STICKLINE(CLOSE>0,COUNT(OPEN>REF(OPEN,3),5)/5,0,4,0),COLOR6FCC4C;
绿色行情:STICKLINE(CLOSE>0,COUNT(HIGH>REF(HIGH,3),5)/5,0,4,0),COLORAAF783;

LC:=REF(CLOSE,1);
Var1:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-LC)),ABS(LOW-LC)),14,1);
Var2:=HIGH-REF(HIGH,1);
Var3:=REF(LOW,1)-LOW;
Var4:=SMA(IF(Var2>0 AND Var2>Var3,Var2,0),12,1);
Var5:=SMA(IF(Var3>0 AND Var3>Var2,Var3,0),12,1);
Var6:=Var4*100/Var1;
Var7:=Var5*100/Var1;
Var8:=SMA(ABS(Var7-Var6)/(Var7+Var6)*100,12,1);
Var9:=(Var8+REF(Var8,5))/2;
VarC:=AMOUNT/VOL/100;
VarD:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarE:=SUM(AMOUNT,5)/VarC/100;
VarF:=SUM(AMOUNT,13)/VarC/100;
Var10:=SUM(AMOUNT,34)/VarC/100;
Var11:=SUM(AMOUNT,209)/VarC/100;
Var12:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
Var13:=Var12/CAPITAL;
Var14:=VOL/CAPITAL*VarD+Var13*REF(VarC,1);
Var15:=DMA(VarD,VOL/VarE);
Var16:=DMA(VarD,VOL/VarF);
Var17:=DMA(VarD,VOL/Var10);
Var18:=DMA(VarD,VOL/CAPITAL);
Var19:=MA(HHV(HIGH,488),18);
Var1A:=MA(HHV(HIGH,220),18);
Var1B:=MA(HHV(HIGH,98),18);
Var1C:=MA(LLV(LOW,488),18);
Var1D:=MA(LLV(LOW,220),18);
Var1E:=MA(LLV(LOW,98),18);
Var1F:=MA((Var1C*0.96+Var1D*0.96+Var1E*0.96+Var19*0.558+Var1A*0.558+Var1B*0.558)/6,18);
Var20:=MA((Var1C*1.25+Var1D*1.23+Var1E*1.2+Var19*0.55+Var1A*0.55+Var1B*0.65)/6,18);
Var21:=MA((Var1C*1.3+Var1D*1.3+Var1E*1.3+Var19*0.68+Var1A*0.68+Var1B*0.68)/6,18);
Var22:=MA((Var1F*3+Var20*2+Var21)/6*1.738,18);
Var25:=REF(LOW,1);
Var26:=SMA(ABS(LOW-Var25),3,1)/SMA(MAX(LOW-Var25,0),3,1)*100;
Var27:=MA(IF(CLOSE*1.35<=Var22,Var26*10,Var26/10),3);
Var29:=HHV(Var27,30);
Var2A:=IF(LOW=LLV(LOW,30),(Var27+Var29*2)/2,0);
jd1:=Var2A>20000 AND CLOSE<COST(1);
jd2:=(CLOSE-Var16)/Var16*100<N-13;
STICKLINE(jd1,0,0.3,6,0),colorblue;
STICKLINE(jd2,0,0.3,6,0),colorblue;
STICKLINE(jd1 and jd2,0,0.3,6,0),colorblue;
qs1:=SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1);
圣龙:IF((REF(CLOSE,13)-CLOSE)/REF(CLOSE,13)*100>15 AND SUM(VOL/CAPITAL,13)*100<18 AND VOL/CAPITAL*100<2.5 AND (LC-CLOSE)/LC*100<8,0.5,0),color6F5A4C;
v2:=(CLOSE-LC)/LC*100;
v3:=MA(VOL,2)/MA(VOL,10);
v4:=VOL/CAPITAL;
tct:=0.015*V2-0.124*V3+17.5*V4;
tct1:=hhv(tct,250)-0.4;
量能:if(tct>tct1,tct1-tct+1,1),colorDB3DBB;
drawicon(filter(0.0015*V2-0.0124*V3+1.7461*V4>0.148,10),-0.1,3);
买:filter(-0.08473268*V2+0.10052872*V3+5.20138076*V4+0.45692105<0,3)*0.6,linethick2,colorblue;
b1:=(CLOSE-MA(CLOSE,27))/MA(CLOSE,27)<-0.16;
品股:b1*0.5,colorblue;
STICKLINE(b1,0.15,0.5,8,0),colorblue;
金品:filter(圣龙=0.8 and b1 and jd1 and jd2,2),colorblue;
STICKLINE(金品,0,1,6,0),colorblue;
VAR49:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
VAR50:=SMA(VAR49,3,1);
var51:=SMA(VAR50,3,1),Color0000FF;
var52:=SMA(var51,3,1),Color00FFFF;
金叉:STICKLINE(CROSS(var51,var52) AND (var51<40),0,0.3,8,0),colorred;
Var43:=INTPART(SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1));
Var44:=INTPART(SMA((SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1)),3,1));
买1:STICKLINE(Var43+Var44<60 and MOD(Var43+Var44,10)=0,0 ,-0.06,9,0), COLORAB81DB;
买2:STICKLINE(MA(cost(0.8),100)>MA(cost(0.8),3)*1.06 AND MA(cost(0.8),21)>MA(cost(0.8),3)*1.04 and MA(cost(0.8),3)>cost(0.8)*0.7 AND C/COST(17)<=0.8,-0 ,-0.06,9,0),COLOR8E61A6;
买3:STICKLINE((C-DMA(EMA(C,10),SUM(VOL,5)/3/CAPITAL))/DMA(EMA(C,10),SUM(VOL,5)/3/CAPITAL)*100<-25 AND REF(H,10)/C>1.1,0 ,-0.06,9,0),COLOR8E61D0;
买4:STICKLINE((REF(CLOSE,13)-c)/REF(CLOSE,13)>18 AND Ma(100*VOL/CAPITAL,5)<2 and 100*(ema(c,26)-ema(c,13))/ema(c,26)>6,0,-0.06,6,0),COLOR3261D0;

rsv:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
k:=sma(rsv,3,1);
d:=sma(k,3,1);
j:=3*k-2*d;
rsv1:=(c-llv(l,25))/(hhv(h,25)-llv(l,25))*100;
varaa:=sma(rsv1,3,1);

ks:=(c-ma(c,13))/ma(c,13)*(-100);
金线:=ema(ks/10+ema(c,10),3);

obv:=sum(if(c>ref(c,1),v,if(c<ref(c,1),-(v),0)),0)/1000;
主力3:=ema(obv,5);
庄家3:=ema(主力3,10);
能量系数:=主力3-ref(主力3,1);
explainex(能量系数 ,'OBV能量系数：',能量系数,1,0),colorblue;

explain(j>98 ,'J值在高位 大众羊群效应 股价振荡随时就会来临 有时候庄家做骗线 股价拼命上升'),colorblue;
explain(j<1 ,'J值在低位 大众羊群效应 股价振荡随时就会来临 有时候庄家做骗线 股价拼命下跌'),colorblue;
explain(j<ref(j,1) and c<ref(c,1) ,'解：股价下跌J值在向下运行 观望为主'),colorblue;
explain(j>ref(j,1) and c<ref(c,1) ,'解：股价下跌J值在向上运行 背离走势  D值在20以下 关注分批建仓 D值在80以上 股价有调整要求'),colorblue;
explain(j<ref(j,1) and c>ref(c,1) ,'解：股价上涨J值在向下运行 背离走势  J值在90以上 减仓为好'),colorblue;
explain(j>ref(j,1) and c>ref(c,1) ,'解：股价上涨J值在向上运行  D值在80以上 时刻做好减仓准备 D值在20以下可以逢低买入股票'),colorblue;
explain(cross(d,k) ,'K值向下穿越D值形成死叉形态'),colorblue;
explain(cross(k,d) ,'K值向上穿越D值形成金叉形态'),colorblue;
explain(k>d and c>=ref(c,2) ,'解：KDJ多头排列,有走好迹象 '),colorblue;
explain(k>d and c<=ref(c,2) ,'解：KDJ多头排列,但股价走势不太理想，有调整要求，明天要是上涨可以跟进'),colorblue;
explain(k<d and c<ref(c,2) ,'解：KDJ空头排列,没有走好企稳迹象,操作上小心为好'),colorblue;
explain(k<d and c>ref(c,2) ,'解：KDJ空头排列,有企稳迹象，关注，'),colorblue;

多价:=ema(c,12)-ema(c,26);
空价:=ema(多价,9);
多空价值:=2*(多价-空价);
explain(多空价值>0 and 多空价值>=ref(多空价值,1) ,'      MACD红柱慢慢在放大'),colorblue;
explain(多空价值>0 and 多空价值<ref(多空价值,1) ,'      MACD红柱慢慢在缩小'),colorblue;
explain(多空价值<0 and 多空价值>ref(多空价值,1) ,'      MACD绿柱慢慢在缩小'),colorblue;
explain(多空价值<0 and 多空价值<=ref(多空价值,1) ,'      MACD绿柱慢慢在放大'),colorblue;
explain(多价>0 and cross(空价,多价) ,'      MACD高位死叉向下'),colorblue;
explain(多价>0 and cross(多价,空价) ,'      MACD高位金叉向上'),colorblue;
explain(多价<0 and cross(空价,多价) ,'      MACD低位死叉向下'),colorblue;
explain(多价<0 and cross(多价,空价) ,'      MACD低位金叉向上'),colorblue;
explain(多价<0 and c<ref(c,2) ,'MACD现在弱势区域上  操作上小心为好 注意低位金叉死叉'),colorffblue;
explain(多价>0 and c>ref(c,2) ,'MAC