人人爽天天爽夜夜爽qc-人人爽天天爽夜夜爽曰-人人天天爱天天做天天摸-人人天天夜夜-色网站在线-色网站在线看

您現在的位置:程序化交易>> 期貨公式>> 交易開拓者(TB)>> 開拓者知識>>正文內容

如何用自編RSI函數表示RSI值的增大或降低? [開拓者 TB]

  • 咨詢內容: 完全復制系統的RSI做了個自編RSI函數: RSIvalue(length)

    在我的一個交易策略中需要用到“前一根K線的RSI值比前面第二根K線的RSI值變大了”作為判斷條件,

    if(RSIvalue[1](length)>RSIvalue[2](length))
    {
    }

    這樣表示可以嗎?

    //------------------------------------------------------------------------
    // 簡稱: RSIvalue
    // 名稱: 計算RSI值
    // 類別: 用戶函數
    // 類型: 用戶函數
    // 輸出: 數值型
    //------------------------------------------------------------------------

    Params
    ? ? ? ? Numeric Length(14) ;
    Vars
    ? ? ? ? NumericSeries NetChgAvg( 0 );
    ? ? ? ? NumericSeries TotChgAvg( 0 );
    ? ? ? ? Numeric SF( 0 );
    ? ? ? ? Numeric Change( 0 );? ? ? ?
    ? ? ? ? Numeric ChgRatio( 0 ) ;
    ? ? ? ? NumericSeries RSIValue;
    ? ? ? ? NumericSeries CP;
    Begin
    ? ? ? ? CP=Close;
    ? ? ? ? If(CurrentBar <= Length - 1)
    ? ? ? ? {
    ? ? ? ? ? ? ? ? NetChgAvg = ( CP - CP[Length] ) / Length ;
    ? ? ? ? ? ? ? ? TotChgAvg = Average( Abs( CP - CP[1] ), Length ) ;
    ? ? ? ? }Else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? SF = 1/Length;
    ? ? ? ? ? ? ? ? Change = CP - CP[1] ;
    ? ? ? ? ? ? ? ? NetChgAvg = NetChgAvg[1] + SF * ( Change - NetChgAvg[1] ) ;
    ? ? ? ? ? ? ? ? TotChgAvg = TotChgAvg[1] + SF * ( Abs( Change ) - TotChgAvg[1] ) ;? ? ? ?
    ? ? ? ? }
    ? ? ? ?
    ? ? ? ? If( TotChgAvg <> 0 )
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = NetChgAvg / TotChgAvg;
    ? ? ? ? }else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = 0 ;
    ? ? ? ? }? ? ? ?
    ? ? ? ? RSIValue = 50 * ( ChgRatio + 1 );? ? ? ?
    ? ? ? ? Return RSIValue;
    End

    //------------------------------------------------------------------------

    ?

    ?來源:CXH99.COM

  • TB技術人員: 自已頂一下。

    或者我將RSI的自編函數中的Close用Close[1]表示,如下:
    //------------------------------------------------------------------------
    // 簡稱: RSIvalue
    // 名稱: 計算RSI值
    // 類別: 用戶函數
    // 類型: 用戶函數
    // 輸出: 數值型
    //------------------------------------------------------------------------

    Params
    ? ? ? ? Numeric Length(14) ;
    Vars
    ? ? ? ? NumericSeries NetChgAvg( 0 );
    ? ? ? ? NumericSeries TotChgAvg( 0 );
    ? ? ? ? Numeric SF( 0 );
    ? ? ? ? Numeric Change( 0 );? ? ? ?
    ? ? ? ? Numeric ChgRatio( 0 ) ;
    ? ? ? ? NumericSeries RSIValue;
    ? ? ? ? NumericSeries CP;
    Begin
    ? ? ? ? CP=Close[1];//修改了
    ? ? ? ? If(CurrentBar <= Length - 1)
    ? ? ? ? {
    ? ? ? ? ? ? ? ? NetChgAvg = ( CP - CP[Length] ) / Length ;
    ? ? ? ? ? ? ? ? TotChgAvg = Average( Abs( CP - CP[1] ), Length ) ;
    ? ? ? ? }Else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? SF = 1/Length;
    ? ? ? ? ? ? ? ? Change = CP - CP[1] ;
    ? ? ? ? ? ? ? ? NetChgAvg = NetChgAvg[1] + SF * ( Change - NetChgAvg[1] ) ;
    ? ? ? ? ? ? ? ? TotChgAvg = TotChgAvg[1] + SF * ( Abs( Change ) - TotChgAvg[1] ) ;? ? ? ?
    ? ? ? ? }
    ? ? ? ?
    ? ? ? ? If( TotChgAvg <> 0 )
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = NetChgAvg / TotChgAvg;
    ? ? ? ? }else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = 0 ;
    ? ? ? ? }? ? ? ?
    ? ? ? ? RSIValue = 50 * ( ChgRatio + 1 );? ? ? ?
    ? ? ? ? Return RSIValue;
    End

    //------------------------------------------------------------------------

    然后if條件可以這樣寫了:
    if(RSIvalue(length)>RSIvalue(length))
    {
    }

    但我實際在編譯這個RSI自編函數時無法通過編譯(將原RSI中的Close改成Close[1]之后,無法通過編譯了)

    ?

  • TB客服: 自已頂一下。

    或者我將RSI的自編函數中的Close用Close[1]表示,如下:
    //------------------------------------------------------------------------
    // 簡稱: RSIvalue
    // 名稱: 計算RSI值
    // 類別: 用戶函數
    // 類型: 用戶函數
    // 輸出: 數值型
    //------------------------------------------------------------------------

    Params
    ? ? ? ? Numeric Length(14) ;
    Vars
    ? ? ? ? NumericSeries NetChgAvg( 0 );
    ? ? ? ? NumericSeries TotChgAvg( 0 );
    ? ? ? ? Numeric SF( 0 );
    ? ? ? ? Numeric Change( 0 );? ? ? ?
    ? ? ? ? Numeric ChgRatio( 0 ) ;
    ? ? ? ? NumericSeries RSIValue;
    ? ? ? ? NumericSeries CP;
    Begin
    ? ? ? ? CP=Close[1];//修改了
    ? ? ? ? If(CurrentBar <= Length - 1)
    ? ? ? ? {
    ? ? ? ? ? ? ? ? NetChgAvg = ( CP - CP[Length] ) / Length ;
    ? ? ? ? ? ? ? ? TotChgAvg = Average( Abs( CP - CP[1] ), Length ) ;
    ? ? ? ? }Else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? SF = 1/Length;
    ? ? ? ? ? ? ? ? Change = CP - CP[1] ;
    ? ? ? ? ? ? ? ? NetChgAvg = NetChgAvg[1] + SF * ( Change - NetChgAvg[1] ) ;
    ? ? ? ? ? ? ? ? TotChgAvg = TotChgAvg[1] + SF * ( Abs( Change ) - TotChgAvg[1] ) ;? ? ? ?
    ? ? ? ? }
    ? ? ? ?
    ? ? ? ? If( TotChgAvg <> 0 )
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = NetChgAvg / TotChgAvg;
    ? ? ? ? }else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = 0 ;
    ? ? ? ? }? ? ? ?
    ? ? ? ? RSIValue = 50 * ( ChgRatio + 1 );? ? ? ?
    ? ? ? ? Return RSIValue;
    End

    //------------------------------------------------------------------------

    然后if條件可以這樣寫了:
    if(RSIvalue(length)>RSIvalue(length))
    {
    }

    但我實際在編譯這個RSI自編函數時無法通過編譯(將原RSI中的Close改成Close[1]之后,無法通過編譯了)

    ?

  • 網友回復: 自已頂一下。

    或者我將RSI的自編函數中的Close用Close[1]表示,如下:
    //------------------------------------------------------------------------
    // 簡稱: RSIvalue
    // 名稱: 計算RSI值
    // 類別: 用戶函數
    // 類型: 用戶函數
    // 輸出: 數值型
    //------------------------------------------------------------------------

    Params
    ? ? ? ? Numeric Length(14) ;
    Vars
    ? ? ? ? NumericSeries NetChgAvg( 0 );
    ? ? ? ? NumericSeries TotChgAvg( 0 );
    ? ? ? ? Numeric SF( 0 );
    ? ? ? ? Numeric Change( 0 );? ? ? ?
    ? ? ? ? Numeric ChgRatio( 0 ) ;
    ? ? ? ? NumericSeries RSIValue;
    ? ? ? ? NumericSeries CP;
    Begin
    ? ? ? ? CP=Close[1];//修改了
    ? ? ? ? If(CurrentBar <= Length - 1)
    ? ? ? ? {
    ? ? ? ? ? ? ? ? NetChgAvg = ( CP - CP[Length] ) / Length ;
    ? ? ? ? ? ? ? ? TotChgAvg = Average( Abs( CP - CP[1] ), Length ) ;
    ? ? ? ? }Else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? SF = 1/Length;
    ? ? ? ? ? ? ? ? Change = CP - CP[1] ;
    ? ? ? ? ? ? ? ? NetChgAvg = NetChgAvg[1] + SF * ( Change - NetChgAvg[1] ) ;
    ? ? ? ? ? ? ? ? TotChgAvg = TotChgAvg[1] + SF * ( Abs( Change ) - TotChgAvg[1] ) ;? ? ? ?
    ? ? ? ? }
    ? ? ? ?
    ? ? ? ? If( TotChgAvg <> 0 )
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = NetChgAvg / TotChgAvg;
    ? ? ? ? }else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = 0 ;
    ? ? ? ? }? ? ? ?
    ? ? ? ? RSIValue = 50 * ( ChgRatio + 1 );? ? ? ?
    ? ? ? ? Return RSIValue;
    End

    //------------------------------------------------------------------------

    然后if條件可以這樣寫了:
    if(RSIvalue(length)>RSIvalue(length))
    {
    }

    但我實際在編譯這個RSI自編函數時無法通過編譯(將原RSI中的Close改成Close[1]之后,無法通過編譯了)

    ?

  • 網友回復:
  • 自已頂一下。

    或者我將RSI的自編函數中的Close用Close[1]表示,如下:
    //------------------------------------------------------------------------
    // 簡稱: RSIvalue
    // 名稱: 計算RSI值
    // 類別: 用戶函數
    // 類型: 用戶函數
    // 輸出: 數值型
    //------------------------------------------------------------------------

    Params
    ? ? ? ? Numeric Length(14) ;
    Vars
    ? ? ? ? NumericSeries NetChgAvg( 0 );
    ? ? ? ? NumericSeries TotChgAvg( 0 );
    ? ? ? ? Numeric SF( 0 );
    ? ? ? ? Numeric Change( 0 );? ? ? ?
    ? ? ? ? Numeric ChgRatio( 0 ) ;
    ? ? ? ? NumericSeries RSIValue;
    ? ? ? ? NumericSeries CP;
    Begin
    ? ? ? ? CP=Close[1];//修改了
    ? ? ? ? If(CurrentBar <= Length - 1)
    ? ? ? ? {
    ? ? ? ? ? ? ? ? NetChgAvg = ( CP - CP[Length] ) / Length ;
    ? ? ? ? ? ? ? ? TotChgAvg = Average( Abs( CP - CP[1] ), Length ) ;
    ? ? ? ? }Else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? SF = 1/Length;
    ? ? ? ? ? ? ? ? Change = CP - CP[1] ;
    ? ? ? ? ? ? ? ? NetChgAvg = NetChgAvg[1] + SF * ( Change - NetChgAvg[1] ) ;
    ? ? ? ? ? ? ? ? TotChgAvg = TotChgAvg[1] + SF * ( Abs( Change ) - TotChgAvg[1] ) ;? ? ? ?
    ? ? ? ? }
    ? ? ? ?
    ? ? ? ? If( TotChgAvg <> 0 )
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = NetChgAvg / TotChgAvg;
    ? ? ? ? }else
    ? ? ? ? {
    ? ? ? ? ? ? ? ? ChgRatio = 0 ;
    ? ? ? ? }? ? ? ?
    ? ? ? ? RSIValue = 50 * ( ChgRatio + 1 );? ? ? ?
    ? ? ? ? Return RSIValue;
    End

    //------------------------------------------------------------------------

    然后if條件可以這樣寫了:
    if(RSIvalue(length)>RSIvalue(length))
    {
    }

    但我實際在編譯這個RSI自編函數時無法通過編譯(將原RSI中的Close改成Close[1]之后,無法通過編譯了)

 

有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友

可聯系技術人員 QQ: 511411198  點擊這里給我發消息進行 有償 編寫!不貴!點擊查看價格!


【字體: 】【打印文章】【查看評論

相關文章

    沒有相關內容
主站蜘蛛池模板: 日本久久综合 | 欧美性极品hd高清视频 | 777色淫网站女女 | 在线观看深夜观看网站免费 | 生活片毛片 | 亚洲精品综合久久 | 九月丁香激情综合婷婷玉立 | 又粗又黄又猛又爽大片免费 | 久久国产午夜精品理论篇小说 | 国产精品天天看特色大片不卡 | 曰本三级香港三级三级人 | 亚洲手机国产精品 | 999国内精品视频免费 | 欧美不卡视频在线 | 另类色综合| 免费高清伧理片午夜伧理片 | 一级国产精品一级国产精品片 | 欧美色爽| 午夜手机福利视频 | 曰鲁夜鲁鲁狠狠综合 | 狠狠色狠狠色综合日日小蛇 | 亚洲精品在线影院 | 人人做人人性 | 一本三道a无线码一区v小说 | 天天黄视频 | 欧美日韩成人高清在线播放 | aa黄色毛片| 日日摸夜夜添夜夜 | 国产在线视频你懂的 | 国产黄色高清视频 | 久久免费视频7 | 日韩一区二区三区四区不卡 | www.色.con| 色天使色婷婷在线影院亚洲 | 色成人在线 | 精品在线视频播放 | 这里只有精品在线播放 | 视频二区肥岳精品推荐 | 午夜高清福利 | 欧美视频在线免费 | 伊人网在线免费观看 |