home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / WINDOWS / MISC / EDM10VGA.ZIP / EDM10.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1991-08-28  |  6.0 KB  |  270 lines
  1. OnlyForm
  2. Executive Decision Maker 1.0
  3. Form1,
  4. FlashLabels
  5. FlashLabels
  6.     Sit on it
  7. FlashLabels
  8. Lunchtime!
  9. FlashLabels
  10. Pass the Buck
  11. FlashLabels
  12. Ah, fuck it!
  13. FlashLabels
  14. StartBut
  15. START/RESTART
  16. StopBut
  17.  STOP /CHOOSE
  18. StartBut_Clickg
  19. YesBut_Click
  20. AhBut_Click
  21. PassBut_ClickF
  22. SitBut_Click5
  23. NoBut_Click
  24. LunchBut_Click
  25. StopBut_ClickV
  26. FALSE;
  27. SHIFT_MASK
  28.     CTRL_MASK
  29. ALT_MASK
  30. LEFT_BUTTON
  31. RIGHT_BUTTON8
  32. MIDDLE_BUTTON
  33. WRONG_FORMAT
  34. REQUEST_WITHOUT_INIT
  35. DDE_WITHOUT_INIT
  36. ADVISE_WITHOUT_INIT
  37. POKE_WITHOUT_INIT
  38. DDE_SERVER_CLOSED
  39. TOO_MANY_LINKSS
  40. STRING_TOO_LONGq
  41. INVALID_CONTROL_ARRAY_REFERENCE[
  42. UNEXPECTED_DDE
  43. OUT_OF_MEMORY:
  44. !SERVER_ATTEMPTED_CLIENT_OPERATIONb
  45. KEY_LBUTTON
  46. KEY_RBUTTON
  47. KEY_CANCEL
  48. KEY_MBUTTONv
  49. KEY_BACK
  50. KEY_TAB
  51.     KEY_CLEARr
  52. KEY_RETURN,
  53.     KEY_SHIFT
  54. KEY_CONTROL+
  55. KEY_MENU
  56.     KEY_PAUSE
  57. KEY_CAPITAL
  58. KEY_ESCAPEC
  59.     KEY_SPACE
  60.     KEY_PRIORO
  61. KEY_NEXT
  62. KEY_END
  63. KEY_HOMEe
  64. KEY_LEFT
  65. KEY_UP~
  66.     KEY_RIGHT
  67. KEY_DOWN
  68. KEY_SELECT
  69.     KEY_PRINT
  70. KEY_EXECUTE
  71. KEY_SNAPSHOT
  72. KEY_INSERT
  73. KEY_DELETE
  74. KEY_HELP)
  75. KEY_NUMPAD0
  76. KEY_NUMPAD1
  77. KEY_NUMPAD2
  78. KEY_NUMPAD3
  79. KEY_NUMPAD4
  80. KEY_NUMPAD5
  81. KEY_NUMPAD6
  82. KEY_NUMPAD7
  83. KEY_NUMPAD8v
  84. KEY_NUMPAD9
  85. KEY_MULTIPLY
  86. KEY_ADD
  87. KEY_SEPARATOR
  88. KEY_SUBTRACT
  89. KEY_DECIMAL
  90. KEY_DIVIDE4
  91. KEY_F1?
  92. KEY_F2J
  93. KEY_F3U
  94. KEY_F4`
  95. KEY_F5k
  96. KEY_F6
  97. KEY_F7
  98. KEY_F8%    
  99. KEY_F9L
  100. KEY_F10
  101. KEY_F11n
  102. KEY_F12]
  103. KEY_F13
  104. KEY_F14v
  105. KEY_F15p    
  106. KEY_F16f
  107. KEY_NUMLOCK
  108. ENTER
  109. LEAVE
  110. MB_OK
  111. MB_OKCANCEL/
  112. MB_ABORTRETRYIGNORE
  113. MB_YESNOCANCEL
  114. MB_YESNO
  115. MB_RETRYCANCEL
  116. MB_ICONSTOP 
  117. MB_ICONQUESTION6
  118. MB_ICONEXCLAMATION
  119. MB_ICONINFORMATION
  120. MB_DEFBUTTON12    
  121. MB_DEFBUTTON2"
  122. MB_DEFBUTTON3
  123. IDCANCEL
  124. IDABORT\
  125. IDRETRY
  126. IDIGNORE
  127. IDYESK
  128. CANCEL
  129. BEGIN_DRAG
  130. END_DRAG&
  131. CF_LINK/
  132. CF_TEXT
  133.     CF_BITMAP
  134. CF_METAFILE
  135. CF_DIB
  136. MODAL
  137. MODELESS
  138. LEFT_JUSTIFYP    
  139. RIGHT_JUSTIFY
  140. CENTER
  141. BLACK
  142. GREEN
  143. YELLOW
  144. MAGENTAt
  145. WHITE
  146. SCROLL_BARS
  147. DESKTOPP
  148. ACTIVE_TITLE_BARa
  149. INACTIVE_TITLE_BAR
  150. MENU_BAR|
  151. WINDOW_BACKGROUND
  152. WINDOW_FRAME
  153.     MENU_TEXT
  154. WINDOW_TEXT
  155. TITLE_BAR_TEXT
  156. ACTIVE_BORDER
  157. INACTIVE_BORDERy
  158. APPLICATION_WORKSPACE
  159.     HIGHLIGHT
  160. HIGHLIGHT_TEXT`
  161. BUTTON_FACE
  162. BUTTON_SHADOW
  163.     GRAY_TEXTP
  164. BUTTON_TEXT
  165. FIXED_SINGLE 
  166. SIZABLE
  167. FIXED_DOUBLE:
  168. MANUAL
  169.     AUTOMATIC`
  170.     BLACKNESS`    
  171. NOT_MERGE_PEN
  172. MASK_NOT_PEN
  173. NOT_COPY_PEN
  174. MASK_PEN_NOT
  175. INVERT
  176. XOR_PEN
  177. NOT_MASK_PEN
  178. MASK_PEN
  179. NOT_XOR_PEN'
  180. MERGE_NOT_PENC
  181. COPY_PEN
  182. MERGE_PEN_NOT
  183.     MERGE_PEN
  184.     WHITENESS
  185. SOLID9
  186. DASHS
  187. DASH_DOT
  188. DASH_DOT_DOTo
  189.     INVISIBLE
  190. INSIDE_SOLIDm
  191. TRANSPARENT
  192. HORIZONTAL_LINE
  193. VERTICAL_LINEG
  194. UPWARD_DIAGONAL
  195. DOWNWARD_DIAGONAL    
  196. CROSS
  197. DIAGONAL_CROSS
  198. SERVER
  199. Default
  200. ARROW
  201.     CROSSHAIR
  202. IBEAM
  203. ICON_POINTERG
  204. SIZE_POINTER0
  205. SIZE_NE_SW8
  206. SIZE_N_Sa
  207. SIZE_NW_SE
  208. SIZE_W_E
  209. UP_ARROW
  210.     HOURGLASS&
  211. NO_DROP
  212. TWIPS
  213. POINTS
  214. PIXELS
  215. CHARACTERS
  216. INCHES
  217. MILLIMETERS
  218. CENTIMETERST
  219. HORIZONTAL
  220. VERTICAL
  221.     UNCHECKED
  222. CHECKEDi
  223. GRAYEDv
  224. NORMAL
  225.     MINIMIZED
  226.     MAXIMIZED
  227. StopBool
  228. AhBut
  229.     BackColor
  230. LunchBut
  231. NoBut
  232. PassBut
  233. SitBut
  234. YesBut
  235. Picker
  236. FlashButtons_Click
  237. Index
  238. Countm
  239. FlashButtons
  240. Click
  241. PrickerD
  242. Delay*
  243. FlashButtons_FlashL
  244. StopButX
  245. Form_Click
  246. continue
  247. StartBut
  248. FlashLabels_Flash
  249. FlashLabels
  250. Visible
  251. State
  252. FlashLabels_Clickf
  253. Standard values when using Integer's as booleans
  254. StartBut_Click
  255. set initial value to "Stop button not clicked" / reset initial value
  256.  Reset all flashing buttons' Visible property to FALSE - this is for multiple rounds
  257. Here beginneth the loop structure!
  258. re-seed random number generator and 
  259. get a random value from 0 to 5
  260. Flash the randomly selected button
  261. yield execution, allowing Stop-click event to be processed
  262. here endeth the loop structure! 
  263.  Now "light up" the button with focus after Stop button pressed:
  264. StopBut_Click
  265. set StopBool to "Stop button clicked" - SHOULD interrupt flash cycle (*%$!)h
  266. FlashLabels_Flash
  267. recall that default state is "invisible"
  268. provides a reasonable pausep
  269. between flashes 
  270.