home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / windows / multimed.zip / CONTROL.TBK (.txt) next >
Asymetrix ToolBook File  |  1990-06-25  |  42KB  |  1,244 lines
  1. System
  2. *defComPort
  3. defaultcomport
  4. `B|B|
  5. 4s_Report_Errors, s_aux
  6. "reference 
  7. "working 
  8. B"foo"
  9. B"unloadmidi"
  10. 1 -- 
  11. y, no debug terminal
  12. "DVA-4000.tbk,LD-V2200.
  13. linked 
  14. Bsetvideo 
  15. InitLinks
  16. openComPort(
  17. ,0,0)
  18. setComPort(
  19. ,9600,8,1,0,0) -- no handshake, so won't hang
  20. linkDLL "midisoft.dll"
  21. WORD seqInit(
  22. Exit()
  23. Open(STRING)
  24. ,Close()
  25. 6Play()
  26. ?Stop()
  27. HPause()
  28. \Version()
  29.  tbk-comm.
  30. suspend 
  31. X"TBK-COMM.
  32. --INT clearComBreak(
  33. oseComPort(
  34. $flushComRxBuffer(
  35. ;flushComTxBuffer(
  36. isComRxReady(
  37. isComTxReady(
  38.  readComPort(
  39. setComBreak(
  40. setComPortTxXlate(
  41.  TBK_COMMVersion()
  42. writeComPort(
  43. "Cannot find the correct version 
  44. DLL." \
  45. && "Unable 
  46. access 
  47. 3serial ports."
  48.  user functions
  49. showwindow(
  50. setActiveWindow(
  51. bringWindowToTop(
  52. getTickCount()
  53. closeComPort(
  54. defComPort 
  55. -    < End 
  56. 8housekeeping >
  57. ---< Timer services >---
  58. resetTimer
  59. 4s_time_mark
  60. GetTickCount()
  61. elapsed since
  62. ;) / 1000
  63. waitFor what
  64. , s_wait_mark
  65. IsComRxReady(
  66. ) > 0
  67. ) > 0
  68. getControl
  69. ---< 
  70. timer 
  71. setup
  72. entire presentation 
  73. ,8250
  74. -4,-41,662,501
  75. "Opening midi1.
  76. seqError(
  77. 1,2,816))
  78. seqOpen("c:\
  79. Evideodisc..."
  80. g",2)
  81. "error opening 
  82. C overlay driver" && 
  83. f("play")
  84. docommand "
  85. (status,player) = 
  86. ("seek",1)
  87. +frame) = 1"
  88. "Videodisc ready.
  89. Closing unwanted windows."
  90. Kill 
  91. other instances 
  92. ToolBook that are out there
  93. x"OK"
  94. excel
  95. )][quit()]"\
  96.  Excel 
  97. x"OK"
  98. --Start 
  99.  DDE demo files 
  100. needed
  101. (""ddedata.xls"")]"\
  102. "OK" 
  103. .exe ddedemo.xlw"
  104. --Move 
  105. desired location
  106. (""macro3.xlm!OffScreen"")]"\
  107. "OK" 
  108. "Setup 
  109. xrunning properly"
  110. "bkgnd.tbk"
  111. "frgnd.
  112.  toolbook 
  113. bringwindowtotop(
  114. "multi2.
  115. 320,0;"\
  116. "Other 
  117.  up our 
  118. "Reference Field" 
  119. "Working 
  120. default
  121. key color","dark 
  122. inset", "full screen")
  123. ("fade out",1)
  124. audiocontrol("
  125. level",255)
  126. ("Fade In",1)
  127. "All OK"
  128. "Everything's 
  129.  now, just hit 
  130. dismissing"\
  131. $Escape 
  132. STARTDEMO
  133. ZvStartTime, vTargetTime, vCommand, vCurrentSysTime, 
  134. Clean up 
  135. Set up 
  136. 1    times
  137. Main loop, will 
  138. no more commands 
  139. Get a 
  140. [container
  141. "--" 
  142. First see 
  143. zsomething.
  144.  (relative) 
  145. Wait 
  146. Correct 
  147. going past midnight
  148. H86400
  149. auxIn 
  150. DOCOMMAND 
  151. fCommand
  152. , vExecuteLine, vCommandLength, vSoundCmd
  153. sendaux(trim(
  154. X) & 
  155. "sound" 
  156.  toolBook 
  157. r<> "OK" 
  158.  && "ExecuteRemote 
  159. :" && 
  160. startdemo
  161. cs <> 
  162. s) < 33
  163. cs <> 
  164. s) < 33
  165. resetTimer
  166. InitLinks
  167. setup
  168. STARTDEMO
  169. enterbook
  170. DOCOMMAND
  171. leavebook
  172. keydown
  173. getControl
  174. itFor
  175. elapsed
  176. waitFor
  177. sendaux
  178. enterbook
  179. sizetopage
  180. reference field
  181. working field
  182. unloadmidi
  183. DVA-4000.tbk,LD-V2200.tbk
  184. linked
  185. InitLinks
  186. openComPort
  187. setComPort
  188. setvideo
  189. s_Report_Errors
  190. s_aux
  191. InitLinks
  192. midisoft.dll
  193. seqInit
  194. seqExit
  195. seqOpen
  196. seqClose
  197. seqPlay
  198. seqStop
  199. seqPause
  200. seqError
  201. seqVersion
  202. TBK-COMM.DLL
  203. closeComPort
  204. flushComRxBuffer
  205. flushComTxBuffer
  206. isComRxReady
  207. isComTxReady
  208. openComPort
  209. readComPort
  210. setComPort
  211. setComPortTxXlate
  212. TBK_COMMVersion
  213. writeComPort
  214. Cannot find the correct version of TBK-COMM.DLL.
  215. Unable to get access to the serial ports.
  216. showwindow
  217. setActiveWindow
  218. bringWindowToTop
  219. getTickCount
  220. suspend
  221. leavebook
  222. closeComPort
  223. defComPort
  224. defComPort
  225. closeComPort
  226. s_aux
  227. resetTimer
  228. GetTickCount
  229. s_time_mark
  230. elapsed
  231. GetTickCount
  232. GetTickCount
  233. s_time_mark
  234. since
  235. waitFor
  236. readComPort
  237. GetTickCount
  238. IsComRxReady
  239. IsComRxReady
  240. readComPort
  241. getControl
  242. s_aux
  243. s_wait_mark
  244. setup
  245. reference field
  246. working field
  247. unloadmidi
  248. setvideo
  249. seconds
  250. Opening midi1.mid
  251. seqInit
  252. seqError
  253. c:\midi\midi1.mid
  254. seqOpen
  255. seqError
  256. Opening videodisc...
  257. Close
  258. videodisc
  259. videodisc
  260. error opening videodisc overlay driver
  261. videodisc
  262. docommand
  263. wait, videodisc(status,player) = play
  264. videodisc
  265. docommand
  266. wait, videodisc(status,frame) = 1
  267. Videodisc ready.  Closing unwanted windows.
  268. name of this book
  269. send exit
  270. [close(false)][close(false)][quit()]
  271. [activate("ddedata.xls")]
  272. excel.exe ddedemo.xlw
  273. [run("macro3.xlm!OffScreen")]
  274. Setup error: Excel is not running properly
  275. bkgnd.tbk
  276. frgnd.tbk
  277. hide mainwindow
  278. toolbook
  279. frgnd.tbk
  280. bringwindowtotop
  281. multi2.tbk
  282. send sizeToPage;set position of mainwindow to 320,0;
  283. hide mainwindow
  284. toolbook
  285. multi2.tbk
  286. Other instances are ready
  287. Reference Field
  288. Working Field
  289. Opening DVA driver
  290. Close
  291. video
  292. video
  293. error opening video overlay driver
  294. set key color
  295. dark yellow
  296. video
  297. set inset
  298. full screen
  299. video
  300. fade out
  301. video
  302. set level
  303. audiocontrol
  304. Fade In
  305. video
  306. All OK
  307. Everything's ready now, just hit the space bar after dismissing
  308. this DB,  or hit Escape to show the demo control book's window.
  309. default
  310. Excel
  311. ToolBook
  312. s_aux
  313. STARTDEMO
  314. Working Field
  315. Working Field
  316. Working Field
  317.         
  318. isComRxReady
  319. isComRxReady
  320. readComPort
  321. getControl
  322. getControl
  323. DOCOMMAND
  324. default
  325. auxIn
  326. vStartTime
  327. vTargetTime
  328. vCommand
  329. vCurrentSysTime
  330. s_aux
  331. DOCOMMAND
  332. sendaux
  333. sound
  334. video
  335. videodisc
  336. waitFor
  337. ExecuteRemote Error:
  338. sendaux
  339. toolBook
  340. s_Report_Errors
  341. s_aux
  342. vTarget
  343. vExecuteLine
  344. vCommandLength
  345. vSoundCmd
  346. fCommand
  347. keydown
  348. field
  349. startdemo
  350. getControl
  351. getControl
  352. reference field
  353. working field
  354. unloadmidi
  355. setvideo
  356. show mainwindow; send sizetopage;
  357. set syslevel to author
  358. frgnd.tbk
  359. show mainwindow; send sizetopage;
  360. set syslevel to author
  361. bkgnd.tbk
  362. setActiveWindow
  363. bringWindowToTop
  364. sizeToPage
  365. toolbook
  366. sendaux
  367. writeComPort
  368. s_aux
  369. `B|B|
  370. Asymetrix  ToolBook
  371. later
  372. later
  373. later
  374. "working 
  375. B"foo"
  376. B"unloadmidi"
  377. B"setvideo"
  378. 1 -- 
  379. y, no debug terminal
  380. "DVA-4000.tbk,LD-V2200.
  381. linked 
  382. InitLinks
  383. openComPort(
  384. setComPort(
  385. 9600,8,1,0,0) -- no handshake, so won't hang
  386. linkDLL "midisoft.dll"
  387. WORD seqInit(
  388. Exit()
  389. Open(STRING)
  390. ,Close()
  391. 6Play()
  392. ?Stop()
  393. HPause()
  394. \Version()
  395.  tbk-comm.
  396. suspend 
  397. X"TBK-COMM.
  398. --INT clearComBreak(
  399. oseComPort(
  400. $flushComRxBuffer(
  401. ;flushComTxBuffer(
  402. isComRxReady(
  403. isComTxReady(
  404.  readComPort(
  405. setComBreak(
  406. setComPortTxXlate(
  407.  TBK_COMMVersion()
  408. writeComPort(
  409. "Cannot find the correct version 
  410. DLL." \
  411. && "Unable 
  412. access 
  413. 3serial ports."
  414.  user functions
  415. showwindow(
  416. setActiveWindow(
  417. bringWindowToTop(
  418. getTickCount()
  419. closeComPort(
  420. defComPort 
  421. -    < End 
  422. 8housekeeping >
  423. ---< Timer services >---
  424. resetTimer
  425. 4s_time_mark
  426. GetTickCount()
  427. elapsed since
  428. ;) / 1000
  429. waitFor what
  430. wait_mark
  431. s_wait_mark 
  432. IsComRxReady(
  433. ) > 0
  434. ) > 0
  435. getControl
  436. ---< 
  437. timer 
  438. setup whichPart -- 
  439. entire presentation 
  440. ,8250
  441. -4,-41,662,501
  442. "Opening midi1.
  443. seqError(
  444. 1,2,816))
  445. seqOpen("c:\
  446. Evideodisc..."
  447. g",2)
  448. "error opening 
  449. C overlay driver" && 
  450. f("play")
  451. docommand "
  452. (status,player) = 
  453. ("seek",1)
  454. +frame) = 1"
  455. "Videodisc 
  456. Closing unwanted windows."
  457. Kill 
  458. other instances 
  459. ToolBook that are out there
  460. x"OK"
  461. excel
  462. )][quit()]"\
  463.  Excel 
  464. x"OK"
  465. --Start 
  466.  DDE demo files 
  467. needed
  468. (""ddedata.xls"")]"\
  469. "OK" 
  470. .exe ddedemo.xlw"
  471. --Move 
  472. desired location
  473. (""macro3.xlm!OffScreen"")]"\
  474. "OK" 
  475. "Setup 
  476. xrunning properly"
  477. "bkgnd.tbk"
  478. "frgnd.
  479.  toolbook 
  480. bringwindowtotop(
  481. "multi2.
  482. 320,0;"\
  483. "Other 
  484.  up our 
  485. "Reference Field"
  486. startLine 
  487. c("@" & whichpart)
  488. "Working 
  489. Dstartline 
  490. default
  491. key color","dark 
  492. inset", "full screen")
  493. ("fade out",1)
  494. audiocontrol("
  495. level",255)
  496. ("Fade In",1)
  497. "All OK" && 
  498. "Everything's 
  499.  now, just hit 
  500. dismissing"\
  501. $Escape 
  502. sendaux(
  503. (7) & 
  504. (12)\
  505. & "Demo 
  506. Waiting 
  507. a keypress." & 
  508. STARTDEMO
  509. ZvStartTime, vTargetTime, vCommand, vCurrentSysTime
  510. , s_requestStop
  511. y-- so we don't restart 
  512. accidentally
  513. Clean up 
  514. Set up 
  515. times
  516. Main loop, will 
  517. no more commands 
  518. Get a 
  519. [container
  520. "--" 
  521. First see 
  522. zsomething.
  523.  (relative) 
  524. Correct 
  525. going past midnight
  526. H86400
  527. ) > 0
  528. auxIn 
  529. ) > 0
  530. s_RequestStop 
  531. DOCOMMAND 
  532. h& "<<< 
  533. completed successfully. >>>" & 
  534. TfCommand
  535. , vExecuteLine, vCommandLength, vSoundCmd
  536. trim(
  537. T) & 
  538. "sound" 
  539.  toolBook 
  540. r<> "OK" 
  541.  && "ExecuteRemote 
  542. :" && 
  543. startdemo
  544. "Interrupted"
  545. cs <> 
  546. s) < 33
  547. cs <> 
  548. s) < 33
  549.  <> 0
  550. tTimer
  551. InitLinks
  552. setup
  553. STARTDEMO
  554. enterbook
  555. DOCOMMAND
  556. leavebook
  557. keydown
  558. resetTimer
  559. getControl
  560. itFor
  561. elapsed
  562. waitFor
  563. sendaux
  564. enterbook
  565. sizetopage
  566. reference field
  567. working field
  568. unloadmidi
  569. setvideo
  570. DVA-4000.tbk,LD-V2200.tbk
  571. linked
  572. InitLinks
  573. openComPort
  574. setComPort
  575. setvideo
  576. s_Report_Errors
  577. s_aux
  578. s_ready
  579. InitLinks
  580. midisoft.dll
  581. seqInit
  582. seqExit
  583. seqOpen
  584. seqClose
  585. seqPlay
  586. seqStop
  587. seqPause
  588. seqError
  589. seqVersion
  590. TBK-COMM.DLL
  591. closeComPort
  592. flushComRxBuffer
  593. flushComTxBuffer
  594. isComRxReady
  595. isComTxReady
  596. openComPort
  597. readComPort
  598. setComPort
  599. setComPortTxXlate
  600. TBK_COMMVersion
  601. writeComPort
  602. Cannot find the correct version of TBK-COMM.DLL.
  603. Unable to get access to the serial ports.
  604. showwindow
  605. setActiveWindow
  606. bringWindowToTop
  607. getTickCount
  608. suspend
  609. leavebook
  610. closeComPort
  611. defComPort
  612. defComPort
  613. closeComPort
  614. s_aux
  615. resetTimer
  616. GetTickCount
  617. s_time_mark
  618. elapsed
  619. GetTickCount
  620. GetTickCount
  621. s_time_mark
  622. since
  623. waitFor
  624. readComPort
  625. GetTickCount
  626. IsComRxReady
  627. IsComRxReady
  628. readComPort
  629. getControl
  630. s_aux
  631. s_wait_mark
  632. setup
  633. leaveBook
  634. enterBook
  635. unloadmidi
  636. setvideo
  637. commandwindow
  638. reference field
  639. seconds
  640. Opening midi1.mid
  641. seqInit
  642. seqError
  643. c:\midi\midi1.mid
  644. seqOpen
  645. seqError
  646. Opening videodisc...
  647. Close
  648. videodisc
  649. videodisc
  650. error opening videodisc overlay driver
  651. videodisc
  652. docommand
  653. wait, videodisc(status,player) = play
  654. videodisc
  655. docommand
  656. wait, videodisc(status,frame) = 1
  657. Videodisc ready.  Closing unwanted windows.
  658. name of this book
  659. send exit
  660. [close(false)][close(false)][quit()]
  661. [activate("ddedata.xls")]
  662. excel.exe ddedemo.xlw
  663. [run("macro3.xlm!OffScreen")]
  664. Setup error: Excel is not running properly
  665. bkgnd.tbk
  666. frgnd.tbk
  667. hide mainwindow
  668. toolbook
  669. frgnd.tbk
  670. bringwindowtotop
  671. multi2.tbk
  672. send sizeToPage;set position of mainwindow to 320,0;
  673. hide mainwindow
  674. toolbook
  675. multi2.tbk
  676. Other instances are ready
  677. Reference Field
  678. whichpart
  679. Working Field
  680. startline
  681. Opening DVA driver
  682. Close
  683. video
  684. video
  685. error opening video overlay driver
  686. set key color
  687. dark yellow
  688. video
  689. set inset
  690. full screen
  691. video
  692. fade out
  693. video
  694. set level
  695. audiocontrol
  696. Fade In
  697. video
  698. All OK
  699. working field
  700. Everything's ready now, just hit the space bar after dismissing
  701. this DB,  or hit Escape to show the demo control book's window.
  702. Demo ready.  Waiting for a keypress.
  703. sendaux
  704. default
  705. startLine:to
  706. startLine
  707. Excel
  708. ToolBook
  709. s_aux
  710. s_ready
  711. whichPart
  712. STARTDEMO
  713. Working Field
  714. Working Field
  715. Working Field
  716.         
  717. isComRxReady
  718. isComRxReady
  719. readComPort
  720. getControl
  721. s_RequestStop
  722. getControl
  723. DOCOMMAND
  724. <<< Demo completed successfully. >>>
  725. sendaux
  726. auxIn
  727. s_aux
  728. s_ready
  729. s_requestStop
  730. vStartTime
  731. vTargetTime
  732. vCommand
  733. vCurrentSysTime
  734. DOCOMMAND
  735. sendaux
  736. sound
  737. video
  738. videodisc
  739. waitFor
  740. ExecuteRemote Error:
  741. sendaux
  742. toolBook
  743. s_Report_Errors
  744. s_aux
  745. vTarget
  746. vExecuteLine
  747. vCommandLength
  748. vSoundCmd
  749. fCommand
  750. keydown
  751. field
  752. startdemo
  753. getControl
  754. s_ready
  755. s_requestStop
  756. startdemo
  757. getControl
  758. s_ready
  759. getControl
  760. commandwindow
  761. reference field
  762. working field
  763. unloadmidi
  764. setvideo
  765. commandwindow
  766. Interrupted
  767. show mainwindow; send sizetopage;
  768. set syslevel to author
  769. frgnd.tbk
  770. show mainwindow; send sizetopage;
  771. set syslevel to author
  772. bkgnd.tbk
  773. setActiveWindow
  774. bringWindowToTop
  775. sizeToPage
  776. default
  777. toolbook
  778. s_ready
  779. s_requestStop
  780. sendaux
  781. writeComPort
  782. s_aux
  783. *nextbook
  784. 4s_Report_Errors, s_aux, s_ready
  785. "reference 
  786. "working 
  787. B"foo"
  788. nextBook 
  789. "later"
  790. "" -- 
  791. y, no debug terminal
  792. "DVA-4000.tbk,LD-V2200.
  793. linked 
  794. Bsetvideo 
  795. InitLinks
  796. openComPort(
  797. setComPort(
  798. 9600,8,1,0,0) -- no handshake, so won't hang
  799. linkDLL "midisoft.dll"
  800. WORD seqInit(
  801. Exit()
  802. #Open(STRING)
  803. 5Close()
  804. BPlay()
  805. NStop()
  806. ZPause()
  807. tVersion()
  808.  tbk-comm.
  809. suspend 
  810. X"TBK-COMM.
  811. INT closeComPort(
  812. flushComRxBuffer(
  813. /flushComTxBuffer(
  814. isComRxReady(
  815. isComTxReady(
  816.  readComPort(
  817. setComPortTxXlate(
  818. writeComPort(
  819. "Cannot find the correct version 
  820. DLL." \
  821. && "Unable 
  822. access 
  823. 3serial ports."
  824.  user functions
  825. showwindow(
  826. setActiveWindow(
  827. bringWindowToTop(
  828. getTickCount()
  829. defComPort 
  830. -    < End 
  831. 8housekeeping >
  832. ---< Timer services >---
  833. resetTimer
  834. 4s_time_mark
  835. GetTickCount()
  836. elapsed since
  837. ;) / 1000
  838. waitFor what
  839. wait_mark
  840. s_wait_mark 
  841. IsComRxReady(
  842. ) > 0
  843. ) > 0
  844. getControl
  845. ---< 
  846. timer 
  847. setup whichPart -- 
  848. entire presentation 
  849. ,8250
  850. -4,-41,662,501
  851. "Opening midi1.
  852. seqError(
  853. 1,2,816))
  854. seqOpen("c:\
  855. Nvideodisc..."
  856. v",2)
  857. "error opening 
  858. O overlay driver" && 
  859. {("play")
  860. docommand "
  861. (status,player) = 
  862. ("seek",1)
  863. 1frame) = 1"
  864. "Videodisc 
  865. Closing unwanted windows."
  866. Kill 
  867. other instances 
  868. ToolBook that are out there
  869. x"OK"
  870. excel
  871. )][quit()]"\
  872.  Excel 
  873. x"OK"
  874. --Start 
  875. load DDE demo files 
  876. needed
  877. (""ddedata.xls"")]"\
  878. "OK" 
  879. .exe ddedemo.xlw"
  880. --Move 
  881. desired location
  882. (""macro3.xlm!OffScreen"")]"\
  883. "OK" 
  884. "Setup 
  885. xrunning properly"
  886. "bkgnd.tbk"
  887. "frgnd.
  888. Here you would 
  889. "Other 
  890.  up our 
  891. "Reference Field" one 
  892. startLine 
  893. c("@" & whichpart)
  894. "Working 
  895. Dstartline 
  896. default
  897. key color","dark 
  898. inset", "full screen")
  899. ("fade out",1)
  900. audiocontrol("
  901. level",255)
  902. ("Fade In",1)
  903. "All OK" && 
  904. "Everything's 
  905.  now! Hit CTRL+A 
  906. begin A/V extravaganza"\
  907. && "(
  908. hit Escape 
  909. sendaux(
  910. (7) & 
  911. (12)\
  912. & "Demo 
  913. Waiting 
  914. a keypress." & 
  915. STARTDEMO
  916. ZvStartTime, vTargetTime, vCommand, vCurrentSysTime
  917. , s_requestStop
  918. y-- so we don't restart 
  919. accidentally
  920. Clean up 
  921. Set up 
  922. times
  923. Main loop, will 
  924. no more commands 
  925. Get a 
  926. [container
  927. "--" 
  928. First see 
  929. zsomething.
  930.  (relative) 
  931. Correct 
  932. going past midnight
  933. H86400
  934. ) > 0
  935. auxIn 
  936. ) > 0
  937. s_RequestStop 
  938. DOCOMMAND 
  939. h& "<<< 
  940. completed successfully. >>>" & 
  941. TfCommand
  942. , vExecuteLine, vCommandLength, vSoundCmd
  943. trim(
  944. T) & 
  945. "sound" 
  946.  toolBook 
  947. r<> "OK" 
  948.  && "ExecuteRemote 
  949. :" && 
  950. key, isShift, isCtrl
  951. keyA 
  952. startdemo
  953. 10072,8192
  954. "now"
  955. syschangesDB 
  956. 8"C:\SWDEMO\STEVE.TBK"
  957. B"unloadmidi"
  958. "Interrupted"
  959.  toolbook 
  960. cs <> 
  961. s) < 33
  962. cs <> 
  963. s) < 33
  964.  <> 0
  965. tTimer
  966. InitLinks
  967. setup
  968. STARTDEMO
  969. enterbook
  970. DOCOMMAND
  971. leavebook
  972. keydown
  973. resetTimer
  974. getControl
  975. itFor
  976. elapsed
  977. waitFor
  978. sendaux
  979. enterbook
  980. sizetopage
  981. reference field
  982. working field
  983. commandwindow
  984. nextBook
  985. later
  986. DVA-4000.tbk,LD-V2200.tbk
  987. linked
  988. InitLinks
  989. openComPort
  990. setComPort
  991. setvideo
  992. s_Report_Errors
  993. s_aux
  994. s_ready
  995. InitLinks
  996. Cannot find the correct version of TBK-COMM.DLL.
  997. Unable to get access to the serial ports.
  998. showwindow
  999. setActiveWindow
  1000. bringWindowToTop
  1001. getTickCount
  1002. suspend
  1003. leavebook
  1004. closeComPort
  1005. defComPort
  1006. defComPort
  1007. closeComPort
  1008. s_aux
  1009. resetTimer
  1010. GetTickCount
  1011. s_time_mark
  1012. elapsed
  1013. GetTickCount
  1014. GetTickCount
  1015. s_time_mark
  1016. since
  1017. waitFor
  1018. readComPort
  1019. GetTickCount
  1020. IsComRxReady
  1021. IsComRxReady
  1022. readComPort
  1023. getControl
  1024. s_aux
  1025. s_wait_mark
  1026. setup
  1027. leaveBook
  1028. enterBook
  1029. commandwindow
  1030. reference field
  1031. seconds
  1032. name of this book
  1033. send exit
  1034. Other instances are ready
  1035. Reference Field
  1036. whichpart
  1037. Working Field
  1038. startline
  1039. video
  1040. error opening video overlay driver
  1041. set key color
  1042. dark yellow
  1043. video
  1044. set inset
  1045. full screen
  1046. video
  1047. fade out
  1048. video
  1049. set level
  1050. audiocontrol
  1051. Fade In
  1052. video
  1053. All OK
  1054. working field
  1055. Everything's ready now! Hit CTRL+A to begin A/V extravaganza
  1056. (after losing this DB),  or hit Escape to show the demo control book's window.
  1057. Demo ready.  Waiting for a keypress.
  1058. sendaux
  1059. default
  1060. startLine:to
  1061. startLine
  1062. ToolBook
  1063. s_aux
  1064. s_ready
  1065. whichPart
  1066. STARTDEMO
  1067. Working Field
  1068. Working Field
  1069. Working Field
  1070.         
  1071. isComRxReady
  1072. isComRxReady
  1073. readComPort
  1074. getControl
  1075. s_RequestStop
  1076. getControl
  1077. DOCOMMAND
  1078. <<< Demo completed successfully. >>>
  1079. sendaux
  1080. auxIn
  1081. s_aux
  1082. s_ready
  1083. s_requestStop
  1084. vStartTime
  1085. vTargetTime
  1086. vCommand
  1087. vCurrentSysTime
  1088. DOCOMMAND
  1089. sendaux
  1090. sound
  1091. video
  1092. videodisc
  1093. waitFor
  1094. ExecuteRemote Error:
  1095. sendaux
  1096. toolBook
  1097. s_Report_Errors
  1098. s_aux
  1099. vTarget
  1100. vExecuteLine
  1101. vCommandLength
  1102. vSoundCmd
  1103. fCommand
  1104. keydown
  1105. startdemo
  1106. getControl
  1107. sizeToPage
  1108. field
  1109. s_ready
  1110. s_requestStop
  1111. isCtrl
  1112. isShift
  1113. nextBook
  1114. C:\SWDEMO\STEVE.TBK
  1115. getControl
  1116. getControl
  1117. commandwindow
  1118. reference field
  1119. working field
  1120. unloadmidi
  1121. setvideo
  1122. commandwindow
  1123. Interrupted
  1124. show mainwindow; send sizetopage;
  1125. set syslevel to author
  1126. frgnd.tbk
  1127. show mainwindow; send sizetopage;
  1128. set syslevel to author
  1129. bkgnd.tbk
  1130. setActiveWindow
  1131. bringWindowToTop
  1132. sizeToPage
  1133. default
  1134. toolbook
  1135. suspend
  1136. s_ready
  1137. s_requestStop
  1138. sendaux
  1139. writeComPort
  1140. s_aux
  1141. s_aux
  1142. vTarget
  1143. vExecuteLine
  1144. vCommandLength
  1145. vSoundCmd
  1146. fCommand
  1147. keydown
  1148. startdemo
  1149. getControl
  1150. sizeToPage
  1151. field
  1152. s_ready
  1153. s_requestStop
  1154. isCtrl
  1155. isShift
  1156. nextBook
  1157. C:\SWDEMO\STEVE.TBK
  1158. getControl
  1159. getControl
  1160. commandwindow
  1161. reference field
  1162. working field
  1163. unloadmidi
  1164. setvideo
  1165. commandwindow
  1166. Interrupted
  1167. show mainwindow; send sizetopage;
  1168. set syslevel to author
  1169. frgnd.tbk
  1170. show mainwindow; send sizetopage;
  1171. set syslevel to author
  1172. bkgnd.tbk
  1173. setActiveWindow
  1174. bringWindowToTop
  1175. sizeToPage
  1176. default
  1177. toolbook
  1178. suspend
  1179. s_ready
  1180. s_requestStop
  1181. sendaux
  1182. writeComPort
  1183. s_aux
  1184. buttonDoubleClick
  1185. buttonDoubleClick
  1186. enterbook
  1187. psaveIds
  1188. field id 0 of page id 0,field id 1 of page id 0,button id 5 of page id 0,button id 6 of page id 0
  1189. psaveBounds
  1190. 4950,1815,9180,5895,315,1815,4545,5895,7515,6315,8910,6750,5790,6330,7185,6765,
  1191. Reference Field
  1192. Working Field
  1193. setup
  1194. buttonup
  1195. buttonup
  1196. setup
  1197. Hide everything and get everything ready to go.
  1198. unloadmidi
  1199. seqError(seqClose())
  1200. Exit())
  1201. unlinkDLL "MIDISOFT.
  1202. buttonUp
  1203. buttonUp
  1204. seqClose
  1205. seqError
  1206. seqExit
  1207. seqError
  1208. MIDISOFT.DLL
  1209. Unload MIDI
  1210. SetVideo
  1211. video("Close")
  1212.  ("Open")
  1213. "error opening 
  1214. 9 overlay driver" && 
  1215. key color","dark 
  1216. inset", "full screen")
  1217. fade 
  1218. audiocontrol("
  1219. level",255)
  1220. buttonUp
  1221. buttonUp
  1222. Close
  1223. video
  1224. video
  1225. error opening video overlay driver
  1226. set key color
  1227. dark yellow
  1228. video
  1229. set inset
  1230. full screen
  1231. video
  1232. fade in
  1233. video
  1234. set level
  1235. audiocontrol
  1236. linked
  1237. false
  1238. Set Video
  1239. commandwindow
  1240. buttonUp
  1241. buttonUp
  1242. Command Window
  1243. "T (bZaR
  1244.