supleed2/ELEC60015-HLP-CW
1
0
Fork 0
mirror of https://github.com/supleed2/ELEC60015-HLP-CW.git synced 2024-12-22 21:45:49 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix with equi dist

Browse source
This commit is contained in:
Philip Puk 2022-03-26 14:23:12 +00:00
parent ba54c9da75
commit af29f8babb
1 changed files with 10 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
src/Renderer/DrawBlock/BusWire.fs
View file

@ -440,28 +440,26 @@ let initialWireVerticesFromPorts
],
true // Left-to-right
//fix issue by wrapping wire input port and not through for 1st quadrant
else if (abs(endX - startX) < 3.0*Wire.stickLength)
&& (endY - startY < 3.0 * Wire.stickLength) then
else if (((startX + endX) / 2.0)>(startX+Wire.stickLength)) then
[
{X = startX; Y = startY};
{X = startX + Wire.stickLength; Y = startY};
{X = endX + Wire.stickLength*4.5; Y = startY};
{X = endX + Wire.stickLength*4.5; Y = endY - Wire.stickLength};
{X = endX; Y = endY - Wire.stickLength};
{X = endX; Y = endY - Wire.stickLength};
{X = endX; Y = endY - Wire.stickLength};
{X = startX + Wire.stickLength; Y = startY};
{X = (startX + endX) / 2.0; Y = startY};
{X = (startX + endX) / 2.0; Y = endY-Wire.stickLength};
{X = endX; Y = endY-Wire.stickLength};
{X = endX; Y = endY-Wire.stickLength};
{X = endX; Y = endY}
],
false // not Left-to-right
], false
else
[
{X = startX; Y = startY};
{X = startX + Wire.stickLength; Y = startY};
{X = startX + Wire.stickLength; Y = startY};
{X = startX + Wire.stickLength; Y = startY};
{X = startX + Wire.stickLength; Y = endY - Wire.stickLength};
{X = endX; Y = endY - Wire.stickLength};
{X = endX; Y = endY - Wire.stickLength};
{X = endX; Y = endY - Wire.stickLength};
{X = endX; Y = endY}
],
false
@ -576,7 +574,7 @@ let convertVerticesToASegs connId (isLeftToRight: bool) routetype rotation (yref
| true ->
[Horizontal;Horizontal;Horizontal;Horizontal;Vertical;Vertical;Vertical]
| false ->
[Horizontal;Horizontal;Vertical;Horizontal;Vertical;Horizontal;Vertical]
[Horizontal;Vertical;Horizontal;Vertical;Horizontal;Vertical;Vertical]
let draggable index =
match routetype with