pomoc Pawno VIP system

[Michal1 0]

Čus prosím nevíte kde jsem udělal chybu ?Zde kod

#include <a_samp>
#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
#define DIALOG_NEON 667
#define DIALOG_SUNGLASS 668
#define DIALOG_CAPS 669
#define DIALOG_BACKCAPS 700
#define COLOR_CERVENA   0xFF0000AA
new vip[MAX_PLAYERS];[/b][/size]
[size=7][b]stock Meno(playerid)
{
  new m[255];
  GetPlayerName(playerid,m,255);
  return m;
}[/b][/size]
[size=7][b]public OnPlayerConnect(playerid)
{
vip[playerid] = 0;
return 1;
}[/b][/size]
[size=7][b]public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/vip", dcmd_vcredits, true, 10) == 0)
{
   ShowPlayerDialog(playerid,DIALOG_BACKCAPS,1,"{0xFF0000AA}========== V.I.P by Michal1 ========== ",
   ShowPlayerDialog(playerid,DIALOG_BACKCAPS,2,"{0xFF0000AA} /vip ; /vrepair /vflip /vmoney ",
   return 1;
}
if (strcmp("/vrepair", cmdtext, true, 10) == 0)
{
   if(vip[playerid]  != 1) return  SendClientMessage(playerid, 0xFFFFFFAA, "Nejsi  V.I.P člen.");
SendClientMessage(playerid,0xFFFF00AA,"Opravil sis auto.");
   RepairVehicle(GetPlayerVehicleID(playerid));
  return 1;
}
if (strcmp("/vmoney", cmdtext, true, 10) == 0)
{
if(vip[playerid]  != 1) return  SendClientMessage(playerid, 0xFFFFFFAA, "Nejsi  V.I.P člen.");
SendClientMessage(playerid,0xFFFF00AA,"Dal si si 500000");
GivePlayerMoney(playerid,500000);
return 1;
}
dcmd(dvip,4,cmdtext);
dcmd(zvip,4,cmdtext);
dcmd(vflip,5,cmdtext);
return 0;
}[/b][/size]
[size=7][b]dcmd_dvip(playerid, params[])
{
  new id = strval(params);
  new string[256];
  if (!strlen(params)) return SendClientMessage(playerid, 0xFF0000AA, "Použite /dvip [id]");
  if(IsPlayerAdmin(playerid)) return SendClientMessage(playerid, 0xFF0000AA, "Jen Pre Rcon");
  else if(!IsPlayerConnected(id)) return SendClientMessage(playerid, 0xFF0000AA, "Zadané id neni je pripojené");
  format(string, 200, "Administrátor %s dal V.I.P hráčovi %s. ",Meno(playerid), Meno(id));
  SendClientMessageToAll(0xff0000AA, string);
  vip[id] = 1;
  return 1;
  }
dcmd_zvip(playerid, params[])
{
  new id = strval(params);
  new string[256];
  if (!strlen(params)) return SendClientMessage(playerid, 0xFF0000AA, "Použite /sebrat [id]");
  if(IsPlayerAdmin(playerid)) return SendClientMessage(playerid, 0xFF0000AA, "Jen Pro Rcon");
  else if(!IsPlayerConnected(id)) return SendClientMessage(playerid, 0xFF0000AA, "Zadané id neni je pripojené");
  format(string, 200, "Administrátor %s zobral V.I.P hráčovi %s. ",Meno(playerid), Meno(id));
  SendClientMessageToAll(0xff0000AA, string);
  vip[id] = 0;
  return 1;
  }
dcmd_vflip(playerid, params[]){
#pragma unused params
if(vip[playerid] != 1) return SendClientMessage(playerid,0xFF0000AA,"Nejsi V.I.P člen");
new Float:z;
if(IsPlayerInAnyVehicle(playerid)){
GetVehicleZAngle(GetPlayerVehicleID(playerid),z);
SetVehicleZAngle(GetPlayerVehicleID(playerid),z);
}else{
SendClientMessage(playerid,0xFFFFFFAA,"Nejsi ve vozidle");
}
return 1;
}

Piše mi to chyby zde:

 

C:\Documents and Settings\Michal1\Plocha\V.i.p.pwn(25) : error 017: undefined symbol "dcmd_vcredits"

C:\Documents and Settings\Michal1\Plocha\V.i.p.pwn(27 -- 29) : error 029: invalid expression, assumed zero

C:\Documents and Settings\Michal1\Plocha\V.i.p.pwn(29) : warning 215: expression has no effect

Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase

 

 

2 Errors.

 

Dík za pomoc

[Mivčo 90]

#include <a_samp>
#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
#define DIALOG_NEON 667
#define DIALOG_SUNGLASS 668
#define DIALOG_CAPS 669
#define DIALOG_BACKCAPS 700
#define COLOR_CERVENA 0xFF0000AA
new vip[MAX_PLAYERS];
stock Meno(playerid)
{
new m[255];
GetPlayerName(playerid,m,255);
return m;
}
public OnPlayerConnect(playerid)
{
vip[playerid] = 0;
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/vip", cmdtext, true, 10) == 0)
{
SendClientMessage(playerid, 0xFFFFFFAA, "{0xFF0000AA}========== V.I.P by Michal1 ========== ");
SendClientMessage(playerid, 0xFFFFFFAA, "{0xFF0000AA} /vip ; /vrepair /vflip /vmoney ");
return 1;
}

if (strcmp("/vrepair", cmdtext, true, 10) == 0)
{
if(vip[playerid] != 1) return SendClientMessage(playerid, 0xFFFFFFAA, "Nejsi V.I.P člen.");
SendClientMessage(playerid,0xFFFF00AA,"Opravil sis auto.");
RepairVehicle(GetPlayerVehicleID(playerid));
return 1;
}
if (strcmp("/vmoney", cmdtext, true, 10) == 0)
{
if(vip[playerid] != 1) return SendClientMessage(playerid, 0xFFFFFFAA, "Nejsi V.I.P člen.");
SendClientMessage(playerid,0xFFFF00AA,"Dal si si 500000");
GivePlayerMoney(playerid,500000);
return 1;
}
dcmd(dvip,4,cmdtext);
dcmd(zvip,4,cmdtext);
dcmd(vflip,5,cmdtext);
return 0;
}
dcmd_dvip(playerid, params[])
{
new id = strval(params);
new string[256];
if (!strlen(params)) return SendClientMessage(playerid, 0xFF0000AA, "Použite /dvip [id]");
if(IsPlayerAdmin(playerid)) return SendClientMessage(playerid, 0xFF0000AA, "Jen Pre Rcon");
else if(!IsPlayerConnected(id)) return SendClientMessage(playerid, 0xFF0000AA, "Zadané id neni je pripojené");
format(string, 200, "Administrátor %s dal V.I.P hráčovi %s. ",Meno(playerid), Meno(id));
SendClientMessageToAll(0xff0000AA, string);
vip[id] = 1;
return 1;
}
dcmd_zvip(playerid, params[])
{
new id = strval(params);
new string[256];
if (!strlen(params)) return SendClientMessage(playerid, 0xFF0000AA, "Použite /sebrat [id]");
if(IsPlayerAdmin(playerid)) return SendClientMessage(playerid, 0xFF0000AA, "Jen Pro Rcon");
else if(!IsPlayerConnected(id)) return SendClientMessage(playerid, 0xFF0000AA, "Zadané id neni je pripojené");
format(string, 200, "Administrátor %s zobral V.I.P hráčovi %s. ",Meno(playerid), Meno(id));
SendClientMessageToAll(0xff0000AA, string);
vip[id] = 0;
return 1;
}
dcmd_vflip(playerid, params[]){
#pragma unused params
if(vip[playerid] != 1) return SendClientMessage(playerid,0xFF0000AA,"Nejsi V.I.P člen");
new Float:z;
if(IsPlayerInAnyVehicle(playerid)){
GetVehicleZAngle(GetPlayerVehicleID(playerid),z);
SetVehicleZAngle(GetPlayerVehicleID(playerid),z);
}else{
SendClientMessage(playerid,0xFFFFFFAA,"Nejsi ve vozidle");
}
return 1;
}

 

Nauč sa zatvorkovat

[Michal1 0]

Děkuji moc

 

Jinak není ten VIP a přikazy v dialogu to musím předělat do dialogu

[Ewwe 434]

Hlavně jinak chybu děláš neoptimalizací .. ale pořád lepší když narveš do scm 200 než někteří kteří jsou tam schopni narubat 1024

[Michal1 0]

jo jo dík já vím není to supr a idealní ale co už no

[ATomas 288]

Hlavně jinak chybu děláš neoptimalizací .. ale pořád lepší když narveš do scm 200 než někteří kteří jsou tam schopni narubat 1024

To je jedno ta promena stejne existuje jen v zasobniku (kdyz je funkce volana) a jakmile je proces dokoncen maze se. Ale hlavne problem je v tom ze kdyz posles do chatu delsi zpravu nez 144 znaku nezobrazi se ti. takze je dobre tam dat 144 a min aby se zobrazila alespon cast zpravy.

Edited 18. Duben, 2016 by ATomas