ありふれた日常: 2月 2011

2011年2月23日水曜日

改改YesLanguageピークボトム線ほぼコンプリートｗ

修正しました。
①プログラムの順番変更しました。先に使用する変数を先に計算させないといけないようで、この変更で、自分で欲しかった部分は、全て計算するようになりました。
これで分かったことは、計算の後先がおかしくても、YesLanguage上ではプログラム流れて、勝手に手前の数値を参照しているみたいでしたｗ。
②金額の大きな銘柄にも計算できるようにしました。
（前回⑤ソフトバンク日足5000本表示では計算しません；；、2000年3月より手前では計算するかもしれません。→計算するようになりました。）
自己責任で使用してください。
全文；で終わるので、改行しているところはつないで下さいｗ。

Input : Period(3);
Var : maH3(0), maL3(0), Bottom(0), Peak(0), minH3(0), maxL3(0), BottomV(0), PeakV(0), PB(0);
maH3=ma(High,Period);
maL3=ma(Low,Period);
minH3=iff(Peak[1]<9999999999,Min(maH3[1],maH3[0]),iff(Bottom[1]<1000000000,-1,min(minH3[1],maH3[0])));
maxL3=iff(Bottom[1]<1000000000,Max(maL3[1],maL3[0]),iff(Peak[1]<9999999999,9999999999,max(maL3[0],maxL3[1])));
Bottom=iff(maL3[1]<=minH3[0]&&minH3[0]<=maL3[0],minH3[0],1000000000);
Peak=iff(maH3[1]>=maxL3[0]&&maxL3[0]>=maH3[0],maxL3[0],9999999999);
BottomV=iff(Bottom[0]<1000000000,Bottom[0],NoValue);
PeakV=iff(Peak[0]<9999999999,Peak[0],NoValue);
PB=iff(Bottom[0]<1000000000,Bottom[0],iff(Peak[0]<9999999999,Peak[0],NoValue));

Plot9(PB,"PB");

気持ち的には、この指標自体を5,000円/人くらいで売りたいくらいなんですけどねｗ
全然スポンサードリンク押してくれてかまわないよ、全く拒まないよｗ。
以上

2011年2月20日日曜日

改YesLanguageピークボトム線ほぼコンプリートｗ

※※2/23記事で更に修正しました、完成度上がってますｗ。

少し修正しました。
①出力を以前より１本手前に出るようにしました。
②ﾋﾟｰｸ候補maxL3の最後の計算修正しました。
③ソフトバンク15分足で計算するようになりました。
④日経日足5000本表示で計算するようになりました。
⑤ソフトバンク日足5000本表示では計算しません；；、2000年3月より手前では計算するかもしれません。
自己責任で使用してください。
全文；で終わるので、改行しているところはつないで下さいｗ。
Input : Period(3);
Var : maH3(0), maL3(0), Bottom(0), Peak(0), minH3(0), maxL3(0), BottomV(0), PeakV(0), PB(0);
maH3=ma(High,Period);
maL3=ma(Low,Period);
Bottom=iff(maL3[1]<=minH3[0]&&minH3[0]<=maL3[0],minH3[0],100000);
Peak=iff(maH3[1]>=maxL3[0]&&maxL3[0]>=maH3[0],maxL3[0],9999999);
minH3=iff(Peak[1]<9999999,Min(maH3[1],maH3[0]),iff(Bottom[1]<100000,-1,min(minH3[1],maH3[0])));
maxL3=iff(Bottom[1]<100000,Max(maL3[1],maL3[0]),iff(Peak[1]<9999999,9999999,max(maL3[0],maxL3[1])));
BottomV=iff(Bottom[0]<100000,Bottom[0],NoValue);
PeakV=iff(Peak[0]<9999999,Peak[0],NoValue);
PB=iff(Bottom[0]<100000,Bottom[0],iff(Peak[0]<9999999,Peak[0],NoValue));

Plot1(PB,"PB");

別にスポンサードリンク押してくれてもいいんだよ；；。

2011年2月16日水曜日

YesLanguageピークボトム線ほぼコンプリートｗ

YesLanguageほぼコンプリートｗなぜ『ほぼ』かというと、何故か計算しないところがあったりします、多分計算の基にしているmaH3とmaL3が近すぎるか、接してしまうとエラーになるようなのですが、全く表示できていなかったので、自分としては満足ですｗｗ、多分当分修正しないと思います。
利用したい方は自己責任ですが一応載せます、指標で登録すれば使える状態になります。
全文；で終わるので、改行しているところはつないで下さいｗ。
Input : Period(3);
Var : maH3(0), maL3(0), Bottom(0), Peak(0), minH3(0), maxL3(0), BottomV(0), PeakV(0), PB(0);
maH3=ma(High,Period);
maL3=ma(Low,Period);
Bottom=iff(maL3[1]<=minH3[0]&&minH3[0]<=maL3[0],minH3[0],100000);
Peak=iff(maH3[1]>=maxL3[0]&&maxL3[0]>=maH3[0],maxL3[0],9999999);
minH3=iff(Peak[1]<9999999,Min(maH3[1],maH3[0]),iff(Bottom[1]<100000,-1,min(minH3[1],maH3[0])));
maxL3=iff(Bottom[1]<100000,Max(maL3[1],maL3[0]),iff(Peak[1]<9999999,9999999,max(maL3[1],maxL3[0])));
BottomV=iff(Bottom[1]<100000,Bottom[1],NoValue);
PeakV=iff(Peak[1]<9999999,Peak[1],NoValue);
PB=iff(Bottom[1]<100000,Bottom[1],iff(Peak[1]<9999999,Peak[1],NoValue));
Plot1(PB,"PB");

多分指標つくりは、プログラムに長けている人は、すぐ作れるのだと思いますが、今回及び、少し前にストキャ逆算もしたのですが、思うことは、エクセルとYesLanguageが似ていると思うので、エクセルで作りきって、それをYesLanguage化すれば良いみたいですｗ、なんとかど根性でプログラムを書き、YesLanguage上でエラーがなくなるまで、自式とネット上を調べて、何とかプログラムを計算させるところまで、こぎつけて、もうそうすれば、ゴールは近く、プログラムが流れるようになれば、『シストレマスターへの道』様ところの、Print関数の方法があって、全部の変数か必要な変数を出力して、それをエクセルに取り込んで、比較すれば、間違いや計算の良い方法が見えてきます、そこまでくればほぼ完成で、後はマンパワーのみですｗ。自動売買は全く分かりませんｗ　以上

※※2/20記事で不具合部多少修正しました。参照方。

2011年2月13日日曜日

YesLanguageインポートできましたｗコンプリートはできず；；

まだ引き続き格闘中ですが、YesLanguageに指数としてのｲﾝﾎﾟｰﾄは出来ていません、がしかし、zzzmoc様のダウｲﾝﾎﾟｰﾄhttp://blog.livedoor.jp/zzzmoc/archives/51410279.htmlを参考にして日足に計算後のジグザグ線のｲﾝﾎﾟｰﾄはできました、青線はｲﾝﾎﾟｰﾄで最後の赤線は追記しました；；、これだけでも私としては大助かりです、完全燃焼はできてませんが、エクセルでの計算ができているのが大きかったですｗ、しかし、計算式としてのｲﾝﾎﾟｰﾄは出来ていないので、ハンド修正は余儀なくされます；；、何とか頑張っていかねばｗ。

月足週足日足60/15/5分足にも入れてやろうとしたのですが、うまくいきませんｗｗｗ；；、zzzmoc様の最後の命令文でVar3を-Var3にしてやったら、表示できました、ｲﾝﾎﾟｰﾄ用のﾃﾞｰﾀ日が飛ぶのを防ぐような命令文が入っているようなのですが、解読できていなくて、［　］が足番号を参照するものだったので、マイナスにしてみたら奇跡的に日足は表示できましたが、それ以外の足は表示できていません；；、今後も頑張って行こうと思います。

※ダウのインポートは問題なくできています、こちらがインポートしようとした、ピークボトム線が日のデータがかなり飛ぶための対処方法でした。ｗ

以上

zzzmoc様勝手にリンク貼ってごめんなさい；；問題ありましたら消しますので、コメントでも残してください。

2011年2月12日土曜日

YesLanguage指標作成；；

YesLanguageで指標作成しようとしています。
HL転換という方法で、3本高値平均と3本安値平均からピークボトムのジグザグ線をマネックストレダーに表示しようとしています、エクセルでは優秀者の力を借りて作成できまして、YesLanguageプログラムにしようとしていますが、全く分かりません；；、誰か作成してもらえないでしょうか?、プログラム分かる人からすれば簡単なんでしょうけどね。Yahoo知恵袋でエクセル計算してくれた方ありがとうございました。

下記は作成途中で超超行き詰っておりますｗ自力でも頑張っていくのですが、分かる方一杯いるでしょうけど、気が向きましたら宜しく御願いいたします。　m（>_<）m
※※追記2/16自力で解決しました、2/16記事に改訂版載せましたｗ、下記は全くプログラム計算してくれませんｗ、色々参考にして今回はif文をiff文にしたら何とかなりましたｗ。追記終わり※※

nput : Period(3);
Var : maH3(0), maL3(0), Bottom(0), Peak(0), minH3(0), maxL3(0);
maH3 = ma(High,Period);
maL3 = ma(Low,Period);
Bottom = Bottom[0];
Peak = Peak[0];
minH3 = minH3[0];
maxL3 = maxL3[0];

if maL3[1] <= minH3[0]and minH3[0]<= maL3[0]then
Bottom = minH3[0]
Else Bottom = FALSE

if maH3[1] >= maxL3[0]and maxL3[0]>= maH3[0]then
Peak = minH3[0]
Else Peak = FALSE

if Peak[0]=FALSE then
minH3=Min(maH3[1],maH3[0]) else
if minH3=FALSE Then
minH3=-1 else
minH3=min(maL3[1],maH3[0])

if Bottom[0]=FALSE then
minL3=Max(maL3[1],maL3[0]) else
if minL3=FALSE Then
minH3=20000 else
minH3=max(maL3[1],maxL3[1])

Plot1(ma(High,Period), "maH3");
Plot2(ma(Low,Period), "maL3");
Plot3(Bottom, "Bottom")
Plot4(Peak, "Peak")
Plot5(minH3, "minH3")
Plot6(maxL3, "maxL3")

2011年2月7日月曜日

ピークボトム線

	日付	時間	始値	高値	安値	終値	maH3	maL3
1	2010/1/4	9:00	10600	10690	10590	10680
2	2010/1/4	10:00	10670	10700	10670	10680
3	2010/1/4	11:00	10670	10670	10670	10670	10,687	10,643
4	2010/1/4	12:30	10680	10680	10630	10660	10,683	10,657
5	2010/1/4	13:30	10650	10680	10640	10660	10,677	10,647
6	2010/1/4	14:30	10670	10670	10640	10640	10,677	10,637
7	2010/1/5	9:00	10780	10790	10710	10740	10,713	10,663
8	2010/1/5	10:00	10750	10760	10720	10750	10,740	10,690
9	2010/1/5	11:00	10750	10750	10750	10750	10,767	10,727
10	2010/1/5	12:30	10760	10800	10750	10770	10,770	10,740
11	2010/1/5	13:30	10760	10770	10670	10700	10,773	10,723
12	2010/1/5	14:30	10700	10700	10660	10690	10,757	10,693
13	2010/1/6	9:00	10720	10760	10660	10750	10,743	10,663
14	2010/1/6	10:00	10750	10770	10720	10720	10,743	10,680
15	2010/1/6	11:00	10730	10730	10730	10730	10,753	10,703
16	2010/1/6	12:30	10750	10780	10730	10750	10,760	10,727
17	2010/1/6	13:30	10760	10770	10730	10750	10,760	10,730
18	2010/1/6	14:30	10740	10750	10710	10710	10,767	10,723
19	2010/1/7	9:00	10730	10780	10700	10740	10,767	10,713
20	2010/1/7	10:00	10730	10760	10730	10740	10,763	10,713
21	2010/1/7	11:00	10740	10740	10740	10740	10,760	10,723
22	2010/1/7	12:30	10730	10740	10700	10720	10,747	10,723
23	2010/1/7	13:30	10730	10730	10640	10660	10,737	10,693
24	2010/1/7	14:30	10660	10700	10660	10700	10,723	10,667
25	2010/1/8	9:00	10780	10830	10760	10800	10,753	10,687
26	2010/1/8	10:00	10790	10810	10740	10760	10,780	10,720
27	2010/1/8	11:00	10750	10750	10750	10750	10,797	10,750
28	2010/1/8	12:30	10760	10770	10670	10680	10,777	10,720
29	2010/1/8	13:30	10680	10760	10680	10740	10,760	10,700
30	2010/1/8	14:30	10750	10810	10740	10810	10,780	10,697
31	2010/1/12	9:00	10760	10830	10750	10820	10,800	10,723
32	2010/1/12	10:00	10820	10830	10760	10790	10,823	10,750
33	2010/1/12	11:00	10790	10790	10790	10790	10,817	10,767
34	2010/1/12	12:30	10800	10840	10790	10820	10,820	10,780
35	2010/1/12	13:30	10830	10900	10820	10900	10,843	10,800
36	2010/1/12	14:30	10900	10910	10870	10890	10,883	10,827
37	2010/1/13	9:00	10780	10860	10780	10820	10,890	10,823
38	2010/1/13	10:00	10820	10820	10760	10780	10,863	10,803
39	2010/1/13	11:00	10780	10780	10780	10780	10,820	10,773
40	2010/1/13	12:30	10760	10790	10720	10760	10,797	10,753
41	2010/1/13	13:30	10750	10830	10750	10790	10,800	10,750
42	2010/1/13	14:30	10790	10790	10710	10720	10,803	10,727
43	2010/1/14	9:00	10800	10830	10770	10820	10,817	10,743
44	2010/1/14	10:00	10820	10850	10800	10840	10,823	10,760
45	2010/1/14	11:00	10840	10840	10840	10840	10,840	10,803
46	2010/1/14	12:30	10860	10900	10850	10880	10,863	10,830
47	2010/1/14	13:30	10880	10900	10860	10900	10,880	10,850
48	2010/1/14	14:30	10900	10910	10880	10890	10,903	10,863
49	2010/1/15	9:00	10910	10960	10870	10950	10,923	10,870
50	2010/1/15	10:00	10960	10970	10870	10890	10,947	10,873
51	2010/1/15	11:00	10900	10900	10900	10900	10,943	10,880
52	2010/1/15	12:30	10890	10950	10880	10900	10,940	10,883
53	2010/1/15	13:30	10900	10950	10890	10940	10,933	10,890
54	2010/1/15	14:30	10930	10980	10930	10970	10,960	10,900
55	2010/1/18	9:00	10850	10880	10780	10790	10,937	10,867
56	2010/1/18	10:00	10790	10820	10770	10780	10,893	10,827
57	2010/1/18	11:00	10790	10790	10790	10790	10,830	10,780
58	2010/1/18	12:30	10820	10840	10800	10830	10,817	10,787
59	2010/1/18	13:30	10830	10850	10800	10820	10,827	10,797

登録: 投稿 (Atom)