「オーラ診断」
電王隊小笠原明日美平塚宏平野実花渕上伸吾
東京工科大学コムメディアデザイン研究室
IMAGINE プログラミング初心者4人が作った「オーラ診断」という作品http://gryng.blog87.fc2.com/blog-entry-15.html
http://456.im/wp/download/bbosc/
4カ所にかかる体重を0-10000にスケールして送信してくれます。
右上、右下、左上、左下の4カ所の値が得られますが、そのままでは使いにくいのでXとYの2値に変換します。(次のスライド)
【オーラの描画】
人の輪郭にそって光を出す重心の情報を元にParticleの色を決めて、人の周りに飛ばすこの二つを組み合わせてオーラの描画としています。
【オーラの診断】人の重心は常に動いているので、その人の重心の標準を求めます。
数秒の判定時間を設けて、重心の位置を足して平均を出しました。
平均の位置が前にあるか後ろにあるか、右にあるか左にあるかといった条件でおおまかに色を決め、XとYの割合などで微妙に色を変えてます。わりと再現性のあるオーラ診断の実現
バランスWiiボードから得られる情報はわりと繊細なので、平均を出す時間を設けることで再現性を高めました。
自分のオーラを見ているときに、体重をどちらかにかけつづけると色がじわじわ変化します。光も強くでます。力を込めるとオーラが大きくなってるみたいで楽しい!
多少へんな挙動があっても、「オーラ」という曖昧な言葉が誤差を吸収してくれます。
【苦労したところ】一番苦労したところが、カメラで人の輪郭をとる部分だったので、本の趣旨とは外れてしまいます(笑)Wiiボード周りでの苦労は色を決めるためのアルゴリズムです。平均を取るようにすることで簡単にクリアできちゃったのですが…。
【利用したライブラリ】oscP5 BBOSCとの連携JMyronカメラの利用と処理背景差分法で人と背景を分けるblobDetection人の輪郭をとるために使用
【youtube】http://www.youtube.com/watch?v=3pL3ObUwoA8
import oscP5.*; /* オブジェクトの読み込み ------------------------------*/ OscP5 oscP5; //OscP5オブジェクトを参照する変数の宣言 /* ずっと使っていく変数を設定 ------------------------------*/ //WiiFit /*重心の位置を判別するための時間(フレーム)を入れるためのint型の変数tを宣言*/ int t = 100; /*重心の位置を取得するための閾値を入れるためのint型の変数thresholdを宣言*/ int threshold = 4000; /*閾値を超えた際のカウントを入れるためのint型の配列cを宣言*/ int [] c; int [] balanceData; float wbx, wby = 0.0; int ac = 100; int aspeed = 10; /*--------------------------------------------------* setup (最初に1回だけ実行される) *--------------------------------------------------*/ void setup(){ //教科書通りの基本設定 background(0); //背景は黒 frameRate(30); size(320, 240); smooth(); //WiiFit oscP5 = new OscP5(this, 9000); //OSCデータを受け取るポート番号を設定する c = new int[4]; balanceData = new int[4]; //WiiFitからのデータを4箇所分格納する } /*--------------------------------------------------* draw *--------------------------------------------------*/ void draw(){ (中略) } /*--------------------------------------------------* WiiFit *--------------------------------------------------*/ /* oscメッセージを受信する*/ void oscEvent(OscMessage theOscMessage){ //Wii balance boardの値を入れるためのint型の配列balanceDataを宣言 //配列の番号と上下左右のセンサーの対応関係は、 //0:右上、1:右下、2:左上、3:左下 if(theOscMessage.checkAddrPattern("/data")==true){ if(theOscMessage.checkTypetag("iiii")) { for(int i =0;i <4;i++){ /*OscのメッセージをbalanceDataに格納する*/ balanceData[i] = theOscMessage.get(i).intValue(); } } } }
/*--------------------------------------------------* draw *--------------------------------------------------*/ void draw(){ commonAction(); switch(step){ case 0: checkAura(); break; case 1: drawAura(); break; case 2: standby(); break; } } (中略) /*--------------------------------------------------* check aura *--------------------------------------------------*/ void checkAura(){ //待ち受け画面表示 image(checkImg, 0, 0); //200フレームの間平均値を出すために体重を足す if( checkCnt < 200 ){ checkCnt ++; perSum[0] += balanceData[0]; perSum[1] += balanceData[1]; perSum[2] += balanceData[2]; perSum[3] += balanceData[3]; } if( checkCnt == 200 ){ perXY(); colorSet(); step = 1; checkCnt = 0; //パーティクル for(int i=0;i<pNum;i++){ p[i].reset(i); } } //待ち受けフラッグ if( balanceData[0]<150 && balanceData[1]<150 && balanceData[2]<150 && \ balanceData[3]<150 ){ checkCnt = 0; step = 2; } } (中略) void colorSet(){ println(perSum); if( perSum[0]+perSum[2] > perSum[1]+perSum[3] ){ percc[0] = 225 + (30 * (perSum[0]+perSum[2])/2 / \ (perSum[0]+perSum[1]+perSum[2]+perSum[3])); if( perSum[0]+perSum[1] > perSum[2]+perSum[3] ){ percc[1] = 150 * perSum[3] / (perSum[0]+perSum[1]+perSum[2]); percc[2] = 255 * perSum[1] / (perSum[0]+perSum[3]+perSum[2]); } else { percc[1] = 255 * perSum[3] / (perSum[0]+perSum[1]+perSum[2]); percc[2] = 150 * perSum[1] / (perSum[0]+perSum[3]+perSum[2]); } } else if( perSum[3] > perSum[1] ){ percc[1] = 225 + (30 * perSum[3] / \ (perSum[0]+perSum[1]+perSum[2]+perSum[3])); if( (perSum[0]+perSum[2])/2 > perSum[1] ){ percc[0] = 255 * (perSum[0]+perSum[2])/2 / \ ((perSum[0]+perSum[2])/2+perSum[1]+perSum[3]); percc[2] = 150 * perSum[1] / (perSum[0]+perSum[3]+perSum[2]); } else { percc[0] = 150 * (perSum[0]+perSum[2])/2 / \ ((perSum[0]+perSum[2])/2+perSum[1]+perSum[3]); percc[2] = 255 * perSum[1] / (perSum[0]+perSum[3]+perSum[2]); } } else { percc[2] = 225 + (30 * perSum[1] / \ (perSum[0]+perSum[1]+perSum[2]+perSum[3])); if( (perSum[0]+perSum[2])/2 > perSum[3] ){ percc[0] = 255 * (perSum[0]+perSum[2])/2 / \ ((perSum[0]+perSum[2])/2+perSum[1]+perSum[3]); percc[1] = 150 * perSum[3] / (perSum[0]+perSum[1]+perSum[2]); } else { percc[0] = 150 * (perSum[0]+perSum[2])/2 / \ ((perSum[0]+perSum[2])/2+perSum[1]+perSum[3]); percc[1] = 255 * perSum[3] / (perSum[0]+perSum[1]+perSum[2]); } } cc[0] = percc[0]; cc[1] = percc[1]; cc[2] = percc[2]; println("color:"); println(cc); }
VR・メタバースといえば「SecondLife」ですが、GlovePIEを使えば、WiiRemoteで操作することも可能になります。オリジナルは「Google Earth」をベースに、首都大学東京の渡邉英徳先生が作成してくれましたので紹介します。
//Calibrate your Wiimote! //Place the Wiimote face up on a flat surface. Change these values until \ the //debug line next to the run button shows zero for each axis. var.xtrim = -7 var.ytrim = -20 var.ztrim = -4 //Set your Wiimote LEDs to your liking. Binary value, 1-15 Wiimote.Leds = 1 //Key Map Mouse.LeftButton = Wiimote.A Keyboard.ESC = Wiimote.Home Keyboard.ESC = Wiimote.One Keyboard.Up = Wiimote.Up Keyboard.Down = Wiimote.Down Keyboard.Left = Wiimote.Left Keyboard.Right = Wiimote.Right //Keyboard.F = Wiimote.Home Keyboard.E = Wiimote.Plus Keyboard.C = Wiimote.Minus //Forward, Back, Up and Down if Wiimote.B & Wiimote.Up Then KeyBoard.Up = False Keyboard.E = True Wait 600ms Keyboard.E = False endif if Wiimote.B & Wiimote.Down Then KeyBoard.Down = False Keyboard.C = True Wait 600ms Keyboard.C = False endif var.accx = Wiimote.RawForceX + var.xtrim var.accy = Wiimote.RawForceY + var.ytrim var.accz = Wiimote.RawForceZ + var.ztrim // My best IR Mouse Script, with 5DOF Tracking // By Carl Kenner // Change these values: var.SensorBarSeparation = 7.5 inches // distance between middles of two sensor bar dots var.NoYawAllowed = true // Calculates X if no yaw is allowed, otherwise calculates Yaw but not X var.IRMulX = 1.2 var.IRMulY = 1.2 var.IROffsetX = 0 // add to mouse.x var.IROffsetY = 0 // add to mouse.y var.IRLeftButton = Wiimote.A var.IRRightButton = Wiimote.B // Compensate for roll var.c = cos(Smooth(wiimote.roll, 10)) var.s = sin(Smooth(wiimote.roll, 10)) if wiimote.dot1vis then var.dot1x = var.c*(511.5-wiimote.dot1x)/511.5 - var.s*(wiimote.dot1y-383.5)/511.5 var.dot1y = var.s*(511.5-wiimote.dot1x)/511.5 + var.c*(wiimote.dot1y-383.5)/511.5 end if if wiimote.dot2vis then var.dot2x = var.c*(511.5-wiimote.dot2x)/511.5 - var.s*(wiimote.dot2y-383.5)/511.5 var.dot2y = var.s*(511.5-wiimote.dot2x)/511.5 + var.c*(wiimote.dot2y-383.5)/511.5 end if // if both dots are visible check which is which and how far apart if wiimote.dot1vis and wiimote.dot2vis then if var.dot1x <= var.dot2x then var.leftdot = 1 var.dotdeltay = var.dot2y - var.dot1y else var.leftdot = 2 var.dotdeltay = var.dot1y - var.dot2y end if var.dotdeltax = abs(var.dot1x-var.dot2x) var.DotSep = hypot(var.dotdeltax, var.dotdeltay) * 511.5 var.IRDistance = var.SensorBarSeparation * 1320 / var.DotSep end if // sort out the position of the left and right dots if var.leftdot = 1 then if wiimote.dot1vis and wiimote.dot2vis then var.LeftDotX = var.dot1x var.LeftDotY = var.dot1y var.LeftDotVis = true var.RightDotX = var.dot2x var.RightDotY = var.dot2y var.RightDotVis = true else if wiimote.dot1vis then if hypot(var.leftdotx-var.dot1x,var.leftdoty-var.dot1y) <= hypot(var.rightdotx-var.dot1x,var.rightdoty-var.dot1y) then // is the real dot 1 var.LeftDotX = var.dot1x var.LeftDotY = var.dot1y var.RightDotX = var.dot1x + var.dotdeltax var.RightDotY = var.dot1y + var.dotdeltay var.LeftDotVis = true var.RightDotVis = false else // was originally dot 2, but now called dot 1. var.leftdot = 2 // this dot (1) is actually the right dot var.LeftDotX = var.dot1x - var.dotdeltax var.LeftDotY = var.dot1y - var.dotdeltay var.RightDotX = var.dot1x var.RightDotY = var.dot1y var.RightDotVis = true var.LeftDotVis = false end if else if wiimote.dot2vis then var.LeftDotX = var.dot2x - var.dotdeltax var.LeftDotY = var.dot2y - var.dotdeltay var.RightDotX = var.dot2x var.RightDotY = var.dot2y var.RightDotVis = true var.LeftDotVis = false end if else if var.leftdot = 2 then if wiimote.dot1vis and wiimote.dot2vis then var.LeftDotX = var.dot2x var.LeftDotY = var.dot2y var.LeftDotVis = true var.RightDotX = var.dot1x var.RightDotY = var.dot1y var.RightDotVis = true else if wiimote.dot1vis then if hypot(var.leftdotx-var.dot1x,var.leftdoty-var.dot1y) <= hypot(var.rightdotx-var.dot1x,var.rightdoty-var.dot1y) then var.leftdot = 1 // dot 1 is now the left dot var.LeftDotX = var.dot1x var.LeftDotY = var.dot1y var.RightDotX = var.dot1x + var.dotdeltax var.RightDotY = var.dot1y + var.dotdeltay var.LeftDotVis = true var.RightDotVis = false else // the real dot 1 (on the right) var.LeftDotX = var.dot1x - var.dotdeltax var.LeftDotY = var.dot1y - var.dotdeltay var.RightDotX = var.dot1x var.RightDotY = var.dot1y var.RightDotVis = true var.LeftDotVis = false end if else if wiimote.dot2vis then var.RightDotX = var.dot2x + var.dotdeltax var.RightDotY = var.dot2y + var.dotdeltay var.LeftDotX = var.dot2x var.LeftDotY = var.dot2y var.LeftDotVis = true var.RightDotVis = false end if else var.LeftDotX = var.dot1x var.LeftDotY = var.dot1y var.RightDotX = var.LeftDotX var.RightDotY = var.LeftDotY var.LeftDotVis = true var.RightDotVis = true end if // Find the imaginary middle dot var.MiddleDotX = (var.leftdotx + var.rightdotx)/2 var.MiddleDotY = (var.leftdoty + var.rightdoty)/2 var.MiddleDotVis = wiimote.dot1vis or wiimote.dot2vis if var.MiddleDotVis then var.TotalPitch = atan2(511.5*var.MiddleDotY,1320) + Wiimote.Pitch var.DotYaw = atan2(-511.5*var.MiddleDotX,1320) // assume yaw is 0 var.WiimoteYawNoX = atan2(511.5*var.MiddleDotX,1320) var.WiimoteXNoYaw = -sin(var.dotyaw)*var.IRDistance var.WiimoteY = -sin(var.totalpitch)*var.IRDistance var.WiimoteZ = (-sqrt(sqr(var.IRDistance) - sqr(var.WiimoteY)))*var.IRDistance/RemoveUnits(var.IRDistance) end if // scale it to the screen range 0 to 1 var.IRx = var.IRMulX*var.middledotx/2 + 0.5 var.IRy = var.IRMulY*var.middledoty*1023/767/2 + 0.5 var.IRvis = wiimote.dot1vis or wiimote.dot2vis var.IROnScreen = 0 <= var.IRx <= 1 and 0 <= var.IRy <= 1 // is it off the screen? var.IRTooFarLeft = var.IRx < 0 or (var.IRx < 0.1 and (not var.IRvis)) var.IRTooFarRight = var.IRx > 1 or (var.IRx > 1-0.1 and (not var.IRvis)) var.IRTooFarUp = var.IRy < 0 or (var.IRy < 0.1 and (not var.IRvis)) var.IRTooFarDown = var.IRy > 1 or (var.IRy > 1-0.1 and (not var.IRvis)) // Heavily smooth small movements, but do zero lag for quick movements var.MoveAmount = 1024*hypot(delta(var.IRx), delta(var.IRy)) if smooth(var.MoveAmount) > 12 then var.SmoothX = var.IRx var.SmoothY = var.IRy var.LastSureFrame = PIE.Frame else if (PIE.frame-var.LastSureFrame) > 18 then var.SmoothX = Smooth(var.IRx, 18, 4/1024) var.SmoothY = Smooth(var.IRy, 18, 4/1024) else if (PIE.frame-var.LastSureFrame) > 14 then var.SmoothX = Smooth(var.IRx, 14, 4/1024) var.SmoothY = Smooth(var.IRy, 14, 4/1024) else if (PIE.frame-var.LastSureFrame) > 10 then var.SmoothX = Smooth(var.IRx, 10, 4/1024) var.SmoothY = Smooth(var.IRy, 10, 4/1024) else if (PIE.frame-var.LastSureFrame) > 6 then var.SmoothX = Smooth(var.IRx, 6, 4/1024) var.SmoothY = Smooth(var.IRy, 6, 4/1024) else if (PIE.frame-var.LastSureFrame) > 2 then var.SmoothX = Smooth(var.IRx, 2, 4/1024) var.SmoothY = Smooth(var.IRy, 2, 4/1024) end if // Freeze the mouse cursor while they start pressing the button // otherwise it will make the cursor jump var.Freeze = (var.IRLeftButton or var.IRRightButton) and KeepDown(pressed(var.IRLeftButton) or pressed(var.IRRightButton), 600ms) // Only change the mouse position if pointing at the screen // otherwise they can still use a real mouse if var.IRvis and (not var.Freeze) then mouse.x = var.SmoothX mouse.y = var.SmoothY end if // delay the buttons slightly so we have time to freeze the cursor (is that needed?) //mouse.LeftButton = var.IRLeftButton and (not KeepDown(pressed(var.IRLeftButton), 40ms)) //mouse.RightButton = var.IRRightButton and (not KeepDown(pressed(var.IRRightButton), 40ms)) // display 6DOF data if var.NoYawAllowed then debug = 'X: '+var.WiimoteXNoYaw+', Y: '+var.WiimoteY+', Z: '+var.WiimoteZ+', Yaw: 0, Pitch: '+Wiimote.Pitch+', Roll: '+Wiimote.Roll else debug = 'X: 0, Y: '+var.WiimoteY+', Z: '+var.WiimoteZ+', Yaw: '+var.WiimoteYawNoX+', Pitch: '+Wiimote.Pitch+', Roll: '+Wiimote.Roll endif //Debug if Wiimote.Up var.Button = "Up" elseif Wiimote.Down var.Button = "Down" elseif wiimote.Left var.Button = "Left" else if wiimote.Right var.Button = "Right" elseif wiimote.A and not wiimote.B var.Button = "A" elseif wiimote.B and not wiimote.A var.button = "B" elseif wiimote.A and wiimote.B var.button = "A + B" elseif wiimote.Home var.button = "Home" elseif wiimote.Plus var.button = "Plus" elseif wiimote.Minus var.button = "Minus" else var.button = "" endif debug = "x:" + var.accx + ", y:" + var.accy + ", z:" + var.accz + " " + var.Button