let m,s,c=" M "," ","MMMM:
";;print_string(" ;M\";::;;
,':;: \"\"'.
,M;. ;MM;;M:
;MMM::MMMMM
;MMMMM MMMMMM
MMMMM::MM"^c^" :MM:',;MMMMMM'
':: 'MMM"^c^" '; :MMMMM\"
''\"\"\"'
"^s^".
"^s^"M
"^s^"M
."^s^"M"^s^".
'M.. "^m^" ,;M'
'MM;. "^m^" ;MM:
:MMM. "^m^" ;MM:
'MMM; "^m^":MMM:
MMMM."^m^c^":MMMM:"^m^c^":MMMM: M :"^c^":MMMMM M ;"^c^"'MMMMM; M ,M"^c^" :MMMMM. M ;MMMMM'
:MMMM; M :MMMMM\"
'MMMM M :MMMM\"
':MM M ,MMM:'
\"\": M :\"\"'")
Note that non-ascii characters in the above source code will be escaped (such as \x9f).