function    script  abs {
    .@v = atoi(getarg(0));
    .@mask = .@v >> 4 * 8 - 1;
    return ((.@v + .@mask) ^ .@mask);
}