{填入代码、买入时间、价位,至今情况用后面括号中的替换前面}
代码:=1;{CODELIKE('002716')};
入池时间:=YEAR{年}=2017 AND MONTH{月}=12 AND DAY{日}=12;
入池价位:=REF(C,BARSLAST(入池时间));
测试天数:=IF(BARSLAST(入池时间)>20,20,BARSLAST(入池时间));
{--------------------------------------------------------------------------------}
个股入池时间:=IF(代码,入池时间,0);
个股入池价格:=IF(个股入池时间,入池价位,0);
买入价:=REF(入池价位,BARSLAST(入池时间));
测试止价:=IF(BARSLAST(个股入池时间)+1>=1,CONST(REF(C,(BARSLAST(个股入池时间)-测试天数))),0);
最高价条件:=IF(BARSLAST(个股入池时间)+1>=1,H=FINDHIGH(H,BARSLAST(个股入池时间)-测试天数,测试天数,1),0);
最高价横线:=IF(BARSLAST(最高价条件)>=0 AND BARSLAST(个股入池时间)+1>=1,CONST(REF(H,BARSLAST(最高价条件))),0);
最低价条件:=IF(BARSLAST(个股入池时间)+1>=1,L=FINDLOW(L,BARSLAST(个股入池时间)-测试天数,测试天数,1),0);
最低价横线:=IF(BARSLAST(最低价条件)+1>=1 AND BARSLAST(个股入池时间)+1>=1,CONST(REF(L,BARSLAST(最低价条件))),0);
{---------------------------------------------------------------------------------};
持股天数:IF(代码,测试天数,DRAWNULL),NODRAW;
最高价:IF(代码,最高价横线,DRAWNULL),COLOR00009B;
最低价:IF(代码,最低价横线,DRAWNULL),COLOR009B00;
入池价:IF(代码,买入价,DRAWNULL),COLORGREEN;
止价:IF(代码,测试止价,DRAWNULL),COLORMAGENTA;
买入时间:=IF(代码,入池时间,DRAWNULL);
STICKLINE(CROSS(买入时间,0.5),IF(止价>入池价,止价,入池价),最高价,0,0),COLOR00009B;
STICKLINE(ISLASTBAR,IF(止价>入池价,止价,入池价),最高价,0,0),COLOR00009B;
STICKLINE(CROSS(买入时间,0.5),IF(止价<入池价,止价,入池价),最低价,0,0),COLOR009B00;
STICKLINE(ISLASTBAR,IF(止价<入池价,止价,入池价),最低价,0,0),COLOR009B00;
DRAWBAND(止价,RGB(155,0,0),入池价,RGB(0,155,0));
DRAWBAND(入池价,RGB(0,255,0),入池价,RGB(0,255,0));
DRAWBAND(止价,RGB(255,0,255),止价,RGB(255,0,255));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
现赢利:(止价-入池价)/入池价*100,NODRAW;
曾浮赢:(最高价-入池价)/入池价*100,NODRAW;
曾浮亏:(最低价-入池价)/入池价*100,NODRAW;
金额:=入池价*现赢利/100;
WW1:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','曾浮赢'),'】'),':'),CON2STR(曾浮赢,2)),'﹪');
WW2:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','曾浮亏'),'】'),':'),CON2STR(曾浮亏,2)),'﹪');
WW3:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','现赢利'),'】'),':'),CON2STR(现赢利,2)),'﹪');
WW4:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','现亏损'),'】'),':'),CON2STR(现赢利,2)),'﹪');
WW5:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','利润'),'】'),':'),CON2STR(金额,2)),'元');
WW6:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','亏损'),'】'),':'),CON2STR(金额,2)),'元');
DRAWTEXT_FIX(HHV(H,80)=最高价,0.8,0,0,WW1),COLOR00009B;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0,0.83,0,0,WW1),COLOR00009B;
DRAWTEXT_FIX(HHV(H,80)=最高价,0.64,0,0,WW2),COLOR009B00;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0,0.67,0,0,WW2),COLOR009B00;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价>=入池价,0.64,1,0,WW3),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价>=入池价,0.67,1,0,WW3),COLORRED;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价<入池价,0.64,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价<入池价,0.67,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价>=入池价,0.8,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价>=入池价,0.83,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价<入池价,0.8,1,0,WW6),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价<入池价,0.83,1,0,WW6),COLORWHITE;
DRAWKLINE(H,O,L,C);