复制内容到剪贴板
代码:
AR1:=IF(((EMA(CLOSE,5))/(EMA(EMA(CLOSE,9),16))<=0.85) AND ((CLOSE)/(REF(CLOSE,1))>0.905) AND ((CLOSE)/(REF(CLOSE,1))<1.05) AND ((VOL/CAPITAL)*(100)<5),50,0);
AR2:=IF((HIGH+LOW<=REF(HIGH,1)+REF(LOW,1)),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
AR3:=IF((HIGH+LOW>=REF(HIGH,1)+REF(LOW,1)),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
AR4:=(SUM(AR2,13))/(SUM(AR2,13)+SUM(AR3,13));
AR5:=(SUM(AR3,13))/(SUM(AR3,13)+SUM(AR2,13));
AR6:=100-(3)*(SMA(((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1))+(2)*(SMA(SMA(((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1),15,1));
AR7:=100-(3)*(SMA(((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1))+(2)*(SMA(SMA(((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1),15,1));
AR8:=((HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21)))*(100)-10;
AR9:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100);
AR10:=SMA(AR9,13,8);
AR11:=SMA(AR8,21,8);
红男:SMA(AR10,13,8),COLORRED;
绿女:MA((((-100))*(HHV(HIGH,34)-CLOSE))/(HHV(HIGH,34)-LLV(LOW,34))+100,5),COLOR00ff00;
缠绵:DRAWTEXT(CROSS(红男,绿女)AND 红男<50 AND 绿女>REF(绿女,1) OR CROSS(红男,绿女)AND 红男<20 AND 红男>REF(红男,2),25,'↑'),linethick6,COLORYELLOW;
悱恻:DRAWTEXT(CROSS(绿女,红男)AND 绿女>80 ,90,'↓'),linethick6,COLORWHITE;
男欢女爱:DRAWTEXT(红男-AR11<(-65)AND AR1 OR 红男-AR11<(-65)AND 绿女>REF(绿女,1),low,'■'),COLORYELLOW;