random kitto

Return random kitto.

#!/bin/ksh
# try adding more emotions!
# img_viewer must be able to read urls

img_viewer=feh
get_page="ftp -o-"
#get_page=curl #for non fishlinux

emotion() {
cat <<eof | sort -R | sed 1q
happy
sad
angry
smiling
sleepy
soviet
eof
}

get_page() {
$get_page "https://bnet.lab8.cz/search.php?q=$(emotion)+kitto" |\
   tr "<" "\n<" | grep -e jpg -e png | cut -d"=" -f4 | cut -d"'" -f1 |\
   sed '/^$/d' | sort -R | sed 1q
}
url=$(get_page)
echo $url
$img_viewer "$url"

random.kitto.sh

note


pic
1773072837

editor wars
funhole


pic
1772912864

3.5 #1
3_5


pic
1772906485

sight is a liability
funhole


pic
1772891938

william tell
creatures


comission for hackers.town
1772833630

hackers.town fundraiser [print]
comission for hackers.town
3_5


John Adams
1772808767

cum 10
John Adams
funhole


<a href=The front fell off">
1772727948
cum 9 [print]
The front fell off
funhole


Donald J. Trump
1772717174

cum 8
Donald J. Trump
funhole


pic
1772646665

mister computer, pls
funhole


pic
1772567468

NEIN [print]
3_5


less more