[Kirvisniemi]

Вот этот код вызывает переполнение стека:

str := 'Welcome to the magic world of the Pentium processor';
MESSAGE(
   COPYSTR(
      COPYSTR(
         COPYSTR(
            COPYSTR(
               COPYSTR(
                  COPYSTR(
                     COPYSTR(
                        COPYSTR(
                           COPYSTR(str,1,30),
                        1,29),
                     1,28),
                  1,27),
               1,26),
            1,25),
         1,24),
      1,23),
   1,22));

Потенциальная уязвимость...