pictexbox_1.wrl source
#VRML V2.0 utf8

Viewpoint {}

NavigationInfo {
type "EXAMINE"
}

# 箱
Shape {
appearance Appearance {
texture DEF PT PixelTexture {}
}
geometry Box {}
}

# テクスチャー作成スクリプト
DEF Sc Script {
eventOut SFImage image
field MFInt32 array [
0xFF0000 0x00FF00 0x0000FF 0xFFFFFF
]
url "javascript:
function initialize () {

image = new SFImage ( 2, 2, 3, array );

}
"
}
ROUTE Sc.image TO PT.image