flag_no_viz.rsg

来自「robocup rcssserver 运行防真机器人足球比赛所用的服务器端」· RSG 代码 · 共 18 行

; -*- mode: lisp; -*-
;
; create a field flag at ($PosX $PosY $PosZ) named $Name with the
; given $Material
;

(RSG 0 1)
(
 (templ $PosX $PosY $PosZ $Name)

 (nd Transform
       (setLocalPos $PosX $PosY $PosZ)

       (nd ObjectState
	     (setPerceptName $Name)
	     )
       )
 )