static void Main(string[] args) { // управление черепахой, окно должно быть активным GraphicsWindow.KeyDown += GraphicsWindow_KeyDown; // указываем, что чертить линию передвижения не надо Turtle.PenUp(); //вводим переменную "еда" и красим ее в красный цвет, добавляем переменные местоположения GraphicsWindow.BrushColor = "Red"; var eat = Shapes.AddEllipse(10, 10); int x = 100; int y = 100; Shapes.Move(eat, x, y); Random escape_my_eat = new Random(); // бесконечный цикл while (true) { Turtle.Move(10); if (Turtle.X >= x && Turtle.X <= x + 10 && Turtle.Y >= y && Turtle.Y <= y + 10) { x = escape_my_eat.Next(0, GraphicsWindow.Width); y = escape_my_eat.Next(0, GraphicsWindow.Height); Shapes.Move(eat, x, y); Turtle.Speed++; } } }
static void Main(string[] args) { GraphicsWindow.KeyDown += GraphicsWindow_KeyDown; Turtle.PenUp(); var eat = Shapes.AddEllipse(10, 10); int x = 200; int y = 200; Shapes.Move(eat, x, y); Random rand = new Random(); while (true) { Turtle.Move(5); if ((Turtle.X >= x && Turtle.X <= x + 10) && (Turtle.Y >= y && Turtle.Y <= y + 10)) { x = rand.Next(10, GraphicsWindow.Width); y = rand.Next(10, GraphicsWindow.Height); Shapes.Move(eat, x, y); Turtle.Speed++; } } }
private void buttonInstances_Click(object sender, EventArgs e) { //GraphicsWindow.Show(); Primitive win = new Primitive(); for (int i = 0; i < 3; i++) { win[i] = LDWindows.Create(); GraphicsWindow.Title = i.ToString(); //Shapes.AddEllipse(100, 100); } LDWindows.CurrentID = win[0]; Primitive ball = Shapes.AddEllipse(100, 100); LDWindows.CurrentID = win[1]; Shapes.AddEllipse(100, 100); GraphicsWindow.BackgroundColor = "Red"; GraphicsWindow.Hide(); LDWindows.CurrentID = 0; GraphicsWindow.Show(); LDWindows.CurrentID = win[0]; Shapes.Move(ball, 200, 200); LDWindows.CurrentID = 0; Shapes.Move(ball, 300, 300); //LDWindow.Hide(win[0]); //LDWindow.Close(win[1]); //Program.Delay(5000); //LDWindow.Hide(win[2]); }
private void buttonColours_Click(object sender, EventArgs e) { Primitive col = LDColours.SetOpacity("Orange", 100); TextWindow.WriteLine(col); TextWindow.WriteLine(LDColours.GetOpacity(col)); TextWindow.WriteLine(LDColours.GetRed(col)); TextWindow.WriteLine(LDColours.GetGreen(col)); TextWindow.WriteLine(LDColours.GetBlue(col)); TextWindow.WriteLine(LDColours.GetHue(col)); TextWindow.WriteLine(LDColours.GetSaturation(col)); TextWindow.WriteLine(LDColours.GetLightness(col)); col = LDColours.HSLtoRGB(LDColours.GetHue(col), LDColours.GetSaturation(col), LDColours.GetLightness(col)); TextWindow.WriteLine(col); for (int i = 0; i < 360; i++) { GraphicsWindow.BackgroundColor = LDColours.HSLtoRGB(i, 1, 0.5); SBProgram.Delay(20); } LDUtilities.PauseUpdates(); GraphicsWindow.PenWidth = 0; Primitive colour = "Blue"; Primitive ball = Shapes.AddEllipse(300, 300); Shapes.Move(ball, GraphicsWindow.Width / 2 - 150, GraphicsWindow.Height / 2 - 150); LDShapes.BrushColour(ball, LDColours.SetOpacity(colour, 0)); LDUtilities.ResumeUpdates(); for (int i = 0; i < 255; i++) { LDShapes.BrushColour(ball, LDColours.SetOpacity(colour, i)); SBProgram.Delay(10); } }
private void buttonDialogs_Click(object sender, EventArgs e) { int i; GraphicsWindow.Show(); Primitive items = ""; Primitive images = ""; for (i = 1; i <= 5; i++) { items[i] = "Item " + i; images[i] = "C:\temp\test.jpg"; } LDDialogs.AddRightClickMenu(items, images); TextWindow.WriteLine(System.Windows.Media.RenderCapability.Tier >> 16); Primitive a1 = LDArray.Create(1000); Shapes.AddEllipse(50, 50); FormPropertyGrid grid = new FormPropertyGrid(); grid.Display("_mainCanvas"); Primitive properties = grid.GetProperties("_mainCanvas"); for (i = 1; i <= SBArray.GetItemCount(properties); i++) { TextWindow.WriteLine(properties[i]); } grid.SetProperty("_mainCanvas.Children.Ellipse1.Opacity", 0.5); Primitive font = LDDialogs.Font(""); Primitive font2 = LDDialogs.Font(font); Primitive fileName = LDDialogs.OpenFile("Small Basic File (*.sb) |*.sb", ""); LDUtilities.Version(); GraphicsWindow.Show(); TextWindow.WriteLine(LDDialogs.Calendar(LDDateTime.Add(LDDateTime.Now(), 7))); //Now + 7 days //LDUtilities.PauseUpdates(); LDDialogs.Wait("Please wait for a few seconds while I draw something...", LDColours.SetOpacity(LDColours.Violet, 200)); double start = Clock.ElapsedMilliseconds; i = 1; while (Clock.ElapsedMilliseconds < start + 5000) { Primitive ball = Shapes.AddEllipse(20, 20); Shapes.Move(ball, SBMath.GetRandomNumber(GraphicsWindow.Width) - 10, SBMath.GetRandomNumber(GraphicsWindow.Height) - 10); LDDialogs.ToolTip(ball, "Ball " + i++); SBProgram.Delay(100); } //LDUtilities.ResumeUpdates(); LDDialogs.EndWait(); }
static void Main(string[] args) { GraphicsWindow.Show(); var p = Shapes.AddRectangle(100, 20); Shapes.Move(p, 0, GraphicsWindow.Height - 20); GraphicsWindow.MouseMove += () => { Shapes.Move(p, GraphicsWindow.MouseX - 50, GraphicsWindow.Height - 20); }; Primitive[] enemies = new Primitive[20]; GraphicsWindow.BrushColor = "Gray"; var c = Shapes.AddEllipse(20, 20); Timer.Interval = 10; int circleX = GraphicsWindow.Width / 2, circleY = GraphicsWindow.Height / 2, stepx = 2, stepy = 2, my = GraphicsWindow.Height - 40, mx = GraphicsWindow.MouseX; int enemyWidth = GraphicsWindow.Width / 10 - 5; Mouse.HideCursor(); GraphicsWindow.BrushColor = "Red"; for (int i = 0; i < 10; i++) { enemies[i] = Shapes.AddRectangle(enemyWidth, 20); Shapes.Move(enemies[i], i * (GraphicsWindow.Width / 10), 30); } for (int i = 0; i < 10; i++) { enemies[i] = Shapes.AddRectangle(enemyWidth, 20); Shapes.Move(enemies[i], i * (GraphicsWindow.Width / 10), 55); } Timer.Tick += () => { my = GraphicsWindow.Height - 40; mx = GraphicsWindow.MouseX; Shapes.Move(c, circleX += stepx, circleY += stepy); if (circleX >= GraphicsWindow.Width - 20) { stepx = -stepx; } if (circleX <= 0) { stepx = 4; } if ((circleX >= mx - 50 && circleX <= mx + 50) && (circleY >= my)) { stepy = -stepy; } if (circleY <= 0) { stepy = 4; } if (circleY > GraphicsWindow.Height) { Sound.PlayAndWait("1.mp3"); Microsoft.SmallBasic.Library.Program.End(); } for (int i = 0; i < 10; i++) { if ((circleX + 10 >= Shapes.GetLeft(enemies[i])) && (circleY <= Shapes.GetTop(enemies[i]) + 20) && (circleX <= Shapes.GetLeft(enemies[i]) + enemyWidth)) { Shapes.Move(enemies[i], 9999, 9999); stepy = -stepy; } } }; }
static void Main(string[] args) { Primitive[] enemies = new Primitive[10]; GraphicsWindow.Show(); var P = Shapes.AddRectangle(100, 20); Shapes.Move(P, 0, GraphicsWindow.Height - 20); GraphicsWindow.MouseMove += () => { Shapes.Move(P, GraphicsWindow.MouseX - 50, GraphicsWindow.Height - 20); }; GraphicsWindow.BrushColor = "yellow"; var S = Shapes.AddEllipse(20, 20); int x = 2; int y = 2; int stepx = 2; int stepy = 2; Mouse.HideCursor(); var F = GraphicsWindow.Width / 10; for (int f = 0; f < 10; f++) { enemies[f] = Shapes.AddRectangle(F, 20); Shapes.Move(enemies[f], f * (F), 0); } Timer.Interval = 1; Timer.Tick += () => { Shapes.Move(S, x, y); x += stepx; y += stepy; if (x >= GraphicsWindow.Width - 20) { stepx = -stepx; } //if (y >= GraphicsWindow.Height - 20) //{ // stepy = -stepy; // } if (x < 0) { stepx = -stepx; } if (y < 0) { stepy = -stepy; } var mx = GraphicsWindow.MouseX; var my = GraphicsWindow.Height - 40; if (((x >= mx - 50) && (x <= mx + 50)) && (y >= my)) { stepy = -stepy; } if ((x = Shapes.GetLeft(enemies[S])) && (y == Shapes.GetTop(enemies[P]))) { } if (y > GraphicsWindow.Height) { // Sound.PlayAndWait(" рингтон Sad trombone - Грустный тромбон.mp3"); Microsoft.SmallBasic.Library.Program.End(); } }; }
private void buttonShapes_Click(object sender, EventArgs e) { GraphicsWindow.Show(); LDScrollBars.Rasterize = "True"; GraphicsWindow.MouseDown += OnMouseDown; LDScrollBars.Add(GraphicsWindow.Width, 10000); int cogRadius = 100; int cogNumTeeth = 10; int cogToothSize = 10; Primitive cog = Shapes.AddEllipse(2 * cogRadius, 2 * cogRadius); Primitive points = ""; Primitive point = ""; LDPhysics.AddMovingShape(cog, 0.5, 0.8, 1); for (int i = 1; i <= 1; i++) { double angle = (i - 1) / cogNumTeeth * 2 * SBMath.Pi; double innerSector = 0.7 / cogNumTeeth * 2 * SBMath.Pi; double outerSector = 0.5 / cogNumTeeth * 2 * SBMath.Pi; point["X"] = cogRadius + cogRadius * SBMath.Cos(angle); point["Y"] = cogRadius + cogRadius * SBMath.Sin(angle); points[1] = point; point["X"] = cogRadius + cogRadius * SBMath.Cos(angle + innerSector); point["Y"] = cogRadius + cogRadius * SBMath.Sin(angle + innerSector); points[2] = point; point["X"] = cogRadius + (cogRadius + cogToothSize) * SBMath.Cos(angle + outerSector); point["Y"] = cogRadius + (cogRadius + cogToothSize) * SBMath.Sin(angle + outerSector); points[3] = point; point["X"] = cogRadius + (cogRadius + cogToothSize) * SBMath.Cos(angle + innerSector - outerSector); point["Y"] = cogRadius + (cogRadius + cogToothSize) * SBMath.Sin(angle + innerSector - outerSector); points[4] = point; Primitive tooth = LDShapes.AddPolygon(points); LDPhysics.AddMovingShape(tooth, 0.5, 0.8, 1); //LDPhysics.GroupShapes(cog, tooth); } LDPhysics.DoTimestep(); Primitive ball = Shapes.AddEllipse(100, 50); //Shapes.Move(ball, 112, 112); //Shapes.Zoom(ball, 1, 1); //Shapes.Rotate(ball, -60); Shapes.Move(ball, 100, 112); //Shapes.Zoom(ball, 1.2, 1); //Shapes.Rotate(ball, -60); Primitive gradient = ""; gradient[1] = "Red"; gradient[2] = "Yellow"; gradient[3] = "Blue"; Primitive brush = LDShapes.BrushGradient(gradient, "H"); LDShapes.BrushShape(ball, brush); LDUtilities.GWCapture("C:\\temp\\test.jpg", "False"); Primitive rect = Shapes.AddRectangle(60, 60); Shapes.Move(rect, 25, 95); Shapes.Zoom(rect, 1.5, 1); Shapes.Rotate(rect, 45); //Shapes.Move(rect, 75, 75); //Shapes.Zoom(rect, 1.5, 1); //Shapes.Rotate(rect, 45); TextWindow.WriteLine(LDShapes.Overlap(ball, rect)); //TextWindow.WriteLine(LDShapes.Overlap(rect, ball)); Primitive image1 = Shapes.AddImage("C:\\temp\\test2.jpg"); Shapes.Move(image1, 100, 100); TextWindow.WriteLine(LDShapes.Overlap(ball, image1)); //LDShapes.AnimatedGifInterval = 0; Primitive gifShape = LDShapes.AddAnimatedGif("http://www.animatedgif.net//animals//birds//batana1_e0.gif", "True"); Shapes.Move(gifShape, 100, 300); Primitive rectangle = Shapes.AddRectangle(100, 100); LDShapes.BrushColour(rectangle, "Red"); Primitive img = SBImageList.LoadImage("C:\\temp\\test.jpg"); Primitive img2 = "C:\\temp\\test2.jpg"; Primitive button = SBControls.AddButton("TEST", 100, 100); SBControls.SetSize(button, 50, 50); Primitive image = Shapes.AddImage(img); LDShapes.ReSize(image, 50, 50); LDShapes.Centre(image, 400, 25); SBProgram.Delay(1000); LDShapes.SetImage(image, img2); LDShapes.SetImage(button, img); SBProgram.Delay(1000); LDShapes.AnimationInterval = 0; LDShapes.AnimationSet(gifShape, LDShapes.AnimationCount(gifShape) / 3); SBProgram.Delay(1000); LDShapes.AnimationInterval = 50; LDShapes.AnimationPause(gifShape); SBProgram.Delay(2000); Shapes.HideShape(gifShape); LDShapes.AnimationResume(gifShape); SBProgram.Delay(2000); Shapes.ShowShape(gifShape); }