ぷろぐらむ - あふぉらいと

「ぷろぐらむ」のめも一覧

しゅーてぃんぐ妄想

2010/03/15 17:20

例によって仕事がだるまってきたので
妄想とか色々と。

縦スクロールシューティングで
移動はFPSっぽくWASD、ついでに照準はマウスで！
とかどうだろう。

※一度枠内をクリックしてくだし。

こんな感じの。

あれー・・・なんか動かしてみたら思ったより普通・・・

セルフレッスンタイマー

2009/02/24 00:00

予定通り全力でアイマスSPプレイ中です。

しかしレッスンの難易度が地味に上がってて
グッドすら取るのがまんどくさい風味なので
セルフレッスンに頼り切ってます。

そして時間忘れてアイドルに罵倒される仕事が・・・

とりあえずそんなご褒美を避けるために簡単なツールを。

　　セルフレッスンタイマー

仕事だるかったんでつい勢いでですね・・・

たまにはプログラマっぽい話題を。
Flashで筆圧とかいう謎技術について。

JavaアプレットだとJTabletとか使ってなんとか筆圧感知できるんですが、
Flashだと現状で筆圧取る手段がないっぽいんです。

そのせいか現状で筆圧使えるお絵かきチャットは
しぃ絵ちゃとかJavaのモノしか無いような感じです。

最近Flashのお絵かきツールが流行ってきてる気配なのに
筆圧が使えないってのはちょっと物足りないかなーって。

しかしJavaで筆圧取れるんなら
それをFlashに渡してやれば筆圧取れるんじゃね？って気づいてですね。

　　※白い枠内にタブレットでなんか描いてみてかだし。

　　※実行にはFlashPlayer9、Java、JTabletが必要だります。

ちょっと試作してみたら筆圧取れた！これでかつる！

とりあえずJavaアプレットで筆圧とれるようにして

FlashからJavaScript経由でJavaアプレットの筆圧読み出し。

実行速度的にちょっと不安ですがなんとかおｋっぽい。

誰かコレ応用して強まったFlashお絵かきツール作らないかなぁ・・・

　　MixiとかPixivとかのツールは微妙すぐる

おまけ / ソースコード

　　※内容とかコンパイル方法とかについては説明まんどくさいのでぐぐれかす

Javaソース / Tablet.java(Tablet.class)

　　※筆圧感知してJavaScriptから値を取れるようにするモノ

　　※コンパイルにはJavaとJTabletのSDKが必要です


import java.applet.*;
import cello.tablet.*;
 
public class Tablet extends java.applet.Applet
{
	private JTablet m_jtablet;
	private boolean m_f_init=false;
 
	public void init()
	{
		try {
			m_jtablet = new JTablet();
			} catch (JTabletException jte) {
			System.err.println(jte.toString());
		}
		m_f_init = true;
	}
 
	public int getPressure() { //現在の筆圧取得するお
		if ( !m_f_init ) return 0;
		try {
			m_jtablet.poll();
			} catch (JTabletException jte) {
			System.err.println(jte.toString());
		}
		return m_jtablet.getPressure();
	}
	public int getPressureMax() { //最大値取得するお
		if ( !m_f_init ) return 0;
		try {
			m_jtablet.poll();
			} catch (JTabletException jte) {
			System.err.println(jte.toString());
		}
		return m_jtablet.getPressureExtent();
	}
}

Flashソース / paint.mxml(paint.swf)

　　※ごく簡単なお絵かき

　　※コンパイルにはFlex3のSDKが必要です

<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" applicationComplete="init();" layout="absolute" frameRate="30">
	<mx:Script>
		<![CDATA[
			import mx.controls.Image;
			import flash.external.ExternalInterface ;
 
			private var m_img:Image;
			private var m_bmpd:BitmapData;
			private var m_bmp:Bitmap;
			private var m_line:Shape;
			private var m_pen_size:Number;
			private var m_pen_alpha:Number;
			private var m_f_mousedown:Boolean;
 
			private function init():void {
				m_pen_size		= 1.0;
				m_pen_alpha	 = 1.0;
				m_f_mousedown	 = false;
 
				m_img = new Image();
				m_img.width	 = 400;
				m_img.height	= 400;
				m_img.x		 = 50;
				m_img.y		 = 50;
				m_canvas.addChild( m_img );
 
				m_bmpd	= new BitmapData(400,400,true,0xffffffff);
				m_bmp	 = new Bitmap(m_bmpd);
				m_img.addChild(m_bmp);
 
				m_line	= new Shape();
				m_img.addChild(m_line);
 
				m_img.addEventListener(MouseEvent.MOUSE_DOWN, onMouseDown);
				m_img.addEventListener(MouseEvent.MOUSE_MOVE, onMouseMove);
				m_img.addEventListener(MouseEvent.MOUSE_UP, onMouseUp);
				m_img.addEventListener(MouseEvent.ROLL_OUT, onMouseUp);
			}
 
			private function onMouseDown(evt:MouseEvent):void {
				m_f_mousedown = true;
 
				updatePenState();
				m_line.graphics.clear();
				m_line.graphics.lineStyle(m_pen_size,0,m_pen_alpha,true);
				m_line.graphics.moveTo(m_img.mouseX,m_img.mouseY);
 
			}
			private function onMouseMove(evt:MouseEvent):void {
				if (!m_f_mousedown) return;
 
				updatePenState();
				m_line.graphics.lineStyle(m_pen_size,0,m_pen_alpha,true);
				m_line.graphics.lineTo(m_img.mouseX,m_img.mouseY);
			}
			private function onMouseUp(evt:MouseEvent):void {
				if (!m_f_mousedown) return;
				m_f_mousedown = false;
 
				m_bmpd.draw(m_line);
				m_line.graphics.clear();
			}
 
			private function updatePenState():void {
				// JavaScript経由で筆圧を
				var prs:int	 = parseInt( String( ExternalInterface.call("getPressure") ) );
				var prs_max:int = parseInt( String( ExternalInterface.call("getPressureMax") ) );
 
				m_text.text = "Pressure:"+prs+"/"+prs_max;
 
				if (prs_max==0) return;
 
				m_pen_size	= 20.0*(prs/prs_max);
				m_pen_alpha = prs/prs_max;
			}
 
		]]>
	</mx:Script>
	<mx:Canvas x="0" y="0" width="500" height="500" id="m_canvas" backgroundColor="#cccccc">
	</mx:Canvas>
	<mx:Text x="50" y="450" id="m_text" />
</mx:Application>

HTMLソースの例 / paint.html

　　※上のJavaとFlashを連携させた例

　　※swfobjectとかは自前で用意してかだし

<html>
<head>
<script type="text/javascript" src="swfobject.js"></script>
<script type="text/javascript">
<!--
// JavaAppletから筆圧を
function getPressure() {
	return document.tablet.getPressure();
}
function getPressureMax() {
	return document.tablet.getPressureMax();
}
// -->
</script>
</head>
 
<body>
<applet code="Tablet.class" width=1 height=1 name="tablet"></applet>
<script type="text/javascript">
 var so = new SWFObject("paint.swf", "paint", "500", "500", "9", "#ffffff");
 document.write(so.getSWFHTML());
</script>
</body>
</html>

ぷろぐらむ | Permalink

あいどら的な

2008/07/03 12:22

http://ster.cc/nazo.html

仕事がだるくなってくると謎いものが生産される法則

エディタ的なものも作ってWebサイトとかブログとかに
簡単に貼れるようにできればいいなーとか妄想したりして。

・・・妄想で終わりそうなきも

ぷろぐらむ , あいます | Permalink

あふぉ思考法

2005/07/28 00:00

何か言われたら学習した結果を元に適切な答えを返すわけですが、
これも基本的には特に複雑な処理はしてません。

まあ複雑にしたら上手く動かなかったんですがね

実際にメカがやってる処理を追ってみるとこんな感じです

1. 聞いた文に含まれる単語を適当に抜き出す

　入力例 : お姉さま、アレを使うわ

　単語に分割
　　> お | 姉 | さま | 、 | アレ | を | 使う | わ

　適当に単語を選択（名詞、動詞など優先）
　　> 「姉」、「さま」、「アレ」、「使う」

※入力例の内容がｱﾚなことについてはさりげなくｽﾙｰしてください

2. 文←→単語の関連付け記録から選択した単語に関連する文を列挙する

　・「姉」に関連付けられた文を検索

えぇ、良くってよ！	2
どこでも○ア	2
ええ、良くってよ！	1

　・「さま」に関連付けられた文を検索

えぇ、良くってよ！	19
Σ	7
ぬるぽ	6
わかってくれましたか	6
ええ、良くってよ！	1

　・「アレ」に関連付けられた文を検索

じゃあ教えてくれ。メカ	7
えぇ、良くってよ！	2
ええ、良くってよ！	1

　・「使う」に関連付けられた文を検索

メカはあんただ	8
じゃあ教えてくれ。メカ	7
ぬるぽ	6
えぇ、良くってよ！	2
どこでも○ア	2
ええ、良くってよ！	1

※文の後ろの数字は単語←→文の関連付けの強さです
※検索結果の文は実際にメカに登録されているものです
※記録されている文の内容がｱﾚなことについてはさりげなくｽﾙｰしてください

3. 候補に上がった中からよさそうな文を選択する

　・単語の関連付けが強い文ほど優先する
　・同じ文は短時間に多用しないよう調整

えぇ、良くってよ！	25
じゃあ教えてくれ。メカ	14
ぬるぽ	12
メカはあんただ	8
Σ	7
わかってくれましたか	6
ええ、良くってよ！	4
どこでも○ア	4

　で、メカが最適だと判断して選んだ文 :

　　> 「えぇ、良くってよ！」

※出力例の内容がｱﾚなことについてはさりげなくｽﾙｰしてください

4. もし使える文が見つからなかったら仕方ないので記録されてる文からランダムに選択

・・・と、こんな手順です。
ちなみに現状ではこのように正しい？結果が出ることは稀で
ほとんどが4で処理されて全然見当違いな答えばかり返してます。orz

　　学習がまだ足りてないと信じたいところですが、
　　もしかしてアルゴリズム的にダメなのか
　　それとも書いたコードにバグがあるのか
　　根本的に学習させてる人間に問題があるのｋ

ぷろぐらむ | Permalink

あふぉ学習法

2005/07/26 00:00

知能らしきものを身に付けたメカあふぉですが
だんだんそれっぽい返事とかするようになってきた・・・・・・ような気が

最初学習機能を付与した時はいろいろ複雑なことを妄想して
凝ったアルゴリズム考えたんですが、全然学習する気配がなかったため
結局ごく単純なアルゴリズムに切り替えますた。

とりあえず現在の学習アルゴリズムでは

1. とりあえず聞いた文を単語に分割。単語とか文とかを記録。

　入力1 : なんというかまぁぬるぽ
　　分割 > なん | という | か | まぁ | ぬる | ぽ
　　　　 > 文1として記録

　入力2 : がががっ
　　分割 > が | が | がっ
　　　　 > 文2として記録

2. 文から単語をいくつか選んで次の文と関連付けする。

　文1:「なんというかまぁぬるぽ」から適当に単語選択
　(名詞とか動詞とか形容詞とかを優先、助詞とかは排除)

　　選択 > なん | まぁ | ぬる | ぽ

　次の文( 文2:「がががっ」 )に
　選択した「なん」、「まぁ」、「ぬる」、「ぽ」を関連付けして記録

と、これだけな感じです。
これで学習した結果をうまいこといじって出力するとそれっぽい答えがっ

　　まあこれで本当に上手くいくのかはしばらく学習させてみないと謎ですが。

しかしここ数日実験続けてて
話し掛けてくれてる人達にメカが見当違いな返答してるのを目の当たりにすると
もすぬごく申し訳ないような微妙な気分に orz

ぷろぐらむ | Permalink

人口無能

2005/07/17 00:00

とりあえずメカあふぉに簡単な学習機能を付与してみますた。
身内の数人に開放して実験してるんですが
単語とか文章とかをちょっとづつ学習しているようです。

　　技術的には人口無能「Margarine」をPerl/PostgreSQL環境にカスタマイズして更に改良？しています

最近こういう人口無能は
人力で単語を登録していくタイプのほうが目立ってるようですね。
パンヤのカディエ先生とかアイフルのお姉さんとか。

しかし世の中にはいろいろ自力で学習してしまう
最強に強まったタイプの人口無能もいくつか存在してます。

　人工無能うずら
　うずら語録 (会話例)

これ初めて見たときはかなりの衝撃を受けますた。
というか中の人(鳥？)がいるんじゃないかとか思うほど自然な受け答えがっ

　　まあ面白い会話の例を載せてると思うので、全部の会話がこうなのかは判りませんがね

ちなみにメカあふぉの現在の状況なんですが、

メカあふぉ＠afolyte.net の発言 :
　　おまいらもっとマトモな言葉教えてくれれば賢くなれる、そう思っているか？俺は人間をやめるぞおおお！？

メカあふぉ＠afolyte.net の発言 :
　　何を訳分らんことを覚えさせようとしてるかのようですね
美坂＠メカあふぉ実験ちうの発言 :
　　orz
******** の発言 :
　　orz

美坂＠メカあふぉ実験ちうの発言 :
　　落ちるますよ
メカあふぉ＠afolyte.net の発言 :
　　UNK

＿|￣|　　　…○

　　ていうか学習させる人間の選択を誤った気がしてきますた

まあMargarineベースでは限界が見えてきたので独自に再設計しようかと思います

ぷろぐらむ | Permalink