typeof env_ref=Env;;
defcom Smain=main S S S S I;;
fun multiress(res)=
if res==nil then
0
else
let res -> [l nxt] in
(
_setress hd l hd tl l;
multiress nxt;
);;
fun main(p)=
set env_ref=_envchannel _channel;
multiress strextr _loadressini;
srand time;
_load "tools/os3dplayer/os3dload.pkg";
_script mkscript Smain ["examples/openxr.xos" "OS3D\ Passthrough" "1280" "720" 0];
0;;