41 lines
914 B
Plaintext
41 lines
914 B
Plaintext
|
//
|
||
|
|
// MiniFocusTest.ls
|
||
|
|
//
|
||
|
|
// Draw a scale of -10..0..+10 focus lines.
|
||
|
|
//
|
||
|
|
// (c) 2016, juergen@fabmail.org
|
||
|
|
// Distribute under GPL-2.0 or ask.
|
||
|
|
//
|
||
|
|
|
||
|
|
scale=2.0
|
||
|
|
x_off=2.0
|
||
|
|
y_off=2.0
|
||
|
|
|
||
|
|
function move_s(x, y) { move(x*scale+x_off, y*scale+y_off); }
|
||
|
|
function line_s(x, y) { line(x*scale+x_off, y*scale+y_off); }
|
||
|
|
|
||
|
|
function set_mark()
|
||
|
|
{
|
||
|
|
set("power", 5);
|
||
|
|
set("speed", 100); // marking text
|
||
|
|
}
|
||
|
|
|
||
|
|
// hor. focus_test (left hand side)
|
||
|
|
for (var f = -10; f < 11; f++)
|
||
|
|
{
|
||
|
|
set("focus", f);
|
||
|
|
var h = 0; if (f % 5) h += 3;
|
||
|
|
move_s(10+f,h); line_s(10+f,7);
|
||
|
|
}
|
||
|
|
set("focus", 0);
|
||
|
|
move_s(2.5-1, 1.5); line_s(2.5+1, 1.5); // -
|
||
|
|
move_s(2.5+1.5, 1.5); line_s(2.5,0); line_s(2.5-1.5, 1.5);
|
||
|
|
|
||
|
|
for (var i = 1; i < 6; i++)
|
||
|
|
{
|
||
|
|
move_s(10-i, 0); line_s(10, 3); line_s(10+i, 0); // <<<<
|
||
|
|
}
|
||
|
|
move_s(17.5-1, 1.5); line_s(17.5+1, 1.5); move_s(17.5,0.5); line_s(17.5,2.5); // +
|
||
|
|
move_s(17.5+1.5, 1.5); line_s(17.5+0, 3); line_s(17.5-1.5, 1.5);
|
||
|
|
|