home *** CD-ROM | disk | FTP | other *** search
/ Windows Shareware GOLD / NuclearComputingVol3No1.cdr / _bbs1 / f1274.zip / DIVELG.TBK (.txt) next >
Asymetrix ToolBook File  |  1991-05-10  |  85KB  |  736 lines
  1. System
  2. Courier
  3. `D|D|M
  4. euRfDzpIJ
  5. Courier
  6. `D|D|M
  7. Courier
  8. `D|D|M
  9. c"Text" 
  10. c"Help" 
  11. "&Author" 
  12. c"File"
  13. c"Edit" 
  14. "Import" 
  15. "Export" 
  16. "Change Printer..." 
  17. "Open" 
  18. "Save As..." 
  19. "About Toolbook..." 
  20. B"OK"
  21. enterBook
  22. About
  23. enterBook
  24. &Author
  25. Import
  26. Export
  27. Change Printer...
  28. Save As...
  29. About Toolbook...
  30. About
  31. About
  32. Diver's Log Book
  33. c"Text" 
  34. c"Help" 
  35. "&Author" 
  36. c"File"
  37. "A&bout,,," 
  38. c"Edit" 
  39. "Import" 
  40. "Export" 
  41. "Change Printer..." 
  42. "Open" 
  43. "Save As..." 
  44. "About Toolbook..." 
  45. B"OK"
  46. enterBook
  47. About
  48. enterBook
  49. &Author
  50. A&bout,,,
  51. Import
  52. Export
  53. Change Printer...
  54. Save As...
  55. About Toolbook...
  56. About
  57. About
  58.    Diver's Log Book
  59. System
  60. Courier
  61. `D|D|M
  62. RfDzpIJ
  63. Courier
  64. `D|D|M
  65. Courier
  66. `D|D|M
  67. Courier
  68. `D|D|
  69. "Change Printer..." 
  70. "Open" 
  71. "Save As..." 
  72. "About Toolbook..." 
  73. B"OK"
  74. enterBook
  75. About
  76. enterBook
  77. &Author
  78. Import
  79. Export
  80. Change Printer...
  81. Save As...
  82. About Toolbook...
  83. About
  84. About
  85. Diver's Log Book
  86. sizetoPage
  87. "Please 
  88. $5 donation 
  89. you like 
  90. program"&\
  91. Dane Basch"&\
  92. " 2811 SW Archer Rd, Apt K-99"&\
  93. " Gainesville, FL 32608"&\
  94. " Ask 
  95. I will 
  96. wthe Author 
  97. f"Thanks"
  98. c"Text" 
  99. c"Help" 
  100. "A&bout Diver's Log Book,,," 
  101. c"File" 
  102. "Import" 
  103. "Export" 
  104. "Change Printer..." 
  105. "Open" 
  106. "Save As..." 
  107. "About Toolbook..." 
  108. "History" 
  109. "Back" 
  110. y Report..." 
  111. AboutDiversLogBook
  112.  Version 2.1"&\
  113. " By 
  114. , HeadFirst Software."&\
  115. " Remember:
  116. WETTER IS BETTER"
  117. enterBook
  118. AboutDiversLogBook
  119. enterBook
  120. sizetoPage
  121. Please send $5 donation if you like this program
  122.  to:  Dane Basch
  123.  2811 SW Archer Rd, Apt K-99
  124.  Gainesville, FL 32608
  125.  Ask with donation, and I will send you the Author password.
  126. Thanks
  127. A&bout Diver's Log Book,,,
  128. Import
  129. Export
  130. Change Printer...
  131. Save As...
  132. About Toolbook...
  133. History
  134. Print Report...
  135. AboutDiversLogBook
  136. Diver's Log Book, Version 2.1
  137.  By Dane Basch, HeadFirst Software.
  138.  Remember:  WETTER IS BETTER
  139. First Software.
  140.  Remember:  WETTER IS BETTER
  141. euRfDzpIJ
  142. X"sound.drv" 
  143. CloseSound( ) 
  144. CountVoiceNotes( 
  145. GetThresholdStatus( ) 
  146. OpenSound( ) 
  147. SetSoundNoise( 
  148. SetVoiceAccent( 
  149. SetVoiceEnvelope( 
  150. SetVoiceNote( 
  151. SetVoiceQueueSize( 
  152. SetVoiceSound( 
  153. SetVoiceThreshold( 
  154. StartSound( ) 
  155. StopSound( ) 
  156. SyncAllVoices( ) 
  157. WaitSoundState( 
  158. vTemp 
  159. opensound()
  160. PLAY pitch,duration
  161. setVoiceNote(1,ABS(80-
  162. startSound()
  163. PLAYSTRING num
  164. setVoiceQueueSize(1,500)
  165. vtemp 
  166. setVoiceSound (1,5632,1000)
  167. setvoiceaccent(1,160,250,1,0)
  168.  (1,i*(80/
  169. ),16,0)
  170.  (1,i*(80/
  171. ),16,0)
  172. CHROMESLIDE 
  173. , fstart,dur, direction
  174. INITSOUND 1000 
  175. endnum 
  176.  (1,i,
  177. "down"
  178.  (1,i,
  179. "warble"
  180.  (1,j+
  181.  (1,j+
  182. STARTSOUND
  183. TWILITEZONE 
  184. queue
  185. 32,1000)
  186. 0,250,1,0)
  187. ACCELSLIDE 
  188. type--,--
  189. ,rate
  190. vstep 
  191. j/80)
  192. delta 
  193. * .19
  194. 's a guess, but don't change 
  195. `* i,
  196. (dur+
  197. _)),0)
  198. "note"
  199. > 40 
  200. * .275
  201. > 40 
  202. * .275
  203. deldur 
  204. * .19
  205. F)),0)
  206. SHARK ct
  207. vDiff 
  208. Y(2^i))
  209.  (1,5,4+
  210.  (1,6,8+2*
  211.  (1,0,8+2*
  212. default
  213. ROMESLIDE
  214. TWILITEZONE
  215. enterPage
  216. INITSOUND
  217. PLAYSTRING
  218. STARTSOUND
  219. ACCELSLIDE
  220. CHROMESLIDE
  221. SHARK
  222. enterPage
  223. sound.drv
  224. CloseSound
  225. CountVoiceNotes
  226. GetThresholdStatus
  227. OpenSound
  228. SetSoundNoise
  229. SetVoiceAccent
  230. SetVoiceEnvelope
  231. SetVoiceNote
  232. SetVoiceQueueSize
  233. SetVoiceSound
  234. SetVoiceThreshold
  235. StartSound
  236. StopSound
  237. SyncAllVoices
  238. WaitSoundState
  239. opensound
  240. vTemp
  241. setVoiceNote
  242. startSound
  243. duration
  244. pitch
  245. PLAYSTRING
  246. setVoiceQueueSize
  247. vtemp
  248. setVoiceSound
  249. vtemp
  250. setvoiceaccent
  251. vtemp
  252. setVoiceNote
  253. vtemp
  254. setVoiceNote
  255. vtemp
  256. startSound
  257. vTemp
  258. CHROMESLIDE
  259. INITSOUND
  260. setVoiceNote
  261. setVoiceNote
  262. warble
  263. setVoiceNote
  264. setVoiceNote
  265. STARTSOUND
  266. j:by2
  267. j:to2
  268. i:by1
  269. vtemp
  270. i:to1
  271. endnum
  272. direction
  273. fstart
  274. TWILITEZONE
  275. INITSOUND
  276. setVoiceNote
  277. setVoiceNote
  278. setVoiceNote
  279. setVoiceNote
  280. STARTSOUND
  281. vtemp
  282. fstart
  283. INITSOUND
  284. setVoiceQueueSize
  285. vtemp
  286. setVoiceSound
  287. vtemp
  288. setvoiceaccent
  289. vTemp
  290. queue
  291. STARTSOUND
  292. startSound
  293. vTemp
  294. ACCELSLIDE
  295. INITSOUND
  296. setVoiceNote
  297. setVoiceNote
  298. setVoiceNote
  299. STARTSOUND
  300. deldur
  301. vTemp
  302. i:to1
  303. delta
  304. vstep
  305. direction
  306. fstart
  307. SHARK
  308. INITSOUND
  309. setVoiceNote
  310. setVoiceNote
  311. setVoiceNote
  312. STARTSOUND
  313. default
  314. vTemp
  315. vDiff
  316. leavePage
  317. sound.drv
  318. leavePage
  319. sound.drv
  320. AlBzC<D
  321. Send Next
  322. buttonUp
  323. buttonUp
  324. Let's Begin
  325. About
  326.     Diver's Log Book,
  327.        Version 1.11
  328.   By Dane Basch, NAUI Diver
  329.        
  330.        CIS # 72027,3036
  331.  Remember:  Wetter is better!!
  332. B"OK"
  333. "About"
  334. buttonUp
  335. buttonUp
  336. About
  337. shark
  338. shark 60
  339. 914, 1400, 1424, 1720
  340. 914, 1400, 1484, 1765
  341. 914, 1400, 1544, 1885
  342. 914, 1400, 1619, 1990
  343. 914, 1400, 1889, 2110
  344. 914, 1400, 2144, 2320
  345. 914, 1400, 2429, 2410
  346. 914, 1400, 2714, 2590
  347. 914, 1400, 3284, 2815
  348. 914, 1400, 3734, 2995
  349. 914, 1400, 4214, 3205
  350. 914, 1400, 5054, 3640
  351. 914, 1400, 5654, 3895
  352. 914, 1400, 6434, 4135
  353. 914, 1400, 7109, 4585
  354. 914, 1400, 8144, 5335
  355. 914, 1400, 9014, 5725
  356. 914, 1400, 10014, 6225
  357. 914, 1400, 11014, 6725
  358. 914, 1400, 12014, 7225
  359. 914, 1400, 13014, 7725
  360. 914, 1400, 14014, 8225
  361. 914, 1400, 15014, 8725
  362. H1000, 0
  363. 914,1400,1409,1705
  364. stopsound()
  365. buttonUp
  366. buttonUp
  367. shark
  368. stopsound
  369. tter!!
  370. B"OK"
  371. "About"
  372. buttonUp
  373. buttonUp
  374. About
  375. shark
  376. shark 60
  377. 914, 1400, 1424, 1720
  378. 914, 1400, 1484, 1765
  379. 914, 1400, 1544, 1885
  380. 914, 1400, 1619, 1990
  381. 914, 1400, 1889, 2110
  382. 914, 1400, 2144, 2320
  383. 914, 1400, 2429, 2410
  384. 914, 1400, 2714, 2590
  385. 914, 1400, 3284, 2815
  386. 914, 1400, 3734, 2995
  387. 914, 1400, 4214, 3205
  388. 914, 1400, 5054, 3640
  389. 914, 1400, 5654, 3895
  390. 914, 1400, 6434, 4135
  391. 914, 1400, 7109, 4585
  392. 914, 1400, 8144, 5335
  393. 914, 1400, 9014, 5725
  394. 914, 1400, 10014, 6225
  395. 914, 1400, 11014, 6725
  396. 914, 1400, 12014, 7225
  397. 914, 1400, 13014, 7725
  398. 914, 1400, 14014, 8225
  399. 914, 1400, 15014, 8725
  400. H1000, 0
  401. 914,1400,1409,1705
  402. stopsound()
  403. buttonUp
  404. buttonUp
  405. shark
  406. stopsound
  407. Send Background
  408. NewPage
  409. buttonUp
  410. buttonUp
  411. Background
  412. y5NewPage
  413. New Page
  414. "T ,b^aR
  415.     B    x    
  416. Date of the Dive:Dive::
  417. Destination for the Dive:
  418. Description of Dive Activity:::::
  419. Maximum Depth     of Dive:
  420. Total Bottom Time 
  421. of Dive:
  422. Button
  423. Minutes
  424. ~+V+{+
  425. 4inface
  426. X"sound.drv" 
  427. CloseSound( ) 
  428. CountVoiceNotes( 
  429. GetThresholdStatus( ) 
  430. OpenSound( ) 
  431. SetSoundNoise( 
  432. SetVoiceAccent( 
  433. SetVoiceEnvelope( 
  434. SetVoiceNote( 
  435. SetVoiceQueueSize( 
  436. SetVoiceSound( 
  437. SetVoiceThreshold( 
  438. StartSound( ) 
  439. StopSound( ) 
  440. SyncAllVoices( ) 
  441. WaitSoundState( 
  442. vTemp 
  443. opensound()
  444. closeSound()
  445. "Info"
  446. "Sounds"
  447. "MovingObjects"
  448. "Movebyindices"
  449. "ChangingColors"
  450. PLAY pitch,duration
  451. setVoiceNote(1,ABS(80-
  452. startSound()
  453. PLAYSTRING num
  454. setVoiceQueueSize(1,500)
  455. vtemp 
  456. setVoiceSound (1,5632,1000)
  457. setvoiceaccent(1,160,250,1,0)
  458.  (1,i*(80/
  459. ),16,0)
  460.  (1,i*(80/
  461. ),16,0)
  462. CHROMESLIDE 
  463. , fstart,dur, direction
  464. INITSOUND 1000 
  465. endnum 
  466.  (1,i,
  467. "down"
  468.  (1,i,
  469. "warble"
  470.  (1,j+
  471.  (1,j+
  472. STARTSOUND
  473. TWILITEZONE 
  474. queue
  475. 32,1000)
  476. 0,250,1,0)
  477. ACCELSLIDE 
  478. type--,--
  479. ,rate
  480. vstep 
  481. j/80)
  482. delta 
  483. * .19
  484. 's a guess, but don't change 
  485. `* i,
  486. (dur+
  487. _)),0)
  488. "note"
  489. > 40 
  490. * .275
  491. > 40 
  492. * .275
  493. deldur 
  494. * .19
  495. F)),0)
  496. SHARK ct
  497. vDiff 
  498. Y(2^i))
  499.  (1,5,4+
  500.  (1,6,8+2*
  501.  (1,0,8+2*
  502. default
  503. P4QBR
  504.      h    t
  505. Send Next
  506. buttonUp
  507. buttonUp
  508. Begin
  509. About
  510. $R|Q!R
  511.     Diver's Log Book,
  512.        Version 1.11
  513.   By Dane Basch, NAUI Diver
  514.        
  515.        CIS # 72027,3036
  516.  Remember:  Wetter is better!!
  517. B"OK"
  518. "About"
  519. buttonUp
  520. buttonUp
  521. About
  522. shark
  523. 914, 1400, 1424, 1720
  524. 914, 1400, 1484, 1765
  525. 914, 1400, 1544, 1885
  526. 914, 1400, 1619, 1990
  527. 914, 1400, 1889, 2110
  528. 914, 1400, 2144, 2320
  529. 914, 1400, 2429, 2410
  530. 914, 1400, 2714, 2590
  531. 914, 1400, 3284, 2815
  532. 914, 1400, 3734, 2995
  533. 914, 1400, 4214, 3205
  534. 914, 1400, 5054, 3640
  535. 914, 1400, 5654, 3895
  536. 914, 1400, 6434, 4135
  537. 914, 1400, 7109, 4585
  538. 914, 1400, 8144, 5335
  539. 914, 1400, 9014, 5725
  540. 914, 1400, 10014, 6225
  541. 914, 1400, 11014, 6725
  542. 914, 1400, 12014, 7225
  543. 914, 1400, 13014, 7725
  544. 914, 1400, 14014, 8225
  545. 914, 1400, 15014, 8725
  546. H1000, 0
  547. 914,1400,1409,1705
  548. stopsound()
  549. buttonUp
  550. buttonUp
  551. stopsound
  552. SoundEngine
  553. --This 
  554. the "Sound Engine", 
  555. other 
  556. that generates 
  557. --sound 
  558. INITIALIZESOUND
  559. !.drv" 
  560. CloseSound( ) 
  561. CountVoiceNotes( 
  562. GetThresholdStatus( ) 
  563. OpenSound( ) 
  564. SetSoundNoise( 
  565. SetVoiceAccent( 
  566. SetVoiceEnvelope( 
  567. SetVoiceNote( 
  568. SetVoiceQueueSize( 
  569. SetVoiceSound( 
  570. SetVoiceThreshold( 
  571. StartSound( ) 
  572. StopSound( ) 
  573. SyncAllVoices( ) 
  574. WaitSoundState( 
  575. vTemp 
  576. opensound()
  577. PLAY pitch,duration
  578. setVoiceNote(1,ABS(80-
  579. startSound()
  580. PLAYSTRING num
  581. setVoiceQueueSize(1,500)
  582. vtemp 
  583. setVoiceSound (1,5632,1000)
  584. setvoiceaccent(1,160,250,1,0)
  585.  (1,i*(80/
  586. ),16,0)
  587.  (1,i*(80/
  588. ),16,0)
  589. CHROMESLIDE 
  590. , fstart,dur, direction
  591. INITSOUND 1000 
  592. endnum 
  593.  (1,i,
  594. "down"
  595.  (1,i,
  596. "warble"
  597.  (1,j+
  598.  (1,j+
  599. STARTSOUND
  600. TWILITEZONE 
  601. queue
  602. 32,1000)
  603. 0,250,1,0)
  604. ACCELSLIDE 
  605. type--,--
  606. vstep 
  607. i/80)
  608. delta 
  609. * .19
  610. 's a guess, but don't change 
  611. `* i,
  612. (dur+
  613. _)),0)
  614. "note"
  615. > 40 
  616. * .275
  617. > 40 
  618. * .275
  619. deldur 
  620. * .19
  621. F)),0)
  622. SHARK ct
  623. vDiff 
  624. Y(2^i))
  625.  (1,5,4+
  626.  (1,6,8+2*
  627.  (1,0,8+2*
  628. default
  629. BUTTONUP
  630. LIZESOUND
  631. CHROMESLIDE
  632. TWILITEZONE
  633. INITSOUND
  634. STARTSOUND
  635. PLAYSTRING
  636. ACCELSLIDE
  637. SHARK
  638. INITIALIZESOUND
  639. BUTTONUP
  640. INITIALIZESOUND
  641. sound.drv
  642. CloseSound
  643. CountVoiceNotes
  644. GetThresholdStatus
  645. OpenSound
  646. SetSoundNoise
  647. SetVoiceAccent
  648. SetVoiceEnvelope
  649. SetVoiceNote
  650. SetVoiceQueueSize
  651. SetVoiceSound
  652. SetVoiceThreshold
  653. StartSound
  654. StopSound
  655. SyncAllVoices
  656. WaitSoundState
  657. opensound
  658. vTemp
  659. setVoiceNote
  660. startSound
  661. duration
  662. pitch
  663. PLAYSTRING
  664. setVoiceQueueSize
  665. vtemp
  666. setVoiceSound
  667. vtemp
  668. setvoiceaccent
  669. vtemp
  670. setVoiceNote
  671. vtemp
  672. setVoiceNote
  673. vtemp
  674. startSound
  675. vTemp
  676. CHROMESLIDE
  677. INITSOUND
  678. setVoiceNote
  679. setVoiceNote
  680. warble
  681. setVoiceNote
  682. setVoiceNote
  683. STARTSOUND
  684. j:by2
  685. j:to2
  686. i:by1
  687. vtemp
  688. i:to1
  689. endnum
  690. direction
  691. fstart
  692. TWILITEZONE
  693. INITSOUND
  694. setVoiceNote
  695. setVoiceNote
  696. setVoiceNote
  697. setVoiceNote
  698. STARTSOUND
  699. vtemp
  700. fstart
  701. INITSOUND
  702. setVoiceQueueSize
  703. vtemp
  704. setVoiceSound
  705. vtemp
  706. setvoiceaccent
  707. vTemp
  708. queue
  709. STARTSOUND
  710. startSound
  711. vTemp
  712. ACCELSLIDE
  713. INITSOUND
  714. setVoiceNote
  715. setVoiceNote
  716. setVoiceNote
  717. STARTSOUND
  718. deldur
  719. vTemp
  720. i:to1
  721. delta
  722. vstep
  723. direction
  724. fstart
  725. SHARK
  726. INITSOUND
  727. setVoiceNote
  728. setVoiceNote
  729. setVoiceNote
  730. STARTSOUND
  731. default
  732. vTemp
  733. vDiff
  734. BUTTONUP
  735. Sound Engine
  736.