home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / hc / trekstac.sit / TrekStak / card_5724.txt < prev    next >
Text File  |  1988-11-26  |  4KB  |  180 lines
  1. -- card: 5724 from stack: in
  2. -- bmap block id: 5009
  3. -- flags: 0000
  4. -- background id: 2797
  5. -- name: 
  6. ----- HyperTalk script -----
  7. put "Please wait..." into card field "Message"
  8. on idle
  9.   put the long date into card field "Date"
  10.   put the long time into card field "time"
  11.   if the secs < 2643134400 then
  12.     put "Time until the premier:" into card field "Message"
  13.   else put "Time since the premier:" into card field "Message"
  14.   put (2643134400-the secs) into temp
  15.   put trunc(temp/60/60/24) into tdays
  16.   put (temp-(tdays*24*60*60)) into temp
  17.   put trunc(temp/60/60) into thours
  18.   put (temp-(thours*60*60)) into temp
  19.   put trunc(temp/60) into tmin
  20.   put (temp-(tmin*60)) into temp
  21.   put temp into tsec
  22.   put abs(tsec) into card field "seconds"
  23.   put abs(tmin) into card field "minutes"
  24.   put abs(thours) into card field "hours"
  25.   put abs(tdays) into card field "days"
  26.   pass idle
  27. end idle
  28.  
  29.  
  30.  
  31. -- part 1 (button)
  32. -- low flags: 00
  33. -- high flags: 0000
  34. -- rect: left=464 top=303 right=342 bottom=512
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 22308 / 22308
  37. -- text alignment: 1
  38. -- font id: 0
  39. -- text size: 12
  40. -- style flags: 0
  41. -- line height: 16
  42. -- part name: 
  43. ----- HyperTalk script -----
  44. on mouseUp
  45.   visual effect dissolve
  46.   go to next
  47. end mouseUp
  48.  
  49.  
  50.  
  51. -- part 3 (field)
  52. -- low flags: 00
  53. -- high flags: 0001
  54. -- rect: left=6 top=45 right=63 bottom=188
  55. -- title width / last selected line: 0
  56. -- icon id / first selected line: 0 / 0
  57. -- text alignment: 0
  58. -- font id: 3
  59. -- text size: 12
  60. -- style flags: 0
  61. -- line height: 16
  62. -- part name: Date
  63.  
  64.  
  65. -- part 2 (field)
  66. -- low flags: 00
  67. -- high flags: 0001
  68. -- rect: left=58 top=65 right=81 bottom=133
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 0
  72. -- font id: 3
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: Time
  77.  
  78.  
  79. -- part 5 (field)
  80. -- low flags: 00
  81. -- high flags: 2000
  82. -- rect: left=132 top=127 right=149 bottom=169
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 0
  86. -- font id: 3
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: days
  91.  
  92.  
  93. -- part 6 (field)
  94. -- low flags: 00
  95. -- high flags: 2000
  96. -- rect: left=301 top=127 right=149 bottom=335
  97. -- title width / last selected line: 0
  98. -- icon id / first selected line: 0 / 0
  99. -- text alignment: 0
  100. -- font id: 3
  101. -- text size: 12
  102. -- style flags: 0
  103. -- line height: 16
  104. -- part name: Minutes
  105.  
  106.  
  107. -- part 7 (field)
  108. -- low flags: 00
  109. -- high flags: 2000
  110. -- rect: left=393 top=127 right=149 bottom=427
  111. -- title width / last selected line: 0
  112. -- icon id / first selected line: 0 / 0
  113. -- text alignment: 0
  114. -- font id: 3
  115. -- text size: 12
  116. -- style flags: 0
  117. -- line height: 16
  118. -- part name: Seconds
  119.  
  120.  
  121. -- part 8 (field)
  122. -- low flags: 00
  123. -- high flags: 2000
  124. -- rect: left=212 top=127 right=149 bottom=245
  125. -- title width / last selected line: 0
  126. -- icon id / first selected line: 0 / 0
  127. -- text alignment: 0
  128. -- font id: 3
  129. -- text size: 12
  130. -- style flags: 0
  131. -- line height: 16
  132. -- part name: hours
  133.  
  134.  
  135. -- part 10 (field)
  136. -- low flags: 00
  137. -- high flags: 2002
  138. -- rect: left=157 top=93 right=120 bottom=362
  139. -- title width / last selected line: 0
  140. -- icon id / first selected line: 0 / 0
  141. -- text alignment: 1
  142. -- font id: 36
  143. -- text size: 12
  144. -- style flags: 0
  145. -- line height: 16
  146. -- part name: Message
  147.  
  148.  
  149. -- part contents for card part 3
  150. ----- text -----
  151. Saturday, November 26, 1988
  152.  
  153. -- part contents for card part 2
  154. ----- text -----
  155. 8:39:37 AM
  156.  
  157. -- part contents for card part 7
  158. ----- text -----
  159. 37
  160.  
  161. -- part contents for card part 6
  162. ----- text -----
  163. 39
  164.  
  165. -- part contents for card part 5
  166. ----- text -----
  167. 419
  168.  
  169. -- part contents for card part 8
  170. ----- text -----
  171. 12
  172.  
  173. -- part contents for card part 9
  174. ----- text -----
  175.  
  176.  
  177.  
  178. -- part contents for card part 10
  179. ----- text -----
  180. Time since the premier: