simplestack program

something.ss

ZYXWVUTSRQPONMLKJIHGFEDCBA"^(-(@32-);%-^)
ZYXWVUTSRQPONMLKJIHGFEDCBA                  push ASCII codes for the backwards alphabet
                          "                 turn stack into string
                           ^                push string length
                            (               open do-while loop (do ... while top of stack truthy)
                             -               decrement string length
                              (              do while top of stack truthy
                               @32            print a space
                                  -           decrement string length
                                   )         end do-while loop
                                    ;        pop string length (0)
                                     %       print string
                                      -      knock one character off the front of the string
                                       ^     push string length
                                        )   loop if string length > 0