Algodoo

This seems like a great learning tool for a classroom but I believe it would be helpful to add some notes to aid the teacher or other educator. For example, explain some things to try (such as increase and decrease motor RPM and motor load, and then observe the results by watching what happens to the torque and RPM of the various driven components). I'm sure there are other experiments that you can think of that would be interesting and educational for students.

Nice job so far!

You need to understand a subject before trying to teach others. The Motor HP=2*PI*N*T makes no sense to me. Please provide an example on how this works.

This is my understanding:
RPM = angvel * 60.0 / (2.0 * math.pi) Units:(rad/sec)*(sec/min)/(rad/rev)=rev/min
powerI­nWatts = torqueInNm * angvel
powerInHP = powerInWatts/745.7
motorCurrent = powerInWatts/motorVoltage

Other stuff:
Setting glued to true or false doesn't do anything. Delete that code. It's confusing.
Somebody correct me if I'm wrong but "e.this." is not required in any of your code.
Not every variable needs to be a "scene.my." variable:
someVariable := 123 is seen within the procedure
_someVariable := 123 is seen within the object and needs to be entered in the upper left hand text box of the Script widget before use.
scene.my.someVariable := 123 is seen by all objects
":=" is used to initialize a variable, "=" is used after initialization

P.S. See comments in Inteligent Frog for an example.

Dear Sir,

Thanks

I will understand method correctly and will update the code. Excellent learning in Frog Code guidance.

Thanks

The meter values for this scene are not what I would expect. Algodoo calculates to 7 decimal places yet the motor and drum RPM are off 5%, Amps are off 22%, Power and HP are off 8%.

Paste the following postStep code in a box in your scene to see the expected values.

(e)=>{
P := scene.my.motorangvel * scene.my.torque;
HP := P / 745.7;
RPM := scene.my.motorangvel * 60.0 / (2.0 * math.pi);
Amps := P / 415.0;
DrumRPM := scene.my.drumangvel * 60 / (2.0 * math.pi);
s := "";
s = s + "angVel: " + scene.my.motorangvel + "\
";
s = s + "torque: " + scene.my.torque + "\
";
s = s + "RPM: " + RPM + "\
";
s = s + "Power: " + P + "\
";
s = s + "HP: " + HP + "\
";
s = s + "Amps: " + Amps + "\
";
s = s + "DrumRPM: " + DrumRPM;
text = s
}

I've added a response scene showing the basics.