24.12.2011, 15:32
Quote:
Buenas, necesito un script de /pagar para un servidor RP que el que tengo no va
|
pawn Код:
if (strcmp("/pago", cmdtext, true, 10) == 0)
{
new tmp[256], tmp2[256], Index; tmp = strtok(cmdtext,Index), tmp2 = strtok(cmdtext,Index);
if(!strlen(tmp) || !strlen(tmp2) || !IsNumeric(tmp2)) return SendClientMessage(playerid, Amarillo, "[USO]: /pago [id] [cantidad]");
new player1 = strval(tmp), Texto[128], nombre[MAX_PLAYER_NAME], nombre2[MAX_PLAYER_NAME];
GetPlayerName(playerid, nombre, MAX_PLAYER_NAME);
GetPlayerName(player1, nombre2, MAX_PLAYER_NAME);
if(strval(tmp2) <= GetPlayerMoney(playerid))
{
if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID)
{
format(Texto, sizeof(Texto), "Le Pagaste $%d a %s", strval(tmp2), nombre2); SendClientMessage(playerid,Verde,Texto);
GivePlayerMoney(playerid, -strval(tmp2));
if(player1 != playerid)
{
format(Texto,sizeof(Texto),"%s te pago $%d", nombre, strval(tmp2)); SendClientMessage(player1,Verde,Texto);
GivePlayerMoney(player1, strval(tmp2));
}
return 1;
} else return SendClientMessage(playerid,Rojo,"[ERROR]: El jugador no existe");
} else return SendClientMessage(playerid,Rojo,"[ERROR]:No tienes suficiente plata para pagarle.");
}
![Wink](images/smilies/wink.png)