UTF-8
1
org.concord.mw2d.activity.AtomContainer
forceStrengthDirection$0.mmlfalsefalse
org.concord.modeler.PageTextBox
350.0
300.0
<html>
<head>
</head>
<body face="Verdana">
<br>
<table cellpadding="0" width="100%" border="0">
<tr>
<th scope="col" colspan="2" align="center">
Explore Strength (Magnitude) of Force
</th>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
 
</td>
</tr>
<tr>
<th scope="row" colspan="2">
magnitude of force shown by
</th>
</tr>
<tr>
<th scope="row" align="right">
<input checked="checked" id="RadioGroup2_0" script="script:mw2d:1:show force on; set line[0].visible off; set line[1].visible off;" type="radio" name="RadioGroup2" value="radio">
</th>
<td>
<p>
length of vector
</p>
</td>
</tr>
<tr>
<th scope="row" align="right">
<input id="RadioGroup2_1" script="script:mw2d:1:show force off; set line[0].visible on; set line[1].visible on;" type="radio" name="RadioGroup2" value="radio">
</th>
<td>
color of vector
</td>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
 
</td>
</tr>
<tr>
<th scope="row" align="right">
<input id="checkbox3" script_selected="script:mw2d:1:set %tracingOn 1" script_deselected="script:mw2d:1:set %tracingOn 0" type="checkbox" name="checkbox3">
</th>
<td>
trace force vectors
</td>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
<input id="button" script="script:mw2d:1:runtask clearVectors;" type="submit" name="button" value="clear trace">
</td>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
 
</td>
</tr>
<tr>
<td colspan="2" scope="row" align="center">
<b>set charge on stationary object</b>
</td>
</tr>
<tr>
<th scope="row" align="right">
<input id="RadioGroup1_0" script="script:mw2d:1:set atom[1].charge 1; set %chargeFactor 3.14159; set atom[0].rx %mouse_x/10;
set atom[0].ry %mouse_y/10;
set %dx (%atom[1].rx - %atom[0].rx)/10;
set %dy (%atom[1].ry - %atom[0].ry)/10;
set %atanX %dx;
set %atanY %dy;
runtask atan2;
set %atomX %atom[0].rx;
set %atomY %atom[0].ry;
set line[0].x1 %atomX;
set line[0].y1 %atomY;
set line[0].x2 cos(%atanAngle)*%vecLen+%atomX;
set line[0].y2 sin(%atanAngle)*%vecLen+%atomY;
set %atomX %atom[1].rx;
set %atomY %atom[1].ry;
set line[1].x1 %atomX;
set line[1].y1 %atomY;
set line[1].x2 cos(%atanAngle)*%vecLen*-1+%atomX;
set line[1].y2 sin(%atanAngle)*%vecLen*-1+%atomY;
select none;
%i++;
set %stampTime (mod(%i,%interval) == 0);
if (%tracingOn and %stampTime);
if (%lineIdx < %number_of_lines);
set line[%lineIdx].coordinates (%line[0].x1, %line[0].y1, %line[0].x2, %line[0].y2);
%lineIdx++;
endif;
endif;
" type="radio" name="RadioGroup1" value="radio">
</th>
<td>
positive
</td>
</tr>
<tr>
<th scope="row" align="right">
<input checked="checked" id="RadioGroup1_1" script="script:mw2d:1:set atom[1].charge -1; set %chargeFactor 0; set atom[0].rx %mouse_x/10;
set atom[0].ry %mouse_y/10;
set %dx (%atom[1].rx - %atom[0].rx)/10;
set %dy (%atom[1].ry - %atom[0].ry)/10;
set %atanX %dx;
set %atanY %dy;
runtask atan2;
set %atomX %atom[0].rx;
set %atomY %atom[0].ry;
set line[0].x1 %atomX;
set line[0].y1 %atomY;
set line[0].x2 cos(%atanAngle)*%vecLen+%atomX;
set line[0].y2 sin(%atanAngle)*%vecLen+%atomY;
set %atomX %atom[1].rx;
set %atomY %atom[1].ry;
set line[1].x1 %atomX;
set line[1].y1 %atomY;
set line[1].x2 cos(%atanAngle)*%vecLen*-1+%atomX;
set line[1].y2 sin(%atanAngle)*%vecLen*-1+%atomY;
select none;
%i++;
set %stampTime (mod(%i,%interval) == 0);
if (%tracingOn and %stampTime);
if (%lineIdx < %number_of_lines);
set line[%lineIdx].coordinates (%line[0].x1, %line[0].y1, %line[0].x2, %line[0].y2);
%lineIdx++;
endif;
endif;
" type="radio" name="RadioGroup1" value="radio">
</th>
<td>
negative
</td>
</tr>
</table>
</body>
</html>
false
1
1
1