home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1993 #2 / Image.iso / graphics / tshow5.zip / DEMO.SPT < prev    next >
Text File  |  1993-06-16  |  17KB  |  937 lines
  1. LOAD OPEN5.SCR 4
  2. COLOR 11,0
  3. FONT CAPS.FNT,2
  4. FONT standard.FNT,1
  5. FONTS ON
  6. sTYPE @ 12,38 "P R E S E N T I N G"
  7. delay 1
  8. color 14,0
  9. STYPE @ 12,36 "T E X T - S H O W   5.0"
  10. color 30,0
  11. PRINT @ 12,36 "T E X T - S H O W   5.0"
  12. color 14,0
  13. SLEEP 3
  14. PRINT @ 12,36 "T E X T - S H O W   5.0"
  15. BLINK OFF
  16. color 16,14
  17. type @ 3,18 "MultiMedia Presentations In Text Mode"
  18. color 16,10
  19. print @ 21,47 "PC West Software"
  20. print @ 22,47 " P.O. Box 31418"
  21. print @ 23,45 "Phoenix, AZ  85046"
  22. print @ 24,47 "  602-992-0310"
  23. fxdelay 0
  24. Mouse Set Arrow
  25. Mouse At 10,6
  26. MouseIn1 9,4,11,8 :L1
  27. MouseIn2 13,4,15,8 :L2
  28. MouseIn3 17,4,19,8 :L3
  29. MouseIn4 21,4,23,8 :L4
  30. MouseIn5 9,29,11,33 :L5
  31. MouseIn6 13,29,15,33 :L6
  32. MouseIn7 17,29,19,33 :L7
  33. MouseIn8 21,29,23,33 :L8
  34. MouseIn9 9,54,11,58 :L9
  35. MouseIn0 13,54,18,58 :L0
  36. delay 2
  37. QuilAt 8,24,16,70
  38. BLINK ON
  39. FONT DRAW2.FNT,1
  40. FONT DRAW2.FNT,2
  41. FONTS OFF
  42. XPlay PRESENTS.MUS
  43. QUILT1 *,4
  44. FXDELAY 6
  45. KillXP
  46. SOUND 5
  47. LOAD CURT1.SCR 18
  48. DELAY 2
  49. fxdelay 38
  50. LOAD CURT3.SCR 17
  51. FXDELAY 0
  52. DELAY 45
  53.  
  54. :MENU
  55. LOAD MAIN.SCR 17
  56. fonts off
  57. MOUSE ON
  58. :MAIN
  59. INPUT 30
  60. IF 1 GOTO :L1
  61. IF 2 GOTO :L2
  62. IF 3 GOTO :L3
  63. IF 4 GOTO :L4
  64. IF 5 GOTO :L5
  65. IF 6 GOTO :L6
  66. IF 7 GOTO :L7
  67. IF 8 GOTO :L8
  68. IF 9 GOTO :L9
  69. IF 0 GOTO :L0
  70. SOUND 4
  71. GOTO :MAIN
  72.  
  73. 'RUN FULL DEMO
  74. :L1
  75. MOUSE OFF
  76. LOAD MAIN.SCR 1
  77. BLINK OFF
  78. DOLOOP
  79. COLOR 0,12
  80. PAINT 9,4,11,28
  81. DELAY .5
  82. COLOR 12,0
  83. PAINT 9,4,11,28
  84. DELAY .5
  85. LOOP 3
  86. BLINK ON
  87. GOTO :L2
  88. 'CREATING A LOAD
  89. :L2
  90. MOUSE OFF
  91. LOAD MAIN.SCR 1
  92. BLINK OFF
  93. DOLOOP
  94. COLOR 0,12
  95. PAINT 13,4,15,28
  96. DELAY .5
  97. COLOR 12,0
  98. PAINT 13,4,15,28
  99. DELAY .5
  100. LOOP 5
  101. BLINK ON
  102. LOAD PREP1.SCR 26
  103. color 14,4
  104. print @ 11,10 "EASY TO USE"
  105. color 31
  106. print @ 25,27 "╣ Press a key to continue ╠"
  107. DELAY 35
  108. fonts off
  109. LOAD PREP2.SCR 27
  110. DELAY 35
  111. LOAD PREP3.SCR 32
  112. DELAY 2
  113. SHADOW ON
  114. Box 7,40,14,76,2,59
  115. color 48
  116. PRINT @ 8,42 "The Script Commands are grouped"
  117. print @ 9,42 "together by category.  You just"
  118. print @ 10,42 "pull-down the desired menu, then"
  119. print @ 11,42 "highlight your choice, press the"
  120. print @ 12,42 "Enter key and the script command"
  121. print @ 13,42 "is automatically written for you."
  122. delay 10
  123. color 0,0
  124. Box 14,10,20,46,2,79
  125. color 79
  126. print @ 15,12 "Another great feature of ShowPrep"
  127. print @ 16,12 "is that you may interactively run"
  128. print @ 17,12 "your script right from ShowPrep."
  129. print @ 18,12 "That way you may preview your"
  130. print @ 19,12 "show as you create it."
  131. CRWLAT 23,2,79,45
  132. color 14,1
  133. delay 8
  134. crawl "To continue with this demo, press any key when ready. . ."
  135. RETURN :MENU
  136.  
  137. 'FADES
  138. :L3
  139. MOUSE OFF
  140. LOAD MAIN.SCR 9
  141. BLINK OFF
  142. DOLOOP
  143. COLOR 0,12
  144. PAINT 17,4,19,28
  145. DELAY .5
  146. COLOR 12,0
  147. PAINT 17,4,19,28
  148. DELAY .5
  149. LOOP 5
  150. BLINK ON
  151. LOAD BLACK.SCR 17
  152. fonts off
  153. PAL SUBDUED.PAL
  154. LOAD FADES.SCR 35
  155. COLOR 15,1
  156. PRINT @ 8,27 "Text-Show 5.0 will add life"
  157. PRINT @ 9,27 "to your presentations with"
  158. print @ 10,27 "dozen's of dazzling screen"
  159. print @ 11,27 "fades and transitions!"
  160. DELAY 4
  161. COLOR 14,0
  162. LOAD FADES.SCR 1
  163. PRINT @ 10,35 " CURTAINS "
  164. DELAY 1
  165. LOAD CITY.SCR 17
  166. DELAY 1
  167. LOAD FADES.SCR 18
  168. PRINT @ 10,33 " FAST DISSOLVE "
  169. DELAY 2
  170. LOAD CITY.SCR 24
  171. PRINT @ 7,8 " SLOW DISSOLVE "
  172. DELAY 2
  173. LOAD FADES.SCR 25
  174. PRINT @ 10,35 " POUR IT OUT "
  175. delay 2
  176. LOAD CITY.SCR 28
  177. DELAY 1
  178. LOAD FADES.SCR 29
  179. PRINT @ 10,36 " SNAKE "
  180. delay 2
  181. LOAD CITY.SCR 27
  182. DELAY 1
  183. LOAD FADES.SCR 29
  184. PRINT @ 10,35 " SQUEEZE IT "
  185. delay 2
  186. LOAD CITY.SCR 14
  187. DELAY 1
  188. LOAD FADES.SCR 15
  189. PRINT @ 10,36 " BLINDS "
  190. DELAY 2
  191. LOAD CITY.SCR 10
  192. DELAY 1
  193. LOAD FADES.SCR 12
  194. PRINT " EXPLODE "
  195. DELAY 3
  196. LOAD CITY.SCR 26
  197. DELAY 2
  198. LOAD FADES.SCR 37
  199. PRINT @ 10,35 " R A D A R "
  200. DELAY 3
  201. LOAD CITY.SCR 20
  202. DELAY 2
  203. LOAD FADES.SCR 20
  204. PRINT " PAGE ROLL "
  205. DELAY 3
  206. LOAD CITY.SCR 22
  207. DELAY 1
  208. LOAD FADES.SCR 21
  209. PRINT " WEAVE IT "
  210. DELAY 1
  211. LOAD CITY.SCR 32
  212. DELAY 1
  213. LOAD FADES.SCR 33
  214. PRINT " SPLIT UP/DOWN "
  215. DELAY 1
  216. LOAD CITY.SCR 30
  217. DELAY 1
  218. LOAD FADES.SCR 31
  219. PRINT @ 10,34 " PUZZLE PIECES "
  220. delay 2
  221. LOAD CITY.SCR 19
  222. DELAY 1
  223. LOAD FADES.SCR 34
  224. PRINT @ 10,30 " And many, many more. "
  225. delay 2
  226. CLR 13
  227. PAL RESTORE
  228. RETURN :MENU
  229.  
  230. 'CUSTOM FONTS
  231. :L4
  232. Mouse Off
  233. LOAD MAIN.SCR 9
  234. BLINK OFF
  235. DOLOOP
  236. COLOR 0,12
  237. PAINT 21,4,23,28
  238. DELAY .5
  239. COLOR 12,0
  240. PAINT 21,4,23,28
  241. DELAY .5
  242. LOOP 5
  243. BLINK ON
  244. LOAD SEEFONTS.SCR 34
  245. color 31,0
  246. stype @16,7 "PRESS A KEY"
  247. font standard.fnt,1
  248. font script.fnt,2
  249. COLOR 15
  250. delay 20
  251. print @16,6 "             "
  252. fonts on
  253. stype @16,10 "Script"
  254. delay 3
  255. print @16,6 "             "
  256. FONT OLDENG.FNT,2
  257. stype @16,7 "Old English"
  258. delay 3
  259. print @16,6 "             "
  260. FONT SANSERIF.FNT,2
  261. stype @16,9 "San Serif"
  262. delay 3
  263. print @16,6 "             "
  264. FONTS OFF
  265. stype @16,6 "And many more"
  266. delay 3
  267. font draw.fnt,1
  268. font draw.fnt,2
  269. LOAD DRAWFNT.SCR 24
  270. fonts on
  271. delay 45
  272. CLR 24
  273. font draw2.fnt,1
  274. font draw2.fnt,2
  275. LOAD DRAWFNT2.SCR 24
  276. delay 45
  277. fxdelay 1
  278. CLR 23
  279. fonts off
  280. BCOL -1
  281. BCHR 220
  282. BWID 1
  283. CLR 15
  284. BPRNT @ 1,20 "TITLE"
  285. BPRNT @ 10,20"FONTS"
  286. DELAY 1
  287. COLOR 12,0
  288. PRINT @ 19,10 "USE THIS FONT FEATURE OF TEXT-SHOW TO DISPLAY LARGE TITLES."
  289. COLOR 14,0
  290. PRINT @ 21,14 "YOU CHOOSE THE SIZE, COLOR AND SHAPE OF THE CHARACTER."
  291. COLOR 7,0
  292. PRINT @ 24,20 "PRESS ANY KEY TO SEE THE FONT FEATURES."
  293. delay 20
  294. CLS
  295. BWID 2
  296. BCHR 178
  297. COLOR 15,4
  298. BCOL 15
  299. BPRNT @ 1,1 "LARGE"
  300. BWID 1
  301. BPRNT @ 10,24 "SMALL"
  302. COLOR 15,0
  303. PRINT @ 21,12 "YOU CONTROL THE SIZE, SHAPE AND COLORS OF THE BIG FONTS."
  304. PRINT @ 23,27 "HERE ARE SOME EXAMPLES. . ."
  305. DELAY 2
  306. BWID 2
  307. BCHR 176
  308. BPRNT @ 1,1 "LARGE"
  309. BWID 1
  310. BPRNT @ 10,24 "SMALL"
  311. DELAY 2
  312. BWID 2
  313. BCHR 177
  314. BPRNT @ 1,1 "LARGE"
  315. BWID 1
  316. BPRNT @ 10,24 "SMALL"
  317. DELAY 2
  318. BCOL 14
  319. BWID 2
  320. BCHR 42
  321. BPRNT @ 1,1 "LARGE"
  322. BWID 1
  323. BPRNT @ 10,24 "SMALL"
  324. DELAY 2
  325. BCOL 11
  326. BWID 2
  327. BCHR 219
  328. BPRNT @ 1,1 "LARGE"
  329. BWID 1
  330. BPRNT @ 10,24 "SMALL"
  331. DELAY 2
  332. BCOL 10
  333. BWID 2
  334. BCHR 186
  335. BPRNT @ 1,1 "LARGE"
  336. BWID 1
  337. BPRNT @ 10,24 "SMALL"
  338. DELAY 2
  339. BCOL 11
  340. BWID 2
  341. BCHR 254
  342. BPRNT @ 1,1 "LARGE"
  343. BWID 1
  344. BPRNT @ 10,24 "SMALL"
  345. DELAY 2
  346. BCOL -1
  347. BWID 2
  348. BCHR 220
  349. BPRNT @ 1,1 "LARGE"
  350. BWID 1
  351. BPRNT @ 10,24 "SMALL"
  352. RETURN :MENU
  353.  
  354. 'SPECIAL FX
  355. :L5
  356. Mouse Off
  357. LOAD MAIN.SCR 9
  358. BCOL -1
  359. BCHR 220
  360. BWID 1
  361. QuilAt 12,12,12,12
  362. FXDELAY 0
  363. BLINK OFF
  364. DOLOOP
  365. COLOR 0,12
  366. PAINT 9,29,11,53
  367. DELAY .5
  368. COLOR 12,0
  369. PAINT 9,29,11,53
  370. DELAY .5
  371. LOOP 5
  372. BLINK ON
  373. CLR 24
  374. PAL SUBDUED.PAL
  375. Quilt1 *,5
  376. COLOR 15,1
  377. BOX 3,19,20,62,2,31
  378. BPRNT @ 4,21 "QUILT"
  379. BPRNT @ 12,34 "FX"
  380. QuilAt 3,20,20,62
  381. Quilt1 *,5
  382. BOX 3,19,20,62,2,79
  383. COLOR 79
  384. PRINT @ 6,21 "The quilting effects in Text-Show 5.0"
  385. print @ 8,21 "gives the ability to display dazzling"
  386. print @ 10,21 "patterns of ascii characters or text in"
  387. print @ 12,21 "a designated area of the screen.  You"
  388. print @ 14,21 "may have two quilting displays on one"
  389. print @16,21 "screen.  Press a key to see an example."
  390. Quilt1 ∙,15
  391. PAL RESTORE
  392. QUILT2 ▓,3
  393. DOLOOP
  394. Quilt1 ∙,.05
  395. QUILT2 ▓,.05
  396. LOOP 20
  397. DOLOOP
  398. Quilt1 ∙,.05
  399. QUILT2 ▓,.05
  400. LOOP 20
  401. DOLOOP
  402. Quilt1 ∙,.05
  403. QUILT2 ▓,.05
  404. LOOP 20
  405. LOAD RED.SCR 19
  406. color 79
  407. PRINT @ 12,18 "You may also use text with the Quilting Effect!"
  408. delay 3
  409. color 8,0
  410. tile "TEXT-SHOW "
  411. delay 2
  412. QuilAt 1,1,1,1
  413. quilt1 TEXT-SHOW ,5
  414. QuilAt 3,20,20,62
  415. DOLOOP
  416. Quilt1 TEXT-SHOW ,.05
  417. QUILT2  5.0   ,.05
  418. LOOP 20
  419. DOLOOP
  420. Quilt1 TEXT-SHOW ,.05
  421. QUILT2  5.0   ,.05
  422. LOOP 20
  423. QUILT1 █,5
  424. QUILT1  ,4
  425. LOAD ROCKET1.SCR 20
  426. delay 1
  427. Box 3,8,7,31,2,79
  428. COLOR 79
  429. print @ 5,11 "Animation sequence"
  430. delay 2
  431. fxdelay 50
  432. LOAD ROCKET1.SCR 1
  433. LOAD ROCKET2.SCR 26
  434. delay 3
  435. DoLoop
  436. LOAD ROCKET1.SCR 1
  437. DELAY .5
  438. LOAD ROCKET2.SCR 1
  439. DELAY .5
  440. LOOP 5
  441. LOAD ROCKET1.SCR 1
  442. delay 1
  443. FXDELAY 10
  444. Play MB O0 L45 agagagagagagagagagagagagagagagagagagagBgBgBgBGBGBGBBBGBB
  445. shake 5
  446. PLAY gBgBgBgBGBGBGgBgBgBgBGBGBGBBBBBB
  447. LOAD rocket3.SCR 34
  448. LOAD CITY.SCR 34
  449. PLAY MF O1 G
  450. sound 5
  451. COLOR 14,1
  452. STYPE @ 7,3 "How about an . . . . . . . . . . . "
  453. DELAY 1
  454. LOAD QUAK1.SCR 8
  455. delay 2
  456. SHAKE 20
  457. FXDELAY 0
  458. LOAD QUAK2.SCR 10
  459. DELAY 3
  460. FONT DRAW2.FNT,1
  461. FONT DRAW2.FNT,2
  462. FONTS ON
  463. LOAD PALETTE.SCR 3
  464. color 14,0
  465. DELAY 10
  466. Stype @ 10,38 "P A S T E L S"
  467. PAL PASTELS.PAL
  468. DELAY 4
  469. Stype @ 10,38 "S U B D U E D"
  470. PAL SUBDUED.PAL
  471. DELAY 4
  472. PRINT @ 10,38 "             "
  473. Stype @ 10,38 "R E D S"
  474. PAL RED.PAL
  475. DELAY 4
  476. PRINT @ 10,38 "             "
  477. Stype @ 10,38 "R E V E R S E"
  478. PAL REVERSE.PAL
  479. DELAY 4
  480. PRINT @ 10,38 "             "
  481. Stype @ 10,38 "B R I G H T"
  482. PAL BRITE.PAL
  483. DELAY 4
  484. PAL RESTORE
  485. LOAD PALETE2.SCR 6
  486. delay 20
  487. PAL SUBDUED.PAL
  488. PAL DARK.PAL
  489. PAL BLACK.PAL
  490. CLR 1 
  491. FXDELAY 10
  492. PAL RESTORE
  493. LOAD FADES.SCR 23
  494. FXDELAY 0
  495. COLOR 30
  496. PRINT @ 9,30 "   PAINT THE SCREEN   "
  497. DELAY 2
  498. COLOR 15,4
  499. PAINT 1,1,12,40
  500. DELAY 2
  501. PRINT @ 11,32 "YOU CHOOSE COLORS"
  502. DELAY 2
  503. COLOR 95
  504. PAINT 1,41,12,80
  505. PRINT @ 13,32 "AND THE LOCATION "
  506. DELAY 2
  507. COLOR 0,3
  508. PAINT 13,1,25,40
  509. DELAY 2
  510. COLOR 32
  511. PAINT 13,41,25,80
  512. DELAY 2
  513. PAL SUBDUED.PAL
  514. PAL DARK.PAL
  515. PAL BLACK.PAL
  516. CLR 1 
  517. pal subdued.pal
  518. LOAD TIME.SCR 35
  519. color 15,1
  520. DATE @ 11,37
  521. COLOR 12,0
  522. TIME2 @ 14,20 .1
  523. TIME1 @ 14,55 20
  524. CLR 30
  525. PAL RESTORE
  526. LOAD CHART1.SCR 19
  527. COLOR 10
  528. PRINT @ 10,45 "Display Graphs & Charts. . ."
  529. DELAY 3
  530. LOAD CHART2.SCR 24
  531. delay 3
  532. LOAD SCORE.SCR 22
  533. delay 2
  534. COLOR 96
  535. crwlat 24,3,78,45
  536. crawl "Press any key to continue. . ."
  537. CLR 18
  538. FONTS OFF
  539. RETURN :MENU
  540.  
  541. 'USER INPUT
  542. :L6
  543. Mouse Off
  544. LOAD MAIN.SCR 9
  545. BLINK OFF
  546. DOLOOP
  547. COLOR 0,12
  548. PAINT 13,29,15,53
  549. DELAY .5
  550. COLOR 12,0
  551. PAINT 13,29,15,53
  552. DELAY .5
  553. LOOP 5
  554. BLINK ON
  555. LOAD USER1.SCR 25
  556. delay 30
  557. LOAD USERINP.SCR 6
  558. FONT STANDARD.FNT,1
  559. FONT SCRIPT.FNT,2
  560. $Size 20
  561. Sound 5
  562. color 0,7
  563. Get @ 8,19 $1
  564. $Size 20
  565. Get @ 12,19 $2
  566. $Size 22
  567. Get @ 16,19 $3
  568. $Size 3
  569. Get @ 20,19 $4
  570. LOAD USER2.SCR 14
  571. fonts on
  572. color 78
  573. DATE @ 6,28
  574. color 79
  575. $PRINT @ 8,8 $1
  576. $PRINT @ 9,8 $2
  577. $print @ 10,8 $3
  578. $print @ 12,14 $1
  579. $print @ 14,39 $4
  580. $print @ 16,20 $2
  581. delay 2
  582. color 71
  583. crwlat 22,7,42,45
  584. crawl "Press a key to continue. . ."
  585. LOAD USRTXT.SCR 14
  586. fonts off
  587. $Size 22
  588. Read TEST.TXT
  589. delay 15
  590. LOAD USERINP.SCR 6
  591. color 0,7
  592. $type @ 8,19 $1
  593. $Type @ 12,19 $2
  594. $Type @ 16,19 $3
  595. $Type @ 20,19 $4
  596. delay 2
  597. LOAD USER2.SCR 14
  598. fonts on
  599. color 78
  600. DATE @ 6,28
  601. color 79
  602. $PRINT @ 8,8 $1
  603. $PRINT @ 9,8 $2
  604. $print @ 10,8 $3
  605. $print @ 12,14 $1
  606. $print @ 14,39 $4
  607. $print @ 16,20 $2
  608. delay 2
  609. QuilAt 4,7,23,44
  610. fxdelay 0
  611. Quilt1 *,7
  612. FONTS OFF
  613. RETURN :MENU
  614.  
  615. 'SOUND & MUSIC
  616. :L7
  617. Mouse Off
  618. LOAD MAIN.SCR 9
  619. BLINK OFF
  620. DOLOOP
  621. COLOR 0,12
  622. PAINT 17,29,19,53
  623. DELAY .5
  624. COLOR 12,0
  625. PAINT 17,29,19,53
  626. DELAY .5
  627. LOOP 5
  628. BLINK ON
  629. PLAY MB T120 O2 P2 P8 L8 GGG L2 E-
  630. CLR 14
  631. LOAD MUS1.SCR 15
  632. PLAY MF P24 P8 L8 FFF L2 D
  633. LOAD MUS2.SCR 24
  634. FONT STANDARD.FNT,1
  635. FONT SANSERIF.FNT,2
  636. Fonts On
  637. color 15,0
  638. at 5,46
  639. print @ 5,46 "TEXT-SHOW 5.0 is a multi-media"
  640. at 6,46
  641. print @ 6,46 "program featuring music, sound"
  642. at 7,46
  643. print @ 7,46 "and voice from your pc and"
  644. at 8,46
  645. print @ 8,46 "external speakers."
  646. At 10,46
  647. print @ 10,46 "TEXT-SHOW can now play files"
  648. At 11,46
  649. print @ 11,46 "created with a Sound Blaster"
  650. At 12,46
  651. print @ 12,46 "card and software (VOC/CMF)."
  652. COLOR 14
  653. PRINT @ 14,46 "Press a key for some music"
  654. DELAY 12
  655. KILLXB
  656. XPlay LAMAR.MUS
  657. COLOR 2
  658. print @ 2,1 "Even if you don't have a Sound"
  659. print @ 3,1 "Blaster card, you may still"
  660. print @ 4,1 "create sound and music through"
  661. print @ 5,1 "music through your pc speaker."
  662. DELAY 5
  663. BOX 5,46,14,78,0,0,15
  664. COLOR 14
  665. print @ 6,46 "We have created music & sound"
  666. print @ 7,46 "script commands based on the"
  667. print @ 8,46 "Basic Music Language.  You may"
  668. print @ 9,46 "play external music files or"
  669. print @ 10,46 "play music right from your"
  670. print @ 11,46 "script.  You may play music in"
  671. print @ 12,46 "background while changing the"
  672. print @ 13,46 "screen or printing words to"
  673. print @ 14,46 "the screen."
  674. color 12,0
  675. print @ 16,47 "Press a key and sing along!"
  676. color 4,4
  677. DELAY 25
  678. at 4,46
  679. color 15,0
  680. KillXP
  681. LOAD MUS4.SCR 20
  682. PLAY O2 T75 mn
  683. PRINT "Oh when the Saints"
  684. PLAY C16 E16 F16 ml G4 mn G16
  685. PRINT "                  "
  686. PRINT "Go marching in,"
  687. PLAY C16 E16 F16 ml G4 mn G16
  688. PRINT "               "
  689. PRINT "Oh when the Saints go "
  690. print @ 5,46 "marching in,"
  691. PLAY C16 E16 F16 G8 E8 C8 E8 ml D4 mn D8
  692. PRINT @ 4,46 "Lord, how I want to be"
  693. print @ 5,46 "in that number"
  694. PLAY E16 E16 D16 C8. C16 E8 G16 G16 G16 ml F8. mn F8
  695. PRINT @ 4,46 "When the Saints go marching in."
  696. print @ 5,46 "                "
  697. PLAY E16 F16 G8 E8 D8 D8 ml C4 mn C8.
  698. DELAY 2
  699. FONTS OFF
  700. RETURN :MENU
  701.  
  702. 'Tools & Stuff
  703. :L8
  704. Mouse Off
  705. LOAD MAIN.SCR 9
  706. BLINK OFF
  707. DOLOOP
  708. COLOR 0,12
  709. PAINT 21,29,23,53
  710. DELAY .5
  711. COLOR 12,0
  712. PAINT 21,29,23,53
  713. DELAY .5
  714. LOOP 5
  715. BLINK ON
  716. SHADOW OFF
  717. COLOR 15,0
  718. BCOL -1
  719. BCHR 220
  720. CLR 36
  721. Box 1,1,11,80,1,0
  722. BPRNT @ 2,10 "RUN-TIME"
  723. PRINT @ 10,35 "Version 5.0"
  724. COLOR 79
  725. BOX 12,4,25,76,2,79
  726. print @ 16,7 "When you receive the registered version of TEXT-SHOW 5.0, you'll"
  727. print @ 17,7 "also receive a runtime version, named TXDEMO, and a utility program"
  728. print @ 18,7 "named MAKESHOW.  You use the MAKESHOW utility to create a run-time"
  729. print @ 19,7 "version of your script file.  You may then freely distribute your"
  730. print @ 20,7 "show/demo with no royalties or charges."
  731. color 15,4
  732. print @ 23,28 "< Press any key to continue >"
  733. DELAY 30
  734. LOAD RED.SCR 8
  735. BORDER 176
  736. print @ 5,10 "     T E X T  -  L I B R A R Y   V e r s i o n    5 . 0    "
  737. DELAY 1
  738. COLOR 78
  739. PRINT @ 9,8 "Now you can store all your presentation screens in a single library."
  740. delay 4
  741. print @ 12,5 "The registered version includes the program: TEXT-SHOW SCREEN LIBRARY."
  742. DELAY 4
  743. PRINT @ 15,12 ".......here's a menu screen from the program"
  744. delay 3
  745. LOAD LIBR.SCR 20
  746. DELAY 6
  747. COLOR 79
  748. LOAD RED.SCR 14
  749. print @ 12,17 "And TEXT-SHOW 5.0 features a box drawing utility. . ."
  750. delay 4
  751. LOAD BOXDRAW.SCR 15
  752. delay 5
  753. color 31
  754. print @ 5,45 "<Press a key to continue>"
  755. SHADOW ON
  756. color 47
  757. DELAY 35
  758. LOAD RED.SCR 13
  759. Box 8,22,16,55,2,32
  760. print @ 10,25 "And you receive additional"
  761. print @ 11,25 "screen viewing and screen"
  762. print @ 12,25 "capture utilities when you"
  763. print @ 13,25 "receive your registered copy"
  764. print @ 14,25 "of TEXT-SHOW 5.0"
  765. delay 8
  766. RETURN :MENU
  767.  
  768. 'MOUSE STUFF
  769. :L9
  770. Mouse Off
  771. BLINK OFF
  772. LOAD MAIN.SCR 9
  773. DOLOOP
  774. COLOR 0,12
  775. PAINT 9,54,11,78
  776. DELAY .5
  777. COLOR 12,0
  778. PAINT 9,54,11,78
  779. DELAY .5
  780. LOOP 5
  781. BLINK ON
  782. LOAD MOUS1.SCR 17
  783. MouseIn1 12,10,14,24 :M1
  784. MouseIn2 15,10,17,24 :M2
  785. MouseIn3 18,10,20,24 :M3
  786. MouseIn4 21,10,23,24 :M4
  787. Mouse Set Arrow
  788. Mouse At 12,28
  789. MOUSE ON
  790. :TOP
  791. INPUT 30
  792. IF 1 GOTO :M1
  793. IF 2 GOTO :M2
  794. IF 3 GOTO :M3
  795. IF 4 GOTO :M4
  796. SOUND 5
  797. CLR 22
  798. LOAD MOUS1.SCR 21
  799. GOTO :TOP
  800.  
  801. :M1
  802. LOAD MOUS2.SCR 1
  803. INPUT 30
  804. IF 2 GOTO :M2
  805. IF 3 GOTO :M3
  806. IF 4 GOTO :M4
  807. SOUND 5
  808. GOTO :M1
  809.  
  810. :M2
  811. LOAD MOUS3.SCR 1
  812. MOUSE AT 16,56
  813. color 15,5
  814. print @ 19,44 "Press or click to begin"
  815. delay 30
  816. Mouse Set Hand
  817. print @ 19,44 "    POINTING HAND      "
  818. DELAY 2
  819. Mouse Set Ball
  820. print @ 19,44 "      ROUND BALL       "
  821. DELAY 2
  822. Mouse Set Target
  823. print @ 19,44 "       TARGET          "
  824. DELAY 2
  825. Mouse Set Pencil
  826. print @ 19,44 "        PENCIL         "
  827. DELAY 2
  828. Mouse Set Hatch
  829. print @ 19,44 "      CROSS HATCH      "
  830. DELAY 2
  831. Mouse Set Hour
  832. print @ 19,44 "       HOUR GLASS      "
  833. DELAY 2
  834. MOUSE AT 12,28
  835. Mouse Set Arrow
  836. print @ 19,43 "Press or click when ready"
  837. SOUND 4
  838. INPUT 30
  839. IF 1 GOTO :M1
  840. IF 3 GOTO :M3
  841. IF 4 GOTO :M4
  842. SOUND 5
  843. GOTO :M2
  844.  
  845. :M3
  846. LOAD MOUS4.SCR 1
  847. MOUSE AT 16,56
  848. Mouse Set Hand
  849. color 0,10
  850. print @ 19,44 "Press or click to begin"
  851. DELAY 4
  852. Play O2 L20 T50 C
  853. DOLOOP
  854. Mouse At 10,10
  855. PLAY C
  856. MOUSE AT 12,50
  857. PLAY G
  858. MOUSE AT 17,10
  859. PLAY A
  860. MOUSE AT 19,40
  861. PLAY D
  862. MOUSE AT 5,62
  863. PLAY E
  864. MOUSE AT 9,77
  865. PLAY F
  866. MOUSE AT 18,65
  867. PLAY G
  868. MOUSE AT 17,56
  869. LOOP 4
  870. MOUSE AT 12,28
  871. Mouse Set Arrow
  872. print @ 19,43 "Press or click when ready"
  873. INPUT 30
  874. IF 1 GOTO :M1
  875. IF 2 GOTO :M2
  876. IF 4 GOTO :M4
  877. SOUND 5
  878. GOTO :M3
  879.  
  880. :M4
  881. LOAD MOUS5.SCR 1
  882. COLOR 14,6
  883. DELAY 1
  884. Play O2 L50 T120 C
  885. print @ 16,54 "4"
  886. SLEEP 1
  887. Play C
  888. print "3"
  889. SLEEP 1
  890. Play C
  891. print "2"
  892. SLEEP 1
  893. Play C
  894. print "1"
  895. SLEEP 1
  896. Play L24 mb CDEFGFEDCDEFGFEDCDEFGC L12 C
  897. MOUSE OFF
  898. MouseIn1 9,4,11,8 :L1
  899. MouseIn2 13,4,15,8 :L2
  900. MouseIn3 17,4,19,8 :L3
  901. MouseIn4 21,4,23,8 :L4
  902. MouseIn5 9,29,11,33 :L5
  903. MouseIn6 13,29,15,33 :L6
  904. MouseIn7 17,29,19,33 :L7
  905. MouseIn8 21,29,23,33 :L8
  906. MouseIn9 9,54,11,58 :L9
  907. MouseIn0 13,54,18,58 :L0
  908. RETURN :MENU
  909.  
  910. :L0
  911. Mouse Off
  912. LOAD MAIN.SCR 9
  913. BLINK OFF
  914. DOLOOP
  915. COLOR 0,12
  916. PAINT 13,54,15,78
  917. PAINT 17,54,19,78
  918. DELAY .5
  919. COLOR 12,0
  920. PAINT 13,54,15,78
  921. PAINT 17,54,19,78
  922. DELAY .5
  923. LOOP 5
  924. BLINK ON
  925. FXDELAY 8
  926. LOAD CURTCLOS.SCR 7
  927. DELAY 15
  928. LOAD CURT1.SCR 18
  929. DELAY 1
  930. PAL SUBDUED.PAL
  931. PAL DARK.PAL
  932. PAL BLACK.PAL
  933. CLR 1
  934. PAL RESTORE
  935. STOP
  936.  
  937.