(define node (add-animated-mesh-scene-node scene-manager mesh))
(when node
- (set-material-flag-am! node 'lighting #f)
+ (set-material-flag! node 'lighting #f)
(set-md2-animation! node 'stand)
- (set-material-texture-am! node 0 (get-texture driver "media/sydney.bmp")))
+ (set-material-texture! node 0 (get-texture driver "media/sydney.bmp")))
;; place camera
-(add-camera-scene-node scene-manager #:position '(0 30 -40) #:lookat '(0 5 0))
+(add-camera-scene-node! scene-manager #:position '(0 30 -40) #:lookat '(0 5 0))
;; draw everything
(while (device-run? device)