home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / FBI_FILE / INTELLIG.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-01-18  |  2.3 KB  |  72 lines
  1. Intelligence
  2. Please Wait
  3. Form1%
  4. Command1
  5. Timer2
  6. Timer1
  7. accesscode
  8. Label2
  9. Gathering Intelligence Data
  10. Label1
  11. Timer1_Timer
  12. label1
  13. Captionc
  14. Form_Click
  15. secondtime
  16. label2
  17. command1
  18. enabledN
  19. Timer1=
  20. Visible
  21. command1_click
  22. printprofile
  23. accesscode2
  24. accesscode_Change
  25. accesscode_KeyPress
  26. KeyAscii
  27. Text~
  28.     Form_Load
  29. sndplaysound
  30. intelligence
  31. fbifile
  32. Form_Unload
  33. Cancel
  34. counter
  35. FALSE
  36. Flashwindow
  37. bInvert
  38. Timer2_Timer
  39. timer2
  40. Form_Paint(
  41. fbifile_printprofile
  42. profile
  43. BTN_View
  44. text1
  45. Form_GotFocus
  46. Form_Activate,
  47. command1_click
  48. fbifile
  49. accden.wav
  50. Access Denied
  51. Form_Activate
  52. gather.wav
  53. Form_Unload
  54. Timer1_Timer
  55. Compiling Data
  56. Compiling Data
  57. this plays the WAV:
  58. compile.wav
  59. the flags work as follows:
  60. 0  wait until sound finishes before returningd
  61. 1  return immediately - sound can be stopped withl
  62.  i% =sndplaysound(0&, 0)
  63. 2  play no default if it can't find the WAVd
  64. 4  play sound over and over, must be combined with 1 by calling the flag
  65.  i% =sndplaysound(snd_async or snd_loop, 0) it can also be stopped with '(0%,0)f
  66. 5 returns false immediately if sound is already playing.
  67. Profile Complete
  68. Enter Security Access Code
  69. this plays the WAV:=
  70. access.wav
  71. Timer2_Timer
  72.