# Usage: ;lore=<proc[lore_builder].context[40|<script.yaml_key[lore_list].escaped>]>
# Lore should be stored like normal Denizen lore, but in lore_list rather than lore
lore_builder:
    type: procedure
    definitions: linesize|lore
    debug: false
    script:
    - define newlist li@
    - foreach <[lore].as_list>:
        - if <[value].length> <= <[linesize]>:
            - define newlist <[newlist].include[<[value]>].unescaped>
        - else:
            - define newlist <[newlist].include[<[value].unescaped.split_lines[<[linesize]>].replace[<n>].with[|]>]>
    - determine <[newlist]>