通达信指标公式源码 简睿震谱 源码.docVIP

波:=73;NA:=25; NC:=3; NB:=IF(NA10,10,NC);?CURR:=CURRBARSCOUNT; SS:=PERIOD;AA:=REF(H,NA)=HHV(H,2*NA+1);QY:=BACKSET(AA,NA+1);CC:=FILTER(QY,NA) AND H=HHV(H,NA+1);DDD:=BARSLAST(CC);GDTS:=IF(CC,CURR,0);DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);DINGBU1:=REF(DINGBU,DDD+1);GDCS1:=CONST(DINGBUTS);DINGBUTS1:=REF(DINGBUTS,DDD+1);GDCS2:=CONST(DINGBUTS1);AA1:=REF(L,NA)=LLV(L,2*NA+1);QY1:=BACKSET(AA1,NA+1);CC1:=FILTER(QY1,NA) AND L=LLV(L,NA+1);DD1:=BARSLAST(CC1);DDTS:=IF(CC1,CURR,0);DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);DDCS1:=CONST(DDTS1);DDTS2:=REF(DDTS1,DD1+1);DDCS2:=CONST(DDTS2);LAA:=REF(H,NB)=HHV(H,2*NB+1);LQY:=BACKSET(LAA,NB+1);LCC:=FILTER(LQY,NB) AND H=HHV(H,NB+1);LDDD:=BARSLAST(LCC);LGDTS:=IF(LCC,CURR,0);LDINGBU:=IF(LDDD,REF(H,LDDD),H);{顶部}LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);LDINGBU1:=REF(LDINGBU,LDDD+1);LGDCS1:=CONST(LDINGBUTS);LDINGBUTS1:=REF(LDINGBUTS,LDDD+1);LGDCS2:=CONST(LDINGBUTS1);LAA1:=REF(L,NB)=LLV(L,2*NB+1);LQY1:=BACKSET(LAA1,NB+1);LCC1:=FILTER(LQY1,NB) AND L=LLV(L,NB+1);LDD1:=BARSLAST(LCC1);LDDTS:=IF(LCC1,CURR,0);LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);LDDCS1:=CONST(LDDTS1);LDDTS2:=REF(LDDTS1,LDD1+1);LDDCS2:=CONST(LDDTS2);LLAA:=REF(H,NC)=HHV(H,2*NC+1);LLQY:=BACKSET(LLAA,NC+1);LLCC:=FILTER(LLQY,NC) AND H=HHV(H,NC+1);LLDDD:=BARSLAST(LLCC);LLGDTS:=IF(LLCC,CURR,0);LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);{顶部}LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);LLDINGBU1:=REF(LLDINGBU,LLDDD+1);LLGDCS1:=CONST(LLDINGBUTS);LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1);LLGDCS2:=CONST(LLDINGBUTS1);LLDINGBU2:=REF(LLDINGBU1,LLDDD+1);LLAA1:=REF(L,NC)=LLV(L,2*NC+1);LLQY1:=BACKSET(LLAA1,NC+1);LLCC1:=FILTER(LLQY1,NC) AND L=LLV(L,NC+1);LLDD1:=BARSLAST(LCC1);LLDDTS:=IF(LLCC1,CURR,0);LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);LLDDCS1:=CONST(LLDDTS1);LLDDTS2:=REF(LLDDTS1,LLDD1+1);LLDDCS2:=CONST(LLDDTS2);长G1:=CONST(DRAWLINE(CURR=GDCS1,H,REF(CURR,1)=GDCS1,REF(H,1),1));长G2:=CONST(DRAWLINE(CURR=GDCS2,H,REF(CURR,1