home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / hc / icecware.sit / ICEC-Ware / card_6564.txt < prev    next >
Encoding:
Text File  |  1988-10-30  |  10.8 KB  |  464 lines
  1. -- card: 6564 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. Equipotential Surfaces
  413.  
  414. -- part contents for card part 7
  415. ----- text -----
  416. Equipotential Surfaces is a simulation of static electric fields in the vicinity of charged conductors. The user may set up an arbitrary arrangement of conductors, consisting of strips on a rectangular grid (25 X 25 grid points) perpendicular to the plane of the screen. Each conductor must be set to one of five values of electric potential (-10, -5, 0, +5, +10 volts). The program than computes the potential at the remaining points on the grid, using the relaxation method for approximating solutions to LaPlace's equation. It displays equipotential lines in the vicinity of the conductors. This program has been used in the third semester introductory physics course for science and engineering majors at Carnegie Mellon.
  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. Trowbridge, David
  433.  
  434.  
  435. -- part contents for card part 8
  436. ----- text -----
  437. DEPARTMENT:  Center for Design of Educational Computing
  438. DESCRIPTORS:  electric fields, equipotentials, electromagnetism
  439. DOCUMENTATION:  For suggestions about classroom usage, contact the author.
  440. VERSION:  October 30, 1987
  441. LANGUAGE:  C
  442. RESTRICTIONS:  Educational Use (Copyrighted)
  443. AVAILABILITY:  in the ICEC-Ware collection
  444. FILE:  relax
  445.  
  446.  
  447. -- part contents for card part 20
  448. ----- text -----
  449. Physics
  450. Simulation for Learning
  451. Andrew, 7/86 version (BE1, wm)
  452.  
  453.  
  454. -- part contents for card part 35
  455. ----- text -----
  456. Physics
  457.  
  458. -- part contents for card part 37
  459. ----- text -----
  460. Simulation for Learning
  461.  
  462. -- part contents for card part 36
  463. ----- text -----
  464. Andrew, 7/86 version (BE1, wm)