diff --git a/Tuisi.rb b/Tuisi.rb new file mode 100644 index 0000000..a8809c7 --- /dev/null +++ b/Tuisi.rb @@ -0,0 +1,12 @@ +# coding: utf-8 +def kakaku(x,y) +x * (1-y) +end + +puts"割引の計算をします" +puts"値段を入力してください" +nedan = gets.to_i +puts"割引を入力してください" +wari = gets.to_f +gokei = kakaku(nedan,wari) +printf("割引後の値段は%d円です\n",gokei) diff --git a/after1.jpg b/after1.jpg new file mode 100644 index 0000000..3f1b6e9 --- /dev/null +++ b/after1.jpg Binary files differ diff --git a/after2.jpg b/after2.jpg new file mode 100644 index 0000000..806fe49 --- /dev/null +++ b/after2.jpg Binary files differ diff --git a/after3.jpg b/after3.jpg new file mode 100644 index 0000000..e14c511 --- /dev/null +++ b/after3.jpg Binary files differ diff --git a/before.jpg b/before.jpg new file mode 100644 index 0000000..d9a0a68 --- /dev/null +++ b/before.jpg Binary files differ diff --git a/csv-use.rb b/csv-use.rb new file mode 100644 index 0000000..162f209 --- /dev/null +++ b/csv-use.rb @@ -0,0 +1,10 @@ +Encoding.default_external = 'utf-8' # CSVファイルがutf-8のとき +require 'csv' # CSVライブラリ読み込み + +data = CSV.read("csv-use.csv", :headers => true) + data.each{|row| + printf("%sがすきです。\n", + row["すきなもの"],) + printf("%sがきらいです。\n", + row["きらいなもの"]) + } \ No newline at end of file diff --git a/index.cgi b/index.cgi new file mode 100644 index 0000000..0a5991f --- /dev/null +++ b/index.cgi @@ -0,0 +1,25 @@ + + + +
[[ RAW TEXT(DOWNLOAD here) ]]
+
+すきなもの,きらいなもの
+オレンジ,あめ
+ハムスター,へび
+チョコ,虫
+
+
+
diff --git a/kankou.rb b/kankou.rb
new file mode 100644
index 0000000..16905d2
--- /dev/null
+++ b/kankou.rb
@@ -0,0 +1,38 @@
+
+require 'csv' # CSVライブラリ読み込み
+#観光スポット一覧で使うcsvファイル読み込み
+data = CSV.read("shonai.csv", :headers => true)
+#webページ検索で使うcsvファイル読み込み
+meisho = CSV.read("web.csv", headers: true)
+while true
+ puts "1 観光スポット一覧"
+ puts "2 観光スポットwebページ検索"
+ puts "0 終了"
+ print "どれかひとつ選んでください => "
+ input=gets.to_i
+ if input == 0 then #もしinputが0だったとき
+ break #終了する
+ elsif input == 1 then #もしinputが1だったとき
+ #↓行ごとに取り出す
+ n = 0
+ data.each{|row| # rowには1行ずつ値が入り繰り返される
+ printf("%d: %sとはどんなところ?\n", n+=1, row["建物名"])
+ printf("住所 => %s \n特徴 => %s \n",row["住所"], row["特徴"])
+ print("--------------------------\n") }#仕切りの機能(何個あってもいい)
+ elsif input == 2 then #もしinputが2だったとき
+ i=0
+ for x in meisho # 1行ずつxに取り出す
+ printf("%d: %s\n", i+=1, x['place']) # 添字に見出し項目を指定して取り出す
+ end
+ print("何番のWebを見たいですか: ")
+ num = gets.to_i-1
+ if num >= 0 && num < meisho.length
+ printf("%s ですね。%s をブラウザで開きます.\n",
+ meisho[num]['place'], meisho[num]['url'])
+ # ↑meishoのnum行目のレコードの ['place'] 項目を取り出す
+ system("firefox "+meisho[num]['url']+"&")
+ end
+ else
+ print "1/2/0から選んでください\n"
+ end
+end
\ No newline at end of file
diff --git a/kensaku.rb b/kensaku.rb
new file mode 100755
index 0000000..b2b6164
--- /dev/null
+++ b/kensaku.rb
@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+#coding: utf-8
+
+print"検索パターン"
+pattern = STDIN.gets.chomp!
+regexp = Regexp.new(pattern,nil)
+
+ while line = gets
+ if regexp =~ line
+ print line
+ end
+end
diff --git a/kyoutsuugo.txt b/kyoutsuugo.txt
new file mode 100644
index 0000000..4f07c3e
--- /dev/null
+++ b/kyoutsuugo.txt
@@ -0,0 +1,13 @@
+いや~今日のテストわからなくて苦労したよ
+わからなくても大丈夫さ
+大丈夫なんてお前たちダメでしょう
+しっかり勉強しないと偉くなれないよ
+偉くなんてならなくてもいいよ
+ぺらぺら言わないで早く勉強しなさい
+お父さんはいつもうるさいね~
+いいか言うこと聞かないと怒るぞ
+でも今日のテストのプリントどこにやったかわからないんだもの
+わからないなんてきちんとさがして勉強しなさい
+勉強の前にご飯食べさせて
+たくさん食べなさい
+はい食べます
\ No newline at end of file
diff --git a/program.rb b/program.rb
new file mode 100644
index 0000000..1fbc504
--- /dev/null
+++ b/program.rb
@@ -0,0 +1,60 @@
+#!/usr/koeki/bin/ruby
+# -*- coding: utf-8 -*-
+
+#初期設定
+
+require 'curses'
+include Curses
+
+init_screen
+cbreak
+noecho
+
+rt = []
+
+begin
+ sleep(0)
+
+ 10.times do
+ system("display -geometry +0+0 before.jpg&")
+ sleep(2)
+ system('pkill magick -U `whoami`')
+ srand
+ i = rand(3)+1
+ if i == 1
+ system("display -geometry +0+0 after1.jpg&")
+ elsif i == 2
+ system("display -geometry +0+0 after2.jpg&")
+ elsif i == 3
+ system("display -geometry +0+0 after3.jpg&")
+ end
+ setpos(0,0)
+ addstr("\n 1:安全 2:危険")
+ refresh
+ start = Time.now
+ answer = getch
+ stop = Time.now
+ rt << [i,answer,stop.to_f - start.to_f]
+ refresh
+
+ system('pkill magick -U `whoami`')
+ setpos(0,0)
+ addstr("\n ")
+ refresh
+ sleep(2)
+ end
+
+ correct = 0
+ total = 0
+ for j in rt
+ total += j[2]
+ if (j[0] == 1 && j[1] == "1") || (j[0] != 1 && j[1] == "2")
+ correct += 1
+ end
+ end
+
+ensure
+ close_screen
+end
+
+printf("正答%d回 反応時間%5.3f秒\n", correct, total/10)
diff --git a/program_advanced.rb b/program_advanced.rb
new file mode 100644
index 0000000..d740d94
--- /dev/null
+++ b/program_advanced.rb
@@ -0,0 +1,66 @@
+#!/usr/koeki/bin/ruby
+# -*- coding: utf-8 -*-
+
+#初期設定
+
+require 'curses'
+include Curses
+
+init_screen
+cbreak
+noecho
+
+rt = []
+
+begin
+ sleep(0)
+
+ 10.times do
+ system("display -geometry +0+0 before.jpg&")
+ sleep(2)
+ system('pkill magick -U `whoami`')
+ srand
+ i = rand(3)+1
+ if i == 1
+ system("display -geometry +400+0 quiz1.jpg&")
+ sleep(0.5)
+ system("display -geometry +0+0 after1.jpg&")
+ elsif i == 2
+ system("display -geometry +400+0 quiz1.jpg")
+ sleep(0.5)
+ system("display -geometry +0+0 after2.jpg&")
+ elsif i == 3
+ system("display -geometry +400+0 quiz1.jpg&")
+ sleep(0.5)
+ system("display -geometry +0+0 after3.jpg&")
+ end
+ setpos(0,0)
+ addstr("\n 1:安全 2:危険")
+ refresh
+ start = Time.now
+ answer = getch
+ stop = Time.now
+ rt << [i,answer,stop.to_f - start.to_f]
+ refresh
+
+ system('pkill magick -U `whoami`')
+ setpos(0,0)
+ addstr("\n ")
+ refresh
+ sleep(2)
+ end
+
+ correct = 0
+ total = 0
+ for j in rt
+ total += j[2]
+ if (j[0] == 1 && j[1] == "1") || (j[0] != 1 && j[1] == "2")
+ correct += 1
+ end
+ end
+
+ensure
+ close_screen
+end
+
+printf("正答%d回 反応時間%5.3f秒\n", correct, total/10)
diff --git a/quiz1.jpg b/quiz1.jpg
new file mode 100644
index 0000000..23d58ff
--- /dev/null
+++ b/quiz1.jpg
Binary files differ
diff --git a/quiz2.jpg b/quiz2.jpg
new file mode 100644
index 0000000..58fd138
--- /dev/null
+++ b/quiz2.jpg
Binary files differ
diff --git a/quiz3.jpg b/quiz3.jpg
new file mode 100644
index 0000000..f8cbbfb
--- /dev/null
+++ b/quiz3.jpg
Binary files differ
diff --git a/renshu.rb b/renshu.rb
new file mode 100644
index 0000000..47451e9
--- /dev/null
+++ b/renshu.rb
@@ -0,0 +1,37 @@
+Loading /etc/skel/.emacs.default...
+Loading /usr/koeki/share/emacs/lisp/scroll-in-place.el (source)...done
+Loading mozc...done
+Loading term/bobcat...done
+Loading /etc/skel/.emacs.default...done
+For information about GNU Emacs and the GNU system, type C-h C-a.
+Startup with window [1]
+r is undefined
+e is undefined
+R is undefined
+U is undefined
+scroll-signal-boundary-error: Beginning of buffer
+R is undefined
+u is undefined
+v is undefined
+scroll-signal-boundary-error: Beginning of buffer
+user-error: No resizable window below this one [2 times]
+r is undefined
+u is undefined
+Beginning of buffer [8 times]
+