1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
from gl import *
from GL import *
from DEVICE import *
import time
import sys
import al
import AL
BUFFERSIZE = 32000
class Struct(): pass
epoch = Struct()
EndOfFile = 'End of file'
bye = 'bye'
def openspkr():
conf = al.newconfig()
conf.setqueuesize(BUFFERSIZE)
conf.setwidth(AL.SAMPLE_16)
conf.setchannels(AL.MONO)
return al.openport('spkr','w',conf)
def openvideo(name):
f = open(name, 'r')
line = f.readline()
if not line: raise EndOfFile
if line[:4] = 'CMIF': line = f.readline()
x = eval(line[:-1])
if len(x) = 3: w, h, pf = x
else: w, h = x; pf = 2
return f, w, h, pf
def loadframe(f,w,h,pf,af,spkr):
line = f.readline()
if line = '':
raise EndOfFile
x = eval(line[:-1])
if type(x) = type(0) or type(x) = type(0.0):
tijd = x
if pf = 0:
size = w*h*4
else:
size = (w/pf) * (h/pf)
else:
tijd, size = x
data = f.read(size)
if len(data) <> size:
raise EndOfFile
if pf:
rectzoom(pf, pf)
w = w/pf
h = h/pf
data = unpackrect(w, h, 1, data)
lrectwrite(0,0,w-1,h-1,data)
# This is ugly here, but the only way to get the two
# channels started in sync
#if af <> None:
# playsound(af,spkr)
ct = time.millitimer() - epoch.epoch
if tijd > 0 and ct < tijd:
time.millisleep(tijd-ct)
swapbuffers()
return tijd
def playsound(af, spkr):
nsamp = spkr.getfillable()
data = af.read(nsamp*2)
spkr.writesamps(data)
def main():
if len(sys.argv) > 1:
f, w, h, pf = openvideo(sys.argv[1])
else:
f, w, h, pf = openvideo('film.video')
af = None
spkr = None
if len(sys.argv) > 2:
af = open(sys.argv[2], 'r')
spkr = openspkr()
if len(sys.argv) > 3:
data = af.read(eval(sys.argv[3]))
del data
foreground()
prefsize(w,h)
win = winopen('Video player')
RGBmode()
doublebuffer()
gconfig()
qdevice(ESCKEY)
running = 1
epoch.epoch = time.millitimer()
nframe = 0
tijd = 1
try:
while 1:
if running:
try:
tijd = loadframe(f, w, h, pf, af, spkr)
nframe = nframe + 1
except EndOfFile:
running = 0
t = time.millitimer()
if tijd > 0:
print 'Recorded at ', nframe * 1000.0 / tijd,
print 'frames/second (', tijd, 'ms total)'
print 'Played at', nframe * 1000.0 / (t-epoch.epoch),
print 'frames/second'
if af <> None:
playsound(af,spkr)
if qtest():
if qread() = (ESCKEY,1):
raise bye
except bye:
pass
main()
|
