home *** CD-ROM | disk | FTP | other *** search
/ The Ultimedia System / IBM_ACD_101.ISO / tbkeval / present.tbk (.txt) < prev    next >
Asymetrix ToolBook File  |  1991-09-16  |  57KB  |  881 lines
  1. s Rmn
  2. u\zp 
  3. `B|B|
  4. :PRINTLAYOUT
  5. }\D|D|
  6. IgD|D|
  7. System
  8. ithead
  9. defcomport
  10. )s rmn
  11. `D|D|
  12. System
  13. enterbook
  14. enterbook
  15. sizetopage
  16. instructions
  17. :REPORTDATA
  18. instructions
  19. Jim Gallant
  20. 12/11/90
  21. enterbook
  22. enterbook
  23. sizetopage
  24. --Copyright 
  25.  1991
  26. Asymetrix Corporation
  27. gives you permission 
  28. e, revise 
  29. reuse the 
  30. --individual 
  31. scripts 
  32. your own 
  33. --applications.
  34. You may 
  35. x, however, 
  36. Sentire 
  37. --substantial part 
  38. redistribution 
  39. jproduct.
  40. retains 
  41. copyright on 
  42. original elements 
  43.  . Include 
  44. notice "Portions 
  45.  are 
  46. they 
  47. --contain 
  48. copied 
  49. ,:         Brad Gaub,Jim Gallant
  50. Q:    7/1/91
  51. setupMenus
  52. EditBullets
  53. c"&Presentation" 
  54. e"&Options..." 
  55. terbook
  56. setupMenus
  57. enterbook
  58. leaveBook
  59. enterbook
  60. sizetopage
  61. setupMenus
  62. EditBullets
  63. setupMenus
  64. &Presentation
  65. &Options...
  66. Presentation
  67. &Edit Bullets
  68. Presentation
  69. leaveBook
  70. enterbook
  71. leaveBook
  72. enterbook
  73. sizetopage
  74. leaveBook
  75. esentation Builder
  76. in Title
  77. in Title
  78. in Title
  79. in Title
  80. in Title
  81. in Title
  82. in Title
  83. in Title
  84. in Title
  85. in Title
  86. in Title
  87. in Title
  88. in Title
  89. in Title
  90. in Title
  91. in Title
  92. in Title
  93. m sucks me
  94. m sucks me
  95. Presentation Builder
  96. Q:    3/27/91
  97. setupMenus
  98. c"&Slide Show" 
  99. e"&Options..." 
  100. e"&Edit Bullets" 
  101. terbook
  102. setupMenus
  103. enterbook
  104. leaveBook
  105. enterbook
  106. sizetopage
  107. setupMenus
  108. &Slide Show
  109. &Options...
  110. Slide Show
  111. &Edit Bullets
  112. Slide Show
  113. leaveBook
  114. gD|D|
  115. esentation Builder
  116. dividual 
  117. scripts 
  118. your own 
  119. --applications.
  120. You may 
  121. x, however, 
  122. Sentire 
  123. --substantial part 
  124. redistribution 
  125. jproduct.
  126. retains 
  127. copyright on 
  128. original elements 
  129.  . Include 
  130. notice "Portions 
  131.  are 
  132. they 
  133. --contain 
  134. copied 
  135. ,:         Brad Gaub,Jim Gallant
  136. Q:    7/1/91
  137. setupMenus
  138. EditBullets 
  139. c"&Presentation" 
  140. e"&Options..." 
  141. terbook
  142. setupMenus
  143. enterbook
  144. leaveBook
  145. enterbook
  146. sizetopage
  147. setupMenus
  148. EditBullets
  149. setupMenus
  150. &Presentation
  151. &Options...
  152. Presentation
  153. &Edit Bullets
  154. Presentation
  155. leaveBook
  156.  are 
  157. they 
  158. --contain 
  159. copied 
  160. ,:         Jim Gallant
  161. Q:    3/27/91
  162. setupMenus
  163. c"&Slide Show" 
  164. e"&Options..." 
  165. terbook
  166. setupMenus
  167. enterbook
  168. leaveBook
  169. enterbook
  170. sizetopage
  171. setupMenus
  172. &Slide Show
  173. &Options...
  174. Slide Show
  175. leaveBook
  176. reader
  177. s Rmn
  178. `D|D|
  179. --Copyright 
  180.  1991
  181. Asymetrix Corporation
  182. gives you permission 
  183. e, revise 
  184. reuse the 
  185. --individual 
  186. scripts 
  187. your own 
  188. --applications.
  189. You may 
  190. x, however, 
  191. Sentire 
  192. --substantial part 
  193. redistribution 
  194. jproduct.
  195. retains 
  196. copyright on 
  197. original elements 
  198.  . Include 
  199. notice "Portions 
  200.  are 
  201. they 
  202. --contain 
  203. copied 
  204. ,:         Brad Gaub,Jim Gallant
  205. Q:    7/1/91
  206. setupMenus
  207. FileFromPath(
  208. "PRESENT.TBK" 
  209. EditBullets 
  210. EndEdit 
  211. saveSLS 
  212. FALSE
  213. MenuLink
  214. RemoveMenuItemsByPosition 0,"3"
  215. 2,"8,7"
  216. 4,"5,4,3,2,1,0"
  217. MenuUnLink
  218. e"Save" 
  219. &TAB&"Ctrl+S" 
  220. c"P&resentation" 
  221. e"&Options..." 
  222. c"Presentation" 
  223. e"End &
  224. e"Using &
  225. r Builder..." 
  226. c"Help" 
  227. e"&About 
  228. 4sFromAppSampler
  229. RequestSaveChanges
  230. UNLINK
  231. oldFromAppSampler 
  232. .tbk"
  233. 4CurrentMode,ChangesMade
  234. bullet i 
  235. "title" 
  236. "subtitle" 
  237. setMainTitle (
  238. "Subtitle"
  239. endEdit
  240. "View" 
  241. NULL    
  242. -- SetMainTitle
  243. -- This handler 
  244. used 
  245. keep 
  246. main 
  247. , current 
  248. its Places.
  249. -- The 
  250. stored 
  251. the, "Show 
  252. Xbox 
  253. -- In 
  254. lSource parameter 
  255. either 
  256. {reference 
  257. Caption 
  258.  PathString
  259. fileString 
  260. pathString 
  261. saveAs
  262.     -- Get 
  263. mode...
  264.     -- Call 
  265. wSaveAs
  266.     -- Reset Dirty bit 
  267. user doesn't 
  268. setUpMenus
  269. presentation?" 
  270. f"Yes" 
  271. "No" 
  272. "Cancel"
  273. style styleNumber
  274.  > styleCount 
  275. "Error: Style 
  276. zgreater than"&
  277. "&&i) 
  278. default
  279. bulletNumber
  280. (bulletStyle 
  281.  > bulletStyleCount 
  282. bulletItem 
  283. "All"
  284. SetColor PanelFillColor,PanelStrokeColor,BackgroundFillColor,BackgroundStrokeColor
  285. "&&i) 
  286. "&&i) 
  287. options
  288. NewPage
  289. EnterField
  290. EnterRecordField
  291. AboutPresentationBuilder
  292. Dialog" 
  293. UsingPresentationBuilder
  294. strGeneralInit
  295. BDone,b28,
  296. static Text,s40,When 
  297. automatically 
  298. fields 
  299. can type 
  300. appear 
  301. d."&CRLF&\
  302.         "In view 
  303. .see 
  304.  just 
  305. audience will. "&\
  306.         "Saved presentations always 
  307.         "To learn more about 
  308. , press 
  309.         "To 
  310. B."&\
  311. ,b41,
  312. ,b42,
  313. ,s44,
  314. ,b45,
  315. strViewInit
  316.         "1. Choose 
  317.         ""&
  318.         "2. Press 
  319. display one 
  320.         ""&
  321.         "3. Use 
  322. Next 
  323. Previous buttons 
  324. navigate through 
  325.         ""&
  326.         "Return 
  327. Hchoosing 
  328. strEditInit
  329.         "1.
  330. click 
  331. screen colors 
  332. want. Then 
  333. 2OK."&
  334.         ""&
  335.         "2. Type 
  336. desired 
  337. existing 
  338. , drag 
  339. Delete.
  340. also 
  341. Cut, 
  342. Paste on 
  343. c. If a 
  344. xneeded, leave 
  345. blank. No 
  346.  4 bullets 
  347. available per 
  348.         ""&
  349.         "3. 
  350. create a 
  351. strNODLL dllName
  352. rtStr 
  353. "Cannot find 
  354. "& "."
  355. 2& ":" && 
  356. G & "."
  357. MyDialog strDlgBox,strDlgInit
  358. 4s_NoDlgDLL
  359. strNoDLL("tbkdlg.
  360. retValue 
  361. dialog(
  362. MyGetValue strDlgReturn,strDlgControl
  363. wdll")
  364. getValue(
  365.     linkDLL "
  366. setValue(
  367. load 
  368.         unlinkDLL "
  369. MenuLINK
  370.         WORD GetSystemMenu
  371. ,INT)
  372. 'ubMenu
  373. EnableMenuItem (
  374. Menuunlink
  375. MenuPos,MenuItemPosList
  376. . -1 
  377. submenu 
  378. hMenu 
  379. (syswindowHandle,0)
  380. hMainMenu 
  381. GetMenu(
  382. GetSubMenu(
  383. (menuitemPosList)
  384. EnaRet 
  385. ,1024)
  386. RemRet 
  387. ,1024)
  388. credits
  389. B"Credits 
  390. eavepage
  391. enterpage
  392. EditBullets
  393. style
  394. bullet
  395. endEdit
  396. bulletStyle
  397. enterbook
  398. SetColor
  399. options
  400. SetMainTitle
  401. NewPage
  402. EnterField
  403. leaveBook
  404. EnterRecordField
  405. AboutPresentationBuilder
  406. saveAs
  407. UsingPresentationBuilder
  408. rightButtonUp
  409. RequestSaveChanges
  410. UNLINK
  411. MenuLINK
  412. Menuunlink
  413. setupMenus
  414. RemoveMenuItemsByPosition
  415. leavepage
  416. credits
  417. strViewInit
  418. FileFromPath
  419. strEditInit
  420. strNODLL
  421. strGeneralInit
  422. MyDialog
  423. MyGetValue
  424. enterbook
  425. sizetopage
  426. setupMenus
  427. FileFromPath
  428. PRESENT.TBK
  429. EditBullets
  430. ,EndEdit
  431. setupMenus
  432. oMenuLink
  433. RemoveMenuItemsByPosition
  434. RemoveMenuItemsByPosition
  435. RemoveMenuItemsByPosition
  436. 5,4,3,2,1,0
  437. MenuUnLink
  438. FileFromPath
  439. PRESENT.TBK
  440. &Save
  441. Ctrl+S
  442. P&resentation
  443. &Options...
  444. Presentation
  445. FileFromPath
  446. PRESENT.TBK
  447. &Edit Bullets
  448. Presentation
  449. End &Edit
  450. Presentation
  451. Using &Presentation Builder...
  452. &About Presentation Builder...
  453. saveSLS
  454. leaveBook
  455. 12RequestSaveChanges
  456. UNLINK
  457. oldFromAppSampler
  458. sFromAppSampler
  459. AppSamp.tbk
  460. sFromAppSampler
  461. EditBullets
  462. bullet
  463. title
  464. edit title
  465. edit title
  466. subtitle
  467. +'setMainTitle
  468. title
  469. Options
  470. Edit Bullets
  471. End &Edit
  472. Presentation
  473. Subtitle
  474. CurrentMode
  475. ChangesMade
  476. endEdit
  477. title
  478. edit title
  479. edit title
  480. subtitle
  481. +'setMainTitle
  482. edit title
  483. Options
  484. End Edit
  485. &Edit Bullets
  486. Presentation
  487. enterpage
  488. CurrentMode
  489. SetMainTitle
  490. title
  491. edit title
  492. Show Title
  493. Presentation Builder
  494. Source
  495. FileFromPath
  496. pathString
  497. pathString
  498. fileString
  499. PathString
  500. saveAs
  501. ,endEdit
  502. setUpMenus
  503. ChangesMade
  504. FileFromPath
  505. PRESENT.TBK
  506. saveAs
  507. ChangesMade
  508. RequestSaveChanges
  509. Save changes to presentation?
  510. Cancel
  511. Cancel
  512. ChangesMade
  513. leavepage
  514. CurrentMode
  515. enterpage
  516. Bullet
  517. subtitle
  518. CurrentMode
  519. bullet
  520. style
  521. styleCount
  522. Error: Style number greater than
  523. styleCount
  524. styleCount
  525. style
  526. style
  527. default
  528. styleNumber
  529. bullet
  530. Error: Bullet number greater than 4.
  531. bulletStyle
  532. saveSLS
  533. bulletNumber
  534. bulletStyle
  535. bulletStyleCount
  536. Error: Bullet style number greater than
  537. bulletStyleCount
  538. bulletStyle
  539. default
  540. bulletItem:to
  541. bulletItem
  542. bullet
  543. styleNumber
  544. SetColor
  545. styleCount
  546. style
  547. style
  548. default
  549. BackgroundStrokeColor
  550. BackgroundFillColor
  551. PanelStrokeColor
  552. PanelFillColor
  553. options
  554. options
  555. default
  556. NewPage
  557. +'SetMainTitle
  558. title
  559. EnterField
  560. EnterRecordField
  561. AboutPresentationBuilder
  562. buttonUp
  563. About Dialog
  564. UsingPresentationBuilder
  565. buttonUp
  566. Using Dialog
  567. strGeneralInit
  568. button Done,b28,FALSE
  569. static Text,s40,When you open Presentation Builder, you are automatically in edit mode, and fields you can type in appear white.
  570. In view mode, you can see your presentation just as your audience will. 
  571. Saved presentations always open in view mode.
  572. To learn more about using edit mode, press the Edit button.
  573. To learn how to view a presentation press the View button.
  574. button General,b41,TRUE
  575. button Edit,b42,TRUE
  576. static Title,s44,General
  577. button View,b45,TRUE
  578. strViewInit
  579. button Done,b28,FALSE
  580. static Text,s40,
  581. 1. Choose End Edit from the Presentation menu.
  582. 2. Press the Bullet button to display one bullet at a time.
  583. 3. Use the Next and Previous buttons to navigate through pages of the presentation.
  584. Return to edit mode by choosing Edit Bullets from the Presentation menu.
  585. button General,b41,TRUE
  586. button Edit,b42,TRUE
  587. static Title,s44,To view a presentation...
  588. button View,b45,TRUE
  589. strEditInit
  590. button Done,b28,FALSE
  591. static Text,s40,
  592. 1.  Choose Options from the Presentation menu and click to select the screen colors and style and bullet type you want. Then click OK.
  593. 2. Type the desired text in the white fields.  To remove existing text, drag to select then press Delete.  You can also use Cut, Copy, and Paste on the Edit menu. If a bullet is not needed, leave its text blank. No more than 4 bullets are available per page.
  594. 3. Choose New Page from the Page menu to create a new page in your presentation.
  595. button General,b41,TRUE
  596. button Edit,b42,TRUE
  597. static Title,s44,To edit a presentation...
  598. button View,b45,TRUE
  599. strNODLL
  600. Cannot find DLL
  601. rtStr
  602. dllName
  603. MyDialog
  604. tbkdlg.dll
  605. strNoDLL
  606. dialog
  607. retValue
  608. s_NoDlgDLL
  609. strDlgInit
  610. strDlgBox
  611. MyGetValue
  612. tbkdlg.dll
  613. strNoDLL
  614. getValue
  615. retValue
  616. s_NoDlgDLL
  617. strDlgControl
  618. strDlgReturn
  619. rightButtonUp
  620. tbkdlg.dll
  621. dialog
  622. setValue
  623. getValue
  624. Cannot load DLL
  625. tbkdlg.dll
  626. strNoDLL
  627. default
  628. s_NoDlgDLL
  629. UNLINK
  630. tbkdlg.dll
  631. s_NoDlgDLL
  632. MenuLINK
  633. GetSystemMenu
  634. GetMenu
  635. GetSubMenu
  636. EnableMenuItem
  637. RemoveMenu
  638. Menuunlink
  639. RemoveMenuItemsByPosition
  640. GetSystemMenu
  641. GetMenu
  642. GetSubMenu
  643. menuitemPosList
  644. EnableMenuItem
  645. RemoveMenu
  646. RemRet
  647. EnaRet
  648. MenuItemPos
  649. hMainMenu
  650. hMenu
  651. MenuItemPosList
  652. MenuPos
  653. credits
  654. buttonUp
  655. Credits Dialog
  656. Summary
  657. bulletStyle
  658. bulletStyleCount
  659. styleCount
  660. style 3
  661. panels
  662. panels
  663. style 4
  664. panels
  665. style 2
  666. panels
  667. Bullet
  668. 4bullet
  669. 4 > 4
  670. r > 4
  671. buttonup
  672. buttonup
  673. bullet
  674. bullet
  675. Bullet
  676. buttonup
  677. buttonup
  678. buttonup
  679. buttonup
  680. previous
  681. Previous
  682. style 1
  683. panels
  684. Button
  685. Button
  686. Button
  687. Button
  688. title
  689. title
  690. Main Titlemetiesf a long title........
  691. edit title
  692. subtitle
  693. Options
  694. Style
  695. Bullet
  696. Color
  697. "Options" 
  698. default
  699. buttonUp
  700. buttonUp
  701. Options
  702. default
  703. color" 
  704. SetColor c1,c2,c3,c4
  705. buttonUp
  706. buttonUp
  707. select color
  708. vSetColor
  709. select color
  710. select bullet
  711. bullet" 
  712. bulletStyle 
  713. buttonUp
  714. buttonUp
  715. select bullet
  716. Y    bulletStyle
  717. Button
  718. style" 
  719. buttonUp
  720. buttonUp
  721. select style
  722. style
  723. select style 3
  724. panels
  725. panels1
  726. panels4
  727. panels2
  728. Bullet
  729. Previous
  730. Bullet
  731. Previous
  732. Bullet
  733. Previous
  734. panels
  735. Bullet
  736. Previous
  737. select style
  738. Options
  739. Show Title
  740. SetMainTitle (
  741. buttonUp
  742. buttonUp
  743. +'SetMainTitle
  744. edit Title
  745. Display text of main title in presentation title bar.
  746. Using Dialog
  747. init 
  748. strGeneralInit()
  749. retValue 
  750. MyDialog(
  751. odlgBox,
  752. MyGetValue(
  753. BView")
  754. strViewInit()
  755. BEdit")
  756. strEditInit()
  757. ZFALSE
  758. buttonUp
  759. buttonUp
  760. strGeneralInit
  761. dlgBox
  762. MyDialog
  763. button View
  764. MyGetValue
  765. strViewInit
  766. button Edit
  767. MyGetValue
  768. strEditInit
  769. button General
  770. MyGetValue
  771. strGeneralInit
  772. retValue
  773. RctrlID
  774. RdlgBox
  775. 524480,6,50,20,252,138,,,Using Presentation Builder,8,Helv,Done,197.87,109.17,50.86,14.07,28,1342242817,128,Done,0,Text,3.73,16.70,244.53,88.45,40,1350565888,130,,0,General,3.73,109.17,50.86,14.07,41,1342242816,128,General...,0,Edit,112.00,109.17,50.86,14.07,42,1342242816,128,Edit...,0,Title,3.73,4.64,242.67,11.45,44,1342177280,130,General,0,View,57.87,109.17,50.86,14.07,45,1342242816,128,View...,0
  776. SdlgInit
  777. button Done,b28,FALSE
  778. static Text,s40,The Software Catalog is a flat-file database you can use in your software library for data entry and browsing.
  779. The blinking vertical line, or the insertion pointer, indicates where to start typing. Click a different field to place the insertion point there.  Press Tab to advance to the next field.
  780. To learn more about the data entry fields, press the fields button.
  781. To learn how to browse the Software Catalog press the Browse button.
  782. button General,b41,TRUE
  783. button Browse,b42,TRUE
  784. static Title,s44,General
  785. button Fields,b45,TRUE
  786. Using Dialog
  787. credits Dialog
  788. MyDialog(
  789. odlgBox,
  790. odlginit)
  791. buttonUp
  792. buttonUp
  793. dlgBox
  794. dlginit
  795. MyDialog
  796. WctrlID
  797. nX WdlgBox
  798. 524480,2,30,20,189,119,,,Introducing...,8,Helv,,65.18,92.88,61.60,12.31,27,1342242817,128,OK,0,Team,3.70,4.43,180.95,84.43,29,1350565888,130,The Test Drive Team...
  799. Tom Arnold        Brad Gaub
  800. Carol Buchmiller        Chad Randcort
  801. Jeff Day        Craig Schwandt
  802. Michele DeWilliam    Nanette Wright
  803. Special thanks to... Melody Christensen,0
  804. ~XdlgInit
  805. ,b27,TRUE
  806. static Team,s29,The Test Drive Team...
  807. Tom Arnold        Brad Gaub
  808. Carol Buchmiller        Chad Rancourt
  809. Jeff Day        Craig Schwandt
  810. Michele DeWilliam    Nanette Wright
  811. Special thanks to...
  812. Melody Christensen, Michelle Drewien, Jim Gallant, Bob Gallup, Shelly Julien, Mike Miller, Sharon Nelson, Greg Pearson, Kim Rush, and Mark Ursino.
  813. credits Dialog
  814. about Dialog
  815. dlgBox
  816. "524480,4,40,20,170,85,,,"&strCaption()&",8,Helv,,44.80,4.55,119.35,44.23,29,1350565889,130,,0,,13.07,18.63,18.29,19.69,36,1342177283,130,toolbook,0,,44.80,54.81,56.46,14.32,388,1342242817,128,OK,0,More,108.27,54.81,56.00,14.32,387,1342242816,128,
  817. ....,0"
  818. dlgInit 
  819. ",s29,
  820. ,h36,
  821. ,b388,FALSE
  822. ]b387,TRUE"    
  823. setValue(
  824. 6",strTitle())
  825. --DLL function
  826. MyDialog(
  827. Credits
  828. CRLF&\
  829.         "Presentation Builder"&
  830.  1991 Asymetrix Corporation"&
  831.         "All rights reserved."
  832. "About 
  833. buttonUp
  834. strTitle
  835. strCaption
  836. buttonUp
  837. 524480,4,40,20,170,85,,,
  838. strCaption
  839. ,8,Helv,,44.80,4.55,119.35,44.23,29,1350565889,130,,0,,13.07,18.63,18.29,19.69,36,1342177283,130,toolbook,0,,44.80,54.81,56.46,14.32,388,1342242817,128,OK,0,More,108.27,54.81,56.00,14.32,387,1342242816,128,More...,0
  840. ,s29,
  841. ,h36,
  842. ,b388,FALSE
  843. button More,b387,TRUE
  844. strTitle
  845. setValue
  846. MyDialog
  847. @;Credits
  848. dlgInit
  849. dlgBox
  850. strTitle
  851. Presentation Builder
  852.  1991 Asymetrix Corporation
  853. All rights reserved.
  854. strCaption
  855. About Presentation Builder
  856. 6_,_ctrlID
  857. R`F_dlgBox
  858. 524480,4,-2,10,170,85,,,About Software Catalog,8,Helv,,44.80,4.55,119.35,44.23,29,1350565889,130,,0,,13.07,18.63,18.29,19.69,36,1342177283,130,toolbook,0,,44.80,54.81,56.46,14.32,388,1342242817,128,OK,0,More,108.27,54.81,56.00,14.32,387,1342242816,128,More...,0
  859. b`dlgInit
  860. ,s29,
  861. ,h36,
  862. ,b388,TRUE
  863. button More,b387,TRUE
  864. about Dialog
  865. Subtitle
  866. Bullet item 1
  867. Bullet item 2
  868. Bullet item 3
  869. Bullet item 4
  870. Main Title
  871. [SLIDESHW.ico
  872. DDDDDDDDD@
  873. DDDDDDDO
  874. DDDDDDDO
  875. DDDDDDDO
  876. DDDDDDDO
  877. DDDDDDDO
  878. DDDDDDDO
  879. DDDDDDDO
  880. UUUUUUU_
  881.