home *** CD-ROM | disk | FTP | other *** search
/ Dominator 2 / D2_V20.ISO / general / maths / gcemath / amb / am0901d.cha < prev    next >
Encoding:
Text File  |  1994-07-12  |  7.7 KB  |  279 lines
  1. .SET #8(*3, *)
  2. .LET (*#34=#34+#8*) TEXT
  3. .LET (*#23=#23+#6*)
  4. @LAB:SCREEN34
  5. .SCR 2
  6. .SNA(*(.INF 39)2*)
  7. .LOC 2,46(*34*)
  8. .LOC 5,11(* Newton's Laws continued *)
  9. .INV 5,11,25
  10. .PAU(**)#4
  11. .LOC 8,11(*Momentum (P)  is the product of mass and velocity*)
  12. .LOC 10,31(*P  =  mv*)
  13. .PAU(**)#4
  14. .LOC 12,11(*Assuming that the mass remains constant:*)
  15. .PAU(**)#4
  16. .PUT 232,108 PART=20
  17. .LOC 15,34(*=*)
  18. .PUT 288,108 PART=15
  19. .LOC 15,39(*(mv)*)
  20. .PAU(**)#4
  21. .LOC 15,45(*=  m.*)
  22. .PUT 392,108 PART=14
  23. .PAU(**)#4
  24. .LOC 15,54(*=  ma*)
  25. .PAU(**)#4
  26. .LOC 18,11(*The rate of change of momentum of a body is the product of its*)
  27. .LOC 21,11(*mass and acceleration  ...*)
  28. .PAU(**)#4
  29. .PUT 352,156 PART=20
  30. .LOC 21,49(*=  ma*)
  31. .DRA(*BM340,152C1R94D25L94U25*)
  32. .SPE PLAY (*AM090115.SPE*) WAIT
  33. .PAU(**)#4
  34. .PUT 500,187 PART=4 PSET
  35. .PAU(**)
  36. @LAB:SCREEN35
  37. .SNA(*(.INF 39)2*)
  38. .LOC 2,46(*35*)
  39. .LOC 5,11(*You will remember that  NEWTON'S FIRST LAW  stated:*)
  40. .INV 5,34,20
  41. .PAU(**)#4
  42. .LOC 7,15(*every body remains in a state of rest or uniform motion*)
  43. .LOC 9,15(*in a straight line unless acted on by an external force*)
  44. .PAU(**)#4
  45. .LOC 12,11(* NEWTON'S SECOND LAW  connects the external force acting on*)
  46. .INV 12,11,21
  47. .LOC 14,11(*the body with the change in momentum:*)
  48. .PAU(**)#4
  49. .LOC 16,15(*the rate of change of momentum of a body is proportional*)
  50. .LOC 18,15(*to the externally applied force and it takes place along*)
  51. .LOC 20,20(*the line of action of that external force.*)
  52. .SPE PLAY (*AM090116.SPE*) WAIT
  53. .USE PROG=PAUSE.USE
  54. .WIP (4,2)-(23,79) #7
  55. .LOC 2,46(*35a*)
  56. .PAU(**)#2
  57. .LOC 16,11(*As an equation:*)
  58. .PAU(**)#4
  59. .LOC 16,35(*F*)
  60. .PUT 296,120 PART=21
  61. .PUT 323,116 PART=20
  62. .PAU(**)#4
  63. .LOC 16,50(*OR*)
  64. .PAU(**)#4
  65. .LOC 16,59(*F*)
  66. .PUT 488,120 PART=21
  67. .LOC 16,65(*ma*)
  68. .PAU(**)#4
  69. .LOC 19,20(*where:*)
  70. .LOC 19,30(*F is the external force     m is the mass*)
  71. .LOC 21,30(*M is the momentum     a is the acceleration*)
  72. .USE PROG=PAUSE.USE
  73. .WIP (4,2)-(23,79) #10
  74. .LOC 2,46(*35b*)
  75. .PAU(**)#2
  76. .LOC 13,11(*Replacing the proportionality sign,*)
  77. .PUT 366,96 PART=21
  78. .LOC 13,48(*, by a constant, k:*)
  79. .PAU(**)#4
  80. .LOC 16,35(*F  =  k.*)
  81. .PUT 339,116 PART=20
  82. .PAU(**)#4
  83. .LOC 16,50(*OR*)
  84. .PAU(**)#4
  85. .LOC 16,59(*F  =  kma*)
  86. .PAU(**)#4
  87. .LOC 19,14(*What value are we going to attribute to k and what does*)
  88. .LOC 21,22(*this mean for the unit of force for F ?*)
  89. .PAU(**)#4
  90. .PUT 500,187 PART=4 PSET
  91. .PAU(**)
  92. @LAB:SCREEN36
  93. .SNA(*(.INF 39)2*)
  94. .LOC 2,46(*36*)
  95. .LOC 5,37(*F  =  kma*)
  96. .LOC 7,10(*Already we have fixed the unit of mass to be kilograms and the*)
  97. .LOC 9,13(*unit of acceleration to be metres per second per second.*)
  98. .PAU(**)#4
  99. .LOC 12,13(*By international agreement, k is chosen to equal 1 and we*)
  100. .LOC 14,15(*define the unit of force as the  NEWTON     symbol N*)
  101. .PAU(**)#4
  102. .LOC 17,30(*1 Newton  =  1  kgms  *)
  103. .PUT 393,127 PART=12
  104. .PAU(**)#4
  105. .LOC 20,13(*1 Newton would give a mass of 1 kilogram an acceleration*)
  106. .LOC 22,25(*of 1 metre per second per second.*)
  107. .SPE PLAY (*AM090117.SPE*) WAIT
  108. .PUT 500,187 PART=2 PSET
  109. @SIN(*"C"=L:SCREEN37,"c"=L:SCREEN37,"R"=L:-SCREEN34,"r"=L:-SCREEN34*)
  110. @LAB:SCREEN37
  111. .SNA(*(.INF 39)2*)
  112. .LOC 2,46(*37*)
  113. .LOC 5,11(*An example:*)
  114. .PAU(**)#4
  115. .LOC 7,15(*If a force of 20 N is applied to a body of mass 5 kg,*)
  116. .LOC 9,15(*what is the acceleration of the body ?*)
  117. .USE PROG=PAUSE.USE
  118. .LOC 12,15(*By Newton's Second Law        F  =  ma*)
  119. .PAU(**)#4
  120. .LOC 14,44(*20  =  5 x a*)
  121. .PAU(**)#4
  122. .LOC 16,36(*ยป*)
  123. .LOC 16,45(*a  =  4*)
  124. .PAU(**)#4
  125. .LOC 18,30(*Acceleration is  4 ms  *)
  126. .PUT 401,135 PART=12
  127. .DRA (*C1BM232,144M415,144*)
  128. .PAU(**)#4
  129. .PUT 500,187 PART=4 PSET
  130. .PAU(**)
  131. @LAB:SCREEN38
  132. .SCR 2
  133. .SNA(*(.INF 39)2*)
  134. .LOC 2,46(*38*)
  135. .LOC 5,13(* NEWTON'S THIRD LAW  comes from the observation of bodies*)
  136. .INV 5,13,20
  137. .LOC 7,13(*exerting forces on one another:*)
  138. .PAU(**)#4
  139. .PUT 104,64 PART=7
  140. .PUT 304,64 PART=7
  141. .DRA (*C1BM100,80M131,80NH2NG2BM332,80M301,80NE2NF2*)
  142. .LOC 9,49(*balls roll towards each other*)
  143. .MOV (104,96)-(179,96) STEPS=75
  144. .MOV (304,96)-(204,96) STEPS=100
  145. .LOC 13,49(*collide*)
  146. .PAU(**)#2
  147. .LOC 17,49(*balls roll away from each other*)
  148. .MOV (179,128)-(104,128) STEPS=75
  149. .MOV (204,128)-(304,128) STEPS=100
  150. .DRA (*C1BM132,124M100,124NE2NF2BM300,124M331,124NH2NG2*)
  151. .SPE PLAY (*AM090118.SPE*) WAIT
  152. .PAU(**)#4
  153. .PUT 104,156 PART=8
  154. .LOC 22,21(*Earth*)
  155. .DRA (*C1BM153,166M210,166NH2NG2*)
  156. .PUT 289,161 PART=7
  157. .LOC 22,41(*Moon*)
  158. .DRA (*C1BM288,166M250,166NE2NF2*)
  159. .LOC 21,49(*exert a gravitational*)
  160. .LOC 22,49(*attraction to each other*)
  161. .USE PROG=PAUSE.USE
  162. .LOC 11,13(*                                 *)
  163. .WIP (4,2)-(23,79) #7
  164. .LOC 2,46(*38a*)
  165. .PAU(**)#2
  166. .DRA(*BM160,140C1R56D16L56U16*)
  167. .LOC 19,23(*Box*)
  168. .DRA(*C1BM100,184U27R176D27L16U20L144D20L16*)
  169. .PAI CENTRE=(108,180) COLOUR=1 BOUND=1
  170. .LOC 22,22(*Table*)
  171. .LOC 18,49(*the box exerts a downward*)
  172. .LOC 19,49(*force upon the table ...*)
  173. .PAU(**)#2
  174. .LOC 21,49(*the table exerts an*)
  175. .LOC 22,49(*upward force upon the box*)
  176. .PAU(**)#4
  177. .PUT 500,187 PART=4 PSET
  178. .PAU(**)
  179. @LAB:SCREEN39
  180. .SCR 0
  181. .SNA(*(.INF 39)0*)
  182. .COL 7,0
  183. .LOC 2,46(*39*)
  184. .COL 12,0
  185. .LOC 6,11(*NEWTON'S THIRD LAW*)
  186. .COL 14,0
  187. .LOC 6,31(*states:*)
  188. .COL 11,0
  189. .LOC 9,20(*Action and Reaction are equal and opposite*)
  190. .SPE PLAY (*AM090119.SPE*) WAIT
  191. .PAU(**)#4
  192. .COL 10,0
  193. .LOC 13,11(*This means that when two bodies exert a force upon each other*)
  194. .LOC 15,13(*then these forces are*)
  195. .COL 12,0
  196. .LOC 15,36(*EQUAL*)
  197. .COL 10,0
  198. .LOC 15,43(*and*)
  199. .COL 12,0
  200. .LOC 15,48(*OPPOSITE IN DIRECTION*)
  201. .PAU(**)#4
  202. .COL 14,0
  203. .LOC 18,11(*The two balls exert equal and opposite forces upon each other*)
  204. .PAU(**)#4
  205. .LOC 20,9(*The Earth and Moon exert equal and opposite forces on each other*)
  206. .PAU(**)#4
  207. .LOC 22,8(*The box and the table exert equal and opposite forces on each other*)
  208. .COL 0,3
  209. .LOC 24,64(*C / R >>*)
  210. @SIN(*"C"=L:SCREEN40,"c"=L:SCREEN40,"R"=L:-SCREEN38,"r"=L:-SCREEN38*)
  211. @LAB:SCREEN40
  212. .SCR 2
  213. .SNA(*(.INF 39)2*)
  214. .LOC 2,46(*40*)
  215. .LOC 5,13(*Gravitational Force*)
  216. .DRA(*BM84,28C1R172D15L172U15*)
  217. .PAU(**)#4
  218. .LOC 8,10(*By simple observation, we know that any body released above the*)
  219. .LOC 10,10(*Earth falls to the Earth under the force which we call  GRAVITY*)
  220. .PAU(**)#4
  221. .LOC 13,11(*In our earlier example, the Moon does not do this because it is*)
  222. .LOC 15,12(*in an orbit and the gravitational force maintains this orbit*)
  223. .LOC 17,12(*rather than the Moon flying off into space.   [ Module 8.5 ]*)
  224. .PAU(**)#4
  225. .LOC 20,11(*The acceleration due to this gravitational force at sea-level*)
  226. .LOC 22,15(*has been measured and it is approximately   9.81 ms  *)
  227. .PUT 521,167 PART=12
  228. .SPE PLAY (*AM090120.SPE*) WAIT
  229. .PAU(**)#4
  230. .PUT 500,187 PART=4 PSET
  231. .PAU(**)
  232. @LAB:SCREEN41
  233. .COL 0,0
  234. .SCR 1
  235. .SNA(*(.INF 39)1*)
  236. .COL 8
  237. .PAL 1
  238. .LOC 2,23(*41*)
  239. .LOC 7,5(*At this point in the full version*)
  240. .LOC 9,9(*of the program the user is*)
  241. .LOC 11,5(*requested to complete a worksheet*)
  242. .LOC 13,6(*for this section, entering the*)
  243. .LOC 15,7(*results via the keyboard onto*)
  244. .LOC 17,9(*the computer for checking.*)
  245. .PAU(**)#4
  246. .LOC 19,6(*Type C <enter> to continue.*)
  247. .SET #10(*SCREEN42*)
  248. .USE PROG=PRESSC.USE
  249. @LAB:SCREEN42
  250. .COL 0,0
  251. .SCR 1
  252. .SNA(*(.INF 39)1*)
  253. .COL 8
  254. .PAL 1
  255. .LOC 2,23(*42*)
  256. .LOC 6,4(*However, in this demonstration the*)
  257. .LOC 8,7(*results checking facility is*)
  258. .LOC 10,4(*unavailable, so you will continue to*)
  259. .LOC 12,6(*the next phase of the tutorial.*)
  260. .PAU(**)#4
  261. .LOC 18,6(*Type C <enter> to continue.*)
  262. .SET #10(*SCREEN43Z*)
  263. .USE PROG=PRESSC.USE
  264. @LAB:SCREEN43Z
  265. .WIP (20,2)-(23,39)
  266. .PAU(**) #4
  267. .COL 1,
  268. .LOC 14,8(*Do you wish to:*)
  269. .COL 2,
  270. .LOC 16,4(*(C) continue to the next Part*)
  271. .LOC 18,4(*(R) return to the Contents page*)
  272. .COL 1,
  273. .LOC 20,8(*Please type C or R >*)
  274. .COL 3,
  275. @SIN (*"C"=C:AM0901E.CHA,"c"=C:AM0901E.CHA,"R"=L:BACKB,"r"=L:BACKB*)
  276. @LAB:BACKB
  277. @GOB:SCREEN09 PROG=AM0901
  278.  
  279.