home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / hc1_2_x / macsunrs.sit / MacSUNRISE.Striche1 / background_2646.txt < prev    next >
Text File  |  1990-07-20  |  5KB  |  233 lines
  1. -- background: 2646 from stack: in.Striche1
  2. -- bmap block id: 4802
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: K&K.Striche
  6. ----- HyperTalk script -----
  7. on idle
  8.   get word 1 of the short name of bkgnd btn id 27
  9.   convert it to seconds
  10.   put it into Startzeit
  11.   put the seconds into Jetztzeit
  12.   put (Jetztzeit - Startzeit) into Arbeitszeit
  13.   put trunc (Arbeitszeit / 3600) into Stunde
  14.   if Stunde < 10 then put "0"&Stunde into Stunde
  15.   put Arbeitszeit - Stunde*3600 into Arbeitszeit
  16.   put trunc (Arbeitszeit / 60) into Minute
  17.   if Minute < 10 then put "0"&Minute into Minute
  18.   set the name of bkgnd btn id 28 to Stunde&":"&Minute
  19.   set the name of bkgnd btn id 29 to the date
  20.   pass idle
  21. end idle
  22.  
  23. on arrowKey whichKey
  24.   if whichKey is "left" then click at the loc of bkgnd button "vorheriges Kanji"
  25.   if whichKey is "right" then click at the loc of bkgnd button "n├ñchstes Kanji"
  26. end arrowKey
  27.  
  28.  
  29. -- part 1 (field)
  30. -- low flags: 80
  31. -- high flags: 0004
  32. -- rect: left=7 top=196 right=298 bottom=267
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 65535
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 8192
  39. -- line height: 16
  40. -- part name: Lesungen
  41.  
  42.  
  43. -- part 2 (field)
  44. -- low flags: 80
  45. -- high flags: 2007
  46. -- rect: left=269 top=46 right=336 bottom=508
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 0
  50. -- font id: 0
  51. -- text size: 12
  52. -- style flags: 8192
  53. -- line height: 20
  54. -- part name: åbersetzung
  55.  
  56.  
  57. -- part 12 (field)
  58. -- low flags: 80
  59. -- high flags: 0000
  60. -- rect: left=269 top=325 right=337 bottom=281
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 0 / 0
  63. -- text alignment: 0
  64. -- font id: 3
  65. -- text size: 12
  66. -- style flags: 0
  67. -- line height: 16
  68. -- part name: Lesungensichtbar
  69.  
  70.  
  71. -- part 14 (field)
  72. -- low flags: 80
  73. -- high flags: 0000
  74. -- rect: left=285 top=325 right=337 bottom=297
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 0
  78. -- font id: 3
  79. -- text size: 12
  80. -- style flags: 0
  81. -- line height: 16
  82. -- part name: åbersetzungsichtbar
  83.  
  84.  
  85. -- part 21 (field)
  86. -- low flags: 01
  87. -- high flags: 0002
  88. -- rect: left=94 top=224 right=241 bottom=143
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: KK
  97.  
  98.  
  99. -- part 22 (field)
  100. -- low flags: 01
  101. -- high flags: 0002
  102. -- rect: left=94 top=243 right=260 bottom=143
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 0 / 0
  105. -- text alignment: 1
  106. -- font id: 3
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: JIS
  111.  
  112.  
  113. -- part 23 (button)
  114. -- low flags: 00
  115. -- high flags: 2003
  116. -- rect: left=12 top=276 right=321 bottom=178
  117. -- title width / last selected line: 0
  118. -- icon id / first selected line: 14953 / 14953
  119. -- text alignment: 1
  120. -- font id: 0
  121. -- text size: 12
  122. -- style flags: 0
  123. -- line height: 16
  124. -- part name: zurƒck
  125. ----- HyperTalk script -----
  126. on mouseUp
  127.   pop card
  128. end mouseUp
  129.  
  130.  
  131.  
  132.  
  133. -- part 25 (button)
  134. -- low flags: 00
  135. -- high flags: 2003
  136. -- rect: left=145 top=209 right=275 bottom=178
  137. -- title width / last selected line: 0
  138. -- icon id / first selected line: 22308 / 22308
  139. -- text alignment: 1
  140. -- font id: 0
  141. -- text size: 12
  142. -- style flags: 0
  143. -- line height: 16
  144. -- part name: nèchstes Kanji
  145. ----- HyperTalk script -----
  146. on mouseUp
  147.   visual effect wipe down
  148.   go next
  149. end mouseUp
  150.  
  151.  
  152.  
  153. -- part 27 (button)
  154. -- low flags: 00
  155. -- high flags: 8000
  156. -- rect: left=96 top=4 right=20 bottom=191
  157. -- title width / last selected line: 0
  158. -- icon id / first selected line: 0 / 0
  159. -- text alignment: 1
  160. -- font id: 0
  161. -- text size: 12
  162. -- style flags: 0
  163. -- line height: 16
  164. -- part name: 17:24
  165.  
  166.  
  167. -- part 28 (button)
  168. -- low flags: 00
  169. -- high flags: 8000
  170. -- rect: left=272 top=4 right=20 bottom=368
  171. -- title width / last selected line: 0
  172. -- icon id / first selected line: 0 / 0
  173. -- text alignment: 1
  174. -- font id: 0
  175. -- text size: 12
  176. -- style flags: 0
  177. -- line height: 16
  178. -- part name: 00:02
  179.  
  180.  
  181. -- part 29 (button)
  182. -- low flags: 00
  183. -- high flags: 8000
  184. -- rect: left=348 top=3 right=19 bottom=505
  185. -- title width / last selected line: 0
  186. -- icon id / first selected line: 0 / 0
  187. -- text alignment: 1
  188. -- font id: 0
  189. -- text size: 12
  190. -- style flags: 0
  191. -- line height: 16
  192. -- part name: 20.7.1990
  193.  
  194.  
  195. -- part 30 (button)
  196. -- low flags: 00
  197. -- high flags: 2000
  198. -- rect: left=448 top=323 right=342 bottom=512
  199. -- title width / last selected line: 0
  200. -- icon id / first selected line: 0 / 0
  201. -- text alignment: 1
  202. -- font id: 0
  203. -- text size: 12
  204. -- style flags: 0
  205. -- line height: 16
  206. -- part name: Beenden
  207. ----- HyperTalk script -----
  208. on mouseUp
  209.   pop card
  210.   click at the loc of bkgnd btn Beenden
  211. end mouseUp
  212.  
  213.  
  214.  
  215. -- part 38 (button)
  216. -- low flags: 00
  217. -- high flags: 2003
  218. -- rect: left=12 top=209 right=275 bottom=46
  219. -- title width / last selected line: 0
  220. -- icon id / first selected line: 19381 / 19381
  221. -- text alignment: 1
  222. -- font id: 0
  223. -- text size: 12
  224. -- style flags: 0
  225. -- line height: 16
  226. -- part name: vorheriges Kanji
  227. ----- HyperTalk script -----
  228. on mouseUp
  229.   visual effect wipe up
  230.   go prev
  231. end mouseUp
  232.  
  233.