文章预览
{波 1 999 73 NA 1 999 25 } NC:=3; NB:=IF(NA>10,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(LDINGBU
………………………………