通达信秘密买点副图源码

VARAA:=AMOUNT/(100*VOL);
 CYC13:=MA(VARAA,13);
 CYC34:=MA(VARAA,34);
 CYCMAX:=DMA(C,VOL/CAPITAL);
 CYS13:=(C-CYC13)/CYC13*100;
 CYS34:=(C-CYC34)/CYC34*100;
 CYSMAX:=(C-CYCMAX)/CYCMAX*100;
 {亏损程度:
IF(CYS13<=-7,12,0),COLORWHITE,STICK,LINETHICK3;
 IF(CYS13<=-10,12,0),COLORFFFF33,STICK,LINETHICK3;
 IF(CYS13<=-16,12,0),COLORBLUE,STICK,LINETHICK3;
 IF(CYS13<=-20,12,0),COLOR00FF77,STICK,LINETHICK3;
 IF(CYS13<=-25,12,0),COLORYELLOW,STICK,LINETHICK3;
 IF(CYS13<=-30,12,0),COLORFF00FF,STICK,LINETHICK3;}
 VAR0:=IF(DATE<=1260330,1,0);
 VAR1:=COST(10)*0;
 VAR2:=REF(HIGH,1)*1.1;
 VAR3:=HIGH*1.1;
 VAR4:=(VAR3*VOL+VAR2*(CAPITAL-VOL))/CAPITAL;
 VAR5:=REF(LOW,1)*0.9;
 VAR6:=LOW*0.9;
 VAR7:=(VAR6*VOL+VAR5*(CAPITAL-VOL))/CAPITAL;
 VAR8:=EMA(VAR7,30);
 VAR9:=EMA(VAR4,30);
 VARA:=VAR9-2;
 VARB:=IF(CLOSE<=VAR8,VARA,VAR9);
超跌:=VARB*2.5,COLORYELLOW;
 TAO:=100*(1-WINNER(C));
 A:=1.1*C;
 B:=0.9*C;
 ASR:=100*(WINNER(A)-WINNER(B));