Advertisement
Guest User

SSM Audioexport ohne FFMS2

a guest
Oct 9th, 2015
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.00 KB | None | 0 0
  1. Global achannel = 2
  2. Global arate = 44100
  3. Global abit = 16
  4. Global atrack = 0
  5.  
  6. AVIload("E:\Premiere-Dateien\portal 2 coop\portal.avi", 0, 0, "Auto", 0, 0)
  7. last.Trim(0, 60852)
  8. last
  9.  
  10.  
  11. Function AVIload(string file, int extern, int indexf, string afps, int fpsn, int fpsd) {
  12. (indexf == 1) ? FFindex(file) : nop()
  13. Try { clip1 = (indexf == 3) ? AudioDub(LWLibavVideoSource(file), LWLibavAudioSource(file, atrack + 1)) : (indexf == 2) ? Import(file) : (Indexf == 1) ? AudioDub(FFVideoSource(file, threads=1), FFAudioSource(file, track=atrack + 1)) : AVISource(file) }
  14. Catch(Load_Error_1) { clip1 = (indexf==3) ? LWLibavVideoSource(file) : (indexf == 2) ? Import(file).KillAudio() : (indexf == 1) ? FFVideoSource(file, threads=1) : AVISource(file, false) }
  15. clip1 = (indexf == 0 && extern == 1 && atrack >= 1 || indexf == 2 && extern == 1) ? clip1.KillAudio() : clip1
  16. clip1 = clip1.PointResize(640, 360).ConvertToRGB24().AutoFPS(afps, fpsn, fpsd)
  17. clip1 = (indexf == 1 || indexf == 2 || indexf == 3) ? clip1.Subtitle("Intern: " + file) : (extern == 1) ? clip1.externalAudio(file, indexf).Subtitle("Extern: " + file + ".WAV") : clip1.Subtitle("Intern: " + file)
  18. clip1 = (Clip1.HasAudio() == false) ? clip1.BlankClip(audio_rate = arate, Channels = achannel, sample_type=string(abit) + "bit").Subtitle("Empty audio track") : clip1
  19. Track1 = clip1.KillVideo()
  20. Track1 = Track1 + Tone(Float(Round(Float(clip1.Framecount / (clip1.framerate)) * Track1.audiorate - Track1.audiolength)) / Track1.audiorate, 0, Track1.audiorate, Track1.audiochannels, "Silence")
  21. Track1 = Track1.StereoOrMono().SSRC(arate, False).ConvertAudioToxxBit()
  22. return Audiodub(clip1, Track1)
  23. }
  24.  
  25. Function AutoFPS (Clip clip0, string afps, int fpsn, int fpsd) {
  26. rate1 = (afps == "Auto") ? (Round(Float(clip0.framerate * 1000)) / 1000) / 2 : nop()
  27. rate2 = (afps == "Auto") ? Round(clip0.framerate) / 2 : nop()
  28. rate = (afps == "Auto") ? (rate1 == rate2) ? 1 : 1001 : (afps == "Igno.") ? clip0.frameratedenominator : fpsd
  29. ratefaktor = (afps == "Auto") ? (rate == 1001) ? 1000 : 1 : nop()
  30. clip0 = (afps == "Auto") ? (rate == 1001) ? clip0.AssumeFPS(Round(clip0.Framerate) * 1000, rate) : clip0.AssumeFPS(round(clip0.framerate), rate) : (afps == "Igno.") ? clip0.AssumeFPS(clip0.frameratenumerator, rate) : clip0.AssumeFPS(fpsn, rate)
  31. Return clip0
  32. }
  33.  
  34. Function externalAudio(Clip clip1, string file, int indexf) {
  35. Try {
  36. Try { Return clip1.AudioDub(WAVSource(file+".WAV")) }
  37. Catch (Load_Error_2) { Return clip1.AudioDub(FFAudioSource(file+".WAV")) }
  38. }
  39. Catch (Load_Error_3) { Return clip1.KillAudio() }
  40. }
  41.  
  42. Function StereoOrMono(clip audio) {
  43. return (achannel == 2) ? (audio.AudioChannels >=2) ? audio.GetChannel(1,2) : audio.GetChannel(1,1) : audio.ConvertToMono()
  44. }
  45.  
  46. Function ConvertAudioToxxBit(Clip clip1) {
  47. return (abit == 8) ? clip1.ConvertAudioTo8bit() : (abit == 16) ? clip1.ConvertAudioTo16bit() : (abit == 24) ? clip1.ConvertAudioTo24bit() : clip1.ConvertAudioTo32bit()
  48. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement