#Requires AutoHotkey v2.0
#SingleInstance Force

*ESC::ExitApp
*F12::Reload

MoveSpeed := 5
MoveSleep := 25

F1:: draw(F1)

draw(picaso)
{
	MouseGetPos &mx, &my
	loop picaso.Length
	{
		MouseMove mx + picaso[A_Index].start.x, my + picaso[A_Index].start.y, MoveSpeed
		Sleep MoveSleep
		SendEvent "{Click Down}"
		Sleep MoveSleep
		MouseMove mx + picaso[A_Index].end.x, my + picaso[A_Index].end.y, MoveSpeed
		Sleep MoveSleep
		SendEvent "{Click Up}"
		Sleep MoveSleep
	}
	MouseMove mx, my
}

class Line2D {
	__New(sx, sy, ex, ey) {
		this.start := Point(sx, sy)
		this.end := Point(ex, ey)
	}
}

class Point {
	__New(x, y) {
		this.x := x
		this.y := y
	}
}

F1:=[Line2D(0.5, 0, -9, 0),
     Line2D(-9, 0, -9, -14.5),
     Line2D(-9, -14.5, -21, -14.5),
     Line2D(-21, -14.5, -21, 23),
     Line2D(-21, 23, 7.5, 23),
     Line2D(7.5, 23, 7.5, 8),
     Line2D(7.5, 8, 1, 0),
     Line2D(-9, 10, -4.5, 10),
     Line2D(-4.5, 10, -4.5, 12),
     Line2D(-4.5, 12, -9, 12),
     Line2D(-9, 12, -9, 10),
     Line2D(-23.5, -3.5, -23.5, -14.5),
     Line2D(-23.5, -14.5, -47, -14.5),
     Line2D(-47, -14.5, -47, 17),
     Line2D(-47, 17, -43.5, 23),
     Line2D(-43.5, 23, -23.5, 23),
     Line2D(-23.5, 23, -23.5, 12.5),
     Line2D(-23.5, 12.5, -35, 12.5),
     Line2D(-35, 12.5, -35, -3.5),
     Line2D(-35, -3.5, -23.5, -3.5),
     Line2D(10, -14.5, 10, 23.5),
     Line2D(10, 23.5, 24.5, 23.5),
     Line2D(24.5, 23.5, 24.5, -14.5),
     Line2D(24.5, -14.5, 10.5, -14.5),
     Line2D(28, -14, 28, 23.5),
     Line2D(28, 23.5, 40.5, 23.5),
     Line2D(40.5, 23.5, 40.5, 9.5),
     Line2D(40.5, 9.5, 51, 9.5),
     Line2D(51, 9.5, 57.5, 3),
     Line2D(57.5, 3, 57.5, -14.5),
     Line2D(57.5, -14.5, 28, -14.5),
     Line2D(41, -3, 41, -0.5),
     Line2D(41, -0.5, 46, -0.5),
     Line2D(46, -0.5, 46, -4),
     Line2D(46, -4, 40.5, -4)
]