line input""s$:for i=-len(s$)to-1s$=s$+mid$(s$,-i,1):?mid$(s$,-i)next
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page