OSDN -- Open-Source-Software-Entwicklung und Downloads

Pastebin: OmegaChart 日付固定表示 Command.cs 追加修正ポイントには//☆FixedDisplayYMD

Format
Plain text
Post date
2018-04-25 18:14
Zeitraum der Veröffentlichung
Unbegrenzt
  1.  /*
  2.   * Copyright (c) Daisuke OKAJIMA    All rights reserved.
  3.   * 
  4.   * $Id$
  5.   */
  6.  using System;
  7.  using System.Xml;
  8.  using System.IO;
  9.  using System.Drawing;
  10.  using System.Diagnostics;
  11.  using System.Text;
  12.  using System.Windows.Forms;
  13.  using System.Collections;
  14.  using System.Security.Cryptography;
  15.  
  16.  using Zanetti.Arithmetic;
  17.  using Zanetti.Data;
  18.  using Zanetti.DataSource;
  19.  using Zanetti.Forms;
  20.  using Zanetti.Config;
  21.  using Zanetti.SystemTrading.Screening;
  22.  using Zanetti.SystemTrading.AutoTrading;
  23.  using Zanetti.Prediction;
  24.  using Zanetti.Indicators;
  25.  using Zanetti.UI;
  26.  using Zanetti.Parser;
  27.  
  28.  using Travis.Storage;
  29.  using Travis.Util;
  30.  using Travis.PKI;
  31.  
  32.  using Crownwood.Magic.Common;
  33.  using Crownwood.Magic.Controls;
  34.  using Crownwood.Magic.Docking;
  35.  using TabControl = Crownwood.Magic.Controls.TabControl;
  36.  
  37.  //using Crownwood.DotNetMagic.Menus;
  38.  
  39.  
  40.  namespace Zanetti.Commands {
  41.          /* 新しいコマンドを追加するときは次のことをすること
  42.           * 
  43.           * 1) Command.CIDのEnum値に追加
  44.           * 2) Command#Init, Execを修正
  45.           * 3) コマンドがメニューやツールバーを持つ場合は、MenuItemとCommandの関連付けなどを追加
  46.           */ 
  47.          internal enum CommandResult {
  48.                  Succeeded,
  49.                  Ignored,
  50.                  Failed
  51.          }
  52.          //キーカスタマイズダイアログではこの順番で表示される
  53.          internal enum CID {
  54.                  None = 0 ,
  55.                  //ダイアログ表示
  56.                  ShowDownloadDialog,
  57.                  ShowInitializeDialog,
  58.                  ShowPrintDialog,
  59.                  ShowCustomizeDialog,
  60.                  ShowScreeningDialog,
  61.                  ShowPredictionDialog,
  62.                  ShowAutoTradingDialog,
  63.                  ShowAddBookmarkDialog,
  64.                  ShowAboutBox,
  65.                  ShowExtensionKitDialog,
  66.                  ShowTestKitDialog,
  67.                  ShowSearchBrandDialog,
  68.                  ShowKeyConfigDialog,
  69.          ShowEnvironmentDialog,
  70.                  RegisterUserCode,
  71.                  //スタイル変更
  72.                  SetStyleDaily,
  73.                  SetStyleWeekly,
  74.                  SetStyleMonthly,
  75.          SetStyleYearly,
  76.                  SetStyleHalfDaily, //堂島用
  77.                  ShrinkCandleWidth,
  78.                  ExpandCandleWidth,
  79.                  ToggleLogarithmStyle,
  80.                  ToggleInverseStyle,
  81.                  ClearFreeLines,
  82.          FixedDisplayYMD,//☆FixedDisplayYMD
  83.          ToggleBookmarkPane,
  84.          ToggleSplitAdjuster,
  85.          ToggleScaleLock,
  86.                  TogglePriceEnabled,
  87.                  ToggleAccumulativeVolumeEnabled,
  88.                  //移動
  89.                  MoveToFirstDate,
  90.                  MoveToLastDate,
  91.                  MoveToPrevPage,
  92.                  MoveToNextPage,
  93.                  MoveToPrevDate, //ロウソク１本分の移動
  94.                  MoveToNextDate, 
  95.                  ShowPrevBrand, //現在見えているペインでの銘柄移動
  96.                  ShowNextBrand,  
  97.                  ShowPrevCode,  //コード順での移動
  98.                  ShowNextCode,   
  99.                  Back,
  100.                  Front,
  101.                  //データ関係
  102.                  UpdateCurrentData,
  103.                  DownloadIndexFile,
  104.                  ExportBrand,
  105.                  ExportHalfDaily,
  106.                  //Web
  107.                  OpenWeb,
  108.                  OpenCompanyInfoSite_Yahoo,
  109.                  OpenCompanyInfoSite_Infoseek,
  110.                  OpenCompanyInfoSite_Nikkei,
  111.                  OpenCompanyInfoSite_Livedoor,
  112.                  //その他
  113.                  Quit,
  114.                  ReloadKit,
  115.  
  116.                  //これより前にあるコマンドはキーカスタマイズ等の一覧で出てくる。後のコマンドは出てこない。
  117.                  VisibleCount,
  118.                  ShowInputCode,
  119.                  ShowSpecifiedBrand,
  120.  
  121.                  //サポート用コマンド
  122.  #if ENABLE_SUPPORT_COMMAND
  123.                  SupRebuildIndex,
  124.                  SupCreateKey,
  125.                  SupReload,
  126.                  SupCreateCert,
  127.                  SupStatistics,
  128.                  SupShrinkData,
  129.  #endif
  130.                  //終端
  131.                  Count
  132.          }
  133.  
  134.          internal class Command : ICloneable {
  135.                  private CID _id;
  136.                  private string _description;
  137.                  private Keys _shortcut;
  138.  
  139.                  public CID ID {
  140.                          get {
  141.                                  return _id;
  142.                          }
  143.                  }
  144.                  public string Description {
  145.                          get {
  146.                                  return _description;
  147.                          }
  148.                  }
  149.                  public Keys Shortcut {
  150.                          get {
  151.                                  return _shortcut;
  152.                          }
  153.                  }
  154.                  public object Clone() {
  155.                          return new Command(_id, _description, _shortcut);
  156.                  }
  157.  
  158.                  /// これはCommandCollectionからしか呼ばない。
  159.                  public void SetChortcut(Keys key) {
  160.                          _shortcut = key;
  161.                  }
  162.  
  163.                  public bool Visible {
  164.                          get {
  165.                                  return _id < CID.VisibleCount;
  166.                          }
  167.                  }
  168.  
  169.  
  170.  
  171.                  public Command(CID id, string description, Keys shortcut) {
  172.                          _id = id;
  173.                          _description = description;
  174.                          _shortcut = shortcut;
  175.                  }
  176.  
  177.                  public CommandResult Exec() {
  178.                          switch(_id) {
  179.                                  //ダイアログ表示
  180.                                  case CID.ShowDownloadDialog:
  181.                                          return CommandExec.ShowDownloadDialog();
  182.                                  case CID.ShowInitializeDialog:
  183.                                          return CommandExec.ShowInitializeDialog();
  184.                                  case CID.ShowPrintDialog:
  185.                                          return CommandExec.ShowPrintDialog();
  186.                                  case CID.ShowCustomizeDialog:
  187.                                          return CommandExec.ShowCustomizeDialog();
  188.                                  case CID.ShowScreeningDialog:
  189.                                          return CommandExec.ShowScreeningDialog();
  190.                                  case CID.ShowPredictionDialog:
  191.                                          return CommandExec.ShowPredictionDialog();
  192.                                  case CID.ShowAutoTradingDialog:
  193.                                          return CommandExec.ShowAutoTradingDialog();
  194.                                  case CID.ShowAddBookmarkDialog:
  195.                                          return CommandExec.ShowAddBookmarkDialog();
  196.                                  case CID.ShowAboutBox:
  197.                                          return CommandExec.AboutBox();
  198.                                  case CID.ShowExtensionKitDialog:
  199.                                          return CommandExec.ShowExtensionKitDialog();
  200.                                  case CID.ShowTestKitDialog:
  201.                                          return CommandExec.ShowKitTestDialog();
  202.                                  case CID.ShowSearchBrandDialog:
  203.                                          return CommandExec.ShowSearchBrandDialog();
  204.                                  case CID.ShowKeyConfigDialog:
  205.                                          return CommandExec.ShowKeyConfigDialog();
  206.                  case CID.ShowEnvironmentDialog:
  207.                      return CommandExec.ShowEnvironmentDialog();
  208.                  case CID.RegisterUserCode:
  209.                      return CommandExec.RegisterUserCode();
  210.                                  //スタイル変更
  211.                                  case CID.SetStyleDaily:
  212.                                          return CommandExec.SetChartFormat(ChartFormat.Daily);
  213.                                  case CID.SetStyleWeekly:
  214.                                          return CommandExec.SetChartFormat(ChartFormat.Weekly);
  215.                                  case CID.SetStyleMonthly:
  216.                                          return CommandExec.SetChartFormat(ChartFormat.Monthly);
  217.                  case CID.SetStyleYearly:
  218.                      return CommandExec.SetChartFormat(ChartFormat.Yearly);
  219.  #if DOJIMA
  220.                                  case CID.SetStyleHalfDaily:
  221.                                          return CommandExec.SetChartFormat(ChartFormat.HalfDaily);
  222.                                  case CID.ExportHalfDaily:
  223.                                          return CommandExec.ExportHalfDailyData();
  224.  #endif
  225.                                  case CID.ShrinkCandleWidth:
  226.                                          return CommandExec.ShrinkCandleWidth();
  227.                                  case CID.ExpandCandleWidth:
  228.                                          return CommandExec.ExpandCandleWidth();
  229.                                  case CID.ToggleLogarithmStyle:
  230.                                          return CommandExec.SetLogarithmStyle(!Env.Preference.LogScale);
  231.                                  case CID.ToggleInverseStyle:
  232.                                          return CommandExec.SetInverseStyle(!Env.Preference.InverseChart);
  233.                                  case CID.ClearFreeLines:
  234.                                          return CommandExec.ClearFreeLines();
  235.                  case CID.FixedDisplayYMD://☆FixedDisplayYMD
  236.                      return CommandExec.FixedDisplayYMD();//☆FixedDisplayYMD
  237.                  case CID.ToggleBookmarkPane:
  238.                                          return CommandExec.ShowBookmarkPane(!Env.Frame.IsBookmarkPaneVisible);
  239.                  case CID.ToggleSplitAdjuster:
  240.                      return CommandExec.SetSplitAdjuster(!Env.Preference.AdjustSplit);
  241.                  case CID.ToggleScaleLock:
  242.                      return CommandExec.SetScaleLock(!Env.Preference.ScaleLock);
  243.                                  case CID.TogglePriceEnabled:
  244.                                          return CommandExec.SetPriceEnabled(!Env.Preference.ShowPrice);
  245.                                  case CID.ToggleAccumulativeVolumeEnabled:
  246.                                          return CommandExec.SetAccumulativeVolumeEnabled(!Env.Preference.ShowAccumulativeVolume);
  247.                                  //移動
  248.                  case CID.MoveToFirstDate:
  249.                                          return CommandExec.JumpDate(Keys.Home);
  250.                                  case CID.MoveToLastDate:
  251.                                          return CommandExec.JumpDate(Keys.End);
  252.                                  case CID.MoveToNextPage:
  253.                                          return CommandExec.JumpDate(Keys.PageDown);
  254.                                  case CID.MoveToPrevPage:
  255.                                          return CommandExec.JumpDate(Keys.PageUp);
  256.                                  case CID.MoveToNextDate:
  257.                                          return CommandExec.JumpDate(Keys.Right);
  258.                                  case CID.MoveToPrevDate:
  259.                                          return CommandExec.JumpDate(Keys.Left);
  260.                                  case CID.ShowNextBrand:
  261.                                          return CommandExec.ShowNextBrand();
  262.                                  case CID.ShowPrevBrand:
  263.                                          return CommandExec.ShowPrevBrand();
  264.                                  case CID.ShowNextCode:
  265.                                          return CommandExec.ShowNextCode();
  266.                                  case CID.ShowPrevCode:
  267.                                          return CommandExec.ShowPrevCode();
  268.                                  case CID.Back:
  269.                                          return CommandExec.Back(1);
  270.                                  case CID.Front:
  271.                                          return CommandExec.Front(1);
  272.                                          //データ関係
  273.                                  case CID.DownloadIndexFile:
  274.                                          return CommandExec.DownloadIndexFile();
  275.                                  case CID.UpdateCurrentData:
  276.                                          return CommandExec.UpdateCurrentData();
  277.                                  case CID.ExportBrand:
  278.                                          return CommandExec.ExportBrand();
  279.                                          //Web
  280.                                  case CID.OpenWeb:
  281.                                          return CommandExec.OpenWeb();
  282.                                  case CID.OpenCompanyInfoSite_Yahoo:
  283.                                          return CommandExec.OpenCompanyInfoPage(CompanyInfoSite.Yahoo);
  284.                                  case CID.OpenCompanyInfoSite_Infoseek:
  285.                                          return CommandExec.OpenCompanyInfoPage(CompanyInfoSite.Infoseek);
  286.                                  case CID.OpenCompanyInfoSite_Nikkei:
  287.                                          return CommandExec.OpenCompanyInfoPage(CompanyInfoSite.Nikkei);
  288.                                  case CID.OpenCompanyInfoSite_Livedoor:
  289.                                          return CommandExec.OpenCompanyInfoPage(CompanyInfoSite.Livedoor);
  290.                                          //その他
  291.                                  case CID.Quit:
  292.                                          return CommandExec.Quit();
  293.                                  case CID.ReloadKit:
  294.                                          return CommandExec.Reload(null);
  295.  #if ENABLE_SUPPORT_COMMAND
  296.                                  case CID.SupRebuildIndex: {
  297.                                          Data.StaticGrouping.Run();
  298.                                          return CommandResult.Succeeded;
  299.                                  }
  300.                                  case CID.SupReload:
  301.                                          return CommandExec.Reload(null);
  302.                                  case CID.SupCreateKey:
  303.                                          return CommandExec.CreateKey();
  304.                                  case CID.SupCreateCert:
  305.                                          return CommandExec.GenerateUserCode();
  306.                                  case CID.SupStatistics:
  307.                                          return CommandExec.StatisticsTest();
  308.                                  case CID.SupShrinkData:
  309.                                          return CommandExec.ShrinkData();
  310.  #endif
  311.                                  default:
  312.                                          Debug.WriteLine("Unknown command " + _id);
  313.                                          return CommandResult.Ignored;
  314.                          }
  315.                  }
  316.          }
  317.          internal class CommandCollection : ICloneable {
  318.                  
  319.                  //Collection
  320.                  private Hashtable _keyToCommand;
  321.                  private Command[] _idArray;
  322.  
  323.                  public CommandCollection(StorageNode keys) {
  324.                          Init(keys);
  325.                  }
  326.                  public void Reset() {
  327.                          Init(null);
  328.                  }
  329.  
  330.                  private CommandCollection() {
  331.                          _keyToCommand = new Hashtable();
  332.                          _idArray = new Command[(int)CID.Count];
  333.                  }
  334.                  public object Clone() {
  335.                          CommandCollection r = new CommandCollection();
  336.                          foreach(Command cmd in _idArray) {
  337.                                  Command nc = (Command)cmd.Clone();
  338.                                  r._idArray[(int)nc.ID] = nc;
  339.                                  if(nc.Shortcut!=Keys.None) r._keyToCommand[nc.Shortcut] = nc;
  340.                          }
  341.                          return r;
  342.                  }
  343.  
  344.                  private void Init(StorageNode keys) {
  345.                          _keyToCommand = new Hashtable();
  346.                          _idArray = new Command[(int)CID.Count];
  347.  
  348.                          //ダイアログ表示
  349.                          AddCommand(CID.ShowDownloadDialog,      "データのダウンロード",     keys, Keys.Control|Keys.O);
  350.                          AddCommand(CID.ShowInitializeDialog,    "データの初期化",           keys, Keys.None);
  351.                          AddCommand(CID.ShowPrintDialog,         "印刷",                     keys, Keys.Control|Keys.P);
  352.                          AddCommand(CID.ShowCustomizeDialog,     "カスタマイズ",             keys, Keys.Control|Keys.T);
  353.                          AddCommand(CID.ShowScreeningDialog,     "スクリーニング",           keys, Keys.Control|Keys.S);
  354.                          AddCommand(CID.ShowAutoTradingDialog,   "自動売買検証",             keys, Keys.Control|Keys.V);
  355.                          AddCommand(CID.ShowPredictionDialog,    "セオリー検証",             keys, Keys.None);
  356.                          AddCommand(CID.ShowAddBookmarkDialog,   "ブックマークへの追加",     keys, Keys.None);
  357.                          AddCommand(CID.ShowAboutBox,            "バージョン情報の表示",     keys, Keys.None);
  358.                          AddCommand(CID.ShowKeyConfigDialog,     "キー割り当てのカスタマイズ", keys, Keys.None);
  359.              AddCommand(CID.ShowEnvironmentDialog,   "環境設定",                 keys, Keys.None);
  360.              AddCommand(CID.ShowExtensionKitDialog, "拡張キット一覧", keys, Keys.None);
  361.              AddCommand(CID.ShowTestKitDialog,       "拡張キットテスト",         keys, Keys.None);
  362.                          AddCommand(CID.ShowSearchBrandDialog,   "銘柄の検索",               keys, Keys.Control|Keys.F);
  363.                          AddCommand(CID.RegisterUserCode,        "Contribution Certificateの登録", keys, Keys.None);
  364.                          //スタイル変更
  365.                          AddCommand(CID.SetStyleDaily,           "日足表示",                 keys, Keys.Control|Keys.D);
  366.                          AddCommand(CID.SetStyleWeekly,          "週足表示",                 keys, Keys.Control|Keys.W);
  367.                          AddCommand(CID.SetStyleMonthly,         "月足表示",                 keys, Keys.Control|Keys.M);
  368.              AddCommand(CID.SetStyleYearly,          "年足表示",                 keys, Keys.Control|Keys.Y);
  369.              AddCommand(CID.SetStyleHalfDaily,       "半日足表示",               keys, Keys.Control|Keys.H);
  370.                          AddCommand(CID.ShrinkCandleWidth,       "ロウソク幅の縮小",         keys, Keys.Control|Keys.OemMinus);
  371.                          AddCommand(CID.ExpandCandleWidth,       "ロウソク幅の拡大",         keys, Keys.Control|Keys.Oemplus);
  372.                          AddCommand(CID.ToggleLogarithmStyle,    "対数表示切替",             keys, Keys.Control|Keys.L);
  373.                          AddCommand(CID.ToggleInverseStyle,      "上下反転表示切替",         keys, Keys.Control|Keys.R);
  374.                          AddCommand(CID.ClearFreeLines,          "自由直線のクリア",         keys, Keys.None);
  375.              AddCommand(CID.FixedDisplayYMD,         "表示年月日の固定",         keys, Keys.None);//☆FixedDisplayYMD
  376.              AddCommand(CID.ToggleBookmarkPane,      "ブックマーク表示の切替",   keys, Keys.Control|Keys.B);
  377.              AddCommand(CID.ToggleSplitAdjuster,     "分割の考慮切替",           keys, Keys.None);
  378.              AddCommand(CID.ToggleScaleLock,         "縮尺の固定",               keys, Keys.None);
  379.                          AddCommand(CID.TogglePriceEnabled,      "価格と凡例の表示",         keys, Keys.None);
  380.                          AddCommand(CID.ToggleAccumulativeVolumeEnabled, "価格帯出来高の表示",keys,Keys.None);
  381.                          //移動
  382.              AddCommand(CID.MoveToFirstDate,         "最初の日付へ移動",         keys, Keys.Home);
  383.                          AddCommand(CID.MoveToLastDate,          "最後の日付へ移動",         keys, Keys.End);
  384.                                  //このブロックはKeyConfigDialogでカスタマイズできる。１コマンドずつの独立ではないことに注意
  385.                          AddCommand(CID.MoveToNextPage,          "１画面先の日付へ移動",     keys, Keys.None);
  386.                          AddCommand(CID.MoveToPrevPage,          "１画面前の日付へ移動",     keys, Keys.None);
  387.                          AddCommand(CID.MoveToNextDate,          "１日次へ",                 keys, Keys.None);
  388.                          AddCommand(CID.MoveToPrevDate,          "１日前へ",                 keys, Keys.None);
  389.                          AddCommand(CID.ShowNextBrand,           "次の表示順銘柄",           keys, Keys.None);
  390.                          AddCommand(CID.ShowPrevBrand,           "前の表示順銘柄",           keys, Keys.None);
  391.                          AddCommand(CID.ShowNextCode,            "次のコード順銘柄",         keys, Keys.None);
  392.                          AddCommand(CID.ShowPrevCode,            "前のコード順銘柄",         keys, Keys.None);
  393.                          AddCommand(CID.Back,                    "戻る",                     keys, Keys.Back);
  394.                          AddCommand(CID.Front,                   "進む",                     keys, Keys.Shift|Keys.Back);
  395.                          
  396.                          AddCommand(CID.ShowInputCode,           "コード入力",               keys, Keys.None);
  397.                          //データ関係
  398.                          AddCommand(CID.DownloadIndexFile,       "インデックスファイルのダウンロード", keys, Keys.None);
  399.                          AddCommand(CID.UpdateCurrentData,       "現在の銘柄を更新",         keys, Keys.F5);
  400.                          AddCommand(CID.ExportBrand,             "データのエクスポート", keys, Keys.None);
  401.                          AddCommand(CID.ExportHalfDaily,         "半日足データのエクスポート", keys, Keys.None);
  402.                          //Web
  403.                          AddCommand(CID.OpenWeb,                  "OmegaChartのWebを開く",   keys, Keys.None);
  404.                          AddCommand(CID.OpenCompanyInfoSite_Yahoo,    "Yahooの企業情報ページを開く",    keys, Keys.None);
  405.                          AddCommand(CID.OpenCompanyInfoSite_Infoseek, "Infoseekの企業情報ページを開く", keys, Keys.None);
  406.                          AddCommand(CID.OpenCompanyInfoSite_Nikkei,   "日経の企業情報ページを開く",     keys, Keys.None);
  407.                          AddCommand(CID.OpenCompanyInfoSite_Livedoor, "livedoorの企業情報ページを開く", keys, Keys.None);
  408.                          //その他
  409.                          AddCommand(CID.Quit,                     "OmegaChartの終了", keys, Keys.Control|Keys.Shift|Keys.X);
  410.                          AddCommand(CID.ReloadKit,                "拡張キットのリロード", keys, Keys.None);
  411.                          //サポート用コマンド
  412.  #if ENABLE_SUPPORT_COMMAND
  413.                          AddCommand(CID.SupRebuildIndex,          "Active500などのindex再作成", keys, Keys.None);
  414.                          AddCommand(CID.SupReload,                "リロード",                   keys, Keys.None);
  415.                          AddCommand(CID.SupCreateKey,             "キーの再作成",               keys, Keys.None);
  416.                          AddCommand(CID.SupCreateCert,            "Contribution Cert作成",      keys, Keys.None);
  417.                          AddCommand(CID.SupStatistics,            "Statistics",                 keys, Keys.None);
  418.                          AddCommand(CID.SupShrinkData,            "データ縮小",                 keys, Keys.None);
  419.  #endif
  420.                  }
  421.                  
  422.                  private void AddCommand(CID cid, string desc, StorageNode keys, Keys def) {
  423.                          Keys k = keys==null? def : Util.ParseKey(keys[cid.ToString()]);
  424.                          Command cmd = new Command(cid, desc, k);
  425.                          _idArray[(int)cid] = cmd;
  426.                          if(k!=Keys.None) _keyToCommand[k] = cmd;
  427.                  }
  428.                  public Command Get(CID cid) {
  429.                          Command r = _idArray[(int)cid];
  430.                          Debug.Assert(r!=null);
  431.                          return r;
  432.                  }
  433.                  public CommandResult Exec(CID cid) {
  434.                          Command cmd = Get(cid);
  435.                          Debug.Assert(cmd!=null);
  436.                          return cmd.Exec();
  437.                  }
  438.                  public CommandResult Exec(Keys key) {
  439.                          Command cmd = _keyToCommand[key] as Command;
  440.                          CID cid;
  441.                          if(cmd!=null)
  442.                                  return cmd.Exec();
  443.                          else if((cid = Env.Options.KeyConfig.Translate(key))!=CID.None) {
  444.                                  return Exec(cid);                                                                                                               
  445.                          }
  446.                          else if(Keys.D0 <= key && key <= Keys.D9) {
  447.                                  CommandExec.PromptInputCode(false, (char)('0' + (key-Keys.D0)));
  448.                                  return CommandResult.Succeeded;
  449.                          }
  450.                          else if(Keys.NumPad0 <= key && key <= Keys.NumPad9) {
  451.                                  CommandExec.PromptInputCode(false, (char)('0' + (key-Keys.NumPad0)));
  452.                                  return CommandResult.Succeeded;
  453.                          }
  454.                          else
  455.                                  return CommandResult.Ignored;
  456.                  }
  457.                  public CommandResult Exec(ref Message m) {
  458.                          if(m.Msg==Win32.WM_KEYDOWN) {
  459.                                  int k = m.WParam.ToInt32();
  460.                                  return Exec((Keys)k | Control.ModifierKeys); //VKシリーズ定数と同じと仮定
  461.                          }
  462.                          else if(m.Msg==Win32.WM_MOUSEWHEEL) {
  463.                                  return ExecMouseWheel(m.WParam.ToInt32() >> 16);
  464.                          }
  465.                          else
  466.                                  return CommandResult.Ignored;
  467.                  }
  468.  
  469.                  public CommandResult ExecMouseWheel(int delta) {
  470.                          CID cid;
  471.                          if((cid = Env.Options.KeyConfig.TranslateWheel(delta))!=CID.None) {
  472.                                  return Exec(cid);                       
  473.                          }
  474.                          else
  475.                                  return CommandResult.Ignored;
  476.                  }
  477.  
  478.                  public IEnumerator Enum() {
  479.                          return _idArray.GetEnumerator();
  480.                  }
  481.  
  482.                  public void SetKeyAssign(Command cmd, Keys newkey) {
  483.                          Debug.Assert(_keyToCommand[newkey]==null);
  484.                          _keyToCommand[cmd.Shortcut] = null;
  485.                          _keyToCommand[newkey] = cmd;
  486.                          cmd.SetChortcut(newkey);
  487.                  }
  488.  
  489.                  public void SaveTo(StorageNode node) {
  490.                          foreach(Command cmd in _idArray) {
  491.                                  if(cmd.Shortcut!=Keys.None)
  492.                                          node[cmd.ID.ToString()] = Util.FormatShortcut(cmd.Shortcut);
  493.                          }
  494.                  }
  495.          }
  496.  
  497.          internal class CommandExec {
  498.  
  499.                  public static CommandResult ShowBrand(AbstractBrand b) {
  500.                          AbstractBrand old = Env.Frame.ChartCanvas.GetBrand();
  501.                          if(old!=null) Env.BrandHistory.Update(old);
  502.                          CommandResult r = ShowBrandInternal(b);
  503.                          return r;
  504.                  }
  505.                  private static CommandResult ShowBrandInternal(AbstractBrand b) {
  506.                          Env.Preference.ScaleLock = false;
  507.                          RefreshChart();                 
  508.                          Env.Frame.ChartCanvas.LoadBrand(b, true);
  509.  
  510.                          KitTestDialog kittest = Env.Frame.CurrentModelessDialog as KitTestDialog;
  511.                          if(kittest!=null) kittest.UpdateBrandName();
  512.                          return CommandResult.Succeeded;
  513.                  }
  514.                  public static CommandResult Back(int step) {
  515.                          if(!Env.BrandHistory.HasBack) return CommandResult.Ignored;
  516.                          AbstractBrand b = Env.BrandHistory.Back(Env.Frame.ChartCanvas.GetBrand(), step);
  517.                          return ShowBrandInternal(b);
  518.                  }
  519.                  public static CommandResult Front(int step) {
  520.                          if(!Env.BrandHistory.HasFront) return CommandResult.Ignored;
  521.                          AbstractBrand b = Env.BrandHistory.Redo(Env.Frame.ChartCanvas.GetBrand(), step);
  522.                          return ShowBrandInternal(b);
  523.                  }
  524.  
  525.                  public static CommandResult ClearFreeLines() {
  526.                          Env.FreeLines.Clear(Env.Frame.ChartCanvas.GetBrand(), Env.CurrentIndicators.Format, Env.Preference.LogScale);
  527.                          Env.Frame.ChartCanvas.DrawingEngine.ClearScale();
  528.                          Env.Frame.ChartCanvas.Invalidate();
  529.                          return CommandResult.Succeeded;
  530.                  }
  531.  
  532.          //☆FixedDisplayYMD
  533.          public static CommandResult FixedDisplayYMD()
  534.          {
  535.              //
  536.              var br = Env.Frame.ChartCanvas.GetBrand();
  537.              var td = br.ReserveFarm().GetByIndex(Env.Frame.ChartCanvas.DrawingEngine.DateLine._nextToBeDrawn);
  538.              if (Env.Preference.FixedDisplayYMD == int.MaxValue)
  539.              {
  540.                  Env.Preference.FixedDisplayYMD = td.Date;
  541.                  Env.Frame.ChartCanvas.DrawingEngine.SetStartDate(Env.Preference.FixedDisplayYMD);
  542.                  Env.Frame.ChangeMenuFixedDisplayYmdText(string.Format("日付固定表示中:{0:D8}", td.Date));
  543.              }
  544.              else
  545.              {
  546.                  Env.Frame.ChangeMenuFixedDisplayYmdText("日付固定表示");
  547.                  Env.Preference.FixedDisplayYMD = int.MaxValue;
  548.                  CommandExec.RefreshChart();
  549.              }
  550.  
  551.              return CommandResult.Succeeded;
  552.          }
  553.          //☆FixedDisplayYMD ここまで
  554.  
  555.          public static CommandResult ShowDownloadDialog() {
  556.                          return ShowDownloadDialog(null);
  557.                  }
  558.                  public static CommandResult ShowDownloadDialog(DownloadOrder order) {
  559.                          MainFrame f = Env.Frame;
  560.                          //!!ModelessDialog機構はまだ未完成
  561.  
  562.                          DownloadDialog dlg = new DownloadDialog(order);
  563.  
  564.  #if PRIVATE_FEATURE //自分専用：ダウンロードしたら即hottestでスクリーニング
  565.                          if(Control.ModifierKeys==Keys.Control) {
  566.                                  dlg.RunScreeningNow = true;
  567.                                  dlg.Text = "自分専用ダウンロード 即スクリーニング";
  568.                          }
  569.  #endif
  570.                          dlg.Owner = f;
  571.                          Rectangle rc = f.DesktopBounds;
  572.                          dlg.Left = (rc.Left + rc.Right)/2 - dlg.Width/2;
  573.                          dlg.Top  = (rc.Top  + rc.Bottom)/2 - dlg.Height/2;
  574.                          //f.CurrentModelessDialog = dlg;
  575.                          dlg.Show();
  576.                          return CommandResult.Succeeded;
  577.                  }
  578.                  public static CommandResult ShowInitializeDialog() {
  579.                          InitializeData dlg = new InitializeData();
  580.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  581.                                  return RefreshChart();
  582.                          }
  583.                          else
  584.                                  return CommandResult.Failed;
  585.                  }
  586.  
  587.          private static CodeInput _codeInput;
  588.  
  589.                  public static void PromptInputCode(bool fromMenu, char ch) {
  590.              if(_codeInput==null) _codeInput = new CodeInput(); //２回目から再利用
  591.                          if(!fromMenu) _codeInput.StockCode = (int)(ch - '0');
  592.                          if(_codeInput.ShowDialog(Env.Frame)==DialogResult.OK) {
  593.                  AbstractBrand br = Env.BrandCollection.FindBrand(_codeInput.StockCode);
  594.                                  if(br!=null)
  595.                                          ShowBrand(br);
  596.  
  597.                                  if(fromMenu)
  598.                                          Util.Information(Env.Frame, "このメニューを使うかわりに、通常の画面で４桁の数値を打ち込めば銘柄を指定することができます。");
  599.                          }
  600.                  }
  601.  
  602.                  public static CommandResult ShowPrintDialog() {
  603.                          new PrintSupport().ShowPrintDialog();
  604.                          return CommandResult.Succeeded;
  605.                  }
  606.  
  607.                  public static CommandResult ShowCustomizeDialog() {
  608.                          CustomizeDialog dlg = new CustomizeDialog();
  609.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  610.                                  RefreshChart(null);
  611.                          }
  612.                          return CommandResult.Succeeded;
  613.                  }
  614.  
  615.                  public static CommandResult ExportBrand() {
  616.              ExportDialog dlg = new ExportDialog();
  617.              dlg.ShowDialog(Env.Frame);
  618.              return CommandResult.Succeeded;
  619.          }
  620.  
  621.  
  622.                  public static CommandResult ShowScreeningDialog() {
  623.                          if(Env.Frame.CurrentModelessDialog!=null) {
  624.                                  Util.Warning(Env.Frame, "現在ダウンロードを実行中のため、スクリーニングはできません。");
  625.                                  return CommandResult.Succeeded;
  626.                          }
  627.  
  628.                          ScreeningDialog dlg = new ScreeningDialog();
  629.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  630.                                  if(dlg.ScreeningOrder.Result!=null) {
  631.                                          if(dlg.ScreeningOrder.Result.ResultCount > 0) {
  632.                                                  ScreeningResultPane pane = new ScreeningResultPane(dlg.ScreeningOrder);
  633.                                                  AddDockingPane(pane, dlg.ScreeningOrder.Name, pane.RequiredWidth, IconConst.SEARCH);
  634.  
  635.                                          }
  636.                                  }
  637.                          }
  638.                          return CommandResult.Succeeded;
  639.                  }
  640.  
  641.                  public static CommandResult ShowPredictionDialog() {
  642.                          PredictionDialog dlg = new PredictionDialog();
  643.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  644.                                  if(dlg.Result!=null) {
  645.                                          if(dlg.Result.HitCount==0) {
  646.                                                  Util.Warning(Env.Frame, "条件に該当するデータはありませんでした。");
  647.                                          }
  648.                                          else {
  649.                                                  PredictionResultPane pane = new PredictionResultPane(dlg.Result);
  650.                                                  AddDockingPane(pane, dlg.Result.Item.Title, pane.RequiredWidth, IconConst.COPY);
  651.                                          }
  652.                                  }
  653.                          }
  654.                          return CommandResult.Succeeded;
  655.                  }
  656.                  public static CommandResult ShowAutoTradingDialog() {
  657.                          AutoTradingDialog dlg = new AutoTradingDialog();
  658.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  659.                                  if(dlg.Result!=null) {
  660.                                          AutoTradingResultPane pane = new AutoTradingResultPane(dlg.Result);
  661.                                          AddDockingPane(pane, dlg.Result.Item.Title, pane.RequiredWidth, IconConst.COPY);
  662.                                  }
  663.                          }
  664.                          return CommandResult.Succeeded;
  665.                  }
  666.                  private static Content AddDockingPane(Control content, string title, int width, int imgindex) {
  667.                          DockingManager m = Env.Frame.DockingManager;
  668.                          WindowContentTabbed wc = FindTabControl(m, State.DockLeft);
  669.                          Content c;
  670.                          if(wc==null) {
  671.                                  c = m.Contents.Add(content, title);
  672.                                  c.DisplaySize = new Size(width+16,500);
  673.                                  c.FloatingSize = new Size(width+16,500); 
  674.                                  m.AddContentWithState(c, State.DockLeft);
  675.                          }
  676.                          else {
  677.                                  c = m.Contents.Add(content, title);
  678.                                  //通常のタブがあればそこに追加
  679.                                  if(wc.TabControl.HideTabsMode==TabControl.HideTabsModes.HideUsingLogic)
  680.                                          m.AddContentToWindowContent(c, wc);
  681.                                  c.BringToFront();
  682.                          }
  683.                          c.ImageList = Env.ImageList16;
  684.                          c.ImageIndex = imgindex;
  685.                          return c;
  686.  
  687.                  }
  688.                  private static WindowContentTabbed FindTabControl(DockingManager m, State s) {
  689.                          foreach(Content c in m.Contents) {
  690.                                  WindowContentTabbed t = c.ParentWindowContent as WindowContentTabbed;
  691.                                  if(t!=null && t.State==s) return t;
  692.                          }
  693.                          return null;
  694.                  }
  695.  
  696.                  public static CommandResult ShowAddBookmarkDialog() {
  697.                          SelectBookmarkFolder dlg = new SelectBookmarkFolder();
  698.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  699.                                  AbstractBrand br = Env.Frame.ChartCanvas.GetBrand();
  700.                                  if(dlg.ResultFolder.ContainsCode(br.Code,false))
  701.                                          Util.Warning(Env.Frame, "既に同じ銘柄が登録されています。");
  702.                                  else{
  703.                                          Content cnt = Env.Frame.BookmarkPaneContent;
  704.                                          if(cnt!=null && !cnt.Visible)
  705.                                                  ShowBookmarkPane(true);                         
  706.                                          dlg.ResultFolder.AddChild(new BrandBookmark(dlg.ResultFolder,br.Code),null);
  707.                                  }
  708.                          }
  709.                          return CommandResult.Succeeded;
  710.                  }
  711.  
  712.                  public static CommandResult ShowBookmarkPane(bool show) {
  713.                          if(show) {
  714.                                  foreach(Content content in Env.Frame.DockingManager.Contents) {
  715.                                          if(content.Control is BookmarkPane) {
  716.                                                  content.BringToFront();
  717.                                                  return CommandResult.Failed;
  718.                                          }
  719.                                  }
  720.                                  BookmarkPane pane = new BookmarkPane();
  721.                                  Env.Frame.BookmarkPaneContent = AddDockingPane(pane, "お気に入り", 150, IconConst.STAR);                           
  722.                          }
  723.                          else {
  724.                                  foreach(Content content in Env.Frame.DockingManager.Contents) {
  725.                                          if(content.Control is BookmarkPane) {
  726.                                                  Env.Frame.DockingManager.Contents.Remove(content);
  727.                                                  return CommandResult.Failed;
  728.                                          }
  729.                                  }
  730.                                  //Env.Frame.DockingManager.Contents.Remove(Env.Frame.BookmarkPaneContent);
  731.                                  //Env.Frame.BookmarkPaneContent = null;
  732.                                  //Env.Frame.DockingManager.HideContent(Env.Frame.BookmarkPaneContent);
  733.                          }
  734.                          return CommandResult.Succeeded;
  735.                  }
  736.          public static CommandResult SetSplitAdjuster(bool adjust) {
  737.              Env.BrandCollection.ClearAllFarms();
  738.              Env.Preference.AdjustSplit = adjust;
  739.              return ResetLayout();
  740.          }
  741.          public static CommandResult SetScaleLock(bool lock_) {
  742.              Env.BrandCollection.ClearAllFarms();
  743.              Env.Preference.ScaleLock = lock_;
  744.                          return ResetLayout();
  745.                  }
  746.                  public static CommandResult SetPriceEnabled(bool value) {
  747.                          Env.Preference.ShowPrice = value;
  748.                          return ResetLayout();
  749.                  }
  750.                  public static CommandResult SetAccumulativeVolumeEnabled(bool value) {
  751.                          Env.Preference.ShowAccumulativeVolume = value;
  752.                          return ResetLayout();
  753.                  }
  754.  
  755.  
  756.          //!!Keysを使うのはやめたいところ
  757.                  public static CommandResult JumpDate(Keys key) {
  758.                          DataFarm farm = Env.Frame.ChartCanvas.GetBrand().ReserveFarm();
  759.                          if(farm.IsEmpty) return CommandResult.Failed;
  760.                          int limit = farm.TotalLength;
  761.  
  762.                          int w = Env.Layout.DisplayColumnCount;
  763.                          int n = Env.Frame.ChartCanvas.FirstDateIndex;
  764.                          int cursor = n;
  765.                          switch(key) {
  766.                                  case Keys.Home:
  767.                                          n = 0;
  768.                                          cursor = n;
  769.                                          break;
  770.                                  case Keys.End:
  771.                                          n = limit - w;
  772.                                          if(n<0) n = 0;
  773.                                          cursor = limit-1;
  774.                                          break;
  775.                                  case Keys.PageUp:
  776.                                          n -= w;
  777.                                          if(n<0) n = 0;
  778.                                          cursor = n;
  779.                                          break;
  780.                                  case Keys.PageDown:
  781.                                          n += w;
  782.                                          if(n > limit-w) n = limit-w;
  783.                                          if(n < 0) n = 0;
  784.                                          cursor = n + w - 1;
  785.                                          break;
  786.                                  case Keys.Left:
  787.                                          n -= 5;
  788.                                          if(n < 0) n=0;
  789.                                          cursor = n;
  790.                                          break;
  791.                                  case Keys.Right:
  792.                                          n += 5;
  793.                                          if(n > limit-w) n = limit-w;
  794.                                          if(n < 0) n = 0;
  795.                                          cursor = n + w - 1;
  796.                                          break;
  797.                          }
  798.  
  799.                          Env.Frame.ChartCanvas.SetDateIndex(n, cursor);
  800.                          return CommandResult.Succeeded;
  801.                  }
  802.                  public static CommandResult OpenWeb() {
  803.                          try {
  804.                                  Process.Start("http://www.omegachart.org/");
  805.                          }
  806.                          catch(Exception) {
  807.                          }
  808.                          return CommandResult.Succeeded;
  809.                  }
  810.                  public static CommandResult AboutBox() {
  811.                          AboutBox dlg = new AboutBox();
  812.                          dlg.ShowDialog(Env.Frame);
  813.                          return CommandResult.Succeeded;
  814.                  }
  815.  
  816.                  public static CommandResult ShowExtensionKitDialog() {
  817.                          ExtensionKitListDialog dlg = new ExtensionKitListDialog();
  818.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  819.                                  Env.SaveEnv();
  820.                                  Reload(null);
  821.                          }
  822.                          return CommandResult.Succeeded;
  823.                  }
  824.                  public static CommandResult ShowKeyConfigDialog() {
  825.                          KeyConfigDialog dlg = new KeyConfigDialog();
  826.                          dlg.ShowDialog(Env.Frame);
  827.                          return CommandResult.Succeeded;
  828.                  }
  829.          public static CommandResult ShowEnvironmentDialog() {
  830.              EnvironmentDialog dlg = new EnvironmentDialog();
  831.              dlg.ShowDialog(Env.Frame);
  832.              return CommandResult.Succeeded;
  833.          }
  834.  
  835.  
  836.          public static CommandResult ShowKitTestDialog() {
  837.                          KitTestDialog dlg = Env.KitTestDialog;
  838.                          if(dlg==null) {
  839.                                  dlg = new KitTestDialog();
  840.                                  Rectangle rc = Env.Frame.DesktopBounds;
  841.                                  dlg.Left = (rc.Left + rc.Right)/2 - dlg.Width/2;
  842.                                  dlg.Top  = (rc.Top  + rc.Bottom)/2 - dlg.Height/2;
  843.                          }
  844.                          if(dlg.Visible) return CommandResult.Ignored;
  845.  
  846.                          Env.Frame.CurrentModelessDialog = dlg;
  847.                          dlg.Owner = Env.Frame;
  848.                          dlg.Show();
  849.                          return CommandResult.Succeeded;
  850.                  }
  851.                  public static CommandResult ShowSearchBrandDialog() {
  852.                          SearchBrandDialog dlg = new SearchBrandDialog();
  853.                          dlg.ShowDialog(Env.Frame);
  854.                          return CommandResult.Succeeded;
  855.                  }
  856.  
  857.                  //IndicatorSetの再構築と再表示
  858.                  public static CommandResult RefreshChart() {
  859.                          RefreshChart(null);
  860.                          return CommandResult.Succeeded;
  861.                  }
  862.                  public static CommandResult RefreshChart(IIndicatorCustomizer ic) {
  863.                          Env.Frame.Cursor = Cursors.WaitCursor;
  864.                          ChartCanvas cnv = Env.Frame.ChartCanvas;
  865.                          AbstractBrand br = cnv.GetBrand();
  866.                          ChartFormat format= Env.Options.ChartFormat;
  867.  #if DOJIMA
  868.                          //派生銘柄時の半日足は許可しない　原理的にはできるはずだが
  869.                          if(br is DerivedBrand && format==ChartFormat.HalfDaily)
  870.                                  format = ChartFormat.Daily;
  871.  #endif
  872.                          Env.BrandCollection.ClearAllFarms();
  873.                          Env.Preference.Refresh();
  874.  
  875.                          IndicatorSetBuilder bld = new IndicatorSetBuilder();
  876.                          bld.Customizer = ic;
  877.                          bld.Construct(Env.Options.ChartFormat);
  878.                          Env.CurrentIndicators = bld.Result;
  879.  
  880.                          cnv.ReloadFromPreference();
  881.                          cnv.LoadBrand(br, false);
  882.                          ResetLayout();
  883.                          Env.Frame.Cursor = Cursors.Default;
  884.                          return CommandResult.Succeeded;
  885.                  }
  886.                  public static CommandResult ResetLayout() {
  887.                          Env.Layout.Init();
  888.                          Env.Frame.ChartCanvas.ResetLayout();
  889.                          Env.Frame.Invalidate(true);
  890.                          return CommandResult.Succeeded;
  891.                  }
  892.  
  893.  
  894.                  public static CommandResult Reload(IIndicatorCustomizer ic) {
  895.                          Env.ReloadSchema();
  896.                          RefreshChart(ic);
  897.                          //Util.Information(Env.Frame, "リロードしました");
  898.                          return CommandResult.Succeeded;
  899.                  }
  900.  
  901.                          
  902.                  public static CommandResult Quit() {
  903.                          Env.Frame.Close();
  904.                          return CommandResult.Succeeded;
  905.                  }
  906.  
  907.                  //署名関係
  908.                  public static CommandResult CreateKey() {
  909.                          RSAKeyPair kp = RSAKeyPair.GenerateNew(256, new Random());
  910.                          //PrivateKey保存
  911.                          StreamWriter wr = new StreamWriter(Env.GetAppDir()+"privatekey.txt");
  912.                          wr.WriteLine(kp.D.ToHexString());
  913.                          wr.WriteLine(kp.P.ToHexString());
  914.                          wr.WriteLine(kp.Q.ToHexString());
  915.                          wr.WriteLine(kp.U.ToHexString());
  916.                          wr.Close();
  917.                          //PublicKeyダンプ
  918.                          RSAPublicKey pub = (RSAPublicKey)kp.PublicKey;
  919.                          Debug.WriteLine("Pubkey-Mod="+pub.Modulus.ToHexString());
  920.                          Debug.WriteLine("Pubkey-Exp="+pub.Exponent.ToHexString());
  921.                          return CommandResult.Succeeded;
  922.                  }
  923.  
  924.                  public static CommandResult SignKit() {
  925.  
  926.                          OpenFileDialog dlg = new OpenFileDialog();
  927.                          dlg.Title = "XMLフォーマットの拡張キット選択";
  928.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  929.                                  string fn = dlg.FileName;
  930.                                  StorageNode node = new DOMNodeReader(XmlUtil.LoadDOM(fn)).Read();
  931.                                  Stream strm = new FileStream(fn+".bin", FileMode.Create, FileAccess.Write);
  932.                                  new BinaryNodeWriter(strm).Write(node);
  933.                                  strm.Close();
  934.                                  SignFile(fn+".bin", fn+".signed");
  935.                          }
  936.                          return CommandResult.Succeeded;
  937.                  }
  938.                  public static CommandResult SignFile(string fn, string destfile) {
  939.                          StreamReader re = new StreamReader(Env.GetAppDir()+"privatekey.txt");
  940.                          BigInteger d = new BigInteger(re.ReadLine(), 16);
  941.                          BigInteger p = new BigInteger(re.ReadLine(), 16);
  942.                          BigInteger q = new BigInteger(re.ReadLine(), 16);
  943.                          BigInteger u = new BigInteger(re.ReadLine(), 16);
  944.  
  945.                          RSAPublicKey pub = ZPublicKey.PubKeyForExtensionKit;
  946.                          RSAKeyPair kp = new RSAKeyPair(pub.Exponent, d, pub.Modulus, u, p, q);
  947.  
  948.                          byte[] data = new byte[(int)new FileInfo(fn).Length];
  949.                          FileStream s = new FileStream(fn, FileMode.Open, FileAccess.Read);
  950.                          s.Read(data, 0, data.Length);
  951.                          s.Close();
  952.                          Debug.WriteLine("Signed length="+data.Length);
  953.                          byte[] hash = new SHA1CryptoServiceProvider().ComputeHash(data, 0, data.Length);
  954.                          byte[] signature = kp.Sign(hash);
  955.                          kp.Verify(signature, hash);
  956.  
  957.                          Stream strm = new FileStream(destfile, FileMode.Create, FileAccess.Write);
  958.                          strm.Write(data, 0, data.Length);
  959.                          strm.Write(signature, 0, signature.Length);
  960.                          strm.Close();
  961.                          return CommandResult.Succeeded;
  962.                  }
  963.  
  964.                  public static CommandResult GenerateUserCode() {
  965.                          RegistrationDialog dlg = new RegistrationDialog();
  966.                          dlg.GeneratingCode = true;
  967.                          dlg.ShowDialog(Env.Frame);
  968.                          return CommandResult.Succeeded;
  969.                  }
  970.                  public static CommandResult RegisterUserCode() {
  971.                          RegistrationDialog dlg = new RegistrationDialog();
  972.                          dlg.GeneratingCode = false;
  973.                          dlg.ShowDialog(Env.Frame);
  974.                          return CommandResult.Succeeded;
  975.                  }
  976.  
  977.                  public static CommandResult OpenCompanyInfoPage(CompanyInfoSite type) {
  978.                          try {
  979.                                  string url = null;
  980.                                  int code = Env.Frame.ChartCanvas.GetBrand().Code;
  981.                                  switch(type) {
  982.                                          case CompanyInfoSite.Yahoo:
  983.                                                  url = String.Format("http://profile.yahoo.co.jp/biz/fundamental/{0}.html", code);
  984.                                                  break;
  985.                                          case CompanyInfoSite.Infoseek:
  986.                                                  url = String.Format("http://money.www.infoseek.co.jp/MnStock?qt={0}&sv=MN&pg=mn_creport.html", code);
  987.                                                  break;
  988.                                          case CompanyInfoSite.Nikkei:
  989.                                                  url = String.Format("http://company.nikkei.co.jp/index.cfm?scode={0}", code);
  990.                                                  break;
  991.                                          case CompanyInfoSite.Livedoor:
  992.                                                  url = String.Format("http://finance.livedoor.com/quote/profile?c={0}", code);
  993.                                                  break;
  994.                                  }
  995.                                  Process.Start(url);
  996.                                  return CommandResult.Succeeded;
  997.                          }
  998.                          catch(Exception ex) {
  999.                                  Util.ReportCriticalError(ex);
  1000.                                  return CommandResult.Failed;
  1001.                          }
  1002.                  }
  1003.                  //!!このあたりのペアはdelegateを使うなどしてまとめたい
  1004.                  public static CommandResult ShowNextCode(){
  1005.                          AbstractBrand br = Env.BrandCollection.FindNextBrand(
  1006.                                  Env.Frame.ChartCanvas.GetBrand().Code);
  1007.                          ShowBrand(br);
  1008.                          return CommandResult.Succeeded;
  1009.                  }       
  1010.                  public static CommandResult ShowPrevCode() {
  1011.                          AbstractBrand br = Env.BrandCollection.FindPrevBrand(
  1012.                                  Env.Frame.ChartCanvas.GetBrand().Code);
  1013.                          ShowBrand(br);
  1014.                          return CommandResult.Succeeded;
  1015.                  }
  1016.  
  1017.                  public static CommandResult ShowNextBrand(){
  1018.                          BrandListPane pane = Env.Frame.CurrentBrandListPane;
  1019.                          if(pane!=null) {
  1020.                                  AbstractBrand br = pane.NextBrand;
  1021.                                  if(br!=null)
  1022.                                          return ShowBrand(br);
  1023.                                  else
  1024.                                          return CommandResult.Failed;
  1025.                          }
  1026.                          return CommandResult.Ignored;
  1027.                  }       
  1028.                  public static CommandResult ShowPrevBrand() {
  1029.                          BrandListPane pane = Env.Frame.CurrentBrandListPane;
  1030.                          if(pane!=null) {
  1031.                                  AbstractBrand br = pane.PrevBrand;
  1032.                                  if(br!=null)
  1033.                                          return ShowBrand(br);
  1034.                                  else
  1035.                                          return CommandResult.Failed;
  1036.                          }
  1037.                          return CommandResult.Ignored;
  1038.                  }
  1039.                  public static CommandResult ShrinkCandleWidth() {
  1040.                          int hcw = Env.Preference.HalfCandleWidth;
  1041.                          if(--hcw < 1) {
  1042.                                  hcw = 1;
  1043.                          }
  1044.                          Env.Preference.CandleWidth = hcw * 2;
  1045.                          ResetLayout();          
  1046.                          return CommandResult.Succeeded;
  1047.                  }
  1048.                  public static CommandResult ExpandCandleWidth(){
  1049.                          int hcw = Env.Preference.HalfCandleWidth;
  1050.                          if(++hcw > 20) { // 特に意味なし
  1051.                                  hcw = 20;
  1052.                          }
  1053.                          Env.Preference.CandleWidth = hcw * 2;           
  1054.                          ResetLayout();
  1055.                          return CommandResult.Succeeded;
  1056.                  }
  1057.                  public static CommandResult SetCandleWidth(int width) {
  1058.                          Env.Preference.CandleWidth = width;             
  1059.                          ResetLayout();
  1060.                          return CommandResult.Succeeded;
  1061.                  }
  1062.  
  1063.                  public static CommandResult SetLogarithmStyle(bool value){
  1064.                          Env.Preference.LogScale = value;
  1065.                          ResetLayout();
  1066.                          return CommandResult.Succeeded;
  1067.                  }
  1068.                  public static CommandResult SetInverseStyle(bool value){
  1069.                          Env.Preference.InverseChart = value;
  1070.                          ResetLayout();
  1071.                          return CommandResult.Succeeded;
  1072.                  }
  1073.                  public static CommandResult SetChartFormat(ChartFormat fmt) {
  1074.                          if(Env.Options.ChartFormat==fmt) return CommandResult.Ignored;
  1075.                          Env.Options.ChartFormat = fmt;
  1076.                          RefreshChart();
  1077.                          return CommandResult.Succeeded;
  1078.                  }
  1079.                  public static CommandResult UpdateCurrentData() {
  1080.  #if KENMILLE
  1081.                          Env.Frame.ChartCanvas.ChartTitle.UpdateCurrentBrand();
  1082.                          return CommandResult.Succeeded;
  1083.  #else
  1084.                          return CommandResult.Failed;
  1085.  #endif
  1086.                  }
  1087.                  public static CommandResult DownloadIndexFile() {
  1088.                      using (var dlg = new DownloadIndexFileDialog())
  1089.                          dlg.ShowDialog();
  1090.              return CommandResult.Succeeded;
  1091.                  }
  1092.  
  1093.  #if DOJIMA
  1094.                  public static CommandResult ExportHalfDailyData() {
  1095.                          if(Env.CurrentIndicators.Format!=ChartFormat.HalfDaily) {
  1096.                                  Util.Warning("半日足を表示した状態でのみエクスポートできます");
  1097.                                  return CommandResult.Failed;
  1098.                          }
  1099.  
  1100.                          SaveFileDialog dlg = new SaveFileDialog();
  1101.                          dlg.Title = "半日足データのエクスポート";
  1102.                          dlg.Filter = "CSV Files(*.csv)|*.csv";
  1103.                          dlg.DefaultExt = "csv";
  1104.                          if(dlg.ShowDialog(Env.Frame)==DialogResult.OK) {
  1105.                                  string filename = dlg.FileName;
  1106.                                  DailyDataFarm f = (DailyDataFarm)Env.Frame.ChartCanvas.GetBrand().ReserveFarm();
  1107.                                  Dojima.DojimaUtil.HalfDailyDataFarmCache.Get(f).ExportInCSV(filename);
  1108.                                  return CommandResult.Succeeded;
  1109.                          }
  1110.                          else
  1111.                                  return CommandResult.Ignored;
  1112.                  }
  1113.  #endif
  1114.  
  1115.                  //初期データの縮小
  1116.                  public static CommandResult ShrinkData() {
  1117.                          Env.Frame.Text = "データ縮小中";
  1118.                          int date = 20050701; //ここ以降の日付のみ切り出す
  1119.                          string dir = "shrinked";
  1120.                          if(!Directory.Exists(dir))
  1121.                                  Directory.CreateDirectory("shrinked");
  1122.  
  1123.                          IDictionaryEnumerator ie = Env.BrandCollection.GetEnumerator();
  1124.                          while(ie.MoveNext()) {
  1125.                                  BasicBrand br = ie.Value as BasicBrand;
  1126.                                  if(br!=null) {
  1127.                                          DailyDataFarm f = new DailyDataFarm();
  1128.                                          f.LoadFor(br);
  1129.                                          if(!f.IsEmpty) {
  1130.                                                  int index = f.DateToIndex(date);
  1131.  
  1132.                                                  FileStream fs = new FileStream(dir + "\\" + br.CodeAsString, FileMode.Create, FileAccess.Write);
  1133.                                                  fs.Write(f.RawDataImage, index*DataFarm.RECORD_LENGTH, (f.TotalLength-index)*DataFarm.RECORD_LENGTH);
  1134.                                                  fs.Close();
  1135.                                          }
  1136.                                  }
  1137.                          }
  1138.                          Util.Information(Env.Frame, "終了");
  1139.                          return CommandResult.Succeeded;
  1140.                  }
  1141.  
  1142.                  //試作：統計情報
  1143.                  public static CommandResult StatisticsTest() {
  1144.                          //RunPrivateScreening();
  1145.                          //MyStatistics.Do();
  1146.                          return CommandResult.Succeeded;
  1147.  
  1148.                  }
  1149.  #if PRIVATE_FEATURE 
  1150.                  public static void RunPrivateScreening() {
  1151.                          ScreeningItem item = FindScreeningItem("hottest");
  1152.                          ScreeningOrder so = new ScreeningOrder(item.Header, item);
  1153.                          so.Execute();
  1154.                          ScreeningResult sr = so.Result as ScreeningResult; //!!asがいやらしい
  1155.                          Util.Information(Env.Frame, "完了");
  1156.                          if(sr.ResultCount > 0) {
  1157.                                  ScreeningResultPane pane = new ScreeningResultPane(so);
  1158.                                  AddDockingPane(pane, item.Header, pane.RequiredWidth, IconConst.SEARCH);
  1159.                          }
  1160.                  }
  1161.                  private static ScreeningItem FindScreeningItem(string name) {
  1162.                          foreach(ScreeningItem item in Env.CurrentIndicators.GetScreeningItems()) {
  1163.                                  if(item.Header=="要注意銘柄") return item;
  1164.                          }
  1165.                          return null;
  1166.                  }
  1167.  #endif
  1168.          }
  1169.  }
Download Printable view

URL of this paste

Embed with JavaScript

Embed with iframe

Raw text