[Schocc]

pawn Код:

CMD:bafometro(playerid, params[]){
    new id;
    
    if (!strlen(params))
        return SendClientMessage(playerid, 0xFF0000AA, "Use: \"/bafometro <playerid>\"");
        
    id = strval(params);
    
    if (!IsPlayerConnected(id))
        return SendClientMessage(playerid, 0xFF0000AA, "Player nгo encontrado!");

    if (GetPlayerState(id) != PLAYER_STATE_DRIVER){
        RemovePlayerFromVehicle(id);
        new i;
        while( i != 225){ i++;}//delay
    }

    switch(GetPlayerDrunkLevel(id))
    {
        case 0..1999:
        {
            SendClientMessage(playerid,0xFFFFFFFF,"O jogador estб sуbrio!");
            SendClientMessage(id,0xFFFFFFFF,"Tenha uma boa viajem!");
        }
        case 2000:
        {
            SendClientMessage(id,0xFFFFFFFF,"Se beber Nгo dirija!");
            SendClientMessage(id,0xFFFFFFFF,"Voce vai ganhar uma multa!");
        }
    }
    return 1;
}

Fiz com teclado virtual em exemplo...