Example #1
0
        public ctlScanner(frmMain2 oMain, ctlData oData)
        {
            InitializeComponent();
            m_frmMain = oMain;
            m_ctlData = oData;

            oScript = new Alert {
                License = "XRT93NQR79ABTW788XR48"
            };
            Symbols  = new List <string>();
            DataBars = new List <DataManager.BarData>();

            //Setup the results grid
            grdResults.RowTemplate.Height = 28;

            grdResults.ShowCellToolTips = false;
            grdResults.GridColor        = Color.FromArgb(50, 50, 50);
            grdResults.RowsDefaultCellStyle.SelectionBackColor = Color.Black;
            grdResults.RowsDefaultCellStyle.SelectionForeColor = Color.Yellow;

            grdResults.BackgroundColor            = Color.Black;
            grdResults.ForeColor                  = Color.White;
            grdResults.DefaultCellStyle.BackColor = Color.Black;
            grdResults.DefaultCellStyle.ForeColor = Color.White;

            grdResults.RowTemplate.Height = 30;

            DataGridViewTextBoxColumn tradeTime = new DataGridViewTextBoxColumn();
            {
                tradeTime.HeaderText = "Trade Time";
                tradeTime.Name       = "Trade Time";
                tradeTime.ReadOnly   = true;
                grdResults.Columns.Add(tradeTime);
            }

            DataGridViewTextBoxColumn symbolCol = new DataGridViewTextBoxColumn();

            {
                symbolCol.HeaderText = "Symbol";
                symbolCol.Name       = "Symbol";
                symbolCol.ReadOnly   = true;
            }
            grdResults.Columns.Add(symbolCol);

            DataGridViewTextBoxColumn lastCol = new DataGridViewTextBoxColumn();

            {
                lastCol.HeaderText = "Last";
                lastCol.Name       = "Last";
                lastCol.ReadOnly   = true;
                lastCol.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight;
            }
            grdResults.Columns.Add(lastCol);

            DataGridViewBarGraphColumn volumeCol = new DataGridViewBarGraphColumn();

            {
                volumeCol.HeaderText = "Volume";
                volumeCol.Name       = "Volume";
                volumeCol.ReadOnly   = true;
                volumeCol.SortMode   = DataGridViewColumnSortMode.Automatic;
                volumeCol.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight;
            }
            grdResults.Columns.Add(volumeCol);

            DataGridViewTextBoxScannerColorColumn alertTime = new DataGridViewTextBoxScannerColorColumn();
            {
                alertTime.HeaderText = "Alert Time";
                alertTime.Name       = "Alert Time";
                alertTime.ReadOnly   = true;
                grdResults.Columns.Add(alertTime);
            }

            DataGridViewButtonColumn tradeCol = new DataGridViewButtonColumn();

            {
                tradeCol.HeaderText  = "Trade";
                tradeCol.Name        = "Trade";
                tradeCol.Text        = "Trade";
                tradeCol.ToolTipText = "Enter Order";
                tradeCol.DefaultCellStyle.NullValue  = "Trade";
                tradeCol.UseColumnTextForButtonValue = true;
            }
            grdResults.Columns.Add(tradeCol);

            DataGridViewButtonColumn chartCol = new DataGridViewButtonColumn();

            {
                chartCol.HeaderText = "Chart";
                chartCol.Name       = "Chart";
                chartCol.Text       = "Chart";
                chartCol.UseColumnTextForButtonValue = true;
            }
            grdResults.Columns.Add(chartCol);

            DataGridViewButtonColumn settingsCol = new DataGridViewButtonColumn();
            {
                settingsCol.HeaderText  = "Settings";
                settingsCol.Name        = "Settings";
                settingsCol.Text        = "Settings";
                settingsCol.ToolTipText = "Edit Settings";
                settingsCol.DefaultCellStyle.NullValue  = "Settings";
                settingsCol.UseColumnTextForButtonValue = true;
                grdResults.Columns.Add(settingsCol);
            }

            DataGridViewImageButtonColumn lockCol = new DataGridViewImageButtonColumn();
            {
                lockCol.HeaderText = "Lock Script";
                lockCol.Name       = "Locked";
                grdResults.Columns.Add(lockCol);
            }

            DataGridViewImageButtonColumn startCol = new DataGridViewImageButtonColumn();

            {
                startCol.HeaderText  = "Pause";
                startCol.Name        = "Start";
                startCol.ToolTipText = "Start Scan";
                grdResults.Columns.Add(startCol);
            }

            UpdateStyle(m_frmMain.m_Style);
        }
Example #2
0
        private void LoadScanner()
        {
            string scanName = cboScanners.Text.Trim();

            if (string.IsNullOrEmpty(scanName))
            {
                return;
            }

            m_loading = true;

            cmdSave.Enabled     = false;
            cmdDelete.Enabled   = false;
            cboScanners.Enabled = false;
            txtScannerName.Text = scanName;

            string data;

            try
            {
                data = svc.GetUserData(frmMain2.ClientId, frmMain2.ClientPassword, frmMain2.LicenseKey, "Scanner Settings: " + scanName);
            }
            catch (Exception)
            {
                MessageBox.Show("Failed to load scanner.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
                cmdSave.Enabled     = true;
                cmdDelete.Enabled   = true;
                cboScanners.Enabled = true;
                return;
            }

            string[] text = data.Split(Utils.Chr(134));
            if (text.Length < 4)
            {
                return;
            }

            List <string> strRows = new List <string>(text[0].Split(Utils.Chr(145)));
            char          d       = Utils.Chr(182);

            //Clear everything
            m_stop = false;
            m_TSAlertDictionary.Clear();
            m_DGVRowDictionary.Clear();
            grdResults.Rows.Clear();
            DataGridViewBarGraphColumn volumeCol = (DataGridViewBarGraphColumn)grdResults.Columns["Volume"];

            if (volumeCol != null)
            {
                volumeCol.MaxValue = 0;
            }

            //Load all symbols
            Symbols.Clear();
            string[] strRow;

            for (int n = 0; n < strRows.Count - 1; n++)
            {
                strRow = strRows[n].Split(d);
                Symbols.Add(strRow[0]);
            }

            //Global settings
            switch (text[1])
            {
            case "Minutely":
                Periodicity = (int)M4Core.Entities.Periodicity.Minutely;
                break;

            case "Hourly":
                Periodicity = (int)M4Core.Entities.Periodicity.Hourly;
                break;

            case "Daily":
                Periodicity = (int)M4Core.Entities.Periodicity.Daily;
                break;

            case "Weekly":
                Periodicity = (int)M4Core.Entities.Periodicity.Weekly;
                break;
            }
            Interval = Convert.ToInt32(text[2]);
            Bars     = Convert.ToInt32(text[3]);
            Script   = text[4];

            //Prime data
            LoadAllSymbolsIntoMemory();

            //Go back through for settings
            for (int n = 0; n < strRows.Count - 2; n++)
            {
                strRow = strRows[n].Split(new[] { d });
                if (strRow.Length < 3)
                {
                    continue;
                }

                for (int j = 0; j < grdResults.Rows.Count; j++)
                {
                    if (string.Compare(grdResults.Rows[j].Cells["Symbol"].Value.ToString(), strRow[0], true) == 0)
                    {
                        DataGridViewImageButtonCell start = (DataGridViewImageButtonCell)grdResults.Rows[j].Cells["Start"];
                        start.Checked = string.Compare(strRow[3], "true", true) == 0;

                        Alert oAlert = m_TSAlertDictionary[strRow[0]];
                        if (oAlert != null)
                        {
                            if (!start.Checked)
                            {
                                oAlert.AlertScript = strRow[1];
                            }
                            else
                            {
                                oAlert.AlertScript = strRow[1];
                            }
                        }//oAlert != null


                        DataGridViewImageButtonCell @lock = (DataGridViewImageButtonCell)grdResults.Rows[j].Cells["Locked"];
                        @lock.Checked = string.Compare(strRow[2], "true", true) == 0;

                        break;
                    } //if grdResults
                }     //for j
            }         //for n

            m_loading = false;
            m_changed = false;

            UpdateName(txtScannerName.Text);

            cmdSave.Enabled     = true;
            cmdDelete.Enabled   = true;
            cboScanners.Enabled = true;

            cmdDelete.Enabled = cboScanners.SelectedIndex != -1;
        }
Example #3
0
        //Loads all required data into memory. This function must be called first.
        public bool LoadAllSymbolsIntoMemory()
        {
            //Verify the input and check script for errors
            if (m_ctlData == null || !TestScripts())
            {
                return(false);
            }

            EnableControls(false);

            //Clear everything
            m_stop = false;
            m_TSAlertDictionary.Clear();
            m_DGVRowDictionary.Clear();
            grdResults.Rows.Clear();

            DataGridViewBarGraphColumn volumeCol = (DataGridViewBarGraphColumn)grdResults.Columns["Volume"];

            if (volumeCol != null)
            {
                volumeCol.MaxValue = 0;
            }

            //Load history for all symbols into memory
            pnlProgress.Cursor  = Cursors.WaitCursor;
            pnlProgress.Visible = true;

            if (Symbols.Count > 1)
            {
                ProgressBar1.Maximum = Symbols.Count - 1;
            }

            ChartSelection selection = new ChartSelection
            {
                Periodicity = (M4Core.Entities.Periodicity)Periodicity,
                Interval    = Interval,
                Bars        = Bars * 3
            };

            if (selection.Bars < 50)
            {
                selection.Bars = 50;
            }

            lblInfo.Text = "Priming scanner, please wait...";

            for (int n = 0; n < Symbols.Count; n++)
            {
                string symbol = Symbols[n];

                if (m_stop)
                {
                    break;
                }

                if (m_TSAlertDictionary.ContainsKey(symbol))
                {
                    continue;
                }

                selection.Symbol = symbol;

                ProgressBar1.Value = n;
                lblSymbol.Text     = symbol;
                Application.DoEvents();

                //Get historic data
                var bars = m_ctlData.GetHistory(symbol, this, selection.Periodicity, selection.Interval, selection.Bars, "Plena", answer => { });
                if (bars == null || bars.Count < 3)
                {
                    continue;
                }

                //Insert the data into TradeScript
                Alert oAlert = new Alert {
                    License = "XRT93NQR79ABTW788XR48"
                };

                foreach (M4.DataServer.Interface.BarData t in bars)
                {
                    double jDate = oAlert.ToJulianDate(t.TradeDate.Year, t.TradeDate.Month, t.TradeDate.Day,
                                                       t.TradeDate.Hour, t.TradeDate.Minute, t.TradeDate.Second,
                                                       t.TradeDate.Millisecond);
                    oAlert.AppendHistoryRecord(jDate, t.OpenPrice, t.HighPrice, t.LowPrice, t.ClosePrice, (int)t.VolumeF);
                }

                //Start the alert object by adding the script
                oAlert.AlertScript = Script;
                oAlert.Symbol      = symbol;

                oAlert.ScriptError += oScript_ScriptError;
                oAlert.Alert       += OnAlert;

                m_TSAlertDictionary.Add(symbol, oAlert);

                //Add symbol to datagridview
                int row;
                try
                {
                    row = grdResults.Rows.Add(new DataGridViewRow());
                }
                catch (Exception)
                {
                    return(false);
                }
                m_DGVRowDictionary.Add(symbol, grdResults.Rows[row]);
                grdResults.Rows[row].Height = 25;

                M4.DataServer.Interface.BarData lastBar = bars.Last();

                DataGridViewTextBoxScannerColorCell alertDateTime = (DataGridViewTextBoxScannerColorCell)grdResults.Rows[row].Cells["Alert Time"];
                alertDateTime.HighlightOnly = true;
                alertDateTime.Value         = lastBar.TradeDate;
                alertDateTime.Interval      = 5000;

                grdResults.Rows[row].Cells["Trade Time"].Value = lastBar.TradeDate;
                grdResults.Rows[row].Cells["Symbol"].Value     = symbol;
                grdResults.Rows[row].Cells["Last"].Value       = Format.ToUsCurrency(lastBar.ClosePrice);
                grdResults.Rows[row].Cells["Volume"].Value     = Format.ToLocalInteger((int)lastBar.VolumeF);

                DataGridViewButtonCell button = (DataGridViewButtonCell)grdResults.Rows[row].Cells["Trade"];
                button.Value     = "Trade";
                button.FlatStyle = FlatStyle.Flat;

                button           = (DataGridViewButtonCell)grdResults.Rows[row].Cells["Chart"];
                button.Value     = "Chart";
                button.FlatStyle = FlatStyle.Flat;

                button           = (DataGridViewButtonCell)grdResults.Rows[row].Cells["Settings"];
                button.Value     = "Settings";
                button.FlatStyle = FlatStyle.Flat;

                button           = (DataGridViewButtonCell)grdResults.Rows[row].Cells["Start"];
                button.Value     = "Start";
                button.FlatStyle = FlatStyle.Flat;

                DataGridViewImageButtonCell start = (DataGridViewImageButtonCell)grdResults.Rows[row].Cells["Start"];
                start.ImageOn  = Resources.Play;
                start.ImageOff = Resources.Pause;
                start.OffsetY  = 4;

                DataGridViewImageButtonCell @lock = (DataGridViewImageButtonCell)grdResults.Rows[row].Cells["Locked"];
                @lock.ImageOn  = Resources.Lock;
                @lock.ImageOff = Resources.Unlock;
                @lock.OffsetY  = 2;
            }

            lblInfo.Text        = string.Empty;
            pnlProgress.Visible = false;
            pnlProgress.Cursor  = Cursors.Arrow;

            EnableControls(true);

            return(true);
        }