(princ(int-char(- 111 11 11 11 1 1 1 1 1 1)))(princ(int-char(- 111 11 -1)))(princ(int-char(- 111 1 1 1)))(princ(int-char(- 111 1 1 1)))(princ(int-char 111))(princ(int-char(- 11 -11 -11 -11)))(princ(int-char(- 11 -11 -11 1)))(princ(int-char(- 111 -11 1 1 1)))(princ(int-char 111))(princ(int-char(- 111 -1 -1 -1)))(princ(int-char(- 111 1 1 1)))(princ(int-char(- 111 11)))(princ(int-char(- 11 -11 -11)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).