HH1:=IF(H<REF(H,1) AND REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IF(L>REF(L,1) AND REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1)NODRAW;
LL2:=VALUEWHEN(LL1>0,LL1)NODRAW;
HH:=HHV(HIGH,1)/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;
LL:=LLV(LOW,1)/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;
H1:=IF(HH<REF(HH,1) AND LL<REF(LL,1) AND REF(OPEN,1)>CLOSE AND OPEN>CLOSE AND (HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0);
L1:=IF(LL>REF(LL,1) AND HH>REF(HH,1) AND REF(OPEN,1)<CLOSE AND OPEN<CLOSE AND (CLOSE-LLV(OPEN,0))>0,REF(LL,2),0);
H2:=VALUEWHEN(H1>0,H1),LINETHICK2;
L2:=VALUEWHEN(L1>0,L1),LINETHICK2;
K1:=IF(C>H2,-3,IF(C<L2,1,0))NODRAW;
K2:=VALUEWHEN(K1<>0,K1)NODRAW;
G:=IF(K2=1,H2,L2);
G1:=VALUEWHEN(ISLASTBAR,G);
STICKLINE(K2>0,H,L,0,1),COLORGREEN;
STICKLINE(K2>0,O,C,-1,1),COLORGREEN;
STICKLINE(K2<=0,O,C,-1,1),COLORRED;
STICKLINE(O>C AND K2<=0,H,L,0,0)COLORRED;
STICKLINE(O>C AND K2<=0,O,C,-1,0)COLORRED;
STICKLINE(O>C AND K2>0,O,C,-1,0)COLORGREEN;
DRAWSL(K2=1,G,0,1,0),COLORGREEN,VTDOT;
STICKLINE(K2=1 AND G<>REF(G,1)AND REF(K2,1)=1,G,REF(G,1),0,0),COLORGREEN,VTDOT;
DRAWSL(K2=-3,G,0,1,0),COLORYELLOW,VTDOT;
STICKLINE(K2=-3 AND G<>REF(G,1)AND REF(K2,1)=-3,G,REF(G,1),0,0),COLORYELLOW,VTDOT;
PJX:=MA(C,90);
DRAWTEXT(CROSS(K2,0) AND C<PJX,HH,'空'),COLORGREEN;
DRAWTEXT(CROSS(K2,0) AND C>=PJX,HH,'空'),COLORWHITE;
DRAWTEXT(CROSS(0,K2) AND C>PJX,LL,'多'),COLORYELLOW;
DRAWTEXT(CROSS(0,K2) AND C<=PJX,LL,'多'),COLORWHITE;
BDL:=MA(ABS(C-O),25);
DKW:=BARSLAST(CROSS(0,K2));
KKW:=BARSLAST(CROSS(K2,0));
DFY:=HHV(H,DKW);
KFY:=LLV(L,KKW);
DTK:=BARSLAST(O>REF(H,1)+BDL);
XCW:=COUNT(C<REF(L,1),DTK);
KTK:=BARSLAST(O<REF(L,1)-BDL);
SCW:=COUNT(C>REF(H,1),KTK);
DZY:=(H=DFY AND DKW<KKW AND H-MAX(C,O)>MIN(C,O)-L AND H-MAX(C,O)>BDL*2) OR (DKW<KKW AND DTK<=DKW AND C<REF(L,1) AND XCW<2);
KZY:=(L=KFY AND DKW>KKW AND MIN(C,O)-L>H-MAX(C,O) AND MIN(C,O)-L>BDL*2) OR (DKW>KKW AND KTK<=KKW AND C>REF(H,1) AND SCW<2);
VERTLINE(CROSS(0,K2),0,10000,COLORRED),POINTDOT;
VERTLINE(CROSS(K2,0),0,10000,COLORGREEN),POINTDOT;
PLAYSOUND(CROSS(0,K2),'D:\A.MP3'),ALLOWREPEAT;
PLAYSOUND(CROSS(K2,0),'D:\B.MP3'),ALLOWREPEAT;
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1:(EMA(VAR1,14)+EMA(VAR1,14)+EMA(VAR1,14)+EMA(VAR1,14))/4,COLORRED;
IF(A1>=REF(A1,1),A1,DRAWNULL),COLORRED;
IF(A1<=REF(A1,1),A1,DRAWNULL),COLORGREEN;
A2:EMA(A1,2),COLORRED;
IF(A2>=REF(A2,1),A2,DRAWNULL),COLORRED;
IF(A2<=REF(A2,1),A2,DRAWNULL),COLORGREEN;
A3:EMA(A2,2.5),COLORRED;
IF(A3>=REF(A3,1),A3,DRAWNULL),COLORRED;
IF(A3<=REF(A3,1),A3,DRAWNULL),COLORGREEN;
A4:EMA(A2,3),COLORRED;
IF(A4>=REF(A4,1),A4,DRAWNULL),COLORRED;
IF(A4<=REF(A4,1),A4,DRAWNULL),COLORGREEN;
A5:EMA(A2,4),COLORRED;
IF(A5>=REF(A5,1),A5,DRAWNULL),COLORRED;
IF(A5<=REF(A5,1),A5,DRAWNULL),COLORGREEN;
MA2:=EMA(CLOSE,5);
MA3:=EMA(CLOSE,6);
A55:=EMA(A1,18);
IF(A55>=REF(A55,1),A55,DRAWNULL),COLORMAGENTA;
IF(A55<=REF(A55,1),A55,DRAWNULL),COLORCYAN;
A56:=EMA(A55,3);
IF(A56>=REF(A56,1),A56,DRAWNULL),COLORMAGENTA;
IF(A56<=REF(A56,1),A56,DRAWNULL),COLORCYAN;
A57:EMA(A55,5),NOTEXT;
IF(A57>=REF(A57,1),A57,DRAWNULL),COLORMAGENTA;
IF(A57<=REF(A57,1),A57,DRAWNULL),COLORCYAN;
A58:EMA(A55,7),NOTEXT;
IF(A58>=REF(A58,1),A58,DRAWNULL),COLORMAGENTA;
IF(A58<=REF(A58,1),A58,DRAWNULL),COLORCYAN;
A59:EMA(A55,9),NOTEXT;
IF(A59>=REF(A59,1),A59,DRAWNULL),COLORMAGENTA;
IF(A59<=REF(A59,1),A59,DRAWNULL),COLORCYAN;
H18:= IFELSE(H<REF(H,2) AND REF(H,1)<REF(H,2),REF(H,2),0);
L18:= IFELSE(L>REF(L,2) AND REF(L,1)>REF(L,2),REF(L,2),0);
H28:=VALUEWHEN(H18>0,H18);
L28:=VALUEWHEN(L18>0,L18);
K18:=IFELSE(CLOSE>H28,-3,IFELSE(CLOSE<L28,1,0));
K28:=VALUEWHEN(K18<>0,K18);
DRAWICON(CROSS(0,K28)AND K2<0,L,8),align0,PXDN10;
DRAWTEXT(CROSS(K28,0)AND K2>0,H,'▼'),COLORWHITE,align0,PXUP10;
DRAWICON(CROSS(0,K28)AND K2>0,L,1),align0,PXDN10;
DRAWICON(CROSS(K28,0)AND K2<0,H,2),align0,PXUP10;
技术老师，我以最后四行的逻辑进行止损编程，如下：
IF CROSS(0,K28) AND K2<0 THEN
BEGIN
多头平损1:SELL((HOLDING > 0),0,marketr);
MARK:=0;
END
IF CROSS(K28,0) AND K2>0 THEN
BEGIN
空头平损1:SELLSHORT((HOLDING < 0),0,marketr);
MARK:=0;
END
这个止损逻辑没法正确显示，这是一个问题，第二个问题是能否以这个为止损帮我看看，有没有未来函数或者修正重绘的问题。
|
发表于 2025-7-20 12:49