改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");

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