53歳限界プログラマの憂鬱

SU/CAR-ST-APplication-cellsから派生したプログラマのブログ

本家はこちら↓
f:id:sucar:20151115183011p:plain

SU/CAR-ST-APplication-cellsの安倍野ミックスと申します
来訪ありがとうございます
シストレツールを自作してます

f:id:sucar:20150414193802p:plain

株価データの変換

株価データをcsvでDLできる某サイトがリニューアルして、ついでにcsvデータのフォーマットが変更になった模様

とりあえず、旧仕様フォーマットに変更するスクリプトawkで作成

--------------------------------

#!/bin/awk
BEGIN {
  FS=","
  print "new2old"
  print "コード,市場,銘柄名,業種,始値,高値,安値,終値,出来高,売買代金"
}
# 1行目を無視
NR>1 {
  printf("%s,",$1)
  printf("%s,",$3)
  printf("%s,",$2)
  printf("dummy,")
  if ($4=="") {printf("-,")}
  else {printf("%s,",$4)}
  if ($5=="") {printf("-,")}
  else {printf("%s,",$5)}
  if ($6=="") {printf("-,")}
  else {printf("%s,",$6)}
  if ($7=="") {printf("-,")}
  else {printf("%s,",$7)}
  printf("%s,",$8)
  printf("%s\n",$9)
}

END {}

----------------------------------------

これで急場は凌げそう