<table border="0" align="center" width="95%" cellpadding="0" cellspacing="0"><tr><td>Code Sample </td></tr><tr><td id="CODE">_objet1 = _this select 0
_cam = "camera" camcreate [0,0,0]
_cam cameraeffect ["internal", "back"]
; point the camera at the object1, and place it 150m to the object1s left,
; 45m to his front and 120m above the ground
_cam CamSetFOV 0.50
_cam camsettarget _objet1
_cam camsetrelpos [-150,45,120]
_cam camcommit 0
; fade in from black over 2 seconds
titlecut [" ","BLACK IN",2]
; wait for 2 seconds for the fade to complete
~2
; wait two seconds
~10
; fade out over 2 seconds
titlecut [" ","BLACK OUT",2]
~2
camDestroy camera
camDestroy _cam
exit [/QUOTE]
my camera isnt destroy at end of script. screen is black at infinite.
HOME
Reply With Quote
