1 int Omg(CStack theStack)
2 {
3    int nArgs = theStack.GetNumArgs();
4    int n = theStack.GetNumber(1);
5    theStack.PushString("I enjoy pies");
6    return 1;
7 }

1 function Test(x, y)
2    z = Omg(x*2+y);
3    return z .. " lawl";
4 end

1 int Omg(void* pState)
2 {
3    int nArgs = CScriptMgr::Get().CFGetNumArgs(pState);
4    int n = CScriptMgr::Get().CFGetNumber(pState,1);
5    CScriptMgr::Get().CFPushString(pState,"I enjoy pies");
6    return 1;
7 }

1  CScriptMgr::Get().Init();
2  CScriptMgr::Get().LoadScript("Data/Scripts/Test.txt");
3  CScriptMgr::Get().Compile();
4  CScriptMgr::Get().RegisterFunction("Omg",Omg);
5  
6  CScriptMgr::Get().SetFunction("Test");
7  CScriptMgr::Get().AddParameter(11);
8  CScriptMgr::Get().AddParameter(13);
9  CScriptMgr::Get().Execute();
10 const char* sz = CScriptMgr::Get().GetString();

1 CScriptMgr::Get().Init();
2 CScriptMgr::Get().LoadScript("Data/Scripts/Test.txt");
3 CScriptMgr::Get().Compile();
4 CScriptMgr::Get().SetFunction("Test");
5 CScriptMgr::Get().AddParameter(11);
6 CScriptMgr::Get().AddParameter(13);
7 CScriptMgr::Get().Execute();
8 const char* sz = CScriptMgr::Get().GetString();

1  private void playSound()
2  {
3     try
4     {
5        // Create the player if it doesn't exist
6        if(wavPlayer == null)
7        {
8  
9           InputStream is = getClass().getResourceAsStream("/sound.wav");
10          wavPlayer = Manager.createPlayer(is,"audio/x-wav");
11       }
12       wavPlayer.start();
13    }
14    catch(Exception ex)
15    {
16       // Cleanup the player on error
17       if(wavPlayer != null)
18       {
19          wavPlayer.close();
20          wavPlayer = null;
21       }
22    }
23 }

1  bool COGGLoopStream::FillBuffer(BYTE* pBuffer, DWORD dwLength)
2  {
3  DWORD dwRemain = dwLength;
4  long lRet;
5  bool bEOF=false;
6  
7     // Any data in the buffer already? //
8     if(m_dwBufferSize != 0)
9     {
10       DWORD dwCopyLen = min(dwRemain,
11          (m_dwBufferSize-m_dwBufferPos));
12       memcpy(pBuffer,m_byBuffer+m_dwBufferPos,dwCopyLen);
13       dwRemain -= dwCopyLen;
14       pBuffer += dwCopyLen;
15    }
16    m_dwBufferSize = 0;
17 
18    // Read from the file into out buffer //
19    while(!bEOF)
20    {
21       // Read a 4k chunk //
22       lRet = ov_read(GetFile(),(char*)m_byBuffer,4096,0,2,1,NULL);
23       if(lRet == 0)
24       {
25          // If we're still reading the intro, swap to loop //
26          if(m_bPlayingIntro)
27             m_bPlayingIntro = false;
28 
29          // Otherwise, go back to the start of the loop //
30          else
31             ov_raw_seek(&m_fileLoop,0);
32       }
33 
34       // We read data OK //
35       else if(lRet > 0)
36       {
37          if((DWORD)lRet > dwRemain)
38          {
39             m_dwBufferSize = (DWORD)lRet;
40             m_dwBufferPos = dwRemain;
41             memcpy(pBuffer,m_byBuffer,dwRemain);
42             dwRemain = 0;
43             break;
44          }
45          else
46          {
47             memcpy(pBuffer,m_byBuffer,lRet);
48             dwRemain -= lRet;
49             pBuffer += lRet;
50          }
51       }
52 
53       // Error //
54       else
55          return false;
56    }
57 
58    // There shouldn't be any data left to fill //
59    assert(dwRemain == 0);
60    return true;
61 }