home *** CD-ROM | disk | FTP | other *** search
/ POWERdrive for you 5 / PDR5.ISO / programm / mtb30mm.sbk (.txt) < prev    next >
Encoding:
Asymetrix ToolBook File  |  1994-10-03  |  31.2 KB  |  453 lines
  1. Iitemnum
  2. Microsoft Windows with Multimedia is not present. No multimedia devices or widgets will work.
  3. killtbkmmsbk
  4. tbkmm.sbk
  5. itemnum
  6. Cancel
  7. Warning! Altering the script for this system book may cause multimedia applications to break!
  8. Proceed
  9. author
  10. killtbkmmsbk
  11. "Microsoft Windows 
  12. fMultimedia 
  13. xpresent. No multimedia devices 
  14. widgets will work."
  15. itemnum( 
  16. I tmplist
  17. "Warning! Altering the 
  18. 8may cause 
  19. applications 
  20. f"Proceed" 
  21. "Cancel"
  22. tbkmmversion
  23. DlgTitle
  24. Multimedia System Book3
  25. DlgTitle
  26. Multimedia System Book
  27. author
  28. JpISimPjmIeAEos
  29. Tms Rmn
  30. Tms Rmn
  31.  BOOK SCRIPT FOR THE MULTIMEDIA SYSTEM 
  32. tbkMCIchk cmd,notif,req,brk
  33. ZretVal
  34. sysErrorNumber 
  35. tbkmci(
  36. syserrornumber<>0 
  37. tbkmmerrorstring(
  38. tbkBitmapChk 
  39.         -- When 
  40. ]TBKBMP.DLL standalone, you should 
  41. modify 
  42.         -- function 
  43. use the bitmap 
  44.  reporter
  45. tbkbmperrorstring(
  46. brk<>
  47. --Cover functions 
  48. --These allow authors 
  49. pass 
  50. device alias instead 
  51. tbkMCIPositionWindow devAlias,windowPos,flags
  52. Zhwnd
  53. 9("status" && 
  54. 3 && "
  55. ","")
  56. tbkPositionWindow(
  57. tbkMCICenterWindow 
  58.  && "
  59. ","")
  60. tbkCenterWindow(
  61. tbkBitmapPositionWindow 
  62.  && "
  63. tbkBitmapCenterWindow 
  64.  && "
  65. tbkMCIGetWindowRect 
  66.  && "
  67. ","")
  68. tbkGetWindowRect(
  69. tbkBitmapGetWindowRect 
  70.  && "
  71. 4s_mminit
  72. tbkMMInitializeSystem 
  73.     -- guard against 
  74. 4having been restored!
  75. { <> 
  76. stuff used 
  77. Hwidgets
  78. X"tb30win.dll"
  79. YieldApp()
  80.  <> 0
  81. "TB30WIN.
  82. xfound. Some 
  83. Z may 
  84. xwork"
  85. X"tb30dlg.
  86. OpenDlg(
  87.  <> 0
  88. "TB30DLG.
  89.     -- REMOVED 
  90. readdmm
  91. multimedia
  92. "winhelp.exe 
  93. .hlp"
  94. tbkmmdevices 
  95. 4s_mmdevices
  96. f("Multimedia") 
  97. c"Help" 
  98. -- stub so some 
  99.  will 
  100.  without ES boxes
  101. checkdevice
  102. -- General utility 
  103. -- Someday, ToolBook 
  104. Thave built-
  105. data type checking    
  106. isNumber x
  107. x + 0
  108. --repair 3D 
  109. resizing them
  110. sized
  111. Zsnap, txCN, hi, lo
  112. txClassName 
  113. K <> 
  114. "Repair 3D 
  115. f"&Yes" 
  116. "&No"
  117. c"No"
  118. sysSuspendMessages 
  119. recessed 
  120. c"3DFrame"
  121. + 15, 
  122. + 15,\
  123. + 15, 
  124. "3DField"
  125. "3DRect"
  126. znothing
  127. - 15, 
  128. - 15,\
  129. - 15, 
  130. + 15, 
  131. + 15,\
  132. + 15, 
  133. -- Slider control 
  134. begins here
  135. -- NOTES ABOUT IDENTIFIERS
  136. -- s___ prefix     ->
  137. handler 
  138. only 
  139. c"Thumb"
  140. ___setSliderLimits 
  141. 4s___v, s___min, s___max, s___p
  142. down\
  143. prevent updating 
  144. mouse 
  145. xmoved
  146. "HSliderThumb"
  147. loc - 
  148. ___slidePos(
  149. "VSliderThumb"
  150. sliderPosition 
  151. ___snapSlider\
  152. (1 - 
  153. glide 
  154. width 
  155. height 
  156.  p, s1, s2
  157. b(0,(p - s1) /(s2 - s1))
  158. thumb 
  159.             -- Another 
  160. controlling 
  161. OldMin 
  162. OldMax 
  163. j(1,(
  164. b(0,p)))
  165. "vSliderThumb"
  166. pOffset 
  167. ) * (1-p)
  168. newPos 
  169. "hSliderThumb"
  170. ) * p
  171.             -- Restore state 
  172. detentList 
  173. detents
  174. catchRange 
  175. 0 <> 
  176. ends 
  177. -- This initialization usually 
  178. runs ONCE, unless 
  179. app calls
  180. tbkmmInitializeSystem 
  181. asure MME 
  182. loaded
  183. X"mmsystem.
  184. killtbkmmsbk 
  185. X"mtb30mm.
  186.         -- 
  187. private (exported, but undocumented)
  188.     tbkmmloadextensions( )
  189.         -- The 
  190. these are 
  191. standard 
  192. J entry points
  193.     tbkmmversion()
  194.         -- MCI central interface
  195.         -- BMP 
  196.  tbkGraphic( 
  197.         -- parallel 
  198. MMSYSTEM
  199.  tbkTimerStart( 
  200.     tbkTimerStop( 
  201.  tbkTimerCapability()
  202.         -- Utility 
  203. \    MilliSecFromMSF( 
  204. \    MilliSecFromHMS( 
  205. \    MilliSecFromSMPTE( 
  206.     MSFFromMilliSec( 
  207.     HMSFromMilliSec( 
  208.     SMPTEFromMilliSec( 
  209. -- Translation 
  210.         tbkMMTranslate( 
  211. -- Mixer 
  212.     tbkMMMixer( 
  213.  <> 0
  214. "MTB30MM.
  215. link failed"
  216. support
  217.  <> 0 
  218. -- End 
  219. Script
  220. 0v#n#n#
  221. .&+    +E
  222. tbkmmerrorstring
  223. tbkmci
  224. tbkMCIchk
  225. .&+    +E
  226. tbkmmerrorstring
  227. tbkBitmap
  228. tbkBitmapChk
  229. tbkMCI
  230. %tbkPositionWindow
  231. window handle
  232. status
  233. tbkMCIPositionWindow
  234. tbkCenterWindow
  235. tbkMCI
  236. window handle
  237. status
  238. tbkMCICenterWindow
  239. tbkBitmap
  240. window
  241. %tbkPositionWindow
  242. status
  243. tbkBitmapPositionWindow
  244. tbkBitmap
  245. tbkCenterWindow
  246. window
  247. status
  248. tbkBitmapCenterWindow
  249. tbkMCI
  250. tbkGetWindowRect
  251. window handle
  252. status
  253. tbkMCIGetWindowRect
  254. tbkBitmap
  255. window
  256. tbkGetWindowRect
  257. status
  258. tbkBitmapGetWindowRect
  259. tbkMMInitializeSystem
  260. s_mminit
  261. enterSystem
  262. TB30DLG.DLL not found. Some widgets may not work
  263. tb30win.dll
  264. tb30dlg.dll
  265. OpenDlg
  266. tbkMMInitializeSystem
  267. s_mminit
  268. TB30WIN.DLL not found. Some widgets may not work
  269. YieldApp
  270. enterbook
  271. s_mmdevices
  272. tbkmmdevices
  273. checkdevice
  274. isNumber
  275. ^recessed
  276. 3DFrame
  277. author
  278. 3DField
  279. Repair 3D object after resizing?
  280. txClassName
  281. 3DRect
  282. recessed
  283. sized
  284.  "___setSliderLimits
  285. false
  286. txClassName
  287. Thumb
  288. buttonDown
  289. 1,"!#
  290. s___p
  291. false
  292. s___v
  293. HSliderThumb
  294. ___slidePos
  295. s___max
  296. VSliderThumb
  297. txClassName
  298. s___min
  299. buttonStillDown
  300. s___v
  301. false
  302. s___p
  303. HSliderThumb
  304. ___slidePos
  305. s___max
  306. VSliderThumb
  307. txClassName
  308. s___min
  309. i0___snapSlider
  310. sliderPosition
  311. buttonUp
  312. s___v
  313. HSliderThumb
  314. s___max
  315. VSliderThumb
  316. txClassName
  317. s___min
  318. glide
  319. ___setSliderLimits
  320. ___slidePos
  321. sliderPosition
  322.  "___setSliderLimits
  323. newPos
  324. OldMax
  325. hSliderThumb
  326. pOffset
  327. group
  328. SliderThumb
  329. s___max
  330. OldMin
  331. vSliderThumb
  332. txClassName
  333. s___min
  334. thumb
  335. sliderPosition
  336. sliderPosition
  337. detents
  338. detentList
  339. ___snapSlider
  340. mmsystem.dll
  341. tbkmmloadextensions
  342. tbkmmversion
  343. tbkmmerrorstring
  344. tbkMCI
  345. tbkGraphic
  346. tbkTimerStart
  347. tbkTimerStop
  348. tbkTimerCapability
  349. MilliSecFromMSF
  350. MilliSecFromHMS
  351. MilliSecFromSMPTE
  352. MSFFromMilliSec
  353. HMSFromMilliSec
  354. SMPTEFromMilliSec
  355. tbkMMTranslate
  356. tbkGetWindowRect
  357. tbkPositionWindow
  358. tbkCenterWindow
  359. tbkMMMixer
  360. killtbkmmsbk
  361. tbkmmerrorstring
  362. s_mmdevices
  363. jtbkmmloadextensions
  364. tbkmmInitializeSystem
  365. s_mminit
  366. mmsystem
  367. MTB30MM.DLL link failed
  368. mtb30mm.dll
  369. tbkmmInitializeSystem
  370. CDBSE&File
  371. &Open...    Ctrl+O
  372. &Save    Ctrl+S
  373. Save &As...
  374. saveas
  375. &Import...
  376. import
  377. &Export...
  378. export
  379. Print Set&up...
  380. printsetup
  381. &Print Pages...    Ctrl+P
  382. printpages
  383. Prin&t Report...
  384. printreport
  385. Send &Mail...
  386. sendmail
  387. &Run...
  388. E&xit    Alt+F4
  389. &Edit
  390. &Undo    Ctrl+Z
  391. Cu&t    Ctrl+X
  392. &Copy    Ctrl+C
  393. &Paste    Ctrl+V
  394. paste
  395. C&lear    Del
  396. clear
  397. Select &All    Shift+F9
  398. selectall
  399. Select Pa&ge    Shift+F12
  400. selectpage
  401. &Size to Page    F11
  402. sizetopage
  403. F&ind...    F5
  404. Re&place...
  405. replace
  406. Aut&hor    F3
  407. author
  408. &Text
  409. &Character...    F6
  410. character
  411. &Paragraph...    F7
  412. paragraph
  413. &Regular    Ctrl+Space
  414. regular
  415. &Bold    Ctrl+B
  416. &Italic    Ctrl+I
  417. italic
  418. &Underline    Ctrl+U
  419. underline
  420. Stri&keout    Ctrl+K
  421. strikeout
  422. Superscrip&t/Subscript
  423. superscriptSubscript
  424. &Normal Script
  425. normalscript
  426. Su&bscript    Ctrl+L
  427. subscript
  428. Su&perscript    Ctrl+Shift+L
  429. superscript
  430. &Show Hotwords    F9
  431. showhotwords
  432. &Page
  433. &Next    Alt+Right
  434. &Previous    Alt+Left
  435. previous
  436. &First    Alt+Up
  437. first
  438. &Last    Alt+Down
  439. &Back    Shift+F2
  440. &History...    Ctrl+F2
  441. history
  442. N&ew Page    Ctrl+N
  443. newpage
  444. &Help
  445. &Contents    F1
  446. contents
  447. Status &Bar    F12
  448. statusbar
  449. AkU'9
  450. ?S;uD
  451. zc%C1
  452. GAMES   GRP 
  453.