@REM 小数点以下を上付文字にする
@echo off
REM #jww
REM #cd
REM #ht10
REM #ht40
REM #zz
REM #zw
REM #h3
REM #e
copy jwc_temp.txt temp.txt > nul
ruby -Ks 小数点以下上付.rb temp.txt > jwc_temp.txt
◎スクリプトファイル(ファイル名 小数点以下上付.rb)
puts "hd"
while ARGF.gets
if $_=~/^hq/
elsif $_=~/\"/
moji=$'.chop
moji.gsub!(/\^[a-z]/,"")
moji3=moji.split('')
if moji3[0].size==1
moji2=moji.split("\.")
if moji2.size==2
ika_moji=moji2[1].scan(/./).collect{|item|"\^u"+item}
sunpouti="\""+moji2[0]+"\."+ika_moji.join
else
sunpouti="\""+moji
end
else
moji2=moji.split(".")
if moji2.size==2
ika_moji=moji2[1].scan(/./).collect{|item|"\^u"+item}
sunpouti="\""+moji2[0]+"."+ika_moji.join
else
sunpouti="\""+moji
end
end
xy=$_.split
puts [xy[0,5],sunpouti].flatten.join("\s")
else
print $_
end
end