円い月の丸い兎 - そして誰もまるくなった -

蜂蜜っていうと蜂が集めた花の蜜だけど、オーストラリアでは鰐蜜なるものを製造しているらしい。
ワニが花に集まる習性を利用して花の蜜を集めて作られるもので、色は蜂蜜よりも黒蜜に近いのだとか。
まだ日本での知名度は低いが、ヨーロッパを中心に健康食品として広がってきているそうです。

なんかお久しぶりです。
相変わらず随筆は放置気味。
活動拠点が変わったんでしょうかね、mixiあたりに。
変わったってほど活動してませんが。
そういや読書ペースも落ちてきたような。
なんかたまたまホラーの本を二連続で引いちゃって早く読み終わらないと別のジャンルにいけないけどなんかめんどくさいや的な感覚で。
ライトノベル関連で「嘘つきみーくんと壊れたまーちゃん」を読んだけど割と気に入った。
主人公が嘘つきでヒロインはネジが外れてるみたいな・・・うん説明になってないね。
続編も読みたい気がするけど、これで本当に続編書けるんだろうかって思った。
なんか十分完結しているというか、え？続編でも事件起こすんですか？みたいな。
随筆にこない間に何をしていたかって言うとだらだらニコニコ動画見たりmixi見たりプログラミングしたり、まあそんな感じだったと思います。
それからこっそりニコニコに動画初投稿してたりしました。
元のAVIが5.5GBくらいあって、H.264でエンコしたら12MB程度に。
画質が落ちる落ちる。
一般ユーザーのビットレート上限って結構低いなぁと感じます。
でもこっちで紹介するのは当面見送りにします。
ていうか本格的にFlash製作始めたいのだけど画力がなぁ・・・。
いろいろと絵を描くためのフリーソフトを導入したのですがなかなか使い方が理解しきれない。
タオルの人、あの様子からして脳の手術が成功したみたいで一安心。
あとはいしゅかんこうはいじっけんのせいこうをまつのみですね。
しかし4の話は流れてしまったのだろうか・・・。

成人の日から大分経っちゃったけど、今年度成人を迎えられた（迎えられる）みなさんおめでとう御座います。

なんか新たな伝説が生まれたみたい？（笑）
http://www.nicovideo.jp/watch/sm9393749

誰か踊ってくれることを期待。

とりあえず選挙にいきましょう・・・。

誰だっけ？
天丼食べせいか胸焼けがする。
無駄に衣が分厚い＆油っこい。
なんだっけこういう時はキャベ人？

「年下嫌いだった」大学３年、弟の殺人未遂容疑

　愛知県警知多署は１７日、同県知多市南粕谷本町、大学３年江端玄喜容疑者（２１）を殺人未遂容疑で現行犯逮捕した。
　発表によると、江端容疑者は同日午前１時１０分頃、自宅台所で、弟で大学１年の拓真さん（２０）の背中を包丁で刺すなどし、殺害しようとした疑い。母親が１１９番し、拓真さんは病院に搬送されたが、命に別条はないという。
　調べに対し、江端容疑者は「以前、年下からいじめられたことがあり、年下が嫌いだった。弟も疎ましかった」と供述しているという。江端容疑者は両親と姉、拓真さんとの５人家族だった。

http://www.yomiuri.co.jp/national/news/20100117-OYT1T00210.htm

可愛そうに、あと一年早く生まれていれば刺されることもなかったろうに？

1歳年が低いだけで人を嫌いになっているようでは、犯人の将来は絶望的だね。
年を重ねるごとに年下はどんどん増えていくんだから。
1年後には41%、5年後には48%、10年後には56%、40歳になる頃には69%が年下になってしまう、彼の人生の苦痛は想像を絶するよ。
そんなことを言う犯人なんか嫌いです。

※日本だけで考えれば幾分緩和されるはず。
※グラフは非常におおざっぱな方法による予想。

KOKIAという人の「ぴんくの象」という曲が凄く良い感じ。
http://www.nicovideo.jp/watch/sm1097696
さっきダンボのピンク象パレード探してたらたまたま見つけた。
ちなみにpink elephantというのは幻覚を意味する表現として使われたりします。

なんか1週間ぐらい随筆の存在そのものを本気で忘れてた。
その間にしていたことと言えば絵師さんのサイトをいくつか毎日訪問していたのと、pixivでいろいろ画像を探していたのと、mixiをいろいろ巡回していたのと、2chのとあるスレを見張っていたのと、弾幕風のスクリプトを書いていたぐらいかな。
時は有限、一度に集中できることはそれほど多くはない。

Excelは楽しいね。
楕円の円弧長をプロットしてみた。
X軸は角度（弧度法）、Y軸は円弧長。
ここでは、X-Y座標系の原点Oを中心とする半径1の円をY方向に圧縮してできる楕円を想定しています。
角度とは圧縮する前の円上のある地点Aの原点Oに対する角度、円弧長とは圧縮した後の楕円の最突部(1, 0)から楕円上のある地点A’までの円弧の長さのこと。

凡例の0.05から1までの数は長径に対する短径の比を表します。
比が1ならば円と同じなので、円弧長の増加は一定となり、90°の地点までの長さはπ/2≒1.57となっています。

楕円の円弧長は簡単には求められないので、楕円を細かく分割し、総和をとって近似値を得ています。
細かく分割するほど正確な値になるのでExcelのシートを広々と使って計算すれば十分に近い値が得られます。

東方弾幕風のスクリプト作ってて、楕円上に一定間隔に並べたいなとか思ったりしたのですよ。
この手の問題はあらかじめ座標を計算しておくに限ります。
近似式を求めておくという手もあるけど。

mixi用のGreasemonkeyユーザースクリプト作成した（FirefoxにアドオンのGreasemonkeyを入れる必要あり）。
ほぼ自分用で作ったものだし需要があるとも思えないけど一応公開してみる。
機能は足あとの色分け。
自分のところに足あとをつけてきた相手が、自分も最近足あとを付けた相手だったら名前部分に背景色が付くというもの。
知らない人の足あとを観て、あれ？この人のところは行ったことあったっけ？とよく悩むことがあるので・・・。

http://www5.atpages.jp/rabbitbelly/js/coloring_footprints_mixi.user.js

自分が付けた足あと一覧を検索しているだけなので、過去30件の自分がアクセスした相手にしか色は付きません。

直った。
結局atan2の使い方が間違いだったみたい。
よく理解していないけど（笑）この間作ったXYToAngle関数を使うことにする。
でもあんまり綺麗でもないですね・・・。
まあめちゃくちゃシンプルな方法だもんね。
敵を移動させるのとか加速度を与えるのとかレーザーとかいろんな攻撃パターンを複合させるとかいろいろ試さねば。
BGMがないと寂しいので「いくぞ！ばいきんまん」をフルで流すようにしておいた。
中央は安地、弾の発射方向を180°変えるだけで解消されるけど。

自分でも何でこんな軌道になったのか理解できない。
弾の出現位置は正方形にならなければおかしい。
バグというか仕様というか、東方弾幕風のスクリプトの配列の扱いって危なっかしいな。
配列の要素に+=とか++とかを使うとエラーになることに今気づいた。

なんてこったい、どこの店に行っても食パンがことごとく品切れだたよ。
年明け恐るべし。
そうか、パンが無いならお菓子を食べればいいのか。

タオルケットの同人誌。
光恵アナと裏表紙のにゃにゃも。
2の光恵さんは本当に鬱展開すぎる。
pixivで予告あったのでコミケ3日目に買ってきました。
lainネタが出てきてちょっとびっくり。
意外と好きな作品が被るのかも。

裏の最後の続きがもの凄く気になるんだけど・・・まさかのなかったことに？？？
しかも新作「タオルケットをもう一度/海」だって？
うー、続きもプレイしたいけど海にも期待（笑）

結構前に公開されていたみたいだけどタオルケットの手描きアニメ。
http://www.nicovideo.jp/watch/nm7954229
思い出したら泣けてくる・・・。
2の動画も制作中らしい。

弾幕風、ちゃんと角度を求める関数が最初から入っていたみたい → atan2(x, y)。

ソース全体。
避けるのは簡単、もっと改良が必要。
見た目はさほど綺麗でもない、もっと（略）。
TYPE1とTYPE2のコメントアウトを入れ替えれば多少雰囲気が変わる。

ちなみに本家は体験版の前半で詰まっている状態なので、実際のところどのようなシステムがあるのか余り把握していない。
静止画では余り状況がつかめないし、見栄えがましになってきたらニコニコあたりにupしてみるかも。

#東方弾幕風
#Title[テストスクリプト005]
#Text[テストスクリプト005]
#ScriptVersion[2]

script_enemy_main {
let imgBoss = "script\img\ExRumia.png";
let frame = 0;
let angle = 0;
let base_angle = 0;
let delta_angle = 14;
let vertex_num = 7;
let partition_num = 13;
let style_num = 1;
let vertex_angles;
let vertex_x;
let vertex_y;
let vertex_distance = 150;
let ary_x;
let ary_y;
let i;
let j;

function MultiwayShot01(let count, let spread_angle, let x, let y, let speed, let angle, real bullet_style, let delay) {
let n = 0;

loop (count) {
CreateShot01(x, y, speed, angle + spread_angle * (n / (count - 1) - 0.5), bullet_style, delay);
n++;
}
}

function EqualDistanceArray(let count, let num0, let num1, let zero) {
let numbers = [];
let delta = num1 - num0;
let i;

if (zero) {
ascent (i in 0..count) {
numbers = numbers ~ [delta * i / (count - 1) + num0];
}
}
else {
ascent (i in 0..count) {
numbers = numbers ~ [delta * (i + 1) / count + num0];
}
}

return numbers;
}

function XYToAngle(let x, let y) {
let angle = 0;
let len = (x ^ 2 + y ^ 2) ^ 0.5;
let cos_value = x / len;
let sin_value = y / len;

if (len > 0) {
if (absolute(cos_value) < absolute(sin_value)) {
angle = ([1, -1][y < 0] * acos(x / len) + 360) % 360;
}
else {
angle = ([1, -1][x < 0] * asin(y / len) + [0, 180][x < 0] + 360) % 360;
}
}

return angle;
}

@Initialize {
SetX(GetCenterX);
SetY(GetCenterY);
SetLife(2000);

LoadGraphic(imgBoss);
SetTexture(imgBoss);
SetGraphicRect(0, 0, 63, 63);
}

@MainLoop {
SetCollisionA(GetX, GetY, 24);
SetCollisionB(GetX, GetY, 24);

frame++;
if (frame % 50 == 0) {
/*
// ******** TYPE1 ********
style_num %= (vertex_num - 1);
style_num++;
*/
// ******** TYPE2 ********
style_num++;
style_num = [style_num, 2][style_num >= vertex_num - 2];

base_angle += delta_angle;
base_angle %= 360;
vertex_angles = EqualDistanceArray(vertex_num, base_angle + 360, base_angle, false);
vertex_x = [];
vertex_y = [];
ascent (i in 0..vertex_num) {
vertex_x = vertex_x ~ [vertex_distance * cos(vertex_angles[i])];
vertex_y = vertex_y ~ [vertex_distance * sin(vertex_angles[i])];
}

ascent (i in 0..vertex_num) {
ary_x = EqualDistanceArray(partition_num, vertex_x[i], vertex_x[(i + style_num) % vertex_num], true);
ary_y = EqualDistanceArray(partition_num, vertex_y[i], vertex_y[(i + style_num) % vertex_num], true);
angle = atan((ary_x[partition_num - 1] - ary_x[0]) / (ary_y[partition_num - 1] - ary_y[0])) + 60;
ascent (j in 0..partition_num) {
CreateShot01(GetX + ary_x[j], GetY + ary_y[j], 1.5, XYToAngle(ary_x[j], ary_y[j]) + 180, RED01, 30);
}
}
frame = 0;
}
}

@DrawLoop {
DrawGraphic(GetX, GetY);
}

@Finalize {
DeleteGraphic(imgBoss);
}
}

ただ芋、帰ってきたよ。
今日は1日目よりも暖かかったかな。

マスク持って行って良かった。
インフルエンザ予防の意味合いもあるけど、空気が冷たい中でも鼻や口元の熱や湿気が保たれていいですよね。

電車の中で気づいたのですが、見に行きたいサークルをメモした紙を家に置いてきてしまい、会場内をかなり歩き回る羽目になりました。
会場内だけでも5km以上歩いたんじゃないかな？
まあ最優先のところの番号だけは記憶していたのですぐ見つけられたけど。

ぴろぴとさんのところは一番最初に見に行って、漫画2冊と絵葉書2枚を買いました（画像）。
他はサークル名しか覚えていないところばかりなので、ひたすら歩いて一つ一つ見つけていった。
某大学のサークルでタオルケットのコピー本買ってきた。
わらわぅのもらいゲロは謎だよね。
No.3のペーパークラフト？も置いてあった。
夢野久作の少女地獄を漫画化したものがあってつい購入。
他にも何か面白いモノがあったような気がするけど思い出したら書くことにします。

もっと早く帰ってくる予定がかなり歩くはめになって結構疲れましたけど、結果的には満足かな。

おはようさん、コミケ3日目行ってくる。

兎腹ポコー 8:50「三日目」

終了条件1：ぴろぴとの漫画を入手
ヒント：ありさん・・・。

今まで気づかなかったのですが、pixivってデフォルトではR-18タグ（エロ）やR-18Gタグ（グロ）が入っている画像は表示されないみたいですね。
表示されるように設定しなおして、今までリストに無かった画像がいろいろ見られるようになって思いだしたのですが、昔（中学ぐらい？）は好き好んでグロな絵を結構集めてたんですよね。
毒のある絵というかメルヘンでグロテスクな絵が凄く好きだった。
データはとっくの昔に処分してしまったような気がしますが・・・。
今も嫌いじゃないですけど。

直交座標から極座標上の角度を得る関数をちょこちょこ改造。
さっきの図が間違ってたので差し替え。
パラメータをいじって見栄えの変化を観察中。

さてね、豆腐でも食べればいいのかもしれない？

function XYToAngle(let x, let y) {
let angle = 0;
let len = (x ^ 2 + y ^ 2) ^ 0.5;
let cos_value = x / len;
let sin_value = y / len;

if (len > 0) {
if (absolute(cos_value) < absolute(sin_value)) {
angle = ([1, -1][y < 0] * acos(x / len) + 360) % 360;
}
else {
angle = ([1, -1][x < 0] * asin(y / len) + [0, 180][x < 0] + 360) % 360;
}
}

return angle;
}

さっきの関数を利用して9の頂点を持つ星形を描いた例。
頂点のつなぎ方を順に変えることでいろんな星形
方向のアルゴリズムを工夫していないので移動は直線的。

東方弾幕風って二次元配列も配列渡しもできないようになっているのか・・・。
配列を返す関数で代用するしかないなぁ。

num0からnum1までの間の等間隔なcount個の数値を配列で返す関数。
zeroは配列にnum0を含めるかどうかの真偽値。
弾を等間隔に並べるための座標設定なんかに使える。
もっと格好いい関数名にしたいけど思い浮かばない。

画像は2つの5Way弾を一直線上の5ヶ所から発射する例。

function EqualDistanceArray(count, let num0, let num1, let zero) {
let numbers = [];
let delta = num1 - num0;
let i;

if (zero) {
ascent (let i in 0..count) {
numbers = numbers ~ [delta * i / (count - 1) + num0];
}
}
else {
ascent (let i in 0..count) {
numbers = numbers ~ [delta * (i + 1) / count + num0];
}
}

return numbers;
}

探せばどこかに転がってそうだけどとりあえずn Way弾を生成する関数。
countに弾数、spread_angleに広がり角を入れて後はCreateShot01の引数の順にいれること。
ていうか小学生レベルの算数なんだけどな。
もっとすらすらとコードを考えられるようじゃないと・・・。

画像は広がり角82.5°の12 Way弾を4方向に少しずつ角度をずらして発射してみた例。
82.5は90 * (12 - 1) / 12の計算から。

ちなみに自分で作っておいて自分では避けられない。

function MultiwayShot01(let count, let spread_angle, let x, let y, let speed, let angle, real bullet_style, let delay) {
let n = 0;

loop (count) {
CreateShot01(x, y, speed, angle + spread_angle * (n / (count - 1) - 0.5), bullet_style, delay);
n++;
}
}

角度計算が面倒だなぁ、ちょっとうっかりしていると予想と全然違う挙動を示す・・・。
とりあえず凡庸関数を自作しておいた方が良いか。

コミケ2日目、どんな感じだったろうね、特に欲しいものは無いので2日目はスルー。
東の1/4が東方関連だったみたいだけどかなり混雑したんだろうかな。
そういえば納豆カレーを売っているという放送が流れてましたけど買った人いる？
水戸だからとにかく納豆に結びつけておけば的な発想は安直すぎるのではないだろうか・・・、もちろん商品として優れていれば全然かまわないけど。

タオルケットをもう一度・裏クリアしたー。
・・・ぐはっ・・ハートフルボッコにされた・・・。

あごちゅ博士とぷっちのやりとりは最初は和ませられてたけど、ラブラブになってきたあたりからだんだん自重しなくなってきて誰か二人を止めろよ的な展開に（笑）。
ズッケ告白もいいなぁ・・・。
旧作のもーちゃすの扱いひでぇ、牛ちゃん視点だとストーカーかよ（笑）

パーティのメンバーやバトル不参加で一緒に付いてくるキャラをマップ上に配置するやり方は会話が楽しめて良かったと思う。
過去の作品よりグロ展開がかなり控えめになった代わりに、百合展開多め＋ヤンデレな感じで割と仲良くほのぼのと（？）物語が進行するんだけど・・・。
・・・最後にハートフルボッコ展開で。

わらわぅはずっと前に狂ってしまいました、にゃにゃもも狂ってしまいました・・・。
心を解放したのがいけなかったのかな？

続編の4が出るなら絶対プレイしたい。

20分仮眠する予定が爆睡してて目覚めたら2時間経ってた。
全く目覚ましに気づかなかった模様。

タオルケット裏プレイ中。
進み方が分からなかったところが、実はもの凄く簡単だったという。
あごちゅ博士とぷっちの会話が和む。
唐揚げタンポポのうた再登場シーン。
なんで犬と牛から作ったロボットなのかが判明して笑った。

国府は何度でも刺しに来る。

国府ってだれさ。

朝永先生の物理とは～を行って帰って来るまでに読み切るつもりだったんだけど帰りの電車で眠気に襲われてまだ30ページぐらい残ってる。

ムスカの頭像の出来が見事だった。

さむい。
ねむい。
学校行きたくない。
おじぎり、ひとつだけちょうだい。
ビッグサイトいてきます。

うちのキーボード、NumLockとかのランプのLEDがうおっ！まぶし！なんだけど、フィルタみたいなのを中に入れて減光すればいいという話を聞いた。
これは良いアイデア。
今度試してみよう。

綺麗な弾幕はどうすればできるか。
静止状態の図柄が綺麗な弾幕は？
動きが綺麗な弾幕は？
実際に図面を書いて数式を考えた方が楽かもしれないが、動的な綺麗さというものは直感ではイメージしにくいかも知れない。
極座標と直行座標それぞれの特性を活かすと良いのではないか。
擬似的に三次元的な表現は使えないだろうか？
弾幕風にビット演算子があったら凄く便利になりそうな予感、欲しけりゃ全部0から作るしかないか。

ぬぉー！！絶望工場再販きたー！
これは冬コミでも販売するのかな？
31日待ち遠しや。
カリガリもそのうち観ましょう。