Rendering学習日記

• RenderMan
• 2013.11.24 Sunday

Aqsis1.6とguile-rmanでのサンプルが動くように調整しました。

以下、test0.scmを実行します。
Some deprecated features have been used. Set the environment variable GUILE_WARN_DEPRECATED to "detailed" and rerun the program to get more information. Set it to "no" to suppress this message.

export GUILE_WARN_DEPRECATED="detailed"
を.bashrcに書き加えた方が良いです。

#!/usr/bin/guile -s

!#



(use-modules (rman rispec))

(use-modules (rman utilities))



(define (progress percent frame)

  (display "Percent: ")

  (display percent)

  (display " Frame: ")

  (display frame)

  (newline))



(define (subdiv ptr lod)

  (display "Ptr: ")

  (display ptr)

  (display " Lod: ")

  (display lod)

  (newline))



(define (free ptr)

  (display "Ptr: ")

  (display ptr)

  (newline))



(define bound #f32(0.0 0.0 0.0 10.0 10.0 10.0))



(define data '(some data))



(RiBegin "test0.rib")

  (RiDisplay "sphere_two.tif" "file" "rgb")

  (RiFormat 320 240 1)

  (RiProjection "perspective" '("fov" 45.0))

  (RiTranslate 0 0 6)

  (RiProgressHandler progress)

  (RiWorldBegin)

    (let ((o1 (Object (RiSphere 1 -1 1 360))))

      (RiLightSource "ambientlight" '("intensity" 0.2))

      (RiLightSource "distantlight" '("intensity" 1.2

                                      "from" #f32(0 0 -6)

                                      "to" #f32(0 0 0)))

      (RiColor #f32(1.0 0.0 0.0))

      (RiSurface "plastic")

      (RiTranslate -2.0 0 0)

      (RiObjectInstance o1)

      (RiColor #f32(0.0 1.0 0.0))

      (RiSurface "plastic")

      (RiTranslate 4.0 0 0)

      (RiObjectInstance o1)

      (RiProcedural data bound subdiv free))

  (RiWorldEnd)

(RiEnd)

一歩一歩ですね。ありがとうございます。
RIB出力するようになれば完璧です。
以下は課題？。
configure:11571: checking for RiBegin in -laqsis_core
configure:11606: gcc -o conftest -g -O2 conftest.c -laqsis_core >&5
/usr/lib64/libaqsis_ribparse.so.1: undefined reference to `boost::iostreams::detail::zlib_base::inflate(int)'
collect2: ld returned 1 exit status

• -
• -