#include #include #include #include #include "pssuby.h" //--------//--------//--------//--------//--------//--------//--------//-------- void main() { init(); viewport(0.2,0.2,0.8,0.8);xyworld(0.0,0.0,1.0,1.0); newpath();linety(2);plot(0.0,0.0,3);plot(0.0,1.0,2);plot(1.0,1.0,2);plot(1.0,0.0,2);closepath();stroke(); newpath();linety(1);wallr(0.2,0.4,0.2,0.2,20);stroke(); newpath();linety(1);spring(0.2,0.3,0.45,0.3,0.05,3);stroke(); newpath();rect(0.45,0.25,0.55,0.35);stroke(); newpath();linety(1);damper(0.8,0.3,0.55,0.3,0.05);stroke(); newpath();linety(1);wallr(0.8,0.2,0.8,0.4,20);stroke(); text(0.32,0.36,"k"); text(0.48,0.36,"m"); text(0.66,0.36,"c"); fin(); }