aboutsummaryrefslogtreecommitdiff
path: root/ponies/doctor.pony
diff options
context:
space:
mode:
Diffstat (limited to 'ponies/doctor.pony')
-rw-r--r--ponies/doctor.pony33
1 files changed, 33 insertions, 0 deletions
diff --git a/ponies/doctor.pony b/ponies/doctor.pony
new file mode 100644
index 0000000..12d8f3f
--- /dev/null
+++ b/ponies/doctor.pony
@@ -0,0 +1,33 @@
+binmode STDOUT, ":utf8";
+$the_cow =<<EOC;
+ $thoughts
+ $thoughts
+ $thoughts
+ $thoughts
+\e[49m
+
+ \e[38;5;52m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}
+ \e[48;5;52m \e[48;5;88m \e[48;5;52m \e[49m
+ \N{U+2584}\e[48;5;52;38;5;88m\N{U+2584}\e[48;5;88m \e[48;5;52m \e[49m
+ \e[38;5;52m\N{U+2584}\e[48;5;52;38;5;88m\N{U+2584}\e[48;5;88m \e[48;5;52m \e[49;38;5;234m\N{U+2584}\N{U+2584}
+ \N{U+2584}\e[48;5;52m \e[48;5;88m \e[48;5;101m \e[38;5;144m\N{U+2584}\N{U+2584}\e[48;5;236;38;5;101m\N{U+2584} \e[48;5;234;38;5;236m\N{U+2584}\e[49;38;5;234m\N{U+2584}
+ \N{U+2584}\e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236m \e[48;5;52m\N{U+2584}\N{U+2584}\N{U+2584}\e[38;5;101m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;101m \e[48;5;144m \e[48;5;101;38;5;144m\N{U+2584}\e[48;5;236;38;5;101m\N{U+2584} \e[48;5;234;38;5;236m\N{U+2584}\e[49;38;5;234m\N{U+2584}
+ \N{U+2584}\e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236m \e[38;5;101m\N{U+2584}\e[48;5;101;38;5;144m\N{U+2584}\e[48;5;144m \e[48;5;101m \e[48;5;144m \e[48;5;101m \e[48;5;236m \e[48;5;234m \e[49m
+ \e[48;5;234m \e[48;5;236m \e[48;5;101m \e[48;5;144m \e[38;5;16m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584} \e[48;5;101m \e[48;5;236m \e[38;5;234m\N{U+2584}\e[49m\N{U+2580}
+ \e[48;5;234m \e[48;5;236m \e[48;5;101m \e[48;5;144m \e[48;5;16m \e[38;5;231m\N{U+2584}\e[48;5;231m \e[48;5;57m \e[48;5;231m \e[48;5;16m\N{U+2584}\e[48;5;144;38;5;16m\N{U+2584} \e[48;5;101m \e[48;5;236m \e[48;5;234m \e[49m
+\e[38;5;234m\N{U+2584}\N{U+2584}\e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236m \e[48;5;101m \e[48;5;144m \e[48;5;16;38;5;231m\N{U+2584} \e[48;5;63;38;5;153m\N{U+2584}\e[48;5;231m \e[48;5;16m \e[48;5;144m \e[48;5;101m \e[48;5;236m \e[38;5;234m\N{U+2584}\e[49m\N{U+2580} \N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}
+ \N{U+2580}\e[48;5;236m\N{U+2584}\N{U+2584}\e[48;5;101m \e[48;5;144m \e[48;5;153;38;5;144m\N{U+2584}\e[48;5;231m\N{U+2584}\N{U+2584}\e[48;5;144m \e[48;5;101m \e[48;5;236m \e[38;5;234m\N{U+2584}\e[49m\N{U+2580} \N{U+2584}\e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236m \e[48;5;234m\N{U+2584}\N{U+2584} \e[49;38;5;234m\N{U+2580}
+ \e[38;5;101m\N{U+2580}\e[48;5;144m\N{U+2584}\N{U+2584}\e[48;5;101;38;5;144m\N{U+2584}\e[48;5;144m \e[38;5;101m\N{U+2584} \e[48;5;101m \e[48;5;236m \e[38;5;234m\N{U+2584}\e[49m\N{U+2580} \N{U+2584}\e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236m \e[48;5;234m \e[49;38;5;234m\N{U+2584}
+ \e[38;5;101m\N{U+2580}\N{U+2580}\N{U+2580}\N{U+2580}\N{U+2580}\N{U+2580}\e[48;5;101m \e[38;5;144m\N{U+2584}\e[48;5;144m \e[38;5;250m\N{U+2584}\e[48;5;250;38;5;231m\N{U+2584}\e[48;5;234m\N{U+2584}\e[49;38;5;101m\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;101;38;5;144m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;236;38;5;101m\N{U+2584}\N{U+2584}\e[49;38;5;234m\N{U+2580}\N{U+2580}\N{U+2580}\e[48;5;236m\N{U+2584} \e[48;5;234;38;5;236m\N{U+2584}\e[49;38;5;234m\N{U+2584}
+ \e[48;5;101m \e[48;5;144m \e[38;5;250m\N{U+2584}\e[48;5;250;38;5;231m\N{U+2584}\e[48;5;231m \e[38;5;144m\N{U+2584}\e[48;5;144m \e[48;5;186m \e[48;5;101m\N{U+2584}\e[49;38;5;101m\N{U+2584} \e[48;5;234m \e[48;5;236m \e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236;38;5;234m\N{U+2584}\e[48;5;234m \e[49m
+ \e[38;5;88m\N{U+2584}\e[48;5;88m \e[48;5;52m \e[48;5;231m \e[38;5;144m\N{U+2584}\e[48;5;144m \e[38;5;186m\N{U+2584}\e[48;5;186m \e[48;5;144m\N{U+2584} \e[48;5;101m \e[49m \e[48;5;234;38;5;236m\N{U+2584}\e[48;5;236;38;5;234m\N{U+2584}\e[48;5;234m \e[48;5;236m \e[48;5;234m \e[49m \N{U+2580}
+ \e[38;5;88m\N{U+2580}\e[38;5;52m\N{U+2580}\e[48;5;144;38;5;101m\N{U+2584} \e[48;5;101m \e[48;5;144m \e[48;5;186;38;5;144m\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;144;38;5;101m\N{U+2584}\e[49m\N{U+2580} \e[38;5;234m\N{U+2580}\N{U+2580} \e[48;5;234m \e[48;5;236m \N{U+2584}\e[49m\N{U+2580}
+ \e[48;5;95m \e[48;5;101m \e[48;5;144m \e[38;5;101m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;101m \e[48;5;144m\N{U+2584} \e[48;5;101;38;5;144m\N{U+2584}\e[49;38;5;101m\N{U+2584} \e[48;5;234m \e[48;5;236;38;5;234m\N{U+2584}\e[49m\N{U+2580}
+ \e[48;5;95m \e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m \e[38;5;95m\N{U+2580}\e[48;5;137m\N{U+2584}\e[48;5;101;38;5;137m\N{U+2584} \e[48;5;144m \e[48;5;101m \e[49m \e[38;5;234m\N{U+2580}
+ \e[38;5;95m\N{U+2584}\e[48;5;95;38;5;101m\N{U+2584}\e[48;5;101;38;5;144m\N{U+2584}\e[48;5;144m \e[48;5;101m \e[49m \e[48;5;95m \e[48;5;137m \e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m
+ \e[48;5;95m \e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m \e[48;5;95m \e[48;5;137m \e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m
+ \e[38;5;95m\N{U+2584}\e[48;5;95m \e[48;5;137;38;5;101m\N{U+2584}\e[48;5;101;38;5;144m\N{U+2584}\e[48;5;144m \e[48;5;101m \e[49m \e[48;5;95m \e[48;5;137m \e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m
+ \e[48;5;95m \e[48;5;137;38;5;95m\N{U+2584}\e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m \e[48;5;95m \e[48;5;137m\N{U+2584}\N{U+2584}\e[48;5;101m \e[48;5;144m \e[48;5;101m \e[49m
+ \e[48;5;101m \e[48;5;144;38;5;101m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;101m \e[49m \e[48;5;101m \e[48;5;144m\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\N{U+2584}\e[48;5;101m \e[39;49m
+
+EOC