Google+でShareしたブックマークをevernoteに転送できない（調査中）

賛否両論のGoogle+ですが、Readerを使ってきた身としては、新機能がけっこうつらいです。
共有機能がなくなり、共有した記事をevernoteに転送してくれるツールなどが使えなくなってしまいました。

どうすればいいのかなあと考え中です。
とりあえず、一般公開（Public）にした記事のRSSは、http://plu.sr/ユーザIDで取得できます。
で、doRubyさんの記事を参考にして、RubyでRSSを取得することもできます。
後は、これを一個ずつ取り出して、evernoteの登録アドレスに転送すれば、とりあえずの用途は満たします。
その際、登録したノートブック名に@をつけたものをタイトルに追加しておくと、指定したノートブックにデータを登録できます（出所）。

tmail使えば、タイトルの編集や送信も簡単だから、やろうと思えばできますね。
あと、気になっているのは、できればRSSから全文を取得したいということ。
さきほどのmatuダイアリーさんの記事では、instapaperを使えば大丈夫とのことですが、plu.srで取得したRSSのリンク先は、Google+のRSSなんですよね。
こちらは、RSSリーダーでもともと取得した記事そのものなので、サイトが出力した部分しか含まれていません。

ということは、RSSを取得して、そのリンク先であるGoogle+から、さらにリンク先を見つけてInstapaperに渡せばいいということ。
ソースを見てみると・・・何これ？
こんなシンプルなページが、なんでこんなにコードが。。。
どうも、class="B-u-Y"の次にあるリンクを探せば大丈夫みたい。

あとはコード書くだけか。。。
誰かやってくれそうだけどなあ。

MiyakoでTetris

先日のエントリのとおり、Miyakoを使って、Tetrisを作ってみた。
ずいぶん時間がかかった。
Miyakoはあんまリアルタイムゲーム向きのライブラリじゃないのかな？
動きがぎくしゃく＆キー入力が微妙。

これをもう少し遊べるように改造するのはありかもしれないけど、とりあえず、「できた！」ってことで、終わりにしておこうかな。

ちなみに所要時間は、４日ぐらいかな。
スコアをつける、落下スピードを変える（早くなる）、ブロック消すときのイフェクト、次のブロックを表示、などの改善が考えられそう。
というか、こういうのを改善しないと、ゲームとしてはおもしろくないですね。

ソースは、以下に貼り付けておきます。

# -*- coding: utf-8 -*-
# Miyako Tetris
#
#
# 2010 mole

require 'miyako'

include Miyako

$sprite_size=16
$depth=2
Width = 10
Height = 20
Color[:gray] = [200,200,200,255]
Color[:orange] = [255, 160, 64]
Color[:dark_orange] = [80, 50, 20]
Color[:half_orange] = [128, 80, 32]
# 画面描画自動化のために、Sprite.[]=メソッドで登録
# Sprite[:blocks] = @blocks
# Sprite[:red_ruby] = @red_ruby
# Sprite[:blue_dia] = @blue_dia




$blockcolors = Array.new(7)
$blockcolors[0] = "black"
$blockcolors[1] = "green"
$blockcolors[2] = "cyan"
$blockcolors[3] = "blue"
$blockcolors[4] = "orange"
$blockcolors[5] = "purple"
$blockcolors[6] = "yellow"
$blockcolors[7] = "red"
$blockcolors[8] = "gray"

Blockparts = Array.new(7)
Blockparts[0] = []
Blockparts[1] = [[-1,0],[0,0],[0,1],[1,1]] # tetris
Blockparts[2] = [[0,0],[1,0],[-1,1],[0,1]] # invers tetris
Blockparts[3] = [[0,0],[0,1],[1,1],[2,1]] # L
Blockparts[4] = [[-1,0],[0,0],[1,0],[2,0]] # bar
Blockparts[5] = [[0,0],[0,1],[1,0],[2,0]] # invers L
Blockparts[6] = [[-1,0],[0,0],[1,0],[0,1]] # T
Blockparts[7] = [[0,0],[1,0],[0,1],[1,1]] # square


class Blocks
def initialize(tp = 1, x = 5, y = 1)
@tp = tp
@x = x
@y = y
@parts = Marshal.load(Marshal.dump(Blockparts[@tp]))
end
def move(nx, ny)
if check_move(nx,ny) then
@x=nx
@y=ny
end
end
def turn()
@parts.each {|bp|
bx = bp[0]
by = bp[1]
bp[0] = -by
bp[1] = bx
}
if !check_move() then
@parts.each {|bp|
bx = bp[0]
by = bp[1]
bp[0] = by
bp[1] = -bx
}
end
end
def check_move(nx = @x, ny = @y)
@parts.each {|bp|
new_pos = nx+bp[0]+(ny+bp[1])*(Width+2)
if !((new_pos>0) and (new_pos < (Width+2)*(Height+1)) and $stage[new_pos] == 0) then
return false
end
}
return true
end

def show()
@parts.each {|bp|
draw_block(@x+bp[0],@y+bp[1],$blockcolors[@tp])
}
end
def fix()
@parts.each {|bp|
$stage[@x+bp[0]+(@y+bp[1])*(Width+2)]=@tp
}
end
attr_accessor :x,:y,:parts, :tp
end

def erase_line (auto_erase = true)
filled_line = Array.new
for i in 1..19 do
check_line = 0
for j in 1..Width do
check_line = check_line+1 if $stage[j+i*(Width+2)]>0
end
if check_line == Width then
filled_line << i
end
end
filled_line.each{ |l|
for i in 0..l-1 do
for j in 1..Width do
$stage[j+(l-i)*(Width+2)]=$stage[j+(l-i-1)*(Width+2)]
end
end
}

end

def new_game()
@bl1=Blocks.new(1)
@tet_timer = WaitCounter.new(300)
$start = 1
$gameover = false
@tet_timer.start
clear_stage()
end

def s_pos(x,y)
return x+y*(Width+2)
end

def draw_stage()
for i in 0..Width+1 do
for j in 0..Height do
draw_block(i,j,$blockcolors[$stage[s_pos(i,j)]])
end
end
@bl1.show()
end

def clear_stage()
$stage = Array.new((Width+2)*(Height+1),0)
for i in 0..Height do
$stage[s_pos(0,i)] = 8
$stage[s_pos(Width+1,i)] = 8
end
for i in 0..(Width+2) do
$stage[s_pos(i, Height)] = 8
end
end

def draw_block(pos_x,pos_y,col)
x=pos_x*$sprite_size
y=pos_y*$sprite_size
if col != "black" then
Drawing.rect(Screen, [x,y,$sprite_size,$sprite_size],eval(':'+col),true)
Drawing.rect(Screen, [x+$depth,y+$depth,$sprite_size-$depth*2,$sprite_size-$depth*2],eval(':dark_'+col),true)
Drawing.rect(Screen, [x+$sprite_size-$depth,y,$depth,$sprite_size],eval(':half_'+col),true)
Drawing.rect(Screen, [x,y+$sprite_size-$depth,$sprite_size,$depth],eval(':half_'+col),true)
end
end


def player_move()
input_key = Input.pushed_amount
if (input_key[1]==1) then
@bl1.move(@bl1.x, @bl1.y+1)
elsif (input_key[1]==-1) then
@bl1.turn()
elsif !(input_key[0]==0) then
@bl1.move(@bl1.x+input_key[0], @bl1.y)
end
end

def block_down()
if ((@tet_timer.now % 3 ) == 0)
if @bl1.check_move(@bl1.x, @bl1.y+1) then
@bl1.y = @bl1.y+1
else
block_new()
end
end
end

def block_new()
@bl1.fix()
erase_line(true)
@bl1=Blocks.new(rand(max = 7) + 1)
@tet_timer.reset
if !@bl1.check_move() then
$gameover = true
end
end

$start = 0
$gameover = false
Miyako.main_loop do
break if Input.quit_or_escape?
if ($start==0) then
new_game()
elsif $gameover then
if Input.pushed_any?(:btn1) then
$start = 0
end
else
player_move()
block_down()
end
draw_stage()
end

ゲームライブラリMiyakoをインストールしてみた

日経ソフトウェアの連載でおもしろそうな方がいたので、ネットで検索してみると、１時間でテトリスを作ってみたという動画をニコニコ動画に公開していた。
どうしても気になって、ニコ動、ユーザ登録して、視聴してみたら、ほんとうに１時間強でテトリスができあがっていた。
しかも、開発環境のインストールも含めて。

これ、ほんとうにすごいことだなあ。
僕も久々にゲーム作ろうかなと思い、以前から気になっていて本だけは買っていたゲームライブラリのMiyakoのインストールを試みる。
予定では、Tetrisの画面ぐらいまでは作成して寝ようかなというところ。

ところがこれが、おおはまり。
Rubyのインストールまでしたのに終わらない（涙）

というわけで、一応やったことの記録。

1. Ruby 1.9.1のインストール
2. Macports経由で、SDL関係（libsdl, ttf, gfx, image）、rubysdlなどなど。
   この際、あまりにもエラーが多いので、port upgrade outdated すると、かなりうまく動いた。
3. 依存パッケージとしてインストールされる、help2manがエラーが出る。めんどうなので、perlモジュールをチェックする部分をコメントアウト。
   後で泣きを見るかもしれないけど、とりあえず今はMiyakoを動かすことが最優先。
4. SGEをインストール。
   国内のURLを紹介しているサイトのリンクはリンク切れ。
5. gem経由で、rsdl、miyakoをインストール
   sudo gem install ruby-miyako

以上でインストールは何とか終わったのだが、ここからのエラーが苦しかった。
サンプルを動かそうとすると、sans-serifが見つからないというエラー。
本を参照すると、serifが明朝系、sans-serifがゴシック系のデフォルトフォントらしい。
このフォントは、OSによって適当なものが割り当てられているのだが、どうもこれを見つけることができない。

OSX（Snow Leopard）の場合は、ヒラギノ系が指定されているが、とりあえず、Osaka.ttfをfont.rbに追加してみる。
そうすると、ぶじ動く。

次に、ヒラギノをサンプルのあるディレクトリにコピーして起動するも、エラー。
ヒラギノをhiramin.otfなどの名前に変えて見ると、うまく動く。

どうやら、日本語のフォント名のサーチに失敗している模様。
Rubyの問題かと思って、スクリプトを書いてみて、日本語フォントを読めているかチェック。

Dir.glob("/Library/Fonts/"+"*") {|d|
d = d.encode(Encoding::UTF_8)coding::UTF_8))
d = d.tr("\\", "\/")
print d +"\n" if (d =~ /\/([^\/\.]+\.otf)\z/)
}

というスクリプトを作ってテストしてみても、ちゃんと読めている。
たぶん、こうして読み込んだフォント名と、font.rbで指定したフォント名のマッチの部分がおかしいのだと思う。

が、この辺で力尽きる。

とりあえず、ヒラギノ明朝と角ゴをhiraminとhirakakuというリンクを張り、これをfont.rbで指定してやることで、何とか動くようになった。
やれやれだ。