Add ability to auto-number relationships for complex diagrams

pull/116/head
Daniel Simpson 5 years ago
parent e1ed5478f7
commit 4e88f3927e

@ -85,11 +85,33 @@ left to right direction
' Relationship ' Relationship
' ################################## ' ##################################
!$relationshipIndex = 0
!$autoNumberRelationships = 0
!procedure AUTONUMBER_RELATIONSHIPS()
!$autoNumberRelationships = 1
!endprocedure
!procedure INCREMENT_RELATIONSHIP_INDEX()
!$relationshipIndex = $relationshipIndex + 1
!endprocedure
!unquoted procedure Rel_($alias1, $alias2, $label, $direction="") !unquoted procedure Rel_($alias1, $alias2, $label, $direction="")
$alias1 $direction $alias2 : **$label** !if ($autoNumberRelationships)
INCREMENT_RELATIONSHIP_INDEX()
$alias1 $direction $alias2 : **$relationshipIndex. $label**
!else
$alias1 $direction $alias2 : **$label**
!endif
!endprocedure !endprocedure
!unquoted procedure Rel_($alias1, $alias2, $label, $techn, $direction="") !unquoted procedure Rel_($alias1, $alias2, $label, $techn, $direction="")
$alias1 $direction $alias2 : **$label**\n//<size:$TECHN_FONT_SIZE>[$techn]</size>// !if ($autoNumberRelationships)
INCREMENT_RELATIONSHIP_INDEX()
$alias1 $direction $alias2 : **$relationshipIndex. $label**\n//<size:$TECHN_FONT_SIZE>[$techn]</size>//
!else
$alias1 $direction $alias2 : **$label**\n//<size:$TECHN_FONT_SIZE>[$techn]</size>//
!endif
!endprocedure !endprocedure
!unquoted procedure Rel($from, $to, $label) !unquoted procedure Rel($from, $to, $label)

Loading…
Cancel
Save