人人爽天天爽夜夜爽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  點擊這里給我發消息進行 有償 編寫!不貴!點擊查看價格!


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 又黄又爽视频好爽视频 | 一级aaa级毛片午夜在线播放 | 午夜免费剧场 | 欧美亚洲国产精品久久久久 | 日本欧美亚洲 | 美女视频黄8频a美女大全软 | 色视频免费版高清在线观看 | 欧美日韩精品在线视频 | 亚洲一区二区三区影院 | 一级特级aaaa毛片免费观看 | 久久国产影视免费精品 | 欧美成人亚洲综合精品欧美激情 | 亚洲免费资源 | 多人乱p欧美4p | 97视频免费观看 | 中文字幕日韩精品一区口 | 在线播放性xxx欧美 在线播放你懂的 | 羞羞视频免费网站在线 | 另类免费视频 | 国产乱码精品一区二区三区网页版 | 国产一区二区三区不卡观 | 免费人成网555www | 国产精品www | 日韩影视在线 | 毛片a区| 毛片在线观看网站 | 亚洲国产成人久久一区二区三区 | 丁香婷婷激情 | 国产成人一区在线播放 | 中文字幕一区二区三区在线不卡 | 九九热香蕉视频 | 亚州淫片aaaa视频 | 中国女与老外在线精品 | 最近更新免费中文字幕大全 | 性欧美video视频另类 | 日韩一区二区三区视频在线观看 | 深夜在线视频免费网址 | 欧美一区二区三区免费观看视频 | 拔擦拔擦8x华人免费久久 | 中国第一毛片 | 日韩二区 |