跪求高手編寫通信達分時高拋低吸公式：不帶未來函數的

N:=60;

89,COLORRED;

頂:=85;

VAR1:=HHV(HIGH,9)-LLV(LOW,9);

VAR2:=HHV(HIGH,9)-CLOSE;

VAR3:=CLOSE-LLV(LOW,9);

VAR4:=VAR2/VAR1*100-70;

VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

VAR6:=(2*CLOSE+HIGH+LOW)/4;

VAR7:=SMA(VAR3/VAR1*100,3,1);

VAR8:=LLV(LOW,34);

VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);

VARA:=IF(VAR9>100,VAR9-100,0);

VARB:=HHV(HIGH,34);

AA:= VARA*2;

BB:= EMA((VAR6-VAR8)/(VARB-VAR8)*100,13);

VARC:=EMA(0.667*REF(BB,1)+0.333*BB,2);

VARD:=SMA(AA,2,1)-AA;

VARE:=EMA(0.667*REF(BB,1)+0.333*BB,2)-BB;

VAR1A:=(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*100-70;

VAR2A:=SMA(VAR1A,5,1)+100;

VAR3A:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;

VAR4A:=SMA(VAR3A,3,1);

VAR5A:=SMA(VAR4A,3,1)+100;

VAR6A:=VAR5A-VAR2A;

CC: SMA(VAR5,20,1){*VAR0},COLORGREEN;

D: IF(VAR6A>N,VAR6A-N,0){*VAR0}+3,COLORYELLOW;

DRAWTEXT(D<REF(D,1),D-3,'↓');

CC1:=SMA(CC,5,1),COLORGREEN;

出擊:IF((CROSS(CC,CC1) AND (CC1 < 頂) ),80,0),COLORRED;

DRAWTEXT_FIX (1,0.89,0,0,'CC'),COLORGREEN,LINETHICK1;

DRAWNUMBER_FIX(1,0.92,0,0,CONST((CC))),COLORGREEN;