annotate ruby/pro2.rb @ 1734:c3852b9a1ecb

audio 変更11
author OOTANI Hiroyuki <c115036@g.koeki-u.ac.jp>
date Fri, 28 Jul 2017 21:08:18 +0900
parents 67e5ccca9f78
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
1 #!/usr/koeki/bin/ruby
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
2 # coding: euc-jp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
3
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
4 require 'fileutils'
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
5 time = Time.now
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
6
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
7 if ARGV[0] == nil
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
8 STDERR.print "./pro2.rb 生成するファイル名.html で起動してください\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
9 exit(1)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
10 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
11
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
12 name = ARGV[0].to_s
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
13
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
14 open(name, "w") do |out|
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
15 css = ["syuzai", "enq", "other"]
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
16 x = 0
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
17 STDERR.print "取材した店(番号を選択)\n"
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
18 STDERR.print "1.取材、伝説 2.アンケート調査:"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
19 sentaku = STDIN.gets.chomp.to_i
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
20 choice = css[sentaku-1]
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
21
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
22 STDERR.print "店の名前:"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
23 sbj = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
24
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
25 history = ""
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
26 STDERR.print "歴史(return 2回押して終了)\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
27 while true
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
28 his = STDIN.gets
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
29 if his == "\n" || his == nil then
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
30 break
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
31 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
32 history += his
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
33 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
34
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
35 regend = ""
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
36 STDERR.print "伝説(return 2回押して終了)\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
37 while true
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
38 reg = STDIN.gets
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
39 if reg == "\n" || reg == nil then
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
40 break
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
41 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
42 regend += reg
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
43 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
44
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
45 STDERR.print "おすすめ品\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
46 osu = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
47
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
48 STDERR.print "郵便番号(半角)\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
49 yu = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
50
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
51 STDERR.print "住所\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
52 add = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
53
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
54 STDERR.print "電話番号(半角)\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
55 tel = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
56
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
57 STDERR.print "写真をアップロード\n"
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
58 STDERR.print "元の画像を選んでください:"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
59 before = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
60
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
61 STDERR.print "保存する画像の名前を決めてください:"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
62 after = STDIN.gets.chomp
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
63 `convert -geometry 150x100 #{before} #{after}`
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
64 STDERR.print "画像はsyuzai/ に保存します。\n"
421
eb66eb1574e7 プログラム改良しました
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 420
diff changeset
65 FileUtils.mv(after, '../syuzai/')
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
66
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
67 #STDERR.print "保存先を指定してください\n"
422
53e1570080da ruby 直した
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 421
diff changeset
68 #save = STDIN.gets.chomp
53e1570080da ruby 直した
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 421
diff changeset
69 FileUtils.mv(name, '../syuzai')
423
67e5ccca9f78 change euc-jp
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents: 422
diff changeset
70 STDERR.print "ファイルは../syuzai に保存されました\n"
420
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
71
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
72 open("temp.txt", "r") do |cm|
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
73 while x = cm.gets
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
74 x.gsub!("%choice%", choice)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
75 x.gsub!("%time%", time.to_s)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
76 x.gsub!("%sbj%", sbj)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
77 x.gsub!("%after%", after)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
78 x.gsub!("%history%", "<pre>"+history.chomp+"</pre>")
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
79 x.gsub!("%regend%", "<pre>"+regend.chomp+"</pre>")
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
80 x.gsub!("%osu%", osu)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
81 x.gsub!("%yu%", yu)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
82 x.gsub!("%add%", add)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
83 x.gsub!("%tel%", tel)
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
84 out.print x
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
85 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
86 end
e29a0228178f プログラム追加
KAMADA Kei <c110206@f.koeki-u.ac.jp>
parents:
diff changeset
87 end

yatex.org