home *** CD-ROM | disk | FTP | other *** search
/ Sound, Music & MIDI Collection 2 / SMMVOL2.bin / WIN / WIN_MISC / MODLIB01.ZIP / VB / FORM1.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1995-08-11  |  3.7 KB  |  121 lines
  1. Form1
  2. MODLIB VB Sample
  3. Form15
  4. Command5
  5. &Increase Vol
  6. Command4
  7. &Play FX
  8. Check2
  9. Command3
  10. &Decrease Vol
  11. Command2
  12. Check1
  13. Check1
  14. Check1
  15. Check1
  16. HScroll1    
  17. HScroll1    
  18. HScroll1    
  19. HScroll1    
  20. Command1
  21. &Start
  22. Label5
  23. MOD_play_fx(0)
  24. Label4
  25. MOD_increase_volume(1000)
  26. Label3
  27. MOD_decrease_volume(1000)
  28. LabVol
  29. MOD_channel_volume(3,99)
  30. LabVol
  31. MOD_channel_volume(2,99)
  32. LabVol
  33. MOD_channel_volume(1,99)
  34. LabVol
  35. MOD_channel_volume(0,99)
  36. Label2
  37. MOD_stop_playback()
  38. Label1
  39. !MOD_start_playback('SPACE.MOD',4)
  40.     Form_Load
  41. PostMessage
  42. wMsg{
  43. wParam
  44. lParam
  45. define
  46. STR_WM_DAIOCOMMAND
  47. uiWM_DAIOCOMMAND;
  48. RegisterWindowMessage
  49. lpString
  50. Command1_Click
  51. VScroll1_Change
  52. VScroll1
  53. ValueV
  54. Command2_Click
  55. Command3_Click
  56. HScroll1_Change
  57. HScroll1
  58. Index
  59. HScroll2_Changev
  60. Check1_Click
  61. Check1J
  62. label1
  63. Caption
  64. exporti
  65. PASCAL7
  66. MOD_start_playbackT
  67. LPSTR
  68. lpszMODFile
  69. iKBytePlayBuffer
  70. MOD_stop_playback
  71. voidy
  72. MOD_close_channel
  73. iPlayChannel
  74. MOD_open_channel!
  75. MOD_channel_volumeY
  76. iVolume
  77. FunctionMOD_stop_playback
  78. Label3_Click
  79. Label7_Click
  80. Label9_Click
  81. LabVol
  82. LabStop_Click
  83. LabStop
  84. MOD_decrease_volume
  85. MOD_set_repeat
  86. iRepeatFlag
  87. MOD_play_fx
  88. iFxWaveNum
  89. Check2_Click
  90. Check2
  91. Command4_Click
  92. Command5_Click
  93. MOD_increase_volume
  94. iDelay0
  95. MODLIB.DLL
  96. MODLIB.DLL
  97. MODLIB.DLL
  98. MODLIB.DLL
  99. MODLIB.DLL
  100. MODLIB.DLL
  101. MODLIB.DLL
  102. MODLIB.DLL
  103. MODLIB.DLL
  104. Check1_Click
  105. MOD_close_channel(
  106. MOD_open_channel(
  107. Check2_Click
  108. MOD_set_repeat(
  109. Command1_Click
  110. SPACE.MOD
  111.  Set channels On / Off
  112.  Set the repeat flag
  113. Command2_Click
  114. Command3_Click
  115. Command4_Click
  116. Command5_Click
  117. HScroll1_Change
  118. MOD_channel_volume(
  119. VScroll1_Change
  120. x = PostMessage(-1, uiWM_DAIOCOMMAND, Asc("V"), VScroll1.Value)
  121.