About the default camera turn VR camera

Uh... 15 Starts ~

Last year I wanted to write a script about the default camera to VR camera, then did not finish writing, today accidentally turned and finished, and the idea is completely different from the original, increased whether to delete the original camera and whether to convert the selected camera options.

Due to the confusion of the domestic VR version, the middle adds the English version of the adaptation.

fn Cam_to_vrcam sel: #off del: #on = (Local Sel_cam = # () Local Del_cam = # () Case Sel of (#off: Cams = Cameras#on:cams = Sel _cam + selection) Case of ((Vrayphysicalcamera! = undefined): Yy_vrcam = Vrayphysicalcamera Isselected:on (VR physical camera! = Undefi Ned): Yy_vrcam = VR physical Camera isselected:on (vr_ physical camera! = undefined): Yy_vrcam = vr_ physical camera isselected:on--Default:) for C=1 to Cams.count Do (if (classof cams[c] = = Freecamera) or (classof cams[c] = = Targetcamera) do (Yy_new_cam = copy yy_vrcamtry CA Ms[c].type = #free catch () Yy_new_cam.rotation = Cams[c].rotationyy_new_cam.pos = Cams[c].posappend Del_cam cams[c])) Delete Yy_vrcamcase del of (#on: for D in Del_cam do delete D#off: ()))--Convert the default camera to a VR physical camera Cam_to_vrcam SEL: #on del: #on

Find a simpler way to continue modifying ~

About the default camera turn VR camera