movie in to a texture

Blitz3D Forums/Blitz3D Beginners Area/movie in to a texture

Mr. Slat

(Posted 2006) [#1]

I don't know if it's possible to draw movies in to a texture. an error ocures indicating Memory access violation. I don't know if I'm doing anything wrong or if it's blitz3d that doesn't support drawing movies to a texture.

best Wishes

b32	(Posted 2006) [#2]

It seems that you can draw a movie to a texture, so it is probably something else. When the texture is smaller than the movie, I saw nothing, so maybe it is that.

; Movie Commands Example
; ======================
; This demonstrates the following commands:
;
;	OpenMovie
;	MovieHeight
;	MovieWidth
;	MoviePlaying
;	DrawMovie

; Some constants to start with
Const WIDTH = 640
Const HEIGHT = 480

; First of all, set up the graphics
Graphics3D WIDTH, HEIGHT,0,2
SetBuffer BackBuffer()
ClsColor 0,0,0
Color 0,255,0

camera = CreateCamera()
MoveEntity camera, 0, 0, -10

sphere = CreateSphere()
tex = CreateTexture(512, 512)

; Next, open the movie file.  Feel free to change this to an AVI or MPEG file.
movie=OpenMovie("ruby.avi")

; check to see if it loaded okay
If movie=0 Then RuntimeError "Error - Movie not loaded!"
If Not(MoviePlaying(movie)) Then RuntimeError "Error - Movie not playing!"

;Now determine the size of the movie
w=MovieWidth(movie)     ; the width of the movie
h=MovieHeight(movie)    ; the height of the movie

; Now set up the starting position and timing variables
x=(WIDTH-w)/2           ; the x position of the movie on screen
y=(HEIGHT-h-100)/2      ; the y position of the movie on screen
period=100              ; the interval between frames
time=MilliSecs()        ; the time of the last frame update

; And here's the main loop
Repeat

; Wait for the specified period

; GIFs have no timing info, and as such will redraw the next frame on each call to DrawMovie.
; AVIs and MPEGs do have timing info, and as such will redraw the most recent frame on each call to DrawMovie.
; Ergo, this time limiter only has an impact, and is only required for GIFs.
Repeat
; do nothing
Until MilliSecs()-time>=period
time=MilliSecs()    ; save the current time for the next frame

; Handle keyboard inputs

; CONTROL adjusts the speed with which we do stuff	
If KeyDown(29) Or KeyDown(157) Then
change=5
Else
change=1
End If

; SHIFT means we're dealing with the size
If KeyDown(42) Or KeyDown(54) Then
	If KeyDown(203) And w>change-1 Then w=w-change
	If KeyDown(205) And x+w+change < WIDTH Then w=w+change
	If KeyDown(200) And h>change-1 Then h=h-change
	If KeyDown(208) And y+h+change < HEIGHT Then h=h+change
Else
	; otherwise it's the position that we're changing
	If KeyDown(203) And x>change-1 Then x=x-change
	If KeyDown(205) And x+w+change < WIDTH Then x=x+change
	If KeyDown(200) And y>change-1 Then y=y-change
	If KeyDown(208) And y+h+change < HEIGHT Then y=y+change
EndIf

; +/- to change the animation speed
If ( KeyDown(13) Or KeyDown(78) ) And period>change Then period=period-change
If ( KeyDown(12) Or KeyDown(74) ) And period < 500 Then period=period+change

; Redraw the screen, by...

RenderWorld

SetBuffer TextureBuffer(tex)
Cls                         ; clear the screen
DrawMovie movie,x,y,w,h     ; draw the movie
SetBuffer BackBuffer()

EntityTexture sphere, tex

; draw the instructions
Text 0,0,"Use the arrow keys to reposition the movie."			
Text 0,20,"Hold SHIFT with the arrow keys to resize."					
Text 0,40,"Use + or - or control the animation speed."
Text 0,60,"Hold CONTROL to resize, move, or change speed faster."	
Text 0,80,"Press ESCAPE to exit."
Text 0,100,"Current Command Syntax: DrawMovie(movie, " + x + ","+ y + "," + w + "," + h + ")"
; Flip the buffers
Flip						

Until KeyHit(1) ; Escape to exit

; Remove the movie from memory before closing down
CloseMovie(movie)

End ; bye!

jfk EO-11110

(Posted 2006) [#3]

I guess this won't work properly on all machines. I'd strongly suggest to draw the movie to the backbuffer, then copyrect to the texture. It's fast and reliable.

Mustang

(Posted 2006) [#4]

then copyrect to the texture. It's fast

It isn't... :)

jfk EO-11110

(Posted 2006) [#5]

fast is relative.