stack-picture ( seq -- string )

Vocabulary
effects

Definition

USING: make sequences ;

IN: effects

: stack-picture ( seq -- string )
    [ [ effect>string % 32 , ] each ] "" make ;