[Gonzaloo293]

Menъ de Climas

By Gonzalo 293

Hola a todos Soy Elias Gonzalo Astrada o apodado como Gonzalo 293, les vengo a presentar este pequeсo menъ de climas para cualquier servidor y versiуn de SA-MP, ya se que es algo pequeсo y no esperaban eso de mi , es que tengo mucho trabajo y estoy ocupado, capaz que hoy si puedo, harй 2 aportes en el mismo dнa. Ustedes pueden cambiar de color los GameText.

*Se activa con el comando /climas




FOTOS









Cуdigo STRCMP

Код:

/*

						MENU DE CLIMAS, SA-MP, ESTE FILTERSCRIPT TIENE AUTORIZACIУN PARA LIBERARSE
															GONZALO 293

*/

#include <a_samp>//SA-MP Team

#define FILTERSCRIPT //En caso de errores de callbacks

#define Climas   26055

//Comando
public OnPlayerCommandText(playerid, cmdtext[])
{
	if (strcmp("/climas", cmdtext, true, 10) == 0)
	{
		ShowPlayerDialog(playerid, Climas, DIALOG_STYLE_LIST, "Climas", "{FFFF00}Dia\n{FFEF00}Tarde\n{0000DE}Noche\n{575757}Nublado\n{FFC200}Tormenta de Arena\n{555555}Neblina", "Aceptar", "Cancelar");
		return 1;
	}
	return 0;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	if(dialogid == Climas){
		if(response){
			switch(listitem){
				case 0:
				{
					//Dia
					SetPlayerTime(playerid, 12, 0);
					SetPlayerWeather(playerid, 0);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho de ~p~Dia",4000,6);
				}
				case 1:
				{
					//Tarde
					SetPlayerTime(playerid, 20, 0);
					SetPlayerWeather(playerid, 0);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho de ~b~Tarde",4000,6);
				}
				case 2:
				{
					//Noche
					SetPlayerTime(playerid, 0, 0);
					SetPlayerWeather(playerid, 0);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho de ~b~Noche",4000,6);
				}
				case 3:
				{
					//Nublado
					SetPlayerWeather(playerid,8);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho Clima ~g~Nublado",4000,6);
				}
				case 4:
				{
					//Tormenta de Arena
					SetPlayerWeather(playerid,19);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho Clima de ~y~Tormenta de Arena",4000,6);
				}
				case 5:
				{
					//Neblina
					SetPlayerWeather(playerid, 9);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho Clima de ~g~Nieblas",4000,6);
				}
			}
		}
	}
    return 0;
}
/*

						FIN MENU DE CLIMAS, SA-MP, ESTE FILTERSCRIPT TIENE AUTORIZACIУN PARA LIBERARSE
															GONZALO 293

*/

Cуdigo ZCMD

Код:

#include <a_samp>//SA-MP Team
#include <zcmd> //Zeex

#define Climas   26055

//Comando
CMD:climas(playerid, params[])
{
	ShowPlayerDialog(playerid, Climas, DIALOG_STYLE_LIST, "Climas", "{FFFF00}Dia\n{FFEF00}Tarde\n{0000DE}Noche\n{575757}Nublado\n{FFC200}Tormenta de Arena\n{555555}Neblina", "Aceptar", "Cancelar");
	return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	if(dialogid == Climas){
		if(response){
			switch(listitem){
				case 0:
				{
					//Dia
					SetPlayerTime(playerid, 12, 0);
					SetPlayerWeather(playerid, 0);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~wy~Has hecho de ~p~Dia",4000,6);
				}
				case 1:
				{
					//Tarde
					SetPlayerTime(playerid, 20, 0);
					SetPlayerWeather(playerid, 0);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho de ~b~Tarde",4000,6);
				}
				case 2:
				{
					//Noche
					SetPlayerTime(playerid, 0, 0);
					SetPlayerWeather(playerid, 0);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho de ~b~Noche",4000,6);
				}
				case 3:
				{
					//Nublado
					SetPlayerWeather(playerid,8);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho Clima ~g~Nublado",4000,6);
				}
				case 4:
				{
					//Tormenta de Arena
					SetPlayerWeather(playerid,19);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho Clima de ~y~Tormenta de Arena",4000,6);
				}
				case 5:
				{
					//Neblina
					SetPlayerWeather(playerid, 9);
					GameTextForPlayer(playerid,"_~n~_~n~_~n~_~n~_~n~~w~Has hecho Clima de ~g~Nieblas",4000,6);
				}
			}
		}
	}
    return 0;
}

Descargas

Sistema con ZCMD

Pastebin

Solidfiles

Sistema con STRCMP

Pastebin

Solidfiles

Crйditos:

Zeex por el include ZCMD