スポンサー広告---------
スポンサーサイト
上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。
過去_log_0-2013-07-21
amazon_dl_b
nya0nn4r34ru4u48i4776tuuru_r1200.jpg


-----------xx----
-*--- amazon_dl_b.rb ---*-




#coding : utf-8
require"open-uri"
require"kconv"
require"mechanize"


v = "http://www.amazon.co.jp/dp/4799202170/"
#v = "http://www.amazon.co.jp/gp/product/images/4089081661/"
#v = "http://www.amazon.co.jp/gp/product/images/4799202170/"
v =~ /[product|images]\/(\d*)\//
vi = p $1

agent = Mechanize.new
agent.get v
agent.page.body.each_line do |m|
if m =~ /addZoomViewer/
puts m
break m
end
end =~ /(\d*),"amztile"/
ai = $1

# tate yoko 3...6...n
files = []
files_del = []
6.times do | i |
6.times do | k |
s = "http://z2-ec2.images-amazon.com/R/1/a=#{vi}+d=_SCR%283,#{i},#{k}%29_+o=01+s=RMTILE+va=MAIN+ve=#{ai}+e=.jpg"
file = "_t_#{k}_#{i}.jpg"
begin
files_del << file
open( file ,"wb").print open(s,"rb").read
files << file
rescue
end
end
end


def func ar , name , ap
p ar
append = {:+ => 1 , :- => 2}[ap]
ar.inject do | a , b |
pt = "__pt_#{name}.jpg"
next pt if File::stat(a).size.zero? || File::stat(b).size.zero?
puts "C:\\soft\\IrfanView\\i_view32.exe /panorama=(#{append} ,#{a},#{b}) /convert=#{pt}"
`C:\\soft\\IrfanView\\i_view32.exe /panorama=(#{append},#{a},#{b}) /convert=#{pt}`
pt
end # inject
end # def

files.sort!.last =~ /(\d*).jpg/
gg = files.each_slice( $1.to_i+1 ).each_with_index.map do |m , i|
func m , i , :+
end
func gg , "_kuu_mazo_#{vi}_" , :-

files_del.+(gg).map do |m|
# p "del #{m}"
`del #{m}`
end






iviewのコマンドラインで画像つなげる

   0..
Name
comment

hibana
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。