通达信指标公式源码 控盘指标 副图源码.doc

VAR1:=EMA(EMA(CLOSE,9),9);控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*500;STICKLINE(控盘<0,控盘,0,,0),COLOR00FF00;A10:=CROSS(控盘,0);开始控盘:=IF(A10,5,0);STICKLINE(控盘>REF(控盘,1)AND控盘>0,控盘,0,,0),COLORRED;进货:IF(控盘>REF(控盘,1)AND控盘>0,控盘,0),COLORRED;VAR2:=100*WINNER(CLOSE*);STICKLINE(VAR2>50ANDCOST(85)<CLOSEAND控盘>0,控盘,0,,0),COLORFF00FF;高度控盘:=IF(VAR2>50ANDCOST(85)<CLOSEAND控盘>0,控盘,0);STICKLINE(控盘<REF(控盘,1)AND控盘>0,控盘,0,,0),COLORYELLOW;洗盘:IF(控盘<REF(控盘,1)AND控盘>0,控盘,0),COLOR00FF00;出货:IF(控盘<0,控盘,0),COLOR00FF00;比例1:=进货+洗盘;比例2:=-出货;差额:(SUM(比例1,0)-SUM(比例2,0))/20,COLORRED;差额平均:MA(差额,40);DRAWICON(差额>(差额,1)<=,差额,7),COLORWHITE;最高价1:=HHV(H,240);最高价2:=HHV(C,240);DRAWICON(差额>=最高价1ANDREF(最高价2,1)>REF(C,1)ANDC>REF(C,1)AND(进货+洗盘)>,差额,7),COLORWHITE;DRAWICON(差额<-(差额,1)>=-,差额,7),REEN;最低价:=LLV(C,240);DRAWICON(差额>=最低价ANDREF(最低价,1)<REF(C,1)ANDC<REF(C,1)AND出货<-,差额,7),REEN;正:,COLORBROWN;负:-,COLORBROWN;