Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
vecs
FIJI Public
Commits
05463b14
Commit
05463b14
authored
Jul 07, 2017
by
Stefan Tauner
Browse files
FIJISettingsCanvas: add more vertical space to host <-> FIC connections
parent
6772d460
Changes
1
Hide whitespace changes
Inline
Side-by-side
bin/Tk/FIJISettingsCanvas.pm
View file @
05463b14
...
...
@@ -159,16 +159,16 @@ sub _draw() {
},
host_interface
=>
{
tx_line
=>
$self
->
createLine
(
DIAG_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
6
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
6
,
-
arrow
=>
"
first
"
tx_line
=>
$self
->
createLine
(
DIAG_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
7
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
7
,
-
arrow
=>
"
first
"
),
rx_line
=>
$self
->
createLine
(
DIAG_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
8
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
8
,
-
arrow
=>
"
last
"
rx_line
=>
$self
->
createLine
(
DIAG_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
95
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
95
,
-
arrow
=>
"
last
"
),
tx_text
=>
$self
->
createText
(
DIAG_BASE_X
*
1.05
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
6
,
-
text
=>
"
TX
",
-
anchor
=>
"
sw
"),
rx_text
=>
$self
->
createText
(
DIAG_BASE_X
*
1.05
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
8
,
-
text
=>
"
RX
",
-
anchor
=>
"
sw
"),
tx_text
=>
$self
->
createText
(
DIAG_BASE_X
*
1.05
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
7
,
-
text
=>
"
TX
",
-
anchor
=>
"
sw
"),
rx_text
=>
$self
->
createText
(
DIAG_BASE_X
*
1.05
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.
95
,
-
text
=>
"
RX
",
-
anchor
=>
"
sw
"),
},
FIU
=>
{
...
...
@@ -401,20 +401,20 @@ sub _draw() {
),
},
external_trigger
=>
{
line
=>
$self
->
createLine
(
DIAG_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
,
FIC_BASE_X
-
5
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
,
-
arrow
=>
"
last
"
line
=>
$self
->
createLine
(
DIAG_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
,
FIC_BASE_X
-
5
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
,
-
arrow
=>
"
last
"
),
final_line
=>
$self
->
createLine
(
FIC_BASE_X
-
5
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
,
-
arrow
=>
"
last
"
FIC_BASE_X
-
5
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
,
-
arrow
=>
"
last
"
),
text
=>
$self
->
createText
(
DIAG_BASE_X
*
1.05
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
,
-
text
=>
"
External trigger
",
-
anchor
=>
"
sw
"),
text
=>
$self
->
createText
(
DIAG_BASE_X
*
1.05
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
,
-
text
=>
"
External trigger
",
-
anchor
=>
"
sw
"),
inverter_symbol
=>
$self
->
createOval
(
FIC_BASE_X
-
5
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
-
2.5
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
+
2.5
,
-
fill
=>
"
white
"
FIC_BASE_X
-
5
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
-
2.5
,
FIC_BASE_X
,
FIC_BASE_Y
+
FIC_HEIGHT
*
0.4
5
+
2.5
,
-
fill
=>
"
white
"
),
}
};
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment