quineでlgtmを作ってみた
ruby quine_base.rb
output
% ruby quine_base.rb
eval$s =%w'c=eval("[13..356, 500..520,660..680,830..850 ,995.. 1020,1
162..1 180,1328..1345,1495..151 0,1660..1675,1825..1840,19 90..200 5,2155.
.2170, 2320..2336,2490..2506,265 5..2669]").flat_map(&:to_a );n=Mars hal.load
("BAhs KwGBAAA AAAAAAAA AAAAAA AAA/AAAwP //B/7//+c
HAAD8+ AEA4P// H/z//88 fAAD88 QMAwP//f/j //59/AAD84
wcAgD8 A/gHADw D/AQD8 xw8AAH8A+AO AHwD+BwD8jx
8AAP4A AAAAPwD 8HwD8H z8AAPw BAAAA fgD4f QB8P34
AAPgDA AAA/ADw 8wF8fv wAAPAH AAAA+ AHgxw d8/PgB
AOAP4H 8A8APAD x98+PE DAMAfw P8A4A eAH3x 88OMHA
IA/gP8 BwA8AP/ B94McPAAB/ APwDgB 8AfsB/ wI/// 3/8// 8HAD8A
/AB/gB /////w/ 78PAH4A+AF 8AD/+/ //B/z8 fAPwA 8AP4A H4A".u
npack( "m")[0] );l=39.chr ;m=27. chr;e= "eval $s=%w "+l+($
s*2);o ="";j=- 1;;0.upt o(2177 ){|i|; t=(c.incl ude?(i
)?34:0);o<<(n[i]==1?m+"[ "+t.to_s+"m"+e[j+=1]+m+"[ m":32) ;o<<(i %121==1 20?10:
"");};o[-166,48]=l+".joi n";puts(o)#c=eval( "[13. .356,5 00..52 0,660 ..680,
830..850,995..1020,1162. .1180,1328..1345 ,1495 ..1510 ,1660. .1675 ,oin