不知道这样你满意否? 限制:=EMA((((H+C)/2+L+(C+L)/2)/3-EMA(LLV(((H+C)/2+L+(C+L)/2)/3,89),2))/(EMA(HHV(((H+C)/2+L+(C+L)/2)/3,21),2)-EMA(LLV(((H+C)/2+L+(C+L)/2)/3,89),2)),8)*100; 平衡:=SMA(EMA(SMA((C+L)/2,3,1),3),5,1); 追涨:=SMA((C+L)/2,13,1); DRAWICON(FILTER(平衡>REF(平衡,1)AND HHV(MA((H+C)/2,13),10)<REF(HHV(MA((H+C)/2,13),10),1)AND ((C+L)/2)>REF((C+L)/2,1),5) AND 限制<88,L*0.968,4),ALIGN1; Var1:=SMA(SLOPE((C+L)/2,18)*25+(C+L)/2,34,1); 追:=SMA((C+L)/2,2,1); 涨:=SMA((C+L)/2,4,1); 控制:=SMA((C+L)/2,13,1); STICKLINE(追>控制,H,L,0,1),COLORRED; STICKLINE(追>控制,C,O,8,1),COLORRED; STICKLINE(追>控制,C,O,5,1),COLORRED; STICKLINE(追>控制,C,O,2,1),COLORRED; STICKLINE(追<控制,H,L,0,0),COLOR008800; STICKLINE(追<控制,C,O,8,0),COLOR008800; STICKLINE(追<控制,C,O,5,0),COLOR008800; STICKLINE(追<控制,C,O,2,0),COLOR008800; STICKLINE(追<涨 AND 追>控制,H,L,0,1),COLORFFFF33; STICKLINE(追<涨 AND 追>控制,C,O,3,1),COLORFFFF33; STICKLINE(追<涨 AND 追>控制,C,O,3,1),COLORFFFF33; STICKLINE(追<涨 AND 追>控制,C,O,3,1),COLORFFFF33; STICKLINE(追>涨 AND 追<控制,H,L,0,1),ColorFF00FF; STICKLINE(追>涨 AND 追<控制,C,O,6,1),ColorFF43FF,LINETHICK2; STICKLINE(追>涨 AND 追<控制,C,O,8,1),ColorFF63FF; STICKLINE(追>涨 AND 追<控制,C,O,8,1),ColorFF83FF; EMA5:=EMA((C+L)/2,5);EMA120:EMA((C+L)/2,120); PARTLINE(EMA5,EMA5>REF(EMA5,1),rgb(255,0,0),EMA5<REF(EMA5,1),rgb(0,0,255)),LINETHICK2; PARTLINE(EMA120,EMA120>REF(EMA120,1),rgb(255,0,0),EMA120<REF(EMA120,1),rgb(0,0,255)); 企: STICKLINE((Var1-SMA((C+L)/2,2,1))>=0,SMA((C+L)/2,2,1),Var1,0.5,0),COLORFFBB00; 稳: STICKLINE((Var1-SMA((C+L)/2,2,1))<0,SMA((C+L)/2,2,1),Var1,1,0),colorred; VARA:=((3)*(H)+L+O+(2)*(C))/(7); VARB:=((SUM(AMOUNT,7))/(((AMOUNT)/(VOL))/(100)))/(100); VARC:=((C-DMA(VARA,(VOL)/(VARB)))/(DMA(VARA,(VOL)/(VARB))))*(100); VARD:=MA(VARC,20)+STD(VARC,20); BIAS18:=((C-MA(C,18))/(MA(C,18)))*(100); K:=SMA(((C-LLV(L,34))/(HHV(H,34)-LLV(L,34)))*100,3,1); 顶:=(REF(BIAS18,1)>=5) AND CROSS(VARD,VARC) AND (K>79); DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(VARD,VARC) AND (K>79),H,'风险'),Coloryellow; [ Last edited by 陈琛 on 2005-3-16 at 09:13 ] |
|