這是在通達信軟件上顧比倒數線的動態翻譯，幫忙轉換成WH6軟件上用的公式 [文華財經]
-
咨詢內容：
P:=21;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);進場:IF(CURRBARSCOUNT<=WH2+21,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORRED;IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORWHITE;DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),進場,'場線',COLORRED;
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);止損:IF(CURRBARSCOUNT<=H2+21,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL),COLORYELLOW;IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORWHITE;DRAWTEXT(CURRBARSCOUNT=INTPART((H2+21)*0.618),止損,'損線',COLORYELLOW;MA233:EMA(C,233),COLORGREEN;動態翻譯 ?P賦值:21WH1賦值:如果最低價=P日內最低價的最低值,返回最低價,否則返回無效數WH2賦值:上次WH1不等于無效數距今天數的最后一日取值設為常數WH3賦值:如果WH2=0,返回最高價,否則返回WH2日前的最高價的最后一日取值設為常數WH4賦值:WH2+1日前的上次最高價>WH3距今天數+WH2+1的最后一日取值設為常數WH5賦值:如果WH4=0,返回最高價,否則返回WH4日前的最高價的最后一日取值設為常數WH6賦值:WH4+1日前的上次最高價>WH5距今天數+WH4+1的最后一日取值設為常數輸出進場:如果到最后交易的周期<=WH2+21,返回如果WH6=0,返回最高價,否則返回WH6日前的最高價的最后一日取值設為常數,否則返回無效數,畫紅色如果到最后交易的周期<=WH2+1,返回如果最低價=P日內最低價的最低值,返回最低價,否則返回無效數,否則返回無效數,CIRCLEDOT,畫白色當滿足條件到最后交易的周期=(WH2+21)*0.618的整數部分時,在進場位置書寫文字,畫紅色H1賦值:如果最高價=P日內最高價的最高值,返回最高價,否則返回無效數H2賦值:上次H1不等于無效數距今天數的最后一日取值設為常數H3賦值:如果H2=0,返回最低價,否則返回H2日前的最低價的最后一日取值設為常數H4賦值:H2+1日前的上次最低價<H3距今天數+H2+1的最后一日取值設為常數H5賦值:如果H4=0,返回最低價,否則返回H4日前的最低價的最后一日取值設為常數H6賦值:H4+1日前的上次最低價<H5距今天數+H4+1的最后一日取值設為常數輸出止損:如果到最后交易的周期<=H2+21,返回如果H6=0,返回最低價,否則返回H6日前的最低價的最后一日取值設為常數,否則返回無效數,畫黃色如果到最后交易的周期<=H2+1,返回如果最高價=P日內最高價的最高值,返回最高價,否則返回無效數,否則返回無效數,CIRCLEDOT,畫白色當滿足條件到最后交易的周期=(H2+21)*0.618的整數部分時,在止損位置書寫文字,畫黃色輸出MA233:收盤價的233日指數移動平均,畫綠色?
?來源:程序化99
-
文華技術人員：
?
P:=21;
CURRBARSCOUNT:=DATACOUNT-BARPOS;
WH1:=IF(L=LLV(L,P),L,NULL);
WH2:=REFX1(BARSLAST(ISNULL(WH1)),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);
進場:IF(CURRBARSCOUNT<=WH2+21,REFX1(IF(WH6=0,H,REF(H,WH6)),10000),NULL),COLORRED;
IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,NULL),NULL),CIRCLEDOT,COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),進場,'場線',COLORRED;
H1:=IF(H=HHV(H,P),H,NULL);
H2:=REFX1(BARSLAST(ISNULL(H1)),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);
止損:IF(CURRBARSCOUNT<=H2+21,REFX1(IF(H6=0,L,REF(L,H6)),10000),NULL),COLORYELLOW;
IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H,NULL),NULL),CIRCLEDOT,COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=INTPART((H2+21)*0.618),止損,'損線',COLORYELLOW;MA233:EMA(C,233),COLORGREEN;
?
?來源: www.tumamayizhan.com
-
文華客服：
?用到軟件，不對
?
-
網友回復：
改寫是按照1樓源碼該寫的 ?WH6也能檢測通過
?
您把您認為不對的和其他軟件對比截圖上傳，我們看下
?
?
-
網友回復：
?這是通達信上的
文件名：qq截圖20170714192956.png
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 511411198 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內容
會員登錄/注冊