home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l408 / 2.img / EXAMPLES.EXE / EXAMPLES / MISC / PLAYFORM.FRM (.txt) < prev   
Encoding:
Visual Basic Form  |  1991-06-10  |  3.7 KB  |  95 lines
  1. PlayForm
  2. Demonstrate the Play routine
  3. Form1
  4. Label1
  5. Enter a string to play:
  6. Text1
  7.  o3 L8 E D+ E o2 B o3 D C L2 o2 A
  8. Label4
  9. The string to play is made up of one or more commands. Where an "n" is shown in the table below, it means you must enter either a character or number immediately after the command letter.
  10. Label3
  11. Command       
  12. Label3
  13. iAction                                                                                                   
  14. Label2
  15. Label2
  16. DSets the current octave. There are seven octaves, numbered from 0-7.
  17. Label2
  18. Label2
  19. "Increases the current octave by 1.
  20. Label2
  21. Label2
  22. "Decreases the current octave by 1.
  23. Label2
  24. Label2
  25. Plays the specified note, using the current octave. A number sign "#" or plus sign "+" immediately after the letter means "sharp". A minus sign "-" means flat.
  26. Label2
  27. Label2
  28. HPlays note n, in the range of 0-84.  If n is zero, it represents a rest.
  29. Label2
  30. Label2
  31. Sets the length of each note, using the reciprocal of n. L1 means a whole note, L2 means a half note, L4 means a quarter note, etc.
  32. Label2
  33. MN, ML, MS
  34. Label2
  35. ESets the style of music to Normal, Legato and Staccato, respectively.
  36. Label2
  37. Label2
  38. ^Specifies a pause, in the range 1-64. This value corresponds to the note length, set with L n.
  39. Label2
  40. Label2
  41. USets the tempo (number of quarter notes per minute). Range is 32-255, default is 120.
  42. MenuFile
  43. &File
  44. MenuB
  45. &Beethoven's Fifth
  46. Menu9
  47. &Nine to Five
  48. MenuS
  49. &Sweet Georgia Brown
  50. MenuW
  51. &William Tell Overture
  52. MenuStop
  53. S&top Playing Now
  54. MenuX
  55. E&xit
  56. Command1_Click
  57. PlayForm
  58. Text1_Change
  59. Text1_KeyPress
  60. KeyAscii
  61. Result
  62. MhPlay
  63. Text1
  64. SelStart
  65.     SelLength
  66.     SelSstart
  67. MenuX_Click2
  68. MenuB_Click
  69. BeethovensFifthV
  70. MenuS_Click
  71. SweetGeorgiaBrownt
  72. MenuW_Click
  73. WilliamTell
  74. Menu9_Click
  75. NineToFive
  76. NineTo5
  77. PlayStop
  78. stopplay
  79. MenuStop_Click
  80. UserCancelledPlay
  81. Form_Click
  82.     Form_Load
  83. Form_Unload
  84. Cancel
  85. Text1_KeyPress
  86.  Select all text for next time
  87. MenuX_Click
  88. MenuB_Click
  89. MenuS_Click
  90. MenuW_Click
  91. Menu9_Click
  92. MenuStop_Click
  93. Form_Load
  94. Form_Unload
  95.