麻煩幫忙加上止盈止損　[文華財經]

MADAY20:MA(C,20);

MADAY20L:MA(L,20);

ZD:=C>MADAY20H;

ZK:=C<MADAY20L;

PD:=CROSS(MADAY20L,C);

PP:=CROSS(MADAY20,C);

PPP:=CROSS(C,MADAY20);

PK:=CROSS(C,MADAY20H);

BZ:(MADAY20H-MADAY20L)/MADAY20L*100,NODRAW;

N:=BARSLAST(CROSS(BKVOL,0.5))+1;

N1:=BARSLAST(CROSS(SKVOL,0.5))+1;

PK&&(H>REF(REF(C,BARSLAST(PK)),1)&&MADAY20H>REF(REF(MADAY20H,BARSLAST(PK)),1))&&BKVOL=0,BK(1);

BKVOL=1&&C<REF(LLV(L,2),BARSBK),SP(1);

C>BKPRICE&&PP&&BKVOL=1,SP(1);

加上跟蹤止損（加倉后也按此執行（BKVOL>=1）：進場后，沒有達到止損價，

（1）第一次進場后的最高價與第一次進場價上漲在0-2%內執行初始止損（BKVOL=1&&C<REF(LLV(L,2),BARSBK),SP(1);）

（2）第一次進場后的最高價與第一次進場價上漲在2-5%內則將止損價上移到第一次進場K線的最高價；

（3）第一次進場后的最高價與第一次進場價上漲在5-7%內則將止損價上移到第一次進場價上漲2%處；

（4）第一次進場后的最高價與第一次進場價上漲在7-10%內則將止損價上移到第一次進場價上漲5%處；

（5）第一次進場后的最高價與第一次進場價上漲在10-12%內則將止損價上移到第一次進場價上漲7%處；

C>BKPRICE*1.025&&COUNT(BARSBK=1,N)<=3&&ISLASTBK=1,BK(1);

加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價小于進場價，平倉出場。

C>BKPRICE*1.02&&COUNT(BARSBK=1,N)<=3&&ISLASTBK=1,BK(1);

加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價小于進場價，平倉出場。

KD:=VALUEWHEN(PK&&NOT(H>REF(REF(C,BARSLAST(PK)),1)&&MADAY20H>REF(REF(MADAY20H,BARSLAST(PK)),1)),C);

BKVOL=0&&C>MADAY20H&&C>1.025*KD,BK(1);

PP&&BKVOL>=2,SP(BKVOL);

PD&&(L<REF(REF(L,BARSLAST(PD)),1)&&MADAY20L<REF(REF(MADAY20L,BARSLAST(PD)),1))&&SKVOL=0,SK(1);

SKVOL=1&&C>REF(HHV(H,2),BARSSK),BP(1);

C<SKPRICE&&PPP&& SKVOL=1,BP(1);/

加上跟蹤止損（加倉后也按此執行（SKVOL>=1）：進場后，沒有達到止損價，

（1）第一次進場后的最高價與第一次進場價下跌在0-2%內執行初始止損SKVOL=1&&C>REF(HHV(H,2),BARSSK),BP(1);

（2）第一次進場后的最低價與第一次進場價下跌在2-5%內則將止損價下移到第一次進場K線的最低價；

（3）第一次進場后的最低價與第一次進場價下跌在5-7%內則將止損價下移到第一次進場價下跌2%處；

（4）第一次進場后的最低價與第一次進場價下跌在7-10%內則將止損價下移到第一次進場價下跌5%處；

（5）第一次進場后的最低價與第一次進場價下跌在10-12%內則將止損價下移到第一次進場價下跌7%處；

C<SKPRICE*0.975&&COUNT(BARSSK=1,N1)<=3&&ISLASTSK=1,SK(1);

加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價大于進場價，平倉出場。

C<SKPRICE*0.97&&COUNT(BARSSK=1,N1)<=3&&ISLASTSK=1,SK(1);

加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價大于進場價，平倉出場。

KK:=VALUEWHEN(PD&&NOT(L<REF(REF(L,BARSLAST(PD)),1)&&MADAY20L<REF(REF(MADAY20L,BARSLAST(PD)),1)),C);

SKVOL=0&&C<MADAY20L&&C<0.975*KK,SK(1);

PPP&&SKVOL>=2,BP(SKVOL);

源碼：

MADAY20H:MA(H,20);
MADAY20:MA(C,20);
MADAY20L:MA(L,20);
ZD:=C>MADAY20H;
ZK:=C<MADAY20L;
PD:=CROSS(MADAY20L,C);
PP:=CROSS(MADAY20,C);
PPP:=CROSS(C,MADAY20);
PK:=CROSS(C,MADAY20H);
BZ:(MADAY20H-MADAY20L)/MADAY20L*100,NODRAW;
N:=BARSLAST(CROSS(BKVOL,0.5))+1;
N1:=BARSLAST(CROSS(SKVOL,0.5))+1;
PK&&(H>REF(REF(C,BARSLAST(PK)),1)&&MADAY20H>REF(REF(MADAY20H,BARSLAST(PK)),1))&&BKVOL=0,BK(1);
BKVOL=1&&C<REF(LLV(L,2),BARSBK),SP(1);
C>BKPRICE&&PP&&BKVOL=1,SP(1);
HHV(H,N)-BKPRICE>0&&HHV(H,N)-BKPRICE<0.02*BKPRICE&&BKVOL=1&&C<REF(LLV(L,2),BARSBK),SP(1);
HHV(H,N)-BKPRICE>=0.02*BKPRICE&&HHV(H,N)-BKPRICE<0.05*BKPRICE&&C<REF(H,N),SP(1);
HHV(H,N)-BKPRICE>=0.05*BKPRICE&&HHV(H,N)-BKPRICE<0.07*BKPRICE&&C<BKPRICE*(1+0.02),SP(1);
HHV(H,N)-BKPRICE>=0.07*BKPRICE&&HHV(H,N)-BKPRICE<0.10*BKPRICE&&C<BKPRICE*(1+0.05),SP(1);
HHV(H,N)-BKPRICE>=0.10*BKPRICE&&HHV(H,N)-BKPRICE<0.12*BKPRICE&&C<BKPRICE*(1+0.07),SP(1);
C>BKPRICE*1.025&&COUNT(BARSBK=1,N)<=3&&ISLASTBK=1,BK(1);
//加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價小于進場價，平倉出場
BARSBK>=4&&C<BKPRICE,SP(BKVOL);
C>BKPRICE*1.02&&COUNT(BARSBK=1,N)<=3&&ISLASTBK=1,BK(1);
//加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價小于進場價，平倉出場
KD:=VALUEWHEN(PK&&NOT(H>REF(REF(C,BARSLAST(PK)),1)&&MADAY20H>REF(REF(MADAY20H,BARSLAST(PK)),1)),C);
BKVOL=0&&C>MADAY20H&&C>1.025*KD,BK(1);
PP&&BKVOL>=2,SP(BKVOL);

PD&&(L<REF(REF(L,BARSLAST(PD)),1)&&MADAY20L<REF(REF(MADAY20L,BARSLAST(PD)),1))&&SKVOL=0,SK(1);
SKVOL=1&&C>REF(HHV(H,2),BARSSK),BP(1);
C<SKPRICE&&PPP&& SKVOL=1,BP(1);
SKPRICE-LLV(L,N1)>0&&SKPRICE-LLV(L,N1)<0.02*SKPRICE&&SKVOL=1&&C>REF(HHV(H,2),BARSSK),BP(1);
SKPRICE-LLV(L,N1)>=0.02*SKPRICE&&SKPRICE-LLV(L,N1)<0.05*SKPRICE&&C>REF(L,N1),BP(1);
SKPRICE-LLV(L,N1)>=0.05*SKPRICE&&SKPRICE-LLV(L,N1)<0.07*SKPRICE&&C>SKPRICE*(1-0.02),BP(1);
SKPRICE-LLV(L,N1)>=0.07*SKPRICE&&SKPRICE-LLV(L,N1)<0.10*SKPRICE&&C>SKPRICE*(1-0.05),BP(1);
SKPRICE-LLV(L,N1)>=0.10*SKPRICE&&SKPRICE-LLV(L,N1)<0.12*SKPRICE&&C>SKPRICE*(1-0.07),BP(1);
C<SKPRICE*0.975&&COUNT(BARSSK=1,N1)<=3&&ISLASTSK=1,SK(1);
//加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價大于進場價，平倉出場
BARSSK>=4&&C>SKPRICE,BP(SKVOL);
C<SKPRICE*0.97&&COUNT(BARSSK=1,N1)<=3&&ISLASTSK=1,SK(1);
//加上時間止損：進場后運行3根K線后（不包括進場K線），收盤價大于進場價，平倉出場
KK:=VALUEWHEN(PD&&NOT(L<REF(REF(L,BARSLAST(PD)),1)&&MADAY20L<REF(REF(MADAY20L,BARSLAST(PD)),1)),C);
SKVOL=0&&C<MADAY20L&&C<0.975*KK,SK(1);
PPP&&SKVOL>=2,BP(SKVOL);