[FilterScript] mCoins Sistema de Coins - Printable Version
+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+----- Forum: Lançamentos/Releases (https://sampforum.blast.hk/forumdisplay.php?fid=56)
+----- Thread: [FilterScript] mCoins Sistema de Coins (/showthread.php?tid=646284)
+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+----- Forum: Lançamentos/Releases (https://sampforum.blast.hk/forumdisplay.php?fid=56)
+----- Thread: [FilterScript] mCoins Sistema de Coins (/showthread.php?tid=646284)
Pages:
1
2
mCoins Sistema de Coins 2.0 - MediaCL - 14.12.2017
Bom Dia,Boa Tarde, Boa Noite
Hoje Venho apresentar meu Sistema de Coins mCoins
Vamos lб.
Comeзo
o Sistema mCoins, foi feito especialmente para algumas pessoas que pesquisavam por sistema de coins
antigamente eu pesquisava tambйm por este sistema, e eu tinha achado um bбsico e melhorei ele bastante
e em cima dele trouxe o mCoins
Comandos
Comando /comprar Para comprar Um Veнculo ou Armas
Comando /ajuda
ChangeLog
Agradecimentos
- Media
- Ramires
- Crewz_Stannley
- Marllun
Imagens 1.0:
https://imgur.com/NpLnZll
https://imgur.com/rZVRJjE
https://imgur.com/rRGIDxE
Imagens 2.0:
https://imgur.com/a/iyD0j
Imagens 3.0: - FINAL
https://imgur.com/a/dgnWk
Download 1.0:
https://pastebin.com/raw/zTGxeeLu
Download 2.0:
https://pastebin.com/TSgTyyG8
Download 3.0: - FINAL
https://pastebin.com/6HPf5fMU
Obs: Nгo usei o Cуdigo do Marllun Pelos Seguintes motivos
quando, eu fui testar o cуdigo dele todos os comandos tinham parado de funcionar, eu nunca mexi com pawn.cmd
por isso nгo usei, mas para vocкs acharem que fui vista grossa, ou que desprezei o trabalho dele para melhorar o cуdigo nгo foi isso, eu apenas nгo consegui usar o cуdigo mas ficou bem definido o cуdigo dele, por isso que atй em alguns momentos eu usei o cуdigo que ele mandou !
Lembrando: estб e a versгo final do sistema !
Hoje Venho apresentar meu Sistema de Coins mCoins
Vamos lб.
Comeзo
o Sistema mCoins, foi feito especialmente para algumas pessoas que pesquisavam por sistema de coins
antigamente eu pesquisava tambйm por este sistema, e eu tinha achado um bбsico e melhorei ele bastante
e em cima dele trouxe o mCoins
Comandos
Comando /comprar Para comprar Um Veнculo ou Armas
Comando /ajuda
ChangeLog
PHP код:
v1.0 - 14/12/2017
- Release inicial.
v2.0 - 15/12/2017
Retirado Comando /deagle
Novo Modo de Compras no /comprar
Comprar armas agora em dialog
Sistema de Salvamento dos coins
Retirado o = new valorpago
Atualizado para a define sugestгo de RAMIRES
Retirado Public's que nгo estavam em uso
v3.0 - 15/12/2017
Sistema de Login/Registro Salvamento em DOF2
Ele Salva, Vida,Colete,Dinheiro,Coins,Senha(Sem Encrypt)
Agora no Comando /comprar, vocк pode transferir Coins a outro jogador
Salvamento Funcionando 100%
Algumas Variбveis, Foram Juntadas Exemplo (new new mCoins[MAX_PLAYERS],EditGive[MAX_PLAYERS]...)
Juntei elas, assim deixando o Sistema Mas Leve
Nova TextDraw do Coins agora ficando em Cima do Mapa Como No Print Abaixo
Comando /creditos retirado
o enumrador mInfo
Foi Retirado, assim se tornando uma varнavel agora ficou mas fбcil e complexo o sistema
Algumas Partes do Cуdigo, do Marllun Foram Acoplados, no Sistema
- Media
- Ramires
- Crewz_Stannley
- Marllun
Imagens 1.0:
https://imgur.com/NpLnZll
https://imgur.com/rZVRJjE
https://imgur.com/rRGIDxE
Imagens 2.0:
https://imgur.com/a/iyD0j
Imagens 3.0: - FINAL
https://imgur.com/a/dgnWk
Download 1.0:
https://pastebin.com/raw/zTGxeeLu
Download 2.0:
https://pastebin.com/TSgTyyG8
Download 3.0: - FINAL
https://pastebin.com/6HPf5fMU
Obs: Nгo usei o Cуdigo do Marllun Pelos Seguintes motivos
quando, eu fui testar o cуdigo dele todos os comandos tinham parado de funcionar, eu nunca mexi com pawn.cmd
por isso nгo usei, mas para vocкs acharem que fui vista grossa, ou que desprezei o trabalho dele para melhorar o cуdigo nгo foi isso, eu apenas nгo consegui usar o cуdigo mas ficou bem definido o cуdigo dele, por isso que atй em alguns momentos eu usei o cуdigo que ele mandou !
Lembrando: estб e a versгo final do sistema !
Re: mCoins Sistema de Coins - ViDaLoKa1 - 14.12.2017
Й boa sua intenзгo, nгo tб tгo ruim mais e esse static stock ai? Nгo sou especialista em PAWN mais pode ser melhorado em muitas coisas esse seu filterscript.
Re: mCoins Sistema de Coins - Ramires - 14.12.2017
Qual a necessidade de fazer
PHP код:
new Valorpago = 1000;
if(PlayerInfo[playerid][mCoins] < Valorpago)
PHP код:
if(PlayerInfo[playerid][mCoins] < 1000)
Re: mCoins Sistema de Coins - ViDaLoKa1 - 14.12.2017
Quote:
|
Originally Posted by Ramires
 Qual a necessidade de fazer
PHP код:
PHP код:
|
Re: mCoins Sistema de Coins - WalterSantos - 14.12.2017
A Intenзгo й muito boa, porйm por minha parte seria melhor fazer um tutorial se nгo for muito trabalho, pois o FS em si nгo й grande.. Enfim bom FS.
Re: mCoins Sistema de Coins - MediaCL - 14.12.2017
Obrigado, pela dica vou melhorar o FS na Proxima versгo, vou melhorar o cуdigo obrigado !
Re: mCoins Sistema de Coins - MediaCL - 15.12.2017
PHP код:
v1.0 - 14/12/2017
- Release inicial.
v2.0 - 14/12/2017
Retirado Comando /deagle
Novo Modo de Compras no /comprar
Comprar armas agora em dialog
Sistema de Salvamento dos coins
Retirado o = new valorpago
Atualizado para a define sugestгo de RAMIRES
Retirado Public's que nгo estavam em uso
Re: mCoins Sistema de Coins - IlanZ - 15.12.2017
Esse sistema em si estб bom, mais pode melhorar.
1 -
PHP код:
if(PlayerInfo[playerid][mCoins] < 1000)
{
SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
return 1;
}
PHP код:
if(PlayerInfo[playerid][mCoins] < 1000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
2 -
PHP код:
new para1;
new level;
new giveplayer[MAX_PLAYER_NAME];
new sendername[MAX_PLAYER_NAME];
PHP код:
new para1, level, giveplayer[MAX_PLAYER_NAME], sendername[MAX_PLAYER_NAME];
Код:
new Coinsstr[128]; format(Coinsstr,sizeof(Coinsstr),"Coins ~b~%d",PlayerInfo[playerid][mCoins]); PlayerTextDrawSetString(playerid, Textdraw0[playerid], Coinsstr);
4 -
Sobre o comando que vocк botou, o /creditos e o /ajuda. nгo й necessбrio, pois as informaзхes jб estгo no topico.
+rep
Re: mCoins Sistema de Coins - MediaCL - 15.12.2017
Muito Obrigado, pelas dicas mano
Vou Melhorar o Cуdigo ! Valeu Mesmo !
Re: mCoins Sistema de Coins - Marllun - 15.12.2017
muito bбsico, use mselection coloque todas as armas e carros. ficaria maneiro.
"eu tinha achado um bбsico e melhorei ele bastante" coloque os crйditos do dono do sistema bбsico que vocк achou.
Re: mCoins Sistema de Coins - MediaCL - 15.12.2017
Eu nгo me identifico muito com mSelection, vou tentar aprender mas sei lб... nгo gosto muito desse tipo saca ?
eu coloquei os crйditos do cara que eu achei
й o Crewz
Re: mCoins Sistema de Coins - C4rtm4n - 15.12.2017
Bom FS nota 8
Quote:
|
enum mInfo { mCoins }; new PlayerInfo[MAX_PLAYERS][mInfo]; |
2• Porque usou um enumerador jб que sу armazenou uma variavel, seria o mesmo que new mCoins[MAX_PLAYERS]; nгo tem problema usar mas acho meio inutнl usar ela pra uma sу variavel
Quote:
|
CMD:creditos(playerid) { SendClientMessage(playerid, -1, "{00FFFF} » {FFFFFF}Media_Wallker Pela Criaзгo do Sistema"); return 1; } CMD:ajuda(playerid) { SendClientMessage(playerid, -1, "{00FFFF} » {FFFFFF}/comprar,/creditos,/darcoins"); return 1; } |
O resto esta bom, e nгo esqueзa de seguir as dicas do iianZ
Re: mCoins Sistema de Coins - MediaCL - 15.12.2017
Obrigado tambйm C4rtm4n
Jб segui as dicas do ilanZ
Re: mCoins Sistema de Coins - Marllun - 15.12.2017
Arrumei o fs todo. agora vocк pode postar a versгo 3.0
PHP Code:
/*sistema feito totalmente por media
nгo retire os crйditos !
Primeira release do Sistema
Falta Fazer:
Salvamento do Coins
que estб incompleto
e adicionar um veнculo a mas para testes
*/
#include <a_samp>
#include <sscanf2>
#include <pawn.cmd>
#include <dof2>
#define DIRETORIO "Coins/%s.ini"
#define function
#define FILTERSCRIPT
new
PlayerText:Textdraw0[MAX_PLAYERS],
stringglobal[70],
attcoins[MAX_PLAYERS],
mCoins[MAX_PLAYERS]
;
public OnFilterScriptInit()
{
print("\nSistema de mCoins Carregado com Sucesso\n");
print(" Sistema feito por Media_Wallker");
print("Nгo Retire os Crйditos\n");
return 1;
}
public OnFilterScriptExit() DOF2_Exit();
function CarregarPlayer(playerid){
format(stringglobal, sizeof(stringglobal), DIRETORIO, PlayerName(playerid));
attcoins[playerid] = SetTimerEx("atualizartxd", 1000, true, "i", playerid);
if(DOF2_FileExists(stringglobal))
{
mCoins[playerid] = DOF2_GetInt(stringglobal, "Coins");
}
else
{
DOF2_CreateFile(stringglobal);
}
return 1;
}
function SalvarPlayer(playerid){
format(stringglobal, sizeof(stringglobal), DIRETORIO, PlayerName(playerid));
DOF2_SetInt(stringglobal,"Coins",mCoins[playerid]);
KillTimer(attcoins[playerid]);
DOF2_SaveFile();
return 1;
}
function PlayerName(playerid){
static Name[MAX_PLAYER_NAME];
GetPlayerName(playerid, Name, sizeof Name);
return Name;
}
public OnPlayerConnect(playerid)
{
CarregarPlayer(playerid);
Textdraw0[playerid] = CreatePlayerTextDraw(playerid, 532.799865, 111.253349, "Coins: ~w~0");
PlayerTextDrawLetterSize(playerid, Textdraw0[playerid], 0.449999, 1.600000);
PlayerTextDrawAlignment(playerid, Textdraw0[playerid], 1);
PlayerTextDrawColor(playerid, Textdraw0[playerid], 16777215);
PlayerTextDrawSetShadow(playerid, Textdraw0[playerid], 0);
PlayerTextDrawSetOutline(playerid, Textdraw0[playerid], 1);
PlayerTextDrawBackgroundColor(playerid, Textdraw0[playerid], 51);
PlayerTextDrawFont(playerid, Textdraw0[playerid], 1);
PlayerTextDrawSetProportional(playerid, Textdraw0[playerid], 1);
return 1;
}
public OnPlayerDisconnect(playerid, reason) return SalvarPlayer(playerid);
public OnPlayerSpawn(playerid)
{
SendClientMessage(playerid, -1, "{00FFFF} » {FFFFFF}Sistema Criado por Media_Wallker");
SendClientMessage(playerid, -1, "{00FFFF} » {FFFFFF}Para ver os Comandos use /ajuda");
PlayerTextDrawShow(playerid, Textdraw0[playerid]);
return 1;
}
forward atualizartxd(playerid);
public atualizartxd(playerid)
{
format(stringglobal,sizeof(stringglobal),"Coins ~b~%d",mCoins[playerid]);
PlayerTextDrawSetString(playerid, Textdraw0[playerid], stringglobal);
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 2316)
{
if(response)
{
new Float:pp;
new Float:ppp;
new Float:pppp;
new Float:ppppp;
if(listitem == 0)
{
if(mCoins[playerid] < 1000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou uma Sanchez por 1.000 Coins");
GetPlayerPos(playerid, pp,ppp,pppp);
GetPlayerFacingAngle(playerid, ppppp);
CreateVehicle(468, pp,ppp,pppp,ppppp, -1, -1, -1);
mCoins[playerid] -= 1000;
}
if(listitem == 1)
{
if(mCoins[playerid] < 5000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou uma NRG-500 por 5000 Coins");
GetPlayerPos(playerid, pp,ppp,pppp);
GetPlayerFacingAngle(playerid, ppppp);
CreateVehicle(522, pp,ppp,pppp,ppppp, -1, -1, -1);
mCoins[playerid] -= 5000;
}
if(listitem == 2)
{
if(mCoins[playerid] < 5000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou um Buffalo por 5000 Coins");
GetPlayerPos(playerid, pp,ppp,pppp);
GetPlayerFacingAngle(playerid, ppppp);
CreateVehicle(402, pp,ppp,pppp,ppppp, -1, -1, -1);
mCoins[playerid] -= 5000;
}
if(listitem == 3)
{
if(mCoins[playerid] < 10000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou um Super-GT por 10000 Coins");
GetPlayerPos(playerid, pp,ppp,pppp);
GetPlayerFacingAngle(playerid, ppppp);
CreateVehicle(506, pp,ppp,pppp,ppppp, -1, -1, -1);
mCoins[playerid] -= 10000;
}
if(listitem == 4)
{
if(mCoins[playerid] < 9000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou um Turismo por 9000 Coins");
GetPlayerPos(playerid, pp,ppp,pppp);
GetPlayerFacingAngle(playerid, ppppp);
CreateVehicle(451, pp,ppp,pppp,ppppp, -1, -1, -1);
mCoins[playerid] -= 9000;
}
if(listitem == 5)
{
if(mCoins[playerid] < 15000) return SendClientMessage(playerid, -1, "Vocк nгo possui coins o suficiente");
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou um Jetpack por 15000 Coins");
SetPlayerSpecialAction(playerid, 2);
mCoins[playerid] -= 15000;
}
}
}
if(dialogid == 2318)
{
if(response)
{
if(listitem == 0)
{
ShowPlayerDialog(playerid, 2316, 5, "Comprar Veiculos",
"Veiculo\tPreзo(Coins)\n\
Sanchez\t{33AA33}Ђ{FFFFFF}1.000 Coins\n\
NRG-500\t{33AA33}Ђ{FFFFFF}5.000 Coins\n\
Buffalo\t{33AA33}Ђ{FFFFFF}5.000 Coins\n\
Super-GT\t{33AA33}Ђ{FFFFFF}10.000 Coins\n\
Turismo\t{33AA33}Ђ{FFFFFF}9.000 Coins\n\
Jetpack\t{33AA33}Ђ{FFFFFF}15.000 Coins", "Selecionar", "Sair");
}
if(listitem == 1)
{
ShowPlayerDialog(playerid, 2317, 5, "Comprar Armas",
"Arma\tBalas\tPreзo(Coins)\n\
Deagle\t150\t{33AA33}Ђ{FFFFFF}1.000 Coins\n\
ShotGun\t160\t{33AA33}Ђ{FFFFFF}2.000 Coins\n\
MP5\t300\t{33AA33}Ђ{FFFFFF}3.000 Coins\n\
Ak-47\t450\t{33AA33}Ђ{FFFFFF}4.000 Coins\n\
Soco Ingкs\t{FF0000}N/A\t{33AA33}Ђ{FFFFFF}2.000 Coins", "Selecionar", "Sair");
}
}
return 1;
}
if(dialogid == 2317)
{
if(response)
{
if(listitem == 0)
{
if(mCoins[playerid] < 1000) return SendClientMessage(playerid, -1, "Seus Coins Sгo Insuficientes para Realizar a Compra.");
GivePlayerWeapon(playerid, 24, 150);
mCoins[playerid] -= 1000;
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou uma Deagle com 150 Balas");
}
if(listitem == 1)
{
if(mCoins[playerid] < 2000) return SendClientMessage(playerid, -1, "Seus Coins Sгo Insuficientes para Realizar a Compra.");
GivePlayerWeapon(playerid, 25, 160);
mCoins[playerid] -= 2000;
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou uma ShotGun com 160 Balas");
}
if(listitem == 2)
{
if(mCoins[playerid] < 3000) return SendClientMessage(playerid, -1, "Seus Coins Sгo Insuficientes para Realizar a Compra.");
GivePlayerWeapon(playerid, 29, 300);
mCoins[playerid] -= 3000;
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou uma MP5 com 300 Balas");
}
if(listitem == 3)
{
if(mCoins[playerid] < 4000) return SendClientMessage(playerid, -1, "Seus Coins Sгo Insuficientes para Realizar a Compra.");
GivePlayerWeapon(playerid, 30, 450);
mCoins[playerid] -= 4000;
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou uma AK47 com 450 Balas");
}
if(listitem == 4)
{
if(mCoins[playerid] < 2000) return SendClientMessage(playerid, -1, "Seus Coins Sгo Insuficientes para Realizar a Compra.");
GivePlayerWeapon(playerid, 1, 1);
mCoins[playerid] -= 2000;
SendClientMessage(playerid, -1, "{FF6347}Comprado:{9C9C9C}Vocк comprou um Soco Inglкs");
}
}
}
return 1;
}
CMD:darcoins(playerid, params[])
{
new para1, level;
static giveplayer[MAX_PLAYER_NAME],sendername[MAX_PLAYER_NAME];
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Vocк nгo й admininistrador!");
if(sscanf(params, "ui", para1, level)) return SendClientMessage(playerid, -1, "{FF6347}USE:{9C9C9C} /darcoins [id] [quantia]");
GetPlayerName(para1, giveplayer, sizeof(giveplayer));
GetPlayerName(playerid, sendername, sizeof(sendername));
if(IsPlayerConnected(para1))
{
format(stringglobal, sizeof stringglobal, "Vocк deu R$%d para %s", level, giveplayer);
SendClientMessage(playerid, -1, stringglobal);
format(stringglobal, sizeof stringglobal, "O Admininstrador %s te deu R$%d", sendername, level);
SendClientMessage(para1, -1, stringglobal);
mCoins[playerid] +=level;
}
return 1;
}
CMD:comprar(playerid)
{
static string[128];
format(string, sizeof string, "{00FFFF} » {FFFFFF}Comprar Veнculos\n{00FFFF} » {FFFFFF}Comprar Armas");
ShowPlayerDialog(playerid, 2318, DIALOG_STYLE_LIST, "Menu Coins",string,"Selecionar", "Sair");
return 1;
}
CMD:creditos(playerid) return SendClientMessage(playerid, -1, "{00FFFF} » {FFFFFF}Media_Wallker Pela Criaзгo do Sistema");
CMD:ajuda(playerid) return SendClientMessage(playerid, -1, "{00FFFF} » {FFFFFF}/comprar,/creditos,/darcoins");
Re: mCoins Sistema de Coins - Gguiz - 15.12.2017
Algumas coisas poderiam ser otimizadas e organizadas melhor.
+REP pelo esforзo e tempo gasto.
Re: mCoins Sistema de Coins - MediaCL - 15.12.2017
PHP Code:
v3.0 - 15/12/2017
Sistema de Login/Registro Salvamento em DOF2
Ele Salva, Vida,Colete,Dinheiro,Coins,Senha(Sem Encrypt)
Agora no Comando /comprar, vocк pode transferir Coins a outro jogador
Salvamento Funcionando 100%
Algumas Variбveis, Foram Juntadas Exemplo (new new mCoins[MAX_PLAYERS],EditGive[MAX_PLAYERS]...)
Juntei elas, assim deixando o Sistema Mas Leve
Nova TextDraw do Coins agora ficando em Cima do Mapa Como No Print Abaixo
Comando /creditos retirado
o enumrador mInfo
Foi Retirado, assim se tornando uma varнavel agora ficou mas fбcil e complexo o sistema
Algumas Partes do Cуdigo, do Marllun Foram Acoplados, no Sistema
Re: mCoins Sistema de Coins - Marllun - 15.12.2017
Melhorou muito +rep. Uma dica tira a atualizaзгo do textdraw do onplayerupdate e colocar function em vez de stock.
Re: mCoins Sistema de Coins - ViDaLoKa1 - 15.12.2017
Agora melhorou, mais ainda tem uma coisa que nгo entendi que й o porque dessa variбvel "Logou", qual o motivo de salvar?
Re: mCoins Sistema de Coins - Marllun - 15.12.2017
Vezes que logou no servidor
Re: mCoins Sistema de Coins - MediaCL - 15.12.2017
Essa variavel eu tinha usado para verificar quantas vezes o player tinha logado, para fazer um RG Bбsico
mas acabei esquecendo deste detalhe
Ops:Link Atualizado