[SuB_ZeRo0_]

Aqui, edite a seu gosto.

pawn Code:

//By Sub_Zero0_
#define MAX_WORLDS 200
#define MAX_PLAYERS_WORLD 4

public OnPlayerConnect(playerid)
{
    new ptemp;
    for(new worldID=0;worldID<MAX_WORLDS;worldID++)
    {
        ptemp=0;
        for(new i=0;i<MAX_PLAYERS;i++)
            if(GetPlayerVirtualWorld(i)==worldID) ptemp++;
        if(ptemp<MAX_PLAYERS_WORLD)
            SetPlayerVirtualWorld(playerid,worldID);
    }
    return 1;
}