相關標簽:

 

AB1:=VOL*CLOSE;{A} AB2:=SUM(AB1,1)/SUM(VOL,1);{B} AB3:=EMA(AB2,17);{B1} AB4:=(C*2+H+L)/4*10;{V1B} AB5:=EMA(AB4,13)-EMA(AB4,34);{V2B} AB6:=EMA(AB5,5);{V3B} AB7:=2*(AB5-AB6)*5.5;{V4B} AB8:=(INDEXC*2+INDEXH+INDEXL)/4;{V8B} AB9:=EMA(AB8,13)-EMA(AB8,34);{V9B} AB10:=EMA(AB9,3);{VA} AB11:=(AB9-AB10)/2;{VB} 個股資金:=(AB2-AB3)*100/AB2; 主力資金:=AB7; 大資金:=AB11; 紅點主力進場:IF(個股資金>0 AND 主力資金>0 AND 大資金>0,-10,DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK1; V1:=EMA(EMA(CLOSE,20),20);{V1} 力度:=(V1-REF(V1,1))/REF(V1,1)*1000,COLORFF00FF,LINETHICK2;{控盤力度} 開始控盤:IF(CROSS(力度,0),20,0),LINETHICK2,COLORYELLOW; 【莊控盤】:IF(力度>REF(力度,1) AND 力度>0,8,0),LINETHICK2,COLORRED; 白線主力減倉:IF(力度< REF(力度,1) AND 力度>0,力度,0),LINETHICK2,COLORWHITE; 綠點主力出場:IF(個股資金<=0 AND 主力資金<=0 AND 大資金<=0,-10,DRAWNULL),COLORGREEN,CIRCLEDOT,LINETHICK1; 主力動態:(個股資金+主力資金+大資金),COLORYELLOW,NODRAW; STICKLINE(主力動態>0,0,主力動態,1,0),COLORFF00FF; STICKLINE(主力動態<=0,0,ABS(主力動態),1,0),COLORGREEN; 比例:(主力動態-REF(主力動態,1))/REF(主力動態,1),NODRAW; 底部:0,COLORFFCC66,LINETHICK2; 虛:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW; STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虛,0,-1,-1),COLOR00C0C0; 實:VOL,VOLSTICK; 換手:=VOL/CAPITAL*100; 貳換:SUM(V/CAPITAL*100,20),NODRAW,COLORMAGENTA; 動態市盈:=C/FINANCE(33),COLOR16CDEC,LINETHICK0 ; VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主動買盤:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK2; 主動賣盤:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),LINETHICK2; 買賣盤:=-(主動買盤/主動賣盤),NODRAW,COLORYELLOW; 日凈入（WS）:(主動買盤+主動賣盤)/10000,NODRAW,COLORMAGENTA; STICKLINE(主動買盤>0,0,主動買盤,1,0),COLORRED; STICKLINE(主動賣盤<0,VOL,主動買盤,1,0),COLOR00FF00; STICKLINE(換手>0 ,0, 主動買盤,0,0),COLORYELLOW; STICKLINE(換手>0,VOL, 主動買盤, 0,0) ,COLORRED; AHC2:=(HIGH - LOW); AHC3:=ABS((OPEN - CLOSE)); AHC4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); AHC5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); AHC6:=((AHC3 / AHC2) * VOL); AHC7:=((AHC4 / AHC2) * VOL); AHC8:=((AHC5 / AHC2) * VOL); AHCA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); AHCB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); AHCC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); AB601:=HHV(V,5); AB602:=O>C; AB702:=C>O; AB703:=C=O; AB704:=((SUM(V,5)/AB601)); AB705:=IF(AB704>0.3,1,0); AB706:=IF(AB602 AND AB705,V,0); AB707:=IF(AB702 AND AB705,V,0); 錢出A:=SUM(AB706,5),COLORGREEN,LINETHICK2; 錢入A:=SUM(AB707,5),COLORRED,LINETHICK2; 錢出:=SUM(AB706,20),COLORGREEN,LINETHICK2; 錢入:=SUM(AB707,20),COLORRED,LINETHICK2; 伍凈入（SW）:(錢入A-錢出A)/100000,COLORYELLOW,NODRAW; 貳凈入:(錢入-錢出)/100000,COLORRED,NODRAW; P5:MA(實,5),COLORMAGENTA,LINETHICK2; P35:MA(實,35),COLORBLUE,LINETHICK2; P135:MA(實,135),COLORWHITE,LINETHICK2; DRAWTEXT(CROSS(P5,P135),(V *1.05),''),COLORYELLOW; 0,COLORBROWN;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;