#VRML V2.0 utf8
##<load file=web3d-navigate>
## written by GLView 4.4 http://www.snafu.de/~hg

##@ extern

EXTERNPROTO MultiTexture [
	exposedField MFString mode
	exposedField MFNode texture
	exposedField MFNode textureTransform
	exposedField MFInt32 textureOp
]
[ "urn:inet:blaxxun.com:node:MultiTexture" "http://www.blaxxun.com/vrml/protos/nodes.wrl#MultiTexture" ]

EXTERNPROTO Particles[
	exposedField SFVec3f bboxSize
	exposedField SFVec3f bboxCenter
	exposedField SFFloat lodRange
	exposedField SFBool enabled
	exposedField SFFloat particleRadius
	exposedField SFFloat particleRadiusVariation
	exposedField SFFloat particleRadiusRate
	exposedField SFNode geometry
	exposedField SFVec3f emitterPosition
	exposedField SFFloat emitterRadius
	exposedField SFFloat emitterSpread
	exposedField SFVec3f emitVelocity
	exposedField SFFloat emitVelocityVariation
	exposedField SFRotation emitterOrientation
	exposedField SFFloat creationRate
	exposedField SFFloat creationRateVariation
	exposedField SFInt32 maxParticles
	exposedField SFTime maxLifeTime
	exposedField SFFloat maxLifeTimeVariation
	exposedField SFVec3f gravity
	exposedField SFVec3f acceleration
	exposedField SFColor emitColor
	exposedField SFColor fadeColor
	exposedField SFFloat fadeAlpha
	exposedField SFFloat fadeRate
	exposedField SFInt32 numTrails
	exposedField SFInt32 numSparks
	exposedField SFVec3f sparkGravity
	exposedField SFColor sparkFadeColor
	]
 ["urn:inet:blaxxun.com:node:Particles","http://www.blaxxun.com/vrml/protos/nodes.wrl#Particles","nodes.wrl#Particles"]
EXTERNPROTO DrawGroup[
	exposedField SFVec3f bboxSize
	exposedField SFVec3f bboxCenter
	exposedField SFBool sortedAlpha
	exposedField MFNode drawOp
	exposedField MFNode children
	eventIn MFNode addChildren
	eventIn MFNode removeChildren
	]
 ["urn:inet:blaxxun.com:node:DrawGroup","http://www.blaxxun.com/vrml/protos/nodes.wrl#DrawGroup","nodes.wrl#DrawGroup"]
DEF _1 PointLight {
	color 1 0.05 0.05
	on FALSE 
	location 0 2 0
}
WorldInfo {
	info "Contact 5.0 Particle system test"
	title "Particles"
}
DEF _2 NavigationInfo {visibilityLimit 200}
DEF TS TimeSensor {
	cycleInterval 10
	enabled TRUE 
	loop TRUE 
}
DEF _3 Viewpoint {
	fieldOfView 1
	position 0 2.75 70
	description "Entry"
}
DEF Background Background {
	skyColor 0 0 0
}
DEF Objects Switch {
	whichChoice -1
	choice [
		DEF PS Particles {
			bboxSize -1 -1 -1
			lodRange 0
			particleRadius 0.55
			particleRadiusVariation 1.4
			particleRadiusRate 3
			emitterPosition 0 2 0
			emitterRadius 0
			emitterSpread 0.342724
			emitVelocity 15 25 15
			emitVelocityVariation 1
			creationRate 10
			maxParticles 100
			maxLifeTime 4
			gravity 0 10 0
			emitColor 0 1 0.781729
			fadeColor 1 1 0.5
			fadeAlpha 0
			fadeRate 0.25
			numTrails 0
			numSparks 0
		},
		DEF PS-S Shape {
			appearance Appearance {texture 
				DEF M1 MultiTexture  {
					#color TRUE 
					mode [ "MODULATE"
					#	"COMPLEMENT_MODULATE"
					]  #COMPLEMENT_MODULATE
					texture	[
				DEF M1 MovieTexture {
					url	"local/clips/effects/balls.wmv"
					repeatS	FALSE repeatT FALSE
					loop TRUE
					repeatS FALSE 
					repeatT FALSE 

				}
					
#				DEF PS-TEX ImageTexture {
#					url "logo.jpg"
#					repeatS FALSE 
#					repeatT FALSE 
#				}
			]
		}
			}
			geometry USE PS
		},
		DEF PS2 Transform {
			translation 0 10 0
			rotation 1 0 0 1.7
			children [
				Transform {
					translation -5 0 4
					children USE PS-S
				},
				Transform {
					translation 7 0 -8
					children USE PS-S
				},
				Transform {
					translation 2 0 15
					children USE PS-S
				}
			]
		}
	]
}
DrawGroup {
	sortedAlpha TRUE 
	children [
		DEF Mirror-SW Switch {
			whichChoice -2
			choice DEF Mirror Transform {
				scale 1 -1 1
				children USE PS2
			}
		},
		DEF Shadow-SW Switch {
			whichChoice -1
			choice DEF Shadow Transform {
				scale 1 0 1
				children Shape {
					appearance Appearance {material Material {
							diffuseColor 0 0 0
							emissiveColor 0.5 0.5 0.5
							transparency 0.5
						}}
					geometry USE PS
				}
			}
		},
		DEF PS-T Transform {
			children USE PS2
		}
	]
}
DEF PS-translation PositionInterpolator {keyValue [0 0 0,0 0 0]}
DEF PS-rate ScalarInterpolator {keyValue [
		50,100,80,10,50]}
DEF PS-spread ScalarInterpolator {keyValue [
		0.25,0.35,0.3,0.1,
		0.25]}
DEF PS-color ColorInterpolator {keyValue [1 0 0,0 0 1,1 0 1,1 0 0]}
DEF Controller Script {
	eventIn SFColor color
	field SFNode background USE Background
	url "javascript:
	function color (c) {
		f=0.4;
		background.skyColor[0] = new SFColor(f*(1.0-c.r),f*(1.0-c.g),f*(1.0-c.b));
	}
	"
}
DEF Viewpoint2 Viewpoint {
	fieldOfView 1.5708
	orientation 0 1 0 0.0671873
	position 0.325514 2.75 25.5818
	description "Viewpoint2"
}
DEF Viewpoint3 Viewpoint {
	fieldOfView 2.96706
	orientation 0 1 0 0.0681525
	position 3.77006 2.75 69.8829
	description "Viewpoint3"
}
DEF Viewpoint4 Viewpoint {
	fieldOfView 1.32913
	orientation 0.104288 -0.990171 -0.0931975 3.04577
	position -1.02878 9.08635 -11.1508
	description "Viewpoint4"
}
DEF Viewpoint5 Viewpoint {
	fieldOfView 1.25635
	orientation 0.101163 -0.99079 -0.0900092 3.1008
	position 2.83966 9.08635 31.491
	description "Viewpoint5"
}
ROUTE TS.fraction TO PS-rate.fraction
#ROUTE PS-rate.value TO PS.set_creationRate
ROUTE TS.fraction TO PS-spread.fraction
ROUTE PS-spread.value TO PS.set_emitterSpread
ROUTE TS.fraction TO PS-color.fraction
ROUTE PS-color.value TO PS.set_emitColor
#ROUTE PS-color.value TO Controller.color

# VRML absolute time 
# startup timer 
DEF initTS TimeSensor {
	cycleInterval 0.1
	loop TRUE
}
# start videos 
ROUTE initTS.cycleTime TO M1.set_startTime

# stop the startup timer
ROUTE initTS.cycleTime TO initTS.set_stopTime