[FilterScript] Teleport System [AddTeleport]
#1


By DraKiNs
Introduction:
It is a simple and efficient creator teleports,using arrays and dialogs i create.

Using:

To use in:
OnFilterScriptInit

Add:
AddTeleport("Tele Name",X,Y,Z,INTERIOR);


General Infos:

♥ System of Load Object [Not disappear]
♥ System of Message for Teleporte ('[FeK]DraKiNs enter in teleport Las Venturas [/teles]')
♥ Simples Add Teleports
♥ Teleport Vehicles and Players [Detect]
♥ Works on any Interior
♥ In Dialog List,Super Practical

Credits
Crйdits for [FeK]Company and [FeK]DraKiNs (me)

Code:

pawn Код:
#include <a_samp>
#define MAX_TELES 100
#define DIALOG_TELE 24
new strmem[1024];
new TelesCriados=-1;
enum pTele
{
    NomeTele[64],
    Float:xo,
    Float:yo,
    Float:zo,
    InteriorID,
    TeleporteID
};
new TeleporteSystem[MAX_TELES][pTele];
public OnFilterScriptInit()
{
    AddTeleport("Aero San Fiero",-1448.325, -325.1149, 15,0);
    AddTeleport("Aero Los Santos",1546.908, -2313.5, 15,0);
    AddTeleport("Aero Las Venturas",1677.544, 1426.837, 15,0);

    printf("\n\n\n\n System of Teleports Loaded | %d/%d teleports total \n\n\n\n",TelesCriados,MAX_TELES);
    return true;
}
stock AddTeleport(nomete[], Float:xob, Float:yob, Float:zob,interior)
{
    TelesCriados++;
    format(TeleporteSystem[TelesCriados][NomeTele],64,"%s",nomete);
    TeleporteSystem[TelesCriados][xo] = xob;
    TeleporteSystem[TelesCriados][yo] = yob;
    TeleporteSystem[TelesCriados][zo] = zob;
    TeleporteSystem[TelesCriados][InteriorID] = interior;
    TeleporteSystem[TelesCriados][TeleporteID] = TelesCriados;
    return ;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    new item = listitem;
    if(item == TeleporteSystem[item][TeleporteID])
    {
        if(!response) return SendClientMessage(playerid, 0xFFFFFFFF, "You Cancel Teleport");
        new message[128];
        format(message, sizeof(message), "You is transported for %s wait", TeleporteSystem[item][NomeTele]);
        SendClientMessage(playerid, 0xFFFFFFFF, message);
        new name[24], string[128];
        GetPlayerName(playerid, name, sizeof(name));
        format(string, sizeof(string), "** %s go to in teleport %s [/teles].",name,TeleporteSystem[item][NomeTele]);
        SendClientMessageToAll(0xFFFF00AA, string);
        if(IsPlayerInAnyVehicle(playerid))
        {
            SetVehiclePos(GetPlayerVehicleID(playerid),TeleporteSystem[item][xo],TeleporteSystem[item][yo],TeleporteSystem[item][zo]+1);
        }
        if(!IsPlayerInAnyVehicle(playerid))
        {
            SetPlayerPos(playerid,TeleporteSystem[item][xo],TeleporteSystem[item][yo],TeleporteSystem[item][zo]+1);
        }
        TogglePlayerControllable(playerid,0);
        SetTimerEx("DescongelarPlayer",1500,false,"i",playerid);
        return 1;
    }
    return 0;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
    if(!strcmp(cmdtext, "/teles", true))
    {
        format(strmem, 1024, "");
        for(new mem=0;mem<TelesCriados;mem++)
        {
            format(strmem,1024, "%s%s\n",strmem,TeleporteSystem[mem][NomeTele]);
        }
        ShowPlayerDialog(playerid,DIALOG_TELE,DIALOG_STYLE_LIST, "List of Teles:",strmem,"Tele", "Exit");
    }
    return 0;
}
forward DescongelarPlayer(playerid);
public DescongelarPlayer(playerid)
{
    TogglePlayerControllable(playerid,1);
    return true;
}
Is 80 Lines!!

Or Pastebin (i Accept new Mirros)

Movie:

[ame]http://www.youtube.com/watch?v=ELr631Pgdbw[/ame]
Reply
#2

BOM TRABALHO

very good
Reply
#3

roberto013 thankz,obrigado.
Reply
#4

Nice job
Bom trabalho
Reply
#5

great dude thanks

mirrior PWN and AMX files
Solid Files
Mega Upload
Reply
#6

Thanks for being gay!
Reply
#7

l0l /Punheta

Nice script!
Reply
#8

Here is an idea, make it with like add an extra parameter to AddTeleport like, WaitTime, so it freezes the player for an amount of time then unfreeze him, and if it is set to 0, then it won't eve freeze.
Because there are teleports on objects, and they make you fall through.

Good job anyway
Reply
#9

Nice script!
Reply
#10

Quote:
Originally Posted by Zh3r0
Посмотреть сообщение
Here is an idea, make it with like add an extra parameter to AddTeleport like, WaitTime, so it freezes the player for an amount of time then unfreeze him, and if it is set to 0, then it won't eve freeze.
Because there are teleports on objects, and they make you fall through.

Good job anyway
Is Easy:

pawn Код:
#include <a_samp>
#define MAX_TELES 100
#define DIALOG_TELE 24
new strmem[1024];
new TelesCriados=-1;
enum pTele
{
    NomeTele[64],
    Float:xo,
    Float:yo,
    Float:zo,
    InteriorID,
    TeleporteID,
    Tempo
};
new TeleporteSystem[MAX_TELES][pTele];
public OnFilterScriptInit()
{
    AddTeleport("Aero San Fiero",-1448.325, -325.1149, 15,0,4000);
    AddTeleport("Aero Los Santos",1546.908, -2313.5, 15,0,4000);
    AddTeleport("Aero Las Venturas",1677.544, 1426.837, 15,0,4000);

    printf("\n\n\n\n System of Teleports Loaded | %d/%d teleports total \n\n\n\n",TelesCriados,MAX_TELES);
    return true;
}
stock AddTeleport(nomete[], Float:xob, Float:yob, Float:zob,interior,temp)
{
    TelesCriados++;
    format(TeleporteSystem[TelesCriados][NomeTele],64,"%s",nomete);
    TeleporteSystem[TelesCriados][xo] = xob;
    TeleporteSystem[TelesCriados][yo] = yob;
    TeleporteSystem[TelesCriados][zo] = zob;
    TeleporteSystem[TelesCriados][InteriorID] = interior;
    TeleporteSystem[TelesCriados][TeleporteID] = TelesCriados;
    TeleporteSystem[TelesCriados][Tempo] = temp;
    return ;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    new item = listitem;
    if(item == TeleporteSystem[item][TeleporteID])
    {
        if(!response) return SendClientMessage(playerid, 0xFFFFFFFF, "You Cancel Teleport");
        new message[128];
        format(message, sizeof(message), "You is transported for %s wait", TeleporteSystem[item][NomeTele]);
        SendClientMessage(playerid, 0xFFFFFFFF, message);
        new name[24], string[128];
        GetPlayerName(playerid, name, sizeof(name));
        format(string, sizeof(string), "** %s go to in teleport %s [/teles].",name,TeleporteSystem[item][NomeTele]);
        SendClientMessageToAll(0xFFFF00AA, string);
        if(IsPlayerInAnyVehicle(playerid))
        {
            SetVehiclePos(GetPlayerVehicleID(playerid),TeleporteSystem[item][xo],TeleporteSystem[item][yo],TeleporteSystem[item][zo]+1);
        }
        if(!IsPlayerInAnyVehicle(playerid))
        {
            SetPlayerPos(playerid,TeleporteSystem[item][xo],TeleporteSystem[item][yo],TeleporteSystem[item][zo]+1);
        }
        TogglePlayerControllable(playerid,0);
        SetTimerEx("DescongelarPlayer",TeleporteSystem[item][Tempo],false,"i",playerid);
        return 1;
    }
    return 0;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
    if(!strcmp(cmdtext, "/teles", true))
    {
        format(strmem, 1024, "");
        for(new mem=0;mem<TelesCriados;mem++)
        {
            format(strmem,1024, "%s%s\n",strmem,TeleporteSystem[mem][NomeTele]);
        }
        ShowPlayerDialog(playerid,DIALOG_TELE,DIALOG_STYLE_LIST, "List of Teles:",strmem,"Tele", "Exit");
    }
    return 0;
}
forward DescongelarPlayer(playerid);
public DescongelarPlayer(playerid)
{
    TogglePlayerControllable(playerid,1);
    return true;
}

Thankz Royal for Morris
Thankz to All
[L3th4l] punheta is masturbate is brasilian,lol lol

thankz
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)