[Ivanlamega]

Hola a todos
tengo este FS que me descargue y lo traduje se llama sex-system
al usar los comandos funciona bien abre la lista perfectamente
pero tengo dos problemas
primero es el de la farmacia pongo /farmacia
abre la lista de compras y cuando intento comprar algo no lo hace
deberнa poner "compraste un condуn" o algo asн pero no lo dice tampoco me da el objeto
y mi segundo problema es
al estar en la habitaciуn donde tienes sexo xD deberнa aparecer una lista con animaciones para elegir
pero tampoco me aparece, al compilarlo no me dio error pero si me dice esto

Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase

Header size: 1432 bytes
Code size: 39152 bytes
Data size: 25388 bytes
Stack/heap size: 16384 bytes; estimated max. usage=620 cells (2480 bytes)
Total requirements: 82356 bytes

aquн les dejo el fs

Код:

#include <a_samp>
#include <zcmd>
#include <sscanf2>

forward RecuperandoSida(playerid);

#define Vermelho 0xFF0000FF
#define ANIM 45
#define OKAY 46
#define FARMACIA 47

new PlayerInvited;
new EnSexo[MAX_PLAYERS];
new Yainvitado[MAX_PLAYERS];
new condones[MAX_PLAYERS];
new CuraSida[MAX_PLAYERS];
new ConSida[MAX_PLAYERS];
new TimerRec;
public OnFilterScriptInit()
{
printf("Sex System Cargado - Coded By : Break & .FuneraL.");
return 1;
}

public OnFilterScriptExit()
{
printf("Sex System Cerrado - Coded By : Break & .FuneraL.");
return 1;
}

public OnPlayerConnect(playerid)
{
Yainvitado[playerid] = 0;
EnSexo[playerid] = 0;
return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
Yainvitado[playerid] = 0;
EnSexo[playerid] = 0;
return 1;
}

CMD:pedirsexo(playerid, params[])
{
new CsexoID, nome[24], Cnome[24], String[128];
if(sscanf(params, "i", CsexoID)) return SendClientMessage(playerid, Vermelho, "{00BFFF}[USO]:{E0FFFF} /pedirsexo [PlayerID]");
if(Yainvitado[playerid] == 1) return SendClientMessage(playerid, Vermelho, "{00BFFF}[ERRO]: {E0FFFF}Ya has invitado a alguien para tener sexo.");
if(EnSexo[PlayerInvited] == 1) return SendClientMessage(playerid, Vermelho, "{00BFFF}[ERRO]: {E0FFFF}"Este jugador ya estб teniendo sexo!");
if(ConSida[PlayerInvited] == 1) return SendClientMessage(playerid, Vermelho, "{00BFFF}[ERRO]:{E0FFFF}"Usted estб con el virus!");
GetPlayerName(playerid, nome, sizeof(nome));
GetPlayerName(CsexoID, Cnome, sizeof(Cnome));
PlayerInvited = playerid;
format(String, sizeof(String), "{00BFFF}[Sex-System]:{E0FFFF} Fue invitado por {1E90FF}%s {E0FFFF}Para tener Sexo", Cnome);
SendClientMessage(playerid, -1, String);
format(String, sizeof(String), "{00BFFF}[Sex-System]:{1E90FF} %s {E0FFFF}Te invito a tener sexo, /aceptarsexo o /rechazar", nome);
SendClientMessage(CsexoID, -1, String);
Yainvitado[playerid] = 1;
EnSexo[PlayerInvited] = 1;
return 1;
}
CMD:aceptarsexo(playerid)
{
new PlayerName[24], String[128];
if(EnSexo[playerid] == 1) return SendClientMessage(playerid, Vermelho, "[ERRO]{E0FFFF}: "Usted ya esta teniendo sexo con alguien!");
if(condones[playerid] < 1)
{
ConSida[playerid] = 1;
ConSida[PlayerInvited] = 1;
}
condones[playerid]--;
condones[PlayerInvited]--;
format(String, sizeof(String), "{00BFFF}[Sex-System]:{1E90FF} %s {E0FFFF}Acepto tu invitaciуn, {FF1493}Disfrutalo", PlayerName);
SendClientMessage(PlayerInvited, -1, String);
SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]:{E0FFFF} Aceptaste la invitacion, Disfrutalo");
SetPlayerPos(PlayerInvited, 197.3705,175.3568,1003.0234);
SetPlayerPos(playerid, 197.3318,176.0381,1003.0234);
ResetPlayerWeapons(playerid);
ResetPlayerWeapons(PlayerInvited);
ApplyAnimation(PlayerInvited,"FINALE","FIN_Land_Car",4.1,0,1,1,1,1);
ApplyAnimation(playerid,"MD_END","END_SC1_SMO",4.1,0,1,1,1,1);

SetPlayerVirtualWorld(playerid, 3);
SetPlayerVirtualWorld(PlayerInvited, 3);

SetPlayerInterior(playerid, 3);
SetPlayerInterior(PlayerInvited, 3);

SetPlayerDrunkLevel(playerid, 3000);
SetPlayerDrunkLevel(PlayerInvited, 3000);

SetPlayerTime(playerid, 24, 24);
SetPlayerTime(PlayerInvited, 24, 24);

GivePlayerWeapon(playerid, 10, 1);
GivePlayerWeapon(PlayerInvited, 10, 1);

ShowPlayerDialog(playerid, OKAY, DIALOG_STYLE_LIST, "{6495ED}Sex System Menu", "{00FFFF}Desea lo mismo ?\n{00FFFF}Cancelar Sexo", "Confirmar","");
ShowPlayerDialog(PlayerInvited, OKAY, DIALOG_STYLE_LIST, "{6495ED}Sex System Menu", "{00FFFF}Desea lo mismo ?\n{00FFFF}Cancelar Sexo", "Confirmar","");
return 1;
}
CMD:pararsexo(playerid)
{
SpawnPlayer(playerid);
SpawnPlayer(PlayerInvited);
Yainvitado[PlayerInvited] = 0;
EnSexo[PlayerInvited] = 0;
Yainvitado[playerid] = 0;
EnSexo[playerid] = 0;
StopAudioStreamForPlayer(playerid);
return 1;
}

CMD:rechazar(playerid)
{
SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}"Rechazaste tener sexo!");
SendClientMessage(PlayerInvited,-1,"{00BFFF}[Sex-System]: {E0FFFF}El sexo fue rechazado");
Yainvitado[PlayerInvited] = 0;
Yainvitado[playerid] = 0;
EnSexo[PlayerInvited] = 1;
EnSexo[playerid] = 1;
return 1;
}
CMD:farmacia(playerid)
{
new NomePlayer[24], StringP[128];
GetPlayerName(playerid, NomePlayer, 24);
format(StringP, sizeof(StringP), "{00BFFF}[Sex-System]:{1E90FF} %s {E0FFFF}Abriу la farmacia para hacer compras!", NomePlayer);
SendClientMessageToAll(-1, StringP);
ShowPlayerDialog(playerid, FARMACIA, DIALOG_STYLE_LIST, "Farmбcia", "condуn\nDoble Dildo\nVibrador simple\nCura para el SIDA","Comprar","Cancelar");
return 1;
}
CMD:infosalud(playerid)
{
new DSaude[400], StringS[150], NomePlayer[24], Status[30];
GetPlayerName(playerid, NomePlayer, 24);
if(ConSida[playerid] == 0) Status = "No";
if(ConSida[playerid] == 1) Status = "Si";
format(StringS, sizeof(StringS), "{E0FFFF}Nombre: {1E90FF}%s\n\n", NomePlayer); strcat(DSaude, StringS);
format(StringS, sizeof(StringS), "{E0FFFF}Nъmero de condones : {1E90FF}%d\n", condones[playerid]); strcat(DSaude, StringS);
format(StringS, sizeof(StringS), "{E0FFFF}SIDA:{1E90FF} %s", Status); strcat(DSaude, StringS);
ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "{1E90FF}Su Informaciуn de Salud", DSaude, "Ok", "Cancelar");
return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys & KEY_YES)
{
ShowPlayerDialog(playerid, ANIM, DIALOG_STYLE_LIST, "{1E90FF}Elija su Anim", "{00FFFF}En 4\n {00FFFF}Comer\n{00FFFF}beso\n{00FFFF}Anim 1\n{00FFFF}Anim 2", "Elegir", "salir");
return 1;
}
return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{

StopAudioStreamForPlayer(playerid);
Yainvitado[PlayerInvited] = 0;
EnSexo[PlayerInvited] = 0;
Yainvitado[playerid] = 0;
EnSexo[playerid] = 0;
SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Su amor te matу. =/");
SendClientMessage(PlayerInvited,-1,"{00BFFF}[Sex-System]: {E0FFFF}El sexo terminу");
return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == OKAY)
{
if(response)
{
if(listitem == 0)
{
SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]:{E0FFFF} Usted decidiу Avanzar");
SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Para cambiar de animaciуn precione {00BFFF}'Y'");
EnSexo[playerid] = 1;
EnSexo[PlayerInvited] = 1;
PlayAudioStreamForPlayer(playerid, "http://www.exxxplosivo.com/music/DiscoEnFuego/75%20Gloria%20Gaynor%20-%20I%20will%20survive.mp3");
}
if(listitem == 1)
{
SpawnPlayer(PlayerInvited);
SpawnPlayer(playerid);
SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Ha cancelado el sexo");
SendClientMessage(PlayerInvited,-1,"{00BFFF}[Sex-System]: {E0FFFF}Su socio Brochou en el lugar H!");
EnSexo[playerid] = 0;
EnSexo[PlayerInvited] = 0;
Yainvitado[playerid] = 0;
Yainvitado[PlayerInvited] = 0;
}
}
return 1;
}
if(dialogid == ANIM)
{
if(response)
{
if(listitem == 0)
{
ApplyAnimation(playerid,"FINALE","FIN_Land_Car",4.1,0,1,1,1,1);
}
if(listitem == 1)
{
ApplyAnimation(playerid,"MD_END","END_SC1_SMO",4.1,0,1,1,1,1);
}
if(listitem == 2)
{
ApplyAnimation(playerid,"KISSING", "Grlfrd_Kiss_02", 1.800001, 1, 0, 0, 1, 600);
}
if(listitem == 3)
{
ApplyAnimation(playerid, "BLOWJOBZ", "BJ_COUCH_START_W", 4.0, 0, 0, 0, 1, 0);
}
if(listitem == 4)
{
ApplyAnimation(playerid, "BLOWJOBZ", "BJ_COUCH_END_W", 4.0, 0, 0, 0, 1, 0);
return 1;
}
}
return 1;
}
if(dialogid == FARMACIA)
{
if(response)
{
switch(listitem)
{
case 0:
{
if(GetPlayerMoney(playerid) < 500) return SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Usted no tiene suficiente dinero para hacer una compra");
SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Usted comprу un Condуn");
condones[playerid]++;
GivePlayerMoney(playerid, -500);
}
case 1:
{
if(GetPlayerMoney(playerid) < 1000) return SendClientMessage(playerid, -1, "[Sex-System]: Usted no tiene suficiente dinero para hacer una compra");
SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Usted comprу un consolador doble");
GivePlayerWeapon(playerid, 10, 1);
GivePlayerMoney(playerid, -1000);
}
case 2:
{
if(GetPlayerMoney(playerid) < 750) return SendClientMessage(playerid, -1, "[Sex-System]: {E0FFFF}Usted no tiene suficiente dinero para hacer una compra");
SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Usted comprу un vibrador");
GivePlayerWeapon(playerid, 11, 1);
GivePlayerMoney(playerid, -750);
}
case 3:
{
if(GetPlayerMoney(playerid) < 20000) return SendClientMessage(playerid, -1, "[Sex-System]: Usted no tiene suficiente dinero para hacer una compra");
if(ConSida[playerid] == 1) return SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Usted no tiene SIDA");
SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: Enhorabuena, has encontrado la cura para el SIDA, Gastу R$20.000 - Se estб recuperando");
CuraSida[playerid] = 1;
ConSida[playerid] = 0;
GivePlayerMoney(playerid, -20000);
SendClientMessage(playerid, -1,"{00BFFF}[Sex-System]: {E0FFFF}Recuperando");
TimerRec = SetTimerEx("RecuperandoSida", 15000, false, "i", playerid);
}
}
}
}
return 1;
}

public RecuperandoSida(playerid)
{
ConSida[playerid] = 0;
KillTimer(TimerRec);
SendClientMessage(playerid, -1,"{00BFFF}[Sex-System]: {E0FFFF}Recuperado");
return 1;
}