1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese

Threaded Mode
[AJUDA] quando morrer ir ao Hospital
Pedro Pawno
Gangsta
****
Posts: 613
Threads: 85
Joined: Oct 2011
Reputation: 0
#1

25.11.2011, 23:37
Bom queria um sistema que quando alguйm, morre ele ir ao Hospital nгo spawnar.

por favor me ajudem preciso Muito se poderem colocar dentro deste Game mode agradeзo :

Код:
#include <a_samp>
// ================= DEFINES AQUI ==================

#define JFS_OWNA 9122 // DIALOG !   Pegeui na Net By Pedro
#pragma tabsize 0
#define COL_BOX 0x000000EE
#define COL_RED 0xFF0000FF
#define COR_CINZA_AZUL 0x456EAF67
#define COR_PRETO 0x00000000
#define COR_NAO_SEI 0xFFFFFFFF
#define COR_MAGENTA 0xA587DE0BA354
#define COR_VERDEMEDIO 0x9CDE7180
#define COR_VERMELHOCLARO 0xFF99AADD
#define COR_DARKMAGENTA 0xA7105DEF
#define COR_LARANJAVERMELHO 0xE9370DFC
#define COR_DARKVERDE 0x12900BBF
#define COR_AZULMEDIO 0x63AFF00A
#define COR_DARKROXO 0x800080AA
#define COR_MARROMCLARO 0x99934EFA
#define COR_VIOLETA 0x9955DEEE
#define COR_CIANOCLARO 0xAAFFCC33
#define COR_AZULVERDECLARO 0x0FFDD349
#define COR_OURO 0xDEAD4370
#define COR_AZULCINZA 0x456EAF67
#define COR_AZULVERDE 0x46BBAA00
#define COR_AZULNEUTRO 0xABCDEF01
#define COR_AZUL 0x0000FFAA
#define COR_CINZA 0xAFAFAFAA
#define COR_VERDE 0x33AA33AA
#define COR_VERMELHO2 0xAA3333AA
#define COR_AMARELO 0xFFFF00AA
#define COR_BRANCO 0xFFFFFFAA
#define COR_ROXO 0x9900FFAA
#define COR_MARROM 0x993300AA
#define COR_LARANJA 0xFF9933AA
#define COR_CIANO 0x99FFFFAA
#define COR_AMARELOCLARO 0xFFFFCCAA
#define COR_ROSA 0xFF66FFAA
#define COR_BEJE 0x999900AA
#define COR_LIMA 0x99FF00AA
#define COR_PRETO2 0x000000AA
#define COR_TURCA 0x00A3C0AA
#define COR_AZULCLARO 0x33CCFFAA
#define COR_GRADE1 0xB4B5B7FF
#define COR_GRADE2 0xBFC0C2FF
#define COR_GRADE3 0xCBCCCEFF
#define COR_GRADE4 0xD8D8D8FF
#define COR_GRADE5 0xE3E3E3FF
#define COR_GRADE6 0xF0F0F0FF
#define COR_VERDECLARO 0x9ACD32AA
#define COR_AMARELO2 0xF5DEB3AA
#define COR_FADA1 0xE6E6E6E6
#define COR_FADA2 0xC8C8C8C8
#define COR_FADA3 0xAAAAAAAA
#define COR_FADA4 0x8C8C8C8C
#define COR_FADA5 0x6E6E6E6E
#define COR_DARKAZUL 0x2641FEAA
#define COR_DEPARTE 0xFF8282AA
#define COR_NOVA 0xFFA500AA
#define COR_OPACO 0xE0FFFFAA
#define COR_ADICIONAL 0x63FF60AA
#define COR_SPIAO 0xBFC0C200
#define COR_INVISIVEL 0xAFAFAF00
#define COLOR_REDD 0xFF0000AA
#define BRANCO 0xFFFFFFAA

// ============ Coloque Os News Aqui ==============

//====================== Forward Aqui =======================



// ======================== Crйditos =====================
main()
{
	print("\n-----------------------------------------------");
	print(" >>>> Criado Totalmente Por: Pedro Shogun-Coder <<<<");
	print("-----------------------------------------------\n");
}
// =========================================================

public OnGameModeInit()
{



    UsePlayerPedAnims();
// =========================== TODAS AS SKINS DO JOGO ======================
	AddPlayerClass(80,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);
	AddPlayerClass(293,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);
	AddPlayerClass(107,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);
    AddPlayerClass(45,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,32,0);
    AddPlayerClass(47,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);
    AddPlayerClass(49,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);
	AddPlayerClass(70,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);
    AddPlayerClass(71,2615.7163,-962.7603,80.3227,183.9649,0,0,0,0,0,0);

  	//======================================HQ'S Gang Mapeado Por Pedro=======================//
   AddStaticVehicleEx(482,2491.69995117,-1683.90002441,13.60000038,274.38903809,86,1,15); //Burrito
   AddStaticVehicleEx(412,2477.00000000,-1682.30004883,13.30000019,60.41931152,86,1,15); //Voodoo
   AddStaticVehicleEx(600,2474.80004883,-1696.00000000,13.19999981,0.00000000,86,1,15); //Picador
   AddStaticVehicleEx(576,2509.60009766,-1671.09997559,13.10000038,0.00000000,86,1,15); //Tornado
   AddStaticVehicleEx(482,2822.09960938,-1188.00000000,25.20000076,270.24719238,6,1,15); //Burrito
   AddStaticVehicleEx(412,2815.89990234,-1187.90002441,25.00000000,267.67858887,6,1,15); //Voodoo
   AddStaticVehicleEx(475,2815.30004883,-1178.90002441,25.00000000,271.03271484,6,1,15); //Sabre
   AddStaticVehicleEx(439,2821.39990234,-1178.90002441,25.00000000,269.35717773,6,1,15); //Stallion
   AddStaticVehicleEx(482,2000.00000000,-1130.50000000,25.50000000,88.96429443,5,1,15); //Burrito
   AddStaticVehicleEx(517,2009.09997559,-1130.19995117,25.00000000,87.28576660,5,1,15); //Majestic
   AddStaticVehicleEx(566,1997.40002441,-1141.30004883,25.39999962,88.96429443,5,1,15); //Tahoma
   AddStaticVehicleEx(547,2004.40002441,-1141.69995117,25.00000000,88.96435547,5,1,15); //Primo
   AddStaticVehicleEx(482,1830.50000000,-2000.30004883,13.60000038,181.28582764,125,1,15); //Burrito
   AddStaticVehicleEx(567,1828.00000000,-2029.50000000,13.19999981,0.00000000,125,1,15); //Savanna
   AddStaticVehicleEx(492,1818.00000000,-2031.59997559,13.10000038,0.00000000,125,1,15); //Greenwood
   AddStaticVehicleEx(467,1823.80004883,-2001.00000000,13.10000038,178.71411133,125,125,15); //Oceanic
//======================================HQ Onibus Por Pedro =============================================
  AddStaticVehicleEx(431,1699.00000000,1287.40002441,10.89999962,269.35717773,40,1,15); //Bus
  AddStaticVehicleEx(431,1680.19995117,1287.50000000,11.19999981,269.35717773,40,1,15); //Bus
  AddStaticVehicleEx(431,1664.80004883,1287.90002441,10.89999962,269.35717773,40,1,15); //Bus
  AddStaticVehicleEx(431,1698.40002441,1315.50000000,10.89999962,269.35705566,40,1,15); //Bus
  AddStaticVehicleEx(431,1681.40002441,1316.19995117,10.89999962,269.35717773,40,1,15); //Bus
  AddStaticVehicleEx(431,1665.90002441,1316.40002441,10.89999962,269.35717773,-1,-1,15); //Bus
  AddStaticVehicleEx(431,1645.69995117,1317.59997559,11.10000038,269.35717773,40,1,15); //Bus
  AddStaticVehicleEx(431,1644.19995117,1287.50000000,10.89999962,269.35180664,40,1,15); //Bus
  AddStaticVehicleEx(431,1644.40002441,1308.30004883,11.10000038,271.03576660,-1,-1,15); //Bus
  AddStaticVehicleEx(431,1644.90002441,1298.30004883,10.89999962,271.03576660,40,1,15); //Bus

   return 1;
}

public OnGameModeExit()
{                                   //=================Mansгo By Elvis=================================
   CreateObject(9131,318.72219849,-1189.88903809,76.44845581,0.00000000,0.00000000,37.99621582); //object(shbbyhswall13_lvs) (1)
   CreateObject(9131,323.60058594,-1186.02050781,76.52346039,0.00000000,0.00000000,37.98522949); //object(shbbyhswall13_lvs) (2)
   CreateObject(9131,318.72219849,-1189.88903809,78.78318787,0.00000000,0.00000000,37.99621582); //object(shbbyhswall13_lvs) (3)
   CreateObject(9131,323.60128784,-1186.02075195,78.79645538,0.00000000,0.00000000,37.99621582); //object(shbbyhswall13_lvs) (4)
   CreateObject(988,320.95584106,-1187.62670898,75.77849579,0.00000000,0.00000000,38.25000000); //object(ws_apgate) (1)
   CreateObject(9131,318.72219849,-1189.88903809,78.69644928,0.00000000,0.00000000,37.99621582); //object(shbbyhswall13_lvs) (5)
   CreateObject(2922,323.84036255,-1186.30444336,77.09848022,0.00000000,0.00000000,218.00000000); //object(kmb_keypad) (1)


   return 1;
}

public OnPlayerRequestClass(playerid, classid) // Onde Irб ir Para Escolher os Bonecos
{
	SetPlayerPos(playerid,1025.5751,-2140.7637,39.2032); // PLAYER
	SetPlayerCameraPos(playerid,1019.7552,-2141.0266,37.7274); // CAMERA
    SetPlayerCameraLookAt(playerid,1021.9974,-2140.9907,38.3012); // CAMERA
    SetPlayerFacingAngle(playerid, 82.6125); // ANGULO.
    ApplyAnimation(playerid, "PARK", "Tai_Chi_Loop", 4.0, 1, 0, 0, 0, 0); // animaзгo
	return 1;
}

public OnPlayerConnect(playerid)
{
    PlayerPlaySound(playerid,1097, 0.0, 0.0, 0.0);
    GameTextForPlayer(playerid,"~n~~n~~n~~g~Bem Vindo",5000,5);
	SendClientMessage(playerid, 0xFFFFFFAA, ">> Seja Bem Vindo Ao Server Sendo feito <<");
	SendClientMessage(playerid, 0xFFFFFFAA, ">> By: Pedro Shogun-Coder <<");
	new string[40];
	new pName[25];
	GetPlayerName(playerid, pName, sizeof(pName));
	format(string, sizeof(string), "%s Entrou no Servidor!", pName);
	SendClientMessageToAll(0xAAAAAAAA, string);
	return 1;
}



public OnPlayerDisconnect(playerid, reason)
{
    new pName[MAX_PLAYER_NAME];
	new string[40];
	GetPlayerName(playerid, pName, sizeof(pName));
	format(string, sizeof(string), "%s Saiu do Servidor! ", pName);
	SendClientMessageToAll(0xAAAAAAAA, string); // COR
	return 1;
}

public OnPlayerSpawn(playerid)
{
    
   
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason) // MORRENDO
{
    GameTextForPlayer(playerid,"~y~Vocк foi morto e ira ao  Hospital que esta sendo feito por Pedro!!!",4000,3); //
    if(killerid != INVALID_PLAYER_ID) SetPlayerScore(killerid, GetPlayerScore(killerid) + 1);
    SendDeathMessage(killerid, playerid, reason);
	return 1;
}


public OnVehicleSpawn(vehicleid)
{
	return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
	return 1;
}

public OnPlayerText(playerid, text[])
    {
        ClearAnimations(playerid);
        ApplyAnimation(playerid,"PED","IDLE_CHAT",4.1,1,1,1,0,1000);
        return 1;
    }
// =========================================== Admins ==================================================
public OnPlayerCommandText(playerid, cmdtext[])
{
    if(strcmp(cmdtext, "/admins", true) == 0)
	{
    new Jogador[24];
    new count5;
    new msg[120];
    for(new i=0; i<MAX_PLAYERS; i++){
    if(IsPlayerConnected(i) && IsPlayerAdmin(i)){
    GetPlayerName(i,Jogador,24);
    format(msg,sizeof(msg),"Admins Online: %s", Jogador);
    SendClientMessage(playerid, 0xFFFFFFAA, msg);
    count5++;
    }
    }
    if(count5 == 0){
   SendClientMessage(playerid, 0xFFFFFFAA, "Nenhum Admin Online No Momento Aguarde.");
   }
   return 1;
}


// =========================== Crйditos ==============================
   if (strcmp("/creditos", cmdtext, true, 10) == 0)
    {
      new creditos[300];
      strins(creditos,"\n",strlen(creditos));
      strins(creditos,"{7491F6}Criado Por : Pedro Shogun sendo feito \n",strlen(creditos));
      strins(creditos,"\n",strlen(creditos));
      ShowPlayerDialog(playerid,8439, DIALOG_STYLE_MSGBOX, "{F60000}Por pedro   Crйditos  Por pedro ",creditos, "Fechar", "");
      return 1;
     }
	//=========================Ajuda================================================
   if(strcmp(cmdtext,"/ajuda",true)==0)
	{
       new ajuda[1000]; //
       strins(ajuda,"\n",strlen(ajuda));
       strins(ajuda,"{7491F6}/admins /creditos /admins\n",strlen(ajuda));
       strins(ajuda,"{7491F6}Para Administradores :  /admins\n",strlen(ajuda));
       ShowPlayerDialog(playerid,8439, DIALOG_STYLE_MSGBOX, "{F60000} -----------------  Ajuda  --------------- ",ajuda, "Fechar", "");
	   return 1;
	}
   return SendClientMessage(playerid, 0xAA3333AA, "Comando Nгo existe-Server Sendo feito-Coder Pedro Shogun.");
  }



public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
	return 1;
}


public OnPlayerExitVehicle(playerid, vehicleid)
{
	return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
	return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
	return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
	return 1;
}

public OnRconCommand(cmd[])
{
	return 1;
}

public OnPlayerRequestSpawn(playerid)
{
	return 1;
}

public OnObjectMoved(objectid)
{
	return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
	return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
	return 1;
}

public OnVehicleMod(playerid, vehicleid, componentid)
{
	return 1;
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
	return 1;
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
	return 1;
}
public OnPlayerExitedMenu(playerid)
{
	return 1;
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
	return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
	return 1;
}

public OnRconLoginAttempt(ip[], password[], success)
{
	return 1;
}

public OnPlayerUpdate(playerid)
{

}

public OnPlayerStreamIn(playerid, forplayerid)
{
	return 1;
}

public OnPlayerStreamOut(playerid, forplayerid)
{
	return 1;
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
	return 1;
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
	return 1;
}
Observe o Gm Esta sem erros so queria que alguem de vocкs adco sistema de hospital flw galera
Find
Reply
Hardware
Gangsta
****
Posts: 640
Threads: 9
Joined: Dec 2010
Reputation: 0
#2

25.11.2011, 23:44
( Последний раз редактировалось Hardware; 26.11.2011 в 00:42. )
Coloque no OnPlayerDeath assim:
pawn Код:
SetPlayerPos(playerid,POS X, Y, Z);
Viajei legal colocando killerid. EEUHEHEEH
Find
Reply
DreeH
Huge Clucker
****
Posts: 325
Threads: 5
Joined: May 2011
Reputation: 0
#3

26.11.2011, 00:35
Adicione no OnPlayerDeath
PHP код:
SetPlayerPos(playerid, PosX, PosY, PosZ); 
Ou se preferir procure(search) sistemas de hospitais.
Find
Reply
Pedro Pawno
Gangsta
****
Posts: 613
Threads: 85
Joined: Oct 2011
Reputation: 0
#4

26.11.2011, 09:13
Deu esses Erros no Primeiro Cуdigo:

Код:
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : error 017: undefined symbol "POS"
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : error 017: undefined symbol "X"
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : fatal error 107: too many error messages on one line

Compilation aborted.Pawn compiler 3.2.3664	 	 	Copyright © 1997-2006, ITB CompuPhase


4 Errors.
o segundo deu tambйm:

Код:
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : error 017: undefined symbol "POS"
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : error 017: undefined symbol "X"
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\Pastas\New Life Power BR\gamemodes\RO.pwn(189) : fatal error 107: too many error messages on one line

Compilation aborted.Pawn compiler 3.2.3664	 	 	Copyright © 1997-2006, ITB CompuPhase


4 Errors.
eu estava Posicionando ele assim:

Код:
public OnPlayerDeath(playerid, killerid, reason) // MORRENDO
{
    SetPlayerPos(playerid,POS X, Y, Z);
    GameTextForPlayer(playerid,"~y~Vocк foi morto e ira ao  Hospital que esta sendo feito por Pedro!!!",4000,3); //
    if(killerid != INVALID_PLAYER_ID) SetPlayerScore(killerid, GetPlayerScore(killerid) + 1);
    SetPlayerPos(playerid, PosX, PosY, PosZ);//aqui й o cуdigo que me mandaram!
	return 1;
}
se estiver errado me corrija
Find
Reply
Josma_cmd
High-roller
*****
Posts: 1,382
Threads: 19
Joined: Feb 2010
Reputation: 0
#5

26.11.2011, 09:21
Nгo vai conseguir nada copiando e colando cуdigos.
PosX, PosY e PosZ que eles se referem sгo as coordenadas do hospital.
Find
Reply
dPlaYer_
High-roller
*****
Posts: 1,736
Threads: 80
Joined: Jul 2011
Reputation: 0
#6

28.11.2011, 13:42
Inicio GM
pawn Код:
forward GetClosestHospital(playerid);
OnPlayerDeath
pawn Код:
public OnPlayerDeath(playerid, killerid, reason)
{
if(GetClosestHospital(playerid) == 0){
SetSpawnInfo(playerid,1,dini_Int(file, "Skin"),2031.9415,-1404.3578,17.2614,165.8180,0,0,0,0,0,0);
}
else if(GetClosestHospital(playerid) == 1){
SetSpawnInfo(playerid,1,dini_Int(file, "Skin"),2031.9415,-1404.3578,17.2614,165.8180,0,0,0,0,0,0);
}
else if(GetClosestHospital(playerid) == 2){
SetSpawnInfo(playerid,1,dini_Int(file, "Skin"),2031.9415,-1404.3578,17.2614,165.8180,0,0,0,0,0,0);
}
else if(GetClosestHospital(playerid) == 3){
SetSpawnInfo(playerid,1,dini_Int(file, "Skin"),1582.5615,1768.7921,10.8203,93.7454,0,0,0,0,0,0); 
}

return 1;
}
Final Do GM

pawn Код:
public GetClosestHospital(playerid)
{
if(!IsPlayerConnected(playerid)){
return -1;
}
new Float:prevdist = 100000.000;
new prevhosp;
for(new hospid = 0; hospid < 4; hospid++){
new Float:dist;
if(hospid == 0){
dist = GetPlayerDistanceToPoint(playerid,-2651.6501,634.1177);  // Coordenada a Escolha.. ( LS )
}
else if(hospid == 1){
dist = GetPlayerDistanceToPoint(playerid,1173.5842,-1324.5615);  // Coordenada a Escolha.. ( SF )
}
else if(hospid == 2){
dist = GetPlayerDistanceToPoint(playerid,2031.9415,-1404.3578);  // Coordenada a Escolha.. ( L V )
}
else if(hospid == 3){
dist = GetPlayerDistanceToPoint(playerid,1582.5615,1768.7921); // Coordenada a Escolha.. ( FC )
}
if((dist < prevdist)){
prevdist = dist;
prevhosp = hospid;
}
}
return prevhosp;
}
Find
Reply
« Next Oldest | Next Newest »


Forum Jump:


Users browsing this thread: 1 Guest(s)
  1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese