/// moveTo(offset_x, offset_y)
if (room != rm_transition) {
    mtXPrev = x;
    mtYPrev = y;
    time += 1;
    if (time > 100000000) time = 0;
    xVelFrac = frac(abs(argument0));
    yVelFrac = frac(abs(argument1));
    xVelInteger = 0;
    yVelInteger = 0;
    if (xVelFrac != 0) {
        if (round(1 / xVelFrac) != 0) xVelInteger = time % round(1 / xVelFrac) == 0;
    }
    if (yVelFrac != 0) {
        if (round(1 / yVelFrac) != 0) yVelInteger = time % round(1 / yVelFrac) == 0;
    }
    xVelInteger += floor(abs(argument0));
    yVelInteger += floor(abs(argument1));
    if (argument0 < 0) xVelInteger *= -1;
    if (argument1 < 0) yVelInteger *= -1;
    xVelInteger = round(xVelInteger);
    yVelInteger = round(yVelInteger);
    if (xVelInteger > 0) {
        for (x = x; x < mtXPrev + xVelInteger; x += 1) {
            if (isCollisionRight(1)) break;
        }
    }
    if (xVelInteger < 0) {
        for (x = x; x > mtXPrev + xVelInteger; x -= 1) {
            if (isCollisionLeft(1)) break;
        }
    }
    if (yVelInteger > 0) {
        for (y = y; y < mtYPrev + yVelInteger; y += 1) {
            if (isCollisionBottom(1)) break;
            if (object_index == oCharacter) {
                if (isCollisionPlatformBottom(1)) break;
            }
        }
    }
    if (yVelInteger < 0) {
        for (y = y; y > mtYPrev + yVelInteger; y -= 1) {
            if (isCollisionTop(1)) break;
        }
    }
} // if (room != rm_transition)