2008年4月23日水曜日

JFreeChartでローソク足チャート(2)ローソクの色を変える

陽線を赤、陰線を青に変更:

さらにローソクの枠を黒に変更:

前回のソースコードからの変更部分は色を変えています。
赤字の部分がローソクの色関係、青字がローソクの枠関係のコードです。

ソースコード(JRuby):
include Java
import java.util.Date
import javax.swing.JFrame
import java.util.GregorianCalendar
import java.awt.Color
import java.awt.BasicStroke


import org.jfree.chart.JFreeChart
import org.jfree.chart.ChartPanel
import org.jfree.chart.plot.XYPlot
import org.jfree.chart.renderer.xy.CandlestickRenderer
import org.jfree.data.xy.DefaultHighLowDataset
import org.jfree.chart.axis.DateAxis
import org.jfree.chart.axis.NumberAxis

date_axis = DateAxis.new()
price_axis = NumberAxis.new()

# 適当にデータを作成
cal = GregorianCalendar.new(2008, GregorianCalendar::JANUARY, 1)
dates = java.util.Date[5].new()
5.times do |i|
dates[i] = cal.getTime()
cal.add(GregorianCalendar::DAY_OF_MONTH, 1)
end

# to_java(:double)で、RubyのArrayをJavaのdouble型の配列に変換
opens = [100, 125, 150, 200, 150].to_java(:double)
highs = [120, 140, 160, 200, 150].to_java(:double)
lows = [100, 120, 130, 180, 130].to_java(:double)
closes = [115, 140, 155, 180, 135].to_java(:double)
volumes = [1000, 1500, 2500, 5000, 3000].to_java(:double)

dataset = DefaultHighLowDataset.new("Candle", dates, highs, lows, opens, closes, volumes)
renderer = CandlestickRenderer.new()
# 陽線を赤に
renderer.setUpPaint(Color::RED)
# 陰線を青に
renderer.setDownPaint(Color::BLUE)

# ローソクの枠を黒、1ピクセルで描画
renderer.setUseOutlinePaint(true)
renderer.setBaseOutlinePaint(Color::BLACK)
renderer.setBaseOutlineStroke(BasicStroke.new(1))


plot = XYPlot.new(dataset, date_axis, price_axis, renderer)

frame = JFrame.new("example")
chart = JFreeChart.new(plot)
panel = ChartPanel.new(chart)
frame.getContentPane().add(panel)
frame.pack()
frame.show()


2008/5/2 なぜか「5.times do |i|」が「5.times do i」になっていたので修正。

2008年4月22日火曜日

JFreeChartでローソク足チャート(1)とりあえず表示

Javaはクラス定義等が面倒なので、JRubyを使います。
JRuby 1.1, JFreeChart 1.0.9 を使用。

include Java
import java.util.Date
import javax.swing.JFrame
import java.util.GregorianCalendar

import org.jfree.chart.JFreeChart
import org.jfree.chart.ChartPanel
import org.jfree.chart.plot.XYPlot
import org.jfree.chart.renderer.xy.CandlestickRenderer
import org.jfree.data.xy.DefaultHighLowDataset
import org.jfree.chart.axis.DateAxis
import org.jfree.chart.axis.NumberAxis

date_axis = DateAxis.new()
price_axis = NumberAxis.new()

# 適当にデータを作成
cal = GregorianCalendar.new(2008, GregorianCalendar::JANUARY, 1)
dates = java.util.Date[5].new()
5.times do |i|
dates[i] = cal.getTime()
cal.add(GregorianCalendar::DAY_OF_MONTH, 1)
end
# to_java(:double)で、RubyのArrayをJavaのdouble型の配列に変換
opens = [100, 125, 150, 200, 150].to_java(:double)
highs = [120, 140, 160, 200, 150].to_java(:double)
lows = [100, 120, 130, 180, 130].to_java(:double)
closes = [115, 140, 155, 180, 135].to_java(:double)
volumes = [1000, 1500, 2500, 5000, 3000].to_java(:double)

dataset = DefaultHighLowDataset.new("Candle", dates, highs, lows, opens, closes, volumes)
renderer = CandlestickRenderer.new()
plot = XYPlot.new(dataset, date_axis, price_axis, renderer)

frame = JFrame.new("example")
chart = JFreeChart.new(plot)
panel = ChartPanel.new(chart)
frame.getContentPane().add(panel)
frame.pack()
frame.show()

2008年4月18日金曜日

タワー投資顧問 -> サイバーファーム(2377) チャート調整

チャートに市場が休みの日も表示され、ローソクとローソクの間隔が広くなりすぎるので、土日を表示しないようにしました。
http://sohgetsu.googlepages.com/tower.html

2008年4月14日月曜日

タワー投資顧問 サイバーファーム(2377) 全株売却。 データ更新

変更保有報告書(大量保有) H20.04.14 提出分を反映。
http://sohgetsu.googlepages.com/tow
er.html

ついに、タワー投資顧問の損切りが終了しました。

2008年4月13日日曜日

SBIイー・トレード証券から他社への移管手続き

手続き書類のPDFファイルは提供されていないので書類を請求する必要があります。

ログインして、
サービス案内 -> 株券移管・入庫・出庫 -> 株券出庫サービス から
特定口座なので「特定口座内上場株式等移管委託依頼書」を請求。

以前移管した時(2008年2月頃)
記入ミスしてしまい、訂正しました。
訂正する場合、訂正印は4枚全てに押す必要があるそうです。

1.日曜日の夜にポストに投函。
2.金曜日(夜7時ごろ確認)にイートレード証券の口座から手続きした株が消える。
3.次の週の火曜日に移管完了(確認は水曜日)

今回移管した時
1.火曜日の夜にポストに投函。
2.次の週の水曜日にイートレード証券の口座から手続きした株が消える。
3.金曜日に移管完了(確認は土曜日)

という具合で移管できました。

2008年4月11日金曜日

タワー投資顧問 サイバーファーム(2377) データ更新

変更保有報告書(大量保有) H20.04.11 提出分を反映。
http://sohgetsu.googlepages.com/tow
er.html


ローソク足の枠を黒、陽線を赤に変更。

2008年4月10日木曜日

タワー投資顧問 サイバーファーム(2377) 更新

変更保有報告書(大量保有) H20.04.10 提出分を反映。
http://sohgetsu.googlepages.com/tow
er.html


2008/4/4時点で7,360株保有。
まだ反映されていませんが、4/8, 4/10の出来高がかなり増えています。

2008年4月3日木曜日

タワー投資顧問の処分売り(サイバーファーム)

タワー投資顧問の売りがすごいのでチャートにしてみました。



タワー投資顧問の大量保有報告書、変更報告書(大量保有)
第2 提出者に関する事項
(5)【当該株券等の発行者の発行する株券等に関する最近60日間の取得又は処分の状況】
より作成
 
CSVファイル http://sohgetsu.googlepages.com/tower.csv

2008/4/8 別サイトに専用のページを作りました。 [変更報告書(大量保有)が出るたびに更新予定]
http://sohgetsu.googlepages.com/tower.html