Add mech-and-cow cowfile

Signed-off-by: Thomas A. Christensen II <25492070+MillironX@users.noreply.github.com>
This commit is contained in:
Thomas A. Christensen II 2021-11-23 16:24:28 -06:00
parent 39f6dff05a
commit 85e83e784d
Signed by: millironx
GPG key ID: 139C07724802BC5D
3 changed files with 57 additions and 0 deletions

View file

@ -8,6 +8,7 @@ Examples of all the cowfiles available.
Cowsay.default
Cowsay.cower
Cowsay.dragon_and_cow
Cowsay.mech_and_cow
Cowsay.udder
Cowsay.vader
Cowsay.www

View file

@ -15,6 +15,7 @@ include("cows/flaming-sheep.cow.jl")
include("cows/fox.cow.jl")
include("cows/kitty.cow.jl")
include("cows/koala.cow.jl")
include("cows/mech-and-cow.cow.jl")
include("cows/udder.cow.jl")
include("cows/vader-koala.cow.jl")
include("cows/vader.cow.jl")

View file

@ -0,0 +1,55 @@
"""
function mech_and_cow()
# Example
```jldoctest
julia> cowsay("Do you ever get that feeling...?", cow=Cowsay.mech_and_cow)
__________________________________
< Do you ever get that feeling...? >
----------------------------------
\\ ,-----.
/ | |
\\ ,--| |-.
/ __,----| | | |
\\ ,;:: | `_____' |
/ `._______| i^i |
\\ `----| |---'| .
/ ,-------._| |== ||//
\\ | |_|P`. /'/
/ `-------' 'Y Y/'/'
\\ .==\\ /_\\
^__^ / /'| `i
(oo)\\_______ /' / | |
(__)\\ )\\/\\ /' / | `i
||----w|| ___,;`----'.___L_,-'`\\__
|| || i_____;----\\.____i""\\____\\
```
"""
function mech_and_cow(;eyes="oo", tongue=" ", thoughts="\\")
sthguoht = thoughts;
if thoughts == "\\"
sthguoht = "/"
end #if
the_cow =
"""
$thoughts ,-----.
$sthguoht | |
$thoughts ,--| |-.
$sthguoht __,----| | | |
$thoughts ,;:: | `_____' |
$sthguoht `._______| i^i |
$thoughts `----| |---'| .
$sthguoht ,-------._| |== ||//
$thoughts | |_|P`. /'/
$sthguoht `-------' 'Y Y/'/'
$thoughts .==\\ /_\\
^__^ / /'| `i
($eyes)\\_______ /' / | |
(__)\\ )\\/\\ /' / | `i
$tongue||----w|| ___,;`----'.___L_,-'`\\__
|| || i_____;----\\.____i""\\____\\
"""
return the_cow
end