姿勢制御には、加速度センサーやジャイロセンサーからの情報に加え、機体底部に設けた垂直カメラの映像を活用している。だそうです。
public class ProcessingTest {
}
import processing.core.*;//!!!
import processing.video.*;
public class ProcessingTest extends PApplet{//!!!
public void setup(){
}
public void draw(){
}
}//!!!
これで、Processing sketchのひな形ができました。
require 'gtk2'
# 筆に関するパラメータ
# いろいろ変えてみてください。
INIT_FUDE_VELOCITY = 2 # 筆の平均速度の初期値
FUDE_PARAM = 50 # 速度の逆数に乗ずる定数
WEIGHT = 5 # 平均速度算出のための重み
# 筆に関する変数を用意
$velocity = INIT_FUDE_VELOCITY
$x0 = 0
$y0 = 0
$x1 = 0
$y1 = 0
# ウィンドウとドローイングエリアの作成など
window = Gtk::Window.new
window.set_size_request(640, 640)
window.set_app_paintable(true)
window.set_events(Gdk::Event::BUTTON_PRESS_MASK | Gdk::Event::BUTTON_RELEASE_MASK | Gdk::Event::BUTTON_MOTION_MASK)
window.realize
drawable = window.window
# グラフィックコンテキスト(GC)の用意
gc = Gdk::GC.new(drawable)
black = Gdk::Color.new(0, 0, 0)
colormap = Gdk::Colormap.system
colormap.alloc_color(black, false, true)
gc.set_foreground(black)
window.signal_connect('motion_notify_event') do |win, evt| #マウスが動いた時
$x1 = evt.x
$y1 = evt.y
v = (($x1-$x0).abs + ($y1-$y0).abs)/2.0 # 最新の速度を計算
$velocity = (WEIGHT*$velocity + v)/(WEIGHT+1).to_f # 平均速度を計算し直す
fude_width = FUDE_PARAM/$velocity # 筆の太さを決定する
gc.set_line_attributes(fude_width,Gdk::GC::LINE_SOLID,Gdk::GC::CAP_ROUND,Gdk::GC::JOIN_BEVEL) # 筆の太さを設定する
drawable.draw_line(gc, $x0, $y0, $x1, $y1)
$x0 = evt.x
$y0 = evt.y
end
window.signal_connect('button_press_event') do |win, evt| #マウスボタンが押された時
$x0 = evt.x
$y0 = evt.y
end
window.signal_connect('button_release_event') do |win, evt| #マウスボタンが離された時
$v = INIT_FUDE_VELOCITY
end
window.signal_connect('destroy') do
Gtk.main_quit
end
window.show_all
Gtk.main
require 'opengl'
require 'glut'
require 'joystick'
INTERVAL = 50
# 中略
$joy = Joystick::Device::open "/dev/input/js0" # 環境に応じて書き換えてください。
$foo = 0.0 # ジョイスティックからの入力を反映させたい変数。
timer_func = Proc.new{
foo_diff = 0
while $joy.pending?
ev = $joy.next_event
case ev.type
when Joystick::Event::AXIS
case ev.num
when 0
foo_diff = ev.value/1000.0 #AXISの値は-32767から32767
end
when Joystick::Event::BUTTON
case ev.num
when 0
puts ev.value #=> ボタンが押された時: 1, ボタンが離された時: 0
# ボタンに反応させたい時はここに具体的な処理を書いてください。
end
end
end
$foo += foo_diff
}
# 中略
GLUT.TimerFunc(INTERVAL, timer_func, 0)
# 後略
joystickからの入力値はバッファにためられるので、ただ一定時間ごとに値を取得してOpenGLの描画に反映させてもうまく動きません。
$ls /dev/input/と打つと、js0やjs1といったデバイスが表示されます。
$ruby ./extconf.rb $make $sudo make installしました。 ただ1点、joystick.cの77行目
if ((*fd = open(RSTRING(path)->ptr, O_RDONLY)) >= 0) { #=>Compile ERROR!
がRuby1.8向けの古い書き方なので、
if ((*fd = open(RSTRING_PTR(path), O_RDONLY)) >= 0) {
と修正しました。
/* ミニ四駆用ラップタイマー */
const int CDS = 0;
const int LED = 13;
int cds_value = 0;
int old_cds_value = 0;
int lap_count = 0;
unsigned long lap_time = 0;
unsigned long start_time = 0;
void setup(){
pinMode(LED, OUTPUT);
Serial.begin(9600);
}
void loop(){
/* CdSの入力値の低下を検出 */
cds_value = analogRead(CDS);
if(cds_value < old_cds_value*0.8){//元の光の強さの0.8倍未満なら光が弱くなったと判断
Serial.print('LAP: ');
Serial.println(lap_count);//LAP: 0は無視してください. :P
Serial.println(micros() - start_time);//マイクロ秒を検出. micors()は70分でオーバーフローする.
start_time = micros();
lap_count++;
}
old_cds_value = cds_value;
delay(10);
}
/* 光が遮られた回数をカウントし、LED光で知らせるプログラム. */
const int CDS = 0;
const int SW = 8;
const int LED = 13;
int i;
int counter = 0;
int old_cds_value = 0;
int cds_value = 0;
int sw_value = 0;
int old_sw_value = 0;
int sw_state = 0;
void setup(){
pinMode(LED, OUTPUT);
pinMode(SW, INPUT);
}
void loop(){
/* スイッチが押されたことを検出 */
sw_value = digitalRead(SW);
if(sw_value==HIGH && old_sw_value==LOW){
sw_state = 1 - sw_state;
delay(10);
}
if(sw_state==1){
for(i=0;i<counter;i++){
digitalWrite(LED, HIGH);
delay(500);
digitalWrite(LED, LOW);
delay(500);
}
sw_state = 0;
}
old_sw_value = sw_value;
/* CdSの入力値の低下を検出 */
cds_value = analogRead(CDS);
if(cds_value < old_cds_value*0.8){//元の光の強さの0.8倍未満なら光が弱くなったと判断
counter++;
}
old_cds_value = cds_value;
delay(100);
}
const int SENSOR = 0; /* アナログINの0 */
const int POKECOM_1 = 12; /* デジタルIOの12 */
const int POKECOM_2 = 13; /* デジタルIOの13 */
int val = 0;
void setup(){
pinMode(POKECOM_1, OUTPUT);
pinMode(POKECOM_2, OUTPUT);
Serial.begin(9600);
}
void loop(){
/* CdSからの値を整形. 440~840くらいの値を取る(私の環境の場合)ので、それを0~3に直す.*/
val = (analogRead(SENSOR) - 440)/100;
/* 1bit目をPOKECOM_1から出力 */
if(val%2==1){
digitalWrite(POKECOM_1, HIGH);
}else{
digitalWrite(POKECOM_1, LOW);
}
/* 2bit目をPOKECOM_2から出力 */
if(val/2==1){
digitalWrite(POKECOM_2, HIGH);
}else{
digitalWrite(POKECOM_2, LOW);
}
delay(100);
}
パラレルといいつつ、あんまりパラレルじゃありません。10 WAIT 10 20 OPEN "PIO:" 30 CLS 40 X=0 50 Y=0 60 PIOSET 3 70 V=PIOGET 80 Y=30-Y 90 GCURSOR(X,Y) 110 GPRINT "1000" 120 X=X+1 130 GOTO 70ポケコンを持っている方はマニュアルも持っているはずなので、そちらを参考にしてください。
void setup()内で、デバイス(主にpin)の初期化など。void loop()が実行され続ける。pinMode(pin_number, MODE);を使う.MODEはINPUTまたはOUTPUT.$sudo add-apt-repository ppa:webupd8team/java $sudo apt-get update $sudo apt-get install oracle-java7-installer
/dev/ttyACM0というデバイスとして認識されているはずです。
$sudo chmod a+rw /dev/ttyACM0として、デバイスへのアクセスを一般ユーザにも開放してやります。
$sudo ./arduinoとしたほうが楽かもしれません。
int led = 13;
void setup(){
pinMode(led,OUTPUT);
}
void loop(){
digitalWrite(led, HIGH);
delay(1000);
digitalWrite(led, LOW);
delay(1000);
}
IDEで「検証」して確かめてから、「マイコンボードに書き込む」を実行すると、基板上のLEDがそれっぽい間隔で点滅するはずです。r=f(z)という関数を考えてそれをぐるっと回転させますが、f(z)を変えて回転体を描くことができます。theta=0のときはf(z)が定数で、theta=PIのときはf(z)は2次関数であるようにすれば、人のふくらはぎのような形も簡単に。
require "opengl"
module GLUT
def GLUT.Cocoon(height, slice, stack)
return unless block_given?
zStep = height/slice.to_f
tStep = Math::PI/stack
0.step(height-zStep+0.0001, zStep){|z|
GL.Begin(GL::QUAD_STRIP)
(-Math::PI).step(Math::PI+0.0001, tStep){|theta|
r1 = yield(z, theta, tStep)
r2 = yield(z+zStep, theta+tStep, tStep)
phi = atan(zStep/(r2-r1).abs)
GL.Normal(cos(theta)*sin(phi), sin(theta)*sin(phi), cos(phi))
GL.Vertex(r1*cos(theta), r1*sin(theta), z)
GL.Vertex(r2*cos(theta+tStep), r2*sin(theta+tStep), z+zStep)
}
GL.End
}
end
GLUT.Cocoon(6.0, 20, 20){|z,theta,tStep|
# r = -a*z*(z-8) です。
# 回転角が PI/3から PI*2/3の時はa=0.07、
# それ以外の時は、a=0.1です。
# 新宿のコクーンタワーのような形になります。
case theta
when Math::PI/3 .. 2*Math::PI/3
-0.07*z*(z-8)
else
-0.1*z*(z-8)
end
}
GLUT.Cocoon(6.0, 15, 15){|z,theta,tStep|
# thetaは-PIからPIまで取るので、tは1〜0〜1と連続的に変化します。
t = (theta/Math::PI).abs
# tに1.0(定数)をかけ、1-tに-0.1*z^2 + 0.5*z + 1をかけることで、
# f(z)は直線から2次曲線へと連続的に変化することになります。
1.0*t + (1-t)*(-0.1*z*z + 0.5*z+1)
}
require "matrix"
class Vector
# 準備
# Vectorクラスに、外積を求めるメソッドを追加します。
# http://d.hatena.ne.jp/tanku/20100318/1268930228
# よりコピペさせてもらいました。
def outer_product(o)
raise 'size#{self.size}' unless size == 3
Vector[
self[1] * o[2] - self[2] * o[1],
self[2] * o[0] - self[0] * o[2],
self[0] * o[1] - self[1] * o[0],
]
end
# 基本ベクトルを生成するメソッド。
# ここでは、selfがZ軸に一致するようにしています。
def generate_unit
raise 'vector size must be 3.' unless size == 3
# まず、selfと方向が一致する単位ベクトル w を作ります。
w = self/self.r
# 次に、wと直交するベクトル u を求めます。
# 内積=0を満たしていればいいので、無数にあります。
# ゼロ除算が起こらないような方法を選びました。
# w[0]*w[1] - w[0]*w[1] + w[1]*w[2] - w[1]*w[2] + w[2]*w[0] - w[2]*w[0] = 0
# を変形して、
# w[0]*(w[1]-w[2]) + w[1]*(w[2]-w[0]) + w[2]*(w[0]-w[1]) = 0
# としています。
u0 = Vector[w[1]-w[2], w[2]-w[0], w[0]-w[1]]
u = u0/u0.r
# wを軸として、uを90度回転したものが、残り1つのベクトル v です。
# v = (w・u)*w + (u-(w・u)*w)*cos(90度) - (u✕w)*sin(90度)
# 計算の理屈については、
# http://hooktail.sub.jp/mathInPhys/vectorRot/
# を見てください。
v = w.inner_product(u)*w + u.outer_product(w)
# 作った3つのベクトルを返します。
return [u, v, w]
end
module GL
def GL.ThermoColor(t)
case t
when 0.0 .. 0.2
r=0; g=0; b=5*t
when 0.2 .. 0.4
r=0; g=5*t-1; b=1
when 0.4 .. 0.6
r=0; g=1; b=3-5*t
when 0.6 .. 0.8
r=5*t-3; g=1; b=0
when 0.8 .. 1.0
r=1; g=5-5*t; b=0
else
r=1; g=1; b=1
end
GL.Color(r,g,b)
end
end
if $0 == __FILE__
HEIGHT = 400
WIDTH = 200
def display
GL.Clear(GL::COLOR_BUFFER_BIT)
hStep = 2.0/100
steps = 400
steps.times{|t|
h = 2*t.to_f/steps - 1.0
GL.ThermoColor(t.to_f/steps)
GL.Begin(GL::POLYGON)
GL.Vertex(-1, h)
GL.Vertex(1, h)
GL.Vertex(1, h+hStep)
GL.Vertex(-1, h+hStep)
GL.End
}
GL.Flush()
end
GLUT.Init()
GLUT.InitWindowSize(WIDTH, HEIGHT)
GLUT.InitDisplayMode(GLUT::RGB)
GLUT.CreateWindow("Thermo Color Sample")
GLUT.DisplayFunc(method(:display).to_proc)
GL.ClearColor(1.0, 1.0, 1.0, 1.0)
GLUT.MainLoop();
end
require "./gl_ellipsoid.rb" # 中心は(0,0,0) # 第２引数: X軸方向の半径 # 第３引数: Y軸方向の半径 # 第４引数: Z軸方向の半径 # 第５，第６引数: 描画の細かさ GL.Ellipsoid(1, 2, 3, 20, 20)
require "opengl"
require "glut"
module GLUT
extend Math
def GLUT.Ellipsoid(x,y,z,slice,stack)
tStep = Math::PI/slice.to_f
sStep = Math::PI/stack.to_f
# ワイヤーフレームで描きたい時は、コメントを外してください。
# GL.PolygonMode(GL::FRONT_AND_BACK, GL::LINE)
(-Math::PI/2).step(Math::PI/2+0.0001, tStep){|t|
GL.Begin(GL::TRIANGLE_STRIP)
(-Math::PI).step(Math::PI+0.0001, sStep){|s|
GL.Normal(cos(t)*cos(s), cos(t)*sin(s), sin(t))
GL.Vertex(x*cos(t)*cos(s), y*cos(t)*sin(s), z*sin(t))
GL.Vertex(x*cos(t+tStep)*cos(s), y*cos(t+tStep)*sin(s), z*sin(t+tStep))
}
GL.End
}
end
end
$sudo apt-get install freeglut3 freeglut3-dbg freeglut3-dev $sudo apt-get install ruby1.9.3 $sudo gem install opengl --preこれで完了です。
$sudo apt-get install freeglut3 freeglut3-dbg freeglut3-dev $sudo apt-get install ruby1.9.3 $sudo gem1.9.3 install opengl --pre
if ARGV.size==0
puts "ERROR!: input file name is missing."
exit
end
$original_file_name = ARGV[0]
def output_pbm(data)
height = data.size
width = data[0].size
File.open($original_file_name+".pbm", "w"){|io|
io.puts "P1"
io.puts "# CREATOR: Ruby PNM Filter Version 1.1"
io.puts width.to_s + " " + height.to_s
data.reverse.each{|e1|
io.puts e1.join(" ")
}
}
puts "Created #{$original_file_name+".pbm"}."
end
def get_bmp_data
io = open($original_file_name, "rb")
io.seek(2, IO::SEEK_CUR)
print "file size (byte)="; puts filesize = io.read(4).unpack("i")[0]
io.seek(4, IO::SEEK_CUR)
print "offset="; puts offset = io.read(4).unpack("i")[0]
io.seek(4, IO::SEEK_CUR)
print "width="; p width = io.read(4).unpack("i")[0]
print "height="; p height = io.read(4).unpack("i")[0]
io.seek(2, IO::SEEK_CUR)
print "Bits per pixel="; p bpp = io.read(2).unpack("s")[0]
print "Compression type="; p ctype = io.read(4).unpack("i")[0]
puts "(0:No compression 1:RunLength 8 bits/pixel 2:RunLength 4 bits/pixel 3:Bitfields)"
io.seek(offset, IO::SEEK_SET)
data = Array.new(height)
height.times{|j|
data[j] = Array.new(width)
width.times{|i|
value = io.read(1).unpack("C")[0]
data[j][i] = value
}
io.seek(width%4==0 ? 0 : 4-width%4, IO::SEEK_CUR)
}
io.close
return data
end
def binarize(data, threshold=128)
return data.map{|e1| e1.map{|e2| e2 max_variance_ratio
max_variance_ratio = v
slashold = s
end
}
}
puts "Created #{$original_file_name+".plt"} for gnuplot."
print "max_variance_ratio:"; puts max_variance_ratio
output_pbm(binarize(data, slashold))
print "time(sec): "; puts Time.now - start_time
上位概念Aと下位概念Bという二つの言葉がある場合、
①：「上位概念Aを含み、下位概念Bを含まない」文章( A && ! B )
②：「上位概念Aを含み、かつ下位概念Bを含む」文章( A & B)
③：「上位概念Aを含まず、下位概念Bを含む」文章( !A && B)
の３つの文章の数の比は、①＞②＞③が成り立つ。逆をいえば①＞②＞③が成り立っていれば、どちらが上位語かを判定できるわけだ。
上のサイトの仮説にもとづくと、
文章（webページ）の集合全体Uがあって、Aを含む文章、Bを含む文章の関係が図のようになっているときは、
Aが上位概念、Bが下位概念である、と言えます。
この状態を便宜的に「状態I」とします。
AとBの大小を固定しておいた場合、①＞②＞③という大小関係の他に、
①＞③＞②という場合も考えられます。
つまり、下の図のようになっているときです。この場合、AとBの関連は薄いと言えます。
この状態を便宜的に「状態II」とします。
しかし、実際問題としては「①＞②＞③」と「①＞③＞②」をすっぱりと判定できるものではありません。
そこで、「A & B」を、A、Bそれぞれで割ることで正規化し、座標上にプロットしてみます。
（しばらく、NA＞NBの場合を考えます。）
,
すると、状態Iは
各辺をで割って、
つまり、
となり、
状態Iのときは上の網掛けの正方形部分にプロットされます。
同様に、状態IIのときは
が、
となり、
となります。
状態IIは上の網掛けの三角形部分にプロットされます。
そうなると気になるのが、
上の図の網掛け部分にプロットされるような場合です。
,
ベン図で表すなら、このような、AとBが重なってしまうような状況。
おそらく、文章を書く上での「揺れ」とみなされるような場合であると考えられます。
つまり、AとBは同意語と言えます。
２つのタグA,Bの関係を調べるのに、
,
を考えて座標上にプロットします。
a.にある時・・・AとBの関連は薄い
b.にある時・・・AはBの上位概念である
c.にある時・・・AとBは同意語
が、境界ですっぱりと分けてしまうのは多少乱暴な気もします。
「傾向が強い」「弱い」「可能性が高い」「低い」としておいたほうがよさそうです。
そこで、原点(0,0)からプロットした点(x,y)への距離Rと、
y=xと(0,0)-(x,y)のなす角度を考えてみます。
Rが大きいほど、AとBの関連度が高い。0〜R〜ルート2。
角度（θ）が+に大きいほど、AはBよりも上位の概念である可能性が高い。-45度〜θ〜45度
タグの上位下位を決定できるような仮説を立てることができました。
実際にはてなブックマークのデータを使って実験したものがあるので、そのうち公開したいと思います。
多くの人が商品Aと商品Bを買っているなら、共起性尺度が高い、と言えます。
そこで、Aを買った人にBをおすすめ商品として紹介すれば、買ってもらえる可能性は高いです。
（amazon.comをよく使う人ならピンとくるでしょう）
出てくる結果はある意味で当たり前のことなので、それほどすごいとは感じないかもしれません。
例えば、釣竿を買う人なら釣り糸や餌・ルアー、釣り用ベストなどをおすすめすればいいというのは常識として分かります。
これを購買データの解析で自動で行えるというのがすごいところです。
また、誰も思いつかないような傾向が出てくるかもしれません。
タグAとタグBの共起性尺度が高いなら、あるページにタグAがついた時点で、タグBもそのページにふさわしいだろうということが予想出来ます。
「AとBが共起した回数」割る「AとBの和集合」で求められます。
「AとBが共起した回数」割る「A,Bの回数のうちの小さい方」で求められます。
「AとBが共起した回数」割る「A,Bの回数の平均」で求められます。
[1]統計ソフトRのブログ 共起性尺度
[2]WEB+DB PRESS Vol.57 アルゴリズム実践教室【第2回】レコメンドエンジン開発に挑戦―関連記事を導き出すしくみを知る 伊藤直也
[3]類似度と距離 - CatTail Wiki*
[+]数式の表現にはCODECOGSのサービスを使っています。
#import <Foundation/Foundation.h>
#include "mruby.h"
#include "mruby/string.h"
#include "mruby/compile.h"
#include "mruby/class.h"
#include "mruby/value.h"
#include "mruby/proc.h"
#include "mruby/variable.h"
#include "mruby/array.h"
mrb_value mrb_printstr(mrb_state*, mrb_value);//別エントリで解説しています。
void mrb_interrupt(mrb_state*, mrb_irep*, mrb_code*, mrb_value*);
@interface viewController : UIViewController{
NSOperationQueue *_queue;
NSBlockOperation *_operation;
struct mrb_state *_mrb;
}
-(void)mrbInitPrint;//別エントリで解説しています。
-(void)mrbRun:(NSString *)code;//別エントリで解説しています。
-(IBAction)mrbQuit;
@end
void mrb_interrupt(mrb_state *mrb, mrb_irep *irep, mrb_code *pc, mrb_value *regs){
//code_fetch_hookにすぐにNULLを代入するので、この関数は1回だけ呼ばれます。
//エラーをraiseするとスクリプトが中断するので意味はないですが、
//他の処理を割りこませることもできます。
mrb->code_fetch_hook = NULL;
mrb_raise(mrb, E_RUNTIME_ERROR, "interrupted");
}
@implementation viewController
-(IBAction)mrbQuit{
if(_mrb){ _mrb->code_fetch_hook = mrb_interrupt; }
}
@end
UIButtonのtouch up insideなどにOutletしてください。
module Kernel
# needs __printstr__
def print(*args)
i = 0
len = args.size
while i < len
__printstr__ args[i].to_s
i += 1
end
end
def puts(*args)
i = 0
len = args.size
while i < len
s = args[i].to_s
__printstr__ s
__printstr__ "\n" if (s[-1] != "\n")
i += 1
end
__printstr__ "\n" if len == 0
nil
end
def p(*args)
i = 0
len = args.size
while i < len
__printstr__ args[i].inspect
__printstr__ "\n"
i += 1
end
args[0]
end
def printf(*args)
__printstr__(sprintf(*args))
nil
end
end
#import <Foundation/Foundation.h>
#include "mruby.h"
#include "mruby/string.h"
#include "mruby/compile.h"
#include "mruby/class.h"
#include "mruby/value.h"
#include "mruby/proc.h"
#include "mruby/variable.h"
#include "mruby/array.h"
mrb_value mrb_printstr(mrb_state*, mrb_value);
void mrb_interrupt(mrb_state*, mrb_irep*, mrb_code*, mrb_value*);//別エントリで解説します。
@interface viewController : UIViewController{
NSOperationQueue *_queue;
NSBlockOperation *_operation;
struct mrb_state *_mrb;
}
-(void)mrbInitPrint;
-(void)mrbRun:(NSString *)code;
-(IBAction)mrbQuit;//別エントリで解説します。
@end
//mruby-master/src/print.cからコピペしました。
mrb_value mrb_printstr(mrb_state *mrb, mrb_value self_){
mrb_value argv;
mrb_get_args(mrb, "o", &argv);
struct RString *str;
char *s;
int len;
if(mrb_string_p(argv)){
str = mrb_str_ptr(argv);
s = str->ptr;
len = str->len;
//以下3行を環境に応じて書き換えてください。
AppDelegate *appDel = [[UIApplication sharedApplication] delegate];
UITextView *targetView = appDel.targetTextView;
[targetView performSelectorOnMainThread:@selector(setText:) withObject:[NSString stringWithFormat:@"%s",s] waitUntilDone:YES];
}
return argv;
}
@implementation viewController
-(void)mrbInitPrint{
//Kernelにp,puts,print,printfの定義に使う__printstr__を登録します。
struct RClass *krn;
krn = _mrb->kernel_module;
mrb_define_method(_mrb, krn, "__printstr__", mrb_printstr, ARGS_REQ(1));
//プロジェクトにバンドルしたprint.rbを読み込み、mrubyにロードします。
NSError *error = nil;
NSString *script_str;
NSString *path = [[NSBundle mainBundle] pathForResource:[scripts objectAtIndex:i] ofType:@"rb"];
NSString *print_rb_str = [NSString stringWithContentsOfFile:path encoding:NSUTF8StringEncoding error:&error];
if(!error){
mrb_load_string(_mrb, [print_rb_str cStringUsingEncoding:NSUTF8StringEncoding]);
}
}
-(void)mrbRun:(NSString *)c{
//mruby VMの実行を別スレッドにしている以外は、参考URLの通りです。
if([_operation isExecuting]){ return; }
__block NSString *code = [c copy];
if(!_queue){
_queue = [[NSOperationQueue alloc] init];
}
_operation = [[NSBlockOperation alloc] init];
[_operation addExecutionBlock:^{
const char *codeStr = [code cStringUsingEncoding:NSUTF8StringEncoding];
mrbc_context *ctx;
_mrb = mrb_open();
[self mrbInitPrint];
ctx = mrbc_context_new(_mrb);
struct mrb_parser_state *st = mrb_parse_string(_mrb, codeStr, ctx);
int gen_code_num = mrb_generate_code(_mrb, st);
mrb_pool_close(st->pool);
mrb_value result = mrb_run(_mrb, mrb_proc_new(_mrb,_mrb->irep[gen_code_num]), mrb_nil_value());
if(_mrb->exc){//catch exception
mrb_value r = mrb_funcall(_mrb, result, "inspect", 0);
if(mrb_string_p(r)){
struct RString *str = mrb_str_ptr(r);
NSLog(@"%s",str->ptr);
}
}
mrb_close(_mrb);
mrbc_context_free(_mrb, ctx);
_mrb = NULL;
[_operation release];
_operation = nil;
[code release];
}];
[_queue addOperation:_operation];
}
# Define cross build settings
MRuby::CrossBuild.new('32bit') do |conf|
isysroot = "/Developer/Platforms/iPhoneOS.platform/Developer/SDKs/iPhoneOS5.1.sdk/usr/include"
conf.cc.command = "clang"
conf.cc.flags << "-arch armv7"
conf.cc.include_paths << isysroot
conf.cc.include_paths << "#{root}/include"
end
#define DISABLE_STDIO /* use of stdio */ #define ENABLE_DEBUG /* hooks for debugger */STDIOを無効にします。
project_name/ |--project_name.xcodeproj |--project_name/ |--mruby/ | |--mrbconf.h | |--mruby.h | |--libmruby.a | |--mruby/ | |--array.h | |--class.h | . | . | |--value.h | |--variable.h |--viewController.h |--viewController.m | . | .Finder上でコピーしたあと、Xcode上の左ペインにドラッグ・アンド・ドロップして、プロジェクトに追加します。
"$(SRCROOT)/project_name/mruby"を追加します。