The output of that last script is progressive. If you want interlaced add the following to the end:

Code:
AssumeTFF() # or AssumeBFF(), whichever you want
SeparateFields()
SelectEvery(4,0,3)
Weave()