由于VRML博大精深,这里只介绍一个简单的例子,还可以将各种VRML结点存入数据库中,这样的虚拟现实网页将……,爽!;;
下面是源程序。注意:在服务器上,要将让PHP处理wrl格式的文档,否则后果将是没有任何虚拟现实。本源程序直接存成wrl文件,在浏览器中要安装插件,可以到我的另一个主页上去下载:http://go.163.com/~sjtucaocao/;;
<?php header("Content-type: application/x-vrml");$txt="#VRML V2.0 utf8;;
DEF leftBox Transform;;
{;;
translation -5 0 0;;
children;;
[;;
Shape;;
{;;
appearance Appearance;;
{;;
material Material;;
{;;
diffuseColor 1 0 0;;
};;
};;
geometry Box{};;
};;
DEF SphereChild Shape;;
{;;
appearance Appearance;;
{;;
material Material;;
{;;
diffuseColor 1 0 1;;
};;
};;
geometry Sphere;;
{;;
radius 1.2;;
};;
};;
];;
};;
DEF rightBox Transform;;
{;;
translation 5 0 0;;
children;;
[;;
Shape;;
{;;
appearance Appearance;;
{;;
material Material;;
{;;
diffuseColor 0 0 1;;
};;
};;
geometry Box{};;
};;
];;
};;
DEF onoff Transform;;
{;;
translation 0 -1 0;;
children;;
[;;
Shape;;
{;;
appearance Appearance;;
{;;
material Material;;
{;;
diffuseColor 0 1 0;;
};;
};;
geometry Box{};;
};;
DEF TS TouchSensor{};;
];;
};;
DEF S Script;;
{;;
eventIn SFBool isActive;;
eventOut MFNode child;;
field MFNode testNode USE SphereChild;;
url;;
"javascript:;;
function isActive(value);;
{;;
if (value);;
{;;
child=testNode;;;
};;
};;
";;
};;
ROUTE TS.isActive TO S.isActive;;
ROUTE S.child TO leftBox.removeChildren;;
ROUTE S.child TO rightBox.addChildren";echo $txt;;;
?>;;;
标签: