🚀 go-pugleaf

We have converted most of our documents from troff to FrameMaker,
but I am unable to convert this Tower of Hanoi program written
in troff.  Could anyone supply the equivalent for FrameMaker or
Interleaf?  Thanks in advance.

================
.de T
.nr d \\$1-1
.if \\nd .T \\nd \\$2 \\$4 \\$3
 Transfer ring \\$1 from tower \\$2 to tower \\$3.
.nr d \\$1-1
.if \\nd .T \\nd \\$4 \\$3 \\$2
..
Initial state:  \nR rings all on tower A; #1 on top.
.T \nR A B C
 Done!
================
$ troff -rR4
Initial state: 4 rings all on tower A; #1 on top.
 Transfer ring 1 from tower A to tower C.
 Transfer ring 2 from tower A to tower B.
 Transfer ring 1 from tower C to tower B.
 Transfer ring 3 from tower A to tower C.
 Transfer ring 1 from tower B to tower A.
 Transfer ring 2 from tower B to tower C.
 Transfer ring 1 from tower A to tower C.
 Transfer ring 4 from tower A to tower B.
 Transfer ring 1 from tower C to tower B.
 Transfer ring 2 from tower C to tower A.
 Transfer ring 1 from tower B to tower A.
 Transfer ring 3 from tower C to tower B.
 Transfer ring 1 from tower A to tower C.
 Transfer ring 2 from tower A to tower B.
 Transfer ring 1 from tower C to tower B.
 Done!