home *** CD-ROM | disk | FTP | other *** search
/ The Electronic Whole Earth Catalog / ElectronicWholeEarthCatalog.img / CRAFT / card_44722.txt < prev    next >
Text File  |  1989-02-07  |  6KB  |  300 lines
  1. -- card: 44722 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 23900
  5. -- name: 
  6.  
  7.  
  8. -- part 34 (field)
  9. -- low flags: 01
  10. -- high flags: 0004
  11. -- rect: left=46 top=268 right=324 bottom=249
  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: 9
  17. -- style flags: 0
  18. -- line height: 12
  19. -- part name: xrefs
  20. ----- HyperTalk script -----
  21. -- cd fld "xrefs" script
  22. on mouseup
  23.   -- go to xref card depending which line was clicked on
  24.  
  25.   -- calculate which line
  26.   -- doesn't work if word-wrap occurred
  27.   put 1 + (the clickV - the top of target) div the textHeight of target into clickedLine
  28.   if line clickedLine of target is not empty then
  29.     put line clickedLine of field "xrefAccs" into targAcc
  30.     put line clickedLine of field "xrefDest" into targDestID
  31.  
  32.     if targDestID is not empty then
  33.       set cursor to busy
  34.       lookup targDestID, "zoom open"
  35.     else if targAcc is not empty then
  36.       set cursor to busy
  37.       lookup targAcc, "zoom open"
  38.     end if
  39.   end if
  40. end mouseup
  41.  
  42.  
  43.  
  44.  
  45. -- part 35 (field)
  46. -- low flags: 01
  47. -- high flags: 0004
  48. -- rect: left=246 top=268 right=324 bottom=447
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 0
  52. -- font id: 3
  53. -- text size: 9
  54. -- style flags: 0
  55. -- line height: 12
  56. -- part name: xrefs2
  57. ----- HyperTalk script -----
  58. -- cd fld "xrefs2" script
  59. on mouseup
  60.   -- go to xref card depending which line was clicked on
  61.  
  62.   -- calculaate which line
  63.   -- doesn't work if word-wrap occurred
  64.   put 1 + (the clickV - the top of target) div the textHeight of target into clickedLine
  65.   if line clickedLine of target is not empty then
  66.     put line clickedLine of field "xrefAccs2" into targAcc
  67.     put line clickedLine of field "xrefDest2" into targDestID
  68.  
  69.     if targDestID is not empty then
  70.       set cursor to busy
  71.       lookup targDestID, "zoom open"
  72.     else if targAcc is not empty then
  73.       set cursor to busy
  74.       lookup targAcc, "zoom open"
  75.     end if
  76.   end if
  77. end mouseup
  78.  
  79.  
  80.  
  81.  
  82. -- part 36 (field)
  83. -- low flags: 01
  84. -- high flags: 0002
  85. -- rect: left=159 top=260 right=277 bottom=333
  86. -- title width / last selected line: 0
  87. -- icon id / first selected line: 0 / 0
  88. -- text alignment: 0
  89. -- font id: 3
  90. -- text size: 12
  91. -- style flags: 256
  92. -- line height: 16
  93. -- part name: xrefHeading
  94.  
  95.  
  96. -- part 167 (field)
  97. -- low flags: 01
  98. -- high flags: 0004
  99. -- rect: left=46 top=64 right=97 bottom=240
  100. -- title width / last selected line: 0
  101. -- icon id / first selected line: 0 / 0
  102. -- text alignment: 0
  103. -- font id: 3
  104. -- text size: 10
  105. -- style flags: 0
  106. -- line height: 13
  107. -- part name: iMap
  108. ----- HyperTalk script -----
  109. on mouseUp
  110.   lookup "card id 31216", "iris open"
  111. end mouseUp
  112.  
  113.  
  114. -- part 168 (field)
  115. -- low flags: 01
  116. -- high flags: 0004
  117. -- rect: left=46 top=103 right=136 bottom=240
  118. -- title width / last selected line: 0
  119. -- icon id / first selected line: 0 / 0
  120. -- text alignment: 0
  121. -- font id: 3
  122. -- text size: 10
  123. -- style flags: 0
  124. -- line height: 13
  125. -- part name: iMap
  126. ----- HyperTalk script -----
  127. on mouseUp
  128.   lookup "card id 32254", "iris open"
  129. end mouseUp
  130.  
  131.  
  132. -- part 169 (field)
  133. -- low flags: 01
  134. -- high flags: 0004
  135. -- rect: left=46 top=142 right=175 bottom=240
  136. -- title width / last selected line: 0
  137. -- icon id / first selected line: 0 / 0
  138. -- text alignment: 0
  139. -- font id: 3
  140. -- text size: 10
  141. -- style flags: 0
  142. -- line height: 13
  143. -- part name: iMap
  144. ----- HyperTalk script -----
  145. on mouseUp
  146.   lookup "card id 33366", "iris open"
  147. end mouseUp
  148.  
  149.  
  150. -- part 170 (field)
  151. -- low flags: 01
  152. -- high flags: 0004
  153. -- rect: left=46 top=181 right=214 bottom=240
  154. -- title width / last selected line: 0
  155. -- icon id / first selected line: 0 / 0
  156. -- text alignment: 0
  157. -- font id: 3
  158. -- text size: 10
  159. -- style flags: 0
  160. -- line height: 13
  161. -- part name: iMap
  162. ----- HyperTalk script -----
  163. on mouseUp
  164.   lookup "card id 34711", "iris open"
  165. end mouseUp
  166.  
  167.  
  168. -- part 171 (field)
  169. -- low flags: 01
  170. -- high flags: 0004
  171. -- rect: left=46 top=220 right=253 bottom=240
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 0
  175. -- font id: 3
  176. -- text size: 10
  177. -- style flags: 0
  178. -- line height: 13
  179. -- part name: iMap
  180. ----- HyperTalk script -----
  181. on mouseUp
  182.   lookup "card id 120552", "iris open"
  183. end mouseUp
  184.  
  185.  
  186. -- part contents for background part 6
  187. ----- text -----
  188. Item Map
  189.  
  190. -- part contents for background part 1
  191. ----- text -----
  192. Tool Techniques
  193.  
  194. -- part contents for background part 7
  195. ----- text -----
  196. 03022802
  197.  
  198. -- part contents for background part 11
  199. ----- text -----
  200. Menu
  201.  
  202. -- part contents for card part 36
  203. ----- text -----
  204. ≈∏ Cross References ≈∏
  205.  
  206. -- part contents for background part 16
  207. ----- text -----
  208. ‚Ä¢ WHOLE EARTH
  209.  ‚Ä¢ CRAFT
  210.   ‚Ä¢ TOOLS
  211.  
  212. -- part contents for background part 10
  213. ----- text -----
  214.  
  215. 03023223
  216. 03022142
  217. 03104005
  218.  
  219. -- part contents for background part 9
  220. ----- text -----
  221.  
  222. Livos non-toxic finishes
  223. The Eastwood Company
  224. WOODWORKING
  225.  
  226. -- part contents for card part 34
  227. ----- text -----
  228.  
  229. Livos Non-toxic Finishes
  230. The Eastwood Company
  231. WOODWORKING
  232.  
  233. -- part contents for background part 13
  234. ----- text -----
  235.  
  236. 06046559
  237. 06047334
  238.  
  239. -- part contents for background part 12
  240. ----- text -----
  241.  
  242. Woodworking with Kids
  243. WoodenBoat School
  244.  
  245. -- part contents for card part 35
  246. ----- text -----
  247.  
  248. Woodworking with Kids
  249. WoodenBoat School
  250.  
  251. -- part contents for background part 21
  252. ----- text -----
  253.  
  254. card id 16386 of stack CRAFT
  255. card id 29077 of stack CRAFT
  256. card id 51317 of stack CRAFT
  257.  
  258. -- part contents for background part 22
  259. ----- text -----
  260.  
  261. card id 166564 of stack LEARNING
  262. card id 290898 of stack LEARNING
  263.  
  264. -- part contents for card part 167
  265. ----- text -----
  266. The Razor Edge Book of Sharpening
  267.  
  268. -- part contents for card part 168
  269. ----- text -----
  270. Wood Finisher‚Äôs Handbook
  271.  
  272. -- part contents for card part 169
  273. ----- text -----
  274. Welder‚Äôs Handbook
  275.  
  276. -- part contents for card part 170
  277. ----- text -----
  278. Stationary Power Tool Techniques
  279.  
  280. -- part contents for card part 171
  281. ----- text -----
  282. Tools and How To Use Them
  283.  
  284. -- part contents for background part 20
  285. ----- text -----
  286. stack "WHOLE EARTH"
  287. stack "CRAFT"
  288. card id 33900
  289.  
  290. -- part contents for background part 17
  291. ----- text -----
  292. card id 33900
  293.  
  294. -- part contents for background part 18
  295. ----- text -----
  296. card id 44164
  297.  
  298. -- part contents for background part 19
  299. ----- text -----
  300. card id 43917