home *** CD-ROM | disk | FTP | other *** search
/ Photo CD Demo 1 / Demo.bin / fractint / fras1611.zip / DEMO.KEY < prev    next >
Text File  |  1991-07-22  |  9KB  |  626 lines
  1. ;; Fractint demonstration autokey file.
  2. ;; Written by Pieter Branderhorst.
  3. Restart:
  4. WAIT 4         ; view credits a while
  5. ;; video modes, ifs, zoom & rotate, plasma, cycle, authors help
  6. "M"
  7. WAIT 1
  8. DOWN
  9. WAIT 1.5
  10. ENTER
  11. WAIT 1
  12. "ifs"
  13. WAIT 1
  14. ENTER
  15. WAIT 1
  16. "fern"
  17. WAIT 2
  18. ENTER
  19. WAIT 2         ; menu, pick 'x' options
  20. DOWN * 2
  21. WAIT 1
  22. ENTER
  23. WAIT .5
  24. DOWN * 2
  25. "70"             ; max iter
  26. WAIT 1.5
  27. ENTER
  28. WAIT 1         ; menu, pick select video mode
  29. ENTER
  30. WAIT 1         ; page thru video modes a bit to show there are many
  31. PAGEDOWN
  32. WAIT 1
  33. PAGEDOWN
  34. WAIT 1
  35. PAGEDOWN
  36. WAIT 1
  37. PAGEDOWN
  38. WAIT 1
  39. PAGEUP * 4
  40. WAIT 1
  41. ENTER        ; get fern going in default video mode
  42. WAIT 3.5
  43. PAGEUP * 11    ; zoom and rotate
  44. WAIT .3
  45. 1142 * 17
  46. WAIT .3
  47. RIGHT * 25
  48. UP
  49. WAIT 1.5
  50. ENTER
  51. CALCWAIT
  52. WAIT 7        ; finished ifs fern, view it a while
  53. "t"             ; start plasma sequence
  54. WAIT 1
  55. "plas"
  56. WAIT 1
  57. ENTER
  58. WAIT 2
  59. ENTER
  60. CALCWAIT
  61. WAIT 2
  62. "-"             ; finished plasma, cycle it a few ways
  63. WAIT 8
  64. "+"
  65. WAIT 5
  66. F5
  67. WAIT 9
  68. F9
  69. WAIT 18
  70. F1        ; start help sequence
  71. WAIT .1
  72. F1
  73. DOWN
  74. WAIT 2
  75. WAIT .5
  76. ENTER
  77. WAIT  9     ; view intro screen 1
  78. PAGEDOWN
  79. PAGEDOWN
  80. WAIT  9     ; intro screen 3
  81. F1
  82. DOWN * 2
  83. WAIT .5
  84. ENTER
  85. WAIT  7     ; conditions on use
  86. ESC
  87. WAIT 2
  88. ESC
  89. INSERT
  90. WAIT 3
  91. ;;
  92. ;; julia hypnoteyes, palette editor, same image with decomp
  93. ;; ok to start a copy of file from here for testing
  94. "tjulia"        ; pick julia
  95. WAIT  1
  96. ENTER
  97. WAIT  1
  98. ".25892"        ; change parameters
  99. DOWN
  100. "0"
  101. WAIT  1
  102. ENTER
  103. WAIT  1
  104. ENTER
  105. WAIT  1
  106. ENTER
  107. CALCWAIT    ; generate initial julia
  108. WAIT 1
  109. PAGEUP * 25    ; zoom into it
  110. WAIT .1
  111. 1141 * 11
  112. PAGEUP
  113. WAIT 1
  114. ENTER        ; start generating 1st zoom
  115. WAIT 6
  116. PAGEUP * 5    ; interrupt with 2nd (final) zoom
  117. 1141 * 2
  118. RIGHT * 3
  119. UP * 8
  120. WAIT 1
  121. ENTER        ; start generating final zoom of julia
  122. WAIT .5
  123. "X"             ; interrupt to change some "x" options
  124. WAIT 1
  125. DOWN * 2
  126. "210"
  127. DOWN
  128. "0"
  129. WAIT  1
  130. ENTER
  131. CALCWAIT    ; now generate the final julia
  132. WAIT 1
  133. "-"
  134. F6
  135. DOWN * 5
  136. WAIT 35     ; view cycling of julia a while
  137. ESC        ; exit cycling
  138. WAIT  1.0
  139. "E"             ; palette editor
  140. WAIT  1
  141. ENTER
  142. WAIT  7     ; view palette editor a while
  143. F1
  144. WAIT  1     ; just a sec at command summary
  145. ENTER        ; go to descriptive part
  146. WAIT  9     ; view palette editor help a while
  147. ESC
  148. WAIT 1        ; adjust a color
  149. "X"
  150. WAIT  2
  151. "R5"
  152. WAIT  1
  153. "B5"
  154. WAIT  1
  155. "G5"
  156. WAIT  1
  157. "R4"
  158. WAIT  1
  159. "3"
  160. WAIT  1
  161. "2"
  162. WAIT  1
  163. "X"
  164. WAIT  3
  165. ESC
  166. WAIT  2
  167. "-"             ; cycle julia a bit more
  168. F6
  169. DOWN * 5
  170. WAIT 12
  171. ESC
  172. "V"             ; use view window cause next stage is a bit slower
  173. WAIT 1
  174. "y"
  175. DOWN
  176. "2"
  177. WAIT 1
  178. ENTER
  179. "X"             ; set decomp
  180. DOWN * 10
  181. WAIT  1
  182. "256"
  183. WAIT  1
  184. ENTER        ; start generating decomp julia
  185. WAIT  15
  186. "CL"            ; interrupt to change to blues.map
  187. WAIT  1
  188. "BLUES"
  189. WAIT  1
  190. ENTER
  191. ESC
  192. CALCWAIT    ; finish the calculation
  193. WAIT 1
  194. "CL"            ; change to neon.map
  195. WAIT .6
  196. "NEON"
  197. WAIT .6
  198. ENTER
  199. WAIT 1
  200. "-"             ; start cycling, speed it up
  201. UP * 60
  202. WAIT 15     ; view cycling of decomp a while
  203. ESC
  204. WAIT  1
  205. INSERT
  206. WAIT 3
  207. ;;
  208. ;; lorenz, mandel biomorph
  209. ;; ok to start a copy of file from here for testing
  210. "tlor"          ; select lorenz
  211. WAIT 1
  212. ENTER
  213. WAIT 1
  214. ENTER
  215. WAIT .6     ; default video
  216. ENTER
  217. WAIT .6
  218. ENTER
  219. WAIT 30     ; view lorenz for a while
  220. ESC
  221. WAIT 3
  222. DOWN        ; select type from menu
  223. DOWN * 3
  224. WAIT .6
  225. ENTER
  226. "mandel"
  227. WAIT 1
  228. ENTER
  229. WAIT .6
  230. ENTER
  231. WAIT 3        ; start generating image
  232. "X"             ; interrupt to x options, enable biomorph
  233. WAIT 1
  234. UP *3
  235. WAIT .6
  236. "0"
  237. WAIT .8
  238. ENTER
  239. CALCWAIT
  240. WAIT 6        ; view biomorph for a while
  241. "M"
  242. WAIT 2
  243. F1
  244. WAIT 6        ; view command help, 2 pages for a while
  245. PAGEDOWN
  246. WAIT 6
  247. ESC
  248. INSERT
  249. WAIT 3
  250. ;;
  251. ;; mandel, zoom in stages to a mini lake, using btm along the way,
  252. ;;   3d transforms
  253. ;; ok to start a copy of file from here for testing
  254. "TMAND"
  255. WAIT .6
  256. ENTER
  257. WAIT .6
  258. ENTER
  259. WAIT .6     ; default video
  260. ENTER
  261. WAIT .6
  262. ENTER
  263. CALCWAIT    ; default mandel
  264. WAIT 1.5
  265. PAGEUP * 30    ; zoom into it
  266. WAIT .2
  267. 1145 * 2
  268. 1115 * 4
  269. UP * 2
  270. WAIT  1
  271. ENTER        ; 1st zoom of mandel
  272. WAIT  7
  273. "X"             ; interrupt with change to btm
  274. WAIT  1
  275. "B"
  276. WAIT  1
  277. ENTER
  278. CALCWAIT
  279. WAIT 1.5
  280. PAGEUP * 29    ; zoom in
  281. WAIT  1
  282. RIGHT * 7
  283. UP * 11
  284. WAIT 1.4
  285. ENTER        ; 2nd zoom of mandel
  286. WAIT 5
  287. "V"             ; interrupt to use view window to speed things up
  288. WAIT 1
  289. "Y"
  290. DOWN
  291. "2"
  292. WAIT 1
  293. ENTER
  294. CALCWAIT    ; 2nd zoom of mandel
  295. WAIT 2.5
  296. PAGEUP * 27    ; zoom in
  297. WAIT .2
  298. RIGHT * 17
  299. WAIT .2
  300. DOWN * 10
  301. WAIT 1.4
  302. ENTER        ; calc 3rd zoom of mandel
  303. WAIT 9
  304. "X"             ; interrupt with increase of maxiter & log palette
  305. WAIT .5
  306. DOWN * 2
  307. "1500"
  308. DOWN * 6
  309. WAIT .2
  310. "1"
  311. WAIT 1.4
  312. ENTER        ; calc 3rd zoom
  313. WAIT 12
  314. "CL"            ; interrupt to change to firestrm.map
  315. WAIT 1
  316. "FIRE"
  317. WAIT 1.5
  318. ENTER
  319. WAIT .3
  320. ESC
  321. CALCWAIT    ; finish 3rd zoom
  322. WAIT 1
  323. PAGEUP * 25    ; zoom in
  324. WAIT .2
  325. LEFT * 25
  326. UP * 13
  327. WAIT .5
  328. PAGEUP
  329. WAIT .5
  330. ENTER        ; calc 4th zoom
  331. CALCWAIT
  332. WAIT 1
  333. PAGEUP * 19    ; zoom in
  334. WAIT .4
  335. 1144 * 13
  336. WAIT .3
  337. PAGEUP * 3
  338. DOWN * 6
  339. WAIT .1
  340. LEFT * 5
  341. 1144
  342. WAIT 1
  343. ENTER        ; calc 5th zoom, final image
  344. WAIT 1
  345. "X"             ; change to solid guessing and inside=0
  346. "G"
  347. DOWN * 3
  348. WAIT .4
  349. "0"
  350. WAIT 1
  351. ENTER
  352. "V"             ; increase size of view window for final image
  353. DOWN
  354. WAIT .4
  355. "1.5"
  356. WAIT .6
  357. ENTER
  358. WAIT 20
  359. TAB        ; interrupt to show tab display
  360. WAIT 6
  361. ESC
  362. CALCWAIT
  363. PAGEUP        ; adjust image a tad (clip some jags at bottom and right)
  364. UP
  365. LEFT
  366. ENTER
  367. CALCWAIT
  368. WAIT 3        ; show final image for a while
  369. "x"             ; save image for following 3d demo
  370. DOWN * 5
  371. WAIT .5
  372. "demotmp1"
  373. DOWN
  374. "y"
  375. WAIT .5
  376. ENTER
  377. "m"
  378. WAIT .6
  379. RIGHT
  380. DOWN
  381. WAIT 1
  382. ENTER
  383. CALCWAIT
  384. WAIT 2        ; now it has been saved
  385. "-"
  386. UP * 30     ; finished mini-lake, cycle colors a while
  387. WAIT 17
  388. F5        ; now random colors for a while
  389. UP * 25
  390. WAIT 23
  391. ESC
  392. ;;
  393. ;; 3d transforms using mini-mandel
  394. ;; ok to start a copy of file from here for testing IF demotmp1 already exists
  395. "r"             ; display demotmp1 to show input image and to move it over
  396. "demotmp1"
  397. WAIT .6
  398. ENTER
  399. WAIT 2.5
  400. ENTER
  401. CALCWAIT
  402. WAIT 1
  403. PAGEUP
  404. RIGHT * 18
  405. ENTER
  406. CALCWAIT
  407. "s"             ; save demotmp2
  408. CALCWAIT
  409. WAIT 1.5
  410. "m"             ; invoke 3d from the menu
  411. WAIT .6
  412. RIGHT
  413. DOWN * 3
  414. WAIT 1
  415. ENTER
  416. "demotmp1"
  417. WAIT .8
  418. ENTER
  419. WAIT 1
  420. ENTER
  421. WAIT 1
  422. ENTER        ; 1st 3d parms screen
  423. WAIT .5
  424. DOWN * 2
  425. WAIT 1
  426. ENTER        ; 2nd parms, interpolated colors chosen
  427. WAIT .5
  428. DOWN * 5
  429. "10"
  430. DOWN
  431. "70"
  432. WAIT 1
  433. ENTER        ; 3rd 3d parms, roughness 10, clip 70
  434. CALCWAIT    ; transform
  435. WAIT 3
  436. "-"             ; color cycle
  437. DOWN * 65
  438. WAIT 30
  439. ESC
  440. "m"             ; back to menu, pick 3d again
  441. WAIT .6
  442. RIGHT
  443. DOWN * 3
  444. WAIT 1
  445. ENTER
  446. "demotmp2"
  447. WAIT .6
  448. ENTER
  449. WAIT .7
  450. ENTER
  451. WAIT .5
  452. DOWN * 3
  453. "y"
  454. WAIT .8
  455. ENTER        ; 1st 3d parms, spherical selected
  456. WAIT 1
  457. ENTER        ; 2nd 3d parms, default interpolate colors
  458. WAIT .5
  459. DOWN * 5
  460. "40"
  461. WAIT .8
  462. ENTER        ; 3rd 3d parms, roughness 40
  463. CALCWAIT    ; transform
  464. WAIT 2
  465. "-"             ; cycle colors
  466. F9
  467. DOWN * 90
  468. WAIT 20
  469. "+"             ; cycle colors the other way
  470. F8
  471. DOWN * 90
  472. WAIT 32
  473. ESC
  474. INSERT
  475. WAIT 3
  476. ;;
  477. ;; gingerbreadman, lsystem color snowflake
  478. ;; ok to start a copy of file from here for testing
  479. "TGINGERB"
  480. WAIT .8
  481. ENTER
  482. WAIT .8
  483. ENTER
  484. WAIT .6
  485. ENTER
  486. WAIT .6
  487. ENTER
  488. WAIT 32     ; view gingerbreadman a while (it goes forever)
  489. F4        ; go to video mode 640x480x16 for lsystem demo
  490. ESC        ; interrupt resumed gingerbreadman
  491. WAIT .8
  492. "T"             ; start lsys sequence
  493. WAIT .6
  494. "LSYS"
  495. WAIT .8
  496. ENTER
  497. WAIT 2
  498. "SNOWFLAKEC"
  499. WAIT 2
  500. ENTER
  501. WAIT .6
  502. "3"
  503. WAIT 1
  504. ENTER
  505. CALCWAIT
  506. WAIT 2
  507. "-"
  508. F2
  509. WAIT 22     ; view snowflake cycling
  510. ESC
  511. INSERT
  512. WAIT 3
  513. ;;
  514. ;; bunch of types with default parameters just to show variety
  515. ;; ok to start a copy of file from here for testing
  516. "T"
  517. WAIT .5
  518. "JULIA"
  519. WAIT .8
  520. ENTER
  521. ".3"
  522. DOWN
  523. ".6"
  524. WAIT .8
  525. ENTER
  526. WAIT .6
  527. ENTER
  528. WAIT .6
  529. ENTER
  530. CALCWAIT
  531. WAIT 5
  532. "T"
  533. WAIT .5
  534. "LAMBDAFN"
  535. WAIT .8
  536. ENTER
  537. WAIT .8
  538. ENTER
  539. CALCWAIT
  540. WAIT 7
  541. "T"
  542. WAIT .5
  543. "SIER"
  544. WAIT .8
  545. ENTER
  546. WAIT .8
  547. ENTER
  548. CALCWAIT
  549. WAIT 4
  550. "T"
  551. WAIT .5
  552. "SPIDER"
  553. WAIT .8
  554. ENTER
  555. WAIT .8
  556. ENTER
  557. PAGEUP * 3
  558. ENTER
  559. CALCWAIT
  560. WAIT 5
  561. "-"
  562. F6
  563. WAIT 20
  564. ESC
  565. "T"
  566. WAIT .5
  567. "UNITY"
  568. WAIT .8
  569. ENTER
  570. WAIT .8
  571. ENTER
  572. CALCWAIT
  573. WAIT 6
  574. "V"     ; set view to 1/2 size for the rest, they're a bit slower
  575. WAIT 1
  576. "Y"
  577. DOWN
  578. "2"
  579. WAIT 1
  580. ENTER
  581. "T"
  582. WAIT .5
  583. "NEWTON"
  584. WAIT .8
  585. ENTER
  586. WAIT .8
  587. "4"
  588. WAIT .8
  589. ENTER
  590. CALCWAIT
  591. WAIT 6
  592. "T"
  593. WAIT .5
  594. "BARNSLEYJ2"
  595. WAIT .8
  596. ENTER
  597. WAIT .8
  598. ENTER
  599. CALCWAIT
  600. WAIT 5
  601. "T"
  602. WAIT .5
  603. "FORMUL"
  604. WAIT .8
  605. ENTER
  606. WAIT 1
  607. "WINEG"
  608. WAIT 2
  609. ENTER
  610. WAIT .8
  611. ENTER
  612. PAGEUP * 9
  613. LEFT * 23
  614. ENTER
  615. CALCWAIT
  616. WAIT 5
  617. "-"
  618. F4
  619. WAIT 27
  620. ESC
  621. ;;
  622. ;; back around again
  623. INSERT
  624. WAIT 10     ; credits for a while
  625. GOTO Restart    ; start over again
  626.