[Schneider]

Not tested though...

pawn Code:

CMD:v(playerid,params[])
{
    if(InDM[playerid]) return GameTextForPlayer(playerid, "~w~You cannot spawn vehicles in ~r~DM",2000,5);
    if(params[0])
    {
        new modelid[32];
        if(sscanf(params, "s[32]", modelid)) return GameTextForPlayer(playerid, "~w~/v ~n~~r~[vehicleid/name]",2000,5);
        if(strval(modelid) >= 400 || strval(modelid) < 612)
        {
            VehicleSpawner(playerid,modelid);
        }
        else
        {
            new model = GetVehicleModelIDFromName(modelid);
            if(model >= 400 || model < 612)
            {
                VehicleSpawner(playerid,model);
            }
            else
            {
                GameTextForPlayer(playerid, "~w~Invalid ~r~Name/ID!",2000,5);
            }
        }
    }
    else
    {
        ShowPlayerDialog(playerid, Dialog_Vehicles, DIALOG_STYLE_LIST, "{ffffff}Vehicle categories:", "Airplanes\nHelicopters\nBikes\nConvertibles\nIndustrial\nLowriders\nOff Road\nPublic Service\nSaloons\nSport Vehicles\nStation Wagons\nBoats\nTrailers\nUnique\nRC Vehicles", "Select", "Back" );
    }
    return 1;
}