OK, then here is my 93 code without the $-trick:
Code: Select all
111167319292554131926382174267318282413263921791191791173192721079*^0^p0^9?3+88*c4^8?9*+P99*c
The ones in the front are used for padding. The trick to get the cheap target for the second loop (99*c) was to pull out the 3+ which is added to both the x and y.
For my 90-solution I had to use the $-technique. In fact it is very similar to your solution:
Code: Select all
155413192635217916779124132638217911917911717914152318272910078*5+0^^0^p0^8?3+1vc0^5?9*+P$
The 78*5+ target (and its duplication via 0^ and 1v) are a bit ugly but just right to get it to 90.
And damn, I was *so* close to getting a 81- or 83-solution based on 69* and 78* targets instead of 79* and 88*. I tried several different variants. But every time I either had a single number too much on the stack, or one was missing, or the encoding of space or $ was just one off. For example, if $ was ASCII 35 instead of 36, it would have worked. But no success yet.
