#include <a_samp>#include <zcmd>#define COLOR_GREEN 0x33AA33AA#define COLOR_BLUE 0x0000FFAA#define COLOR_RED 0xFF0606FF#define COLOR_YELLOW 0xFFFF00AA#define COLOR_BLUE 0x0000FFAA#define COLOR_GREY 0xAFAFAFAA#define COLOR_WHITE 0xFFFFFFAA#define COLOR_BROWN 0x993300AA#define COLOR_ORANGE 0xFF9933AA#define COLOR_BLACK 0x000000AA#define COLOR_LIGHTBLUE 0x00BFFFAA#define TELEPORT_DIALOG 500#define AUTOTELEPORT_DIALOG 499#define SOFORTELEPORT_DIALOG 498new autoteleport;new soforteleport;public OnFilterScriptInit(){print(\"\\n--------------------------------------\");print(\" IG Teleport készítõ betöltve| by Ryuuzaki\");print(\"--------------------------------------\\n\");if(!fexist(\"Teleportok.txt\")) print(\"HIBA: Hiányzik a Teleportok.txt fájl!\"), print(\"Kérlek hozz létre egyet. Scriptfiles/Teleportok.txt\");return 1;}public OnFilterScriptExit(){return 1;}CMD:telecreate(playerid){autoteleport = 0;soforteleport = 0;if(!IsPlayerAdmin(playerid)) return 0;ShowPlayerDialog(playerid, AUTOTELEPORT_DIALOG, DIALOG_STYLE_MSGBOX, \"Autó teleportálás\", \"Lehessen autóval teleportálni?\", \"Igen\", \"Nem\");return 1;}public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]){if(dialogid == AUTOTELEPORT_DIALOG){ if(response) { autoteleport = 1;//lehet autóval teleportálni ShowPlayerDialog(playerid, SOFORTELEPORT_DIALOG, DIALOG_STYLE_MSGBOX, \"Sofõr ülésrõl teleport\", \"Csak a sofõr tudjon teleportálni?\", \"Igen\", \"Nem\");}else if(!response){ autoteleport = 2;//nem lehet autóval teleportálni ShowPlayerDialog(playerid, TELEPORT_DIALOG, DIALOG_STYLE_INPUT, \"Teleport parancs\", \"Mi legyen a teleport parancs?(/ jel nélkül)\", \"Rendben\", \"Kilép\");}}else if(dialogid == SOFORTELEPORT_DIALOG){ if(response) { soforteleport = 1;//csak sofõrként lehet teleportálni ShowPlayerDialog(playerid, TELEPORT_DIALOG, DIALOG_STYLE_INPUT, \"Teleport parancs\", \"Mi legyen a teleport parancs?(/ jel nélkül)\", \"Rendben\", \"Kilép\");}else if(!response){ soforteleport = 2;//az utasok is tudjanak teleportálni ShowPlayerDialog(playerid, TELEPORT_DIALOG, DIALOG_STYLE_INPUT, \"Teleport parancs\", \"Mi legyen a teleport parancs?(/ jel nélkül)\", \"Rendben\", \"Kilép\");}}else if(dialogid == TELEPORT_DIALOG){ if(response) { if(strlen(inputtext) == 0) { ShowPlayerDialog(playerid, TELEPORT_DIALOG, DIALOG_STYLE_INPUT, \"Teleport parancs\", \"Mi legyen a teleport parancs?(/ jel nélkül)\", \"Rendben\", \"Kilép\"); SendClientMessage(playerid, COLOR_GREY, \"Parancs nélküli teleportot akarsz készíteni?\"); } new Float:x[MAX_PLAYERS], Float:y[MAX_PLAYERS], Float:z[MAX_PLAYERS], Float:a[MAX_PLAYERS]; new string[200], string2[300]; GetPlayerPos(playerid, x[playerid], y[playerid], z[playerid]); GetPlayerFacingAngle(playerid, a[playerid]); if(autoteleport == 1) { if(soforteleport == 1) { format(string, sizeof(string), \"Teleport létrehozva! Parancsa: {0000FF}/%s{FFFF00}, Koordinátái: {FF4500}%0.2f, %0.2f, %0.2f{FFFF00}, Nézõszöge: {C0C0C0}%0.2f\", inputtext, x[playerid], y[playerid], z[playerid], a[playerid]); SendClientMessage(playerid, COLOR_YELLOW, string); SendClientMessage(playerid, COLOR_YELLOW, \"Autóval is lehet teleportálni: {00FF00}Igen{FFFF00}, Csak sofõr tud teleportálni: {00FF00}Igen{FFFF00}\"); SendClientMessage(playerid, COLOR_YELLOW, \"A fájlt megtalálod a scriptfiles mappában.\"); new File:Teleportok = fopen(\"Teleportok.txt\", io_append); format(string2, sizeof(string2), \"CMD:%s(playerid)\\r\\n\", inputtext); fwrite(Teleportok, string2); fwrite(Teleportok, \"{\\r\\n\"); fwrite(Teleportok, \"\\tif(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)\\r\\n\"); fwrite(Teleportok, \"\\t{\\r\\n\"); format(string2, sizeof(string2), \"\\t\\tSetVehiclePos(GetPlayerVehicleID(playerid), %0.2f, %0.2f, %0.2f);\\r\\n\", x[playerid], y[playerid], z[playerid]); fwrite(Teleportok, string2); fwrite(Teleportok, \"\\t}\\r\\n\"); fwrite(Teleportok, \"\\telse if(GetPlayerState(playerid) == PLAYER_STATE_ONFOOT)\\r\\n\"); fwrite(Teleportok, \"\\t{\\r\\n\"); format(string2, sizeof(string2), \"\\t\\tSetPlayerPos(playerid, %0.2f, %0.2f, %0.2f);\\r\\n\", x[playerid], y[playerid], z[playerid]); fwrite(Teleportok, string2); format(string2, sizeof(string2), \"\\t\\tSetPlayerFacingAngle(playerid, %0.2f);\\r\\n\", a[playerid]); fwrite(Teleportok, string2); fwrite(Teleportok, \"\\t}\\r\\n\"); fwrite(Teleportok, \"\\telse if(GetPlayerState(playerid) == PlAYER_STATE_PASSENGER)\\r\\n\"); fwrite(Teleportok, \"\\t{\\r\\n\"); fwrite(Teleportok, \"\\t\\tSendClientMessage(playerid, 0xFF0606FF, \\\"Ezt a parancsot utasként nem használhatod!\\\");\\r\\n\"); fwrite(Teleportok, \"\\t}\\r\\n\"); fwrite(Teleportok, \"\\treturn 1;\\r\\n\"); fwrite(Teleportok, \"}\\r\\n\"); fclose(Teleportok); } else if(soforteleport == 2) { format(string, sizeof(string), \"Teleport létrehozva! Parancsa: {0000FF}/%s{FFFF00}, Koordinátái: {FF4500}%0.2f, %0.2f, %0.2f{FFFF00}, Nézõszöge: {C0C0C0}%0.2f\", inputtext, x[playerid], y[playerid], z[playerid], a[playerid]); SendClientMessage(playerid, COLOR_YELLOW, string); SendClientMessage(playerid, COLOR_YELLOW, \"Autóval is lehet teleportálni: {00FF00}Igen{FFFF00}, Csak sofõr tud teleportálni: {FF0000}Nem{FFFF00}\"); SendClientMessage(playerid, COLOR_YELLOW, \"A fájlt megtalálod a scriptfiles mappában.\"); new File:Teleportok = fopen(\"Teleportok.txt\", io_append); format(string2, sizeof(string2), \"CMD:%s(playerid)\\r\\n\", inputtext); fwrite(Teleportok, string2); fwrite(Teleportok, \"{\\r\\n\"); fwrite(Teleportok, \"\\tif(IsPlayerInAnyVehicle(playerid))\\r\\n\"); fwrite(Teleportok, \"\\t{\\r\\n\"); format(string2, sizeof(string2), \"\\t\\tSetVehiclePos(GetPlayerVehicleID(playerid), %0.2f, %0.2f, %0.2f);\\r\\n\", x[playerid], y[playerid], z[playerid]); fwrite(Teleportok, string2); fwrite(Teleportok, \"\\t}else{\\r\\n\"); format(string2, sizeof(string2), \"\\t\\tSetPlayerPos(playerid, %0.2f, %0.2f, %0.2f);\\r\\n\", x[playerid], y[playerid], z[playerid]); fwrite(Teleportok, string2); format(string2, sizeof(string2), \"\\t\\tSetPlayerFacingAngle(playerid, %0.2f);\\r\\n\", a[playerid]); fwrite(Teleportok, string2); fwrite(Teleportok, \"\\t}\\r\\n\"); fwrite(Teleportok, \"\\treturn 1;\\r\\n\"); fwrite(Teleportok, \"}\\r\\n\"); fclose(Teleportok); } } else if(autoteleport == 2) { format(string, sizeof(string), \"Teleport létrehozva! Parancsa: {0000FF}/%s{FFFF00}, Koordinátái: {FF4500}%0.2f, %0.2f, %0.2f{FFFF00}, Nézõszöge: {C0C0C0}%0.2f\", inputtext, x[playerid], y[playerid], z[playerid], a[playerid]); SendClientMessage(playerid, COLOR_YELLOW, string); SendClientMessage(playerid, COLOR_YELLOW, \"Autóval is lehet teleportálni: {FF0000}Nem{FFFF00}, Csak sofõr tud teleportálni: {FF0000}Nem(Autóval nem lehet teleportálni){FFFF00}\"); SendClientMessage(playerid, COLOR_YELLOW, \"A fájlt megtalálod a scriptfiles mappában.\"); new File:Teleportok = fopen(\"Teleportok.txt\", io_append); format(string2, sizeof(string2), \"CMD:%s(playerid)\\r\\n\", inputtext); fwrite(Teleportok, string2); fwrite(Teleportok, \"{\\r\\n\"); fwrite(Teleportok, \"\\tif(IsPlayerInAnyVehicle(playerid))\\r\\n\"); fwrite(Teleportok, \"\\t{\\r\\n\"); format(string2, sizeof(string2), \"\\t\\tSendClientMessage(playerid, 0xFF0606FF, \\\"Ezt a parancsot csak gyalososként használhatod!\\\");\\r\\n\", x[playerid], y[playerid], z[playerid]); fwrite(Teleportok, string2); fwrite(Teleportok, \"\\t}else{\\r\\n\"); format(string2, sizeof(string2), \"\\t\\tSetPlayerPos(playerid, %0.2f, %0.2f, %0.2f);\\r\\n\", x[playerid], y[playerid], z[playerid]); fwrite(Teleportok, string2); format(string2, sizeof(string2), \"\\t\\tSetPlayerFacingAngle(playerid, %0.2f);\\r\\n\", a[playerid]); fwrite(Teleportok, string2); fwrite(Teleportok, \"\\t}\\r\\n\"); fwrite(Teleportok, \"\\treturn 1;\\r\\n\"); fwrite(Teleportok, \"}\\r\\n\"); fclose(Teleportok); }}}return 1;}
Szép majd teszteltem: )
Szép munka, ment a+
Jó Munka [/quote]Köszi.
