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!");
}
public frmUpdate()
{
InitializeComponent();
svr = new Server();
ADOLib.MSList(cboStock, strConnect);
svr = ADOLib.ConnectServer(strConnect);
}
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!");
}
}
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!");
}
}
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!";
}
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!";
}
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!";
}
/*---------------------------------
* 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);
}
}
}
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");
}