Powered by SmartDoc

WiiFit�ｿｽo�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽX�ｿｽ{�ｿｽ[�ｿｽh�ｿｽ�ｿｽp�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽu�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽf�ｿｽf�ｿｽv(�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽH�ｿｽﾈ托ｿｽ)

2009�ｿｽN5�ｿｽ�ｿｽ8�ｿｽ�ｿｽ�ｿｽﾅ終�ｿｽX�ｿｽV
�ｿｽ�ｿｽ�ｿｽ�ｿｽﾅ彦
http://akihiko.shirai.as/projects/WiiRemote/

�ｿｽﾚ趣ｿｽ

WiiFit�ｿｽo�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽX�ｿｽ{�ｿｽ[�ｿｽh�ｿｽ�ｿｽp�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽu�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽf�ｿｽf�ｿｽv(�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽH�ｿｽﾈ托ｿｽ)

�ｿｽu�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽf�ｿｽf�ｿｽv

�ｿｽd�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ}�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾋ宏�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾔ滂ｿｽ�ｿｽ�ｿｽL�ｿｽ�ｿｽ

�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽH�ｿｽﾈ托ｿｽw�ｿｽR�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽf�ｿｽB�ｿｽA�ｿｽf�ｿｽU�ｿｽC�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ

IMAGINE�ｿｽ@�ｿｽv�ｿｽ�ｿｽ�ｿｽO�ｿｽ�ｿｽ�ｿｽ~�ｿｽ�ｿｽ�ｿｽO�ｿｽ�ｿｽ�ｿｽS�ｿｽ�ｿｽ4�ｿｽl�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽu�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽf�ｿｽf�ｿｽv�ｿｽﾆゑｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽihttp://gryng.blog87.fc2.com/blog-entry-15.html

BBOSC

http://456.im/wp/download/bbosc/

�ｿｽS�ｿｽJ�ｿｽ�ｿｽ�ｿｽﾉゑｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌ重�ｿｽ�ｿｽ0-10000�ｿｽﾉス�ｿｽP�ｿｽ[�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾄ托ｿｽ�ｿｽM�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽB

�ｿｽE�ｿｽ�ｿｽA�ｿｽE�ｿｽ�ｿｽ�ｿｽA�ｿｽ�ｿｽ�ｿｽ�ｿｽA�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌ４�ｿｽJ�ｿｽ�ｿｽ�ｿｽﾌ値�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽ�ｿｽ�ｿｽA�ｿｽ�ｿｽ�ｿｽﾌままでは使�ｿｽ�ｿｽ�ｿｽﾉゑｿｽ�ｿｽ�ｿｽ�ｿｽﾌゑｿｽX�ｿｽ�ｿｽY�ｿｽﾌ２�ｿｽl�ｿｽﾉ変奇ｿｽ�ｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽB�ｿｽi�ｿｽ�ｿｽ�ｿｽﾌス�ｿｽ�ｿｽ�ｿｽC�ｿｽh�ｿｽj

�ｿｽy�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽﾌ描�ｿｽ�ｿｽz

�ｿｽl�ｿｽﾌ輪郭�ｿｽﾉゑｿｽ�ｿｽ�ｿｽ�ｿｽﾄ鯉ｿｽ�ｿｽ�ｿｽ�ｿｽo�ｿｽ�ｿｽ�ｿｽd�ｿｽS�ｿｽﾌ擾ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽParticle�ｿｽﾌ色�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾟて、�ｿｽl�ｿｽﾌ趣ｿｽ�ｿｽ�ｿｽﾉ費ｿｽﾎゑｿｽ�ｿｽ�ｿｽ�ｿｽﾌ難ｿｽﾂゑｿｽg�ｿｽﾝ搾ｿｽ�ｿｽ墲ｹ�ｿｽﾄオ�ｿｽ[�ｿｽ�ｿｽ�ｿｽﾌ描�ｿｽ�ｿｽﾆゑｿｽ�ｿｽﾄゑｿｽ�ｿｽﾜゑｿｽ�ｿｽB

�ｿｽy�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽﾌ診�ｿｽf�ｿｽz�ｿｽl�ｿｽﾌ重�ｿｽS�ｿｽﾍ擾ｿｽﾉ難ｿｽ�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽ�ｿｽﾌで、�ｿｽ�ｿｽ�ｿｽﾌ人�ｿｽﾌ重�ｿｽS�ｿｽﾌ標�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾟまゑｿｽ�ｿｽB

�ｿｽ�ｿｽ�ｿｽb�ｿｽﾌ費ｿｽ�ｿｽ闔橸ｿｽﾔゑｿｽﾝゑｿｽ�ｿｽﾄ、�ｿｽd�ｿｽS�ｿｽﾌ位置�ｿｽｫゑｿｽ�ｿｽﾄ包ｿｽ�ｿｽﾏゑｿｽ�ｿｽo�ｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽ�ｿｽ�ｿｽB

�ｿｽ�ｿｽ�ｿｽﾏの位置�ｿｽ�ｿｽ�ｿｽO�ｿｽﾉゑｿｽ�ｿｽ驍ｩ�ｿｽ�ｿｽ�ｿｽﾉゑｿｽ�ｿｽ驍ｩ�ｿｽA�ｿｽE�ｿｽﾉゑｿｽ�ｿｽ驍ｩ�ｿｽ�ｿｽ�ｿｽﾉゑｿｽ�ｿｽ驍ｩ�ｿｽﾆゑｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾅゑｿｽ�ｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽﾉ色�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾟ、X�ｿｽ�ｿｽY�ｿｽﾌ奇ｿｽ�ｿｽ�ｿｽ�ｿｽﾈどで費ｿｽ�ｿｽ�ｿｽ�ｿｽﾉ色�ｿｽ�ｿｽﾏゑｿｽ�ｿｽﾄまゑｿｽ�ｿｽB�ｿｽ�ｿｽ�ｿｽﾆ再鯉ｿｽ�ｿｽ�ｿｽ�ｿｽﾌゑｿｽ�ｿｽ�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽf�ｿｽf�ｿｽﾌ趣ｿｽ�ｿｽ�ｿｽ

�ｿｽo�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽXWii�ｿｽ{�ｿｽ[�ｿｽh�ｿｽ�ｿｽ�ｿｽ逑ｾ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾍゑｿｽ�ｿｽﾆ繊�ｿｽﾗなので、�ｿｽ�ｿｽ�ｿｽﾏゑｿｽ�ｿｽo�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾔゑｿｽﾝゑｿｽ�ｿｽ驍ｱ�ｿｽﾆで再鯉ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾟまゑｿｽ�ｿｽ�ｿｽ�ｿｽB

�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌオ�ｿｽ[�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽ�ｿｽﾆゑｿｽ�ｿｽﾉ、�ｿｽﾌ重�ｿｽ�ｿｽ�ｿｽﾇゑｿｽ�ｿｽ轤ｩ�ｿｽﾉゑｿｽ�ｿｽ�ｿｽ�ｿｽﾂづゑｿｽ�ｿｽ�ｿｽﾆ色�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ墲ｶ�ｿｽ�ｿｽﾏ会ｿｽ�ｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽB�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾅまゑｿｽ�ｿｽB�ｿｽﾍゑｿｽ�ｿｽ�ｿｽ�ｿｽﾟゑｿｽﾆオ�ｿｽ[�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ蛯ｫ�ｿｽ�ｿｽ�ｿｽﾈゑｿｽ�ｿｽﾄゑｿｽﾝゑｿｽ�ｿｽ�ｿｽ�ｿｽﾅ楽�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽI

�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾖゑｿｽﾈ具ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽA�ｿｽu�ｿｽI�ｿｽ[�ｿｽ�ｿｽ�ｿｽv�ｿｽﾆゑｿｽ�ｿｽ�ｿｽ�ｿｽB�ｿｽ�ｿｽ�ｿｽﾈ鯉ｿｽ�ｿｽt�ｿｽ�ｿｽ�ｿｽ�差�ｿｽ�ｿｽ�ｿｽz�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽB

�ｿｽy�ｿｽ�ｿｽJ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾆゑｿｽ�ｿｽ�ｿｽz�ｿｽ�ｿｽﾔ具ｿｽJ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾆゑｿｽ�ｿｽ�が�ｿｽA�ｿｽJ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾅ人�ｿｽﾌ輪郭�ｿｽ�ｿｽ�ｿｽﾆる部�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌで、�ｿｽ{�ｿｽﾌ趣ｿｽ|�ｿｽﾆは外�ｿｽ�ｿｽﾄゑｿｽ�ｿｽﾜゑｿｽ�ｿｽﾜゑｿｽ�ｿｽi�ｿｽﾎ）Wii�ｿｽ{�ｿｽ[�ｿｽh�ｿｽ�ｿｽ�ｿｽ�ｿｽﾅの具ｿｽJ�ｿｽﾍ色�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾟるた�ｿｽﾟのア�ｿｽ�ｿｽ�ｿｽS�ｿｽ�ｿｽ�ｿｽY�ｿｽ�ｿｽ�ｿｽﾅゑｿｽ�ｿｽB�ｿｽ�ｿｽ�ｿｽﾏゑｿｽ�ｿｽ�ｿｽ�ｿｽ謔､�ｿｽﾉゑｿｽ�ｿｽ驍ｱ�ｿｽﾆで簡単�ｿｽﾉク�ｿｽ�ｿｽ�ｿｽA�ｿｽﾅゑｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌでゑｿｽ�ｿｽ�ｿｽ�ｿｽc�ｿｽB

�ｿｽy�ｿｽ�ｿｽ�ｿｽp�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽC�ｿｽu�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽzoscP5 BBOSC�ｿｽﾆの連�ｿｽgJMyron�ｿｽJ�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌ暦ｿｽ�ｿｽp�ｿｽﾆ擾ｿｽ�ｿｽ�ｿｽ�ｿｽw�ｿｽi�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ@�ｿｽﾅ人�ｿｽﾆ背�ｿｽi�ｿｽｪゑｿｽ�ｿｽ�ｿｽblobDetection�ｿｽl�ｿｽﾌ輪郭�ｿｽ�ｿｽ�ｿｽﾆるた�ｿｽﾟに使�ｿｽp

�ｿｽyyoutube�ｿｽzhttp://www.youtube.com/watch?v=3pL3ObUwoA8

BBOSC.png
IMG_4750.JPG
IMG_4757.JPG
list.png
P1040055.JPG
P1070530.JPG
P1070559.JPG
ss101310167.png
ss1013124318.png
ss103820.png
ss104743.png
ss13496.png
ss16422.png
ss9_3.png
connect
import oscP5.*;


/* �ｿｽI�ｿｽu�ｿｽW�ｿｽF�ｿｽN�ｿｽg�ｿｽﾌ読み搾ｿｽ�ｿｽ�ｿｽ
------------------------------*/
OscP5 oscP5;  //OscP5�ｿｽI�ｿｽu�ｿｽW�ｿｽF�ｿｽN�ｿｽg�ｿｽ�ｿｽ�ｿｽQ�ｿｽﾆゑｿｽ�ｿｽ�ｿｽﾏ撰ｿｽ�ｿｽﾌ宣言


/* �ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾆ使�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽ�ｿｽ�ｿｽﾏ撰ｿｽ�ｿｽ�ｿｽﾝ抵ｿｽ
------------------------------*/
//WiiFit
/*�ｿｽd�ｿｽS�ｿｽﾌ位置�ｿｽｻ別ゑｿｽ�ｿｽ驍ｽ�ｿｽﾟの趣ｿｽ�ｿｽ�ｿｽ(�ｿｽt�ｿｽ�ｿｽ�ｿｽ[�ｿｽ�ｿｽ)�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ驍ｽ�ｿｽﾟゑｿｽint�ｿｽ^�ｿｽﾌ変撰ｿｽt�ｿｽ�ｿｽ骭ｾ*/
int t = 100;
/*�ｿｽd�ｿｽS�ｿｽﾌ位置�ｿｽ�ｿｽ�ｿｽ謫ｾ�ｿｽ�ｿｽ�ｿｽ驍ｽ�ｿｽﾟゑｿｽ閾値�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ驍ｽ�ｿｽﾟゑｿｽint�ｿｽ^�ｿｽﾌ変撰ｿｽthreshold�ｿｽ�ｿｽ骭ｾ*/
int threshold = 4000;
/*閾値�ｿｽｴゑｿｽ�ｿｽ�ｿｽ�ｿｽﾛのカ�ｿｽE�ｿｽ�ｿｽ�ｿｽg�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ驍ｽ�ｿｽﾟゑｿｽint�ｿｽ^�ｿｽﾌ配�ｿｽ�ｿｽc�ｿｽ�ｿｽ骭ｾ*/
int [] c;
int [] balanceData;
float wbx, wby = 0.0;
int ac = 100;
int aspeed = 10;


/*--------------------------------------------------*
  setup (�ｿｽﾅ擾ｿｽ�ｿｽﾉ１�ｿｽｾゑｿｽ�ｿｽ�ｿｽ�ｿｽs�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ)
 *--------------------------------------------------*/
void setup(){
  //�ｿｽ�ｿｽ�ｿｽﾈ擾ｿｽ�ｿｽﾊゑｿｽﾌ奇ｿｽ{�ｿｽﾝ抵ｿｽ
  background(0);           //�ｿｽw�ｿｽi�ｿｽﾍ搾ｿｽ
  frameRate(30);
  size(320, 240);
  smooth();
  
  //WiiFit
  oscP5 = new OscP5(this, 9000);�ｿｽ@//OSC�ｿｽf�ｿｽ[�ｿｽ^�ｿｽ�ｿｽ�ｿｽｯ趣ｿｽ�ｿｽ|�ｿｽ[�ｿｽg�ｿｽﾔ搾ｿｽ�ｿｽ�ｿｽﾝ定す�ｿｽ�ｿｽ
  c = new int[4];
  balanceData = new int[4];�ｿｽ@//WiiFit�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌデ�ｿｽ[�ｿｽ^�ｿｽ�ｿｽ�ｿｽS�ｿｽﾓ擾ｿｽ�ｿｽ�ｿｽ�ｿｽi�ｿｽ[�ｿｽ�ｿｽ�ｿｽ�ｿｽ
 }


 /*--------------------------------------------------*
  draw
 *--------------------------------------------------*/
void draw(){
�ｿｽi�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽj
}


 /*--------------------------------------------------*
  WiiFit
 *--------------------------------------------------*/
/* osc�ｿｽ�ｿｽ�ｿｽb�ｿｽZ�ｿｽ[�ｿｽW�ｿｽ�ｿｽ�ｿｽ�ｿｽM�ｿｽ�ｿｽ�ｿｽ�ｿｽ*/
void oscEvent(OscMessage theOscMessage){
//Wii balance board�ｿｽﾌ値�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽ驍ｽ�ｿｽﾟゑｿｽint�ｿｽ^�ｿｽﾌ配�ｿｽ�ｿｽbalanceData�ｿｽ�ｿｽ骭ｾ
//�ｿｽz�ｿｽ�ｿｽﾌ番搾ｿｽ�ｿｽﾆ上下�ｿｽ�ｿｽ�ｿｽE�ｿｽﾌセ�ｿｽ�ｿｽ�ｿｽT�ｿｽ[�ｿｽﾌ対会ｿｽ�ｿｽﾖ係�ｿｽﾍ、
//0:�ｿｽE�ｿｽ�ｿｽA1:�ｿｽE�ｿｽ�ｿｽ�ｿｽA2:�ｿｽ�ｿｽ�ｿｽ�ｿｽA3:�ｿｽ�ｿｽ�ｿｽ�ｿｽ
  if(theOscMessage.checkAddrPattern("/data")==true){
    if(theOscMessage.checkTypetag("iiii")) {
      for(int i =0;i <4;i++){
        /*Osc�ｿｽﾌ��ｿｽ�ｿｽb�ｿｽZ�ｿｽ[�ｿｽW�ｿｽ�ｿｽbalanceData�ｿｽﾉ格�ｿｽ[�ｿｽ�ｿｽ�ｿｽ�ｿｽ*/
        balanceData[i] = theOscMessage.get(i).intValue();
      }
    }
  }
}
aura_check
/*--------------------------------------------------*
  draw
 *--------------------------------------------------*/
void draw(){
  
  commonAction();
  
  switch(step){
    
    case 0:
      checkAura();
      break;
      
    case 1:
      drawAura();
      break;
      
    case 2:
      standby();
      break;
  }

}

�ｿｽi�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽj

/*--------------------------------------------------*
  check aura
 *--------------------------------------------------*/
void checkAura(){
  
  //�ｿｽﾒゑｿｽ�ｿｽｯ会ｿｽﾊ表�ｿｽ�ｿｽ
  image(checkImg, 0, 0);
  
  //200�ｿｽt�ｿｽ�ｿｽ�ｿｽ[�ｿｽ�ｿｽ�ｿｽﾌ間包ｿｽ�ｿｽﾏ値�ｿｽ�ｿｽ�ｿｽo�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾟに体重�ｿｽｫゑｿｽ
  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;
   
    //�ｿｽp�ｿｽ[�ｿｽe�ｿｽB�ｿｽN�ｿｽ�ｿｽ
    for(int i=0;i<pNum;i++){
      p[i].reset(i);
    }
    
  }
  
  //�ｿｽﾒゑｿｽ�ｿｽｯフ�ｿｽ�ｿｽ�ｿｽb�ｿｽO
if( balanceData[0]<150 && balanceData[1]<150 && balanceData[2]<150 && \
    balanceData[3]<150 ){
    checkCnt = 0;
    step = 2;
  }
  
}

�ｿｽi�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽj

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);

}

�ｿｽ�ｿｽSecondLife�ｿｽ�ｿｽWiiRemote�ｿｽﾅ托ｿｽ�ｿｽ�す�ｿｽ�ｿｽ

VR�ｿｽE�ｿｽ�ｿｽ�ｿｽ^�ｿｽo�ｿｽ[�ｿｽX�ｿｽﾆゑｿｽ�ｿｽ�ｿｽ�ｿｽﾎ「SecondLife�ｿｽv�ｿｽﾅゑｿｽ�ｿｽ�ｿｽ�ｿｽAGlovePIE�ｿｽ�ｿｽ�ｿｽg�ｿｽ�ｿｽ�ｿｽﾎ、WiiRemote�ｿｽﾅ托ｿｽ�ｿｽ�す�ｿｽ驍ｱ�ｿｽﾆゑｿｽ�ｿｽﾂ能�ｿｽﾉなゑｿｽﾜゑｿｽ�ｿｽB�ｿｽI�ｿｽ�ｿｽ�ｿｽW�ｿｽi�ｿｽ�ｿｽ�ｿｽﾍ「Google Earth�ｿｽv�ｿｽ�ｿｽ�ｿｽx�ｿｽ[�ｿｽX�ｿｽﾉ、�ｿｽ�ｿｽs�ｿｽ�ｿｽw�ｿｽ�ｿｽ�ｿｽ�ｿｽ�ｿｽﾌ渡邉英�ｿｽ�ｿｽ�ｿｽ謳ｶ�ｿｽ�ｿｽ�ｿｽ�成�ｿｽ�ｿｽ�ｿｽﾄゑｿｽ�ｿｽ�ｿｽﾜゑｿｽ�ｿｽ�ｿｽ�ｿｽﾌで紹介し�ｿｽﾜゑｿｽ�ｿｽB

//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