Matthias

/* ======================================================================================//

        DO NOT edit and re-publish this without my permission. I take credits for all of this.

        Thanks to:
        - DracoBlue (for dcmd)
        - The creator or sscanf
        - The creator of strtok
        - WeirdoSport for a real small bug fix :+

        Any suggestions / bugs? Report them at the topic at forum.sa-mp.com!
        Have fun editing objects!

// =====================================================================================*/

#include <a_samp>

#define COLOR_BRIGHTRED 0xFF0000AA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA

#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1

new EditingObject[MAX_PLAYERS], StickedToObject[MAX_PLAYERS];

new newobj, Object, Float:oX, Float:oY, Float:oZ, Float:xR, Float:yR, Float:zR;

public OnFilterScriptInit()
{
        print("\n============================================================");
        print(" [FS] Ingame Object Editor by Matthias aka GTA_Rules loaded.\r");
        print("============================================================\n");
        return 1;
}

public OnFilterScriptExit()
{
        print("\n==============================================================");
        print(" [FS] Ingame Object Editor by Matthias aka GTA_Rules unloaded.");
        print("==============================================================\n");
        return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    new cmd[256], tmp[256];
        new idx;
        cmd = strtok(cmdtext, idx);
        tmp = strtok(cmdtext, idx);

    dcmd(stop,4, cmdtext);
        dcmd(ohelp,5, cmdtext);
    dcmd(stick,5, cmdtext);
    dcmd(abort,5, cmdtext);
    dcmd(moveup,6,cmdtext);
    dcmd(objects,7, cmdtext);
    dcmd(unstick,7, cmdtext);
    dcmd(movedown,8,cmdtext);
    dcmd(moveleft,8, cmdtext);
        dcmd(moveright,9, cmdtext);
    dcmd(addobject,9, cmdtext);
    dcmd(saveobject,10,cmdtext);
    dcmd(moveforwards,12, cmdtext);
    dcmd(movebackwards,13, cmdtext);

        return 0;
}
    dcmd_addobject(playerid,params[])
        {
            if(EditingObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You're already editing an object! Use /saveobject to save it! Or use /abort to cancel this object!");

                new Float:X, Float:Y, Float:Z, str[256];
                if(sscanf(params, "d", newobj)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /addobject <objectid>");
                if(newobj > 15000 || newobj < 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: Invalid objectid!");

                GetPlayerPos(playerid, X, Y, Z);
                EditingObject[playerid] = 1;
                Object = CreateObject(newobj, X+5, Y+5, Z, 0, 0, 0);
        format(str, sizeof str, "Succesfully placed object: %d on the coordinates: %.2f, %.2f, %.2f!", newobj, X, Y, Z);
        SendClientMessage(playerid, COLOR_GREEN, str);
        oX = X+3;
                oY = Y+3;
                oZ = Z;
                return 1;
        }


    dcmd_saveobject(playerid,params[])
        {
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            new string[256], Note[128];
            if(sscanf(params, "z", Note))
            {
                    new File:pos = fopen("objects.txt", io_append);
                    format(string, sizeof string, "CreateObject(%d, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f); //\r\n", newobj, oX, oY, oZ, xR, yR, zR);
                        fwrite(pos, string), fclose(pos);

                        SendClientMessage(playerid, COLOR_GREEN, "Your object has been saved in objects.txt (No note added)");
                        EditingObject[playerid] = 0;
                }
                else
                {
                        new File:pos = fopen("objects.txt", io_append);
                    format(string, sizeof string, "CreateObject(%d, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f); // %s\r\n", newobj, oX, oY, oZ, xR, yR, zR, Note);
                        fwrite(pos, string), fclose(pos);

                        SendClientMessage(playerid, COLOR_GREEN, "Your object has been saved in objects.txt");
                        EditingObject[playerid] = 0;
                }
                return 1;
        }

        dcmd_abort(playerid,params[])
        {
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

                SendClientMessage(playerid, COLOR_GREEN, "* Aborted.");
                EditingObject[playerid] = 0;

                DestroyObject(Object);
                #pragma unused params
                return 1;
        }

        dcmd_stop(playerid,params[])
        {
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

                SendClientMessage(playerid, COLOR_GREEN, "* You have stopped editing your object, you can add a new one with /addobject now.");
                EditingObject[playerid] = 0;

                #pragma unused params
                return 1;
        }

        dcmd_moveup(playerid, params[])
        {
            new ZCoord;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(sscanf(params, "d", ZCoord)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /moveup <Z coord>");
            if(ZCoord < 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: Your input value must be greater than 0!");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            oZ = oZ + ZCoord;
            SetObjectPos(Object, oX, oY, oZ);
            SendClientMessage(playerid, COLOR_GREEN, "Your object has been succesfully moved up.");
            return 1;
        }

        dcmd_movedown(playerid, params[])
        {
            new ZCoord;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(sscanf(params, "d", ZCoord)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /movedown <Z coord>");
            if(ZCoord < 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: Your input value must be greater than 0!");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            oZ = oZ - ZCoord;
            SetObjectPos(Object, oX, oY, oZ);
            SendClientMessage(playerid, COLOR_GREEN, "Your object has been succesfully moved downwards.");
            return 1;
        }

        dcmd_moveleft(playerid, params[])
        {
            new Coord;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(sscanf(params, "d", Coord)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /moveleft <coord>");
        if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            oX = oX + Coord;
            SetObjectPos(Object, oX, oY, oZ);
            SendClientMessage(playerid, COLOR_GREEN, "Your object has been succesfully moved to the left.");
            return 1;
        }

        dcmd_moveforwards(playerid, params[])
        {
            new Coord;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(sscanf(params, "d", Coord)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /movelefty <coord>");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            oY = oY + Coord;
            SetObjectPos(Object, oX, oY, oZ);
            SendClientMessage(playerid, COLOR_GREEN, "Your object has been succesfully moved to the left.");
            return 1;
        }

        dcmd_moveright(playerid, params[])
        {
            new Coord;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(sscanf(params, "d", Coord)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /moveright <coord>");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            oX = oX - Coord;
            SetObjectPos(Object, oX, oY, oZ);
            SendClientMessage(playerid, COLOR_GREEN, "Your object has been succesfully moved to the right.");
            return 1;
        }

        dcmd_movebackwards(playerid, params[])
        {
            new Coord;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(sscanf(params, "d", Coord)) return SendClientMessage(playerid, COLOR_WHITE, "USAGE: /moverighty <coord>");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You can't use commands when you are sticked to an object! Use /unstick first!");

            oY = oY - Coord;
            SetObjectPos(Object, oX, oY, oZ);
            SendClientMessage(playerid, COLOR_GREEN, "Your object has been succesfully moved to the right.");
            return 1;
        }

        dcmd_stick(playerid, params[])
        {
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(StickedToObject[playerid] == 1) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You are already sticked to the object!");

            StickedToObject[playerid] = 1;
                AttachObjectToPlayer( Object, playerid, 2.0, 2.0, 0.0, 0, 1.5, 2 );

            #pragma unused params
            return 1;
        }

        dcmd_unstick(playerid, params[])
        {
            new Float:Pxx, Float:Pyy, Float:Pzz;
            if(EditingObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't editing any objects!");
            if(StickedToObject[playerid] == 0) return SendClientMessage(playerid, COLOR_BRIGHTRED, "ERROR: You aren't sticked to an object!");

        GetPlayerPos(playerid, Pxx, Pyy, Pzz);
                DestroyObject(Object);
                oX = Pxx + 0.1;
                oY = Pyy + 0.1;
                oZ = Pzz + 0.01;
                Object = CreateObject(newobj, oX, oY, oZ, xR, yR, zR);
            StickedToObject[playerid] = 0;
            SendClientMessage(playerid, COLOR_GREEN, "* You have been released from your object!");
                SetObjectPos(Object, oX, oY, oZ);
                SetObjectRot(Object, xR, yR, zR);
            #pragma unused params
            return 1;
        }

        dcmd_ohelp(playerid, params[])
        {
            #pragma unused params
            SendClientMessage(playerid, COLOR_YELLOW, "* Commands:");
            SendClientMessage(playerid, COLOR_GREEN, "/moveup, /movedown, /moveleft, /moveright, /moveforwards, /movebackwards");
            SendClientMessage(playerid, COLOR_GREEN, "/addobject, /saveobject, /abort, /stick, /unstick");
            return 1;
        }

        dcmd_objects(playerid, params[])
        {
            #pragma unused params
            SendClientMessage(playerid, COLOR_YELLOW, "Here are a few usefull weapon ID's.");
            SendClientMessage(playerid, COLOR_GREEN, "321-373: Weapons");
            SendClientMessage(playerid, COLOR_GREEN, "966 - 998: Fences");
            SendClientMessage(playerid, COLOR_GREEN, "3607 - 3609: Houses");
            SendClientMessage(playerid, COLOR_GREEN, "1420 - 1663: Some kind of garbage");
            return 1;
        }


// ===================================================================================================================================//

strtok(const string[], &index)
{
        new length = strlen(string);
        while ((index < length) && (string[index] <= ' '))
        {
                index++;
        }

        new offset = index;
        new result[20];
        while ((index < length) && (string[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
        {
                result[index - offset] = string[index];
                index++;
        }
        result[index - offset] = EOS;
        return result;
}


stock sscanf(string[], format[], {Float,_}:...)
{
        #if defined isnull
                if (isnull(string))
        #else
                if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
        #endif
                {
                        return format[0];
                }
        #pragma tabsize 4
        new
                formatPos = 0,
                stringPos = 0,
                paramPos = 2,
                paramCount = numargs(),
                delim = ' ';
        while (string[stringPos] && string[stringPos] <= ' ')
        {
                stringPos++;
        }
        while (paramPos < paramCount && string[stringPos])
        {
                switch (format[formatPos++])
                {
                        case '\0':
                        {
                                return 0;
                        }
                        case 'i', 'd':
                        {
                                new
                                        neg = 1,
                                        num = 0,
                                        ch = string[stringPos];
                                if (ch == '-')
                                {
                                        neg = -1;
                                        ch = string[++stringPos];
                                }
                                do
                                {
                                        stringPos++;
                                        if ('0' <= ch <= '9')
                                        {
                                                num = (num * 10) + (ch - '0');
                                        }
                                        else
                                        {
                                                return -1;
                                        }
                                }
                                while ((ch = string[stringPos]) > ' ' && ch != delim);
                                setarg(paramPos, 0, num * neg);
                        }
                        case 'h', 'x':
                        {
                                new
                                        num = 0,
                                        ch = string[stringPos];
                                do
                                {
                                        stringPos++;
                                        switch (ch)
                                        {
                                                case 'x', 'X':
                                                {
                                                        num = 0;
                                                        continue;
                                                }
                                                case '0' .. '9':
                                                {
                                                        num = (num << 4) | (ch - '0');
                                                }
                                                case 'a' .. 'f':
                                                {
                                                        num = (num << 4) | (ch - ('a' - 10));
                                                }
                                                case 'A' .. 'F':
                                                {
                                                        num = (num << 4) | (ch - ('A' - 10));
                                                }
                                                default:
                                                {
                                                        return -1;
                                                }
                                        }
                                }
                                while ((ch = string[stringPos]) > ' ' && ch != delim);
                                setarg(paramPos, 0, num);
                        }
                        case 'c':
                        {
                                setarg(paramPos, 0, string[stringPos++]);
                        }
                        case 'f':
                        {
                                setarg(paramPos, 0, _:floatstr(string[stringPos]));
                        }
                        case 'p':
                        {
                                delim = format[formatPos++];
                                continue;
                        }
                        case '\'':
                        {
                                new
                                        end = formatPos - 1,
                                        ch;
                                while ((ch = format[++end]) && ch != '\'') {}
                                if (!ch)
                                {
                                        return -1;
                                }
                                format[end] = '\0';
                                if ((ch = strfind(string, format[formatPos], false, stringPos)) == -1)
                                {
                                        if (format[end + 1])
                                        {
                                                return -1;
                                        }
                                        return 0;
                                }
                                format[end] = '\'';
                                stringPos = ch + (end - formatPos);
                                formatPos = end + 1;
                        }
                        case 'u':
                        {
                                new
                                        end = stringPos - 1,
                                        id = 0,
                                        bool:num = true,
                                        ch;
                                while ((ch = string[++end]) && ch != delim)
                                {
                                        if (num)
                                        {
                                                if ('0' <= ch <= '9')
                                                {
                                                        id = (id * 10) + (ch - '0');
                                                }
                                                else
                                                {
                                                        num = false;
                                                }
                                        }
                                }
                                if (num && IsPlayerConnected(id))
                                {
                                        setarg(paramPos, 0, id);
                                }
                                else
                                {
                                        #if !defined foreach
                                                #define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
                                                #define __SSCANF_FOREACH__
                                        #endif
                                        string[end] = '\0';
                                        num = false;
                                        new
                                                name[MAX_PLAYER_NAME];
                                        id = end - stringPos;
                                        foreach (Player, playerid)
                                        {
                                                GetPlayerName(playerid, name, sizeof (name));
                                                if (!strcmp(name, string[stringPos], true, id))
                                                {
                                                        setarg(paramPos, 0, playerid);
                                                        num = true;
                                                        break;
                                                }
                                        }
                                        if (!num)
                                        {
                                                setarg(paramPos, 0, INVALID_PLAYER_ID);
                                        }
                                        string[end] = ch;
                                        #if defined __SSCANF_FOREACH__
                                                #undef foreach
                                                #undef __SSCANF_FOREACH__
                                        #endif
                                }
                                stringPos = end;
                        }
                        case 's', 'z':
                        {
                                new
                                        i = 0,
                                        ch;
                                if (format[formatPos])
                                {
                                        while ((ch = string[stringPos++]) && ch != delim)
                                        {
                                                setarg(paramPos, i++, ch);
                                        }
                                        if (!i)
                                        {
                                                return -1;
                                        }
                                }
                                else
                                {
                                        while ((ch = string[stringPos++]))
                                        {
                                                setarg(paramPos, i++, ch);
                                        }
                                }
                                stringPos--;
                                setarg(paramPos, i, '\0');
                        }
                        default:
                        {
                                continue;
                        }
                }
                while (string[stringPos] && string[stringPos] != delim && string[stringPos] > ' ')
                {
                        stringPos++;
                }
                while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= ' '))
                {
                        stringPos++;
                }
                paramPos++;
        }
        do
        {
                if ((delim = format[formatPos++]) > ' ')
                {
                        if (delim == '\'')
                        {
                                while ((delim = format[formatPos++]) && delim != '\'') {}
                        }
                        else if (delim != 'z')
                        {
                                return delim;
                        }
                }
        }
        while (delim > ' ');
        return 0;
}