home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / hc1_2_x / debatech.sit / Briefs / background_2706.txt < prev    next >
Text File  |  1990-04-21  |  6KB  |  305 lines
  1. -- background: 2706 from stack: in
  2. -- bmap block id: 3274
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 00
  10. -- high flags: 4007
  11. -- rect: left=129 top=102 right=342 bottom=406
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 3
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: brief
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 00
  24. -- high flags: 0002
  25. -- rect: left=129 top=39 right=57 bottom=406
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 0
  29. -- font id: 3
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: case
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 00
  38. -- high flags: 0007
  39. -- rect: left=129 top=62 right=96 bottom=406
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 0
  43. -- font id: 3
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: title
  48.  
  49.  
  50. -- part 4 (button)
  51. -- low flags: 00
  52. -- high flags: 2004
  53. -- rect: left=450 top=46 right=86 bottom=489
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 1005 / 1005
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: createBrief
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   global briefMaking
  65.   global gBrief
  66.   ask "What case does this brief cover?"
  67.   put it into field case
  68.   ask "Give the brief a title:"
  69.   put it into field title
  70.   answer "Start making the brief?" with "Cancel" or "Yes"
  71.   if it is "Cancel" then exit to HyperCard
  72.   put "true" into briefMaking
  73.   show bkgnd button disableBriefMaking
  74.   hide bkgnd button createBrief
  75.   put empty into gBrief
  76.   answer "Brief making now enabled."
  77. end mouseUp
  78.  
  79.  
  80.  
  81. -- part 5 (button)
  82. -- low flags: 00
  83. -- high flags: 2004
  84. -- rect: left=27 top=47 right=85 bottom=68
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 29114 / 29114
  87. -- text alignment: 1
  88. -- font id: 0
  89. -- text size: 12
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: Home
  93. ----- HyperTalk script -----
  94. on mouseUp
  95.   pop card
  96. end mouseUp
  97.  
  98.  
  99.  
  100. -- part 6 (button)
  101. -- low flags: 00
  102. -- high flags: 2004
  103. -- rect: left=28 top=108 right=147 bottom=67
  104. -- title width / last selected line: 0
  105. -- icon id / first selected line: 2002 / 2002
  106. -- text alignment: 1
  107. -- font id: 0
  108. -- text size: 12
  109. -- style flags: 0
  110. -- line height: 16
  111. -- part name: coach
  112. ----- HyperTalk script -----
  113. on mouseUp
  114.   go to card id 3060 of stack "Debate Coach"
  115. end mouseUp
  116.  
  117.  
  118.  
  119.  
  120. -- part 9 (button)
  121. -- low flags: 00
  122. -- high flags: 2004
  123. -- rect: left=450 top=107 right=149 bottom=491
  124. -- title width / last selected line: 0
  125. -- icon id / first selected line: 2043 / 2043
  126. -- text alignment: 1
  127. -- font id: 0
  128. -- text size: 12
  129. -- style flags: 0
  130. -- line height: 16
  131. -- part name: newBrief
  132. ----- HyperTalk script -----
  133. on mouseUp
  134.   doMenu "New Card"
  135. end mouseUp
  136.  
  137.  
  138.  
  139. -- part 10 (button)
  140. -- low flags: 00
  141. -- high flags: 2004
  142. -- rect: left=450 top=169 right=208 bottom=492
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 16706 / 16706
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: formatFile
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   TeX
  154. end mouseUp
  155.  
  156.  
  157.  
  158. -- part 11 (button)
  159. -- low flags: 00
  160. -- high flags: 2004
  161. -- rect: left=26 top=172 right=205 bottom=70
  162. -- title width / last selected line: 0
  163. -- icon id / first selected line: 30393 / 30393
  164. -- text alignment: 1
  165. -- font id: 0
  166. -- text size: 12
  167. -- style flags: 0
  168. -- line height: 16
  169. -- part name: newcase
  170. ----- HyperTalk script -----
  171. on mouseUp
  172.   put the short name of this stack into stackName
  173.   oxBox stackName
  174. end mouseUp
  175.  
  176.  
  177.  
  178. -- part 12 (button)
  179. -- low flags: 80
  180. -- high flags: 2004
  181. -- rect: left=452 top=231 right=265 bottom=490
  182. -- title width / last selected line: 0
  183. -- icon id / first selected line: 17137 / 17137
  184. -- text alignment: 1
  185. -- font id: 0
  186. -- text size: 12
  187. -- style flags: 0
  188. -- line height: 16
  189. -- part name: disableBriefMaking
  190. ----- HyperTalk script -----
  191. on mouseUp
  192.   global briefMaking
  193.   put "false" into briefMaking
  194.   hide bkgnd button disableBriefMaking
  195.   show bkgnd button createBrief
  196.   answer "Brief making now disabled."
  197. end mouseUp
  198.  
  199.  
  200.  
  201. -- part 13 (button)
  202. -- low flags: 00
  203. -- high flags: 2004
  204. -- rect: left=450 top=291 right=332 bottom=491
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 1898 / 1898
  207. -- text alignment: 1
  208. -- font id: 0
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: writeBrief
  213. ----- HyperTalk script -----
  214. on mouseUp
  215.   global gBrief
  216.   get first word of field brief
  217.   if it is not empty then
  218.     answer "Really erase old brief" with "OK" or "Cancel"
  219.   end if
  220.   if it is "Cancel" then exit to HyperCard
  221.   put gBrief into field brief
  222.   put empty into gBrief
  223. end mouseUp
  224.  
  225.  
  226.  
  227. -- part 14 (button)
  228. -- low flags: 00
  229. -- high flags: 2004
  230. -- rect: left=28 top=226 right=262 bottom=68
  231. -- title width / last selected line: 0
  232. -- icon id / first selected line: 23078 / 23078
  233. -- text alignment: 1
  234. -- font id: 0
  235. -- text size: 12
  236. -- style flags: 0
  237. -- line height: 16
  238. -- part name: New Button
  239. ----- HyperTalk script -----
  240. on mouseUp
  241.   push card
  242.   go to card id 5535 of stack "Debate Coach"
  243. end mouseUp
  244.  
  245.  
  246.  
  247.  
  248. -- part 15 (button)
  249. -- low flags: 00
  250. -- high flags: 2000
  251. -- rect: left=466 top=1 right=31 bottom=511
  252. -- title width / last selected line: 0
  253. -- icon id / first selected line: 32650 / 32650
  254. -- text alignment: 1
  255. -- font id: 0
  256. -- text size: 12
  257. -- style flags: 0
  258. -- line height: 16
  259. -- part name: New Button
  260. ----- HyperTalk script -----
  261. on mouseUp
  262.   go to next card
  263. end mouseUp
  264.  
  265.  
  266.  
  267. -- part 16 (button)
  268. -- low flags: 00
  269. -- high flags: 2000
  270. -- rect: left=1 top=1 right=31 bottom=46
  271. -- title width / last selected line: 0
  272. -- icon id / first selected line: 1016 / 1016
  273. -- text alignment: 1
  274. -- font id: 0
  275. -- text size: 12
  276. -- style flags: 0
  277. -- line height: 16
  278. -- part name: New Button
  279. ----- HyperTalk script -----
  280. on mouseUp
  281.   go to previous card
  282. end mouseUp
  283.  
  284.  
  285.  
  286. -- part 17 (button)
  287. -- low flags: 00
  288. -- high flags: 0004
  289. -- rect: left=28 top=286 right=324 bottom=69
  290. -- title width / last selected line: 0
  291. -- icon id / first selected line: 8538 / 8538
  292. -- text alignment: 1
  293. -- font id: 0
  294. -- text size: 12
  295. -- style flags: 0
  296. -- line height: 16
  297. -- part name: search
  298. ----- HyperTalk script -----
  299. on mouseUp
  300.   put the short name of this stack into stackName
  301.   put the selection into chosenText
  302.   search stackName, chosenText
  303. end mouseUp
  304.  
  305.