{甲乙多多动态黄金分割源码(分析家主图)} {简单移动平均线+变色K线 p1=5} MA5:MA(CLOSE,5),linethick0; MA10:MA(CLOSE,10),linethick0; MA20:MA(CLOSE,20),linethick0; MA30:MA(CLOSE,30),linethick0; m60:MA(C,60),linethick0; m89:MA(C,89),linethick0; m152:ma(c,152),linethick0; m246:ma(c,246),linethick0; tj1:=c>=MA20; tj2:=c<MA20; STICKLINE(tj1,l,h,0,0),color1122ff; STICKLINE(tj1,o,c,7,0),color1122ff; STICKLINE(tj2,l,h,0,0),color22ff55; STICKLINE(tj2,o,c,7,0),color22ff55; {黄金分割线} lhnh:=BARSLAST(DISPSTATUS=1)+1; nnl:=DISPSTATUS=2; qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1)); hh:=HHV(h ,lhnh); ll:=llV(l ,lhnh); q809:=ll+(hh-ll)*0.809; q618:=ll+(hh-ll)*0.618; q500:=ll+(hh-ll)*0.5; q382:=ll+(hh-ll)*0.382; q191:=ll+(hh-ll)*0.191; PARTLINE(hh,qqqq,RGB(255,18,28)); PARTLINE(q191,qqqq,RGB(198,248,248)); PARTLINE(q382,qqqq,RGB(18,108,208)); PARTLINE(q500,qqqq,RGB(198,8,118)); PARTLINE(q618,qqqq,RGB(98,98,228)); PARTLINE(q809,qqqq,RGB(158,228,158)); PARTLINE(ll,qqqq,RGB(238,238,28)); DRAWTEXT(nnl,hh*0.998,'最高价:'+hh),ALIGN2,Color00FFFF; DRAWTEXT(nnl,q809,'19.1%:'+q809),ALIGN2,Color00FFFF; DRAWTEXT(nnl,q618,'38.2%:'+q618),ALIGN2,Color00FFFF; DRAWTEXT(nnl,q500,'50%:'+q500),ALIGN2,Color00FFFF; DRAWTEXT(nnl,q382,'61.8%:'+q382),ALIGN2,Color00FFFF; DRAWTEXT(nnl,q191,'80.9%:'+q191),ALIGN2,Color00FFFF; DRAWTEXT(nnl,ll*1.01,'最低价:'+ll),ALIGN2,VALIGN2,Color00FFFF; DRAWTEXT(nnl,hh,' 沉'),ColorFF9900,VALIGN0,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.85,' 着'),ColorFF9900,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.71,' 冷'),ColorFF9900,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.57,' 静'),ColorFF9900,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.43,' 战'),ColorFF9900,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.29,' 无'),ColorFF9900,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.15,' 不'),ColorFF9900,VALIGN1,linethick3; DRAWTEXT(nnl,ll,' 胜'),ColorFF9900,VALIGN2,linethick3; DRAWTEXT(nnl,hh,' 甲'),ColorFF00FF,VALIGN0,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.85,' 乙'),ColorFF00FF,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.71,' 多'),ColorFF00FF,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.57,' 多'),ColorFF00FF,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.43,' 祝'),ColorFF00FF,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.29,' 你'),ColorFF00FF,VALIGN1,linethick3; DRAWTEXT(nnl,ll+(hh-ll)*0.15,' 成'),ColorFF00FF,VALIGN1,linethick3; DRAWTEXT(nnl,ll,' 功'),ColorFF00FF,VALIGN2,linethick3; MA1:MA(CLOSE,P1); var1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2); Var2:=REF(Var1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var3:=REF(Var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var4:=REF(Var3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var5:=REF(Var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var6:=REF(Var5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var7:=REF(Var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var8:=REF(Var7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var9:=REF(Var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VarA:=REF(Var9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VarB:=REF(VarA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VarC:=REF(VarB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VarD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2); VarE:=REF(VarD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VarF:=REF(VarE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var10:=REF(VarF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var11:=REF(Var10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var12:=REF(Var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var13:=REF(Var12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var14:=REF(Var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var15:=REF(Var14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var16:=REF(Var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var17:=REF(Var16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var18:=REF(Var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var19:=REF(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,1) AND Var1; STICKLINE(Var19,REF(CLOSE,1),REF(CLOSE,2),14,1),colormagenta; Var1A:=REF(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,1) AND VarD; STICKLINE(Var1A,REF(CLOSE,1),REF(CLOSE,2),14,1),colorgreen; |
