Exemple #1
0
 private void btnProcess_Click(object sender, EventArgs e)
 {
     txtProgress.Text = "Đang xử lý ...";
     ADOLib.ProcessDB(svr, txtProgress);
     txtProgress.AppendText(Environment.NewLine);
     txtProgress.AppendText("Xử lý xong!");
 }
Exemple #2
0
 public frmUpdate()
 {
     InitializeComponent();
     svr = new Server();
     ADOLib.MSList(cboStock, strConnect);
     svr = ADOLib.ConnectServer(strConnect);
 }
Exemple #3
0
 private void btnMiningModel_Click(object sender, EventArgs e)
 {
     txtProgress.Text = "Đang xử lý ...";
     if (!(txtStockCode.Text == null))
     {
         ADOLib.CreateMS(svr, txtStockCode.Text);
     }
     txtProgress.Text = "Tạo xong mô hình!";
 }
 private void button1_Click(object sender, EventArgs e)
 {
     if (cboStock.SelectedIndex > -1)
     {
         txtProgress.Text = "Đang xử lý ...";
         ADOLib.ProcessUpdateMM(svr, cboStock.Text);
         txtProgress.Text = "Xử lý xong!";
     }
     else
     {
         MessageBox.Show("Bạn chưa chọn mã chứng khoán!");
     }
 }
Exemple #5
0
 private void btnOptimize_Click(object sender, EventArgs e)
 {
     if (cboStock.SelectedIndex > -1)
     {
         txtProgress.Text = "Đang xử lý ...";
         //ADOLib.ProcessUpdateMMTest(svr, cboStock.Text, chkContinue.Checked);
         ADOLib.ProcessUpdateMM(svr, cboStock.Text, chkContinue.Checked);
         txtProgress.Text = "Xử lý xong!";
     }
     else
     {
         MessageBox.Show("Bạn chưa chọn mã chứng khoán!");
     }
 }
Exemple #6
0
        private void btnMiningModel_Click(object sender, EventArgs e)
        {
            txtProgress.Text = "Đang tạo mô hình ...";
            txtProgress.Refresh();

            if (!(txtStockCode.Text == null))
            {
                ADOLib.CreateMS(svr, txtStockCode.Text, chkAll.Checked, dtpFrom.Value, dtpTo.Value, chkMulti.Checked);
            }
            else
            {
                MessageBox.Show("Bạn cần nhập mã chứng khoán!");
            }
            txtProgress.Text = "Tạo xong mô hình!";
        }
Exemple #7
0
        private void btnUpdateTrain_Click(object sender, EventArgs e)
        {
            txtProgress.Text = "Đang cập nhật ...";
            txtProgress.Refresh();

            if (!(txtStockCode.Text == null))
            {
                ADOMDLib.ResetMulti(txtStockCode.Text, false);
                ADOLib.UpdateTrainDB(svr, txtStockCode.Text, chkAll.Checked, dtpFrom.Value, dtpTo.Value, chkMulti.Checked);
            }
            else
            {
                MessageBox.Show("Bạn cần nhập mã chứng khoán!");
            }
            txtProgress.Text = "Cập nhật xong!";
        }
Exemple #8
0
 private void btnConnect_Click(object sender, EventArgs e)
 {
     txtProgress.Text = "Đang xử lý ...";
     if (svr.Connected)
     {
         btnConnect.Text = "1. Kết nối";
         svr.Disconnect();
         btnMiningModel.Enabled = false;
         btnProcess.Enabled     = false;
     }
     else
     {
         btnConnect.Text        = "1. Thoát kết nối";
         svr                    = ADOLib.ConnectServer(txtConnectStr.Text);
         btnMiningModel.Enabled = true;
         btnProcess.Enabled     = true;
     }
     txtProgress.Text = "Xử lý xong!";
 }
Exemple #9
0
        /*---------------------------------
         * Description: identify trend
         * Input:
         *  bTrend: trend of ART
         *  dArrVal : array contains ClosePrice, OpenPrice, LowPrice, HighPrice
         * Output:
         *  1x: trend of ART; 2x: trend of Analysis
         *  1: increase; 2: decrease
         * ----------------------------------- */
        public static int IdentifyTrend(bool bTrend, double[,] dArrVal, string sStockCode)
        {
            int iTrend = 0;

            ReadRules();
            iTrend = CheckRules(dArrVal);

            int iTrendMS = bTrend ? 1 : 2;

            if (iTrend == 0)
            {
                return(10 + iTrendMS);
            }
            else
            {
                if (iTrendMS == iTrend)
                {
                    return(10 + iTrend);
                }
                else //not equal
                {
                    General.GetParam();
                    if (iTrend == 1) //increase
                    {
                        ADOLib.MAXIMUM_SERIES_VALUE = dArrVal[9, 0] * (1 + General.iLimit);
                        ADOLib.MINIMUM_SERIES_VALUE = dArrVal[9, 0];
                    }
                    else //decrease
                    {
                        ADOLib.MAXIMUM_SERIES_VALUE = dArrVal[9, 0];
                        ADOLib.MINIMUM_SERIES_VALUE = dArrVal[9, 0] * (1 - General.iLimit);
                    }
                    ADOLib.UpdateMMbyAnalysis(sStockCode);
                    return(20 + iTrend);
                }
            }
        }
Exemple #10
0
 public frmForecast()
 {
     InitializeComponent();
     //svr = new Server();
     ADOLib.MSList(cboStock, strConnect);
 }
 public frmExport2CSV()
 {
     InitializeComponent();
     ADOLib.MSList(cboStockCode, "Provider=SQLNCLI.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=StockPredict;Data Source=localhost");
 }