diff options
Diffstat (limited to 'ponies/doctor.pony')
-rw-r--r-- | ponies/doctor.pony | 61 |
1 files changed, 29 insertions, 32 deletions
diff --git a/ponies/doctor.pony b/ponies/doctor.pony index 12d8f3f..a968399 100644 --- a/ponies/doctor.pony +++ b/ponies/doctor.pony @@ -1,33 +1,30 @@ -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 +$balloon$[0m + $\$ + $\$ + $\$ + $\$[49m + $\$ [38;5;52m▄▄▄▄▄▄▄▄▄ + [48;5;52m [48;5;88m [48;5;52m [49m + ▄[48;5;52;38;5;88m▄[48;5;88m [48;5;52m [49m + [38;5;52m▄[48;5;52;38;5;88m▄[48;5;88m [48;5;52m [49;38;5;234m▄▄ + ▄[48;5;52m [48;5;88m [48;5;101m [38;5;144m▄▄[48;5;236;38;5;101m▄ [48;5;234;38;5;236m▄[49;38;5;234m▄ + ▄[48;5;234;38;5;236m▄[48;5;236m [48;5;52m▄▄▄[38;5;101m▄▄▄▄▄▄[48;5;101m [48;5;144m [48;5;101;38;5;144m▄[48;5;236;38;5;101m▄ [48;5;234;38;5;236m▄[49;38;5;234m▄ + ▄[48;5;234;38;5;236m▄[48;5;236m [38;5;101m▄[48;5;101;38;5;144m▄[48;5;144m [48;5;101m [48;5;144m [48;5;101m [48;5;236m [48;5;234m [49m + [48;5;234m [48;5;236m [48;5;101m [48;5;144m [38;5;16m▄▄▄▄ [48;5;101m [48;5;236m [38;5;234m▄[49m▀ + [48;5;234m [48;5;236m [48;5;101m [48;5;144m [48;5;16m [38;5;231m▄[48;5;231m [48;5;57m [48;5;231m [48;5;16m▄[48;5;144;38;5;16m▄ [48;5;101m [48;5;236m [48;5;234m [49m +[38;5;234m▄▄[48;5;234;38;5;236m▄[48;5;236m [48;5;101m [48;5;144m [48;5;16;38;5;231m▄ [48;5;63;38;5;153m▄[48;5;231m [48;5;16m [48;5;144m [48;5;101m [48;5;236m [38;5;234m▄[49m▀ ▄▄▄▄▄▄ + ▀[48;5;236m▄▄[48;5;101m [48;5;144m [48;5;153;38;5;144m▄[48;5;231m▄▄[48;5;144m [48;5;101m [48;5;236m [38;5;234m▄[49m▀ ▄[48;5;234;38;5;236m▄[48;5;236m [48;5;234m▄▄ [49;38;5;234m▀ + [38;5;101m▀[48;5;144m▄▄[48;5;101;38;5;144m▄[48;5;144m [38;5;101m▄ [48;5;101m [48;5;236m [38;5;234m▄[49m▀ ▄[48;5;234;38;5;236m▄[48;5;236m [48;5;234m [49;38;5;234m▄ + [38;5;101m▀▀▀▀▀▀[48;5;101m [38;5;144m▄[48;5;144m [38;5;250m▄[48;5;250;38;5;231m▄[48;5;234m▄[49;38;5;101m▄▄▄[48;5;101;38;5;144m▄▄▄▄▄[48;5;236;38;5;101m▄▄[49;38;5;234m▀▀▀[48;5;236m▄ [48;5;234;38;5;236m▄[49;38;5;234m▄ + [48;5;101m [48;5;144m [38;5;250m▄[48;5;250;38;5;231m▄[48;5;231m [38;5;144m▄[48;5;144m [48;5;186m [48;5;101m▄[49;38;5;101m▄ [48;5;234m [48;5;236m [48;5;234;38;5;236m▄[48;5;236;38;5;234m▄[48;5;234m [49m + [38;5;88m▄[48;5;88m [48;5;52m [48;5;231m [38;5;144m▄[48;5;144m [38;5;186m▄[48;5;186m [48;5;144m▄ [48;5;101m [49m [48;5;234;38;5;236m▄[48;5;236;38;5;234m▄[48;5;234m [48;5;236m [48;5;234m [49m ▀ + [38;5;88m▀[38;5;52m▀[48;5;144;38;5;101m▄ [48;5;101m [48;5;144m [48;5;186;38;5;144m▄▄▄[48;5;144;38;5;101m▄[49m▀ [38;5;234m▀▀ [48;5;234m [48;5;236m ▄[49m▀ + [48;5;95m [48;5;101m [48;5;144m [38;5;101m▄▄▄▄[48;5;101m [48;5;144m▄ [48;5;101;38;5;144m▄[49;38;5;101m▄ [48;5;234m [48;5;236;38;5;234m▄[49m▀ + [48;5;95m [48;5;101m [48;5;144m [48;5;101m [49m [38;5;95m▀[48;5;137m▄[48;5;101;38;5;137m▄ [48;5;144m [48;5;101m [49m [38;5;234m▀ + [38;5;95m▄[48;5;95;38;5;101m▄[48;5;101;38;5;144m▄[48;5;144m [48;5;101m [49m [48;5;95m [48;5;137m [48;5;101m [48;5;144m [48;5;101m [49m + [48;5;95m [48;5;101m [48;5;144m [48;5;101m [49m [48;5;95m [48;5;137m [48;5;101m [48;5;144m [48;5;101m [49m + [38;5;95m▄[48;5;95m [48;5;137;38;5;101m▄[48;5;101;38;5;144m▄[48;5;144m [48;5;101m [49m [48;5;95m [48;5;137m [48;5;101m [48;5;144m [48;5;101m [49m + [48;5;95m [48;5;137;38;5;95m▄[48;5;101m [48;5;144m [48;5;101m [49m [48;5;95m [48;5;137m▄▄[48;5;101m [48;5;144m [48;5;101m [49m + [48;5;101m [48;5;144;38;5;101m▄▄▄▄▄[48;5;101m [49m [48;5;101m [48;5;144m▄▄▄▄▄[48;5;101m [39;49m -EOC +[0m
\ No newline at end of file |