咨詢內容：
?MA7:MA(CLOSE,M7);MA14:MA(CLOSE,M14);MA25:MA(CLOSE,M25);MA43:MA(CLOSE,M43),COLOR00EC00;MA99:MA(CLOSE,M99);WH1:=IF(L=LLV(L,P),L,DRAWNULL);WH2:=CONST(BARSLAST(WH1!=DRAWNULL));WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);WH7:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL);STICKLINE(CURRBARSCOUNT<=WH2+1 AND L=LLV(L,P),O,C,3,0),COLORRED;DRAWTEXT(CURRBARSCOUNT=WH2+10,WH7,'INE',COLORRED;DRAWTEXT(ISLASTBAR,WH7,'場線',COLORRED;WH8:IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT;H1:=IF(H=HHV(H,P),H,DRAWNULL);H2:=CONST(BARSLAST(H1!=DRAWNULL));H3:=CONST(IF(H2=0,L,REF(L,H2)));H4:=CONST(REF(BARSLAST(L<H3),H2+1)+H2+1);H5:=CONST(IF(H4=0,L,REF(L,H4)));H6:=CONST(REF(BARSLAST(L<H5),H4+1)+H4+1);H7:IF(CURRBARSCOUNT<=H2+10,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL);H8:IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H,DRAWNULL),DRAWNULL),CIRCLEDOT;DRAWTEXT(CURRBARSCOUNT=H2+10,H7,'INE',COLORYELLOW;DRAWTEXT(ISLASTBAR,H7,'動止損線',COLORYELLOW;
?
?來源:程序化99
文華技術人員：?參考： M7:7;M14:14;M25:25;M43:43;M99:99;P:2;CURRBARSCOUNT:=DATACOUNT-BARPOS;MA7:MA(CLOSE,M7);MA14:MA(CLOSE,M14);MA25:MA(CLOSE,M25);MA43:MA(CLOSE,M43),COLOR00EC00;MA99:MA(CLOSE,M99);WH1:=IF(L=LLV(L,P),L,NULL);WH2:=REFX1(BARSLAST(WH1=NULL),10000);WH3:=REFX1(IF(WH2=0,H,REF(H,WH2)),10000);WH4:=REFX1(REF(BARSLAST(H>WH3),WH2+1)+WH2+1,10000);WH5:=REFX1(IF(WH4=0,H,REF(H,WH4)),10000);WH6:=REFX1(REF(BARSLAST(H>WH5),WH4+1)+WH4+1,10000);WH7:IF(CURRBARSCOUNT<=WH2+10,REFX1(IF(WH6=0,H,REF(H,WH6)),10000),NULL);STICKLINE(CURRBARSCOUNT<=WH2+1 AND L=LLV(L,P),O,C,3,0),COLORRED;DRAWTEXT(CURRBARSCOUNT=WH2+10,WH7,'INE',COLORRED;DRAWTEXT(ISLASTBAR,WH7,'場線',COLORRED;WH8:IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,NULL),NULL),CIRCLEDOT;H1:=IF(H=HHV(H,P),H,NULL);H2:=REFX1(BARSLAST(H1=NULL),10000);H3:=REFX1(IF(H2=0,L,REF(L,H2)),10000);H4:=REFX1(REF(BARSLAST(L<H3),H2+1)+H2+1,10000);H5:=REFX1(IF(H4=0,L,REF(L,H4)),10000);H6:=REFX1(REF(BARSLAST(L<H5),H4+1)+H4+1,10000);H7:IF(CURRBARSCOUNT<=H2+10,REFX1(IF(H6=0,L,REF(L,H6)),10000),NULL);H8:IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H,NULL),NULL),CIRCLEDOT;DRAWTEXT(CURRBARSCOUNT=H2+10,H7,'INE',COLORYELLOW;DRAWTEXT(ISLASTBAR,H7,'動止損線',COLORYELLOW;
打印本文
關閉窗口