InGame Pickup Creator v2.0

                     /**//**//**//**//**//**//**//**//**/
                    /*+--------------------------------+*/
                    /*|                                |*/
                    /*|   INGAME PICKUP CREATOR v2.0   |*/
                    /*|          FILTERSCRIPT          |*/
                    /*|      bY PSPgamer/FoxHound      |*/
                    /*|            2 0 0 9             |*/
                    /*|                                |*/
                    /*+--------------------------------+*/
                    /*|        14 November 2009        |*/
                    /*+--------------------------------+*/
                    /*|         ONLY HOSTED AT         |*/
                    /*|       WWW.FORUM.SA-MP.DE       |*/
                    /*|        14 November 2009        |*/
                    /*+--------------------------------+*/
                     /**//**//**//**//**//**//**//**//**/

//------< INCLUDEs >------//
    #include <a_samp>
//------------------------//

//------< DEFINEs >------//
    #define SpawnIPC 89
    #define AboutIPC 90
    #define StartIPC 91
    #define HelpIPC 92
    #define NameIPC 93
    #define pModelsIPC 95
    #define pTypesIPC 96
    #define NoTypeIPC 97
    #define NoModelIPC 98
    #define pSavedIPC 99
//-----------------------//

//--------------------------------------< NEWs >--------------------------------------//
    new Float:pcoordsx,Float:pcoordsy,Float:pcoordsz;
    new SavePickup,pTypeCho,pModelCho;
    new pType2,pType23;
    new pModel1212,pModel1239,pModel1240,pModel1242,pModel1248,pModel1254,pModel1559;
    new pModel1272,pModel1273,pModel1274,pModel1275,pModel1313,pModel1314;
//------------------------------------------------------------------------------------//

//--------------------------------------< OnPlayerSpawn >--------------------------------------//
    public OnPlayerSpawn(playerid)
    {
        ShowPlayerDialog(playerid,SpawnIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","Welcome to the Pickup Creator Filterscript!\nYou can see all IPC cmds with /ipchelp."," ","EXiT");
        TogglePlayerControllable(playerid,0);
        return 1;
    }
//--------------------------------------------------------------------------------------------//

//-----------------------------< OnFilterScriptInit/-Exit >-----------------------------//
    public OnFilterScriptInit()
    {
        print("+--------------------------------+");
        print("|   INGAME PiCKUP CREATOR v2.0   |");
        print("|          FILTERSCRIPT          |");
        print("|      bY PSPgamer/FoxHound      |");
        print("|             LOADED             |");
        print("+--------------------------------+");
        return 1;
    }

    public OnFilterScriptExit()
    {
        print("+--------------------------------+");
        print("|     INGAME PiCKUP CREATOR      |");
        print("|           UNLOADED             |");
        print("+--------------------------------+");
        return 1;
    }
//--------------------------------------------------------------------------------------//

//-----------------------------< OnPlayerCommandText >-----------------------------//
    public OnPlayerCommandText(playerid, cmdtext[])
    {
        new cmd[256];
        new idx;
        cmd = strtok(cmdtext, idx);
        if(strcmp(cmd,"/ipchelp",true)==0)
        {
            ShowPlayerDialog(playerid,SpawnIPC,DIALOG_STYLE_MSGBOX,"IPC v2.0 COMMANDS","/ipchelp\n/ipcabout\n/ipcstart"," ","EXiT");
            return 1;
        }
        if(strcmp(cmd,"/ipcstart",true)==0)
        {
            ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
            TogglePlayerControllable(playerid,0);
            return 1;
        }
        if(strcmp(cmd,"/ipcabout",true)==0)
        {
            ShowPlayerDialog(playerid,AboutIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","+-----------: ABOUT IPC v2.0 :-----------|\nPickup Creator v2.0 for SAMP 0.3\nCopyright © 2009\nGokhan Akin (PSPgamer | FoxHound)\n+----------------------------------------------------|"," ","EXiT");
            return 1;
        }
        return 0;
    }
//---------------------------------------------------------------------------------//

//---------------------------------< OnDialogResponse >---------------------------------//
    public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
    {
        if(dialogid==SpawnIPC)
        {
            if(response==0)//Button RIGHT
            {
                TogglePlayerControllable(playerid, 1);
                return 1;
            }
            if(response==1) //Button LEFT
            {
                ShowPlayerDialog(playerid,SpawnIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","Welcome to the Pickup Creator Filterscript!\nYou can see all IPC cmds with /ipchelp."," ","EXiT");
                return 1;
            }
        }
        if(dialogid==AboutIPC)
        {
            if(response==0)//Button RIGHT
            {
                TogglePlayerControllable(playerid, 1);
                return 1;
            }
            if(response==1) //Button LEFT
            {
                ShowPlayerDialog(playerid,AboutIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","+-----------: ABOUT IPC v2.0 :-----------|\nPickup Creator v2.0 for SAMP 0.3\nCopyright © 2009\nGokhan Akin (PSPgamer | FoxHound)\n+----------------------------------------------------|"," ","EXiT");
                return 1;
            }
        }
        if(dialogid==NameIPC)
        {
            if(response==0)//Button RIGHT
            {
                TogglePlayerControllable(playerid, 1);
                return 1;
            }
            if(response==1) //Button LEFT
            {
                ShowPlayerDialog(playerid,NameIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","Now, enter a name for the .txt file.\nIt will be created in your scriptfiles folder with your pickup infos.\nWARNING: If the file exists, it well be overwrited without a warning."," ","EXiT");
                SavePickup=1;
                return 1;
            }
        }
        if(dialogid==StartIPC)
        {
            if(response==0)//Button RIGHT
            {
                TogglePlayerControllable(playerid, 1);
                return 1;
            }
            if(response==1) //Button LEFT
            {
            }
            if(listitem==0)
            {
                ShowPlayerDialog(playerid,pModelsIPC,DIALOG_STYLE_LIST,"CHOOSE PICKUP MODEL","Money Packet\nInfo Icon\nWhite enter icon\nHealth Pickup\nArmour Pickup\nGTA3 Sign\nSkull\nBlue House Icon\nGreen House Icon\nMoney Icon ($)\nBlue T-Shirt\n2 Skulls Icon\n2 Players Icon","SELECT","BACK");
                return 1;
            }
            if(listitem==1)
            {
                ShowPlayerDialog(playerid,pTypesIPC,DIALOG_STYLE_LIST,"CHOOSE PICKUP TYPE","Pickupable, respawns in a few minutes\nPickupable, doesn't disappear on pickup","SELECT","BACK");
                return 1;
            }
            if(listitem==2)
            {
                ShowPlayerDialog(playerid,NameIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","Now, enter a name for the .txt file.\nIt will be created in your scriptfiles folder with your pickup infos.\nWARNING: If the file exists, it well be overwrited without a warning."," ","EXiT");
                SavePickup=1;
                return 1;
            }
        }
        if(dialogid==pTypesIPC)
        {
            if(response==0)//Button RIGHT
            {
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(response==1) //Button LEFT
            {
            }
            if(listitem==0)
            {
                pType23=0;
                pType2=1;
                pTypeCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==1)
            {
                pType2=0;
                pType23=1;
                pTypeCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
        }
        if(dialogid==pModelsIPC)
        {
            if(response==0)//Button RIGHT
            {
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(response==1) //Button LEFT
            {
            }
            if(listitem==0)
            {
                pModel1212=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==1)
            {
                pModel1239=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==2)
            {
                pModel1240=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==3)
            {
                pModel1242=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==4)
            {
                pModel1248=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==5)
            {
                pModel1254=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                return 1;
            }
            if(listitem==6)
            {
                pModel1272=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==7)
            {
                pModel1273=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==8)
            {
                pModel1274=1;
                pModel1314=0;
                pModel1313=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==9)
            {
                pModel1275=1;
                pModel1314=0;
                pModel1313=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==10)
            {
                pModel1313=1;
                pModel1314=0;
                pModel1275=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==11)
            {
                pModel1314=1;
                pModel1313=0;
                pModel1275=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
            if(listitem==12)
            {
                pModel1559=1;
                pModel1314=0;
                pModel1313=0;
                pModel1275=0;
                pModel1274=0;
                pModel1273=0;
                pModel1272=0;
                pModel1254=0;
                pModel1248=0;
                pModel1242=0;
                pModel1240=0;
                pModel1239=0;
                pModel1212=0;
                pModelCho=1;
                ShowPlayerDialog(playerid,StartIPC,DIALOG_STYLE_LIST,"IPC v2.0 MENU","Choose Pickup Model\nChoose Pickup Type\nSave Pickup","SELECT","EXiT");
                return 1;
            }
        }
        return 1;
    }
//--------------------------------------------------------------------------------------//

//---------------------------------< OnPlayerText >--------------------------------//
    public OnPlayerText(playerid, text[])
    {
        new string[256];
        if(SavePickup==1)
        {
            if(pTypeCho==0)
            {
                ShowPlayerDialog(playerid,NoTypeIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","You haven't choosen any pickup type!"," ","EXiT");
                TogglePlayerControllable(playerid,1);
                return 1;
            }
            if(pModelCho==0)
            {
                ShowPlayerDialog(playerid,NoModelIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR","You haven't choosen any pickup model!"," ","EXiT");
                TogglePlayerControllable(playerid,1);
                return 1;
            }
            new File:pFile, tmp[256], str[256];
            format(str,256,"%s.txt",text);
            GetPlayerPos(playerid,Float:pcoordsx,Float:pcoordsy,Float:pcoordsz);
            pFile = fopen(str, io_write);
            format(tmp,256,"//Ingame Pickup Creater (IPC) scripted by PSPgamer/FoxHound\r\n");
            fwrite(pFile,tmp);
            format(tmp,256," \r\n");
            fwrite(pFile,tmp);
            format(tmp,256,"//Copy this under 'public OnGameModeInit' in your GameMode:\r\n");
            fwrite(pFile,tmp);
            if(pType2==1)
            {
                if(pModel1212) format(tmp,256,"CreatePickup(1212,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1239) format(tmp,256,"CreatePickup(1239,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1240) format(tmp,256,"CreatePickup(1240,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1242) format(tmp,256,"CreatePickup(1242,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1248) format(tmp,256,"CreatePickup(1248,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1254) format(tmp,256,"CreatePickup(1254,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1272) format(tmp,256,"CreatePickup(1272,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1273) format(tmp,256,"CreatePickup(1273,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1274) format(tmp,256,"CreatePickup(1274,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1275) format(tmp,256,"CreatePickup(1275,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1313) format(tmp,256,"CreatePickup(1313,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1314) format(tmp,256,"CreatePickup(1314,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1559) format(tmp,256,"CreatePickup(1559,2,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                fwrite(pFile,tmp);
                pType2=0;
            }
            else if(pType23==1)
            {
                if(pModel1212) format(tmp,256,"CreatePickup(1212,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1239) format(tmp,256,"CreatePickup(1239,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1240) format(tmp,256,"CreatePickup(1240,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1242) format(tmp,256,"CreatePickup(1242,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1248) format(tmp,256,"CreatePickup(1248,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1254) format(tmp,256,"CreatePickup(1254,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1272) format(tmp,256,"CreatePickup(1272,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1273) format(tmp,256,"CreatePickup(1273,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1274) format(tmp,256,"CreatePickup(1274,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1275) format(tmp,256,"CreatePickup(1275,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1313) format(tmp,256,"CreatePickup(1313,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1314) format(tmp,256,"CreatePickup(1314,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                else if(pModel1559) format(tmp,256,"CreatePickup(1559,23,%f,%f,%f,0);\r\n",pcoordsx,pcoordsy,pcoordsz);
                fwrite(pFile,tmp);
                pType23=0;
            }
            fclose(pFile);
            SavePickup=0;
            pTypeCho=0;
            pModelCho=0;
            TogglePlayerControllable(playerid,1);
            format(string, sizeof(string), "Text file saved in scriptfiles folder as '%s' succesfully.",text);
            ShowPlayerDialog(playerid,pSavedIPC,DIALOG_STYLE_MSGBOX,"INGAME PICKUP CREATOR",string," ","EXiT");
            return 0;
        }
        return 1;
    }
//---------------------------------------------------------------------------------//

//----------------------------------------------< strtok definiton >--------------------------------------------//
    stock strtok(const string[], &index,seperator=' ')
    {
        new length = strlen(string);
        new offset = index;
        new result[256];
        while ((index < length) && (string[index] != seperator) && ((index - offset) < (sizeof(result) - 1)))
        {
            result[index - offset] = string[index];
            index++;
        }

        result[index - offset] = EOS;
        if ((index < length) && (string[index] == seperator))
        {
            index++;
        }
        return result;
    }
//---------------------------------------------------------------------------------------------------------------//