网友求助:

TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=MA(TR1,13);
VAR1:=REF(CLOSE,1)-REF(ATR,1);
LSX:HHV(VAR1,13),LINETHICK1,COLORLIBLUE;
LSX1:IF(C>=LSX,LSX,DRAWNULL),COLORMAGENTA,LINETHICK2;

{划K线}
STICKLINE(C>=LSX,O,C,2.5,1),COLORRED;
STICKLINE(C>=LSX AND C>=O,C,H,0,1),COLORRED;
STICKLINE(C>=LSX AND C>=O,O,L,0,1),COLORRED;
STICKLINE(C>=LSX AND C<O,O,H,0,1),COLORRED;
STICKLINE(C>=LSX AND C<O,C,L,0,1),COLORRED;

STICKLINE(C<LSX,O,C,2.5,1),COLORGREEN;
STICKLINE(C<LSX AND C>O,C,H,0,1),COLORGREEN;
STICKLINE(C<LSX AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(C<LSX AND C<O,O,H,0,1),COLORGREEN;
STICKLINE(C<LSX AND C<O,C,L,0,1),COLORGREEN;

 

 

解答如下:

TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=MA(TR1,13);
VAR1:=REF(CLOSE,1)-REF(ATR,1);
LSX:HHV(VAR1,13),LINETHICK1;
PARTLINE(LSX,C>LSX,RGB(255,0,0),C<LSX,RGB(0,255,0)),LINETHICK2;

{划K线}
STICKLINE(C>=LSX,O,C,7,1),COLORRED;
STICKLINE(C>=LSX AND C>=O,C,H,0,1),COLORRED;
STICKLINE(C>=LSX AND C>=O,O,L,0,1),COLORRED;
STICKLINE(C>=LSX AND C<O,O,H,0,1),COLORRED;
STICKLINE(C>=LSX AND C<O,C,L,0,1),COLORRED;

STICKLINE(C<LSX,O,C,7,1),COLORGREEN;
STICKLINE(C<LSX AND C>O,C,H,0,1),COLORGREEN;
STICKLINE(C<LSX AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(C<LSX AND C<O,O,H,0,1),COLORGREEN;
STICKLINE(C<LSX AND C<O,C,L,0,1),COLORGREEN;