ShuriZma
/
BizHawk
mirror of https://github.com/TASEmulators/BizHawk.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #885 from Trivial-Man/master 

Create LuaPictureBox class and implement it
This commit is contained in:
zeromus 2017-07-14 12:21:54 -05:00 committed by GitHub
parent 11fc26ec3b 8e0926449f
commit d271fe6542
8 changed files with 1450 additions and 304 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
BizHawk.Client.EmuHawk/BizHawk.Client.EmuHawk.csproj
View File

@ -894,6 +894,9 @@
<Compile Include="tools\Lua\LuaFunctionsForm.Designer.cs">
<DependentUpon>LuaFunctionsForm.cs</DependentUpon>
</Compile>
<Compile Include="tools\Lua\LuaPictureBox.cs">
<SubType>Component</SubType>
</Compile>
<Compile Include="tools\Lua\LuaRegisteredFunctionsList.cs">
<SubType>Form</SubType>
</Compile>
@ -2134,12 +2137,12 @@
<Folder Include="config\Saturn\" />
</ItemGroup>
<Import Project="$(MSBuildBinPath)\Microsoft.CSharp.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
<PropertyGroup>
<PostBuildEvent>
@ -2153,4 +2156,4 @@
<PreBuildEvent />
</PropertyGroup>
<Import Project="$(SolutionDir)Build\Common.targets" />
</Project>
</Project>

846
BizHawk.Client.EmuHawk/tools/Lua/Libraries/EmuLuaLibrary.Forms.cs
View File

@ -7,6 +7,7 @@ using System.Windows.Forms;
using BizHawk.Client.Common;
using NLua;
using System.IO;
namespace BizHawk.Client.EmuHawk
{
@ -77,7 +78,8 @@ namespace BizHawk.Client.EmuHawk
}
}
[LuaMethod("button", "Creates a button control on the given form. The caption property will be the text value on the button. clickEvent is the name of a Lua function that will be invoked when the button is clicked. x, and y are the optional location parameters for the position of the button within the given form. The function returns the handle of the created button. Width and Height are optional, if not specified they will be a default size")]
[LuaMethod(
"button", "Creates a button control on the given form. The caption property will be the text value on the button. clickEvent is the name of a Lua function that will be invoked when the button is clicked. x, and y are the optional location parameters for the position of the button within the given form. The function returns the handle of the created button. Width and Height are optional, if not specified they will be a default size")]
public int Button(
int formHandle,
string caption,
@ -111,7 +113,8 @@ namespace BizHawk.Client.EmuHawk
return (int)button.Handle;
}
[LuaMethod("checkbox", "Creates a checkbox control on the given form. The caption property will be the text of the checkbox. x and y are the optional location parameters for the position of the checkbox within the form")]
[LuaMethod(
"checkbox", "Creates a checkbox control on the given form. The caption property will be the text of the checkbox. x and y are the optional location parameters for the position of the checkbox within the form")]
public int Checkbox(int formHandle, string caption, int? x = null, int? y = null)
{
var form = GetForm(formHandle);
@ -178,7 +181,8 @@ namespace BizHawk.Client.EmuHawk
}
}
[LuaMethod("dropdown", "Creates a dropdown (with a ComboBoxStyle of DropDownList) control on the given form. Dropdown items are passed via a lua table. Only the values will be pulled for the dropdown items, the keys are irrelevant. Items will be sorted alphabetically. x and y are the optional location parameters, and width and height are the optional size parameters.")]
[LuaMethod(
"dropdown", "Creates a dropdown (with a ComboBoxStyle of DropDownList) control on the given form. Dropdown items are passed via a lua table. Only the values will be pulled for the dropdown items, the keys are irrelevant. Items will be sorted alphabetically. x and y are the optional location parameters, and width and height are the optional size parameters.")]
public int Dropdown(
int formHandle,
LuaTable items,
@ -208,7 +212,7 @@ namespace BizHawk.Client.EmuHawk
{
SetSize(dropdown, width.Value, height.Value);
}
return (int)dropdown.Handle;
}
@ -224,7 +228,7 @@ namespace BizHawk.Client.EmuHawk
{
return form.GetType().GetProperty(property).GetValue(form, null).ToString();
}
foreach (Control control in form.Controls)
{
if (control.Handle == ptr)
@ -236,7 +240,7 @@ namespace BizHawk.Client.EmuHawk
}
catch (Exception ex)
{
Log(ex.Message);
ConsoleLuaLibrary.Log(ex.Message);
}
return "";
@ -254,7 +258,7 @@ namespace BizHawk.Client.EmuHawk
{
return form.Text;
}
foreach (Control control in form.Controls)
{
if (control.Handle == ptr)
@ -263,7 +267,7 @@ namespace BizHawk.Client.EmuHawk
{
return (control as LuaDropDown).SelectedItem.ToString();
}
return control.Text;
}
}
@ -271,7 +275,7 @@ namespace BizHawk.Client.EmuHawk
}
catch (Exception ex)
{
Log(ex.Message);
ConsoleLuaLibrary.Log(ex.Message);
}
return "";
@ -287,7 +291,7 @@ namespace BizHawk.Client.EmuHawk
{
return false;
}
foreach (Control control in form.Controls)
{
if (control.Handle == ptr)
@ -296,7 +300,7 @@ namespace BizHawk.Client.EmuHawk
{
return (control as LuaCheckbox).Checked;
}
return false;
}
}
@ -305,7 +309,8 @@ namespace BizHawk.Client.EmuHawk
return false;
}
[LuaMethod("label", "Creates a label control on the given form. The caption property is the text of the label. x, and y are the optional location parameters for the position of the label within the given form. The function returns the handle of the created label. Width and Height are optional, if not specified they will be a default size.")]
[LuaMethod(
"label", "Creates a label control on the given form. The caption property is the text of the label. x, and y are the optional location parameters for the position of the label within the given form. The function returns the handle of the created label. Width and Height are optional, if not specified they will be a default size.")]
public int Label(
int formHandle,
string caption,
@ -343,7 +348,8 @@ namespace BizHawk.Client.EmuHawk
return (int)label.Handle;
}
[LuaMethod("newform", "creates a new default dialog, if both width and height are specified it will create a dialog of the specified size. If title is specified it will be the caption of the dialog, else the dialog caption will be 'Lua Dialog'. The function will return an int representing the handle of the dialog created.")]
[LuaMethod(
"newform", "creates a new default dialog, if both width and height are specified it will create a dialog of the specified size. If title is specified it will be the caption of the dialog, else the dialog caption will be 'Lua Dialog'. The function will return an int representing the handle of the dialog created.")]
public int NewForm(int? width = null, int? height = null, string title = null, LuaFunction onClose = null)
{
var form = new LuaWinform(CurrentThread);
@ -377,7 +383,8 @@ namespace BizHawk.Client.EmuHawk
return (int)form.Handle;
}
[LuaMethod("openfile", "Creates a standard openfile dialog with optional parameters for the filename, directory, and filter. The return value is the directory that the user picked. If they chose to cancel, it will return an empty string")]
[LuaMethod(
"openfile", "Creates a standard openfile dialog with optional parameters for the filename, directory, and filter. The return value is the directory that the user picked. If they chose to cancel, it will return an empty string")]
public string OpenFile(string fileName = null, string initialDirectory = null, string filter = "All files (*.*)|*.*")
{
// filterext format ex: "Image Files(*.BMP;*.JPG;*.GIF)|*.BMP;*.JPG;*.GIF|All files (*.*)|*.*"
@ -386,26 +393,822 @@ namespace BizHawk.Client.EmuHawk
{
openFileDialog1.InitialDirectory = initialDirectory;
}
if (fileName != null)
{
openFileDialog1.FileName = fileName;
}
if (filter != null)
{
openFileDialog1.AddExtension = true;
openFileDialog1.Filter = filter;
}
if (openFileDialog1.ShowDialog() == DialogResult.OK)
{
return openFileDialog1.FileName;
}
return "";
}
[LuaMethod(
"pictureBox",
"Creates a new drawing area in the form. Optionally the location in the form as well as the size of the drawing area can be specified. Returns the handle the component can be refered to with.")]
public int PictureBox(int formHandle, int? x = null, int? y = null, int? width = null, int? height = null)
{
var form = GetForm(formHandle);
if (form == null)
{
return 0;
}
var pictureBox = new LuaPictureBox();
form.Controls.Add(pictureBox);
if (x.HasValue && y.HasValue)
{
SetLocation(pictureBox, x.Value, y.Value);
}
if (width.HasValue && height.HasValue)
{
pictureBox.LuaResize(width.Value, height.Value);
}
SetSize(pictureBox, width.Value, height.Value);
return (int)pictureBox.Handle;
}
#region LuaPictureBox Methods
[LuaMethod(
"clear",
"Clears the canvas")]
public void Clear(int componentHandle, Color color)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).Clear(color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"refresh",
"Redraws the canvas")]
public void Refresh(int componentHandle)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).Refresh();
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"setDefaultForegroundColor",
"Sets the default foreground color to use in drawing methods, white by default")]
public void SetDefaultForegroundColor(int componentHandle, Color color)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).SetDefaultForegroundColor(color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"setDefaultBackgroundColor",
"Sets the default background color to use in drawing methods, transparent by default")]
public void SetDefaultBackgroundColor(int componentHandle, Color color)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).SetDefaultBackgroundColor(color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"setDefaultTextBackground",
"Sets the default backgroiund color to use in text drawing methods, half-transparent black by default")]
public void SetDefaultTextBackground(int componentHandle, Color color)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).SetDefaultTextBackground(color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawBezier",
"Draws a Bezier curve using the table of coordinates provided in the given color")]
public void DrawBezier(int componentHandle, LuaTable points, Color color)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawBezier(points, color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawBox",
"Draws a rectangle on screen from x1/y1 to x2/y2. Same as drawRectangle except it receives two points intead of a point and width/height")]
public void DrawBox(int componentHandle, int x, int y, int x2, int y2, Color? line = null, Color? background = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawBox(x, y, x2, y2, line, background);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawEllipse",
"Draws an ellipse at the given coordinates and the given width and height. Line is the color of the ellipse. Background is the optional fill color")]
public void DrawEllipse(int componentHandle, int x, int y, int width, int height, Color? line = null, Color? background = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawEllipse(x, y, width, height, line, background);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawIcon",
"draws an Icon (.ico) file from the given path at the given coordinate. width and height are optional. If specified, it will resize the image accordingly")]
public void DrawIcon(int componentHandle, string path, int x, int y, int? width = null, int? height = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawIcon(path, x, y, width, height);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawImage",
"draws an image file from the given path at the given coordinate. width and height are optional. If specified, it will resize the image accordingly")]
public void DrawImage(int componentHandle, string path, int x, int y, int? width = null, int? height = null, bool cache = true)
{
if (!File.Exists(path))
{
ConsoleLuaLibrary.Log("File not found: " + path + "\nScript Terminated");
return;
}
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawImage(path, x, y, width, height, cache);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"clearImageCache",
"clears the image cache that is built up by using gui.drawImage, also releases the file handle for cached images")]
public void ClearImageCache(int componentHandle)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).ClearImageCache();
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawImageRegion",
"draws a given region of an image file from the given path at the given coordinate, and optionally with the given size")]
public void DrawImageRegion(int componentHandle, string path, int source_x, int source_y, int source_width, int source_height, int dest_x, int dest_y, int? dest_width = null, int? dest_height = null)
{
if (!File.Exists(path))
{
ConsoleLuaLibrary.Log("File not found: " + path + "\nScript Terminated");
return;
}
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawImageRegion(path, source_x, source_y, source_width, source_height, dest_x, dest_y, dest_width, dest_height);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawLine",
"Draws a line from the first coordinate pair to the 2nd. Color is optional (if not specified it will be drawn black)")]
public void DrawLine(int componentHandle, int x1, int y1, int x2, int y2, Color? color = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawLine(x1, y1, x2, y2, color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawAxis",
"Draws an axis of the specified size at the coordinate pair.)")]
public void DrawAxis(int componentHandle, int x, int y, int size, Color? color = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawAxis(x, y, size, color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawArc",
"draws a Arc shape at the given coordinates and the given width and height"
)]
public void DrawArc(int componentHandle, int x, int y, int width, int height, int startangle, int sweepangle, Color? line = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawArc(x, y, width, height, startangle, sweepangle, line);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawPie",
"draws a Pie shape at the given coordinates and the given width and height")]
public void DrawPie(
int componentHandle,
int x,
int y,
int width,
int height,
int startangle,
int sweepangle,
Color? line = null,
Color? background = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawPie(x, y, width, height, startangle, sweepangle, line, background);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawPixel",
"Draws a single pixel at the given coordinates in the given color. Color is optional (if not specified it will be drawn black)")]
public void DrawPixel(int componentHandle, int x, int y, Color? color = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawPixel(x, y, color);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawPolygon",
"Draws a polygon using the table of coordinates specified in points. This should be a table of tables(each of size 2). Line is the color of the polygon. Background is the optional fill color")]
public void DrawPolygon(int componentHandle, LuaTable points, Color? line = null, Color? background = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawPolygon(points, line, background);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawRectangle",
"Draws a rectangle at the given coordinate and the given width and height. Line is the color of the box. Background is the optional fill color")]
public void DrawRectangle(int componentHandle, int x, int y, int width, int height, Color? line = null, Color? background = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawRectangle(x, y, width, height, line, background);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawString",
"Alias of DrawText()")]
public void DrawString(
int componentHandle,
int x,
int y,
string message,
Color? forecolor = null,
Color? backcolor = null,
int? fontsize = null,
string fontfamily = null,
string fontstyle = null,
string horizalign = null,
string vertalign = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawText(x, y, message, forecolor, backcolor, fontsize, fontfamily, fontstyle, horizalign, vertalign);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
[LuaMethod(
"drawText",
"Draws the given message at the given x,y coordinates and the given color. The default color is white. A fontfamily can be specified and is monospace generic if none is specified (font family options are the same as the .NET FontFamily class). The fontsize default is 12. The default font style is regular. Font style options are regular, bold, italic, strikethrough, underline. Horizontal alignment options are left (default), center, or right. Vertical alignment options are bottom (default), middle, or top. Alignment options specify which ends of the text will be drawn at the x and y coordinates.")]
public void DrawText(
int componentHandle,
int x,
int y,
string message,
Color? forecolor = null,
Color? backcolor = null,
int? fontsize = null,
string fontfamily = null,
string fontstyle = null,
string horizalign = null,
string vertalign = null)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
(control as LuaPictureBox).DrawText(x, y, message, forecolor, backcolor, fontsize, fontfamily, fontstyle, horizalign, vertalign);
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
}
// It'd be great if these were simplified into 1 function, but I cannot figure out how to return a LuaTable from this class
[LuaMethod(
"getMouseX",
"Returns an integer representation of the mouse X coordinate relative to the PictureBox.")]
public int GetMouseX(int componentHandle)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return 0;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
var position = (control as LuaPictureBox).GetMouse();
return position.X;
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
return 0;
}
[LuaMethod(
"getMouseY",
"Returns an integer representation of the mouse Y coordinate relative to the PictureBox.")]
public int GetMouseY(int componentHandle)
{
try
{
var ptr = new IntPtr(componentHandle);
foreach (var form in _luaForms)
{
if (form.Handle == ptr)
{
ConsoleLuaLibrary.Log("Drawing functions cannot be used on forms directly. Use them on a PictureBox component.");
return 0;
}
foreach (Control control in form.Controls)
{
if (control is LuaPictureBox)
{
var position = (control as LuaPictureBox).GetMouse();
return position.Y;
}
}
}
}
catch (Exception ex)
{
ConsoleLuaLibrary.Log(ex.Message);
}
return 0;
}
#endregion
[LuaMethod("setdropdownitems", "Sets the items for a given dropdown box")]
public void SetDropdownItems(int handle, LuaTable items)
{
@ -492,7 +1295,7 @@ namespace BizHawk.Client.EmuHawk
throw new Exception("Invalid #aarrggbb color");
}
value = Color.FromArgb(int.Parse(sval.Substring(1),System.Globalization.NumberStyles.HexNumber));
value = Color.FromArgb(int.Parse(sval.Substring(1), System.Globalization.NumberStyles.HexNumber));
}
form.GetType()
@ -525,7 +1328,7 @@ namespace BizHawk.Client.EmuHawk
return Color.FromArgb(a, r, g, b);
}
[LuaMethod("setsize", "Sets the size of the form or control to the given width or height")]
[LuaMethod("setsize", "TODO")]
public void SetSize(int handle, int width, int height)
{
var ptr = new IntPtr(handle);
@ -571,7 +1374,8 @@ namespace BizHawk.Client.EmuHawk
}
}
[LuaMethod("textbox", "Creates a textbox control on the given form. The caption property will be the initial value of the textbox (default is empty). Width and Height are option, if not specified they will be a default size of 100, 20. Type is an optional property to restrict the textbox input. The available options are HEX, SIGNED, and UNSIGNED. Passing it null or any other value will set it to no restriction. x, and y are the optional location parameters for the position of the textbox within the given form. The function returns the handle of the created textbox. If true, the multiline will enable the standard winform multi-line property. If true, the fixedWidth options will create a fixed width font. Scrollbars is an optional property to specify which scrollbars to display. The available options are Vertical, Horizontal, Both, and None. Scrollbars are only shown on a multiline textbox")]
[LuaMethod(
"textbox", "Creates a textbox control on the given form. The caption property will be the initial value of the textbox (default is empty). Width and Height are option, if not specified they will be a default size of 100, 20. Type is an optional property to restrict the textbox input. The available options are HEX, SIGNED, and UNSIGNED. Passing it null or any other value will set it to no restriction. x, and y are the optional location parameters for the position of the textbox within the given form. The function returns the handle of the created textbox. If true, the multiline will enable the standard winform multi-line property. If true, the fixedWidth options will create a fixed width font. Scrollbars is an optional property to specify which scrollbars to display. The available options are Vertical, Horizontal, Both, and None. Scrollbars are only shown on a multiline textbox")]
public int Textbox(
int formHandle,
string caption = null,

6
BizHawk.Client.EmuHawk/tools/Lua/Libraries/EmuLuaLibrary.Gui.cs
View File

@ -677,10 +677,10 @@ namespace BizHawk.Client.EmuHawk
GlobalWin.OSD.AddGUIText(message, x, y, Color.Black, forecolor ?? Color.White, a);
}
[LuaMethod("createcanvas", "Creates a canvas of the given size.")]
public LuaTable Text(int width, int height)
[LuaMethod("createcanvas", "Creates a canvas of the given size and, if specified, the given coordinates.")]
public LuaTable Text(int width, int height, int? x = null, int? y = null)
{
var canvas = new LuaCanvas(width, height);
var canvas = new LuaCanvas(width, height, x, y);
canvas.Show();
return LuaHelper.ToLuaTable(Lua, canvas);
}

60
BizHawk.Client.EmuHawk/tools/Lua/LuaCanvas.Designer.cs generated
View File

@ -28,39 +28,41 @@
/// </summary>
private void InitializeComponent()
{
this.pictureBox = new System.Windows.Forms.PictureBox();
((System.ComponentModel.ISupportInitialize)(this.pictureBox)).BeginInit();
this.SuspendLayout();
//
// pictureBox
//
this.pictureBox.Location = new System.Drawing.Point(0, 0);
this.pictureBox.Margin = new System.Windows.Forms.Padding(0);
this.pictureBox.Name = "pictureBox";
this.pictureBox.Size = new System.Drawing.Size(282, 260);
this.pictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize;
this.pictureBox.TabIndex = 0;
this.pictureBox.TabStop = false;
//
// LuaCanvas
//
this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);
this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
this.AutoSize = true;
this.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink;
this.ClientSize = new System.Drawing.Size(284, 261);
this.Controls.Add(this.pictureBox);
this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle;
this.Name = "LuaCanvas";
this.Text = "LuaCanvas";
((System.ComponentModel.ISupportInitialize)(this.pictureBox)).EndInit();
this.ResumeLayout(false);
this.PerformLayout();
System.ComponentModel.ComponentResourceManager resources = new System.ComponentModel.ComponentResourceManager(typeof(LuaCanvas));
this.luaPictureBox = new BizHawk.Client.EmuHawk.LuaPictureBox();
((System.ComponentModel.ISupportInitialize)(this.luaPictureBox)).BeginInit();
this.SuspendLayout();
//
// luaPictureBox
//
this.luaPictureBox.Image = ((System.Drawing.Image)(resources.GetObject("luaPictureBox.Image")));
this.luaPictureBox.Location = new System.Drawing.Point(0, 0);
this.luaPictureBox.Margin = new System.Windows.Forms.Padding(0);
this.luaPictureBox.Name = "luaPictureBox";
this.luaPictureBox.Size = new System.Drawing.Size(100, 50);
this.luaPictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize;
this.luaPictureBox.TabIndex = 0;
this.luaPictureBox.TabStop = false;
//
// LuaCanvas
//
this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);
this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
this.AutoSize = true;
this.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink;
this.ClientSize = new System.Drawing.Size(284, 261);
this.Controls.Add(this.luaPictureBox);
this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle;
this.Name = "LuaCanvas";
this.Text = "LuaCanvas";
((System.ComponentModel.ISupportInitialize)(this.luaPictureBox)).EndInit();
this.ResumeLayout(false);
this.PerformLayout();
}
#endregion
private System.Windows.Forms.PictureBox pictureBox;
private LuaPictureBox luaPictureBox;
}
}

419
BizHawk.Client.EmuHawk/tools/Lua/LuaCanvas.cs
View File

@ -13,277 +13,212 @@ namespace BizHawk.Client.EmuHawk
[Description("Represents a canvas object returned by the gui.createcanvas() method")]
public partial class LuaCanvas : Form
{
private Color _defaultForeground = Color.White;
private Color? _defaultBackground;
//public List<LuaEvent> ControlEvents { get; } = new List<LuaEvent>();
#region Helpers
private readonly Dictionary<string, Image> _imageCache = new Dictionary<string, Image>();
private readonly Dictionary<Color, SolidBrush> _solidBrushes = new Dictionary<Color, SolidBrush>();
private readonly Dictionary<Color, Pen> _pens = new Dictionary<Color, Pen>();
private SolidBrush GetBrush(Color color)
{
SolidBrush b;
if (!_solidBrushes.TryGetValue(color, out b))
{
b = new SolidBrush(color);
_solidBrushes[color] = b;
}
return b;
}
private Pen GetPen(Color color)
{
Pen p;
if (!_pens.TryGetValue(color, out p))
{
p = new Pen(color);
_pens[color] = p;
}
return p;
}
#endregion
private readonly Graphics _graphics;
public LuaCanvas(int width, int height)
public LuaCanvas(int width, int height, int? x = null, int? y = null)
{
InitializeComponent();
pictureBox.Width = width;
pictureBox.Height = height;
pictureBox.Image = new Bitmap(width, height);
_graphics = Graphics.FromImage(pictureBox.Image);
luaPictureBox.Width = width;
luaPictureBox.Height = height;
luaPictureBox.Image = new Bitmap(width, height);
if (x.HasValue)
{
StartPosition = System.Windows.Forms.FormStartPosition.Manual;
Left = (int)x;
if (y.HasValue)
{
Top = (int)y;
}
}
}
[LuaMethod("SetTitle", "Sets the canvas window title")]
[LuaMethod(
"setTitle",
"Sets the canvas window title")]
public void SetTitle(string title)
{
Text = title;
}
[LuaMethod("Clear", "Clears the canvas")]
[LuaMethod(
"setLocation",
"Sets the location of the canvas window")]
public void SetLocation(int x, int y)
{
StartPosition = System.Windows.Forms.FormStartPosition.Manual;
Left = (int)x;
Top = (int)y;
}
[LuaMethod(
"clear",
"Clears the canvas")]
public void Clear(Color color)
{
_graphics.Clear(color);
luaPictureBox.Clear(color);
}
[LuaMethod("Refresh", "Redraws the canvas")]
[LuaMethod(
"refresh",
"Redraws the canvas")]
public new void Refresh()
{
pictureBox.Refresh();
luaPictureBox.Refresh();
}
[LuaMethod("defaultForeground", "Sets the default foreground color to use in drawing methods, white by default")]
[LuaMethod(
"setDefaultForegroundColor",
"Sets the default foreground color to use in drawing methods, white by default")]
public void SetDefaultForegroundColor(Color color)
{
_defaultForeground = color;
luaPictureBox.SetDefaultForegroundColor(color);
}
[LuaMethod("defaultBackground", "Sets the default background color to use in drawing methods, transparent by default")]
[LuaMethod(
"setDefaultBackgroundColor",
"Sets the default background color to use in drawing methods, transparent by default")]
public void SetDefaultBackgroundColor(Color color)
{
_defaultBackground = color;
luaPictureBox.SetDefaultBackgroundColor(color);
}
[LuaMethod("drawBezier", "Draws a Bezier curve using the table of coordinates provided in the given color")]
[LuaMethod(
"setDefaultTextBackground",
"Sets the default backgroiund color to use in text drawing methods, half-transparent black by default")]
public void SetDefaultTextBackground(Color color)
{
luaPictureBox.SetDefaultTextBackground(color);
}
[LuaMethod(
"drawBezier",
"Draws a Bezier curve using the table of coordinates provided in the given color")]
public void DrawBezier(LuaTable points, Color color)
{
try
{
var pointsArr = new Point[4];
var i = 0;
foreach (LuaTable point in points.Values)
{
pointsArr[i] = new Point((int)(double)(point[1]), (int)(double)(point[2]));
i++;
if (i >= 4)
{
break;
}
}
_graphics.DrawBezier(GetPen(color), pointsArr[0], pointsArr[1], pointsArr[2], pointsArr[3]);
luaPictureBox.DrawBezier(points, color);
}
catch (Exception)
catch (Exception ex)
{
// need to stop the script from here
ConsoleLuaLibrary.Log(ex.Message);
return;
}
}
[LuaMethod("drawBox", "Draws a rectangle on screen from x1/y1 to x2/y2. Same as drawRectangle except it receives two points intead of a point and width/height")]
[LuaMethod(
"drawBox",
"Draws a rectangle on screen from x1/y1 to x2/y2. Same as drawRectangle except it receives two points intead of a point and width/height")]
public void DrawBox(int x, int y, int x2, int y2, Color? line = null, Color? background = null)
{
try
{
if (x < x2)
{
x2 = Math.Abs(x - x2);
}
else
{
x2 = x - x2;
x -= x2;
}
if (y < y2)
{
y2 = Math.Abs(y - y2);
}
else
{
y2 = y - y2;
y -= y2;
}
_graphics.DrawRectangle(GetPen(line ?? _defaultForeground), x, y, x2, y2);
var bg = background ?? _defaultBackground;
if (bg.HasValue)
{
_graphics.FillRectangle(GetBrush(bg.Value), x + 1, y + 1, x2 - 1, y2 - 1);
}
luaPictureBox.DrawBox(x, y, x2, y2, line, background);
}
catch (Exception)
catch (Exception ex)
{
// need to stop the script from here
ConsoleLuaLibrary.Log(ex.Message);
return;
}
}
[LuaMethod("drawEllipse", "Draws an ellipse at the given coordinates and the given width and height. Line is the color of the ellipse. Background is the optional fill color")]
[LuaMethod(
"drawEllipse",
"Draws an ellipse at the given coordinates and the given width and height. Line is the color of the ellipse. Background is the optional fill color")]
public void DrawEllipse(int x, int y, int width, int height, Color? line = null, Color? background = null)
{
try
{
var bg = background ?? _defaultBackground;
if (bg.HasValue)
{
var brush = GetBrush(bg.Value);
_graphics.FillEllipse(brush, x, y, width, height);
}
_graphics.DrawEllipse(GetPen(line ?? _defaultForeground), x, y, width, height);
luaPictureBox.DrawEllipse(x, y, width, height, line, background);
}
catch (Exception)
catch (Exception ex)
{
// need to stop the script from here
ConsoleLuaLibrary.Log(ex.Message);
return;
}
}
[LuaMethod("drawIcon", "draws an Icon (.ico) file from the given path at the given coordinate. width and height are optional. If specified, it will resize the image accordingly")]
[LuaMethod(
"drawIcon",
"draws an Icon (.ico) file from the given path at the given coordinate. width and height are optional. If specified, it will resize the image accordingly")]
public void DrawIcon(string path, int x, int y, int? width = null, int? height = null)
{
try
{
Icon icon;
if (width.HasValue && height.HasValue)
{
icon = new Icon(path, width.Value, height.Value);
}
else
{
icon = new Icon(path);
}
_graphics.DrawIcon(icon, x, y);
luaPictureBox.DrawIcon(path, x, y, width, height);
}
catch (Exception)
catch (Exception ex)
{
// need to stop the script from here
ConsoleLuaLibrary.Log(ex.Message);
return;
}
}
[LuaMethod("drawImage", "draws an image file from the given path at the given coordinate. width and height are optional. If specified, it will resize the image accordingly")]
[LuaMethod(
"drawImage",
"draws an image file from the given path at the given coordinate. width and height are optional. If specified, it will resize the image accordingly")]
public void DrawImage(string path, int x, int y, int? width = null, int? height = null, bool cache = true)
{
if (!File.Exists(path))
{
//Log("File not found: " + path);
ConsoleLuaLibrary.Log("File not found: " + path + "\nScript Terminated");
return;
}
Image img;
if (_imageCache.ContainsKey(path))
{
img = _imageCache[path];
}
else
{
img = Image.FromFile(path);
if (cache)
{
_imageCache.Add(path, img);
}
}
_graphics.DrawImage(img, x, y, width ?? img.Width, height ?? img.Height);
luaPictureBox.DrawImage(path, x, y, width, height, cache);
}
[LuaMethod("clearImageCache", "clears the image cache that is built up by using gui.drawImage, also releases the file handle for cached images")]
[LuaMethod(
"clearImageCache",
"clears the image cache that is built up by using gui.drawImage, also releases the file handle for cached images")]
public void ClearImageCache()
{
foreach (var image in _imageCache)
{
image.Value.Dispose();
}
_imageCache.Clear();
luaPictureBox.ClearImageCache();
}
[LuaMethod("drawImageRegion", "draws a given region of an image file from the given path at the given coordinate, and optionally with the given size")]
[LuaMethod(
"drawImageRegion",
"draws a given region of an image file from the given path at the given coordinate, and optionally with the given size")]
public void DrawImageRegion(string path, int source_x, int source_y, int source_width, int source_height, int dest_x, int dest_y, int? dest_width = null, int? dest_height = null)
{
if (!File.Exists(path))
{
//Log("File not found: " + path);
ConsoleLuaLibrary.Log("File not found: " + path + "\nScript Terminated");
return;
}
Image img;
if (_imageCache.ContainsKey(path))
{
img = _imageCache[path];
}
else
{
img = Image.FromFile(path);
_imageCache.Add(path, img);
}
var destRect = new Rectangle(dest_x, dest_y, dest_width ?? source_width, dest_height ?? source_height);
_graphics.DrawImage(img, destRect, source_x, source_y, source_width, source_height, GraphicsUnit.Pixel);
luaPictureBox.DrawImageRegion(path, source_x, source_y, source_width, source_height, dest_x, dest_y, dest_width, dest_height);
}
[LuaMethod("drawLine", "Draws a line from the first coordinate pair to the 2nd. Color is optional (if not specified it will be drawn black)")]
[LuaMethod(
"drawLine",
"Draws a line from the first coordinate pair to the 2nd. Color is optional (if not specified it will be drawn black)")]
public void DrawLine(int x1, int y1, int x2, int y2, Color? color = null)
{
_graphics.DrawLine(GetPen(color ?? _defaultForeground), x1, y1, x2, y2);
luaPictureBox.DrawLine(x1, y1, x2, y2, color);
}
[LuaMethod("drawAxis", "Draws an axis of the specified size at the coordinate pair.)")]
[LuaMethod(
"drawAxis",
"Draws an axis of the specified size at the coordinate pair.)")]
public void DrawAxis(int x, int y, int size, Color? color = null)
{
DrawLine(x + size, y, x - size, y, color);
DrawLine(x, y + size, x, y - size, color);
luaPictureBox.DrawAxis(x, y, size, color);
}
[LuaMethod("drawArc", "draws a Arc shape at the given coordinates and the given width and height")]
[LuaMethod(
"drawArc",
"draws a Arc shape at the given coordinates and the given width and height"
)]
public void DrawArc(int x, int y, int width, int height, int startangle, int sweepangle, Color? line = null)
{
var pen = new Pen(line.HasValue ? line.Value : Color.Black);
_graphics.DrawArc(pen, x, y, width, height, startangle, sweepangle);
luaPictureBox.DrawArc(x, y, width, height, startangle, sweepangle, line);
}
[LuaMethod("drawPie", "draws a Pie shape at the given coordinates and the given width and height")]
[LuaMethod(
"drawPie",
"draws a Pie shape at the given coordinates and the given width and height")]
public void DrawPie(
int x,
int y,
@ -294,106 +229,104 @@ namespace BizHawk.Client.EmuHawk
Color? line = null,
Color? background = null)
{
var bg = background ?? _defaultBackground;
if (bg.HasValue)
{
var brush = GetBrush(bg.Value);
_graphics.FillPie(brush, x, y, width, height, startangle, sweepangle);
}
_graphics.DrawPie(GetPen(line ?? _defaultForeground), x + 1, y + 1, width - 1, height - 1, startangle, sweepangle);
luaPictureBox.DrawPie(x, y, width, height, startangle, sweepangle, line, background);
}
[LuaMethod("drawPixel", "Draws a single pixel at the given coordinates in the given color. Color is optional (if not specified it will be drawn black)")]
[LuaMethod(
"drawPixel",
"Draws a single pixel at the given coordinates in the given color. Color is optional (if not specified it will be drawn black)")]
public void DrawPixel(int x, int y, Color? color = null)
{
try
{
_graphics.DrawLine(GetPen(color ?? _defaultForeground), x, y, x + 0.1F, y);
luaPictureBox.DrawPixel(x, y, color);
}
catch (Exception)
catch (Exception ex)
{
// need to stop the script from here
ConsoleLuaLibrary.Log(ex.Message);
return;
}
}
[LuaMethod("drawPolygon", "Draws a polygon using the table of coordinates specified in points. This should be a table of tables(each of size 2). Line is the color of the polygon. Background is the optional fill color")]
[LuaMethod(
"drawPolygon",
"Draws a polygon using the table of coordinates specified in points. This should be a table of tables(each of size 2). Line is the color of the polygon. Background is the optional fill color")]
public void DrawPolygon(LuaTable points, Color? line = null, Color? background = null)
{
try
{
var pointsArr = new Point[points.Values.Count];
var i = 0;
foreach (LuaTable point in points.Values)
{
pointsArr[i] = new Point((int)(double)(point[1]), (int)(double)(point[2]));
i++;
}
_graphics.DrawPolygon(GetPen(line ?? _defaultForeground), pointsArr);
var bg = background ?? _defaultBackground;
if (bg.HasValue)
{
_graphics.FillPolygon(GetBrush(bg.Value), pointsArr);
}
luaPictureBox.DrawPolygon(points, line, background);
}
catch (Exception)
catch (Exception ex)
{
// need to stop the script from here
ConsoleLuaLibrary.Log(ex.Message);
return;
}
}
[LuaMethod("drawRectangle", "Draws a rectangle at the given coordinate and the given width and height. Line is the color of the box. Background is the optional fill color")]
public void DrawRectangle(int x, int y, int width, int height, Color? outline = null, Color? fill = null)
[LuaMethod(
"drawRectangle",
"Draws a rectangle at the given coordinate and the given width and height. Line is the color of the box. Background is the optional fill color")]
public void DrawRectangle(int x, int y, int width, int height, Color? line = null, Color? background = null)
{
if (fill.HasValue)
{
var brush = new SolidBrush(fill.Value);
_graphics.FillRectangle(brush, x, y, width, height);
}
var pen = new Pen(outline.HasValue ? outline.Value : Color.Black);
_graphics.DrawRectangle(pen, x, y, width, height);
luaPictureBox.DrawRectangle(x, y, width, height, line, background);
}
[LuaMethod("drawText", "Draws the given message at the given x,y coordinates and the given color. The default color is white. A fontfamily can be specified and is monospace generic if none is specified (font family options are the same as the .NET FontFamily class). The fontsize default is 12. The default font style is regular. Font style options are regular, bold, italic, strikethrough, underline. Horizontal alignment options are left (default), center, or right. Vertical alignment options are bottom (default), middle, or top. Alignment options specify which ends of the text will be drawn at the x and y coordinates.")]
public void DrawText(int x, int y, string message, Color? color = null, int? fontsize = null, string fontfamily = null, string fontstyle = null)
[LuaMethod(
"drawString",
"Alias of DrawText()")]
public void DrawString(
int x,
int y,
string message,
Color? forecolor = null,
Color? backcolor = null,
int? fontsize = null,
string fontfamily = null,
string fontstyle = null,
string horizalign = null,
string vertalign = null)
{
var family = FontFamily.GenericMonospace;
if (fontfamily != null)
{
family = new FontFamily(fontfamily);
}
luaPictureBox.DrawText(x, y, message, forecolor, backcolor, fontsize, fontfamily, fontstyle, horizalign, vertalign);
}
var fstyle = FontStyle.Regular;
if (fontstyle != null)
{
switch (fontstyle.ToLower())
{
default:
case "regular":
break;
case "bold":
fstyle = FontStyle.Bold;
break;
case "italic":
fstyle = FontStyle.Italic;
break;
case "strikethrough":
fstyle = FontStyle.Strikeout;
break;
case "underline":
fstyle = FontStyle.Underline;
break;
}
}
[LuaMethod(
"drawText",
"Draws the given message at the given x,y coordinates and the given color. The default color is white. A fontfamily can be specified and is monospace generic if none is specified (font family options are the same as the .NET FontFamily class). The fontsize default is 12. The default font style is regular. Font style options are regular, bold, italic, strikethrough, underline. Horizontal alignment options are left (default), center, or right. Vertical alignment options are bottom (default), middle, or top. Alignment options specify which ends of the text will be drawn at the x and y coordinates.")]
public void DrawText(
int x,
int y,
string message,
Color? forecolor = null,
Color? backcolor = null,
int? fontsize = null,
string fontfamily = null,
string fontstyle = null,
string horizalign = null,
string vertalign = null)
{
luaPictureBox.DrawText(x, y, message, forecolor, backcolor, fontsize, fontfamily, fontstyle, horizalign, vertalign);
}
var font = new Font(family, fontsize ?? 12, fstyle, GraphicsUnit.Pixel);
_graphics.TextRenderingHint = System.Drawing.Text.TextRenderingHint.SingleBitPerPixelGridFit;
_graphics.DrawString(message, font, new SolidBrush(color ?? Color.White), x, y);
// It'd be great if these were simplified into 1 function, but I cannot figure out how to return a LuaTable from this class
[LuaMethod(
"getMouseX",
"Returns an integer representation of the mouse X coordinate relative to the canvas window.")]
public int GetMouseX()
{
var position = luaPictureBox.GetMouse();
return position.X;
}
[LuaMethod(
"getMouseY",
"Returns an integer representation of the mouse Y coordinate relative to the canvas window.")]
public int GetMouseY()
{
var position = luaPictureBox.GetMouse();
return position.Y;
}
}
}

8
BizHawk.Client.EmuHawk/tools/Lua/LuaCanvas.resx
View File

@ -117,4 +117,12 @@
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="luaPictureBox.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAGQAAAAyCAYAAACqNX6+AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsIAAA7CARUoSoAAAAArSURBVHhe7cEBDQAAAMKg909tDjcgAAAAAAAAAAAAAAAA
AAAAAAAAAC7VAE5SAAHx0pUgAAAAAElFTkSuQmCC
</value>
</data>
</root>

396
BizHawk.Client.EmuHawk/tools/Lua/LuaPictureBox.cs Normal file
View File

@ -0,0 +1,396 @@
using System;
using System.Drawing;
using System.Windows.Forms;
using NLua;
using System.Collections.Generic;
namespace BizHawk.Client.EmuHawk
{
public class LuaPictureBox : PictureBox
{
#region Helpers
private readonly Dictionary<string, Image> _imageCache = new Dictionary<string, Image>();
private readonly Dictionary<Color, SolidBrush> _solidBrushes = new Dictionary<Color, SolidBrush>();
private readonly Dictionary<Color, Pen> _pens = new Dictionary<Color, Pen>();
private SolidBrush GetBrush(Color color)
{
SolidBrush b;
if (!_solidBrushes.TryGetValue(color, out b))
{
b = new SolidBrush(color);
_solidBrushes[color] = b;
}
return b;
}
private Pen GetPen(Color color)
{
Pen p;
if (!_pens.TryGetValue(color, out p))
{
p = new Pen(color);
_pens[color] = p;
}
return p;
}
#endregion
private Color _defaultForeground = Color.Black;
private Color? _defaultBackground;
private Color? _defaultTextBackground = Color.FromArgb(128, 0, 0, 0);
public LuaPictureBox()
{
Image = new Bitmap(Width, Height);
}
public void LuaResize(int width, int height)
{
Width = width;
Height = height;
Image = new Bitmap(width, height);
}
public void Clear(Color color)
{
var boxBackground = Graphics.FromImage(Image);
boxBackground.Clear(color);
}
public void SetDefaultForegroundColor(Color color)
{
_defaultForeground = color;
}
public void SetDefaultBackgroundColor(Color color)
{
_defaultBackground = color;
}
public void SetDefaultTextBackground(Color color)
{
_defaultTextBackground = color;
}
public void DrawBezier(LuaTable points, Color color)
{
var pointsArr = new Point[4];
var i = 0;
foreach (LuaTable point in points.Values)
{
pointsArr[i] = new Point((int)(double)(point[1]), (int)(double)(point[2]));
i++;
if (i >= 4)
{
break;
}
}
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawBezier(GetPen(color), pointsArr[0], pointsArr[1], pointsArr[2], pointsArr[3]);
}
public void DrawBox(int x, int y, int x2, int y2, Color? line = null, Color? background = null)
{
if (x < x2)
{
x2 = Math.Abs(x - x2);
}
else
{
x2 = x - x2;
x -= x2;
}
if (y < y2)
{
y2 = Math.Abs(y - y2);
}
else
{
y2 = y - y2;
y -= y2;
}
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawRectangle(GetPen(line ?? _defaultForeground), x, y, x2, y2);
var bg = background ?? _defaultBackground;
if (bg.HasValue)
{
boxBackground = Graphics.FromImage(Image);
boxBackground.FillRectangle(GetBrush(bg.Value), x + 1, y + 1, x2 - 1, y2 - 1);
}
}
public void DrawEllipse(int x, int y, int width, int height, Color? line = null, Color? background = null)
{
var bg = background ?? _defaultBackground;
var boxBackground = Graphics.FromImage(Image);
if (bg.HasValue)
{
var brush = GetBrush(bg.Value);
boxBackground.FillEllipse(brush, x, y, width, height);
boxBackground = Graphics.FromImage(Image);
}
boxBackground.DrawEllipse(GetPen(line ?? _defaultForeground), x, y, width, height);
}
public void DrawIcon(string path, int x, int y, int? width = null, int? height = null)
{
Icon icon;
if (width.HasValue && height.HasValue)
{
icon = new Icon(path, width.Value, height.Value);
}
else
{
icon = new Icon(path);
}
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawIcon(icon, x, y);
}
public void DrawImage(string path, int x, int y, int? width = null, int? height = null, bool cache = true)
{
Image img;
if (_imageCache.ContainsKey(path))
{
img = _imageCache[path];
}
else
{
img = Image.FromFile(path);
if (cache)
{
_imageCache.Add(path, img);
}
}
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawImage(img, x, y, width ?? img.Width, height ?? img.Height);
}
public void ClearImageCache()
{
foreach (var image in _imageCache)
{
image.Value.Dispose();
}
_imageCache.Clear();
}
public void DrawImageRegion(string path, int source_x, int source_y, int source_width, int source_height, int dest_x, int dest_y, int? dest_width = null, int? dest_height = null)
{
Image img;
if (_imageCache.ContainsKey(path))
{
img = _imageCache[path];
}
else
{
img = Image.FromFile(path);
_imageCache.Add(path, img);
}
var destRect = new Rectangle(dest_x, dest_y, dest_width ?? source_width, dest_height ?? source_height);
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawImage(img, destRect, source_x, source_y, source_width, source_height, GraphicsUnit.Pixel);
}
public void DrawLine(int x1, int y1, int x2, int y2, Color? color = null)
{
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawLine(GetPen(color ?? _defaultForeground), x1, y1, x2, y2);
}
public void DrawAxis(int x, int y, int size, Color? color = null)
{
DrawLine(x + size, y, x - size, y, color);
DrawLine(x, y + size, x, y - size, color);
}
public void DrawArc(int x, int y, int width, int height, int startangle, int sweepangle, Color? line = null)
{
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawArc(GetPen(line ?? _defaultForeground), x, y, width, height, startangle, sweepangle);
}
public void DrawPie(
int x,
int y,
int width,
int height,
int startangle,
int sweepangle,
Color? line = null,
Color? background = null)
{
var bg = background ?? _defaultBackground;
var boxBackground = Graphics.FromImage(Image);
if (bg.HasValue)
{
var brush = GetBrush(bg.Value);
boxBackground.FillPie(brush, x, y, width, height, startangle, sweepangle);
boxBackground = Graphics.FromImage(Image);
}
boxBackground.DrawPie(GetPen(line ?? _defaultForeground), x + 1, y + 1, width - 1, height - 1, startangle, sweepangle);
}
public void DrawPixel(int x, int y, Color? color = null)
{
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawLine(GetPen(color ?? _defaultForeground), x, y, x + 0.1F, y);
}
public void DrawPolygon(LuaTable points, Color? line = null, Color? background = null)
{
var pointsArr = new Point[points.Values.Count];
var i = 0;
foreach (LuaTable point in points.Values)
{
pointsArr[i] = new Point((int)(double)(point[1]), (int)(double)(point[2]));
i++;
}
var boxBackground = Graphics.FromImage(Image);
boxBackground.DrawPolygon(GetPen(line ?? _defaultForeground), pointsArr);
var bg = background ?? _defaultBackground;
if (bg.HasValue)
{
boxBackground = Graphics.FromImage(Image);
boxBackground.FillPolygon(GetBrush(bg.Value), pointsArr);
}
}
public void DrawRectangle(int x, int y, int width, int height, Color? line = null, Color? background = null)
{
var bg = background ?? _defaultBackground;
var boxBackground = Graphics.FromImage(Image);
if (bg.HasValue)
{
boxBackground.FillRectangle(GetBrush(bg.Value), x, y, width, height);
boxBackground = Graphics.FromImage(Image);
}
boxBackground.DrawRectangle(GetPen(line ?? _defaultForeground), x, y, width, height);
}
public void DrawText(
int x,
int y,
string message,
Color? forecolor = null,
Color? backcolor = null,
int? fontsize = null,
string fontfamily = null,
string fontstyle = null,
string horizalign = null,
string vertalign = null)
{
var family = FontFamily.GenericMonospace;
if (fontfamily != null)
{
family = new FontFamily(fontfamily);
}
var fstyle = FontStyle.Regular;
if (fontstyle != null)
{
switch (fontstyle.ToLower())
{
default:
case "regular":
break;
case "bold":
fstyle = FontStyle.Bold;
break;
case "italic":
fstyle = FontStyle.Italic;
break;
case "strikethrough":
fstyle = FontStyle.Strikeout;
break;
case "underline":
fstyle = FontStyle.Underline;
break;
}
}
var f = new StringFormat(StringFormat.GenericDefault);
var font = new Font(family, fontsize ?? 12, fstyle, GraphicsUnit.Pixel);
var boxBackground = Graphics.FromImage(Image);
Size sizeOfText = boxBackground.MeasureString(message, font, 0, f).ToSize();
if (horizalign != null)
{
switch (horizalign.ToLower())
{
default:
case "left":
break;
case "center":
x -= sizeOfText.Width / 2;
break;
case "right":
x -= sizeOfText.Width / 2;
break;
}
}
if (vertalign != null)
{
switch (vertalign.ToLower())
{
default:
case "bottom":
break;
case "middle":
y -= sizeOfText.Height / 2;
break;
case "top":
y -= sizeOfText.Height;
break;
}
}
Rectangle rect = new Rectangle(new Point(x, y), sizeOfText);
boxBackground = Graphics.FromImage(Image);
boxBackground.FillRectangle(GetBrush(backcolor ?? _defaultTextBackground.Value), rect);
boxBackground = Graphics.FromImage(Image);
boxBackground.TextRenderingHint = System.Drawing.Text.TextRenderingHint.SingleBitPerPixelGridFit;
boxBackground = Graphics.FromImage(Image);
boxBackground.DrawString(message, font, new SolidBrush(forecolor ?? Color.Black), x, y);
}
public Point GetMouse()
{
var p = PointToClient(Control.MousePosition);
return p;
}
private void DoLuaClick(object sender, EventArgs e)
{
LuaWinform parent = Parent as LuaWinform;
parent?.DoLuaEvent(Handle);
}
protected override void OnClick(EventArgs e)
{
DoLuaClick(this, e);
base.OnClick(e);
}
}
}

2
BizHawk.sln
View File

@ -1,4 +1,4 @@

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 14
VisualStudioVersion = 14.0.25420.1