UTF-8
1
org.concord.mw2d.activity.AtomContainer
forceDirection$0.mmlfalsefalse
org.concord.modeler.PageTextBox
300.0
300.0
<html>
<head>
</head>
<body face="Verdana">
<p>
</p>
<table width="100%" cellpadding="0" border="0">
<tr>
<th scope="col" colspan="2" align="center">
Explore Direction of Forces
</th>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
 
</td>
</tr>
<tr>
<th scope="row" align="right">
<input script_selected="script:mw2d:1:set line[0].visible on;" name="checkbox" type="checkbox" script_deselected="script:mw2d:1:set line[0].visible off;" checked="checked" id="checkbox">
</th>
<td>
show force on draggable object
</td>
</tr>
<tr>
<th scope="row" align="right">
<input script_selected="script:mw2d:1:set line[1].visible on;" name="checkbox2" type="checkbox" script_deselected="script:mw2d:1:set line[1].visible off;" id="checkbox2">
</th>
<td>
show force on stationary object
</td>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
 
</td>
</tr>
<tr>
<th scope="row" align="right">
<input script_selected="script:mw2d:1:set %tracingOn 1" name="checkbox3" type="checkbox" script_deselected="script:mw2d:1:set %tracingOn 0" id="checkbox3">
</th>
<td>
trace force vectors
</td>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
<input name="button" type="submit" script="script:mw2d:1:runtask clearVectors;" value="clear trace" id="button">
</td>
</tr>
<tr>
<th scope="row">
 
</th>
<td>
 
</td>
</tr>
<tr>
<td scope="row" align="center" colspan="2">
<b>set charge on stationary object</b>
</td>
</tr>
<tr>
<th scope="row" align="right">
<input name="RadioGroup1" type="radio" 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;
" value="radio" id="RadioGroup1_0">
</th>
<td>
positive
</td>
</tr>
<tr>
<th scope="row" align="right">
<input name="RadioGroup1" type="radio" 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;
" value="radio" checked="checked" id="RadioGroup1_1">
</th>
<td>
negative
</td>
</tr>
</table>
</body>
</html>
false
1
1