Initial commit.

Storm/SAMPLES/SVID/PLAYER2/PLAYER2.CPP

@@ -0,0 +1,127 @@
+/****************************************************************************
+*
+*  PLAYER2.CPP
+*
+*  A sample video player.  This version allows the user to pause and to set
+*  the playback quality level.
+*
+***/
+
+#include <windows.h>
+#include <dsound.h>
+#include <storm.h>
+
+BOOL    paused = 0;
+HSVIDEO video  = (HSVIDEO)0;
+
+//===========================================================================
+BOOL CALLBACK IdleProc (DWORD) {
+  if (!paused) {
+    if (!SVidPlayContinue())
+      SDrawPostClose();
+  }
+  return !paused;
+}
+
+//===========================================================================
+void CALLBACK OnClose (LPPARAMS params) {
+  if (video)
+    SVidPlayEnd(video);
+}
+
+//===========================================================================
+void CALLBACK OnVkEscape (LPPARAMS params) {
+  SDrawPostClose();
+}
+
+//===========================================================================
+void CALLBACK OnVkSpace (LPPARAMS params) {
+  paused = !paused;
+}
+
+//===========================================================================
+int APIENTRY WinMain (HINSTANCE instance, HINSTANCE, LPSTR cmdline, int) {
+
+  // PARSE THE COMMAND LINE
+  if (!(cmdline && *cmdline)) {
+    MessageBox(0,
+               "Usage: PLAYER2 [qualitylevel] filename.smk\n\n"
+               "Quality Levels:\n"
+               "1 = Low (skip scans)\n"
+               "2 = Low (zoom)\n"
+               "3 = High (skip scans)\n"
+               "4 = High (zoom)",
+               "Video Player",
+               MB_ICONSTOP);
+    return 1;
+  }
+  int qualitylevel = SVID_QUALITY_HIGH;
+  if (atoi(cmdline)) {
+    switch (atoi(cmdline)) {
+      case 1: qualitylevel = SVID_QUALITY_LOW_SKIPSCANS;   break;
+      case 2: qualitylevel = SVID_QUALITY_LOW;             break;
+      case 3: qualitylevel = SVID_QUALITY_HIGH_SKIPSCANS;  break;
+      case 4: qualitylevel = SVID_QUALITY_HIGH;            break;
+    }
+    if (strchr(cmdline,' '))
+      cmdline = strchr(cmdline,' ')+1;
+    else
+      cmdline += strlen(cmdline);
+  }
+
+  // INTIALIZE DIRECTDRAW
+  if (!SDrawAutoInitialize(instance,
+                           TEXT("VIDEOCLASS"),
+                           TEXT("Video Player")))
+    return 1;
+
+  // INITIALIZE DIRECTSOUND
+  LPDIRECTSOUND lpds = NULL;
+  if (DirectSoundCreate(NULL,&lpds,NULL) == DS_OK) {
+
+    // SET THE COOPERATIVE LEVEL
+    lpds->SetCooperativeLevel(SDrawGetFrameWindow(),
+                              DSSCL_NORMAL);
+
+    // CREAT A PRIMARY SOUND BUFFER
+    DSBUFFERDESC desc;
+    ZeroMemory(&desc,sizeof(DSBUFFERDESC));
+    desc.dwSize  = sizeof(DSBUFFERDESC);
+    desc.dwFlags = DSBCAPS_PRIMARYBUFFER | DSBCAPS_CTRLVOLUME | DSBCAPS_CTRLPAN;
+    LPDIRECTSOUNDBUFFER lpbuf;
+    lpds->CreateSoundBuffer(&desc,&lpbuf,NULL);
+
+    // SET THE FORMAT OF THE PRIMARY SOUND BUFFER
+    WAVEFORMATEX format;
+    ZeroMemory(&format,sizeof(WAVEFORMATEX));
+    format.wFormatTag      = WAVE_FORMAT_PCM;
+    format.nChannels       = 2;
+    format.nSamplesPerSec  = 22050;
+    format.wBitsPerSample  = 16;
+    format.nBlockAlign     = (2*16)/8;          // (nChannels*wBitsPerSample)/8
+    format.nAvgBytesPerSec = ((2*16)/8)*22050;  // nBlockAlign*nSamplesPerSec
+    format.cbSize          = 0;
+    lpbuf->SetFormat(&format);
+
+  }
+
+  // REGISTER WINDOW MESSAGES
+  SMsgRegisterMessage(NULL,WM_CLOSE ,OnClose);
+  SMsgRegisterKeyDown(NULL,VK_ESCAPE,OnVkEscape);
+  SMsgRegisterKeyDown(NULL,VK_SPACE ,OnVkSpace);
+
+  // INITIALIZE THE VIDEO PLAYER
+  if (!SVidInitialize(lpds))
+    return 1;
+
+  // PLAY THE VIDEO
+  ShowCursor(0);
+  SVidPlayBegin(cmdline,
+                NULL,NULL,NULL,NULL,
+                SVID_CUTSCENE | qualitylevel,
+                &video);
+  SMsgDoMessageLoop(IdleProc);
+  ShowCursor(1);
+
+  return 0;
+}

Storm/SAMPLES/SVID/PLAYER2/PLAYER2.CS

@@ -0,0 +1,2 @@
+#include "../../sample.cs"
+set extralib=dsound.lib