Movie player - GameCreators Forum

Author

Message

Cloak

21

Years of Service

User Offline

Joined: 26th Nov 2002

Location:

Posted: 26th Nov 2002 10:07

Link

Hi all,

Whats wrong with this code?
The movie plays, although it stutters at start, but it gets all blocky!
This doesn't happen in mediaplayer or *cough*blitz3d*cough*

+ Code Snippet

moviefile$=cl$()
moviefile$="d:\movies\mydivxmovie.avi"

set display mode 800,600,32
load animation moviefile$,1

x# = 0
y# = 0
mw#=animation width(1)
mh#=animation height(1)

new_width=800
scale# = new_width / mw#
new_height=mh#*scale#
rem new_height=new_height+mh#
starty=600-new_height
starty=starty/2


play animation 1,0,starty,800,starty+new_height


repeat
   sleep 1
   if joystick fire a() then pause animation 1
   if joystick fire b() then resume animation 1
until joystick fire d() or escapekey()
stop animation 1

end

Am i doing something wrong here?
Dont kill me for being new to dbpro

Regards, Cloak.

Back to top

Profile PM Email Website

KNau

21

Years of Service

User Offline

Joined: 25th Nov 2002

Location: Canada

Posted: 26th Nov 2002 12:16

Link

Strange, it works perfectly fine for me. Maybe you should include a screenshot so I can see what you mean by "blocky". There is going to be quite a bit of detail loss when you are scaling an image to full screen, but that happens in media player, too.

Incidentally, you don't need that "SLEEP 1" in your REPEAT / UNTIL loop. It will work fine without it and that might be what's causing your computer to stutter.

Back to top

Profile PM Email

Cloak

21

Years of Service

User Offline

Joined: 26th Nov 2002

Location:

Posted: 26th Nov 2002 14:28

Link

Yeah, but in mediaplayer/blitz3d it gets smoothed i think.
removing the sleep command does not solve it.
So, strange...
When you run it, it works perfect, no rough edges on the screen?

Regards, Cloak.

Back to top

Profile PM Email Website

Sorry your browser is not supported!

Newcomers DBPro Corner / Movie player