始めましょう

テクニカル分析以外

zigzagストラテジーをつくる⑥｜ストラテジーを作成する1前回までのコードで、 上位足のZigZagではPivotの確定が遅く ・利益の上がるストラテジーはできない ・ZigZagの良さが活かされない ・フィボナッチの良さが活かされない ということがわかりました。 "ZigZagやフィボナッチの良さ" とは、 "価格にダイレクトである" という点です。 テクニカルが算出した数値が そのまま利確や損切りのラインになる。 多くのテクニカルは、 算出された値が実際の価格から乖離することが多く エントリーやイグジットの判断が遅れることが多々あります。 今回のZigZagストラテジーに魅力を感じたのは、 そんなところもあったりします。 ということで、 諦めずにストラテジーの開発を続けます。 今回は、以下の調整を行っています。 ・TradingView由来のZigZagに変更 ・ZigZag描画のズレを調整（描画を後ろにズラしただけ） ・フィボナッチのリペイント機能を実装 ・売買機能の調整 ・同じチャートパターンで複数回エントリーしないように調整 売買に指値を使うように調整しました。 これも、"価格にダイレクト" を活かすためです。 次回は、あまりにも小さなZigZagである場合の エントリーを制限する機能を実装する予定です。 その次は、取引量の調整をする機能ですね。 「損切り＝資金の１％」となるようにしたいと思います。 今日のコードを以下に貼り付けておきます。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ＝＝＝＝＝ //@version=4 // study("Zig Zag 勉強中", overlay=true) strategy( title='ZigZag PA Strategy 勉強中', shorttitle='S', overlay=true, pyramiding=0, initial_capital=100000 ) dev_threshold = input( title="Deviation (%)", type=input.float, defval=0, minval=0, maxval=100 ) depth = input( title="Depth", type=input.integer, defval=6, minval=1, maxval=10 ) // pivotを算出する pivots(src, length, isHigh) => 　p = nz(src［length］) 　if length == 0 　　［bar_index, p］ 　else 　　isFound = true 　　for i = 0 to length - 1 　　　if isHigh and src［i］ > p 　　　　isFound := false 　　　if not isHigh and src［i］ < p 　　　　isFound := false 　　for i = length + 1 to 2 * length 　　　if isHigh and src［i］ >= p 　　　　isFound := false 　　　if not isHigh and src［i］ <= p 　　　　isFound := false 　　 　　if isFound and length * 2 <= bar_index 　　　［bar_index［length］, p］ 　　else 　　　［int(na), float(na)］ ［iH, pH］ = pivots( high, floor(depth / 2), true ) ［iL, pL］ = pivots( low, floor(depth / 2), false ) // 変化率を算出する関数 calc_dev(base_price, price) => 　100 * (price - base_price) / base_price // 前回のpivotの情報を格納 var line lineLast = na　 // lineのid (実際はidではなく識別している何か) var float pLast = 0　　 // price var bool isHighLast = true // High か Low か var int linesCount = 0 var bool isNewPivot = false // pivotを確認する関数 pivotFound(dev, isHigh, price) => 　if linesCount == 0 　　［line(na), isHigh, true］ 　else 　　if abs(dev) >= dev_threshold 　　　［line(na), isHigh, true］ 　　else 　　　［line(na), isHighLast, false］ // 描画処理 if not na(pH) and not na(pL) and pH == pL 　dev1 = calc_dev(pLast, pH) 　［id2, isHigh2, isNew2］ = pivotFound(dev1, true, pH) 　if isNew2 　　linesCount := linesCount + 1 　　isHighLast := isHigh2 　　isNewPivot := true 　　pLast := pH 　dev2 = calc_dev(pLast, pL) 　［id1, isHigh1, isNew1］ = pivotFound(dev2, false, pL) 　if isNew1 　　linesCount := linesCount + 1 　　isHighLast := isHigh1 　　isNewPivot := true 　　pLast := pL else 　if not na(pH) 　　dev1 = calc_dev(pLast, pH) 　　［id, isHigh, isNew］ = pivotFound(dev1, true, pH) 　　if isNew 　　　linesCount := linesCount + 1 　　　isHighLast := isHigh 　　　isNewPivot := true 　　　pLast := pH 　else 　　if not na(pL) 　　　dev2 = calc_dev(pLast, pL) 　　　［id, isHigh, isNew］ = pivotFound(dev2, false, pL) 　　　if isNew 　　　　linesCount := linesCount + 1 　　　　isHighLast := isHigh 　　　　isNewPivot := true 　　　　pLast := pL // 追加箇所 zigzag = pLast［1］!=pLast ? pLast : na plot( zigzag ,color=color.red ,linewidth=3 ,title='zigzag' ,offset=-1*floor(depth / 2) ) bgcolor( isHighLast ? color.gray : color.white ,offset=-1*floor(depth / 2) ) // ジグザグが発生したときのジグザグの値を取得 float x = na float a = na float b = na float c = na float d = na exist_zigzag = not na( zigzag ) and not isHighLast==isHighLast［1］ repaint = not na( zigzag ) and isHighLast==isHighLast［1］ x := exist_zigzag ? a［1］ : x［1］ a := exist_zigzag ? b［1］ : a［1］ b := exist_zigzag ? c［1］ : b［1］ c := exist_zigzag ? d［1］ : c［1］ d := exist_zigzag ? zigzag : not repaint ? d［1］ :　 isHighLast and pLast > pLast［1］ ? zigzag : not isHighLast and pLast < pLast［1］ ? zigzag : d［1］ showPatterns = input( true, title='Show Patterns' ) showFib0000 = input( title='Display Fibonacci 0.000:', type=input.bool, defval=true ) showFib0236 = input( title='Display Fibonacci 0.236:', type=input.bool, defval=true ) showFib0382 = input( title='Display Fibonacci 0.382:', type=input.bool, defval=true ) showFib0500 = input( title='Display Fibonacci 0.500:', type=input.bool, defval=true ) showFib0618 = input( title='Display Fibonacci 0.618:', type=input.bool, defval=true ) showFib0764 = input( title='Display Fibonacci 0.764:', type=input.bool, defval=true ) showFib1000 = input( title='Display Fibonacci 1.000:', type=input.bool, defval=true ) fib_range = abs(d-c) fib_0000 = not showFib0000 ? na : d > c ? d - ( fib_range * 0.000 ) : d + ( fib_range * 0.000 ) fib_0236 = not showFib0236 ? na : d > c ? d - ( fib_range * 0.236 ) : d + ( fib_range * 0.236 ) fib_0382 = not showFib0382 ? na : d > c ? d - ( fib_range * 0.382 ) : d + ( fib_range * 0.382 ) fib_0500 = not showFib0500 ? na : d > c ? d - ( fib_range * 0.500 ) : d + ( fib_range * 0.500 ) fib_0618 = not showFib0618 ? na : d > c ? d - ( fib_range * 0.618 ) : d + ( fib_range * 0.618 ) fib_0764 = not showFib0764 ? na : d > c ? d - ( fib_range * 0.764 ) : d + ( fib_range * 0.764 ) fib_1000 = not showFib1000 ? na : d > c ? d - ( fib_range * 1.000 ) : d + ( fib_range * 1.000 ) plot( title='Fib 0.000', series=fib_0000 ,color=fib_0000 != fib_0000［1］ ? na : color.black ,offset=-1*floor(depth / 2) ) plot( title='Fib 0.236', series=fib_0236 ,color=fib_0236 != fib_0236［1］ ? na : color.red ,offset=-1*floor(depth / 2) ) plot( title='Fib 0.382', series=fib_0382 ,color=fib_0382 != fib_0382［1］ ? na : color.olive ,offset=-1*floor(depth / 2) ) plot( title='Fib 0.500', series=fib_0500 ,color=fib_0500 != fib_0500［1］ ? na : color.lime ,offset=-1*floor(depth / 2) ) plot( title='Fib 0.618', series=fib_0618 ,color=fib_0618 != fib_0618［1］ ? na : color.teal ,offset=-1*floor(depth / 2) ) plot( title='Fib 0.764', series=fib_0764 ,color=fib_0764 != fib_0764［1］ ? na : color.blue ,offset=-1*floor(depth / 2) ) plot( title='Fib 1.000', series=fib_1000 ,color=fib_1000 != fib_1000［1］ ? na : color.black ,offset=-1*floor(depth / 2) ) xab = ( abs( b - a ) / abs( x - a ) ) xad = ( abs( a - d ) / abs( x - a ) ) abc = ( abs( b - c ) / abs( a - b ) ) bcd = ( abs( c - d ) / abs( b - c ) ) // ５つの点の比率からパターンを判断する関数 isBat(_mode)=> 　_xab = xab >= 0.382 and xab <= 0.5 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.618 and bcd <= 2.618 　_xad = xad <= 0.618 and xad <= 1.000　// 0.886 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiBat(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.886　// 0.618 　_abc = abc >= 1.000 and abc <= 2.618　// 1.13 --> 2.618 　_bcd = bcd >= 1.618 and bcd <= 2.618　// 2.0 --> 2.618 　_xad = xad >= 0.886 and xad <= 1.000　// 1.13 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAltBat(_mode)=> 　_xab = xab <= 0.382 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 2.0 and bcd <= 3.618 　_xad = xad <= 1.13 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isButterfly(_mode)=> 　_xab = xab <= 0.786 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.618 and bcd <= 2.618 　_xad = xad >= 1.27 and xad <= 1.618 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiButterfly(_mode)=> 　_xab = xab >= 0.236 and xab <= 0.886　// 0.382 - 0.618 　_abc = abc >= 1.130 and abc <= 2.618　// 1.130 - 2.618 　_bcd = bcd >= 1.000 and bcd <= 1.382　// 1.27 　_xad = xad >= 0.500 and xad <= 0.886　// 0.618 - 0.786 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isABCD(_mode)=> 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.13 and bcd <= 2.618 　_abc and _bcd and (_mode == 1 ? d < c : d > c) isGartley(_mode)=> 　_xab = xab >= 0.5 and xab <= 0.618 // 0.618 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.13 and bcd <= 2.618 　_xad = xad >= 0.75 and xad <= 0.875 // 0.786 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiGartley(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.886　// 0.618 -> 0.786 　_abc = abc >= 1.000 and abc <= 2.618　// 1.130 -> 2.618 　_bcd = bcd >= 1.500 and bcd <= 5.000　// 1.618 　_xad = xad >= 1.000 and xad <= 5.000　// 1.272 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isCrab(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.875　// 0.886 　_abc = abc >= 0.382 and abc <= 0.886　 　_bcd = bcd >= 2.000 and bcd <= 5.000　// 3.618 　_xad = xad >= 1.382 and xad <= 5.000　// 1.618 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiCrab(_mode)=> 　_xab = xab >= 0.250 and xab <= 0.500　// 0.276 -> 0.446 　_abc = abc >= 1.130 and abc <= 2.618　// 1.130 -> 2.618 　_bcd = bcd >= 1.618 and bcd <= 2.618　// 1.618 -> 2.618 　_xad = xad >= 0.500 and xad <= 0.750　// 0.618 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isShark(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.875　// 0.5 --> 0.886 　_abc = abc >= 1.130 and abc <= 1.618　// 　_bcd = bcd >= 1.270 and bcd <= 2.240　// 　_xad = xad >= 0.886 and xad <= 1.130　// 0.886 --> 1.13 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiShark(_mode)=> 　_xab = xab >= 0.382 and xab <= 0.875　// 0.446 --> 0.618 　_abc = abc >= 0.500 and abc <= 1.000　// 0.618 --> 0.886 　_bcd = bcd >= 1.250 and bcd <= 2.618　// 1.618 --> 2.618 　_xad = xad >= 0.500 and xad <= 1.250　// 1.130 --> 1.130 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) is5o(_mode)=> 　_xab = xab >= 1.13 and xab <= 1.618 　_abc = abc >= 1.618 and abc <= 2.24 　_bcd = bcd >= 0.5 and bcd <= 0.625 // 0.5 　_xad = xad >= 0.0 and xad <= 0.236 // negative? 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isWolf(_mode)=> 　_xab = xab >= 1.27 and xab <= 1.618 　_abc = abc >= 0 and abc <= 5 　_bcd = bcd >= 1.27 and bcd <= 1.618 　_xad = xad >= 0.0 and xad <= 5 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isHnS(_mode)=> 　_xab = xab >= 2.0 and xab <= 10 　_abc = abc >= 0.90 and abc <= 1.1 　_bcd = bcd >= 0.236 and bcd <= 0.88 　_xad = xad >= 0.90 and xad <= 1.1 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isConTria(_mode)=> 　_xab = xab >= 0.382 and xab <= 0.618 　_abc = abc >= 0.382 and abc <= 0.618 　_bcd = bcd >= 0.382 and bcd <= 0.618 　_xad = xad >= 0.236 and xad <= 0.764 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isExpTria(_mode)=> 　_xab = xab >= 1.236 and xab <= 1.618 　_abc = abc >= 1.000 and abc <= 1.618 　_bcd = bcd >= 1.236 and bcd <= 2.000 　_xad = xad >= 2.000 and xad <= 2.236 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) // 売りパターンが出現したところに印を表示 plotshape( not showPatterns ? na : isABCD(-1) and not isABCD(-1)［1］, text=" AB=CD", title='Bear ABCD', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0, offset=-2 ) plotshape( not showPatterns ? na : isBat(-1) and not isBat(-1)［1］, text="Bat", title='Bear Bat', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0, offset=-2 ) plotshape( not showPatterns ? na : isAntiBat(-1) and not isAntiBat(-1)［1］, text="Anti Bat", title='Bear Anti Bat', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0, offset=-2 ) plotshape( not showPatterns ? na : isAltBat(-1) and not isAltBat(-1)［1］, text="Alt Bat", title='Bear Alt Bat', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isButterfly(-1) and not isButterfly(-1)［1］, text="Butterfly", title='Bear Butterfly', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isAntiButterfly(-1) and not isAntiButterfly(-1)［1］, text="Anti Butterfly", title='Bear Anti Butterfly', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isGartley(-1) and not isGartley(-1)［1］, text="Gartley", title='Bear Gartley', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isAntiGartley(-1) and not isAntiGartley(-1)［1］, text="Anti Gartley", title='Bear Anti Gartley', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isCrab(-1) and not isCrab(-1)［1］, text="Crab", title='Bear Crab', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isAntiCrab(-1) and not isAntiCrab(-1)［1］, text="Anti Crab", title='Bear Anti Crab', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isShark(-1) and not isShark(-1)［1］, text="Shark", title='Bear Shark', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isAntiShark(-1) and not isAntiShark(-1)［1］, text="Anti Shark", title='Bear Anti Shark', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : is5o(-1) and not is5o(-1)［1］, text="5-O", title='Bear 5-O', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isWolf(-1) and not isWolf(-1)［1］, text="Wolf Wave", title='Bear Wolf Wave', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isHnS(-1) and not isHnS(-1)［1］, text="Head and Shoulders", title='Bear Head and Shoulders', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isConTria(-1) and not isConTria(-1)［1］, text="Contracting Triangle", title='Bear Contracting triangle', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) plotshape( not showPatterns ? na : isExpTria(-1) and not isExpTria(-1)［1］, text="Expanding Triangle", title='Bear Expanding Triangle', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0 ) // 買いパターンが出現したところに印を表示 plotshape( not showPatterns ? na : isABCD(1) and not isABCD(1)［1］, text="AB=CD ", title='Bull ABCD', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isBat(1) and not isBat(1)［1］, text="Bat", title='Bull Bat', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isAntiBat(1) and not isAntiBat(1)［1］, text="Anti Bat", title='Bull Anti Bat', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isAltBat(1) and not isAltBat(1)［1］, text="Alt Bat", title='Bull Alt Bat', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isButterfly(1) and not isButterfly(1)［1］, text="Butterfly", title='Bull Butterfly', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isAntiButterfly(1) and not isAntiButterfly(1)［1］, text="Anti Butterfly", title='Bull Anti Butterfly', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isGartley(1) and not isGartley(1)［1］, text="Gartley", title='Bull Gartley', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isAntiGartley(1) and not isAntiGartley(1)［1］, text="Anti Gartley", title='Bull Anti Gartley', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isCrab(1) and not isCrab(1)［1］, text="Crab", title='Bull Crab', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isAntiCrab(1) and not isAntiCrab(1)［1］, text="Anti Crab", title='Bull Anti Crab', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isShark(1) and not isShark(1)［1］, text="Shark", title='Bull Shark', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isAntiShark(1) and not isAntiShark(1)［1］, text="Anti Shark", title='Bull Anti Shark', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : is5o(1) and not is5o(1)［1］, text="5-O", title='Bull 5-O', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isWolf(1) and not isWolf(1)［1］, text="Wolf Wave", title='Bull Wolf Wave', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isHnS(1) and not isHnS(1)［1］, text="Head and Shoulders", title='Bull Head and Shoulders', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isConTria(1) and not isConTria(1)［1］, text="Contracting Triangle", title='Bull Contracting Triangle', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) plotshape( not showPatterns ? na : isExpTria(1) and not isExpTria(1)［1］, text="Expanding Triangle", title='Bull Expanding Triangle', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0 ) // // 売買のロジック //// float amount = na //「fib_rangeに対する指定された比率の幅」を返す関数 f_last_fib( _rate ) => d > c ? d - ( fib_range * _rate ) : d + ( fib_range * _rate ) target01_ew_rate = input( defval=0.236 ,title='Target Fib. Rate to use for Entry Window:', type=input.float ) target01_tp_rate = input( defval=0.5　,title='Target Fib. Rate to use for TP:', type=input.float ) target01_sl_rate = input( defval=-0.618 ,title='Target Fib. Rate to use for SL:', type=input.float ) target01_ew = f_last_fib( target01_ew_rate ) target01_sl = f_last_fib( target01_sl_rate ) buy_patterns_00 = isABCD(1) or isBat(1) or isAltBat(1) or isButterfly(1) or isGartley(1) or isCrab(1) or isShark(1) or is5o(1) or isWolf(1) or isHnS(1) or isConTria(1) or isExpTria(1) buy_patterns_01 = isAntiBat(1) or isAntiButterfly(1) or isAntiGartley(1) or isAntiCrab(1) or isAntiShark(1) sel_patterns_00 = isABCD(-1) or isBat(-1) or isAltBat(-1) or isButterfly(-1) or isGartley(-1) or isCrab(-1) or isShark(-1) or is5o(-1) or isWolf(-1) or isHnS(-1) or isConTria(-1) or isExpTria(-1) sel_patterns_01 = isAntiBat(-1) or isAntiButterfly(-1) or isAntiGartley(-1) or isAntiCrab(-1) or isAntiShark(-1) if isNewPivot and ( buy_patterns_00 or buy_patterns_01 ) and close <= target01_ew 　strategy.entry( 'L1_target01', long=strategy.long, qty=amount, comment='L1' ) 　strategy.exit( "exit-L1" ,"L1_target01" ,stop=target01_sl ,limit=f_last_fib( target01_tp_rate ) ,comment="exit-L1" ) 　isNewPivot := false if isNewPivot and ( sel_patterns_00 or sel_patterns_01 ) and close >= target01_ew 　strategy.entry( 'S1_target01', long=strategy.short, qty=amount, comment='S1' ) 　strategy.exit( "exit-S1" ,"S1_target01" ,stop=target01_sl ,limit=f_last_fib( target01_tp_rate ) ,comment="exit-S1" ) 　isNewPivot := false ＝＝＝＝＝
教育
yuya_takahashi_の投稿
2
Security関数なしで、上位足のZigZagを表示するバックテストをする上で、 Security関数は使わないようにしています。 理由はいくつかあります。 ・Pythonで再現するのに不都合がある （"なし" で作成しておいた方がPythonに書き換えやすい） ・予期しない挙動が起こることがある （先物の週明けに上位足の価格が正常に取得できない等） しかし、やはりコードは長くなります。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ＝＝＝＝＝ //@version=4 strategy( title='ZigZag PA Strategy 勉強中', shorttitle='S', overlay=true, pyramiding=0, initial_capital=100000 ) altTimeframe = input( title="Alt Timeframe" ,defval='60' ) is_open = change( time( altTimeframe ) ) != 0 bgcolor( is_open ? color.gray : color.white ,title='aot timeframe open' ) // 上位足の高値を過去2本分保有しておく float cnt02_high = na float cnt01_high = na float cnt00_high = na cnt02_high := is_open ? cnt01_high［1］ : cnt02_high［1］ cnt01_high := is_open ? cnt00_high［1］ : cnt01_high［1］ cnt00_high := is_open ? high : high > cnt00_high［1］ ? high : cnt00_high［1］ // plot( cnt02_high ,color=color.color.red ) // plot( cnt01_high ,color=color.color.red ) // plot( cnt00_high ,color=color.color.red ) // 上位足の安値を過去2本分保有しておく float cnt02_low = na float cnt01_low = na float cnt00_low = na cnt02_low := is_open ? cnt01_low［1］ : cnt02_low［1］ cnt01_low := is_open ? cnt00_low［1］ : cnt01_low［1］ cnt00_low := is_open ? low : low < cnt00_low［1］ ? low : cnt00_low［1］ // plot( cnt02_low ) // plot( cnt01_low ) // plot( cnt00_low ) // 上位足の始値を過去2本分保有しておく float cnt02_open = na float cnt01_open = na float cnt00_open = na cnt02_open := is_open ? cnt01_open［1］ : cnt02_open［1］ cnt01_open := is_open ? cnt00_open［1］ : cnt01_open［1］ cnt00_open := is_open ? open : cnt00_open［1］ // 上位足の終値を過去2本分保有しておく float cnt02_close = na float cnt01_close = na cnt02_close := is_open ? cnt01_close［1］ : cnt02_close［1］ cnt01_close := is_open ? close［1］ : cnt01_close［1］ // zigzagを確認 isUp_02 = cnt02_close >= cnt02_open isUp_01 = cnt01_close >= cnt01_open isDown_02 = cnt02_close <= cnt02_open isDown_01 = cnt01_close <= cnt01_open int direction_02 = na int direction_01 = na direction_02 := is_open ? direction_01［1］ : direction_02［1］ direction_01 := not is_open ? direction_01［1］ : isUp_02 and isDown_01 ? -1 　　　　　　　　　　　 : isDown_02 and isUp_01 ? 1 　　　　　　　　　　　 : direction_01［1］ zigzag = not is_open ? na : isUp_02 and isDown_01 and direction_02 != -1 ? max( cnt01_high ,cnt02_high ) 　　　　　　 : isDown_02 and isUp_01 and direction_02 != 1 ? min( cnt01_low ,cnt02_low ) 　　　　　　 : na plot( zigzag ,color=color.red ,linewidth=3 ,title='zigzag' ) // ジグザグが発生したときのジグザグの値を取得 float x = na float a = na float b = na float c = na float d = na exist_zigzag = not na( zigzag ) x := exist_zigzag ? a［1］ : x［1］ a := exist_zigzag ? b［1］ : a［1］ b := exist_zigzag ? c［1］ : b［1］ c := exist_zigzag ? d［1］ : c［1］ d := exist_zigzag ? zigzag : d［1］ showPatterns = input( true, title='Show Patterns' ) showFib0000 = input( title='Display Fibonacci 0.000:', type=input.bool, defval=true ) showFib0236 = input( title='Display Fibonacci 0.236:', type=input.bool, defval=true ) showFib0382 = input( title='Display Fibonacci 0.382:', type=input.bool, defval=true ) showFib0500 = input( title='Display Fibonacci 0.500:', type=input.bool, defval=true ) showFib0618 = input( title='Display Fibonacci 0.618:', type=input.bool, defval=true ) showFib0764 = input( title='Display Fibonacci 0.764:', type=input.bool, defval=true ) showFib1000 = input( title='Display Fibonacci 1.000:', type=input.bool, defval=true ) fib_range = abs(d-c) fib_0000 = not showFib0000 ? na : d > c ? d-(fib_range*0.000):d+(fib_range*0.000) fib_0236 = not showFib0236 ? na : d > c ? d-(fib_range*0.236):d+(fib_range*0.236) fib_0382 = not showFib0382 ? na : d > c ? d-(fib_range*0.382):d+(fib_range*0.382) fib_0500 = not showFib0500 ? na : d > c ? d-(fib_range*0.500):d+(fib_range*0.500) fib_0618 = not showFib0618 ? na : d > c ? d-(fib_range*0.618):d+(fib_range*0.618) fib_0764 = not showFib0764 ? na : d > c ? d-(fib_range*0.764):d+(fib_range*0.764) fib_1000 = not showFib1000 ? na : d > c ? d-(fib_range*1.000):d+(fib_range*1.000) plot(title='Fib 0.000', series=fib_0000 ,color=fib_0000 != fib_0000［1］ ? na : color.black) plot(title='Fib 0.236', series=fib_0236 ,color=fib_0236 != fib_0236［1］ ? na : color.red) plot(title='Fib 0.382', series=fib_0382 ,color=fib_0382 != fib_0382［1］ ? na : color.olive) plot(title='Fib 0.500', series=fib_0500 ,color=fib_0500 != fib_0500［1］ ? na : color.lime) plot(title='Fib 0.618', series=fib_0618 ,color=fib_0618 != fib_0618［1］ ? na : color.teal) plot(title='Fib 0.764', series=fib_0764 ,color=fib_0764 != fib_0764［1］ ? na : color.blue) plot(title='Fib 1.000', series=fib_1000 ,color=fib_1000 != fib_1000［1］ ? na : color.black) xab = ( abs( b - a ) / abs( x - a ) ) xad = ( abs( a - d ) / abs( x - a ) ) abc = ( abs( b - c ) / abs( a - b ) ) bcd = ( abs( c - d ) / abs( b - c ) ) // ５つの点の比率からパターンを判断する関数 isBat(_mode)=> 　_xab = xab >= 0.382 and xab <= 0.5 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.618 and bcd <= 2.618 　_xad = xad <= 0.618 and xad <= 1.000　// 0.886 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiBat(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.886　// 0.618 　_abc = abc >= 1.000 and abc <= 2.618　// 1.13 --> 2.618 　_bcd = bcd >= 1.618 and bcd <= 2.618　// 2.0 --> 2.618 　_xad = xad >= 0.886 and xad <= 1.000　// 1.13 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAltBat(_mode)=> 　_xab = xab <= 0.382 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 2.0 and bcd <= 3.618 　_xad = xad <= 1.13 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isButterfly(_mode)=> 　_xab = xab <= 0.786 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.618 and bcd <= 2.618 　_xad = xad >= 1.27 and xad <= 1.618 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiButterfly(_mode)=> 　_xab = xab >= 0.236 and xab <= 0.886　// 0.382 - 0.618 　_abc = abc >= 1.130 and abc <= 2.618　// 1.130 - 2.618 　_bcd = bcd >= 1.000 and bcd <= 1.382　// 1.27 　_xad = xad >= 0.500 and xad <= 0.886　// 0.618 - 0.786 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isABCD(_mode)=> 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.13 and bcd <= 2.618 　_abc and _bcd and (_mode == 1 ? d < c : d > c) isGartley(_mode)=> 　_xab = xab >= 0.5 and xab <= 0.618 // 0.618 　_abc = abc >= 0.382 and abc <= 0.886 　_bcd = bcd >= 1.13 and bcd <= 2.618 　_xad = xad >= 0.75 and xad <= 0.875 // 0.786 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiGartley(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.886　// 0.618 -> 0.786 　_abc = abc >= 1.000 and abc <= 2.618　// 1.130 -> 2.618 　_bcd = bcd >= 1.500 and bcd <= 5.000　// 1.618 　_xad = xad >= 1.000 and xad <= 5.000　// 1.272 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isCrab(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.875　// 0.886 　_abc = abc >= 0.382 and abc <= 0.886　 　_bcd = bcd >= 2.000 and bcd <= 5.000　// 3.618 　_xad = xad >= 1.382 and xad <= 5.000　// 1.618 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiCrab(_mode)=> 　_xab = xab >= 0.250 and xab <= 0.500　// 0.276 -> 0.446 　_abc = abc >= 1.130 and abc <= 2.618　// 1.130 -> 2.618 　_bcd = bcd >= 1.618 and bcd <= 2.618　// 1.618 -> 2.618 　_xad = xad >= 0.500 and xad <= 0.750　// 0.618 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isShark(_mode)=> 　_xab = xab >= 0.500 and xab <= 0.875　// 0.5 --> 0.886 　_abc = abc >= 1.130 and abc <= 1.618　// 　_bcd = bcd >= 1.270 and bcd <= 2.240　// 　_xad = xad >= 0.886 and xad <= 1.130　// 0.886 --> 1.13 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isAntiShark(_mode)=> 　_xab = xab >= 0.382 and xab <= 0.875　// 0.446 --> 0.618 　_abc = abc >= 0.500 and abc <= 1.000　// 0.618 --> 0.886 　_bcd = bcd >= 1.250 and bcd <= 2.618　// 1.618 --> 2.618 　_xad = xad >= 0.500 and xad <= 1.250　// 1.130 --> 1.130 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) is5o(_mode)=> 　_xab = xab >= 1.13 and xab <= 1.618 　_abc = abc >= 1.618 and abc <= 2.24 　_bcd = bcd >= 0.5 and bcd <= 0.625 // 0.5 　_xad = xad >= 0.0 and xad <= 0.236 // negative? 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isWolf(_mode)=> 　_xab = xab >= 1.27 and xab <= 1.618 　_abc = abc >= 0 and abc <= 5 　_bcd = bcd >= 1.27 and bcd <= 1.618 　_xad = xad >= 0.0 and xad <= 5 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isHnS(_mode)=> 　_xab = xab >= 2.0 and xab <= 10 　_abc = abc >= 0.90 and abc <= 1.1 　_bcd = bcd >= 0.236 and bcd <= 0.88 　_xad = xad >= 0.90 and xad <= 1.1 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isConTria(_mode)=> 　_xab = xab >= 0.382 and xab <= 0.618 　_abc = abc >= 0.382 and abc <= 0.618 　_bcd = bcd >= 0.382 and bcd <= 0.618 　_xad = xad >= 0.236 and xad <= 0.764 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) isExpTria(_mode)=> 　_xab = xab >= 1.236 and xab <= 1.618 　_abc = abc >= 1.000 and abc <= 1.618 　_bcd = bcd >= 1.236 and bcd <= 2.000 　_xad = xad >= 2.000 and xad <= 2.236 　_xab and _abc and _bcd and _xad and (_mode == 1 ? d < c : d > c) // 売りパターンが出現したところに印を表示 plotshape(not showPatterns ? na : isABCD(-1) and not isABCD(-1)［1］, text=" AB=CD", title='Bear ABCD', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0, offset=-2) plotshape(not showPatterns ? na : isBat(-1) and not isBat(-1)［1］, text="Bat", title='Bear Bat', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0, offset=-2) plotshape(not showPatterns ? na : isAntiBat(-1) and not isAntiBat(-1)［1］, text="Anti Bat", title='Bear Anti Bat', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0, offset=-2) plotshape(not showPatterns ? na : isAltBat(-1) and not isAltBat(-1)［1］, text="Alt Bat", title='Bear Alt Bat', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isButterfly(-1) and not isButterfly(-1)［1］, text="Butterfly", title='Bear Butterfly', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isAntiButterfly(-1) and not isAntiButterfly(-1)［1］, text="Anti Butterfly", title='Bear Anti Butterfly', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isGartley(-1) and not isGartley(-1)［1］, text="Gartley", title='Bear Gartley', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isAntiGartley(-1) and not isAntiGartley(-1)［1］, text="Anti Gartley", title='Bear Anti Gartley', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isCrab(-1) and not isCrab(-1)［1］, text="Crab", title='Bear Crab', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isAntiCrab(-1) and not isAntiCrab(-1)［1］, text="Anti Crab", title='Bear Anti Crab', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isShark(-1) and not isShark(-1)［1］, text="Shark", title='Bear Shark', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isAntiShark(-1) and not isAntiShark(-1)［1］, text="Anti Shark", title='Bear Anti Shark', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : is5o(-1) and not is5o(-1)［1］, text="5-O", title='Bear 5-O', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isWolf(-1) and not isWolf(-1)［1］, text="Wolf Wave", title='Bear Wolf Wave', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isHnS(-1) and not isHnS(-1)［1］, text="Head and Shoulders", title='Bear Head and Shoulders', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isConTria(-1) and not isConTria(-1)［1］, text="Contracting Triangle", title='Bear Contracting triangle', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) plotshape(not showPatterns ? na : isExpTria(-1) and not isExpTria(-1)［1］, text="Expanding Triangle", title='Bear Expanding Triangle', style=shape.labeldown, color=color.maroon, textcolor=color.white, location=location.top, transp=0) // 買いパターンが出現したところに印を表示 plotshape(not showPatterns ? na : isABCD(1) and not isABCD(1)［1］, text="AB=CD ", title='Bull ABCD', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isBat(1) and not isBat(1)［1］, text="Bat", title='Bull Bat', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isAntiBat(1) and not isAntiBat(1)［1］, text="Anti Bat", title='Bull Anti Bat', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isAltBat(1) and not isAltBat(1)［1］, text="Alt Bat", title='Bull Alt Bat', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isButterfly(1) and not isButterfly(1)［1］, text="Butterfly", title='Bull Butterfly', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isAntiButterfly(1) and not isAntiButterfly(1)［1］, text="Anti Butterfly", title='Bull Anti Butterfly', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isGartley(1) and not isGartley(1)［1］, text="Gartley", title='Bull Gartley', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isAntiGartley(1) and not isAntiGartley(1)［1］, text="Anti Gartley", title='Bull Anti Gartley', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isCrab(1) and not isCrab(1)［1］, text="Crab", title='Bull Crab', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isAntiCrab(1) and not isAntiCrab(1)［1］, text="Anti Crab", title='Bull Anti Crab', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isShark(1) and not isShark(1)［1］, text="Shark", title='Bull Shark', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isAntiShark(1) and not isAntiShark(1)［1］, text="Anti Shark", title='Bull Anti Shark', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : is5o(1) and not is5o(1)［1］, text="5-O", title='Bull 5-O', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isWolf(1) and not isWolf(1)［1］, text="Wolf Wave", title='Bull Wolf Wave', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isHnS(1) and not isHnS(1)［1］, text="Head and Shoulders", title='Bull Head and Shoulders', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isConTria(1) and not isConTria(1)［1］, text="Contracting Triangle", title='Bull Contracting Triangle', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) plotshape(not showPatterns ? na : isExpTria(1) and not isExpTria(1)［1］, text="Expanding Triangle", title='Bull Expanding Triangle', style=shape.labelup, color=color.green, textcolor=color.white, location=location.bottom, transp=0) // // 売買のロジック //// //「fib_rangeに対する指定された比率の幅」を返す関数 f_last_fib( _rate ) => d > c ? d - ( fib_range * _rate ) : d + ( fib_range * _rate ) // ターゲット１の設定項目と初期値 //// // 上から // 取引量 // エントリーの基準（0.236を超えていない） // 利益確定幅 // ロスカット幅 target01_trade_size = input(title='Target 1 - Trade size:', type=input.float, defval=10000.00) target01_ew_rate　= input(title='Target 1 - Fib. Rate to use for Entry Window:', type=input.float, defval=0.236) target01_tp_rate　= input(title='Target 1 - Fib. Rate to use for TP:', type=input.float, defval=0.618) target01_sl_rate　= input(title='Target 1 - Fib. Rate to use for SL:', type=input.float, defval=-0.236) // ターゲット２の設定 //// target02_active　 = input(title='Target 2 - Active?', type=input.bool, defval=false) target02_trade_size = input(title='Target 2 - Trade size:', type=input.float, defval=10000.00) target02_ew_rate　= input(title='Target 2 - Fib. Rate to use for Entry Window:', type=input.float, defval=0.236) target02_tp_rate　= input(title='Target 2 - Fib. Rate to use for TP:', type=input.float, defval=1.618) target02_sl_rate　= input(title='Target 2 - Fib. Rate to use for SL:', type=input.float, defval=-0.236) // 買いのパターン buy_patterns_00 = isABCD(1) or isBat(1) or isAltBat(1) or isButterfly(1) or isGartley(1) or isCrab(1) or isShark(1) or is5o(1) or isWolf(1) or isHnS(1) or isConTria(1) or isExpTria(1) buy_patterns_01 = isAntiBat(1) or isAntiButterfly(1) or isAntiGartley(1) or isAntiCrab(1) or isAntiShark(1) // 売りのパターン sel_patterns_00 = isABCD(-1) or isBat(-1) or isAltBat(-1) or isButterfly(-1) or isGartley(-1) or isCrab(-1) or isShark(-1) or is5o(-1) or isWolf(-1) or isHnS(-1) or isConTria(-1) or isExpTria(-1) sel_patterns_01 = isAntiBat(-1) or isAntiButterfly(-1) or isAntiGartley(-1) or isAntiCrab(-1) or isAntiShark(-1) // ターゲット１の売買 //// // 買いのパターン ＆ エントリーの基準を満たす → 買いエントリー // 利確・損切りを超える → 買いの決済 target01_buy_entry = (buy_patterns_00 or buy_patterns_01) and close <= f_last_fib(target01_ew_rate) target01_buy_close = high >= f_last_fib(target01_tp_rate) or low <= f_last_fib(target01_sl_rate) strategy.entry('target01_buy', long=strategy.long, qty=target01_trade_size, comment='buy 01', when=target01_buy_entry) strategy.close('target01_buy', when=target01_buy_close) // 売りのパターン ＆ エントリーの基準を満たす → 売りエントリー // 利確・損切りを超える → 売りの決済 target01_sel_entry = (sel_patterns_00 or sel_patterns_01) and close >= f_last_fib(target01_ew_rate) target01_sel_close = low <= f_last_fib(target01_tp_rate) or high >= f_last_fib(target01_sl_rate) strategy.entry('target01_sell', long=strategy.short, qty=target01_trade_size, comment='sell 01', when=target01_sel_entry) strategy.close('target01_sell', when=target01_sel_close) // ターゲット２の売買 //// target02_buy_entry = target02_active and (buy_patterns_00 or buy_patterns_01) and close <= f_last_fib(target02_ew_rate) target02_buy_close = target02_active and high >= f_last_fib(target02_tp_rate) or low <= f_last_fib(target02_sl_rate) strategy.entry('target02_buy', long=strategy.long, qty=target02_trade_size, comment='buy 02', when=target02_buy_entry) strategy.close('target02_buy', when=target02_buy_close) target02_sel_entry = target02_active and (sel_patterns_00 or sel_patterns_01) and close >= f_last_fib(target02_ew_rate) target02_sel_close = target02_active and low <= f_last_fib(target02_tp_rate) or high >= f_last_fib(target02_sl_rate) strategy.entry('target02_sell', long=strategy.short, qty=target02_trade_size, comment='sell 02', when=target02_sel_entry) strategy.close('target02_sell', when=target02_sel_close) ＝＝＝＝＝
教育
yuya_takahashi_の投稿
2
zigzagストラテジーをつくる⑤｜インジケーターを改良する2以前みつけた高勝率のzigzagストラテジーを再現する試みです。 Security関数なしで、ロジックを再現してみました。 案の定、上位足１本分、 有利なバックテストになっていました。 すこし残念ですが、 zigzagやフィボナッチを用いたロジックは面白いので、 もう少し、今あるアイデアを試していきたいと思います。 コードは鬼のように長くなってきたので、 公開するか迷っています。。 今回は、試しになしにしてみます。
教育
yuya_takahashi_の投稿
4
zigzagストラテジーをつくる④｜インジケーターを改良する1以前みつけた高勝率のzigzagストラテジーを再現する試みです。 とりあえず、フィボナッチの追加を行ってみました。 他にも少し手を加えています。 ・line.newを削除 ・コードの整理 と、ここまでやってみたは良いものの、 「変動率を考慮したジグザグ」よりも 「上位足のジグザグ」の方が良い気がしてきました。 なので、security関数を用いない 「上位足のジグザグ」を実装したいと思います。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ＝＝＝＝＝ //@version=4 study("Zig Zag 勉強中", overlay=true) dev_threshold = input(title="Deviation (%)", type=input.float, defval=.1, minval=0.01, maxval=100) depth = input(title="Depth", type=input.integer, defval=10, minval=1) showPatterns = input(true, title='Show Patterns') showFib0000 = input(title='Display Fibonacci 0.000:', type=input.bool, defval=true) showFib0236 = input(title='Display Fibonacci 0.236:', type=input.bool, defval=true) showFib0382 = input(title='Display Fibonacci 0.382:', type=input.bool, defval=true) showFib0500 = input(title='Display Fibonacci 0.500:', type=input.bool, defval=true) showFib0618 = input(title='Display Fibonacci 0.618:', type=input.bool, defval=true) showFib0764 = input(title='Display Fibonacci 0.764:', type=input.bool, defval=true) showFib1000 = input(title='Display Fibonacci 1.000:', type=input.bool, defval=true) //** //* depth -> length -> zero //* lengthが最高値・最安値であるかを確認 //* trueならbar_indexと価格を返す //* pivots(src, length, isHigh) => 　p = nz(src［length］) 　if length == 0 　　［bar_index, p］ 　else 　　isFound = true 　　for i = 0 to length - 1 　　　if isHigh and src［i］ > p 　　　　isFound := false 　　　if not isHigh and src［i］ < p 　　　　isFound := false 　　for i = length + 1 to 2 * length 　　　if isHigh and src［i］ >= p 　　　　isFound := false 　　　if not isHigh and src［i］ <= p 　　　　isFound := false 　　if isFound and length * 2 <= bar_index 　　　［bar_index［length］, p］ 　　else 　　　［int(na), float(na)］ ［iH, pH］ = pivots(high, floor(depth / 2), true) ［iL, pL］ = pivots(low, floor(depth / 2), false) // 変化率を算出する関数 calc_dev(base_price, price) => 　100 * (price - base_price) / base_price // 直近のpivotの情報を格納 var line lineLast = na　 // lineのid (実際はidではなく識別している何か) var float pLast = 0　　 // price var bool isHighLast = true // High か Low か var int linesCount = 0 //** //* Lineを描画する関数 //* pivotFound(dev, isHigh, index, price) => 　if linesCount == 0 　　［line(na), isHigh, true］ 　else 　　if abs(dev) >= dev_threshold 　　　［line(na), isHigh, true］ 　　else 　　　［line(na), isHighLast, false］ //** //* 描画処理 //* if not na(pH) and not na(pL) and pH == pL 　dev1 = calc_dev(pLast, pH) 　［id2, isHigh2, isNew2］ = pivotFound(dev1, true, iH, pH) 　if isNew2 　　linesCount := linesCount + 1 　　isHighLast := isHigh2 　　pLast := pH 　dev2 = calc_dev(pLast, pL) 　［id1, isHigh1, isNew1］ = pivotFound(dev2, false, iL, pL) 　if isNew1 　　linesCount := linesCount + 1 　　isHighLast := isHigh1 　　pLast := pL else 　if not na(pH) 　　dev1 = calc_dev(pLast, pH) 　　［id, isHigh, isNew］ = pivotFound(dev1, true, iH, pH) 　　if isNew 　　　linesCount := linesCount + 1 　　　isHighLast := isHigh 　　　pLast := pH 　else 　　if not na(pL) 　　　dev2 = calc_dev(pLast, pL) 　　　［id, isHigh, isNew］ = pivotFound(dev2, false, iL, pL) 　　　if isNew 　　　　linesCount := linesCount + 1 　　　　isHighLast := isHigh 　　　　pLast := pL // 追加箇所 zigzag = pLast［1］!=pLast ? pLast : na plot( zigzag ,color=color.red ,offset=-1*floor(depth / 2) ) plot( isHighLast ? 1 : 0 ) // ジグザグが発生したときのジグザグの値を取得 x = valuewhen(zigzag, zigzag, 4) a = valuewhen(zigzag, zigzag, 3) b = valuewhen(zigzag, zigzag, 2) //３つ前 c = valuewhen(zigzag, zigzag, 1) //前々回 d = valuewhen(zigzag, zigzag, 0) //前回 fib_range = abs(d-c) fib_0000 = not showFib0000 ? na : d > c ? d-(fib_range*0.000):d+(fib_range*0.000) fib_0236 = not showFib0236 ? na : d > c ? d-(fib_range*0.236):d+(fib_range*0.236) fib_0382 = not showFib0382 ? na : d > c ? d-(fib_range*0.382):d+(fib_range*0.382) fib_0500 = not showFib0500 ? na : d > c ? d-(fib_range*0.500):d+(fib_range*0.500) fib_0618 = not showFib0618 ? na : d > c ? d-(fib_range*0.618):d+(fib_range*0.618) fib_0764 = not showFib0764 ? na : d > c ? d-(fib_range*0.764):d+(fib_range*0.764) fib_1000 = not showFib1000 ? na : d > c ? d-(fib_range*1.000):d+(fib_range*1.000) plot(title='Fib 0.000' ,series=fib_0000 ,offset=-1*floor(depth/2) ,color=fib_0000 != fib_0000［1］ ? na : color.black) plot(title='Fib 0.236' ,series=fib_0236 ,offset=-1*floor(depth/2) ,color=fib_0236 != fib_0236［1］ ? na : color.red) plot(title='Fib 0.382' ,series=fib_0382 ,offset=-1*floor(depth/2) ,color=fib_0382 != fib_0382［1］ ? na : color.olive) plot(title='Fib 0.500' ,series=fib_0500 ,offset=-1*floor(depth/2) ,color=fib_0500 != fib_0500［1］ ? na : color.lime) plot(title='Fib 0.618' ,series=fib_0618 ,offset=-1*floor(depth/2) ,color=fib_0618 != fib_0618［1］ ? na : color.teal) plot(title='Fib 0.764' ,series=fib_0764 ,offset=-1*floor(depth/2) ,color=fib_0764 != fib_0764［1］ ? na : color.blue) plot(title='Fib 1.000' ,series=fib_1000 ,offset=-1*floor(depth/2) ,color=fib_1000 != fib_1000［1］ ? na : color.black) ＝＝＝＝＝
教育
yuya_takahashi_の投稿
インデックス通貨の比較主要通貨のインデックス通貨の比較チャート ドルストレートやクロス円の比較チャートは多いですが、 今回はインデックス通貨の比較チャートを出しました。 主要通貨のインデックスを比較することで、それぞれの強弱を見ていきます。 ドルインデックス　DXY ユーロインデックス　EXY 円インデックス　JXY ポンドインデックス　BXY カナダドルインデックス　CXY スイスフランインデックス　SXY 豪ドルインデックス　AXY ニュージーランドインデックス　ZXY このように見ると、カナダドルと米ドルが強く、ポンドもここにきて急上昇しており、 ユーロや豪ドル、ニュージーランドが弱いというのが分かりますね。 TradingViewでは、簡単に表示できますので比較してみてはいかがでしょう。
TVC:DXY教育
masao_shindoの投稿
4
zigzagストラテジーをつくる③｜インジケーターを理解する3以前みつけた高勝率のzigzagストラテジーを再現する試みです。 ストラテジーに必要な価格を 変数に格納してプロットすることもできました。 このzigzagは変動率をもとに頂点の判断を行っているので、 赤矢印のように頂点の位置がずれていきます。 元々のzigzagは、 この対処としてline.newで実装しているようです。 plotだとどうしても （過去の値を修正することができないので） まっすぐの線にすることはできません。 見た目はカッコ悪いですが、 ストラテジーにする上では全く問題ないので、 このまま進めていきたいと思います。 次回は、フィボナッチの比率で 横線を描画する機能を追加したいと思います。 ===== //@version=4 study("Zig Zag 勉強中", overlay=true) // Deviation = 偏差 dev_threshold = input(title="Deviation (%)", type=input.float, defval=.1, minval=0.01, maxval=100) // Depth = 深さ depth = input(title="Depth", type=input.integer, defval=10, minval=1) //** //* depth -> length -> zero //* lengthが最高値・最安値であるかを確認 //* trueならbar_indexと価格を返す //* pivots(src, length, isHigh) => 　p = nz(src［length］) 　if length == 0 　　［bar_index, p］ 　else 　　isFound = true 　　// length -> zeroの最高値・最安値を確認 　　for i = 0 to length - 1 　　　if isHigh and src［i］ > p 　　　　isFound := false 　　　if not isHigh and src［i］ < p 　　　　isFound := false 　　// depth -> lengthの最高値・最安値を確認 　　for i = length + 1 to 2 * length 　　　if isHigh and src［i］ >= p 　　　　isFound := false 　　　if not isHigh and src［i］ <= p 　　　　isFound := false 　　 　　// lengthが最高値・最安値だった場合は値を返す 　　if isFound and length * 2 <= bar_index 　　　［bar_index［length］, p］ 　　// そうでない場合はnaを返す 　　else 　　　［int(na), float(na)］ ［iH, pH］ = pivots(high, floor(depth / 2), true) ［iL, pL］ = pivots(low, floor(depth / 2), false) // データ確認用 // plot( pH ) // plot( pL ) // plot( iH ) // plot( na(iH) ? 1 : 0 ) // plot( iL ) // 変化率を算出する関数 calc_dev(base_price, price) => 　100 * (price - base_price) / base_price // 直近のpivotの情報を格納 var line lineLast = na　 // lineのid (実際はidではなく識別している何か) var int iLast = 0　　 // bar_index var float pLast = 0　　 // price var bool isHighLast = true // High か Low か // 描画したラインの数 var int linesCount = 0 // データ確認用 // plot( lineLast ) // plot( iLast ) // plot( pLast ) // plot( linesCount ) //** //* Lineを描画する関数 //* pivotFound(dev, isHigh, index, price) => 　// zigzagの頂点を更新する 　if isHighLast == isHigh and not na(lineLast) 　　if isHighLast ? price > pLast : price < pLast 　　　if linesCount <= 1 　　　　line.set_xy1(lineLast, index, price) 　　　line.set_xy2(lineLast, index, price) 　　　［lineLast, isHighLast, false］ 　　else 　　　［line(na), bool(na), false］ 　　　 　// zigzagの方向を変える（zigzagの頂点） 　else 　　// 一番最初のLine 　　if na(lineLast) 　　　id = line.new(index, price, index, price, color=color.red, width=2) 　　　［id, isHigh, true］ 　　else 　　　// 変化率が設定値以上であることを確認 　　　if abs(dev) >= dev_threshold 　　　　id = line.new(iLast, pLast, index, price, color=color.red, width=2) 　　　　［id, isHigh, true］ 　　　else 　　　　［line(na), bool(na), false］ //** //* 描画処理 //* // iH iL のデータある // iH と iL の値（bar_index）が同じ // 高値と安値の描画処理を行う if not na(iH) and not na(iL) and iH == iL 　dev1 = calc_dev(pLast, pH) 　［id2, isHigh2, isNew2］ = pivotFound(dev1, true, iH, pH) 　if isNew2 　　linesCount := linesCount + 1 　if not na(id2) 　　lineLast := id2 　　isHighLast := isHigh2 　　iLast := iH 　　pLast := pH 　dev2 = calc_dev(pLast, pL) 　［id1, isHigh1, isNew1］ = pivotFound(dev2, false, iL, pL) 　if isNew1 　　linesCount := linesCount + 1 　if not na(id1) 　　lineLast := id1 　　isHighLast := isHigh1 　　iLast := iL 　　pLast := pL else 　// iH の値がある 　if not na(iH) 　　dev1 = calc_dev(pLast, pH) 　　［id, isHigh, isNew］ = pivotFound(dev1, true, iH, pH) 　　if isNew 　　　linesCount := linesCount + 1 　　if not na(id) 　　　lineLast := id 　　　isHighLast := isHigh 　　　iLast := iH 　　　pLast := pH 　// iL の値がある 　else 　　if not na(iL) 　　　dev2 = calc_dev(pLast, pL) 　　　［id, isHigh, isNew］ = pivotFound(dev2, false, iL, pL) 　　　if isNew 　　　　linesCount := linesCount + 1 　　　if not na(id) 　　　　lineLast := id 　　　　isHighLast := isHigh 　　　　iLast := iL 　　　　pLast := pL // 追加箇所 zigzag = pLast［1］!=pLast ? pLast : na plot( zigzag ,color=color.red ,offset=-1*floor(depth / 2) ) =====
教育
yuya_takahashi_の投稿
zigzagストラテジーをつくる①｜インジケーターを理解する1以前みつけた高勝率のzigzagストラテジーを再現する試みです。 まずは、zigzagインジケーターを作成します。 作成とは言っても、 すでにあるものを理解する作業。お勉強です。 モデルになるzigzagストラテジーは、 非常にシンプルなロジックのzigzagでした。 ただし、上の時間軸のzigzagを表示するというもの。 このアプローチでも良いのですが、 tradingViewやmt4で用いられているzigzagを ちゃんと理解してすべてを検証できる状態をつくりたいと思います。 コツコツと地道にすすめていく予定です。 けっこう時間がかかると思いますが、気長にお付き合いください。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ＝＝＝＝＝ //@version=4 study("Zig Zag 勉強中", overlay=true) // Depth = 深さ depth = input(title="Depth", type=input.integer, defval=10, minval=1) //** //* depth -> length -> zero //* lengthが最高値・最安値であるかを確認 //* trueならbar_indexと価格を返す //* pivots(src, length, isHigh) => 　p = nz(src［length］) 　if length == 0 　　［bar_index, p］ 　else 　　isFound = true 　　// length -> zeroの最高値・最安値を確認 　　for i = 0 to length - 1 　　　if isHigh and src［i］ > p 　　　　isFound := false 　　　if not isHigh and src［i］ < p 　　　　isFound := false 　　// depth -> lengthの最高値・最安値を確認 　　for i = length + 1 to 2 * length 　　　if isHigh and src［i］ >= p 　　　　isFound := false 　　　if not isHigh and src［i］ <= p 　　　　isFound := false 　　 　　// lengthが最高値・最安値だった場合は値を返す 　　if isFound and length * 2 <= bar_index 　　　［bar_index［length］, p］ 　　// そうでない場合はnaを返す 　　else 　　　［int(na), float(na)］ ［iH, pH］ = pivots(high, floor(depth / 2), true) ［iL, pL］ = pivots(low, floor(depth / 2), false) zigzag = pH>0 ? pH : pL>0 ? pL : na plot( zigzag ,offset=-1*floor(depth / 2) ,color=color.red ) ＝＝＝＝＝
教育
yuya_takahashi_の投稿
7
教育 zigzagストラテジーをつくる②｜インジケーターを理解する2以前みつけた高勝率のzigzagストラテジーを再現する試みです。 インジケーターは理解できました。 次回は、ストラテジーを作成するにあたって、 必要な情報を変数に格納するスキームを作成します。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ＝＝＝＝＝ //@version=4 study("Zig Zag", overlay=true) // Deviation = 偏差 dev_threshold = input(title="Deviation (%)", type=input.float, defval=.1, minval=0.01, maxval=100) // Depth = 深さ depth = input(title="Depth", type=input.integer, defval=10, minval=1) //** //* depth -> length -> zero //* lengthが最高値・最安値であるかを確認 //* trueならbar_indexと価格を返す //* pivots(src, length, isHigh) => 　p = nz(src［length］) 　if length == 0 　　［bar_index, p］ 　else 　　isFound = true 　　// length -> zeroの最高値・最安値を確認 　　for i = 0 to length - 1 　　　if isHigh and src［i］ > p 　　　　isFound := false 　　　if not isHigh and src［i］ < p 　　　　isFound := false 　　// depth -> lengthの最高値・最安値を確認 　　for i = length + 1 to 2 * length 　　　if isHigh and src［i］ >= p 　　　　isFound := false 　　　if not isHigh and src［i］ <= p 　　　　isFound := false 　　 　　// lengthが最高値・最安値だった場合は値を返す 　　if isFound and length * 2 <= bar_index 　　　［bar_index［length］, p］ 　　// そうでない場合はnaを返す 　　else 　　　［int(na), float(na)］ ［iH, pH］ = pivots(high, floor(depth / 2), true) ［iL, pL］ = pivots(low, floor(depth / 2), false) // データ確認用 // plot( pH ) // plot( pL ) plot( iH ) plot( na(iH) ? 1 : 0 ) plot( iL ) // 変化率を算出する関数 calc_dev(base_price, price) => 　100 * (price - base_price) / base_price // 直近のpivotの情報を格納 var line lineLast = na　 // lineのid (実際はidではなく識別している何か) var int iLast = 0　　 // bar_index var float pLast = 0　　 // price var bool isHighLast = true // High か Low か // 描画したラインの数 var int linesCount = 0 // データ確認用 // plot( lineLast ) // plot( iLast ) // plot( pLast ) // plot( linesCount ) //** //* Lineを描画する関数 //* pivotFound(dev, isHigh, index, price) => 　// zigzagの頂点を更新する 　if isHighLast == isHigh and not na(lineLast) 　　if isHighLast ? price > pLast : price < pLast 　　　if linesCount <= 1 　　　　line.set_xy1(lineLast, index, price) 　　　line.set_xy2(lineLast, index, price) 　　　［lineLast, isHighLast, false］ 　　else 　　　［line(na), bool(na), false］ 　　　 　// zigzagの方向を変える（zigzagの頂点） 　else 　　// 一番最初のLine 　　if na(lineLast) 　　　id = line.new(index, price, index, price, color=color.red, width=2) 　　　［id, isHigh, true］ 　　else 　　　// 変化率が設定値以上であることを確認 　　　if abs(dev) >= dev_threshold 　　　　id = line.new(iLast, pLast, index, price, color=color.red, width=2) 　　　　［id, isHigh, true］ 　　　else 　　　　［line(na), bool(na), false］ //** //* 描画処理 //* // iH iL のデータある // iH と iL の値（bar_index）が同じ // 高値と安値の描画処理を行う if not na(iH) and not na(iL) and iH == iL 　dev1 = calc_dev(pLast, pH) 　［id2, isHigh2, isNew2］ = pivotFound(dev1, true, iH, pH) 　if isNew2 　　linesCount := linesCount + 1 　if not na(id2) 　　lineLast := id2 　　isHighLast := isHigh2 　　iLast := iH 　　pLast := pH 　 　dev2 = calc_dev(pLast, pL) 　［id1, isHigh1, isNew1］ = pivotFound(dev2, false, iL, pL) 　if isNew1 　　linesCount := linesCount + 1 　if not na(id1) 　　lineLast := id1 　　isHighLast := isHigh1 　　iLast := iL 　　pLast := pL 　 else 　// iH の値がある 　if not na(iH) 　　dev1 = calc_dev(pLast, pH) 　　［id, isHigh, isNew］ = pivotFound(dev1, true, iH, pH) 　　if isNew 　　　linesCount := linesCount + 1 　　if not na(id) 　　　lineLast := id 　　　isHighLast := isHigh 　　　iLast := iH 　　　pLast := pH 　// iL の値がある 　else 　　if not na(iL) 　　　dev2 = calc_dev(pLast, pL) 　　　［id, isHigh, isNew］ = pivotFound(dev2, false, iL, pL) 　　　if isNew 　　　　linesCount := linesCount + 1 　　　if not na(id) 　　　　lineLast := id 　　　　isHighLast := isHigh 　　　　iLast := iL 　　　　pLast := pL ＝＝＝＝＝
教育
yuya_takahashi_の投稿
1
日米の消費者物価指数とインフレを確認する遅行指数になるのかなとは思いますが、 前年までの状況を正しく認識するのには必要ですね。 米 消費者物価指数 CPI：RATEINF/CPI_USA 日 消費者物価指数 CPI：RATEINF/CPI_JPN 米 インフレ（前年比）：RATEINF/INFLATION_USA 日 インフレ（前年比）：RATEINF/INFLATION_JPN ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
TVC:NI225教育
yuya_takahashi_の投稿
1
TradingView＆Quandl で表示できる米国景気先行指数こういうチャートレイアウトを持っておくと便利かもしれません。 ・ 鉱工業生産指数（FRED/INDPRO） ・ 新規失業保険受給申請数（FRED/IC4WSA） ・ 製造業平均労働時間（FRED/MANEMP） ・ 住宅着工件数（FRED/HOUST） ・ 総合景気先行指数（FRED/USSLIND） ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
TVC:DJI教育
yuya_takahashi_の投稿
4
米国の総合景気先行指数を表示するFRBが発表する指数。 これも景気の参考指数として役に立ちます。 景気の山に対して平均約9ヵ月、 谷に対して平均約4ヵ月の先行性があると言わているようです。 以下の指標で構成されています。 　１．週平均労働時間 　２．週平均失業保険申請件数 　３．消費財受注 　４．入荷遅延比率 　５．非国防資本財受注 　６．新規建設許可 　７．普通株500種株価 　８．マネーサプライ（M2） 　９．長短金利スプレッド 　10．消費者期待度指数 ===== 米総合景気先行指数 Leading Index for the United States コード：FRED/USSLIND ===== ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
TVC:DJI教育
yuya_takahashi_の投稿
米住宅着工件数は景気回復に先行して底打ちする表題の指標ですが、 ご存知の方も多いかもしれません。 TradingViewなら、 簡単にチャートと並べて確認することができます。 ===== 米住宅着工件数 Housing Starts: Total: New Privately Owned Housing Units Started コード：FRED/HOUST ===== ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
TVC:DJI教育
yuya_takahashi_の投稿
銅、アルミ、亜鉛の在庫情報を取得するインジケーターメジャーな貴金属の情報はありませんが、 Quandlの情報からこんなインジケーターを作成することもできます。 前日比（％）のヒストグラムです。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ===== //@version=3 study("ロンドン金属取引所の在庫情報を取得", overlay=false) metal = input(defval='CU', title='Metal', options=［'AL','CU','ZI'］) stBase = 'QUANDL:LME/ST_' stSym = stBase + metal + '_ALL' st = security( stSym,'D', close［0］) stChange = (( st［0］ - st［1］) / st［1］) * 100 stCol = stChange > 0 ? red : green plot( stChange ,title='Inventory Level Changes (In %)' , color=stCol ,linewidth=3 ,style=columns ) =====
COMEX:HG1!教育
yuya_takahashi_の投稿
米国のマネタリーベースとGDPを表示さらに以下を表示してみました。 マネタリーベース：FRED/BASE GDP：FRED/GDP 無料でとれるデータだと、 このあたりが限界な気がします。 Quandlでも課金すれば、 いわゆる経済指標はすべて取得できると思いますが、 それがTradingViewで表示できるかというと またちょっと別の話ですね。 明日以降は、日本のデータを漁ってみたいと思います。 ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
DJ:DJI教育
yuya_takahashi_の投稿
雇用統計の前月比を表示するインジケーター作ってみました。 雇用統計の前月比を表示するインジケーターです。 見やすくするために、単位は調整しています。 ※ コピペする場合は以下の変更を行ってください ［］（全角の角括弧）→（半角の角括弧） （全角スペース）→（半角スペース） ===== //@version=4 study( "雇用統計" ,overlay=false ) payems = security("QUANDL:FRED/PAYEMS", "D", close) / 10 unrate = security("QUANDL:FRED/UNRATE", "D", close) * 100 is_change = payems != payems［1］ float PAYEMS = na float UNRATE = na PAYEMS := is_change ? payems - payems［1］ : PAYEMS［1］ UNRATE := is_change ? unrate - unrate［1］ : UNRATE［1］ p1 = plot( PAYEMS ,offset=1 ,color=color.red ,title="非農業部門雇用者数（万人）") p2 = plot( UNRATE ,offset=1 ,color=color.blue ,title="失業率（0.01％）" ) p0 = plot( 0 ,offset=1 ,color=color.gray ,title="zero" ,editable=false ) plot( PAYEMS ,offset=1 ,color=color.red ,style=plot.style_circles ,show_last=1 ,linewidth=2 ,title="") plot( UNRATE ,offset=1 ,color=color.blue ,style=plot.style_circles ,show_last=1 ,linewidth=2 ,title="" ) fill( p0 ,p1 ,color=color.red ) fill( p0 ,p2 ,color=color.blue ) =====
DJ:DJI教育
yuya_takahashi_の投稿
米雇用統計：非農業部門雇用者数 を表示するだんだん探し方のコツを掴んできました。 米雇用統計の非農業部門雇用者数は 以下のコードで表示することができます。 FRED/PAYEMS 表示できるってことは、 米雇用統計の数字を表示するインジケーターが作れちゃいますね。 米雇用統計の数字を考慮したバックテストもできちゃいますね。 ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
DJ:DJI教育
yuya_takahashi_の投稿
イギリスのOECD景気先行指数を表示する景気先行指数とはいえ、 株価に先行するわけではないようです。 数ヶ月遅い印象ですね。 ・UKXの週足 ・米国のOECD景気先行指数（赤：OECD/MEI_CLI_LOLITOAA_USA_M） ・日本のOECD景気先行指数（緑：OECD/MEI_CLI_LOLITOAA_JPN_M） ・イギリスのOECD景気先行指数（橙：OECD/MEI_CLI_LOLITOAA_GBR_M） 次は別の指標を表示してみようと思います。 ※ インジケーターは「Quandl」というものを使っています（検索で出てきます）
TVC:UKX教育
yuya_takahashi_の投稿