This fork aims to:
- Completely rewrite the original as well as make syntax changes,
- Update the original to the current Sequence Diagram APIs, and
- Extend the domain to other diagrams, such as Flowcharts, Class Diagrams, and more.
(sequence-diagram
(loop "until dead"
(solid-arrow :alice :bob "hihi")
(solid-arrow :bob :alice "hoho")
(optional "hoho"
(solid-arrow :alice :bob "hihi")
(alternative
["x = 1" [(solid-arrow :alice :bob "hihi")]]
["x = 2" [(solid-arrow :bob :john "hihi")]]
["x = 3" [(solid-arrow :john :alice "hihi")]])))
(parallel
["alice to bob" [(solid-arrow :alice :bob "hihi")]]
["bob to alice" [(solid-arrow :bob :alice "hihi")]]))The above DSL program translates to:
sequenceDiagram
loop until dead
alice->>bob: hihi
bob->>alice: hoho
opt hoho
alice->>bob: hihi
alt x = 1
alice->>bob: hihi
else x = 2
bob->>john: hihi
else x = 3
john->>alice: hihi
end
end
end
par alice to bob
alice->>bob: hihi
and bob to alice
bob->>alice: hihi
end
(let [A (node "Start")
B (rhombus "Is it?")
C (node "OK")
D (node "Rethink")
E (node "End")]
(flow-chart :TD
(arrow A B)
(arrow B C :message "Yes")
(arrow C D)
(arrow D B)
(arrow B E :message "No")))The above DSL program translates to:
flowchart TD
id83[Start] -->| | id84{Is it?}
id84{Is it?} -->|Yes| id85[OK]
id85[OK] -->| | id86[Rethink]
id86[Rethink] -->| | id84{Is it?}
id84{Is it?} -->|No| id87[End]