disc! sets the video output to the optcal disc. Contract with line! .
duration[=?] Set/get the number of frames that will either be recorded or played back by record! or play_range!
eject! Ejects the disk from the recorder
end_frame[=?] Set/get the last frame that will either be recorded or played back by record! or play_range!
error? Returns 0 if no error occurred on the last action (e.g. record_standby!). Returns 1 if an error occurred, and 2 if there was a warning.
error_message? Returns a string that contains a description of the last error that occurred.
frame= Prompts the recorder to locate the specified position on the disk, and to display it.
frame? Returns the number of the frame that the disk is currently positioned at.
initialize! Opens/configures the serial port defined by serial_port= and initializes the optical disk recorder.
line! sets the video output to input video. Contract with disc! .
next_blank? Searches the current optical disk for the first blank area on the disk. It returns two scalars,
first the location of the first blank frame. Next it returns the location of the last blank frame in the first blank area. This method can take 60 seconds if a new disk was just inserted.
play! Starts the optical disk playing from the current frame.
play_fast! Starts the optical disk playing from the current frame at 3 times the normal speed.
play_range! Starts the optical disk playing at frame defined by start_frame= and stop it at the frame defined by end_frame=.
play_reverse! Starts the optical disk playing backwards from the current frame.
play_reverse_fast! Starts the optical disk playing backwards from the current frame at 3 times the normal speed.
play_reverse_slow! Starts the optical disk playing backwards from the current frame at 1/5 the normal speed.
play_slow! Starts the optical disk playing from the current frame at 1/5 the normal speed.
record! Records current video signal on the optical disk from the frame defined by start_frame= to the frame defined by end_frame=. The record_standby! message *MUST* be sent first.
record_standby! Tells the optical disk recorder to get ready to record from the frame defined by start_frame= to the frame defined by end_frame=. Use the error? method to determine if the range if valid. The optical disk is set up so you can not write over existing frames.
scan! Starts the optical disk playing back the recorded data on the disk from the current location at approximately 30 times normal speed.
scan_reverse! Starts the optical disk playing back the recorded data on the disk from the current location (in
reverse) at approximately 30 times normal speed.
serial_post[=?] Set/get the serial port used to communicate to the optical disk. The default port is /dev/ttyb.
start_frame[=?] Sets/gets the first frame to be recorded / played back by the record! and play_range! methods.
step! Moves to the next frame on the optical disk and displays it.
step_reverse! Moves to the previous frame on the optical disk and displays it.
stop! Stops the optical disk from playing.
The first example displays a frame off the optical disk.
lvr5000 new: lvr; lvr initialize!; lvr frame= 100;
The second example displays a range of frames off the optical disk.
lvr5000 new: lvr; lvr initialize!; lvr start_frame=100; lvr end_frame=200; lvr play_range!;
The third example shows how to record a range of frames on the optical disk.
lvr5000 new: lvr; lvr initialize!; lvr start_frame=300; lvr end_frame=310; lvr record_standby!; lvr record!;
The last example shows how to copy of range of frames from the optical disk to the 3/4" tape using the minivas and proxy objects.
lymb_process new:proc1
lymb_command="lymb" hostname="battenkill" create!;
lymb_process new:proc2 lymb_command="lymb" hostname="sierra" create!;
proc1 redirect# "lvr5000" new:"lvr"; proxy new:lvr lymb_process_name=proc1; lvr initialize!; lvr print:next_blank;
proc2 redirect# "minivas" new:"mv"; proxy new:mv lymb_process_name=proc2;
scalar new: to_frame; scalar new: from_frame;
from_frame = 10700; to_frame = 100;
mv
debugon!
serial_port = "/dev/ttyb"
device_name = "Sony BVU-950"
frames_per_recording=1
start_frame= to_frame
initialize!
;
loop new: l1
resolution=1
duration=100
start_actions+" mv cue_tape!;
"
tick_actions+" lvr frame= from_frame; lvr print: frame; mv start_frame= to_frame; mv record!; from_frame+ 1; to_frame+ 1;
" ;
shell new! command=`sleep 10' do! free!; l1 start!;