private void BindChart() { FormulaChart fc = new FormulaChart(); FML.NATIVE.CustomFormula cf = new FML.NATIVE.CustomFormula("Custom"); cf.Add(tbName1.Text, TextToDoubleArray(tbLine1.Text)); double[] Date; double[] Data; GetDateAndData(tbLine2.Text, out Date, out Data); cf.Add(tbName2.Text, Date, Data); fc.AddArea("MAIN", 2); fc.AddArea(cf); fc.SetSkin(FormulaSkin.GetSkinByName(Config.DefaultSkin)); DBDataManager ddm = new DBDataManager(); fc.DataProvider = ddm[tbSymbol.Text]; FormulaBase fb = fc[0].Formulas[0]; fb.Name = fc.DataProvider.GetStringData("Code") + "(" + fc.DataProvider.GetStringData("Name") + ")"; fb.TextInvisible = false; iChart.ImageUrl = "../ImageFromCache.aspx?CacheId=" + fc.SaveToImageStream(600, 400, ImageFormat.Png, 0, 0); }
protected void btnOK_Click(object sender, System.EventArgs e) { BindData(); FormulaBase fb = FormulaBase.GetFormulaByName(CurrentFullName); foreach (string s in Request.Form) { if (s.StartsWith("__Param")) { fb.SetParam(s.Substring(7), Request.Form[s]); } } YahooDataManager ydm = new YahooDataManager(); ydm.CacheRoot = HttpRuntime.AppDomainAppPath + "Cache\\"; CommonDataProvider DataProvider = (CommonDataProvider)ydm[tbCode.Text]; FormulaChart fc = new FormulaChart(); fc.AddArea("MAIN", 2); if (CurrentProgram.IsMainView) { fc[0].AddFormula(fb); } else { fc.AddArea(fb); } fc.LatestValueType = LatestValueType.StockOnly; fc.SetSkin(Config.DefaultSkin); try { fc.DataProvider = DataProvider; FormulaData fdDate = DataProvider["DATE"]; string s = tbCode.Text; if (fdDate.Length > 0) { s += " (" + DateTime.FromOADate(fdDate[fdDate.Length - 1]).ToString("yyyy-MMM-dd", DateTimeFormatInfo.InvariantInfo) + ")"; } fc[0].Formulas[0].Name = s; fc[0].Formulas[0].TextInvisible = false; fc.StartTime = DateTime.Now.AddMonths(-8); fc.EndTime = DateTime.Now; } catch (Exception ee) { Bitmap b = new Bitmap(640, 480); Graphics g = Graphics.FromImage(b); g.FillRectangle(Brushes.WhiteSmoke, 0, 0, 640, 480); g.DrawRectangle(Pens.Black, 0, 0, 639, 479); g.DrawString(ee.Message, new Font("verdana", 10), Brushes.Red, 1, 1); } lChart.Text = "<img src=ImageFromCache.aspx?CacheId=" + fc.SaveToImageStream(640, 400, ImageFormat.Png, 0, 0) + ">"; }
private void btnOK_Click(object sender, System.EventArgs e) { //Create a Formula namespace FormulaSpace fms = new FormulaSpace("FML"); //Create a Formula program , set Formula name and script code on the fly FormulaProgram fp = new FormulaProgram(); fp.Name = tbFormulaName.Text; fp.Code = tbProgramScript.Text; //Add the script program to the Formula namespace fms.Programs.Add(fp); //Add parameters to Formula program for (int i = 1; i < 5; i++) { if (Request.Form["tbParamName" + i] != "") { fp.Params.Add(new FormulaParam( Request.Form["tbParamName" + i], Request.Form["tbDefValue" + i], Request.Form["tbMinValue" + i], Request.Form["tbMaxValue" + i], FormulaParamType.Double)); } } try { //Compile the Formula script on the fly Assembly a = fms.CompileInMemory(); FormulaBase fb = FormulaBase.GetFormulaByName(a, fms.Name + "." + fp.Name); //Create YahooDataManager , Get stock data from yahoo. YahooDataManager ydm = new YahooDataManager(); ydm.CacheRoot = HttpRuntime.AppDomainAppPath + "Cache\\"; CommonDataProvider DataProvider = (CommonDataProvider)ydm[tbCode.Text]; //Create financial chart instance FormulaChart fc = new FormulaChart(); fc.PriceLabelFormat = "{CODE}"; fc.LatestValueType = LatestValueType.Custom; fc.AddArea("MAIN", 3); fc.AddArea(fb); fc.DataProvider = DataProvider; fc.SetSkin(Config.DefaultSkin); //Show the temp image just created lChart.Text = "<img src=ImageFromCache.aspx?CacheId=" + fc.SaveToImageStream(440, 440, ImageFormat.Png, 0, 0) + ">"; } catch (FormulaErrorException fee) { //Show the compile result if the script has some errors lChart.Text = fee.ToHtml(); } }
//Random Rnd = new Random(); private void BindChart() { string Quote1 = tbQuote1.Text; string Quote2 = tbQuote2.Text; FormulaChart fc = new FormulaChart(); // Compare two closing data fc.AddArea("CmpIndi(" + tbQuote2.Text + ",CLOSE)", 2); // Compare two RSI(14) of two stocks fc.AddArea("CmpIndi(" + tbQuote2.Text + ",RSI(14))"); fc.AddArea("SlowSTO(14,3,3)", tbQuote1.Text, 1); fc.AddArea("SlowSTO(14,3,3)", tbQuote2.Text, 1); // Set skin fc.SetSkin(FormulaSkin.RedWhite); DataManagerBase dmb = Utils.GetDataManager(Config.DefaultDataManager); //MemoryStream ms = new MemoryStream(); try { // Bind data fc.DataProvider = dmb[Quote1]; // Add another AxisY to the main panel FormulaAxisY fay = fc[0].AddNewAxisY(AxisPos.Left, true, 1); // Bind another stock to the second AxisY //FormulaData fd = fc[0][1]; //fd.Transform = Transform.Normal; //fd.AxisYIndex = 1; fc.ShowCursorLabel = true; DataTable dt = new DataTable(); dt.Columns.Add("Symbol"); dt.Columns.Add("Name"); dt.Columns.Add("Last"); dt.Columns.Add("Date"); dt.Columns.Add("Open"); dt.Columns.Add("High"); dt.Columns.Add("Low"); dt.Columns.Add("Close"); dt.Columns.Add("Volume"); dt.Columns.Add("Change"); tblChart.Visible = true; int Width = (int)ibChart.Width.Value; if (Width <= 0) { Width = 780; } int Height = (int)ibChart.Height.Value; if (Height <= 0) { Height = 850; } ibChart.ImageUrl = "~/ImageFromCache.aspx?CacheId=" + fc.SaveToImageStream(Width, Height, ImageFormat.Png, Tools.ToIntDef(Request.Form[ibChart.ID + ".x"], 0), Tools.ToIntDef(Request.Form[ibChart.ID + ".y"], 0)); AddDataToTable(dt, fc.DataProvider, fc.CursorPos); IDataProvider idp2 = dmb[Quote2]; idp2.BaseDataProvider = fc.DataProvider; AddDataToTable(dt, idp2, fc.CursorPos); dgStockData.DataSource = dt; dgStockData.DataBind(); } catch (Exception ex) { lMsg.Text = ex.Message; } }
protected void Page_Load(object sender, System.EventArgs e) { int Height = 800; int Width = 600; Bitmap B; try { long Start = DateTime.Now.Ticks; ExchangeIntraday ei = null; DateTime StartTime = DateTime.Today.AddMonths(-6); DateTime EndTime = DateTime.Today; string Param = Request.QueryString["Span"]; if (Param != null && Param != "") { DataCycle dc; if (Param.Length > 2) { dc = DataCycle.Parse(Param); } else { dc = new DataCycle(DataCycleBase.MONTH, Tools.ToIntDef(Param, 6)); } StartTime = EndTime - dc; //StartTime = EndTime.AddMonths(-Tools.ToIntDef(Param,6)); } //Create financial chart instance FormulaChart fc = new FormulaChart(); string Main = Request.QueryString["Main"]; if (Main == null || Main == "") { fc.AddArea("MAIN", 3); } else { fc.AddArea(Main, 3); } string QuoteCode = Request.QueryString["Code"]; if (QuoteCode == null) { QuoteCode = ""; } DataManagerBase dmb; Param = Request.QueryString["Provider"]; if (Param == null) { Param = ""; } if (string.Compare(Param, "DB", true) == 0) { //Create DBDataManager , Get stock data from sql server. dmb = new DBDataManager(); ((DBDataManager)dmb).AutoYahooToDB = Request.QueryString["His"] != "0" && Config.AutoYahooToDB == 1; if (Request.QueryString["RT"] == "1") { ((DataManagerBase)dmb).DownloadRealTimeQuote = true; } } else if (Param == "" || string.Compare(Param, "Yahoo", true) == 0) { //Create YahooDataManager , Get stock data from yahoo. dmb = new YahooDataManager(); ((YahooDataManager)dmb).CacheRoot = HttpRuntime.AppDomainAppPath + "Cache\\"; if (Config.IncludeTodayQuote == 1) { ((DataManagerBase)dmb).DownloadRealTimeQuote = true; } } else { string ManagerName = "WebDemos." + Param + "DataManager"; Type t = Type.GetType(ManagerName); if (t == null) { throw new Exception(ManagerName + " not found!"); } dmb = (DataManagerBase)Activator.CreateInstance(t); if (dmb is IntraDataManagerBase) { ei = ExchangeIntraday.GetExchangeIntraday(Utils.GetExchange(QuoteCode)); ((CacheDataManagerBase)dmb).CacheTimeSpan = TimeSpan.FromMilliseconds(Config.IntradayCacheTime * 1000); //((CacheDataManagerBase)dmb).EnableFileCache = false; StartTime = ei.GetCurrentTradingDay(); EndTime = StartTime.AddSeconds(3600 * 24 - 1); QuoteCode = Utils.GetPart1(QuoteCode); } dmb.EndTime = Utils.ToDateDef(Request.QueryString["End"], EndTime); dmb.StartTime = Utils.ToDateDef(Request.QueryString["Start"], StartTime); } int MainIndex = 0; if (Config.SymbolCase == "Upper") { QuoteCode = QuoteCode.ToUpper(); } else if (Config.SymbolCase == "Lower") { QuoteCode = QuoteCode.ToLower(); } string[] QuoteCodes = QuoteCode.Split(','); string Over = ""; QuoteCode = QuoteCodes[0]; for (int i = 1; i < QuoteCodes.Length; i++) { if (Over != "") { Over += ";"; } Over += "Compare(" + QuoteCodes[i] + ")"; } Param = Request.QueryString["IND"]; string[] Inds = null; if (Param != null && Param != "") { Inds = Param.Split(';'); } //Set stock chart size Param = Request.QueryString["Size"]; try { if (Param != null && Param != "") { int i = Param.IndexOf('*'); if (i > 0) { Width = int.Parse(Param.Substring(0, i)); Height = int.Parse(Param.Substring(i + 1)); } else { Width = int.Parse(Param); Height = Width * 3 / 4; if (Inds != null && Inds.Length > 1) { Height += Height / 5 * (Inds.Length - 2); } Height += 36; } } } catch { } CommonDataProvider DataProvider = (CommonDataProvider)dmb[QuoteCode]; if (DataProvider == null) { throw new Exception(QuoteCode + " not found!"); } if (dmb is IntraDataManagerBase) { fc.FixedTime = object.Equals(Request.QueryString["Fix"], "1"); if (fc.FixedTime) { DataProvider.IntradayInfo = ei; } } if (DataProvider.Count == 0) { throw new Exception("No data found!"); } fc[MainIndex].Formulas[0].Name = QuoteCode; //Add MA lines to main stock view Param = Request.QueryString["MA"]; if (Param != null && Param != "") { foreach (string s in Param.Split(';')) { if (s != "") { fc[MainIndex].AddFormula("FML.MA(" + s + ")"); } } } //Add EMA lines to main stock view Param = Request.QueryString["EMA"]; if (Param != null && Param != "") { foreach (string s in Param.Split(';')) { if (s != "") { fc[MainIndex].AddFormula("FML.EMA(" + s + ")"); } } } //Add override lines to main stock view Param = Request.QueryString["OVER"]; if (Param != null && Param != "") { if (Over != "") { Param = Param + ";" + Over; } } else { Param = Over; } if (dmb is IntraDataManagerBase) { string s = DataProvider.GetStringData("LastPrice"); if (s != null && s != "") { double d = double.Parse(s); s = "DotLine(" + d.ToString("f2") + ")"; if (Param != null && Param != "") { Param += ";" + s; } else { Param = s; } } } if (Param != null && Param != "") { //foreach(string s in Param.Split(';')) string[] ss = Param.Split(';'); for (int i = 0; i < ss.Length; i++) { string s = ss[i].ToUpper(); if (s != "") { if (s == "AreaBB") { fc[MainIndex].InsertFormula(0, "FML." + s); } else { fc[MainIndex].AddFormula("FML." + s); } } } } //Add indicators to stock chart if (Inds != null) { foreach (string s in Inds) { if (s != "") { int k = s.IndexOf("{U}"); if (k > 0) { fc.InsertArea(MainIndex, "FML." + s.Substring(0, k)); MainIndex++; } else { fc.AddArea("FML." + s); } } } } //Apply build-in stock chart skin Param = Request.QueryString["Skin"]; if (Param == null || Param == "") { Param = Config.DefaultSkin; } FormulaSkin fs = FormulaSkin.GetSkinByName(Param); if (fs != null) { if (Config.YAxisFormat != "") { fs.AxisY.Format = Config.YAxisFormat; } if (Config.ShowXAxisInLastArea) { fs.ShowXAxisInLastArea = true; } fc.SetSkin(fs); } try { fc.LatestValueType = (LatestValueType)Enum.Parse(typeof(LatestValueType), Config.LatestValueType, true); } catch { } //Add compare line to other stocks Param = Request.QueryString["COMP"]; if (Param != null && Param != "") { foreach (string s in Param.Split(';', ',')) { if (s != "") { fc[MainIndex].AddFormula("COMPARE(" + s + ")"); } } fc[MainIndex].AxisY.ShowAsPercent = true; fc[MainIndex].AxisY.Format = "p1"; fc.LatestValueType = LatestValueType.None; } //Set stock chart time period fc.EndTime = Utils.ToDateDef(Request.QueryString["End"], EndTime); fc.StartTime = Utils.ToDateDef(Request.QueryString["Start"], StartTime); DataProvider.DataCycle = DataCycle.Parse(Request.QueryString["Cycle"]); //Set X-Axis format string XFormat = Request.QueryString["XFormat"]; if (XFormat != null && XFormat != "") { fc.AxisXFormat = XFormat; fc.AllXFormats = null; } //Set Y-Axis format string YFormat = Request.QueryString["YFormat"]; if (YFormat != null && YFormat != "") { fc.AxisYFormat = YFormat; } //Set X-Axis cycle string XCycle = Request.QueryString["XCycle"]; if (XCycle != null && XCycle != "") { fc.DataCycle = DataCycle.Parse(XCycle); } //Set render type : Bar , Candle or Line Param = Request.QueryString["Type"]; if (Param != null && Param != "") { StockRenderType srt; if (Param.Length == 1) { srt = (StockRenderType)int.Parse(Param); } else { srt = (StockRenderType)Enum.Parse(typeof(StockRenderType), Param, true); } fc[MainIndex].StockRenderType = srt; } //Set Scale type : Normal or Log Param = Request.QueryString["Scale"]; if (Param != null && Param != "") { ScaleType st; if (Param.Length == 1) { st = (ScaleType)int.Parse(Param); } else { st = (ScaleType)Enum.Parse(typeof(ScaleType), Param, true); } fc[MainIndex].AxisY.Scale = st; } //Bottom margin Param = Request.QueryString["BMargin"]; if (Param != null && Param != "") { fc[MainIndex].BottomMargin = Tools.ToDoubleDef(Param, 0); } //Bind stock data fc.DataProvider = DataProvider; for (int i = 1; i < fc[MainIndex].FormulaDataArray.Count; i++) { if (fc[MainIndex][i].ParentFormula.FormulaName.StartsWith("COMPARE")) { FormulaAxisY fay = fc[MainIndex].AddNewAxisY(AxisPos.Left); FormulaData fd = fc[MainIndex][i]; fd.Transform = Transform.Normal; fd.AxisYIndex = 1; break; } } fc[MainIndex].AxisY.MajorTick.ShowLine = Config.ShowMainAreaLineY; fc[MainIndex].AxisX.MajorTick.ShowLine = Config.ShowMainAreaLineX; //Set indicator line width Param = Request.QueryString["Width"]; if (Param != null && Param != "") { float LineWidth = float.Parse(Param); for (int i = 0; i < fc.Areas.Count; i++) { fc[i].LinePen.Width = LineWidth; } } fc[MainIndex].AxisY.AutoMultiply = false; if (Request.QueryString["SV"] == "0") { fc.ShowValueLabel = false; } fc.StickRenderType = Config.StickRenderType; Rectangle Rect = new Rectangle(0, 0, Width, Height); Param = Request.QueryString["Layout"]; if (Param == null || Param == "") { Param = "Default"; } string[] Layouts = Param.Split(';', ','); Layout L = Layout.ParseString(Config.Read(Layouts[0] + "Layout", "ChartRect=(0,0,0,0)"), Rect); //,DataProvider); for (int j = 1; j < Layouts.Length; j++) { L.Merge(Layout.ParseString(Config.Read(Layouts[j] + "Layout", "ChartRect=(0,0,0,0)"), Rect)); //,DataProvider)); } L.CompanyName = Config.CompanyName; L.URL = Config.URL; L.StartTick = Start; fc.Rect = L.ChartRect; B = fc.GetBitmap(Width, Height, fc.Rect); Graphics g = Graphics.FromImage(B); L.Render(g, Rect, fc); int X = Tools.ToIntDef(Request.QueryString["X"], 0); int Y = Tools.ToIntDef(Request.QueryString["Y"], 0); if (X > 0 && Y > 0) { fc.Rect = new Rectangle(0, 0, Width, Height); fc.ShowCursorLabel = true; fc.DrawCursor(g, X, Y); } } catch (Exception ex) { B = new Bitmap(Width, Height); Graphics g = Graphics.FromImage(B); g.Clear(Color.White); StringFormat sf = new StringFormat(); sf.Alignment = StringAlignment.Center; sf.LineAlignment = StringAlignment.Center; g.DrawString(ex.Message, new Font("Verdana", 12), new SolidBrush(Color.FromArgb(196, Color.Black)), new Rectangle(0, 0, Width, Height), sf); } //Create stock image to Bitmap Response.ContentType = "Image/" + Config.ImageFormat; //Create chart stream MemoryStream ms = new MemoryStream(); if (Config.ImageFormat == "Gif") { Type tQuantization = (Type)Application["Quantization"]; if (tQuantization == null) { Assembly[] ass = AppDomain.CurrentDomain.GetAssemblies(); foreach (Assembly a in ass) { if (a.FullName.StartsWith("ImageQuantization")) { tQuantization = a.GetType("ImageQuantization.OctreeQuantizer"); } } Application["Quantization"] = tQuantization; } if (tQuantization != null) { object[] os; if (Config.TransparentColor.IsEmpty) { os = new object[] { B, ms, Config.GifColors } } ; else { os = new object[] { B, ms, Config.GifColors, Config.TransparentColor } }; tQuantization.InvokeMember("Save", BindingFlags.Public | BindingFlags.Static | BindingFlags.InvokeMethod, null, null, os); } if (ms.Length == 0) { B.Save(ms, ImageFormat.Png); } } else if (Config.ImageFormat == "Png") { B.Save(ms, ImageFormat.Png); } else if (Config.ImageFormat == "Jpeg") { B.Save(ms, ImageFormat.Jpeg); } //Output the chart stream to web browser ms.WriteTo(Response.OutputStream); }
protected void btnOK_Click(object sender, System.EventArgs e) { //Create a Formula namespace FormulaSpace fms = new FormulaSpace("FML"); //Create a Formula program , set Formula name and script code on the fly FormulaProgram fp = new FormulaProgram(); fp.Name = tbFormulaName.Text; fp.Code = tbProgramScript.Text; //Add the script program to the Formula namespace fms.Programs.Add(fp); //Add parameters to Formula program for (int i = 1; i < 5; i++) { if (Request.Form["tbParamName" + i] != "") { fp.Params.Add(new FormulaParam( Request.Form["tbParamName" + i], float.Parse(Request.Form["tbDefValue" + i]), float.Parse(Request.Form["tbMinValue" + i]), float.Parse(Request.Form["tbMaxValue" + i]))); } } try { //Compile the Formula script on the fly Assembly a = fms.CompileInMemory(HttpRuntime.BinDirectory); FormulaBase fb = FormulaBase.GetFormulaByName(a, fms.Name + "." + fp.Name); //Create YahooDataManager , Get stock data from yahoo. YahooDataManager ydm = new YahooDataManager(); ydm.CacheRoot = HttpRuntime.AppDomainAppPath + "Cache\\"; CommonDataProvider DataProvider = (CommonDataProvider)ydm[tbCode.Text]; //Create financial chart instance FormulaChart fc = new FormulaChart(); fc.AddArea("MAIN", 3); fc.AddArea(fb); fc.DataProvider = DataProvider; fc.SetSkin(Config.DefaultSkin); //Show the temp image just created lChart.Text = "<img src=ImageFromCache.aspx?CacheId=" + fc.SaveToImageStream(440, 440, ImageFormat.Png, 0, 0) + ">"; } catch (FormulaErrorException fee) { //Show the compile result if the script has some errors lChart.Text = "<font color=red>"; foreach (System.CodeDom.Compiler.CompilerError ce in fee.ces) { FormulaProgram fpa = fms.GetProgramByLineNum(ce.Line); if (fpa != null) { fpa.AdjustErrors(ce); lChart.Text += string.Format("Name:{0} line:{1} column:{2} error:{3} {4}<br>", fpa.Name, ce.Line, ce.Column, ce.ErrorNumber, ce.ErrorText); } } lChart.Text += "</font>"; } }