REQ: Favor from one of you AVS script masters

[DDogg]

Howdy, all:

I would ask a favor from one of you. I think it would be trivial for one of you. (not me).

I need a AVS script to give newbies to encode in CCE which will beat the crap out of a proc without needing a d2v and mpeg2dec and all that. Maybe something that just has words spinning on the screen saying testing or something simple like that (set to run in a loop for xxxx iterations?).

I actually have a couple of reasons I would like this for new users. One is all the OC'ing going on. CCE doesn't like it at all, as most of you know. Also, this would quickly test whether avisynth is installed properly. I used to just have 'em make a one word script with "version" in it. That tests avisynth fine but not long periods of having CCE maxed out. I thought I could say, "here, run this for a day. If you see xxx on the screen and it does not crash you are ready to go"

The other is a sort of benchmark, people are always trying to benchmark their machines wih CCE but, of course, they are all using different source so that doesn't tell us much. A user could note the CCE realtime figure 30 minutes into the run. It would be stabilized by then I suppose. That could be used as a rough comparison.

Maybe I am not thinking clearly but I think this would work. Comments?

[DDogg]

I tried the basics like BlankClip and Colorbars but they give me strange constantly decreasing or increasing speed that never seems to stabilize. I also tried colorbars with ShowSMPTE(24) but this creates some kind of unrealistic load. Realtime slowed to .37 on my machine which is normally about 1.40 to 1.80.

I am too obtuse to get animate to work but I now think a way of having black disolve into red into green into, etc in a loop might simulate normal video for a simple load process. Would this be possible? Anyone?

[Blight]

You can't run a benchmark on this sort of stuff as it totally screws with the motion search. Not to mention that clean text is really bad for DCT.

[DDogg]

Thanks for the reply. Well, at least I can do it as a burn-in type of program.

[trbarry]

Why not just take a very short .avi file like divx that can be easily read directly by avisynth, and repeat it many times. Something like:

video=avisource("d:\savewebpage\demo3bits.avi")
video2=video+video+video+video+video
video3=video2+video2+video2+video2+video2
video4=video3+video3+video3+video3+video3
return video4

- Tom

[DDogg]

Thanks, Tom. That may be just the ticket for a benchmark. I should not have mentioned the benchmark aspect as part of the original post although this might solve that problem my allowing a much smaller download for people. That has always been a roadblock.

As to the other, we need to isolate CCE away from anything except itself for a burn-in type of test. Point being if CCE crashes then it is a problem of the OS or machine. Then they can introduce mpeg2dec or avisource or whatever in increments to narrow down the problem. Ah, I don't know if I am making any sense, but I'll keep on plugging away for a while. Thanks again for the reply.

[trbarry]

Yeah, makes a lot of sense. I guess the thing to do is have the short test clip be a very standard format that almost everyone could also loop on Windows Media Player without any extra codecs install. What is that intro that comes on all Win 98 disks, and above? I think Windows ships with some avi's.

So you could first check if WMP could play it and then Avisynth.

- Tom

[DDogg]

Great point about using inbuilt AVIs that comes with windows. That, along with your script above, might be just what the doctor ordered.

[TactX]

Damn, I wanted to write a script with "animate" but the result for this script

BlankClip(50,720,576)
subtitle("This is just a test !!!",290,288,0,49)
Animate(0,50,"bilinearresize",720,576,360,288,1,1,720,576,0,0,720,576)

is really strange. The first 6-7 frames are fine but then I get an access violation.

The problem must be "BlankClip" as I tested with an AVI file (together with "subtitle") which did work like it should.

So I'm not too much help, but if you need help for some script with "animate" I could help you since I've been playing around with it for quite some time (even quadratic-animate is no problem).

[DDogg]

even quadratic-animate is no problem

That gets me all excited when you talk that way :) Hell, I don't even know what quadratic-animate means, but damn! It sounds good!

Obviously I have had a few. Thanks for the reply and any help doing a script that uses just inbuilt avisynth functions to simulate a pseudo video encode would be appreciated.

[TactX]

Quadratic-animate is if you use animate within animate.

This is an example for linear animate:

AVIsource("d:\pathto\clip.avi")
converttoyuy2
Animate(0,50,"bilinearresize",720,576,360,288,1,1,720,576,0,0,720,576)

This would do a linear zoom-in to original size.

And this is the non-linear (quadratic) equivalent for the above script:

AVIsource("d:\pathto\clip.avi")
converttoyuy2
Animate(0,50,"animate",0,50,"bilinearresize",720,576,360,288,1,1,720,576,0,0,720,576,0,50,"bilinearresize",720,576,180,144,360,288,720,576,0,0,720,576)

This would do the same but with decreasing zoom-in-speed.

If you try this script you will notice that the zoom-motion is a bit choppy. This can be easily solved by supersampling:

AVIsource("d:\pathto\clip.avi")
converttoyuy2
bilinearresize(7200,5760)
Animate(0,50,"animate",0,50,"bilinearresize",7200,5760,3600,2880,1,1,7200,5760,0,0,7200,5760,0,50,"bilinearresize",7200,5760,1800,1440,3600,2880,7200,5760,0,0,7200,5760)
bilinearresize(720,576)

but beware, supersampling will make the script slooooooow !!!

But enough about that, I still have problems writing a nice scrip just with integrated functions :(

[TactX]

The acccess-violation problem mentioned in my first post for this script:

BlankClip(50,720,576)
subtitle("This is just a test !!!",290,288,0,49)
Animate(0,50,"bilinearresize",720,576,360,288,1,1,720,576,0,0,720,576)

is solved.
If I add converttoyuy2 after blankclip is works just fine. :)

[DDogg]

TactX, thanks. I think this might work well.

So this becomes a 2 hour clip for cce.

v=BlankClip(50,720,576).converttoyuy2.subtitle("This is just a test
!!!",290,288,0,49).Animate 0,50,"bilinearresize",720,576,360,288,1,1,720,576,0,0,720,576)
v2=v+v+v+v+v+v+v+v+v+v+v+v+v+v+v
v3=V2+v2+v2+v2+v2+v2+v2+v2+v2+v2+v2+v2+v2+v2+v2
v4=v3+v3+v3+v3+v3+v3+v3+v3+v3+v3+v3+v3+v3+v3+v3
return v4
resampleaudio(44100)

[TactX]

Why not improve this script a bit ?

It seems to be quite boring, isn't it ?

You could do nice things with "animate" and "levels" for example.


btw. Animate RULEZ !!!

[DDogg]

You could do nice things with "animate" and "levels" for example.

:) No, I couldn't, but I bet you could :)

[TactX]

No, I couldn't, but I bet you could

Oooh Yeaaah !!!

Here it goes (I call it "Abuse of Animate"):


BlankClip(80,720,576)
ConvertToYuy2

Animate(0,20,"Animate",0,20,"subtitle","Avisynth Test-Script",-200,280,0,100,"Avisynth Test-Script",700,280,0,100,0,20,"subtitle","Avisynth Test-Script",-200,280,0,100,"Avisynth Test-Script",280,280,0,100).Animate(0,10,"levels",0,1,255,0,0,0,1,255,0,255)

Animate(20,40,"animate",20,40,"subtitle","by TactX",800,300,0,100,"by TactX",-150,300,0,100,20,40,"subtitle","by TactX",800,300,0,100,"by TactX",320,300,0,100)

Animate(40,70,"bilinearresize",720,576,0,0,720,576,720,576,360,288,1,1)


Render it and call me GOD :devil:


lol

[Guest]

@GOD

TactX, you are an awesome dude. :)

Hey, we need a FAQ for this group. Busy?

[DDogg]

(tears in my eyes from the beauty of TactX's routine => bowing three times to TactX in supplication :) )

Very, Very cool, indeed!

[TactX]

Thanks

Busy ? Not too busy for the next 2-3 weeks.

FAQ ? No problem, but what exactly do you think about ?

[Guest]

@TactX

Have a look at some of the other forums. They have a sticky Q&A or FAQ article. The purpose would be to forestall common questions from being repeated ad nauseum.

[TactX]

O.K.

But you could give me a helping hand and post (or send a pm) some of the most common questions and problems.

[Guest]

Well gosh, half the work is in figuring out the right questions to ask. That will take me some time.

[TactX]

Thats exactly why I'm asking :)

But it was not only directed to you, but to any member.

[Guest]

Oh, sorry, my bad.