M:=3;
XA_1:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);
XA_2:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)<REF(CLOSE,3)) OR REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,1) OR REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
XA_3:=REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<=REF(CLOSE,3) AND REF(CLOSE,2)<REF(CLOSE,4) AND CLOSE>=REF(CLOSE,1);
XA_4:=(3*CLOSE+LOW+OPEN+HIGH)/6;
XA_5:=(20*XA_4+19*REF(XA_4,1)+18*REF(XA_4,2)+17*REF(XA_4,3)+16*REF(XA_4,4)+15*REF(XA_4,5)+14*REF(XA_4,6)+13*REF(XA_4,7)+12*REF(XA_4,8)+11*REF(XA_4,9)+10*REF(XA_4,10)+9*REF(XA_4,11)+8*REF(XA_4,12)+7*REF(XA_4,13)+6*REF(XA_4,14)+5*REF(XA_4,15)+4*REF(XA_4,16)+3*REF(XA_4,17)+2*REF(XA_4,18)+REF(XA_4,20))/210;
XA_6:=CLOSE-REF(CLOSE,1);
XA_7:=100*EMA(EMA(XA_6,6),6)/EMA(EMA(ABS(XA_6),6),6);
XA_8:=EMA(XA_5,13);
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),COLORRED;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),COLORFF9900;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.5,0),COLORFFCC00;
STICKLINE(XA_1,CLOSE,(OPEN+CLOSE)/2,3,0),COLORFF11FF;
STICKLINE(XA_1,CLOSE,(OPEN+CLOSE)/2,0.5,0),COLORFFDDFF;
STICKLINE(XA_2,CLOSE,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE(XA_2,CLOSE,(OPEN+CLOSE)/2,0.5,0),COLORFFBBFF;
STICKLINE(XA_3,OPEN,(OPEN+CLOSE)/2,3,0),COLOR00BB00;
STICKLINE(XA_3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORGREEN;
XA_9:=LLV(HIGH,240);
XA_10:=100*(CLOSE-XA_3)/XA_3;
XA_11:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
XA_12:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
XA_13:=0;
XA_14:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
XA_15:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
XA_16:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
XA_17:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
XA_18:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
XA_19:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
XA_20:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
XA_21:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
XA_22:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
XA_23:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
XA_24:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
XA_25:=EMA(CLOSE,2)-EMA(CLOSE,150);
XA_26:=CLOSE;
BBIBOLL:(MA(XA_26,3)+MA(XA_26,6)+MA(XA_26,12)+MA(XA_26,24))/4;
UPR:BBIBOLL+M*STD(BBIBOLL,N);
DWN:BBIBOLL-M*STD(BBIBOLL,N);
XA_27:=CLOSE=HHV(CLOSE,13);
XA_28:=BARSLAST(FILTER(CROSS(0.8,XA_27),2))+1;
高点:REF(CLOSE,XA_28),POINTDOT,COLORMAGENTA;
突破:CROSS(CLOSE,REF(高点,1)),NODRAW,COLORYELLOW;
STICKLINE(XA_28<=6,高点,高点,3,0),COLORMAGENTA;
DRAWTEXT(突破,LOW,162),COLORYELLOW;
XA_29:=CLOSE=LLV(CLOSE,13);
XA_30:=BARSLAST(FILTER(CROSS(0.8,XA_29),2))+1;
低点:REF(CLOSE,XA_30),POINTDOT,COLORGREEN;
STICKLINE(XA_30<=6,低点,低点,3,0),COLORGREEN;
XA_31:=REF(CLOSE,1);
XA_32:=SMA(MAX(CLOSE-XA_31,0),3,1)/SMA(ABS(CLOSE-XA_31),3,1)*100;
XA_33:=EMA(CLOSE,3);
XA_34:=EMA(CLOSE,21);
DRAWTEXT(CROSS(XA_33,XA_34),LOW*0.99,163),COLORRED;
DRAWRECTREL(0,480,205,589,RGB(10,1,30));
XA_35:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),FROMOPEN);
XA_36:=-SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),FROMOPEN);
XA_37:=XA_35+XA_36;
DRAWBAND(XA_37,RGB(150,0,150),0,RGB(0,100,0)),NODRAW;
资金流量:XA_37,NODRAW;
资金比:XA_37/SUM(VOL,FROMOPEN)*100,NODRAW;
XA_38:=IF(资金比>=0,(资金比+100)/2,100-ABS((资金比-100)/2));
XA_39:=(HSCOL*0.5+REF(HSCOL,1)*0.33+REF(HSCOL,2)*0.17)*SUM(CLOSE,FROMOPEN)/FROMOPEN;
XA_40:=SUM(IF(CLOSE>REF(CLOSE,1),XA_39*VOL,0),FROMOPEN);
XA_41:=-SUM(IF(CLOSE<REF(CLOSE,1),XA_39*VOL,0),FROMOPEN);
攻击流量:XA_40+XA_41,NODRAW;
NOTEXT攻击线:攻击流量,NODRAW;
攻击比:攻击流量/SUM(VOL,FROMOPEN)*100,NODRAW,COLORRED;
XA_42:=IF(攻击比>=0,攻击比+50,100-ABS(攻击比-50));
DRAWRECTREL(20,570,180,540,RGB(0,75,200));
DRAWRECTREL(20,570,30,540,RGB(0,250,50));
DRAWRECTREL(20,570,15+CONST(XA_38*150/100),540,RGB(200,50,0));
DRAWTEXT_FIX(1,0,0.5,0,STRCAT(STRCAT(165,CON2STR(XA_38,2)),166)),COLORYELLOW;
DRAWTEXT_FIX(1,5,0.9,0,EXTERNSTR(0,5)),COLORRED;
DRAWTEXT_FIX(1,0,0.2,0,EXTERNSTR(0,5)),COLORRED;
XA_43:=SMA(MAX(CLOSE-REF(CLOSE,1),0),3,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),3,1)*100;
DRAWTEXT(CROSS(88,XA_43) AND MA(CLOSE,3)>EMA(CLOSE,3),HIGH+0.3,168),COLORGREEN;
DRAWTEXT(REF(CLOSE,BARSLAST(REF(CROSS(MACD.DIF,MACD.DEA),1))+1)>CLOSE AND REF(MACD.DIF,BARSLAST(REF(CROSS(MACD.DIF,MACD.DEA),1))+1)<MACD.DIF AND CROSS(MACD.DIF,MACD.DEA)>0,LOW-0.02,169),COLORRED;
DRAWTEXT(REF(CLOSE,BARSLAST(REF(CROSS(KDJ.K,KDJ.D),1))+1)>CLOSE AND REF(KDJ.K,BARSLAST(REF(CROSS(KDJ.K,KDJ.D),1))+1)<KDJ.K AND CROSS(KDJ.K,KDJ.D),LOW-0.1,170),COLORBLUE;
DRAWTEXT(REF(CLOSE,BARSLAST(REF(CROSS(RSI.RSI1,RSI.RSI2),1))+1)>CLOSE AND REF(RSI.RSI1,BARSLAST(REF(CROSS(RSI.RSI1,RSI.RSI2),1))+1)<RSI.RSI1 AND CROSS(RSI.RSI1,RSI.RSI2)>0,LOW-0.18,171);
DRAWTEXT(REF(CLOSE,BARSLAST(REF(CROSS(MACD.DEA,MACD.DIF),1))+1)<CLOSE AND REF(MACD.DIF,BARSLAST(REF(CROSS(MACD.DEA,MACD.DIF),1))+1)>MACD.DIF AND CROSS(MACD.DEA,MACD.DIF)>0,HIGH+0.16,172),COLORGREEN;
DRAWTEXT(REF(CLOSE,BARSLAST(REF(CROSS(KDJ.D,KDJ.K),1))+1)<CLOSE AND REF(KDJ.K,BARSLAST(REF(CROSS(KDJ.D,KDJ.K),1))+1)>KDJ.K AND CROSS(KDJ.D,KDJ.K)>0,HIGH+0.08,173);
不同软件函数机制不同,改写效果可能有差异,请理解
另,源码中的DRAWRECTREL在屏幕固定位置画矩形,暂时修改不了,相关源码已经注释掉了,您了解一下:
N:=10;
M:=3;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
HSCOL:=100*VOL/(GETPRICE1('流通股本')/100);
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;//收盘价与N周期最低值做差,N周期最高值与N周期最低值做差,两差之间做比值。
K:=SMA(RSV,3,1);//RSV的移动平均值
D:=SMA(K,3,1);//K的移动平均值
J:=3*K-2*D;
LC := REF(CLOSE,1);//前一周期收盘价
RSI1:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;//当根K线收盘价与前一周期收盘价做差,在该差值与0之间取最大值,做N1周期移动平均。收盘价与前一周期收盘价做差值,取该差值的N1周期移动平均值,两平均值之间做比值。
RSI2:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
XA_1:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);
XA_2:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)<REF(CLOSE,3)) OR REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,1) OR REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
XA_3:=REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<=REF(CLOSE,3) AND REF(CLOSE,2)<REF(CLOSE,4) AND CLOSE>=REF(CLOSE,1);
XA_4:=(3*CLOSE+LOW+OPEN+HIGH)/6;
XA_5:=(20*XA_4+19*REF(XA_4,1)+18*REF(XA_4,2)+17*REF(XA_4,3)+16*REF(XA_4,4)+15*REF(XA_4,5)+14*REF(XA_4,6)+13*REF(XA_4,7)+12*REF(XA_4,8)+11*REF(XA_4,9)+10*REF(XA_4,10)+9*REF(XA_4,11)+8*REF(XA_4,12)+7*REF(XA_4,13)+6*REF(XA_4,14)+5*REF(XA_4,15)+4*REF(XA_4,16)+3*REF(XA_4,17)+2*REF(XA_4,18)+REF(XA_4,20))/210;
XA_6:=CLOSE-REF(CLOSE,1);
XA_7:=100*EMA(EMA(XA_6,6),6)/EMA(EMA(ABS(XA_6),6),6);
XA_8:=EMA(XA_5,13);
STICKLINE1(CLOSE>=OPEN,CLOSE,OPEN,3,0),COLORRED;
STICKLINE1(CLOSE>=OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
STICKLINE1(CLOSE<OPEN,CLOSE,OPEN,3,0),COLORFF9900;
STICKLINE1(CLOSE<OPEN,CLOSE,OPEN,0.5,0),COLORFFCC00;
STICKLINE1(XA_1,CLOSE,(OPEN+CLOSE)/2,3,0),COLORFF11FF;
STICKLINE1(XA_1,CLOSE,(OPEN+CLOSE)/2,0.5,0),COLORFFDDFF;
STICKLINE1(XA_2,CLOSE,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE1(XA_2,CLOSE,(OPEN+CLOSE)/2,0.5,0),COLORFFBBFF;
STICKLINE1(XA_3,OPEN,(OPEN+CLOSE)/2,3,0),COLOR00BB00;
STICKLINE1(XA_3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORGREEN;
XA_9:=LLV(HIGH,240);
XA_10:=100*(CLOSE-XA_3)/XA_3;
XA_11:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
XA_12:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
XA_13:=0;
XA_14:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
XA_15:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
XA_16:=IF(TROUGHBARS(C,16,1,1)=0 AND HIGH>LOW+0.04,4,0);
XA_17:=ZIGZAG(C,6,1)>REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)<=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)<=REF(ZIGZAG(C,6,1),3);
XA_18:=ZIGZAG(C,6,1)<REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)>=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)>=REF(ZIGZAG(C,6,1),3);
XA_19:=ZIGZAG(C,22,1)>REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)<=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)<=REF(ZIGZAG(C,22,1),3);
XA_20:=ZIGZAG(C,22,1)<REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)>=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)>=REF(ZIGZAG(C,22,1),3);
XA_21:=ZIGZAG(C,51,1)>REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)<=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)<=REF(ZIGZAG(C,51,1),3);
XA_22:=ZIGZAG(C,51,1)<REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)>=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)>=REF(ZIGZAG(C,51,1),3);
XA_23:=ZIGZAG(C,72,1)>REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)<=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)<=REF(ZIGZAG(C,72,1),3);
XA_24:=ZIGZAG(C,72,1)<REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)>=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)>=REF(ZIGZAG(C,72,1),3);
XA_25:=EMA(CLOSE,2)-EMA(CLOSE,150);
XA_26:=CLOSE;
BBIBOLL:(MA(XA_26,3)+MA(XA_26,6)+MA(XA_26,12)+MA(XA_26,24))/4;
UPR:BBIBOLL+M*STD(BBIBOLL,N);
DWN:BBIBOLL-M*STD(BBIBOLL,N);
XA_27:=CLOSE=HHV(CLOSE,13);
XA_28:=BARSLAST(FILTER(CROSS(0.8,XA_27),2))+1;
高点:REF(CLOSE,XA_28),POINTDOT,COLORMAGENTA;
突破:CROSS(CLOSE,REF(高点,1)),NODRAW,COLORYELLOW;
STICKLINE1(XA_28<=6,高点,高点,3,0),COLORMAGENTA;
DRAWICON(突破,LOW,飺'),COLORYELLOW;
XA_29:=CLOSE=LLV(CLOSE,13);
XA_30:=BARSLAST(FILTER(CROSS(0.8,XA_29),2))+1;
低点:REF(CLOSE,XA_30),POINTDOT,COLORGREEN;
STICKLINE1(XA_30<=6,低点,低点,3,0),COLORGREEN;
XA_31:=REF(CLOSE,1);
XA_32:=SMA(MAX(CLOSE-XA_31,0),3,1)/SMA(ABS(CLOSE-XA_31),3,1)*100;
XA_33:=EMA(CLOSE,3);
XA_34:=EMA(CLOSE,21);
DRAWICON(CROSS(XA_33,XA_34),LOW*0.99,63),COLORRED;
//DRAWRECTREL(0,480,205,589,RGB(10,1,30));
XA_35:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),FROMOPEN);
XA_36:=-SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),FROMOPEN);
XA_37:=XA_35+XA_36;
//DRAWBAND(XA_37,RGB(150,0,150),0,RGB(0,100,0)),NODRAW;
资金流量:XA_37,NODRAW;
资金比:XA_37/SUM(VOL,FROMOPEN)*100,NODRAW;
XA_38:=IF(资金比>=0,(资金比+100)/2,100-ABS((资金比-100)/2));
XA_39:=(HSCOL*0.5+REF(HSCOL,1)*0.33+REF(HSCOL,2)*0.17)*SUM(CLOSE,FROMOPEN)/FROMOPEN;
XA_40:=SUM(IF(CLOSE>REF(CLOSE,1),XA_39*VOL,0),FROMOPEN);
XA_41:=-SUM(IF(CLOSE<REF(CLOSE,1),XA_39*VOL,0),FROMOPEN);
攻击流量:XA_40+XA_41,NODRAW;
NOTEXT攻击线:攻击流量,NODRAW;
攻击比:攻击流量/SUM(VOL,FROMOPEN)*100,NODRAW,COLORRED;
XA_42:=IF(攻击比>=0,攻击比+50,100-ABS(攻击比-50));
//DRAWRECTREL(20,570,180,540,RGB(0,75,200));
//DRAWRECTREL(20,570,30,540,RGB(0,250,50));
//DRAWRECTREL(20,570,15+CONST(XA_38*150/100),540,RGB(200,50,0));
//DRAWICON_FIX(1,0,0.5,0,STRCAT(STRCAT(165,CON2STR(XA_38,2)),166)),COLORYELLOW;
//DRAWICON_FIX(1,5,0.9,0,EXTERNSTR(0,5)),COLORRED;
//DRAWICON_FIX(1,0,0.2,0,EXTERNSTR(0,5)),COLORRED;
XA_43:=SMA(MAX(CLOSE-REF(CLOSE,1),0),3,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),3,1)*100;
DRAWICON(CROSS(88,XA_43) AND MA(CLOSE,3)>EMA(CLOSE,3),HIGH+0.3,餀'),COLORGREEN;
DRAWICON(REF(CLOSE,BARSLAST(REF(CROSS(DIFF,DEA),1))+1)>CLOSE AND REF(DIFF,BARSLAST(REF(CROSS(DIFF,DEA),1))+1)<DIFF AND CROSS(DIFF,DEA)>0,LOW-0.02,69),COLORRED;
DRAWICON(REF(CLOSE,BARSLAST(REF(CROSS(K,D),1))+1)>CLOSE AND REF(K,BARSLAST(REF(CROSS(K,D),1))+1)<K AND CROSS(K,D),LOW-0.1,70),COLORBLUE;
DRAWICON(REF(CLOSE,BARSLAST(REF(CROSS(RSI1,RSI2),1))+1)>CLOSE AND REF(RSI1,BARSLAST(REF(CROSS(RSI1,RSI2),1))+1)<RSI1 AND CROSS(RSI1,RSI2)>0,LOW-0.18,71);
DRAWICON(REF(CLOSE,BARSLAST(REF(CROSS(DEA,DIFF),1))+1)<CLOSE AND REF(DIFF,BARSLAST(REF(CROSS(DEA,DIFF),1))+1)>DIFF AND CROSS(DEA,DIFF)>0,HIGH+0.16,72),COLORGREEN;
DRAWICON(REF(CLOSE,BARSLAST(REF(CROSS(D,K),1))+1)<CLOSE AND REF(K,BARSLAST(REF(CROSS(D,K),1))+1)>K AND CROSS(D,K)>0,HIGH+0.08,73);