quine_sikmi2.rb

eval$s=%q(eval(%w(s=%(eval$s=%q(#{$s}));print(s);sleep(0.5);
q=9608.chr("utf-8");print("\e[?25l\e[1G\e[37m\e[23F");24.tim
es.each{puts(q*6   0)};w=->{sleep(0   .1)};w[];f=->(n,*   as
){print(as.map  {  |a|"\e[#{a}"}*  "  "+q*n);w[];};pr  i  nt
("\e[2F\e[4   C\e  [31m");14.t   ime  s{f[2,"1A","   2D"  ];
};f[3,"1   F","2C  "];f[3,"   1F","5  C"];f[3,"   1F","8  C"
];f[3   ,"1F","11  C"];f   [2,"1F","  14C"];   f[3,"1F",  "1
6C   "];5.times{f  [2   ,"1B","2D"];  };   f[4,"1B","2D"  ];
4.  times{f[3,"1A    "];};f[2,"1A"];    f[3,"1A"];5.time  s{
f[  2,"1B","2D"];};f[4,"1B","2D"];4.times{f[3,"1A"];};f[  2,
"1  A"];f[3,"1A"];19.t  imes{  f[2,"  1B","2D"];};9.time  s{
f[  2,"4D"];};f[3,"5D"]  ;f[2  ,"1A  ","3D"];f[2,"1A","1  D"
];  f[2,"1A"];2.times{f[2,"1A","2D"];};f[2,"1A","3D"];2.  ti
me  s{f[2,"1A","4D"];};2.         times{f[2,"4D"];};f[3,  "5
D"  ];f[2,"1B","5D"];pr  int("\e[1  B\e[3D#{q*2}\e[2D");  sl
ee  p(0.1);3.times{f[2  ,"1B","2D"];  };f[2,"1B"];f[2,"1  B"
,"  1D"];g=->(n,*as)  {pri nt(a s.map  {|a|"\e[#{a}"}*""  +q
*n  );};print("\e[4A  \e[1C#{q}");g[1  ,"1C","1C","1C","  1C
"]  ;g[4,"2B","1B","  1D"," 1D ","1D"  ,"1D","1D"];sleep  (0
.4  );print("\e[37m");  g[1,  "2D",  "2D"];g[1,"2C"];pri  nt
("  \e[31m");g[1,"1A","  4D"];g[1,  "2C"];g[2,"7A","8D"]  ;2
.t  imes{g[2,"4C"];};g[2,"1A","15D                        "]
;g[2,"2C","1C","2C"];g[2,"5C"];sleep(1);print("\e[10F\e[30D"
);print("\e[0m#{s}");print("\e[?25h");#_(C)_SIKMI_Inc.)*""))