通达信振荡波A副图指标

以下是通达信振荡波A副图指标

通达信振荡波A副图指标

源码

VAR1:=10; 
VAR2:=11; 
VAR3:=11; 
VAR4:=12; 
VAR5:=12; 
VAR6:=13; 
VAR7:=13; 
VAR8:=14; 
VAR9:=14; 
VARA:=15; 
VARB:=15; 
VARC:=SMA((CLOSE-LLV(LOW,VAR1))/(HHV(HIGH,VAR1)-LLV(LOW,VAR1))*100,4,1); 

 
VARD:=SMA((CLOSE-LLV(LOW,VAR2))/(HHV(HIGH,VAR2)-LLV(LOW,VAR2))*100,4,1); 
 
VARE:=SMA((CLOSE-LLV(LOW,VAR3))/(HHV(HIGH,VAR3)-LLV(LOW,VAR3))*100,4,1); 

 
VARF:=SMA((CLOSE-LLV(LOW,VAR4))/(HHV(HIGH,VAR4)-LLV(LOW,VAR4))*100,4,1); 

 
VAR10:=SMA((CLOSE-LLV(LOW,VAR5))/(HHV(HIGH,VAR5)-LLV(LOW,VAR5))*100,4,1); 

 
VAR11:=SMA((CLOSE-LLV(LOW,VAR6))/(HHV(HIGH,VAR6)-LLV(LOW,VAR6))*100,4,1); 

 
VAR12:=SMA((CLOSE-LLV(LOW,VAR7))/(HHV(HIGH,VAR7)-LLV(LOW,VAR7))*100,4,1); 

 
VAR13:=SMA((CLOSE-LLV(LOW,VAR8))/(HHV(HIGH,VAR8)-LLV(LOW,VAR8))*100,4,1); 
VAR17:=SMA((CLOSE-LLV(LOW,VARB))/(HHV(HIGH,VARB)-LLV(LOW,VARB))*100,4,1); 
D11:(SMA((VAR17-50)*2,3,1)+SMA((VAR13-50)*2,3,1))/2,LINETHICK2,COLOR00FF00; 

 
VAR14:=SMA((CLOSE-LLV(LOW,VAR9))/(HHV(HIGH,VAR9)-LLV(LOW,VAR9))*100,4,1); 
(SMA((VAR14-50)*2,3,1)+SMA((VAR11-50)*2,3,1))/2,LINETHICK2,COLORFFCC33; 
VAR15:=SMA((CLOSE-LLV(LOW,VARA))/(HHV(HIGH,VARA)-LLV(LOW,VARA))*100,4,1); 
VAR16:=SMA((VAR15-50)*2,3,1); 

 
D11,COLORSTICK,COLOR888888; 
X:3*(VAR17-50)*2-2*SMA((VAR17-50)*2,3,1),COLORYELLOW; 
VAR18:=(HIGH+LOW+CLOSE)/3; 
VAR19:=(VAR18-MA(VAR18,14))/(0.015*AVEDEV(VAR18,14)); 
VAR1A:=(VAR18-MA(VAR18,70))/(0.015*AVEDEV(VAR18,70)); 
VAR1B:=IF(VAR19>=150 AND VAR19<200 AND VAR1A>=150 AND VAR1A<200,-10,0); 
VAR1C:=IF(VAR19<=-150 AND VAR19>-200 AND VAR1A<=-150 AND VAR1A>-200,10,0); 
VAR1D:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; 
VAR1E:=100-ABS(VAR1D); 
IF(BARSCOUNT(CLOSE)<13,100,IF(VAR1E<88 AND VAR1D>0,85,100)),COLORCCFFCC,; 
IF(BARSCOUNT(CLOSE)<13,-100,0-IF(VAR1E<92 AND VAR1D<0,85,100)),COLORF00FF0; 
IF(BARSCOUNT(CLOSE)<70,120,IF(VAR1A>=200 AND VAR19>=150,-15,VAR1B)+120),LINETHICK2,COLORCCFF66; 
出击1:IF(BARSCOUNT(CLOSE)<70,-120,IF(VAR1A<=-200 AND VAR19<=-150,15,VAR1C)-120),COLORRED,LINETHICK2,; 
{POLYLINE(C>0,SMA((VARC-50)*2,3,1)),LINETHICK2,COLORFF0033; 

 
POLYLINE(C>0,SMA((VARD-50)*2,3,1)),LINETHICK2,COLORFF2233; 
 
POLYLINE(C>0,(SMA((VARE-50)*2,3,1)+SMA((VARC-50)*2,3,1))/2),LINETHICK2,COLORFF4433; 
 
POLYLINE(C>0,SMA((VARF-50)*2,3,1)),LINETHICK2,COLORFF6633; 
 
POLYLINE(C>0,(SMA((VAR10-50)*2,3,1)+SMA((VARD-50)*2,3,1))/2),LINETHICK2,COLORFF8833; 

 
POLYLINE(C>0,SMA((VAR11-50)*2,3,1)),LINETHICK2,COLORFF9933; 

 
POLYLINE(C>0,(SMA((VAR12-50)*2,3,1)+SMA((VARF-50)*2,3,1))/2),LINETHICK2,COLORFFAA33; 

 
POLYLINE(C>0,SMA((VAR13-50)*2,3,1)),LINETHICK2,COLORFFBB33; };