GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => Segítségkérés => A témát indította: Calvin - 2011. december 19. - 02:04:20

Cím: Teleport írás.Help
Írta: Calvin - 2011. december 19. - 02:04:20

Sziasztok.A téma adott...Nos van egy programom,amivel generáltam Teleportot,de nem mûködött a filterscript,ezért kérnék egy kis segítséget..Hogyan tudok 1 teleport srciptet írni?:D Várom válaszotokat!
Tiszteletem!

Cím: Teleport írás.Help
Írta: dexi - 2011. december 19. - 06:19:24

példa zcmd-be:
#include <a_samp>
[pawn]#include <zcmd>
#define FILTERSCRIPT
/*---------------*/
new nev[MAX_PLAYER_NAME];
new string[128];
/*---------------*/
#pragma tabsize 0
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\" Teleport script by Fl0rian\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
CMD:tele1(playerid,params[])
{
/*-------------------------*/
GetPlayerName(playerid, nev, sizeof(nev));
/*-------------------------*/
SetPlayerPos(playerid, X,Y,Z);
SetVehiclePos(GetPlayerVehicleID(playerid), X,Y,Z);
PutPlayerInVehicle(playerid, GetPlayerVehicleID(playerid),0);
format(string, sizeof(string), \" %s elteleportált a \"Chilliad\"-ra.\", nev);
SendClientMessageToAll(-1 , string);
}   
[/pawn]

Cím: Teleport írás.Help
Írta: norbee0170 - 2011. december 19. - 10:42:41

Idézetet írta: Calvin date=1324256660\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"14439\" data-ipsquote-contentclass=\"forums_Topic

Sziasztok.A téma adott...Nos van egy programom,amivel generáltam Teleportot,de nem mûködött a filterscript,ezért kérnék egy kis segítséget..Hogyan tudok 1 teleport srciptet írni?:D Várom válaszotokat!
Tiszteletem!
 

[pawn]if (strcmp(cmd,\"/odatele\",true)==0)
               {
   SetPlayerPos(playerid,X,Y,Z);
   SetPlayerInterior(playerid,0);
   SetPlayerVirtualWorld(playerid,0);
   SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe\");
   return 1;
   }[/pawn]

Cím: Teleport írás.Help
Írta: Calvin - 2011. december 19. - 11:29:47

Köszönöm szépen,sokat segítettetek :)
Öh még annyi kérdés....Lehet több teleportot egy filterscriptbe rakni?O.o
UI:Az elõbbi script-be 2 error-t mutat....az 5. és a 11. sorba...

Cím: Teleport írás.Help
Írta: norbee0170 - 2011. december 19. - 11:52:40

egyszerübb ha a mod-ba írod mint ahogy én is írtam..
és tök egyszerû másikat csinálni mellé..
[pawn]if (strcmp(cmd,\"/odatele\",true)==0)
               {
   SetPlayerPos(playerid,X,Y,Z);
   SetPlayerInterior(playerid,0);
   SetPlayerVirtualWorld(playerid,0);
   SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe\");
   return 1;
   }
if (strcmp(cmd,\"/odatele2\",true)==0)
               {
   SetPlayerPos(playerid,X,Y,Z);
   SetPlayerInterior(playerid,0);
   SetPlayerVirtualWorld(playerid,0);
   SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe2\");
   return 1;
   }
[/pawn]

Cím: Teleport írás.Help
Írta: Calvin - 2011. december 19. - 13:29:56

Invailed function....

Cím: Teleport írás.Help
Írta: dexi - 2011. december 19. - 14:46:40

#include a_samp
#include <zcmd>
#define FILTERSCRIPT
/*---------------*/
new nev[MAX_PLAYER_NAME];
new string[128];
/*---------------*/
#pragma tabsize 0
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\" Teleport script by Fl0rian\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
CMD:tele1(playerid,params[])
{
/*-------------------------*/
GetPlayerName(playerid, nev, sizeof(nev));
/*-------------------------*/
SetPlayerPos(playerid, 1,1,1);
SetVehiclePos(GetPlayerVehicleID(playerid), 1,1,1);
PutPlayerInVehicle(playerid, GetPlayerVehicleID(playerid),0);
format(string, sizeof(string), \" %s elteleportált a Chilliad-ra.\", nev);
SendClientMessageToAll(-1 , string);
}

Cím: Teleport írás.Help
Írta: Benceee - 2011. december 19. - 15:14:53

               if (strcmp(cmdtext,\"/odatele\",true)==0)
               {
SetPlayerPos(playerid,X,Y,Z);
SetPlayerInterior(playerid,0);
SetPlayerVirtualWorld(playerid,0);
SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe\");
return 1;
}
               if (strcmp(cmdtext,\"/odatele2\",true)==0)
               {
SetPlayerPos(playerid,X,Y,Z);
SetPlayerInterior(playerid,0);
SetPlayerVirtualWorld(playerid,0);
SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe2\");
return 1;
}

Cím: Teleport írás.Help
Írta: Kovacs_Bela - 2011. december 19. - 15:30:13

Idézetet írta: Benceee date=1324304093\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"14439\" data-ipsquote-contentclass=\"forums_Topic

               if (strcmp(cmdtext,\"/odatele\",true)==0)
               {
SetPlayerPos(playerid,X,Y,Z);
SetPlayerInterior(playerid,0);
SetPlayerVirtualWorld(playerid,0);
SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe\");
return 1;
}
               if (strcmp(cmdtext,\"/odatele2\",true)==0)
               {
SetPlayerPos(playerid,X,Y,Z);
SetPlayerInterior(playerid,0);
SetPlayerVirtualWorld(playerid,0);
SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe2\");
return 1;
}

 

de azért még énis írok egyet
[pawn]
#include <a_samp>
public OnPlayerCommandText(playerid,cmdtext[])
{
    if(strcmp(\"/teleport\",cmdtext,true) == 0) //a beírta azt a parancsot hogy /teleport
    {
        SendClientMessage(playerid,0xff00000,\"Etelepótátá anyádba.. NÓMÁLISVAGYÓ?\"); //kiír neki egy üzit. Ezt a sort akár ki is törölheted, ha nem küldesz neki üzenetet.
        if(IsPlayerInAnyVehicle(playerid)) //ha a játékos jármúben van,
        {
            SetVehiclePos(Xkoord,Ykoord,Zkoord); //akkor megváltoztatja a jármû pozícióját, vele együtt a játékost. Az X-Y-Zkoordot írd át a pozícióra.
        }
        else SetPlayerPos(Xkoord,Ykoord,Zkoord); //ha nem, tehát nincs jármûbe (else), akkor megváltoztatja a játékos pozícióját.
        return 1;
    }
    return 1;
}
[/pawn]

Cím: Teleport írás.Help
Írta: dexi - 2011. december 19. - 15:33:23

Idézetet írta: danix99 date=1324305013\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"14439\" data-ipsquote-contentclass=\"forums_Topic

 

               if (strcmp(cmdtext,\"/odatele\",true)==0)
               {
SetPlayerPos(playerid,X,Y,Z);
SetPlayerInterior(playerid,0);
SetPlayerVirtualWorld(playerid,0);
SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe\");
return 1;
}
               if (strcmp(cmdtext,\"/odatele2\",true)==0)
               {
SetPlayerPos(playerid,X,Y,Z);
SetPlayerInterior(playerid,0);
SetPlayerVirtualWorld(playerid,0);
SendClientMessage(playerid,COLOR_LIGHTRED,\"elteleportáltál a fenébe2\");
return 1;
}

 

de azért még énis írok egyet
[pawn]
#include <a_samp>
public OnPlayerCommandText(playerid,cmdtext[])
{
    if(strcmp(\"/teleport\",cmdtext,true) == 0) //a beírta azt a parancsot hogy /teleport
    {
        SendClientMessage(playerid,0xff00000,\"Etelepótátá anyádba.. NÓMÁLISVAGYÓ?\"); //kiír neki egy üzit. Ezt a sort akár ki is törölheted, ha nem küldesz neki üzenetet.
        if(IsPlayerInAnyVehicle(playerid)) //ha a játékos jármúben van,
        {
            SetVehiclePos(Xkoord,Ykoord,Zkoord); //akkor megváltoztatja a jármû pozícióját, vele együtt a játékost. Az X-Y-Zkoordot írd át a pozícióra.
        }
        else SetPlayerPos(Xkoord,Ykoord,Zkoord); //ha nem, tehát nincs jármûbe (else), akkor megváltoztatja a játékos pozícióját.
        return 1;
    }
    return 1;
}
[/pawn]
 
[/quote]
így csak sajnos odateleportálja a kocsit, elfelejtetted beletenni. PutPlayerInVehicle();

Cím: Teleport írás.Help
Írta: Calvin - 2011. december 19. - 17:04:19

Miért nem mûködik egyik port se?:S

Cím: Teleport írás.Help
Írta: dexi - 2011. december 19. - 18:25:18

Melyiket csináltad enyémet vagy kiét?