home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Phoenix Heaven Sunny 2
/
APPARE2.BIN
/
oh_towns
/
calendar
/
midori12
/
src
/
t4_shdw.ray
< prev
next >
Wrap
Text File
|
1995-06-20
|
6KB
|
457 lines
#define snowHatCrownC blackC
#define snowEyeC blackC
#define snowArmC blackC
#define snowHandC blackC
#define tNeckC tMarrowC
#define tThighC tPodC
#define tShinC tPodC
#define tHatBrimC blackC
#define tHatCrownC blackC
#define tHatCoreC blackC
rmode 0 ;
voxel 8 ;
anti 0 .1 ;
output t4_3shdw.tif ;
output_mode 16 0 ;
back_mode 0 0 0 0 ;
condition 3 1e-2 1e-4 0 ;
shadow 1 ;
mist 1000 0 ;
sky .1 .1 .1 ;
env .4 .4 .4 ;
display
256 256
0 0
255 255
1 1
1 ;
/* 50 50
0 0
49 49
1 1
1 ;
*/
camera
-36 40 60
-36 160 90
-36 160 100
38 0 ;
e_light
[
0 -1 0 1 1 1 6 2 ;
]
/* ********** ********************* ********** */
color
[
wallC
1 1 1
0 0 0
0 0 0
1.0
0
0
0 .6 120 ;
snowC
.8 .8 .8
0 0 0
0 0 0
1.0
0
0
0 .6 200 ;
boaterStrawC
.8 .6 .4
.25 .25 .25
0 0 0
1.0
0
0
0 .6 100 ;
boaterBandC
.4 .8 .9
.2 .2 .4
0 0 0
1.0
0
0
0 .6 100 ;
blackC
.2 .2 .2
0 0 0
0 0 0
1.0
0
0
0 .6 100 ;
orangeC
.9 .4 .0
.1 .1 .1
0 0 0
1.0
0
0
0 .6 100 ;
tHeadC
0 0 0
0 0 0
0 0 0
1.0
0
0
0 .6 100 ;
tMarrowC
.8 .3 .4
.2 .2 .2
0 0 0
1.0
0
0
0 .6 200 ;
tWaistC
.5 .5 .4
.2 .2 .2
0 0 0
1.0
0
0
0 .6 160 ;
tHandC
.6 .6 .5
.2 .2 .2
0 0 0
1.0
0
0
0 .6 180 ;
tPodC
.2 .8 .4
.3 .3 .3
0 0 0
1.0
0
0
0 .6 180 ;
tKneeC
.8 .2 .3
.3 .3 .3
0 0 0
1.0
0
0
0 .6 200 ;
]
/* ********** ********************* ********** */
obj [
wall ;
snowMans ;
T4s ;
]
/* ********** ********************* ********** */
obj wall
[ :my300 :rx90
1 wallC 1 0 0 0 0 0 1 n ;
]
/* ********** ********************* ********** */
obj snowMans
[
:mx-130 :rz40 snowMan ;
]
obj snowMan
[ :mz-16
snowHeads ;
snowBodys ;
]
/* ********** ********** */
obj snowHeads
[ :mz70
snowHats ;
snowHead ;
/* snowFace ;
*/ ]
obj snowHats
[ :rz40 :ry10 :mz-4 :mz24
snowHat ;
]
obj snowHat
[ :ry10
snowHatBrim ;
snowHatCrown ;
/* snowHatBand ;
snowHatCore ;
*/ ]
obj snowHatBrim
[ :mz1
15 boaterStrawC 1 0 0 0 0 0 1 18 1 ;
]
obj snowHatCrown
[ :mz4
15 boaterStrawC 1 0 0 0 0 0 1 11.0 4 ;
]
obj snowHatBand
[ :mz4.0
15 boaterBandC 1 0 0 0 0 0 1 11.1 2.1 ;
]
obj snowHatCore
[ :mz3
15 boaterStrawC -1 0 0 0 0 0 1 9.5 3.05 n ;
]
obj snowHead
[
2 snowC 1 0 0 0 24 ;
]
/* ********** ********** */
obj snowBodys
[ :mz40
snowBody ;
snowArms ;
/* snowButtons ;
*/ ]
obj snowBody
[
2 snowC 1 0 0 0 30 ;
]
obj snowArms
[
[ :rx-50 :rz36 :my-30 snowLeftArm ; ]
[ :rx-50 :rz-36 :my-30 snowRightArm ; ]
]
obj snowLeftArm
[
snowArm ;
]
obj snowRightArm
[
snowArm ;
]
obj snowArm
[ :my-16
15 :rx90 snowArmC 1 0 0 0 0 0 1 2.8 16 ;
2 :my-16 snowHandC 1 0 0 0 2.8 n ;
]
/* ********** ********************* ********** */
obj T4s
[
:rz15 T4 ;
]
obj T4
[ :mz90
tBodys ;
tWaist ;
tHands ;
tPods ;
tHeads ;
]
/* ********** ********** */
obj tBodys
[
tNeck ;
tMarrows ;
]
obj tNeck
[ :mz1
3 tNeckC 1 0 0 0 4.5 4.5 3 ;
]
obj tMarrows
[
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
:mz-4 tMarrow ;
]
obj tMarrow
[
3 tMarrowC 1 0 0 0 4 4 2.4 ;
]
/* ********** ********** */
obj tWaist
[ :mz-40
15 tWaistC 1 0 0 0 0 0 1 10 2.0 ;
]
/* ********** ********** */
obj tHands
[ :mz1
tHand ;
:rz60 tHand ;
:rz60 tHand ;
:rz60 tHand ;
:rz60 tHand ;
:rz60 tHand ;
]
obj tHand
[ :rx16 :my-10 :rx90
15 tHandC 1 0 0 0 0 0 1 1.6 10 ;
]
/* ********** ********** */
obj tPods
[ :mz-39
tPod ;
:rz60 tPod ;
:rz60 tPod ;
:rz60 tPod ;
:rz60 tPodwithHat ;
:rz60 tPod ;
]
obj tPod
[
[ :my-6
[ :rx-20 tThigh ;
[
:my-55 tKnee ;
:rx93 tShin ;
]
]
]
]
obj tPodwithHat
[
[ :my-6
[ :rx20 tThigh ;
[
:my-60 tKnee ;
:rx-120 tShin ;
:my-70 tHat ;
]
]
]
]
obj tHat
[ :my-16 :ry20 :rx-20 :rx180
{
[
tHatBrim ;
tHatCrown ;
]
/* tHatCore ;
*/ }
]
obj tHatBrim
[ :mz1
15 tHatBrimC 1 0 0 0 0 0 1 18 1 b tHatCoreC ;
]
obj tHatCrown
[ :mz8
15 tHatCrownC 1 0 0 0 0 0 1 12 9.0 ;
]
obj tHatCore
[ :mz4
15 tHatCoreC -1 0 0 0 0 0 1 11 4.05 n ;
]
obj tThigh
[ :my-30 :rx90
15 tThighC 1 0 0 0 0 0 1 2.4 30 ;
]
obj tKnee
[
2 tKneeC 1 0 0 0 3.6 ;
]
obj tShin
[ :my-36 :rx90
15 tShinC 1 0 0 0 0 0 1 2.4 36 ;
]
/* ********** ********** */
obj tHeads
[
:ry-16 tHead ;
]
obj tHead
[
20 tHeadC 1
<
/* top */
p1 0 0 60
/* temple clockwise */
p2 0 20 45
p3 16 10 45
p4 16 -10 45
p5 0 -20 45
p6 -16 -10 45
p7 -16 10 45
/* jaw clockwise */
p8 10 16 15
p9 20 0 15
p10 10 -16 15
p11 -10 -16 15
p12 -20 0 15
p13 -10 16 15
/* bottom */
p14 0 0 0
/* top clockwise */
P 1 2 3 ;
P 1 3 4 ;
P 1 4 5 ;
P 1 5 6 ;
P 1 6 7 ;
P 1 7 2 ;
/* middle clockwise */
P 2 8 13 ;
P 2 3 8 ;
P 3 9 8 ;
P 3 4 9 ;
P 4 10 9 ;
P 4 5 10 ;
P 5 11 10 ;
P 5 6 11 ;
P 6 12 11 ;
P 6 7 12 ;
P 7 13 12 ;
P 7 2 13 ;
/* bottom clocdwise */
P 14 13 8 ;
P 14 8 9 ;
P 14 9 10 ;
P 14 10 11 ;
P 14 11 12 ;
P 14 12 13 ;
> ;
]