// Haiku random generator

cap prog drop haiku
prog def haiku

// Set minimum version for this command
version 10

// Randomly pick haikus
// ---------------------

// Generate random number
local randomHaiku = runiformint(1,70)

// 1)

if `randomHaiku' == 1 {
di ""

di as txt `""What a strange thing!"'
di as txt `"to be alive"'
di as txt `"beneath cherry blossoms.""'

di as txt " - Kobayashi Issa"

}

// 2)

if `randomHaiku' == 2 {
di ""
di as txt `""O snail"'
di as txt `"Climb Mount Fuji,"'
di as txt `"But slowly, slowly!""'

di as txt " - Kobayashi Issa"

}

// 3)

if `randomHaiku' == 3 {
di ""
di as txt `""Trusting the Buddha, good and bad,"'
di as txt `"I bid farewell"'
di as txt `"To the departing year.""'
di as txt " - Kobayashi Issa"

}

// 4)

if `randomHaiku' == 4 {
di ""
di as txt `""Don’t weep, insects –"'
di as txt `"Lovers, stars themselves,"'
di as txt `"Must part.""'

di as txt " - Kobayashi Issa"

}

// 5)

if `randomHaiku' == 5 {
di ""
di as txt `""Everything I touch"'
di as txt `"with tenderness, alas,"'
di as txt `"pricks like a bramble.""'

di as txt " - Kobayashi Issa"

}

// 6)

if `randomHaiku' == 6 {
di ""
di as txt `""How much"'
di as txt `"are you enjoying yourself,"'
di as txt `"tiger moth?""'

di as txt " - Kobayashi Issa"

}

// 7)

if `randomHaiku' == 7 {
di ""
di as txt `""Not very anxious"'
di as txt `"to bloom,"'
di as txt `"my plum tree.""'

di as txt " - Kobayashi Issa"

}

// 8)

if `randomHaiku' == 8 {
di ""
di as txt `""A cuckoo sings"'
di as txt `"to me, to the mountain,"'
di as txt `"to me, to the mountain.""'

di as txt " - Kobayashi Issa"

}

// 9)

if `randomHaiku' == 9 {
di ""

di as txt `""Blossoms at night,"'
di as txt `"and the faces of people"'
di as txt `"moved by music.""'

di as txt " - Kobayashi Issa"

}

// 10)

if `randomHaiku' == 10 {
di ""
di as txt `""Summer night--"'
di as txt `"even the stars"'
di as txt `"are whispering to each other.""'

di as txt " - Kobayashi Issa"

}

// 11)

if `randomHaiku' == 11 {
di ""
di as txt `""In this world"'
di as txt `"we walk on the roof of hell,"'
di as txt `"gazing at flowers.""'

di as txt " - Kobayashi Issa"

}

// 12)

if `randomHaiku' == 12 {
di ""
di as txt `""A caterpillar,"'
di as txt `"this deep in fall--"'
di as txt `"still not a butterfly""'

di as txt " - Matsuo Bashō"

}

// 13)

if `randomHaiku' == 13 {
di ""

di as txt `""An old silent pond..."'
di as txt `"A frog jumps into the pond,"'
di as txt `"splash! Silence again.""'

di as txt " - Matsuo Bashō"

}

// 14)

if `randomHaiku' == 14 {
di ""
di as txt `""Autumn moonlight-"'
di as txt `"a worm digs silently"'
di as txt `"into the chestnut.""'
di as txt " - Matsuo Bashō"

}

// 15)

if `randomHaiku' == 15 {
di ""
di as txt `""In the twilight rain"'
di as txt `"these brilliant-hued hibiscus -"'
di as txt `"A lovely sunset.""'
di as txt " - Matsuo Bashō"

}

// 16)

if `randomHaiku' == 16 {
di ""
di as txt `""First day of spring--"'
di as txt `"I keep thinking about"'
di as txt `"the end of autumn.""'

di as txt " - Matsuo Bashō"

}

// 17)

if `randomHaiku' == 17 {
di ""
di as txt `""How admirable!"'
di as txt `"to see lightning and not think"'
di as txt `"life is fleeting.""'
di as txt " - Matsuo Bashō"

}

// 18)

if `randomHaiku' == 18 {
di ""
di as txt `""Moonlight slanting"'
di as txt `"through the bamboo grove;"'
di as txt `"a cuckoo crying.""'

di as txt " - Matsuo Bashō"

}

// 19)

if `randomHaiku' == 19 {
di ""
di as txt `""The oak tree:"'
di as txt `"not interested"'
di as txt `"in cherry blossoms.""'

di as txt " - Matsuo Bashō"

}

// 20)

if `randomHaiku' == 20 {
di ""
di as txt `""When the winter chrysanthemums go,"'
di as txt `"there’s nothing to write about"'
di as txt `"but radishes.""'
di as txt " - Matsuo Bashō"

}

// 21)

if `randomHaiku' == 21 {
di ""
di as txt `""Winter solitude--"'
di as txt `"in a world of one color"'
di as txt `"the sound of wind.""'
di as txt " - Matsuo Bashō"

}

// 22)

if `randomHaiku' == 22 {
di ""
di as txt `""Won’t you come and see"'
di as txt `"loneliness? Just one leaf"'
di as txt `"from the kiri tree.""'
di as txt " - Matsuo Bashō"

}

// 23)

if `randomHaiku' == 23 {
di ""
di as txt `""A summer river being crossed"'
di as txt `"how pleasing"'
di as txt `"with sandals in my hands!"'

di as txt " - Yosa Buson"

}

// 24)

if `randomHaiku' == 24 {
di ""
di as txt `""In the moonlight,"'
di as txt `"The color and scent of the wisteria"'
di as txt `"Seems far away.""'

di as txt " - Yosa Buson"

}

// 25)

if `randomHaiku' == 25 {
di ""
di as txt `""Light of the moon"'
di as txt `"Moves west, flowers’ shadows"'
di as txt `"Creep eastward."'
di as txt " - Yosa Buson"

}

// 26)

if `randomHaiku' == 26 {
di ""
di as txt `""Calligraphy of geese"'
di as txt `"against the sky-"'
di as txt `"the moon seals it.""'

di as txt " - Yosa Buson"

}

// 27)

if `randomHaiku' == 27 {
di ""
di as txt `""The end of spring--"'
di as txt `"the poet is brooding"'
di as txt `"about editors.""'

di as txt " - Yosa Buson"

}

// 28)

if `randomHaiku' == 28 {
di ""
di as txt `""Dawn--"'
di as txt `"fish the cormorants haven’t caught"'
di as txt `"swimming in the shallows.""'
di as txt " - Yosa Buson"

}

// 29)

if `randomHaiku' == 29 {
di ""
di as txt `""Spring rain:"'
di as txt `""So the story goes —"'
di as txt `""Straw raincoat and umbrella"'

di as txt " - Yosa Buson"

}

// 30)

if `randomHaiku' == 30 {
di ""
di as txt `""I want to sleep"'
di as txt `"Swat the flies"'
di as txt `"Softly, please""'

di as txt " - Masaoka Shiki"

}
// 31)

if `randomHaiku' == 31 {
di ""
di as txt `""After killing"'
di as txt `"a spider, how lonely I feel"'
di as txt `"in the cold of night!""'
di as txt " - Masaoka Shiki"

}

// 32)

if `randomHaiku' == 32 {
di ""
di as txt `""For love and for hate"'
di as txt `"I swat a fly and offer it"'
di as txt `"to an ant.""'
di as txt " - Masaoka Shiki"

}

// 33)

if `randomHaiku' == 33 {
di ""
di as txt `""A mountain village"'
di as txt `"under the piled-up snow"'
di as txt `"the sound of water.""'
di as txt " - Masaoka Shiki"

}

// 34)

if `randomHaiku' == 34 {
di ""
di as txt `""Night; and once again,"'
di as txt `"the while I wait for you, cold wind"'
di as txt `"turns into rain.""'
di as txt " - Masaoka Shiki"

}

// 35)

if `randomHaiku' == 35 {
di ""
di as txt `""The summer river:"'
di as txt `"although there is a bridge, my horse"'
di as txt `"goes through the water."'

di as txt " - Masaoka Shiki"

}

// 36)

if `randomHaiku' == 36 {
di ""
di as txt `""A lightning flash:"'
di as txt `"between the forest trees"'
di as txt `"I have seen water""'
di as txt " - Masaoka Shiki"

}

// 37)

if `randomHaiku' == 37 {
di ""
di as txt `""The lamp once out"'
di as txt `"Cool stars enter"'
di as txt `"The window frame.""'

di as txt " - Natsume Soseki"

}

// 38)

if `randomHaiku' == 38 {
di ""
di as txt `""Plum flower temple:"'
di as txt `"Voices rise"'
di as txt `"From the foothills""'

di as txt " - Natsume Soseki"

}

// 39)

if `randomHaiku' == 39 {
di ""
di as txt `""The crow has flown away:"'
di as txt `"swaying in the evening sun,"'
di as txt `"a leafless tree.""'

di as txt " - Natsume Soseki"

}

// 40)

if `randomHaiku' == 40 {
di ""
di as txt `""A world of dew,"'
di as txt `"And within every dewdrop"'
di as txt `"A world of struggle.""'
di as txt " - Kobayashi Issa"

}

// 41)

if `randomHaiku' == 41 {
di ""
di as txt `""I write, erase, rewrite"'
di as txt `"Erase again, and then"'
di as txt `"A poppy blooms.""'
di as txt " - Katsushika Hokusai"

}

// 42)

if `randomHaiku' == 42 {
di ""
di as txt `""Over the wintry"'
di as txt `"Forest, winds howl in rage"'
di as txt `"With no leaves to blow""'

di as txt " - Natsume Soseki"

}

// 43)

if `randomHaiku' == 43 {
di ""
di as txt `""Don’t weep, insects –"'
di as txt `"Lovers, stars themselves,"'
di as txt `"Must part.""'
di as txt " - Kobayashi Issa"

}

// 44)

if `randomHaiku' == 44 {
di ""
di as txt `""Now gathering,"'
di as txt `"Now scattering,"'
di as txt `"Fireflies over the river.""'

di as txt " - Natsume Soseki "

}

// 45)

if `randomHaiku' == 45 {
di ""
di as txt `""On New Year’s Day"'
di as txt `"I long to meet my parents"'
di as txt `"as they were before my birth.""'

di as txt " - Natsume Soseki"

}

// 46)

if `randomHaiku' == 46 {
di ""
di as txt `""My life, -"'
di as txt `"How much more of it remains?"'
di as txt `"The night is brief.""'

di as txt " - Masaoka Shiki"

}

// 47)

if `randomHaiku' == 47 {
di ""
di as txt `""In the twilight rain"'
di as txt `"these brilliant-hued hibiscus -"'
di as txt `"A lovely sunset""'

di as txt " - Matsuo Bashō "

}

// 48)

if `randomHaiku' == 48 {
di ""
di as txt `""I kill an ant"'
di as txt `"and realize my three children"'
di as txt `"have been watching.""'

di as txt " - Kato Shuson"

}

// 49)

if `randomHaiku' == 49 {
di ""
di as txt `""almost evening —"'
di as txt `"the paper vendor sleeps"'
di as txt `"on old news"'

di as txt " - A Thiagarajan "

}

// 50)

if `randomHaiku' == 50 {
di ""
di as txt `""sidewalk cafe"'
di as txt `"I smell the city"'
di as txt `"in my coffee""'

di as txt " - Bhavana Ramesh "

}

// 51)

if `randomHaiku' == 51 {
di ""
di as txt `""kite contest"'
di as txt `"the rise and fall"'
di as txt `"of oohs and aahs""'

di as txt " - Kala Ramesh "

}

// 52)

if `randomHaiku' == 52 {
di ""
di as txt `""Society"'
di as txt `"Just treads Hell’s roof"'
di as txt `"Distracted by the Cherry Blossoms" "'

di as txt " - Kobayashi Issa "

}

// 53)

if `randomHaiku' == 53 {
di ""
di as txt `""bored in heaven"'
di as txt `"a shooting star"'
di as txt `"jumps to death""'

di as txt " - Raju Samal"

}

// 54)

if `randomHaiku' == 54 {
di ""
di as txt `""power cut ..."'
di as txt `"today I hear"'
di as txt `"the birds chirp""'

di as txt " - Usha Kiran"

}

// 55)

if `randomHaiku' == 55 {
di ""
di as txt `""at home –"'
di as txt `"only the mosquitoes"'
di as txt `"for company""'

di as txt " - Gautam Nadkarni "

}

// 56)

if `randomHaiku' == 56 {
di ""
di as txt `""a light breeze"'
di as txt `"the moon in the birdbath"'
di as txt `"shivers""'

di as txt " - Angelee Deodhar "

}

// 57)

if `randomHaiku' == 57 {
di ""
di as txt `""In autumn eve"'
di as txt `"There is joy too,"'
di as txt `"In loneliness" "'

di as txt " - Yosa Buson"

}

// 58)

if `randomHaiku' == 58 {
di ""
di as txt `"sunlight"'
di as txt `"on green leaves"'
di as txt `"for breakfast "'
di as txt " - Patricia Donegan "

}

// 59 )

if `randomHaiku' == 59 {
di ""
di as txt `"long walk—"'
di as txt `"cherry petals stick"'
di as txt `"to the bottoms of my shoes"'
di as txt " - Patricia Donegan "

}

// 60 )

if `randomHaiku' == 60 {
di ""
di as txt `"thank you wind"'
di as txt `"for caressing"'
di as txt `"this old face"'

di as txt " -Patricia Donegan "

}

//61 )

if `randomHaiku' == 61 {
di ""
di as txt `"deep in raga –"'
di as txt `"a sudden applause"'
di as txt `"startles the singer"'

di as txt " - Kala Ramesh "

}

// 62 )

if `randomHaiku' == 62 {
di ""
di as txt `"no temple bells –"'
di as txt `"the silence unbroken"'
di as txt `"remains"'

di as txt " - Kala Ramesh "

}

// 63 )

if `randomHaiku' == 63 {
di ""
di as txt `"moonless night"'
di as txt `"a pair of circling nightjars"'
di as txt `"feed on stars"'

di as txt " - Rajiv Lather "

}

//64 )

if `randomHaiku' == 64 {
di ""
di as txt `"monsoon clouds –"'
di as txt `"the ground aflame with"'
di as txt `"gulmohur blooms"'

di as txt " - Johannes Manjrekar "

}

// 65 )

if `randomHaiku' == 65 {
di ""
di as txt `"night walk"'
di as txt `"i slow down"'
di as txt `"near the jasmine bush"'

di as txt " - Johannes Manjrekar"

}

// 66)

if `randomHaiku' == 66 {
di ""
di as txt `"night breeze –"'
di as txt `"dogs break the softness"'
di as txt `"of the cricket’s song"'

di as txt " - Johannes Manjrekar "

}

// 67)

if `randomHaiku' == 67 {
di ""
di as txt `"withered rose"'
di as txt `"petal by petal"'
di as txt `"the years fade"'

di as txt " - Madhuri Pillai"

}

//68 )

if `randomHaiku' == 68 {
di ""
di as txt `"winter chill..."'
di as txt `"the patchwork quilt smells"'
di as txt `"of memories"'

di as txt " - Shloka Shankar "

}

// 69 )

if `randomHaiku' == 69 {
di ""
di as txt `"yesterday’s"'
di as txt `"dried up puddle…"'
di as txt `"paper boats"'

di as txt " - Anitha Verma "

}

// 70 )

if `randomHaiku' == 70 {
di ""
di as txt `"between us"'
di as txt `"vapours from the teacups"'
di as txt `"autumn chill"'

di as txt " - Angelee Deodhar "

}

// End

end