Gear Rod

Def.ActorFrame {
        OnCommand=cmd(queuecommand,"Rotation");
        RotationCommand=cmd(linear,0.9375;x,16;y,4;--25%
                      linear,0.9375;x,31;y,13;--50%
                      linear,0.9375;x,40;y,28;--25%
                      linear,0.9375;x,44;y,44;--100%
                      linear,0.9375;x,40;y,60;--25%
                      linear,0.9375;x,31;y,75;--50%
                      linear,0.9375;x,16;y,84;--25%
                      linear,0.9375;x,0;y,88;--100%
                      linear,0.9375;x,-16;y,84;--25%
                      linear,0.9375;x,-31;y,75;--50%
                      linear,0.9375;x,-40;y,60;--25%
                      linear,0.9375;x,-44;y,44;--100%
                      linear,0.9375;x,-40;y,28;--25%
                      linear,0.9375;x,-31;y,13;--50%
                      linear,0.9375;x,-16;y,4;--25%
                      linear,0.9375;x,0;y,0;--100%
        queuecommand,"Rotation");--gear=44pxl from center
        LoadActor(THEME:GetPathG("","_Gears/1L-rod_S"))..{
            OnCommand=cmd(x,SCREEN_CENTER_X-200;y,SCREEN_CENTER_Y-6);
        };
        LoadActor(THEME:GetPathG("","_Gears/1L-rod_L"))..{
            OnCommand=cmd(x,SCREEN_CENTER_X+36;y,SCREEN_CENTER_Y-2);
        };
    };