Artifact 701f04a9a8542c0586bf8e05f12c9bb834002f10:
0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0040: 2a 2a 2a 2a 2a 2a 2a 2a 5c 0a 2a 20 20 20 20 20 ********\.*
0050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0060: 20 20 20 20 20 20 20 20 20 20 20 6d 63 69 61 76 mciav
0070: 69 2e 64 20 20 20 20 20 20 20 20 20 20 20 20 20 i.d
0080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0090: 20 20 2a 0a 2a 20 20 20 20 20 20 20 20 20 20 20 *.*
00a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00d0: 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 2a 20 *.*
00e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00f0: 20 20 20 20 20 20 57 69 6e 64 6f 77 73 20 41 50 Windows AP
0100: 49 20 68 65 61 64 65 72 20 6d 6f 64 75 6c 65 20 I header module
0110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0120: 20 20 20 20 20 20 2a 0a 2a 20 20 20 20 20 20 20 *.*
0130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0170: 2a 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 *.*
0180: 20 20 20 20 54 72 61 6e 73 6c 61 74 65 64 20 66 Translated f
0190: 72 6f 6d 20 4d 69 6e 47 57 20 57 69 6e 64 6f 77 rom MinGW Window
01a0: 73 20 68 65 61 64 65 72 73 20 20 20 20 20 20 20 s headers
01b0: 20 20 20 20 20 20 20 20 20 20 2a 0a 2a 20 20 20 *.*
01c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01d0: 20 20 20 20 20 20 20 20 62 79 20 53 74 65 77 61 by Stewa
01e0: 72 74 20 47 6f 72 64 6f 6e 20 20 20 20 20 20 20 rt Gordon
01f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0200: 20 20 20 20 2a 0a 2a 20 20 20 20 20 20 20 20 20 *.*
0210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a *.
0250: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
0260: 20 20 20 20 20 20 20 20 50 6c 61 63 65 64 20 69 Placed i
0270: 6e 74 6f 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 nto public domai
0280: 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n
0290: 20 20 20 20 20 20 20 20 2a 0a 5c 2a 2a 2a 2a 2a *.\*****
02a0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02b0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02e0: 2a 2a 2f 0a 6d 6f 64 75 6c 65 20 77 69 6e 33 32 **/.module win32
02f0: 2e 6d 63 69 61 76 69 3b 0a 0a 70 72 69 76 61 74 .mciavi;..privat
0300: 65 20 69 6d 70 6f 72 74 20 77 69 6e 33 32 2e 6d e import win32.m
0310: 6d 73 79 73 74 65 6d 3b 0a 0a 2f 2f 20 46 49 58 msystem;..// FIX
0320: 4d 45 3a 20 63 68 65 63 6b 20 74 79 70 65 73 20 ME: check types
0330: 61 6e 64 20 67 72 6f 75 70 69 6e 67 20 6f 66 20 and grouping of
0340: 63 6f 6e 73 74 61 6e 74 73 0a 0a 63 6f 6e 73 74 constants..const
0350: 20 4d 43 49 5f 4d 43 49 41 56 49 5f 50 4c 41 59 MCI_MCIAVI_PLAY
0360: 5f 57 49 4e 44 4f 57 20 20 20 20 20 3d 20 30 78 _WINDOW = 0x
0370: 30 31 30 30 30 30 30 30 3b 0a 63 6f 6e 73 74 20 01000000;.const
0380: 4d 43 49 5f 4d 43 49 41 56 49 5f 50 4c 41 59 5f MCI_MCIAVI_PLAY_
0390: 46 55 4c 4c 53 43 52 45 45 4e 20 3d 20 30 78 30 FULLSCREEN = 0x0
03a0: 32 30 30 30 30 30 30 3b 0a 63 6f 6e 73 74 20 4d 2000000;.const M
03b0: 43 49 5f 4d 43 49 41 56 49 5f 50 4c 41 59 5f 46 CI_MCIAVI_PLAY_F
03c0: 55 4c 4c 42 59 32 20 20 20 20 3d 20 30 78 30 34 ULLBY2 = 0x04
03d0: 30 30 30 30 30 30 3b 0a 0a 65 6e 75 6d 20 7b 0a 000000;..enum {.
03e0: 09 4d 43 49 5f 41 56 49 5f 53 54 41 54 55 53 5f .MCI_AVI_STATUS_
03f0: 46 52 41 4d 45 53 5f 53 4b 49 50 50 45 44 20 20 FRAMES_SKIPPED
0400: 20 20 20 3d 20 30 78 30 30 30 30 38 30 30 31 2c = 0x00008001,
0410: 0a 09 4d 43 49 5f 41 56 49 5f 53 54 41 54 55 53 ..MCI_AVI_STATUS
0420: 5f 4c 41 53 54 5f 50 4c 41 59 5f 53 50 45 45 44 _LAST_PLAY_SPEED
0430: 20 20 20 20 3d 20 30 78 30 30 30 30 38 30 30 32 = 0x00008002
0440: 2c 0a 09 4d 43 49 5f 41 56 49 5f 53 54 41 54 55 ,..MCI_AVI_STATU
0450: 53 5f 41 55 44 49 4f 5f 42 52 45 41 4b 53 20 20 S_AUDIO_BREAKS
0460: 20 20 20 20 20 3d 20 30 78 30 30 30 30 38 30 30 = 0x0000800
0470: 33 2c 0a 09 4d 43 49 5f 41 56 49 5f 53 45 54 56 3,..MCI_AVI_SETV
0480: 49 44 45 4f 5f 44 52 41 57 5f 50 52 4f 43 45 44 IDEO_DRAW_PROCED
0490: 55 52 45 20 20 20 3d 20 30 78 30 30 30 30 38 30 URE = 0x000080
04a0: 30 30 2c 0a 09 4d 43 49 5f 41 56 49 5f 53 45 54 00,..MCI_AVI_SET
04b0: 56 49 44 45 4f 5f 50 41 4c 45 54 54 45 5f 43 4f VIDEO_PALETTE_CO
04c0: 4c 4f 52 20 20 20 20 3d 20 30 78 30 30 30 30 38 LOR = 0x00008
04d0: 31 30 30 2c 0a 09 4d 43 49 5f 41 56 49 5f 53 45 100,..MCI_AVI_SE
04e0: 54 56 49 44 45 4f 5f 50 41 4c 45 54 54 45 5f 48 TVIDEO_PALETTE_H
04f0: 41 4c 46 54 4f 4e 45 20 3d 20 30 78 30 30 30 30 ALFTONE = 0x0000
0500: 46 46 46 46 0a 7d 0a 0a 65 6e 75 6d 20 7b 0a 09 FFFF.}..enum {..
0510: 4d 43 49 45 52 52 5f 41 56 49 5f 4f 4c 44 41 56 MCIERR_AVI_OLDAV
0520: 49 46 4f 52 4d 41 54 20 20 3d 20 4d 43 49 45 52 IFORMAT = MCIER
0530: 52 5f 43 55 53 54 4f 4d 5f 44 52 49 56 45 52 5f R_CUSTOM_DRIVER_
0540: 42 41 53 45 20 2b 20 31 30 30 2c 0a 09 4d 43 49 BASE + 100,..MCI
0550: 45 52 52 5f 41 56 49 5f 4e 4f 54 49 4e 54 45 52 ERR_AVI_NOTINTER
0560: 4c 45 41 56 45 44 2c 0a 09 4d 43 49 45 52 52 5f LEAVED,..MCIERR_
0570: 41 56 49 5f 4e 4f 44 49 53 50 44 49 42 2c 0a 09 AVI_NODISPDIB,..
0580: 4d 43 49 45 52 52 5f 41 56 49 5f 43 41 4e 54 50 MCIERR_AVI_CANTP
0590: 4c 41 59 46 55 4c 4c 53 43 52 45 45 4e 2c 0a 09 LAYFULLSCREEN,..
05a0: 4d 43 49 45 52 52 5f 41 56 49 5f 54 4f 4f 42 49 MCIERR_AVI_TOOBI
05b0: 47 46 4f 52 56 47 41 2c 0a 09 4d 43 49 45 52 52 GFORVGA,..MCIERR
05c0: 5f 41 56 49 5f 4e 4f 43 4f 4d 50 52 45 53 53 4f _AVI_NOCOMPRESSO
05d0: 52 2c 0a 09 4d 43 49 45 52 52 5f 41 56 49 5f 44 R,..MCIERR_AVI_D
05e0: 49 53 50 4c 41 59 45 52 52 4f 52 2c 0a 09 4d 43 ISPLAYERROR,..MC
05f0: 49 45 52 52 5f 41 56 49 5f 41 55 44 49 4f 45 52 IERR_AVI_AUDIOER
0600: 52 4f 52 2c 0a 09 4d 43 49 45 52 52 5f 41 56 49 ROR,..MCIERR_AVI
0610: 5f 42 41 44 50 41 4c 45 54 54 45 20 2f 2f 20 3d _BADPALETTE // =
0620: 20 4d 43 49 45 52 52 5f 43 55 53 54 4f 4d 5f 44 MCIERR_CUSTOM_D
0630: 52 49 56 45 52 5f 42 41 53 45 20 2b 20 31 30 38 RIVER_BASE + 108
0640: 0a 7d 0a .}.