toribio

//topo:
forward DestruirObjeto(objid, demora);
forward PararExplosoes();

//OnPlayerCommandText:
    IF(strcmp(cmd,"/plantarbomba",TRUE)==0){
        NEW dinid,FLOAT:x,FLOAT:y,FLOAT:z,FLOAT:angle,tempo,tmp[256],tmp2[256],tmp3[256],tmp4[256],radiacao,distancia,demora;
        tmp = strtok(cmdtext, idx); tmp2 = strtok(cmdtext, idx); tmp3 = strtok(cmdtext, idx); tmp4 = strtok(cmdtext, idx);
        tempo = strval(tmp);radiacao = strval(tmp2);distancia = strval(tmp3);demora = strval(tmp4);
        IF(!strlen(tmp)){
            SendClientMessage(playerid, COR_BRANCO, "SERVER: /plantarbomba [segundos-para-explodir] [radia��o] [distancia-de-cada-explos�o] [demora-das-explos�es]");
            RETURN 1;
        }
        IF(!strlen(tmp2)){
            SendClientMessage(playerid, COR_BRANCO, "SERVER: /plantarbomba [segundos-para-explodir] [radia��o] [distancia-de-cada-explos�o] [demora-das-explos�es]");
            RETURN 1;
        }
        IF(!strlen(tmp3)){
            SendClientMessage(playerid, COR_BRANCO, "SERVER: /plantarbomba [segundos-para-explodir] [radia��o] [distancia-de-cada-explos�o] [demora-das-explos�es]");
            RETURN 1;
        }
        IF(!strlen(tmp4)){
            SendClientMessage(playerid, COR_BRANCO, "SERVER: /plantarbomba [segundos-para-explodir] [radia��o] [distancia-de-cada-explos�o] [demora-das-explos�es]");
            RETURN 1;
        }
        IF(IsPlayerInAnyVehicle(playerid) || GetPlayerState(playerid) == PLAYER_STATE_PASSENGER){
            SendClientMessage(playerid,COR_VERMELHO,"SERVER: Voc� n�o pode plantar uma bomba dentro de um ve�culo!");
            RETURN 1;
        }ELSE{
            GetPlayerPos(playerid,x,y,z);
            GetPlayerFacingAngle(playerid, angle);
            ApplyAnimation(playerid, "BOMBER", "BOM_Plant", 4.0, 0, 0, 0, 0, 0);
            SetTimerEx("CriarExplosoes",tempo*840,FALSE,"dffffd",3,x,y,z,radiacao,distancia);
            dinid = CreateObject(1252,x + (1 * floatsin(-angle+5, degrees)),x + (1 * floatcos(-angle+5, degrees)),z-0.8,0,0,0);
            SetTimerEx("DestruirObjeto",tempo*870,FALSE,"dd",dinid, demora);
            format(msg, sizeof(msg), "SERVER: Bomba plantada, radia��o: %d, explodir� em: %d segundos, Dist�ncia das explos�es: %d", radiacao, tempo, distancia);
            SendClientMessage(playerid, COR_BRANCO,msg);
        }
        RETURN 1;
    }

//final do mode:
public DestruirObjeto(objid, demora) DestroyObject(objid), SetTimer("PararExplosoes",demora*1000,0);
public PararExplosoes() KillTimer(bomba);