#
# HELP: SYNOPSIS:
# HELP:     colotux/options/rearview
# HELP:
# HELP: DESCRIPTION:
# HELP:     En-/Disable a "rear view mirror" shown above the Planes_XY view.
#

IF ${((int)$argv[1])!=1} GOTO rearview_off

# Start from the main view.
VIEW_SET Main
# Make it autorender on move. Gets confusing if you don't.
# draw not only when current view
VIEW_DRAWWHENFLAGS &~0x04

VIEW_ADD RearView
VIEW_CAMERA_JOIN Main RearView
VIEW_SET RearView
VIEW_SIZE ${$root.view[Main].size.x} ${$root.view[Main].size.y}
MARKER_DEL RearView
VIEW_TURN 180 0 0
RENDERER_ENGINE Class
RENDERER_MODE Gradient
TMODE Camera  
RENDERER_FINESTEP 6
RENDERLUT_SIMPLE 125  
# draw not only when current view
VIEW_DRAWWHENFLAGS &~0x04
VIEW_ORIENT BEFORE Planes_XY
MARKER_VIS 5

VIEW_SET Main

VIEW_RENDER
USLEEP 500000
VIEW_REORIENT
VIEW_RENDER

QUIT

# Turn it off again
:rearview_off

# Start from the main view.
# Stop it form autorendering.
VIEW_SET Main
# draw only when current view
VIEW_DRAWWHENFLAGS |0x04

VIEW_DEL RearView
VIEW_SET Main
