home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / pyos2bin.zip / Demo / sgi / sv / simpleinput.py < prev   
Text File  |  1992-09-03  |  500b  |  23 lines
  1. import sv, SV
  2. import gl, DEVICE
  3.  
  4. def main():
  5.     gl.foreground()
  6.     gl.prefsize(SV.PAL_XMAX, SV.PAL_YMAX)
  7.     win = gl.winopen('video test')
  8.     v = sv.OpenVideo()
  9.     params = [SV.VIDEO_MODE, SV.COMP, SV.BROADCAST, SV.PAL]
  10.     v.SetParam(params)
  11.     v.BindGLWindow(win, SV.IN_REPLACE)
  12.     gl.qdevice(DEVICE.ESCKEY)
  13.     gl.qdevice(DEVICE.WINQUIT)
  14.     gl.qdevice(DEVICE.WINSHUT)
  15.     while 1:
  16.         dev, val = gl.qread()
  17.         if dev in (DEVICE.ESCKEY, DEVICE.WINSHUT, DEVICE.WINQUIT):
  18.             v.CloseVideo()
  19.             gl.winclose(win)
  20.             return
  21.  
  22. main()
  23.