把WH8翻譯成WH9 [文華財經]
-
咨詢內容：
如果可以，加點備注，我想理解一下編程思想，謝謝?
以下是基礎函數
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;BACKGROUNDSTYLE(1);K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;KDJU:=CROSSUP(J,D);KDJD:=CROSSDOWN(J,D);
以下是主函數#IMPORT[HOUR,1,基礎函數] AS KDJ1H??#IMPORT[HOUR,2,基礎函數] AS KDJ2H??AA中文:=KDJ1H .KDJU&&KDJ2H.KDJU;BB中文:=KDJ1H .KDJD&&KDJ2H?.KDJD;
DRAWTEXT(AA中文,C,'B')；DRAWTEXT(BB中文,C,'B')；??
?來源:程序化99
-
文華技術人員：
請參考
//X新建指標 基礎數據 Params ? ? Numeric Length(9); ? ? Numeric Length1(3); ? ? Numeric Length2(3); Vars ? ? Numeric RSV; ? ? Numeric K; ? ? Numeric D; ? ? Numeric J; ? ? Numeric KDJU; ? ? Numeric KDJD; Begin ? ? RSV = (Close - LLV(Low,Length)) / (HHV(High,Length) - LLV(Low,Length)) * 100;//收盤價與N周期最低值做差，N周期最高值與N周期最低值做差，兩差之間做比值。 ? ? K = Sma(RSV,Length1,1);//RSV的移動平均值 ? ? D = Sma(K,Length2,1);//K的移動平均值 ? ? J = 3 * K - 2 * D; ? ? BackGroundStyle(1); ? ? KDJU=Cross(J,D); ? ? KDJD=CrossDown(J,D); End
//主程序 ImPort ? ?#ImPort[Hour,1,基礎數據] AS KDJ1H ? ?#ImPort[Hour,2,基礎數據] AS KDJ2H
Vars ? ? Numeric AA中文,BB中文,A1,A2,B1,B2; Begin ? ?? ? ? A1=KDJ1H.KDJU; ? ? A2=KDJ2H.KDJU; ? ? B1=KDJ1H.KDJD; ? ? B2=KDJ2H.KDJD; ? ? AA中文=A1&&A2; ? ? BB中文=B1&&B2;
DrawText(AA中文,Close,"B"); DrawText(BB中文,Close,"B");
End?
?來源: m.kzuj.com.cn
-
文華客服：
?代碼真的大了一倍不止，能精簡點嗎？文華9中KDJ,MACD之類系統本身存在的指標引用的時候不能進行精簡嗎？
?
-
網友回復：
?請參考
//主程序 ImPort ? ?#ImPort[Hour,1,KDJ] AS KDJ1H ? ?#ImPort[Hour,2,KDJ] AS KDJ2H
Vars ? ? Numeric AA中文,BB中文,A1,A2,B1,B2; Begin ? ?? ? ? A1=KDJ1H.J; ? ? A2=KDJ1H.D; ? ? B1=KDJ2H.J; ? ? B2=KDJ2H.D; ? ? AA中文=Cross(A1,A2)&&Cross(B1,B2); ? ? BB中文=CrossDown(A1,A2)&&CrossDown(B1,B2);
DrawText(AA中文,Close,"B"); DrawText(BB中文,Close,"B");
End
?
- 網友回復： ?這樣也不行呢，因為要引用的指標太多，基礎函數我一定要有的，樓二的基礎函數部分能精簡嗎？
有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號：cxh99cxh99 進行 有償收費 編寫！
(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
相關文章
-
沒有相關內容