[Ajuda] » Alguém teria esse sistema

Bom pessoal, venho em meio desse tópico pedir um ajuda ou no caso quem tiver um sistema desse ou parecido que possa mim passa fico muito agradecido, pois já procurei muito e não obtive respostas.

Sistema de Plantação e Colheita:
https://www.youtube.com/watch?v=tH7ds3oaxIY


Ficaria muito agradecido se alguém pode-se mim passa esse sistema

LeleziN.dG escreveu:Bom pessoal, venho em meio desse tópico pedir um ajuda ou no caso quem tiver um sistema desse ou parecido que possa mim passa fico muito agradecido, pois já procurei muito e não obtive respostas.

Sistema de Plantação e Colheita:
https://www.youtube.com/watch?v=tH7ds3oaxIY


Ficaria muito agradecido se alguém pode-se mim passa esse sistema

Aqui está...
Espero ter ajudado.



********************************************************************************
*/


#include a_samp
#include zcmd
#include sscanf2
#include streamer
#include DOF2

#define AVISOPLANTIO 1
#define SLOTMACONHA 2
#define NOCARROMAC 3
#define NUMEROSEMENTES 4

new PlantandoMaconha;

new TemMaconha[MAX_PLAYERS],
QuantiaMaconha[MAX_PLAYERS]
;

new MaconhaQuase[7], // Objetos Mac. Quase pro plantio
MaconhaProntaP[5]  // Objetos Mac. pronto pro plantio
;

new ObjEnt[3];

new Check01,
Check02
;

new EuPlantei[MAX_PLAYERS],
MaconhaColhida[MAX_PLAYERS];

new ObjCar[4];

new MaconhaProntita[MAX_PLAYERS];

new TimerQueimarMac[MAX_PLAYERS];

new Cars[3];

forward CriarMaconha();
forward MaconhaPronta(playerid);
forward QueimarMaconha(playerid);
forward TirarBarris();

enum DP{
Maconha,
SementesMac,
Colheu
}; new DadosP[MAX_PLAYERS][DP];

public OnPlayerConnect(playerid){
    Create3DTextLabel("{87CEFA}Slot de Plantio!\n{FFD700}Semente Permitida: Maconha", 0x008080FF, -1178.6414,-1091.6329,129.2188, 15.0, 0, 0);

    Check01 = CreateDynamicCP(-1178.6414,-1091.6329,129.2188, 0.8, -1, -1, -1, 100.0);

new Var_[128], Plantador[MAX_PLAYER_NAME];

    GetPlayerName(playerid, Plantador, sizeof(Plantador));

format(Var_, sizeof(Var_), "Plantadores/%s.ini", Plantador);

    if(!DOF2_FileExists(Var_)){
        DOF2_CreateFile(Var_);

DOF2_SetString(Var_, "Nome", Plantador);

DOF2_SetInt(Var_, "Maconha", 0);
DOF2_SetInt(Var_, "Sementes Mac", 0);
DOF2_SetInt(Var_, "Colheu", 0);

        DOF2_SaveFile();

        printf("| AUTO-CONTROLE | O(A) jogador(a) %s criou seu registro de plantador!", Plantador);
    } else {
DadosP[playerid][Maconha] = DOF2_GetInt(Var_, "Maconha");
DadosP[playerid][SementesMac] = DOF2_GetInt(Var_, "Sementes Mac");
DadosP[playerid][Colheu] = DOF2_GetInt(Var_, "Colheu");
    }


return 1;
}

CMD:grana(playerid){
GivePlayerMoney(playerid, 999999);
return 1;
}

public OnFilterScriptInit(){

Cars[0] = AddStaticVehicle(478,-1175.2751,-1140.0001,129.2157,354.1185,66,1); // car01carregado
Cars[1] = AddStaticVehicle(478,-1171.0756,-1139.9646,129.2197,358.5255,59,1); // car02carregado
return 1;
}

CMD:plantar(playerid){
ShowPlayerDialog(playerid, AVISOPLANTIO, DIALOG_STYLE_MSGBOX, "{BEBEBE}Slot de Plantio!", "{FA8072}S.A Plantadora\n\n{BEBEBE}Cada Slot destinado á plantio é separado por grupos, certifique-se você está no Slot certo com as sementes corretas!\n\nSó será possível plantar neste Slot com as sementes corretas.\n\n{1E90FF}Deseja Processeguir?", "Sim", "Não");
return 1;
}

public QueimarMaconha(playerid){
    SendClientMessage(playerid, -1, "");
    SendClientMessage(playerid, -1, "{BEBEBE}| SLOT | A Maconha que você plantou foi queimada devido á demora na colheita!");
    SendClientMessage(playerid, -1, "{BEBEBE}| SLOT | Você não será reembolsado por essa ação indevida.");

    PlantandoMaconha = 0;

DestroyObject(MaconhaProntaP[0]);
DestroyObject(MaconhaProntaP[1]);
DestroyObject(MaconhaProntaP[2]);
DestroyObject(MaconhaProntaP[3]);
DestroyObject(MaconhaProntaP[4]);
return 1;
}

public MaconhaPronta(playerid){
    SendClientMessage(playerid, -1, "");
SendClientMessage(playerid, -1, "{BEBEBE}| SLOT | A Maconha que você plantou está pronta para colheita! ");
SendClientMessage(playerid, -1, "{BEBEBE}| SLOT | Você terá 1 Minuto para colhe-la antes que ela será queimada!");

TimerQueimarMac[playerid] = SetTimerEx("QueimarMaconha", 25000, false, "i", playerid);

MaconhaProntita[playerid] = 1;

MaconhaProntaP[0] = CreateObject(823, -1170.09998, -1095, 128.7, 0, 22, 0);
MaconhaProntaP[1] = CreateObject(823, -1175.09998, -1095.59998, 128.7, 0, 21.995, 0);
MaconhaProntaP[2] = CreateObject(823, -1179.09998, -1095.59998, 128.7, 0, 21.995, 0);
MaconhaProntaP[3] = CreateObject(823, -1182.40002, -1095.5, 128.7, 0, 21.995, 0);
MaconhaProntaP[4] = CreateObject(823, -1186.90002, -1095.80005, 128.7, 0, 21.995, 0);

DestroyObject(MaconhaQuase[0]);
DestroyObject(MaconhaQuase[1]);
DestroyObject(MaconhaQuase[2]);
DestroyObject(MaconhaQuase[3]);
DestroyObject(MaconhaQuase[4]);
DestroyObject(MaconhaQuase[5]);
DestroyObject(MaconhaQuase[6]);
return 1;
}

CMD:colher(playerid){
if(PlantandoMaconha == 1){
if(EuPlantei[playerid] == 1){
    if(MaconhaProntita[playerid] == 1){
        if(IsPlayerInRangeOfPoint(playerid, 2.0, -1177.7119,-1093.1257,129.2188)){
    PlantandoMaconha = 0;
    EuPlantei[playerid] = 0;
    MaconhaProntita[playerid] = 0;

    SendClientMessage(playerid, -1, "| INFO | Você colheu a maconha com sucesso, vá vende-la no ponto indicado no seu mini-mapa com o carro carregado!");

        MaconhaColhida[playerid] = 1;

DestroyObject(MaconhaProntaP[0]);
DestroyObject(MaconhaProntaP[1]);
DestroyObject(MaconhaProntaP[2]);
DestroyObject(MaconhaProntaP[3]);
DestroyObject(MaconhaProntaP[4]);

KillTimer(TimerQueimarMac[playerid]);

                ObjCar[0] = CreateObject(1217,0,0,-1000,0,0,0,100);
                ObjCar[1] = CreateObject(1217,0,0,-1000,0,0,0,100);
                ObjCar[2] = CreateObject(1217,0,0,-1000,0,0,0,100);
                ObjCar[3] = CreateObject(1217,0,0,-1000,0,0,0,100);

                Cars[2] = AddStaticVehicle(478,-1166.4277,-1139.5294,129.2089,1.9437,45,1); // car03carregado

AttachObjectToVehicle(ObjCar[0], Cars[2], 0.539999,-2.025000,0.000000,0.000000,0.000000,0.000000);
AttachObjectToVehicle(ObjCar[1], Cars[2], -0.360000,-2.025000,0.000000,0.000000,0.000000,0.000000);
AttachObjectToVehicle(ObjCar[2], Cars[2], -0.360000,-2.025000,0.000000,0.000000,0.000000,0.000000);
AttachObjectToVehicle(ObjCar[3], Cars[2], -0.360000,-0.899999,0.000000,0.000000,0.000000,0.000000);

PutPlayerInVehicle(playerid, Cars[2], 0);

ShowPlayerDialog(playerid, NOCARROMAC, DIALOG_STYLE_MSGBOX, "{BEBEBE}Entregar Maconha", "{FA8072}S.A Plantadora!\n\n{BEBEBE}Os galões na traseira do carro estão carregados com a maconha colhida por você.\n\nEssa medida foi tomada como disfarce para os policiais que rondam essa região de plantio ilegal.\n\n{1E90FF}Siga o Checkpoint no seu mapa para entregar a maconha e receber dinheiro por elas.", "Fechar", "");

                    DestroyDynamicCP(Check01);
                    Check02 = SetPlayerCheckpoint(playerid, -1652.2321,-2541.3550,16.1046, 0.;
                    Create3DTextLabel("{87CEFA}Local de Entrega!\n{FFD700}Digite /entregar", 0x008080FF, -1652.2321,-2541.3550,16.1046, 15.0, 0, 0);

} else return SendClientMessage(playerid, -1, "| SLOT | Você deve estar próximo ao Slot para colher!");
    } else return SendClientMessage(playerid, -1, "| SLOT | A Maconha não está pronta para ser colhida agora!");
} else return SendClientMessage(playerid, -1, "| SLOT | Você não plantou essas sementes, por isso não pode colhe-las!");
} else return SendClientMessage(playerid, -1, "| SLOT | Não há nenhuma semente de maconha plantada no Slot!");
return 1;
}

CMD:comprarsementes(playerid){
ShowPlayerDialog(playerid, NUMEROSEMENTES, DIALOG_STYLE_INPUT, "Comprar Sementes", "S.A Plantadora!\n\nDigite abaixo o número de pacotes que deseja comprar de sementes de maconha.\n\nUm pacote possui 30 sementes, sendo necessário ás 60 sementes para o um plantio!", "Comprar", "Cancelar");
return 1;
}

public TirarBarris(){

DestroyObject(ObjEnt[0]);
DestroyObject(ObjEnt[1]);
DestroyObject(ObjEnt[2]);
return 1;
}

CMD:entregar(playerid){
if(IsPlayerInRangeOfPoint(playerid, 30.0, -1652.2321,-2541.3550,16.1046)){
    if(MaconhaColhida[playerid] == 1){
        SendClientMessage(playerid, -1, "{BEBEBE}| FIM | Você entregou a mercadoria com sucesso! Uma pessoa irá vir pegar os barris carregados.");
        SendClientMessage(playerid, -1, "{BEBEBE}| FIM | Agora saia desde local sem chamar suspeitas");
        MaconhaColhida[playerid] = 0;

        DisablePlayerCheckpoint(Check02);
        Check01 = CreateDynamicCP(-1178.6414,-1091.6329,129.2188, 0.8, -1, -1, -1, 100.0);

ObjEnt[0] = CreateObject(1217, -1649.7056,-2542.2698,15.9823, 0,0,0,100);
ObjEnt[1] = CreateObject(1217, -1649.9158,-2543.3005,15.9432, 0,0,0,100);
ObjEnt[2] = CreateObject(1217, -1650.8456,-2543.3225,15.9723, 0,0,0,100);

            DestroyObject(ObjCar[0]);
DestroyObject(ObjCar[1]);
DestroyObject(ObjCar[2]);
DestroyObject(ObjCar[3]);

SetTimer("TirarBarris", 60000*3, false);

    } else return SendClientMessage(playerid, -1, "| ERRO | Você não colheu nada!");

} else return SendClientMessage(playerid, -1, "| ERRO | Você não está no local da entrega!");
return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]){

new Var_[128], Plantador[MAX_PLAYER_NAME];

    GetPlayerName(playerid, Plantador, sizeof(Plantador));

if(dialogid == NUMEROSEMENTES){
if(!response) return 1;

new _Var[150];

if(strval(inputtext) > GetPlayerMoney(playerid))
return SendClientMessage(playerid, -1, "| INFO | Você não possui dinheiro suficiente para comprar o número de pacotes solicitados!");

GivePlayerMoney(playerid, GetPlayerMoney(playerid) - strval(inputtext));

format(_Var, sizeof(_Var), "{BEBEBE}| INFO | Você comprou %d pacotes, totalizando %d sementes de maconha. Você poderá fazer %d plantações com as semente compradas!", strval(inputtext), strval(inputtext) * 30, strval(inputtext) * 30 / 60);
SendClientMessage(playerid, -1, _Var);

new VarMarota = strval(inputtext) * 30;

DOF2_SetInt(Var_, "Sementes Mac", DadosP[playerid][SementesMac] + VarMarota);
DOF2_SetInt(Var_, "Maconha", 1);
DOF2_SaveFile();

TemMaconha[playerid] = 1;
    QuantiaMaconha[playerid] = 60;

}
if(dialogid == AVISOPLANTIO){
    if(!response) return SendClientMessage(playerid, -1, "| INFO | Plantio neste Slot foi cancelado!");

if(IsPlayerInRangeOfPoint(playerid, 2.0, -1177.7119,-1093.1257,129.2188)){ // SLOT DE MACONHA!
    new _Var[300];
    format(_Var, sizeof(_Var), "{FA8072}S.A Plantadora!\n\n{BEBEBE}Este Slot é de uso único por vez e é válido apenas para sementes de maconha!\n\nSementes plantadas em slots errados seram perdidas e não darão resultados!\n\n{1E90FF}Deseja plantar suas sementes neste Slot?");
ShowPlayerDialog(playerid, SLOTMACONHA, DIALOG_STYLE_MSGBOX, "{BEBEBE}Slot - Maconha", _Var, "Sim", "Não");
} else SendClientMessage(playerid, -1, "| ERRO | Você não está em um Slot de plantio!");
}
if(dialogid == SLOTMACONHA){
    if(!response) return SendClientMessage(playerid, -1, "{BEBEBE}| INFO | Você cancelou o plantio neste slot!");

if(PlantandoMaconha == 0){
    if(TemMaconha[playerid] == 1) {
        if(QuantiaMaconha[playerid] >= 60){

            PlantandoMaconha = 1;
            EuPlantei[playerid] = 1;

            QuantiaMaconha[playerid] = DadosP[playerid][SementesMac] - 60;

            SendClientMessage(playerid, -1, "{BEBEBE}| SLOT | Você plantou suas sementes neste Slot, aguarde até elas estarem pronto para plantio!");
            SendClientMessage(playerid, -1, "{BEBEBE}| SLOT | Após a maconha estiver pronta para plantio, caso não seja colhida elas serão queimadas.");

//Maconha plantada.
MaconhaQuase[0] = CreateObject(811, -1169.40002, -1096.5, 129.39999, 0, 0, 0);
MaconhaQuase[1] = CreateObject(811, -1172.69995, -1096.40002, 129.39999, 0, 0, 0);
MaconhaQuase[2] = CreateObject(811, -1176.19995, -1096.59998, 129.39999, 0, 0, 0);
MaconhaQuase[3] = CreateObject(811, -1179.40002, -1096.19995, 129.39999, 0, 0, 0);
MaconhaQuase[4] = CreateObject(811, -1182.40002, -1096.40002, 129.39999, 0, 0, 0);
MaconhaQuase[5] = CreateObject(811, -1185.59998, -1096.59998, 129.39999, 0, 0, 0);
MaconhaQuase[6] = CreateObject(811, -1188.59998, -1096.80005, 129.39999, 0, 0, 0);

                    SetTimerEx("MaconhaPronta", 5000, false, "i", playerid);

            format(Var_, sizeof(Var_), "Plantadores/%s.ini", Plantador);

DOF2_SetInt(Var_, "Sementes Mac", QuantiaMaconha[playerid]);

DOF2_SaveFile();

} else return SendClientMessage(playerid, -1, "{BEBEBE}| INFO | Você não possui sementes suficientes para plantar neste Slot!");
} else return SendClientMessage(playerid, -1, "{BEBEBE}| INFO | Você não possui sementes para plantar neste Slot!");
} else return SendClientMessage(playerid, -1, "{BEBEBE}| INFO | Já existe sementes plantadas neste Slot, aguarde elas germinarem para plantar as suas.");

}
return 1;
}

Já deu certo aqui mano vlw a ajuda