private void buttonTrig_Click(object sender, EventArgs e) { Primitive x1 = 100; Primitive y1 = 100; Primitive x2 = 150; Primitive y2 = 50; Primitive radial = LDMath.Convert2Radial(x1, y1, x2, y2); TextWindow.WriteLine(radial); Primitive pos = LDMath.Convert2Cartesian(x1, y1, radial[1], radial[2]); TextWindow.WriteLine(pos); Primitive rotate = LDMath.Rotate(x1, y1, x2, y2, 90); TextWindow.WriteLine(rotate); }
private void buttonUnits_Click(object sender, EventArgs e) { Primitive aa = LDMath.Rotate(0, 0, 0, -100, 180); Primitive view = LD3DView.AddView(500, 500, "True"); LD3DView.ResetCamera(view, 0, 0, -20, 0, 0, 1, 0, 1, 0); LD3DView.AddDirectionalLight(view, "Red", 1, 0, 1); LD3DView.AddDirectionalLight(view, "Green", 1, 0, -1); LD3DView.AddDirectionalLight(view, "Blue", -1, 0, 1); LD3DView.AddDirectionalLight(view, "Yellow", -1, 0, -1); Primitive cube = LD3DView.AddCube(view, 1, "Red", "D"); LD3DView.SetBillBoard(view, cube); for (int i = 1; i < 100; i++) { LD3DView.MoveCamera(view, i, 1, 1, 1); } //Primitive button = Microsoft.SmallBasic.Library.Controls.AddButton("Test", 50, 50); //LDControls.SetButtonStyle(button, "Red", "Blue", "Green", "Black", "Black", "Black", 9, "True"); //GraphicsWindow.Width = 200; //GraphicsWindow.Height = 200; //Primitive title = ""; //for (int i = 1; i <= 20; i++) //{ // title[i] = "TEST" + i; //} //Primitive dv = LDControls.AddDataView(200, 200, title); //Primitive row = ""; //for (int i = 1; i <= 20; i++) //{ // for (int j = 1; j <= 20; j++) // { // row[j] = Microsoft.SmallBasic.Library.Math.GetRandomNumber(1000000); // } // LDControls.DataViewSetRow(dv, i, row); //} //UnitSystem unitSystem = new UnitSystem(); //double[] values = new double[22]; //int i = 0; //values[i++] = unitSystem.Convert(1, "[D.ft/cP.psi]+[ft3/day]", "ft3/day"); //values[i++] = unitSystem.Convert(1, "mu0.e0", "1/c2"); //values[i++] = unitSystem.Convert(1, "RC", "J/K/mol"); //values[i++] = unitSystem.Convert(1, "eQ", "Q"); //values[i++] = unitSystem.Convert(6, "min/mile", "min/Km"); //values[i++] = unitSystem.Convert(9.81, "m/s2", "ft/s2"); //values[i++] = unitSystem.Convert(1, "Avagadro.M.l", "1"); //values[i++] = unitSystem.Convert(1, "D.ft/cP.psi", "ft3/day"); //values[i++] = unitSystem.Convert(1, "psi+(14.69)", "psig"); //values[i++] = unitSystem.Convert(1, "Kilo.ft3/day", "ft3/day"); //values[i++] = unitSystem.Convert(1, "m(-1)", "1/in"); //values[i++] = unitSystem.Convert(1, "Kg/min2", "g/hr2"); //values[i++] = unitSystem.Convert(1, "mm", "m"); //values[i++] = unitSystem.Convert(1, "1/cN2", "1/N2"); //values[i++] = unitSystem.Convert(1, "pi.KJ", "N.m"); //values[i++] = unitSystem.Convert(100, "mC", "F"); //values[i++] = unitSystem.Convert(1, "BTU2", "J2"); //values[i++] = unitSystem.Convert(1, "ton", "tonne"); //values[i++] = unitSystem.Convert(1, "W", "Volt.Amp"); //values[i++] = unitSystem.Convert(1, "psi", "lbf/in2"); //values[i++] = unitSystem.Convert(1, "Kpsig", "Kpsi"); //values[i++] = unitSystem.Convert(1, "USD", "GBP"); }
private void buttonTest_Click(object sender, EventArgs e) { Primitive shp = Microsoft.SmallBasic.Library.Controls.AddButton("Button", 10, 10); LDShapes.ReSize(shp, 100, 100); LDShapes.ReSize(shp, 200, 200); Primitive xx = LDFastArray.Add(); LDFastArray.Set(xx, "1 2 3", 24); FieldInfo _primitive = typeof(Primitive).GetField("_primitive", BindingFlags.NonPublic | BindingFlags.Static | BindingFlags.IgnoreCase | BindingFlags.Instance); Primitive aa = "1 23 45"; string bb = (string)_primitive.GetValue(aa); Primitive sb = "1=1\\=\"hello\"\\;2\\=1\\;3\\=2\\;;2=1\\=3\\;2\\=test\\;3\\=3\\;;"; Primitive arr = LDFastArray.CreateFromValues(sb); Primitive sb1 = LDFastArray.ToArray(arr); Primitive a = LDFastArray.Add(); LDFastArray.Set2D(a, 2, 5, 10); LDFastArray.Set2D(a, 2, 2, 20); LDFastArray.Set2D(a, 1, 8, 30); LDFastArray.Collapse(a); Primitive b = LDFastArray.ToArray(a); Primitive img = Microsoft.SmallBasic.Library.ImageList.LoadImage("https://upload.wikimedia.org/wikipedia/commons/thumb/d/d6/STS120LaunchHiRes-edit1.jpg/153px-STS120LaunchHiRes-edit1.jpg"); Primitive x1 = LDImage.Copy(img); LDImage.EffectCharcoal(x1); Primitive image = LDImage.NewImage(100, 100, "Red"); LDImage.OpenWorkingImage(image); Primitive xml = LDxml.Open("C:\\Users\\Steve\\Documents\\SmallBasic\\steve\\sample.xml"); Primitive data = LDxml.ToArray(); LDxml.FromArray(data); LDxml.Save("C:\\Users\\Steve\\Documents\\SmallBasic\\steve\\sample1.xml"); Primitive txt = Microsoft.SmallBasic.Library.File.ReadContents("C:\\Users\\Steve\\Documents\\SmallBasic\\steve\\txt.txt"); LDSearch.GetProof(txt, ""); LDSearch.GetWeb("bill gates"); return; //TextWindow.Show(); //LDTextWindow.SetColours("Pink", "Orange"); //TextWindow.WriteLine("Hello World"); LDPhysics.ReadJson("C:\\Users\\Steve\\Documents\\SmallBasic\\steve\\LDPysics.json", 1, "False", "False", 0, 0); LDWaveForm.PlayWave(256, 1000, "0=-1;1=1;5=0;"); Primitive shape = Shapes.AddRectangle(100, 100); LDEffect.Bloom(shape, ""); Program.Delay(1000); LDControls.AddDataView(GraphicsWindow.Width, GraphicsWindow.Height, "1=Hello;2=World;"); //string _urlTemplate = "https://api.flickr.com/services/rest/?sort=interestingness-desc&safe_search=1&license=1,2,3,4,5,6,7&api_key="; //string _picUrlTemplate = "http://farm{0}.static.flickr.com/{1}/{2}_{3}.jpg"; byte[] array = Convert.FromBase64String("MWY5ZmI5ODE4Mjk2NzAwNTgwYmYzMzQwMjc5MzQ2YjY="); //_urlTemplate += Encoding.UTF8.GetString(array, 0, array.Length); TextWindow.WriteLine(Encoding.UTF8.GetString(array, 0, array.Length)); Primitive rtb = LDControls.AddRichTextBox(100, 100); LDControls.RichTextBoxSetText(rtb, "Hello", "True"); LDCall.Compile("C:\\Users\\Steve\\Documents\\SmallBasic\\steve\\testinclude.sb"); Primitive include = LDCall.Include("C:\\Users\\Steve\\Documents\\SmallBasic\\steve\\testinclude.exe"); TextWindow.WriteLine(include); LDUtilities.FixFlickr();//FCClipboard.GetText LDCall.CallAsync("SmallBasicLibrary.dll", "Microsoft.SmallBasic.Library", "Flickr", "GetRandomPicture", "Car"); string tempFileName = Path.GetTempFileName(); Stream stream = null; Stream stream2 = null; WebResponse webResponse = null; try { string url = "https://a75b9da71f50095fc4dc527d860da4427f274b07.googledrive.com/host/0B9s0FFxEQDb6T3VUdEw3QTJDS1E/efecast00.mp3"; Uri uri = new Uri(url); WebRequest webRequest = WebRequest.Create(url); webResponse = webRequest.GetResponse(); stream = System.IO.File.Open(tempFileName, FileMode.OpenOrCreate, FileAccess.Write, FileShare.Read); byte[] buffer = new byte[16384]; long num = webResponse.ContentLength; stream2 = webResponse.GetResponseStream(); int readCount = stream2.Read(buffer, 0, 16384); while (readCount > 0L) { stream.Write(buffer, 0, readCount); readCount = stream2.Read(buffer, 0, 16384); } } catch (Exception ex) { TextWindow.WriteLine(ex.Message); } finally { if (stream != null) { stream.Close(); } if (stream2 != null) { stream2.Close(); } if (webResponse != null) { webResponse.Close(); } } LDGraphicsWindow.SetFontFromFile("C:\\temp\\04b.ttf"); TextWindow.Show(); //Primitive source = "class Evaluator { public static function Eval(expr : String) : String { return eval(expr); } }"; //LDInline.IncludeJScript(source,"",""); //Primitive result = LDInline.Call("Eval","5+3"); //TextWindow.WriteLine(result); //TextWindow.Hide(); Primitive x = LDMath.Evaluate("1e6 + 6/4"); Primitive y = LDMath.Evaluate2("1e6 + 6/4"); //TextWindow.Hide(); TextWindow.WriteLine("HERE " + x + " :" + y); LDImage.LoadSVG("C:\\temp\\snowtitle.svg"); TextWindow.WriteLine(LDNetwork.LAN(1000)); GraphicsWindow.Show(); LDText.GetWidth("Hello World"); Primitive server = LDServer.Start("True"); LDClient.Connect(server, "True"); LDClient.SendMessage("Hello1"); LDClient.SendMessage("World1"); LDServer.Disconnect("Client1"); LDClient.Connect(server, "True"); LDClient.SendMessage("Hello3"); LDClient.SendMessage("World3"); GraphicsWindow.Show(); LDGraphicsWindow.FloodFill(200, 100, "#5588ee"); //Program.Delay(1000000); //Primitive languages = LDTranslate.Languages(); //Primitive indices = SBArray.GetAllIndices(languages); //for (int i = 1; i <= SBArray.GetItemCount(languages); i++) //{ // TextWindow.WriteLine(indices[i] + " : " + languages[indices[i]]); //} //Primitive result = LDTranslate.Translate("Hello World", "", "de"); //TextWindow.WriteLine(result); //TextWindow.WriteLine(GraphicsWindow.FontName); //GraphicsWindow.DrawText(10, 10, "Hello World"); //Primitive result = LDGraphicsWindow.SetFontFromFile("C:\\Users\\Public\\Documents\\SmallBasic\\steve\\WWFlakes.ttf"); //TextWindow.WriteLine(GraphicsWindow.FontName); //GraphicsWindow.DrawText(10, 50, "Hello World"); //PrivateFontCollection fntColl = new PrivateFontCollection(); //fntColl.AddFontFile("C:\\Users\\Public\\Documents\\SmallBasic\\steve\\WWFlakes.ttf"); //buttonTest.Font = new Font(fntColl.Families[0], 16, FontStyle.Regular); //LDDictionary.GetDefinition("Car"); }