113 lines
3.2 KiB
Ruby
113 lines
3.2 KiB
Ruby
class Pry
|
|
Pry::Commands.instance_eval do
|
|
command "nyan-cat", "", :requires_gem => ["nyancat"] do
|
|
run ".nyancat"
|
|
end
|
|
|
|
command(/!s\/(.*?)\/(.*?)/, "") do |source, dest|
|
|
eval_string.gsub!(/#{source}/) { dest }
|
|
run "show-input"
|
|
end
|
|
|
|
command "get-naked", "" do
|
|
text = %{
|
|
--
|
|
We dont have to take our clothes off to have a good time.
|
|
We could dance & party all night And drink some cherry wine.
|
|
-- Jermaine Stewart }
|
|
output.puts text
|
|
text
|
|
end
|
|
|
|
command "east-coker", "" do
|
|
text = %{
|
|
--
|
|
Now the light falls
|
|
Across the open field, leaving the deep lane
|
|
Shuttered with branches, dark in the afternoon,
|
|
Where you lean against a bank while a van passes,
|
|
And the deep lane insists on the direction
|
|
Into the village, in the electric heat
|
|
Hypnotised. In a warm haze the sultry light
|
|
Is absorbed, not refracted, by grey stone.
|
|
The dahlias sleep in the empty silence.
|
|
Wait for the early owl.
|
|
-- T.S Eliot
|
|
}
|
|
output.puts text
|
|
text
|
|
end
|
|
|
|
command "cohen-poem", "" do
|
|
text = %{
|
|
--
|
|
When this American woman,
|
|
whose thighs are bound in casual red cloth,
|
|
comes thundering past my sitting place
|
|
like a forest-burning Mongol tribe,
|
|
the city is ravished
|
|
and brittle buildings of a hundred years
|
|
splash into the street;
|
|
and my eyes are burnt
|
|
for the embroidered Chinese girls,
|
|
already old,
|
|
and so small between the thin pines
|
|
on these enormous landscapes,
|
|
that if you turn your head
|
|
they are lost for hours.
|
|
-- Leonard Cohen
|
|
}
|
|
output.puts text
|
|
text
|
|
end
|
|
|
|
command "pessoa-poem", "" do
|
|
output.puts <<-TEXT
|
|
--
|
|
I've gone to bed with every feeling,
|
|
I've been the pimp of every emotion,
|
|
All felt sensations have bought me drinks,
|
|
I've traded glances with every motive for every act,
|
|
I've held hands with every urge to depart,
|
|
..
|
|
Rage, foam, the vastness that doesn't fit in my handkerchief,
|
|
The dog in heat howling in the night,
|
|
The pond from the farm going in circles around my insomnia,
|
|
The woods as they were, on our late-afternoon walks, the rose,
|
|
The indifferent tuft of hair, the moss, the pines,
|
|
The rage of not containing all this, not retaining all this,
|
|
O abstract hunger for things, impotent libido for moments,
|
|
Intellectual orgy of feeling life!
|
|
-- Fernando Pessoa
|
|
TEXT
|
|
end
|
|
|
|
command "test-ansi", "" do
|
|
prev_color = Pry.color
|
|
Pry.color = true
|
|
|
|
picture = unindent <<-'EOS'.gsub(/[[:alpha:]!]/) { |s| text.red(s) }
|
|
____ _______________________
|
|
/ \ | A W G |
|
|
/ O O \ | N I O N ! |
|
|
| | | S S R I ! |
|
|
\ \__/ / __| I K ! |
|
|
\____/ \________________________|
|
|
EOS
|
|
|
|
if windows_ansi?
|
|
move_up = proc { |n| "\e[#{n}F" }
|
|
else
|
|
move_up = proc { |n| "\e[#{n}A\e[0G" }
|
|
end
|
|
|
|
output.puts "\n" * 6
|
|
output.puts picture.lines.map(&:chomp).reverse.join(move_up[1])
|
|
output.puts "\n" * 6
|
|
output.puts "** ENV['TERM'] is #{ENV['TERM']} **\n\n"
|
|
|
|
Pry.color = prev_color
|
|
end
|
|
end
|
|
end
|