diff --git a/intro/IMGP6841.jpeg b/intro/IMGP6841.jpeg
new file mode 100644
index 0000000..0fa5713
--- /dev/null
+++ b/intro/IMGP6841.jpeg
Binary files differ
diff --git a/intro/sakakibara_intro.rb b/intro/sakakibara_intro.rb
index 86e4f6e..fc9abca 100644
--- a/intro/sakakibara_intro.rb
+++ b/intro/sakakibara_intro.rb
@@ -5,6 +5,8 @@
 csvfile = "sakakibara_intro.csv"        # csvファイル名を入れておく
 #data = Hash.new
 sum = []
+#pid = spawn "display -geometry +10+20 IMGP6841.jpeg"
+system("display -geometry +0+0 IMGP6841.jpeg&")
 
 def ans_proc(x,y,sum)
   pt = 1
@@ -21,7 +23,8 @@
 puts"名前は榊原一心です。"
 puts"山形県遊佐町出身です。"
 puts"公益大で働いています。"
-
+#Process.kill(:INT, pid)
+system('pkill magick -U `whoami`')
 data = CSV.read(csvfile,:headers => true)
 data.each{|row|    
   printf("%s\n",row["質問"]) 
diff --git a/kanda/traffic.rb b/kanda/traffic.rb
new file mode 100644
index 0000000..1fbc504
--- /dev/null
+++ b/kanda/traffic.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)