text_testing:
    type: procedure
    debug: true
    script:
        - define border <&7><&sp.strikethrough.repeat[36]>
        - define char <&sp>
        - define max_width <[border].text_width>

        - define sentence "<bold><&c>My Custom Title"
        - define sentence_width <[sentence].text_width>
        - define letters <list>
        - while <element[<[letters].unseparated><[sentence]><[letters].unseparated>].text_width.is_less_than_or_equal_to[<[max_width]>]>:
            - while stop if:<element[<[letters].include[<&sp>].unseparated><[sentence]><[letters].include[<&sp>].unseparated>].text_width.is_more_than[<[max_width]>]>
            - define letters:->:<[char]>
        - determine <[sentence]> if:<[letters].is_empty>
        - determine <[letters].unseparated><[sentence]><[letters].unseparated>