说明：涨跌台阶与生命线的结合。
{台阶生命线}
CON1:=IF(SW=1,IF(L=LLV(L,8*CL),L,DRAWNULL),IF(H=HHV(H,8*CL),H,DRAWNULL));
CON2:=IF(SW=1,CONST(BARSLAST(CON1=L))+1,CONST(BARSLAST(CON1=H))+1);
BLIN:IF(CURRBARSCOUNT<=CON2,CONST(IF(SW=1,IF(CON2=1,L,REF(L,CON2-1)),IF(CON2=1,H,REF(H,CON2-1)))),DRAWNULL);
ST0.5:IF(SW=1,BLIN*1.0809,BLIN/1.0809),COLOR89615F;
ST1:IF(SW=1,BLIN*1.1618,BLIN/1.1618),COLOR89615F;
ST1.5:IF(SW=1,IF(CONST(EXIST(C>ST1,CON2)),ST1*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST1,CON2)),ST1/1.0809,DRAWNULL)),COLOR89615F;
ST2:IF(SW=1,IF(CONST(EXIST(C>ST1.5,CON2)),ST1*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST1.5,CON2)),ST1/1.1618,DRAWNULL)),COLOR89615F;
ST2.5:IF(SW=1,IF(CONST(EXIST(C>ST2,CON2)),ST2*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST2,CON2)),ST2/1.0809,DRAWNULL)),COLOR89615F;
ST3:IF(SW=1,IF(CONST(EXIST(C>ST2.5,CON2)),ST2*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST2.5,CON2)),ST2/1.1618,DRAWNULL)),COLOR89615F;
ST3.5:IF(SW=1,IF(CONST(EXIST(C>ST3,CON2)),ST3*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST3,CON2)),ST3/1.0809,DRAWNULL)),COLOR89615F;
ST4:IF(SW=1,IF(CONST(EXIST(C>ST3.5,CON2)),ST3*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST3.5,CON2)),ST3/1.1618,DRAWNULL)),COLOR89615F;
ST4.5:IF(SW=1,IF(CONST(EXIST(C>ST4,CON2)),ST4*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST4,CON2)),ST4/1.0809,DRAWNULL)),COLOR89615F;
ST5:IF(SW=1,IF(CONST(EXIST(C>ST4.5,CON2)),ST4*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST4.5,CON2)),ST4/1.1618,DRAWNULL)),COLOR89615F;
ST5.5:IF(SW=1,IF(CONST(EXIST(C>ST5,CON2)),ST5*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST5,CON2)),ST5/1.0809,DRAWNULL)),COLOR89615F;
ST6:IF(SW=1,IF(CONST(EXIST(C>ST5.5,CON2)),ST5*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST5.5,CON2)),ST5/1.1618,DRAWNULL)),COLOR89615F;
ST6.5:IF(SW=1,IF(CONST(EXIST(C>ST6,CON2)),ST6*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST6,CON2)),ST6/1.0809,DRAWNULL)),COLOR89615F;
ST7:IF(SW=1,IF(CONST(EXIST(C>ST6.5,CON2)),ST6*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST6.5,CON2)),ST6/1.1618,DRAWNULL)),COLOR89615F;
ST7.5:IF(SW=1,IF(CONST(EXIST(C>ST7,CON2)),ST7*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST7,CON2)),ST7/1.0809,DRAWNULL)),COLOR89615F;
ST8:IF(SW=1,IF(CONST(EXIST(C>ST7.5,CON2)),ST7*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST7.5,CON2)),ST7/1.1618,DRAWNULL)),COLOR89615F;
ST8.5:IF(SW=1,IF(CONST(EXIST(C>ST8,CON2)),ST8*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST8,CON2)),ST8/1.0809,DRAWNULL)),COLOR89615F;
ST9:IF(SW=1,IF(CONST(EXIST(C>ST8.5,CON2)),ST8*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST8.5,CON2)),ST8/1.1618,DRAWNULL)),COLOR89615F;
ST9.5:IF(SW=1,IF(CONST(EXIST(C>ST9,CON2)),ST9*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST9,CON2)),ST9/1.0809,DRAWNULL)),COLOR89615F;
ST10:IF(SW=1,IF(CONST(EXIST(C>ST9.5,CON2)),ST9*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST9.5,CON2)),ST9/1.1618,DRAWNULL)),COLOR89615F;
ST10.5:IF(SW=1,IF(CONST(EXIST(C>ST10,CON2)),ST10*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST10,CON2)),ST10/1.0809,DRAWNULL)),COLOR89615F;
ST11:IF(SW=1,IF(CONST(EXIST(C>ST10.5,CON2)),ST10*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST10.5,CON2)),ST10/1.1618,DRAWNULL)),COLOR89615F;
ST11.5:IF(SW=1,IF(CONST(EXIST(C>ST11,CON2)),ST11*1.0809,DRAWNULL),IF(CONST(EXIST(C<ST11,CON2)),ST11/1.0809,DRAWNULL)),COLOR89615F;
ST12:IF(SW=1,IF(CONST(EXIST(C>ST11.5,CON2)),ST11*1.1618,DRAWNULL),IF(CONST(EXIST(C<ST11.5,CON2)),ST11/1.1618,DRAWNULL)),COLOR89615F;
VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
{DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.998),1);
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.013),2);}
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.984),'进 '),COLORFF00FF;
DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.035),'出 '),COLOR3AFF00;
分界线:MA(CLOSE,21),COLORYELLOW;
STICKLINE(C>=分界线 AND C>=O,C,O,5,0),COLORRED;
STICKLINE(C>=分界线 AND C>=O,H,L,0,0),COLORRED;
STICKLINE(C>=分界线 AND C<O,C,O,5,1),COLORRED;
STICKLINE(C>=分界线 AND C<O,O,H,0,0),COLORRED;
STICKLINE(C>=分界线 AND C<O,C,L,0,0),COLORRED;
STICKLINE(C<分界线 AND C>O,C,O,5,1),COLORFFFF00;
STICKLINE(C<分界线 AND C<=O,C,O,5,1),COLORFFFF00;
STICKLINE(C<分界线 AND C<=O,H,L,0,1),COLORFFFF00;
STICKLINE(C<分界线 AND C>O,C,H,0,1),COLORFFFF00;
STICKLINE(C<分界线 AND C>O,O,L,0,1),COLORFFFF00; |
