home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / hc / icecware.sit / ICEC-Ware / card_5219.txt < prev    next >
Encoding:
Text File  |  1988-10-30  |  11.0 KB  |  461 lines
  1. -- card: 5219 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3958
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   set scroll of card field abstract to 0
  9.   set scroll of card field other to 0
  10.   set visible of card field helper to false
  11. end openCard
  12.  
  13.  
  14.  
  15. -- part 6 (field)
  16. -- low flags: 01
  17. -- high flags: 0000
  18. -- rect: left=32 top=0 right=32 bottom=480
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 1
  22. -- font id: 3
  23. -- text size: 12
  24. -- style flags: 12288
  25. -- line height: 16
  26. -- part name: title
  27.  
  28.  
  29. -- part 7 (field)
  30. -- low flags: 01
  31. -- high flags: 0007
  32. -- rect: left=0 top=110 right=282 bottom=512
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 0
  36. -- font id: 3
  37. -- text size: 9
  38. -- style flags: 0
  39. -- line height: 12
  40. -- part name: abstract
  41.  
  42.  
  43. -- part 8 (field)
  44. -- low flags: 01
  45. -- high flags: 0007
  46. -- rect: left=0 top=282 right=342 bottom=512
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 0
  50. -- font id: 3
  51. -- text size: 9
  52. -- style flags: 0
  53. -- line height: 12
  54. -- part name: other
  55.  
  56.  
  57. -- part 18 (field)
  58. -- low flags: 01
  59. -- high flags: 0000
  60. -- rect: left=0 top=32 right=50 bottom=512
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 0 / 0
  63. -- text alignment: 1
  64. -- font id: 3
  65. -- text size: 9
  66. -- style flags: 0
  67. -- line height: 12
  68. -- part name: author
  69.  
  70.  
  71. -- part 19 (field)
  72. -- low flags: 01
  73. -- high flags: 0000
  74. -- rect: left=0 top=50 right=68 bottom=512
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 1
  78. -- font id: 3
  79. -- text size: 9
  80. -- style flags: 512
  81. -- line height: 12
  82. -- part name: organization
  83.  
  84.  
  85. -- part 20 (field)
  86. -- low flags: 01
  87. -- high flags: 0000
  88. -- rect: left=0 top=68 right=110 bottom=512
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 0
  92. -- font id: 3
  93. -- text size: 9
  94. -- style flags: 256
  95. -- line height: 12
  96. -- part name: clickable
  97. ----- HyperTalk script -----
  98. on hit
  99.   put rect of card field clickable into it
  100.   put item 2 of it into top
  101.   put item 2 of the clickLoc into it
  102.   put round((it-top+6)/12) into it
  103.   put line it of card field clickable into lookFor
  104.   if lookFor is in card field "system" of card 2 then
  105.     put "system choice" into card field status of card 2
  106.     put return after card field status of card 2
  107.     put lookFor after card field status of card 2
  108.     put return after card field status of card 2
  109.     put card field "title" after card field status of card 2
  110.     set visible of card field menuList of card 2 to false
  111.     go to card 2
  112.   end if
  113.   if lookFor is in card field "type" of card 2 then
  114.     put "type choice" into card field status of card 2
  115.     put return after card field status of card 2
  116.     put lookFor after card field status of card 2
  117.     put return after card field status of card 2
  118.     put card field "title" after card field status of card 2
  119.     set visible of card field menuList of card 2 to false
  120.     go to card 2
  121.   end if
  122.   if lookFor is in card field "discipline" of card 2 then
  123.     put "discipline choice" into card field status of card 2
  124.     put return after card field status of card 2
  125.     put lookFor after card field status of card 2
  126.     put return after card field status of card 2
  127.     put card field "title" after card field status of card 2
  128.     set visible of card field menuList of card 2 to false
  129.     go to card 2
  130.   end if
  131. end hit
  132.  
  133.  
  134.  
  135. -- part 23 (field)
  136. -- low flags: 81
  137. -- high flags: 0004
  138. -- rect: left=50 top=150 right=325 bottom=462
  139. -- title width / last selected line: 0
  140. -- icon id / first selected line: 0 / 0
  141. -- text alignment: 1
  142. -- font id: 3
  143. -- text size: 18
  144. -- style flags: 256
  145. -- line height: 24
  146. -- part name: helper
  147.  
  148.  
  149. -- part 24 (button)
  150. -- low flags: 00
  151. -- high flags: 2000
  152. -- rect: left=0 top=68 right=80 bottom=512
  153. -- title width / last selected line: 0
  154. -- icon id / first selected line: 0 / 0
  155. -- text alignment: 1
  156. -- font id: 0
  157. -- text size: 12
  158. -- style flags: 0
  159. -- line height: 16
  160. -- part name: New Button
  161. ----- HyperTalk script -----
  162. on mouseUp
  163.   send hit to card field clickable
  164. end mouseUp
  165.  
  166.  
  167.  
  168. -- part 25 (button)
  169. -- low flags: 00
  170. -- high flags: 2000
  171. -- rect: left=0 top=80 right=92 bottom=512
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 1
  175. -- font id: 0
  176. -- text size: 12
  177. -- style flags: 0
  178. -- line height: 16
  179. -- part name: New Button
  180. ----- HyperTalk script -----
  181. on mouseUp
  182.   send hit to card field clickable
  183. end mouseUp
  184.  
  185.  
  186.  
  187. -- part 26 (button)
  188. -- low flags: 00
  189. -- high flags: 2000
  190. -- rect: left=0 top=92 right=104 bottom=512
  191. -- title width / last selected line: 0
  192. -- icon id / first selected line: 0 / 0
  193. -- text alignment: 1
  194. -- font id: 0
  195. -- text size: 12
  196. -- style flags: 0
  197. -- line height: 16
  198. -- part name: New Button
  199. ----- HyperTalk script -----
  200. on mouseUp
  201.   send hit to card field clickable
  202. end mouseUp
  203.  
  204.  
  205.  
  206. -- part 27 (button)
  207. -- low flags: 80
  208. -- high flags: 2000
  209. -- rect: left=206 top=140 right=162 bottom=306
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 0 / 0
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: New Button
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   send hit to card field clickable
  221. end mouseUp
  222.  
  223.  
  224.  
  225. -- part 28 (button)
  226. -- low flags: 80
  227. -- high flags: 2000
  228. -- rect: left=206 top=140 right=162 bottom=306
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 1
  232. -- font id: 0
  233. -- text size: 12
  234. -- style flags: 0
  235. -- line height: 16
  236. -- part name: New Button
  237. ----- HyperTalk script -----
  238. on mouseUp
  239.   send hit to card field clickable
  240. end mouseUp
  241.  
  242.  
  243.  
  244. -- part 29 (button)
  245. -- low flags: 80
  246. -- high flags: 2000
  247. -- rect: left=206 top=140 right=162 bottom=306
  248. -- title width / last selected line: 0
  249. -- icon id / first selected line: 0 / 0
  250. -- text alignment: 1
  251. -- font id: 0
  252. -- text size: 12
  253. -- style flags: 0
  254. -- line height: 16
  255. -- part name: New Button
  256. ----- HyperTalk script -----
  257. on mouseUp
  258.   send hit to card field clickable
  259. end mouseUp
  260.  
  261.  
  262.  
  263. -- part 30 (button)
  264. -- low flags: 80
  265. -- high flags: 2000
  266. -- rect: left=206 top=140 right=162 bottom=306
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 0 / 0
  269. -- text alignment: 1
  270. -- font id: 0
  271. -- text size: 12
  272. -- style flags: 0
  273. -- line height: 16
  274. -- part name: New Button
  275. ----- HyperTalk script -----
  276. on mouseUp
  277.   send hit to card field clickable
  278. end mouseUp
  279.  
  280.  
  281.  
  282. -- part 31 (button)
  283. -- low flags: 80
  284. -- high flags: 2000
  285. -- rect: left=206 top=140 right=162 bottom=306
  286. -- title width / last selected line: 0
  287. -- icon id / first selected line: 0 / 0
  288. -- text alignment: 1
  289. -- font id: 0
  290. -- text size: 12
  291. -- style flags: 0
  292. -- line height: 16
  293. -- part name: New Button
  294. ----- HyperTalk script -----
  295. on mouseUp
  296.   send hit to card field clickable
  297. end mouseUp
  298.  
  299.  
  300.  
  301. -- part 32 (button)
  302. -- low flags: 80
  303. -- high flags: 2000
  304. -- rect: left=206 top=140 right=162 bottom=306
  305. -- title width / last selected line: 0
  306. -- icon id / first selected line: 0 / 0
  307. -- text alignment: 1
  308. -- font id: 0
  309. -- text size: 12
  310. -- style flags: 0
  311. -- line height: 16
  312. -- part name: New Button
  313. ----- HyperTalk script -----
  314. on mouseUp
  315.   send hit to card field clickable
  316. end mouseUp
  317.  
  318.  
  319.  
  320. -- part 33 (button)
  321. -- low flags: 00
  322. -- high flags: 2003
  323. -- rect: left=0 top=0 right=32 bottom=32
  324. -- title width / last selected line: 0
  325. -- icon id / first selected line: 32488 / 32488
  326. -- text alignment: 1
  327. -- font id: 0
  328. -- text size: 12
  329. -- style flags: 0
  330. -- line height: 16
  331. -- part name: New Button
  332. ----- HyperTalk script -----
  333. on mouseUp
  334.   put return after card field status of card 2
  335.   put card field "title" into line 3 of card field status of card 2
  336.   go to card 2
  337. end mouseUp
  338.  
  339.  
  340.  
  341. -- part 34 (button)
  342. -- low flags: 00
  343. -- high flags: 2003
  344. -- rect: left=480 top=0 right=32 bottom=512
  345. -- title width / last selected line: 0
  346. -- icon id / first selected line: 25002 / 25002
  347. -- text alignment: 1
  348. -- font id: 0
  349. -- text size: 12
  350. -- style flags: 0
  351. -- line height: 16
  352. -- part name: Help
  353. ----- HyperTalk script -----
  354. on mouseDown
  355.   set visible of card field helper to true
  356. end mouseDown
  357.  
  358. on mouseUp
  359.   set visible of card field helper to false
  360. end mouseUp
  361.  
  362. on mouseLeave
  363.   set visible of card field helper to false
  364. end mouseLeave
  365.  
  366.  
  367.  
  368. -- part 35 (field)
  369. -- low flags: 81
  370. -- high flags: 0000
  371. -- rect: left=156 top=120 right=205 bottom=356
  372. -- title width / last selected line: 0
  373. -- icon id / first selected line: 0 / 0
  374. -- text alignment: 0
  375. -- font id: 3
  376. -- text size: 12
  377. -- style flags: 0
  378. -- line height: 16
  379. -- part name: discipline
  380.  
  381.  
  382. -- part 36 (field)
  383. -- low flags: 81
  384. -- high flags: 0000
  385. -- rect: left=156 top=120 right=205 bottom=356
  386. -- title width / last selected line: 0
  387. -- icon id / first selected line: 0 / 0
  388. -- text alignment: 0
  389. -- font id: 3
  390. -- text size: 12
  391. -- style flags: 0
  392. -- line height: 16
  393. -- part name: system
  394.  
  395.  
  396. -- part 37 (field)
  397. -- low flags: 81
  398. -- high flags: 0000
  399. -- rect: left=156 top=120 right=205 bottom=356
  400. -- title width / last selected line: 0
  401. -- icon id / first selected line: 0 / 0
  402. -- text alignment: 0
  403. -- font id: 3
  404. -- text size: 12
  405. -- style flags: 0
  406. -- line height: 16
  407. -- part name: type
  408.  
  409.  
  410. -- part contents for card part 6
  411. ----- text -----
  412. Great American History Machine
  413.  
  414. -- part contents for card part 7
  415. ----- text -----
  416. The Great American History Machine is an Andrew-based application which enables the user to explore social, economic and political data on maps. The current version uses the 1840 to 1870 census data and the 1844 to 1860 presidential elections returns by county for the United States. The software enables the user to create variables from these data and display those variables by means of shading patterns on maps. Zooming and panning are supported, and the program permits the user to examine maps of two variables side by side. It is also possible to compare a map of a variable with a map of contemporary physical features -- railroads, canals, cities, rivers, etc. A special feature allows the user to reset the numeric cutpoints between different shading patterns and thus "tease out" further information from the map. Plans to include essentially all the US census and presidential election data by counties for 1840 to the present are going forward. The historical data cannot be supplied to institutions which are not members of the Inter-university Consortium for Political and Social Research.
  417.  
  418. -- part contents for card part 19
  419. ----- text -----
  420. Carnegie Mellon University
  421.  
  422. -- part contents for card part 23
  423. ----- text -----
  424.  
  425. Click "UP-ARROW" for previous menu
  426.  
  427. Click any BOLD-FACE phrase for a listing of entries sharing that
  428. property or attribute
  429.  
  430. -- part contents for card part 18
  431. ----- text -----
  432. Miller, David
  433.  
  434.  
  435. -- part contents for card part 8
  436. ----- text -----
  437. DEPARTMENT:  History
  438. LANGUAGE:  C
  439. RESTRICTIONS:  Educational Use (Copyrighted)
  440. AVAILABILITY:  in ICEC-Ware collection (w/o ICPSR data)
  441. FILE:  gahm
  442.  
  443.  
  444. -- part contents for card part 20
  445. ----- text -----
  446. History
  447. Discipline Tool
  448. Andrew, 7/86 version (BE1, wm)
  449.  
  450.  
  451. -- part contents for card part 35
  452. ----- text -----
  453. History
  454.  
  455. -- part contents for card part 37
  456. ----- text -----
  457. Discipline Tool
  458.  
  459. -- part contents for card part 36
  460. ----- text -----
  461. Andrew, 7/86 version (BE1, wm)