home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / hc / animalye.sit / AnimalYear / card_2977.txt < prev    next >
Encoding:
Text File  |  1988-11-14  |  15.7 KB  |  782 lines
  1. -- card: 2977 from stack: in
  2. -- bmap block id: 4301
  3. -- flags: 0000
  4. -- background id: 2657
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=367 top=278 right=307 bottom=485
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Enter Your Age
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   Ask "Please give me your age"
  23.   Put it into card field Human
  24.   Delete Word 1 of Card Field AY2
  25.   Delete Word 1 of Card Field AY3
  26. end mouseUp
  27.  
  28.  
  29.  
  30. -- part 20 (button)
  31. -- low flags: 00
  32. -- high flags: A003
  33. -- rect: left=26 top=96 right=118 bottom=102
  34. -- title width / last selected line: 0
  35. -- icon id / first selected line: 0 / 0
  36. -- text alignment: 1
  37. -- font id: 0
  38. -- text size: 12
  39. -- style flags: 0
  40. -- line height: 16
  41. -- part name: Tortoise
  42. ----- HyperTalk script -----
  43. on mouseUp
  44.   Put Round(Card Field Human*(75/100))into Card Field AY3
  45.   Put "Tortoise" into Card Field AY2
  46.  
  47. end mouseUp
  48.  
  49.  
  50.  
  51. -- part 21 (button)
  52. -- low flags: 00
  53. -- high flags: A003
  54. -- rect: left=26 top=120 right=142 bottom=102
  55. -- title width / last selected line: 0
  56. -- icon id / first selected line: 0 / 0
  57. -- text alignment: 1
  58. -- font id: 0
  59. -- text size: 12
  60. -- style flags: 0
  61. -- line height: 16
  62. -- part name: Ostrich
  63. ----- HyperTalk script -----
  64. on mouseUp
  65.   Put Round(Card Field Human*(75/70))into Card Field AY3
  66.   Put "Ostrich" into Card Field AY2
  67. end mouseUp
  68.  
  69.  
  70.  
  71. -- part 22 (button)
  72. -- low flags: 00
  73. -- high flags: A003
  74. -- rect: left=26 top=144 right=166 bottom=102
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 1
  78. -- font id: 0
  79. -- text size: 12
  80. -- style flags: 0
  81. -- line height: 16
  82. -- part name: Alligator
  83. ----- HyperTalk script -----
  84. on mouseUp
  85.   Put Round(Card Field Human*(75/56))into Card Field AY3
  86.   Put "Alligator" into Card Field AY2
  87. end mouseUp
  88.  
  89.  
  90.  
  91. -- part 23 (button)
  92. -- low flags: 00
  93. -- high flags: A003
  94. -- rect: left=26 top=168 right=190 bottom=102
  95. -- title width / last selected line: 0
  96. -- icon id / first selected line: 0 / 0
  97. -- text alignment: 1
  98. -- font id: 0
  99. -- text size: 12
  100. -- style flags: 0
  101. -- line height: 16
  102. -- part name: Elephant
  103. ----- HyperTalk script -----
  104. on mouseUp
  105.   Put Round(Card Field Human*(75/48))into Card Field AY3
  106.  
  107.   Put "Elephant" into Card Field AY2
  108. end mouseUp
  109.  
  110.  
  111.  
  112. -- part 24 (button)
  113. -- low flags: 00
  114. -- high flags: A003
  115. -- rect: left=26 top=192 right=214 bottom=102
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 1
  119. -- font id: 0
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: Eagle
  124. ----- HyperTalk script -----
  125. on mouseUp
  126.   Put Round(Card Field Human*(75/35))into Card Field AY3
  127.   Put "Eagle" into Card Field AY2
  128. end mouseUp
  129.  
  130.  
  131.  
  132. -- part 25 (button)
  133. -- low flags: 00
  134. -- high flags: A003
  135. -- rect: left=26 top=216 right=238 bottom=102
  136. -- title width / last selected line: 0
  137. -- icon id / first selected line: 0 / 0
  138. -- text alignment: 1
  139. -- font id: 0
  140. -- text size: 12
  141. -- style flags: 0
  142. -- line height: 16
  143. -- part name: Horse
  144. ----- HyperTalk script -----
  145. on mouseUp
  146.   Put Round(Card Field Human*(75/23))into Card Field AY3
  147.   Put "Horse" into Card Field AY2
  148. end mouseUp
  149.  
  150.  
  151.  
  152. -- part 26 (button)
  153. -- low flags: 00
  154. -- high flags: A003
  155. -- rect: left=26 top=240 right=262 bottom=102
  156. -- title width / last selected line: 0
  157. -- icon id / first selected line: 0 / 0
  158. -- text alignment: 1
  159. -- font id: 0
  160. -- text size: 12
  161. -- style flags: 0
  162. -- line height: 16
  163. -- part name: Giraffe
  164. ----- HyperTalk script -----
  165. on mouseUp
  166.   Put Round(Card Field Human*(75/22))into Card Field AY3
  167.   Put "Giraffe" into Card Field AY2
  168. end mouseUp
  169.  
  170.  
  171.  
  172. -- part 27 (button)
  173. -- low flags: 00
  174. -- high flags: A003
  175. -- rect: left=26 top=264 right=286 bottom=102
  176. -- title width / last selected line: 0
  177. -- icon id / first selected line: 0 / 0
  178. -- text alignment: 1
  179. -- font id: 0
  180. -- text size: 12
  181. -- style flags: 0
  182. -- line height: 16
  183. -- part name: Lion
  184. ----- HyperTalk script -----
  185. on mouseUp
  186.   Put Round(Card Field Human*(75/18))into Card Field AY3
  187.   Put "Lion" into Card Field AY2
  188. end mouseUp
  189.  
  190.  
  191.  
  192. -- part 31 (button)
  193. -- low flags: 00
  194. -- high flags: A003
  195. -- rect: left=104 top=96 right=118 bottom=180
  196. -- title width / last selected line: 0
  197. -- icon id / first selected line: 0 / 0
  198. -- text alignment: 1
  199. -- font id: 0
  200. -- text size: 12
  201. -- style flags: 0
  202. -- line height: 16
  203. -- part name: Kangaroo
  204. ----- HyperTalk script -----
  205. on mouseUp
  206.   Put Round(Card Field Human*(75/15))into Card Field AY3
  207.   Put "Kangaroo" into Card Field AY2
  208. end mouseUp
  209.  
  210.  
  211.  
  212. -- part 33 (button)
  213. -- low flags: 00
  214. -- high flags: A003
  215. -- rect: left=104 top=120 right=142 bottom=180
  216. -- title width / last selected line: 0
  217. -- icon id / first selected line: 0 / 0
  218. -- text alignment: 1
  219. -- font id: 0
  220. -- text size: 12
  221. -- style flags: 0
  222. -- line height: 16
  223. -- part name: Dog
  224. ----- HyperTalk script -----
  225. on mouseUp
  226.   Put Round(Card Field Human*(75/14))into Card Field AY3
  227.   Put "Dog" into Card Field AY2
  228. end mouseUp
  229.  
  230.  
  231.  
  232. -- part 35 (button)
  233. -- low flags: 00
  234. -- high flags: A003
  235. -- rect: left=105 top=168 right=190 bottom=181
  236. -- title width / last selected line: 0
  237. -- icon id / first selected line: 0 / 0
  238. -- text alignment: 1
  239. -- font id: 0
  240. -- text size: 12
  241. -- style flags: 0
  242. -- line height: 16
  243. -- part name: Canary
  244. ----- HyperTalk script -----
  245. on mouseUp
  246.   Put Round(Card Field Human*(75/12))into Card Field AY3
  247.   Put "Canary" into Card Field AY2
  248. end mouseUp
  249.  
  250.  
  251.  
  252. -- part 36 (button)
  253. -- low flags: 00
  254. -- high flags: A003
  255. -- rect: left=105 top=192 right=214 bottom=181
  256. -- title width / last selected line: 0
  257. -- icon id / first selected line: 0 / 0
  258. -- text alignment: 1
  259. -- font id: 0
  260. -- text size: 12
  261. -- style flags: 0
  262. -- line height: 16
  263. -- part name: Rabbit
  264. ----- HyperTalk script -----
  265. on mouseUp
  266.   Put Round(Card Field Human*(75/6))into Card Field AY3
  267.   Put "Rabbit" into Card Field AY2
  268. end mouseUp
  269.  
  270.  
  271.  
  272. -- part 37 (button)
  273. -- low flags: 00
  274. -- high flags: A003
  275. -- rect: left=105 top=216 right=238 bottom=181
  276. -- title width / last selected line: 0
  277. -- icon id / first selected line: 0 / 0
  278. -- text alignment: 1
  279. -- font id: 0
  280. -- text size: 12
  281. -- style flags: 0
  282. -- line height: 16
  283. -- part name: Goldfish
  284. ----- HyperTalk script -----
  285. on mouseUp
  286.   Put Round(Card Field Human*(75/5))into Card Field AY3
  287.   Put "Goldfish" into Card Field AY2
  288. end mouseUp
  289.  
  290.  
  291.  
  292. -- part 38 (button)
  293. -- low flags: 00
  294. -- high flags: A003
  295. -- rect: left=105 top=240 right=262 bottom=181
  296. -- title width / last selected line: 0
  297. -- icon id / first selected line: 0 / 0
  298. -- text alignment: 1
  299. -- font id: 0
  300. -- text size: 12
  301. -- style flags: 0
  302. -- line height: 16
  303. -- part name: Hamster
  304. ----- HyperTalk script -----
  305. on mouseUp
  306.   Put Round(Card Field Human*(75/3))into Card Field AY3
  307.   Put "Hamster" into Card Field AY2
  308. end mouseUp
  309.  
  310.  
  311.  
  312. -- part 39 (button)
  313. -- low flags: 00
  314. -- high flags: A003
  315. -- rect: left=105 top=264 right=286 bottom=181
  316. -- title width / last selected line: 0
  317. -- icon id / first selected line: 0 / 0
  318. -- text alignment: 1
  319. -- font id: 0
  320. -- text size: 12
  321. -- style flags: 0
  322. -- line height: 16
  323. -- part name: Mayfly
  324. ----- HyperTalk script -----
  325. on mouseUp
  326.   Put Round(Card Field Human*75)into Card Field AY3
  327.   Put "Mayfly" into Card Field AY2
  328. end mouseUp
  329.  
  330.  
  331.  
  332. -- part 40 (button)
  333. -- low flags: 00
  334. -- high flags: A003
  335. -- rect: left=105 top=144 right=166 bottom=181
  336. -- title width / last selected line: 0
  337. -- icon id / first selected line: 0 / 0
  338. -- text alignment: 1
  339. -- font id: 0
  340. -- text size: 12
  341. -- style flags: 0
  342. -- line height: 16
  343. -- part name: Cat
  344. ----- HyperTalk script -----
  345. on mouseUp
  346.   Put Round(Card Field Human*(75/13))into Card Field AY3
  347.   Put "Cat" into Card Field AY2
  348. end mouseUp
  349.  
  350.  
  351.  
  352. -- part 41 (button)
  353. -- low flags: 00
  354. -- high flags: 0000
  355. -- rect: left=453 top=30 right=55 bottom=487
  356. -- title width / last selected line: 0
  357. -- icon id / first selected line: 19678 / 19678
  358. -- text alignment: 1
  359. -- font id: 0
  360. -- text size: 12
  361. -- style flags: 0
  362. -- line height: 16
  363. -- part name: Tell Me...
  364. ----- HyperTalk script -----
  365. on mouseUp
  366.   show card field Mess1
  367. end mouseUp
  368.  
  369.  
  370. -- part 44 (field)
  371. -- low flags: 01
  372. -- high flags: 0000
  373. -- rect: left=240 top=62 right=129 bottom=362
  374. -- title width / last selected line: 0
  375. -- icon id / first selected line: 0 / 0
  376. -- text alignment: 0
  377. -- font id: 2
  378. -- text size: 12
  379. -- style flags: 0
  380. -- line height: 16
  381. -- part name: 
  382.  
  383.  
  384. -- part 43 (field)
  385. -- low flags: 00
  386. -- high flags: 0000
  387. -- rect: left=310 top=77 right=97 bottom=338
  388. -- title width / last selected line: 0
  389. -- icon id / first selected line: 0 / 0
  390. -- text alignment: 0
  391. -- font id: 2
  392. -- text size: 12
  393. -- style flags: 2048
  394. -- line height: 16
  395. -- part name: Human
  396. ----- HyperTalk script -----
  397. On MouseUp
  398.   Delete word 1 of card field AY
  399.   Delete word 1 of card field AY2
  400. End MouseUp
  401.  
  402.  
  403.  
  404. -- part 45 (field)
  405. -- low flags: 00
  406. -- high flags: 0000
  407. -- rect: left=238 top=149 right=186 bottom=337
  408. -- title width / last selected line: 0
  409. -- icon id / first selected line: 0 / 0
  410. -- text alignment: 1
  411. -- font id: 2
  412. -- text size: 12
  413. -- style flags: 256
  414. -- line height: 16
  415. -- part name: AY2
  416.  
  417.  
  418. -- part 46 (field)
  419. -- low flags: 80
  420. -- high flags: 0000
  421. -- rect: left=262 top=127 right=154 bottom=353
  422. -- title width / last selected line: 0
  423. -- icon id / first selected line: 0 / 0
  424. -- text alignment: 0
  425. -- font id: 2
  426. -- text size: 18
  427. -- style flags: 0
  428. -- line height: 24
  429. -- part name: AY
  430. ----- HyperTalk script -----
  431. Round(Field AY)
  432.  
  433.  
  434. -- part 47 (field)
  435. -- low flags: 01
  436. -- high flags: 0000
  437. -- rect: left=272 top=164 right=226 bottom=370
  438. -- title width / last selected line: 0
  439. -- icon id / first selected line: 0 / 0
  440. -- text alignment: 0
  441. -- font id: 3
  442. -- text size: 12
  443. -- style flags: 0
  444. -- line height: 16
  445. -- part name: 
  446.  
  447.  
  448. -- part 42 (field)
  449. -- low flags: 81
  450. -- high flags: 2004
  451. -- rect: left=159 top=72 right=161 bottom=354
  452. -- title width / last selected line: 0
  453. -- icon id / first selected line: 0 / 0
  454. -- text alignment: 0
  455. -- font id: 0
  456. -- text size: 12
  457. -- style flags: 0
  458. -- line height: 16
  459. -- part name: 
  460. ----- HyperTalk script -----
  461. On mouseup
  462.   Hide card field id 42
  463. End mouseup
  464.  
  465.  
  466.  
  467. -- part 48 (button)
  468. -- low flags: 00
  469. -- high flags: A003
  470. -- rect: left=54 top=291 right=313 bottom=154
  471. -- title width / last selected line: 0
  472. -- icon id / first selected line: 0 / 0
  473. -- text alignment: 1
  474. -- font id: 0
  475. -- text size: 12
  476. -- style flags: 0
  477. -- line height: 16
  478. -- part name: Reset
  479. ----- HyperTalk script -----
  480. on mouseUp
  481.   delete Word 1 of  card field AY3
  482.   delete Word 1 of  card field Human
  483.   delete Word 1 of  card field AY2
  484. end mouseUp
  485.  
  486.  
  487.  
  488. -- part 50 (button)
  489. -- low flags: 00
  490. -- high flags: 2000
  491. -- rect: left=354 top=54 right=82 bottom=383
  492. -- title width / last selected line: 0
  493. -- icon id / first selected line: 0 / 0
  494. -- text alignment: 1
  495. -- font id: 0
  496. -- text size: 12
  497. -- style flags: 0
  498. -- line height: 16
  499. -- part name: LightBulb
  500. ----- HyperTalk script -----
  501. on mouseUp
  502.   Show Card Field Mess2
  503.   Show Card Field HelpMess
  504. end mouseUp
  505.  
  506.  
  507.  
  508. -- part 51 (field)
  509. -- low flags: 81
  510. -- high flags: 2004
  511. -- rect: left=7 top=26 right=316 bottom=211
  512. -- title width / last selected line: 0
  513. -- icon id / first selected line: 0 / 0
  514. -- text alignment: 1
  515. -- font id: 2
  516. -- text size: 14
  517. -- style flags: 0
  518. -- line height: 18
  519. -- part name: Mess2
  520. ----- HyperTalk script -----
  521. On MouseUp
  522.   Visual Effect Dissolve slow
  523.   Go to Card 2977
  524.   Hide Card Field Mess2
  525.  
  526. End MouseUp
  527.  
  528.  
  529.  
  530. -- part 52 (field)
  531. -- low flags: 01
  532. -- high flags: 0000
  533. -- rect: left=12 top=0 right=65 bottom=215
  534. -- title width / last selected line: 0
  535. -- icon id / first selected line: 0 / 0
  536. -- text alignment: 0
  537. -- font id: 2
  538. -- text size: 24
  539. -- style flags: 4096
  540. -- line height: 32
  541. -- part name: 
  542.  
  543.  
  544. -- part 53 (field)
  545. -- low flags: 01
  546. -- high flags: 0000
  547. -- rect: left=70 top=46 right=82 bottom=148
  548. -- title width / last selected line: 0
  549. -- icon id / first selected line: 0 / 0
  550. -- text alignment: 0
  551. -- font id: 2
  552. -- text size: 12
  553. -- style flags: 2048
  554. -- line height: 16
  555. -- part name: 
  556.  
  557.  
  558. -- part 54 (button)
  559. -- low flags: 00
  560. -- high flags: 0000
  561. -- rect: left=456 top=54 right=81 bottom=485
  562. -- title width / last selected line: 0
  563. -- icon id / first selected line: 19678 / 19678
  564. -- text alignment: 1
  565. -- font id: 0
  566. -- text size: 12
  567. -- style flags: 0
  568. -- line height: 16
  569. -- part name: Tell Me...
  570. ----- HyperTalk script -----
  571. on mouseUp
  572.   show card field Mess3
  573. end mouseUp
  574.  
  575.  
  576. -- part 55 (field)
  577. -- low flags: 81
  578. -- high flags: 0004
  579. -- rect: left=22 top=154 right=239 bottom=222
  580. -- title width / last selected line: 0
  581. -- icon id / first selected line: 0 / 0
  582. -- text alignment: 0
  583. -- font id: 3
  584. -- text size: 12
  585. -- style flags: 0
  586. -- line height: 16
  587. -- part name: Mess3
  588. ----- HyperTalk script -----
  589. On MouseUp
  590.   Hide Card Field Mess3
  591. End MouseUp
  592.  
  593.  
  594.  
  595. -- part 56 (button)
  596. -- low flags: 00
  597. -- high flags: 0000
  598. -- rect: left=424 top=38 right=65 bottom=453
  599. -- title width / last selected line: 0
  600. -- icon id / first selected line: 19678 / 19678
  601. -- text alignment: 1
  602. -- font id: 0
  603. -- text size: 12
  604. -- style flags: 0
  605. -- line height: 16
  606. -- part name: Tell Me...
  607. ----- HyperTalk script -----
  608. on mouseUp
  609.   show card field Mess4
  610. end mouseUp
  611.  
  612.  
  613. -- part 58 (field)
  614. -- low flags: 01
  615. -- high flags: 0000
  616. -- rect: left=260 top=122 right=195 bottom=377
  617. -- title width / last selected line: 0
  618. -- icon id / first selected line: 0 / 0
  619. -- text alignment: 0
  620. -- font id: 2
  621. -- text size: 24
  622. -- style flags: 0
  623. -- line height: 32
  624. -- part name: AY3
  625.  
  626.  
  627. -- part 49 (field)
  628. -- low flags: 81
  629. -- high flags: 0004
  630. -- rect: left=131 top=49 right=134 bottom=331
  631. -- title width / last selected line: 0
  632. -- icon id / first selected line: 0 / 0
  633. -- text alignment: 0
  634. -- font id: 2
  635. -- text size: 12
  636. -- style flags: 0
  637. -- line height: 16
  638. -- part name: Mess1
  639. ----- HyperTalk script -----
  640. On MouseUp
  641.   Hide card field Mess1
  642. End MouseUp
  643.  
  644.  
  645. -- part 57 (field)
  646. -- low flags: 81
  647. -- high flags: 0004
  648. -- rect: left=261 top=186 right=271 bottom=461
  649. -- title width / last selected line: 0
  650. -- icon id / first selected line: 0 / 0
  651. -- text alignment: 0
  652. -- font id: 3
  653. -- text size: 12
  654. -- style flags: 0
  655. -- line height: 16
  656. -- part name: Mess4
  657. ----- HyperTalk script -----
  658. On MouseUp
  659.   Hide Card Field Mess4
  660. End MouseUp
  661.  
  662.  
  663.  
  664. -- part 60 (field)
  665. -- low flags: 81
  666. -- high flags: 0004
  667. -- rect: left=222 top=135 right=184 bottom=349
  668. -- title width / last selected line: 0
  669. -- icon id / first selected line: 0 / 0
  670. -- text alignment: 0
  671. -- font id: 0
  672. -- text size: 12
  673. -- style flags: 0
  674. -- line height: 16
  675. -- part name: HelpMess
  676. ----- HyperTalk script -----
  677. On MouseUp
  678.   Hide Card Field HelpMess
  679. End MouseUp
  680.  
  681.  
  682.  
  683. -- part 59 (button)
  684. -- low flags: 00
  685. -- high flags: 2000
  686. -- rect: left=419 top=64 right=99 bottom=458
  687. -- title width / last selected line: 0
  688. -- icon id / first selected line: 0 / 0
  689. -- text alignment: 1
  690. -- font id: 0
  691. -- text size: 12
  692. -- style flags: 0
  693. -- line height: 16
  694. -- part name: HOME
  695. ----- HyperTalk script -----
  696. on mouseUp
  697.   go to stack "Home"
  698. end mouseUp
  699.  
  700.  
  701.  
  702.  
  703. -- part contents for card part 42
  704. ----- text -----
  705. All animals are equal, but some animals are more equal than others.
  706.                     George Orwell
  707.  
  708.  
  709. -- part contents for card part 44
  710. ----- text -----
  711.  
  712. If you are
  713.     years old then
  714. you would be
  715.  
  716. -- part contents for card part 47
  717. ----- text -----
  718.    Years
  719.         Old
  720.  
  721. -- part contents for card part 49
  722. ----- text -----
  723.  
  724. All animals are equal, but some animals are more equal than others...    George Orwell
  725.  
  726. -- part contents for card part 52
  727. ----- text -----
  728.  
  729. Animal Years
  730.   
  731.  
  732. -- part contents for card part 53
  733. ----- text -----
  734.  
  735. Calculator
  736.  
  737. -- part contents for card part 51
  738. ----- text -----
  739.  
  740.  
  741.  
  742. Another
  743. Waste of Time
  744. Project
  745. by
  746. Flying Pigs Unlimited
  747. 227 Randolph Street
  748. Bristol, Va. 24201
  749.  
  750. Trying to make the
  751. World a Better Place
  752.  
  753. Click This Box
  754.  
  755. -- part contents for card part 55
  756. ----- text -----
  757.  
  758. The noblest of all dogs is the
  759. hot dog; it feeds the hand that
  760. bites it........
  761.  
  762. -- part contents for card part 57
  763. ----- text -----
  764. If modern civilized man had to kill the animals he eats, the number of vegetarians would rise astronomically.
  765.         Christian Morgenstern
  766.  
  767. -- part contents for card part 46
  768. ----- text -----
  769. 15
  770.  
  771. -- part contents for card part 60
  772. ----- text -----
  773.  
  774.  Save the Whales
  775.  
  776. -- part contents for card part 58
  777. ----- text -----
  778. 0
  779.  
  780. -- part contents for card part 45
  781. ----- text -----
  782. Canary