やれてないけどやってみる？: 2008/10

2008年10月21日火曜日

製品情報 | ハードウエアソリューションセールスチーム【ユニ

こういうカメラを２つ、目玉のなかに仕込んで
ロボットの目にしたいっすねーーー

あ、その場合は、目玉を動かすためのモーターが最低でも３つ必要ですなぁ…

製品情報 | ハードウエアソリューションセールスチーム【ユニテックｼｽﾃﾑ株式会社】

UTS-C03MBシリーズはオムニヴィジョンテクノロジーズ社OV7660CMOS
センサを搭載した小型で低消費電力の組込み機器用に設計されたUSB2.0
I/Fを備えた超小型CMOSカメラ基板です。
VGAサイズで30フレーム/秒の撮影が可能です。
低価格な為、大量ロット製品への組込みに適しております。

		UTS-C03MB-1007　（水平画角：53.7°　垂直画角：41.1°）
		UTS-C03MB-1025　（水平画角：92°　垂直画角：72°）

		無料貸出キャンペーン！【申し込みはこちら】

2008年10月17日金曜日

あたまぐるぐる

ここんとこ、頭の中に渦巻いてることが2つあります。

1:モンスターハンターポータブル2nd G

2:人工知能のプログラミング

1番目はゲームです。PSPで。
でっかいモンスターを狩りまくり〜〜〜
たまに狩られてしまいますが…
なんでこんなにおもしろいんだろうか。
かれこれ半年くらいやってるかも。
200万本以上売ったキラーアプリだってのも
わかります。

2番目は…
「私」という意識は特別で脳のすべての機能を司っていて、
すべて意識が決定している、
のではなく、
エピソード記憶を会得するために必要だった
脳内の1機能にすぎず、
物を見るのと同列の機能であり、
他の脳機能による決定を情報の下流で見ているだけの存在である、
という本を前に読んで、
激しく同意したのと、
心というものも脳内の他の機能と同じで
受け身的に働いているんだと思ったら
人工知能が作れそうな気がしちゃって、ね。

自分で成長する知能を作るためには、体が必要なんですよ。
ロボットですよね〜

はぁ〜
視覚を与えるためのプログラムは　のろのろと進んでいるんですが、
頭ぐるぐる〜〜〜です

2008年10月14日火曜日

blogerにLispのﾌﾟﾛｸﾞﾗﾑを載せるのが難しい件

(if (< b 100)
(progn
(format (standard-output) " *** a= ~S b= ~S ~%" a b)
の

<

と

"

あたりが悪さするらしく。

修正しようとすると＜の後ろから崩れてなくなっちゃう。
文字の修飾をすると崩れるようだ。
＜ｐｒｅ＞をかけられるようにするとか、
ある指定した範囲内の制御記号は無視するとか、
エスケープ文字を教えてくれるとか、
して欲しいっす。

OpenLispでlet変数がstack-overflowする件

OpenLispでletで作った変数がstack-overflowしちゃいます。

↓stack-overflowする例



(defun testmem (a b)
 (let ((aa a) (bb b))
 (setq aa (+ aa 1))
 (if (= aa 100)
  (progn 
   (setq aa 0)
   (setq bb (+ bb 1))))
 (if (< bb 100)
  (progn
   (format (standard-output) " ***  aa= ~S  bb= ~S ~%" aa bb)
   (testmem aa bb)))
))

(testmem 0 0)

↓stack-overflowしない例


(defun testmem (a b)
 (setq a (+ a 1))
 (if (= a 100)
  (progn 
   (setq a 0)
   (setq b (+ b 1))))
 (if (< b 100)
  (progn
   (format (standard-output) " ***  a= ~S  b= ~S ~%" a b)
   (testmem a b)))
)

(testmem 0 0)

違いは(let ((aa a) (bb b))があるかどうか、のみ。
前者は手元の環境(ver.8.8.0-win32-x86)では

前略
・
・
・
*** aa= 5 bb= 19
** eval : stack-overflow : nil
と終わります。

無駄なlet変数は使わないように > 自分