#!/usr/local/bin/ruby
#
#	Convert from .K3 to TEXT
#	2001/02/10 Written by H.Nitobe
#

require "jcode"
$KCODE = "S"

now = ""

while gets
  p1, p2, p3, p4, p5, p6, p7 = split(/,/)
  p1.gsub!(/"|��/, "")
  p2.gsub!(/"/, "")
  p3.gsub!(/"/, "")
  p4.gsub!(/"/, "")
  if now != p4
    print "\n\n�@�@",p2,"�@",p3,"\n"
    now = p4
  end
  print p1
end