Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.
GTAONLINE.PL
Tematy otagowane jako: przerobienie
1. Przerobienie skryptu biznesy
Witam chcia?bym przerobi? ten oto skrypt biznes?w tak aby dzia?a? pod XyzzyRP.
Pr?buje prawie wszystkiego a nie wiem gdzie co robie ?le...

Link do skryptu : https://www.mediafire.com...iznesy.rar/file
2. przerobienie pod frakcje
Witam chcia?bym to przerobi? pod frakcje pystories
[lua]
--[[
Skrypt pisany dla serwisu GTAO.pl
Autor: marcin778 ,barcioo , Juran
w jedeniej w funkcji pom?g? Haze :)
System jest pod ogrpg mo?na edytowa? jak si? podoba
Zakaz udostepnia na innych forach
Zakaz zmiany autora.
--]]



-- Tabela jest sko?czona w 65%
local niedozwolone = { -- w ostatnim rekordzie nie dawa? przecinka po true lub false
[524] = true, --cement truck
[532] = true,
[519] = true, --shamal
[577] = true, -- At-400
[592] = true, --adromeda
[433] = true,
[511] = true,
[590] = true,
[431] = true,
[437] = true,
[593] = true,
[486] = true,
[406] = true,
[573] = true,
[455] = true,
[537] = true,
[569] = true,
[425] = true,
[520] = true,
[493] = true,
[595] = true,
[417] = true,
[403] = true,
[444] = true,
[556] = true,
[557] = true,
[553] = true,
[443] = true,
[432] = true


}

local lawety = {
{"policja", -2208.37, -2262.74, 31.25, 359.9, 360.0, 54.3},
{"**** muje", -2653.49487,-248.36574,7.04516,0,0,0}
}


local ID_LAWETY = 578
local colspheres = {}
local attX, attY, attZ = 0, -1.2, 0.5

for k, v in ipairs(lawety) do
local laweta = createVehicle(ID_LAWETY, v[2], v[3], v[4])
setElementData(laweta, "laweta", true)
setElementData(law...
3. Proszę o przerobienie zgupiałem..
local hajs = string.format("%.3f", getPlayerMoney(getLocalPlayer()))





Chodzi o to ?eby by?y przecinki nie 99999999 tylko np 99.999.999
4. Dron - przerobienie commandhandlera na eventhandlera
Siemka, mam problem z przerobieniem skryptu ?eby nie dzia?a? on na zasadzie komendy tylko eventu.

Funkcja kt?ra ma triggerowa? event odpowiedzialny za spawn drona:

[lua]
function setDrone2 (itemName)
setElementData(source,itemName,getElementData(source,itemName)-1)
triggerEvent("startspawndrone",source)
triggerClientEvent(source,"refreshInventoryManual",source)
end
addEvent("SetDrone2",true)
addEventHandler("SetDrone2",getRootElement(),setDrone2)
[/lua]

drone_server:

Originalna funkcja

[lua]
addCommandHandler ("drone",
function (player, cmd, ...)
local id = arg[1] or 501;
if tonumber (id) then
id=tonumber(id);
if valid_models[id] then
startDrone (player, id);
else
errMsg (msg.INVALID_ID, player);
end
else
errMsg (msg.INVALID_ID, player);
end
end
);
[/lua]

Moja funkcja:
[lua]
addEvent ( "startspawndrone", true );

addEventHandler ( "startspawndrone", root,
function (player, ...)
local id = arg[1] or 501;
if tonumber (id) then
id=tonumber(id);
if valid_models[id] then
startDrone (player, id);
else
errMsg (msg.INVALID_ID, player);
end
else
errMsg (msg.INVALID_ID, player);
end
end
);
[/lua]

Funkcja odpowiadaj?ca za start drona:

[lua]
function startDrone(player, id)
if players[player] then
errMsg (msg.ALREADY_HAS_DRONE:format("droned"), player);
r...
5. Prosba o przerobienie kodu.
Hej, mam tu taki skrypt fajniutki. Prosil bym o to, aby przerobic go w sposob taki, zeby nie sprawdzal czy gracz ma bana po zalogowaniu tylko kiedy gracz wejdzie, w sensie ze jak sie polaczy z serwerem.
Kod:
[lua]
function czyGraczJestZbanowany(gracz)
local ukarany = exports["pswg-db"]:zapytanie("SELECT typ, administrator, powod, wygasa FROM ew_kary WHERE serial='" .. getPlayerSerial(gracz) .. "'", true)
if (ukarany ~= "ERROR") then
local typ = ukarany[1]["typ"]
if (typ == "ban") then
local xd = minutaFix(getRealTime(ukarany[1]["wygasa"])["monthday"]) .. "." .. minutaFix(getRealTime(ukarany[1]["wygasa"])["month"]+1) .. "." .. getRealTime(ukarany[1]["wygasa"])["year"]+1900 .." " .. getRealTime(ukarany[1]["wygasa"])["hour"] .. ":" .. minutaFix(getRealTime(ukarany[1]["wygasa"])["minute"])
outputConsole("---", gracz)
outputConsole(trans(gracz, "Zosta?e?/-a? zbanowany/-a na serwerze Endless War."), gracz)
outputConsole(trans(gracz, "Pow?d: %s, wygasa: %s"), gracz)
outputConsole("Administrator: " .. ukarany[1]["administrator"], gracz)
outputConsole("---", gracz)
kickPlayer(gracz, trans(gracz, "Zosta?e? zbanowany/-a. Otw?rz konsol? (F8)."))
return true
end
else
r...
6. przerobienie ekwipunek do postaci listy
witam i od razu przepraszam ze tyle pisze na tym forum post?w z pomoc? przy czym? ale nie jestem zaawansowanym programist? lua tylko to? mocno zapoznanym w c# kt?remu zlecono za?o?enie serwera mta na godowej pacze plugin?w kt?r? nie tyle ze trzeba naprawi? ale i przerobi?. Dobra do rzeczy tak jak w temacie pracuje ju? kilka dni nad przerobieniem ekwipunki z postaci kafelkowej do postaci listy przedmiot?w i niezbyt mi to wychodzi (albo ca?e inventrory si? baguje albo nie wy?wietla item?w) wi?c chcia?bym prosi? o pomoc w przer?bce oraz wyja?nienie jak to zosta?o zrobione
ps potszy?am prawie nie zmodyfikowany kod zmiany jakie dokona?em do klawisz otwieraj?cy inwentory oraz przesuni?te inwentory kafelkowe pozosta?? moj? cze?? skasowa?em bo i tak nie dzia?a

skrypt
7. Pro¶ba o przerobienie sk
Kr?tkom?wi?c chodzi o kana? GPS na DayZ. Problem jest taki, ?e ka?dy kto wejdzie na serwer jest z automatu przypisywany jakby do domy?lnego kana?u. Chcia?bym, aby skrypt przy wej?ciu gracza na serwer nie wrzuca? go do jakiego? kana?u dop?ki gracz go sam nie ustawi. Gdzie? jest b??d i nie wiem gdzie.
Z g?ry dzi?ki za pomoc :)

https://pastebin.com/vw1WJE5J?fbclid=IwAR3zCakPhbyipnRorrPPw1w3vyJroqvwR_1fwBgajYXVoqpg6TuI3ff3hIc


playerBlibs1 = {}
amouunt1 = 0
function updateGPS2 ()
if not getElementData(getLocalPlayer(),"logedin") then return end
amouunt1 = 0
for i, blip in ipairs(playerBlibs1) do
if isElement(blip) then
destroyElement(blip)
end
end
playerBlibs1 = {}
for i, player in ipairs(getElementsByType("player")) do
if getElementData(localPlayer,"radiowave") == getElementData(player,"radiowave") and getElementData(player,"GPS") >= 1 and getElementData(localPlayer,"GPS") >= 1 and player ~= localPlayer then
amouunt1 = amouunt1+1
playerBlibs1[amouunt1] = createBlipAttachedTo(player,0,2,255,0,0)
setBlipVisibleDistance(playerBlibs1[amouunt1],1000)
end
end
end
setTimer(updateGPS2,5000,0)
8. Przerobienie, pod duty plr admin
Pomo?e kto? z przerobieniemt tego pod duty admin? kodzik

addCommandHandler("alert", 

    function(plr, cmd, ...)

            tekst = table.concat(arg, " ");

            triggerClientEvent(getRootElement(), "onCreateAlert", getRootElement(), getPlayerName(plr), tekst)

end)
9. Przerobienie System Lawet na ACL
Chcia?bym przerobi? to na ACL :SARA
[code]SERVER
--[[
Beniu,Heniu,Zenek,Marek,J?zek,Stefan, i biniu.
Skrypt pisany dla gtao.pl
Autor: marcin778
Zakaz zmiany autora, je?li go zmienisz, to przyjedzie do ciebie beniu i zje ci siusiaka :x .
--]]
pozycje = { -- x,y,z zaladowania pojazdu, y rozladowania pojazdu
[429] = {0,-0.9,0.4, 6}, -- banshee
[402] = {0,-0.9,0.6, 6}, -- buffalo
[541] = {0,-0.9,0.4,6}, -- bullet
[475] = {0,-0.9,0.4,6}, -- sabre
[457] = {0,-1.3,0.4,6}, -- caddy wozek golfowy
[568] = {0,-0.8,0.6,6}, -- bandito
[426] = {0,-0.7,0.5,6}, -- premier
[602] = {0,-0.9,0.6,6}, -- alpha
[415] = {0,-0.9,0.6,6}, -- cheetah
[480] = {0,-0.9,0.6,6}, -- comet
[562] = {0,0.9,0.6,6}, -- elegy
[587] = {0,0.9,0.6,6}, -- euros
[565] = {0,0.9,0.6,6}, -- flash
[411] = {0,0.9,0.6,6}, -- infernus
[559] = {0,0.9,0.6,6}, -- jester
[603] = {0,0.9,0.6,6}, -- pheonix
[560] = {0,0.9,0.6,6}, -- sultan
[506] = {0,0.9,0.6,6}, -- super gt
[451] = {0,0.9,0.6,6}, -- turismo
[558] = {0,0.9,0.6,6}, -- uranus
[555] = {0,0.9,0.6,6}, -- windsor
[477] = {0,0.9,0.6,6}, -- zr 350
[536] = {0,0.9,0.6,6}, -- blade
[575] = {0,0.9,0.6,6}, -- brodway
[518] = {0,0.9,0.6,6}, -- buccaner
[419] = {0,0.9,0.6,6}, -- esperanto
[534] = {0,0.9,0.6,6}, -- remington
[567] = {0,0.9,0.6,6}, -- savanna
[535] = {0,0.9,0.6,6}, -- slamvan
[576] = {0,0.9,0.6,6}, -- tornado
[412] = {0,0.9,0.6,6}, -- voodo
[496] = {0,0.9,0.6,6}, -- blista
[401] = {0,0.9,0.6,6}, -- bravura
[527] = {0,0.9,0.6,...
10. Pro¶ba o przerobienie skryptu.
[center]Witam. ot?? nie wiem jak naprawi? ten b??d, a dok?adniej gdy ju? zrobimy konto i si? logujemy to trzeba wpisa? has?o i gdy je wpiszemy jest wszystko okey ale natomiast gdy zostawimy miejsce has?a puste i damy zaloguj to i tak si? zalogujemy na konto!
Mo?ecie jako? to naprawi? i napisa? w czym tkwi b??d?
Z g?ry dzi?ki.

Skrypt:
[code]#include <a_samp>
#include <dfile>
#include <kolory>

#define NAZWA_SERWERA "ORPG Serwer by Troy"
#define WERSJA_SERWERA "0.3.7"

#define PUNKTY_NA_START 10
#define KASA_NA_START 100

#define DIALOG_REJESTRACJA 0
#define DIALOG_LOGOWANIE 1

#define FOLDER_KONT "/accounts-database/"

main(){}

enum Dgracza
{
bool: Zalogowany
};
new DaneGracza[MAX_PLAYERS][Dgracza];

public OnGameModeInit()
{
UsePlayerPedAnims();
// Skiny m?™ĹĄczyzn
AddPlayerClass(7, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(96, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(59, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(48, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(47, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(29, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(23, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(19, 1130, -1483.5, 22.799999237061, 0.0, 0, 0, 0, 0, 0, 0);
AddPlayerClass(18...
11. Przerobienie skryptu na ACL
Witam, mam problem przy przerobieniu skryptu z Data Base na ACL, prosz? o pomoc :) chodzi o skrypt Ta?my Policyjnej
12. Przerobienie z ACL na teamy
Prosi?em o pomoc z tym skryptem kiedy?,ale teraz chc? zrobi? jego inne zastosowanie.

Aby zrobi? go na teamy.

Mam co? takiego,nic nie rusza?em aby nie zepsu?.Szuka?em ju? funkcji,lecz nie znalaz?em.

Kod:

function onPlayerChatDo(plr,commands, ...)
local msg = table.concat ( {...}, " " )
for k,v in ipairs(getElementsByType("player")) do
local accName = getAccountName ( getPlayerAccount ( v ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) or isObjectInACLGroup ("user."..accName, aclGetGroup ( "Moderator" ) ) then
outputChatBox( "*"..getPlayerName(plr).."Wezwa? admistratora/moderatora,powodem: "..msg..". ",v, true)
end
end
end
addCommandHandler("wezwijadm",onPlayerChatDo)
13. Przerobienie skryptu
Witam, przyszed?em do was z prosba, ot?? posiadam pewien skrypt kt?ry nie obsluguje mojego systemu pienieznego.

C-SIDE:


function moneyChange(amount)

    takePlayerMoney(loopTable[hoveredCategory]["tuningPrice"])

    giveNotification("success", getLocalizedText("notification.success.purchased"))

    playSoundEffect("moneychange.wav")

    

    if amount > 0 then

        moneyChangeTable = {

            ["tick"] = getTickCount() + 5000,

            ["amount"] = amount

        }

    end

end


System: 
 exports.Money:takeMoney(nick, tonumber(ilosc)) 

W jaki spos?b mog? to przerobi??

PS: Co w tym fragmencie mam uzna? za warto?? (Kwot?)
14. Przerobienie skryptu pod ACL
Witam,
Jak mog? przerobi? ten skrypt pod ACL?

[lua]function DeveloperMode()
if sprawdzRoota(login) == false then
outputChatBox("* Nie posiadasz uprawnie?.", 255, 0, 0)
return
end
if getDevelopmentMode() == false then
setDevelopmentMode ( true )
else
setDevelopmentMode ( false )
end
end
addCommandHandler("devmode", DeveloperMode)
addCommandHandler("showmode", DeveloperMode)

local sx, sy = guiGetScreenSize()

function putPlayerInPosition(timeslice)
local cx,cy,cz,ctx,cty,ctz = getCameraMatrix()
ctx,cty = ctx-cx,cty-cy
timeslice = timeslice*0.1
local tx, ty, tz = getWorldFromScreenPosition(sx / 2, sy / 2, 10)
if isChatBoxInputActive() or isConsoleActive() or isMainMenuActive () or isTransferBoxActive () then return end
if getKeyState("lctrl") then timeslice = timeslice*4 end
if getKeyState("lalt") then timeslice = timeslice*0.25 end
local mult = timeslice/math.sqrt(ctx*ctx+cty*cty)
ctx,cty = ctx*mult,cty*mult
if getKeyState("w") then abx,aby = abx+ctx,aby+cty end
if getKeyState("s") then abx,aby = abx-ctx,aby-cty end
if getKeyState("a") then abx,aby = abx-cty,aby+ctx end
if getKeyState("d") then abx,aby = abx+cty,aby-ctx end
if getKeyState("space") then abz = abz+timeslice end
if getKeyState("lshift") then abz = abz-timeslice end
local x,y = 1...
15. Pro¶ba o przerobienie skryptu podpięcie do bazy
[code]local polaczenie = dbConnect ( "sqlite", "db.db" )
if polaczenie then
outputDebugString("Wczytano pojazdy z przechowywalni")
else
outputDebugString("Nie wczytano pojazd?w z przechowywalni")
end

dbExec ( polaczenie, "CREATE TABLE IF NOT EXISTS Zapis ( Calyy INTEGER, Drzwii INTEGER, PP1 INTEGER, PL1 INTEGER, TP1 INTEGER, TL1 INTEGER, hpauta INTEGER, RS INTEGER, GS INTEGER, BS INTEGER, Tuning INTEGER, Przebieg INTEGER, ID INTEGER, Model INTEGER, Paintjob INTEGER, Paliwo INTEGER, Owner VARCHAR, color1 INTEGER, color2 INTEGER, color3 INTEGER, color4 INTEGER)" )

marker=createMarker(-1756.36,951.36,23.74,"cylinder",6,68,212,4,100)
odb=createMarker(-1748,960,24,"cylinder",1,255,0,0,100)

function oddajAutodoprzecho(e)
if source==marker then
if getElementType(e)=="vehicle" then
local idd=getElementData(e, "id")
local paliwo=getElementData(e, "pojazdy_paliwo")
if idd then
local owner=getElementData(e, "wlasciciel")
local model=getElementModel(e)
local paint=getVehiclePaintjob(e)
local przeb = getElementData ( e, "pojazd_przebieg" )
local upgrade = getVehicleTuning (e)
local c1,c2,c3,c4 = getVehicleColor ( e )
local rs,gs,bs = getVehicleHeadLightColor(e)
local autohp = getElementHealth(e)
local pp1,pl1,tp1,tl1 = getVehicleWheelStates(e)
local caly = {}
...
16. Przerobienie budynku
Szukam poradnika gdzie dowiem si? jak przerobi? budynek tak by np usun?? te drzwi gara?owe: http://imgur.com/xNgG1r1

Stawiam :piwo: za pomoc
17. Przerobienie nic trudnego ?
Siemaneczko, mo?e kto? wie ? i pomo?e przerobi? t? przechowalnie:

PrzechoZforumGtao


pod SystemPojazdowPanaPrezesa :)


Zmieni?em go tak
[lua]local polaczenie = dbConnect ( "sqlite", "db.db" )
dbExec ( polaczenie, "CREATE TABLE IF NOT EXISTS Zapis ( ID INTEGER, Paliwo INTEGER, Przebieg INTEGER, Tuning VARCHAR, Model INTEGER, Owner VARCHAR )" )


local marker=createMarker(-273.65625, 1177.74316, 18.59375,"cylinder",5,255,0,255,100)--- Marker chowania pojazdu
local odb=createMarker(-265.20197, 1185.64063, 18.74219,"cylinder",3,255,0,0,100)--- Marker odbioru pojazdu





addEventHandler("onMarkerHit",root,function(e)
if source==marker then
if getElementType(e)=="vehicle" then
local id=getElementData(e,"car_id")
if id then
local paliwo=getElementData(e,"pojazd_paliwo") or 0
tabela = {}
for _,v in ipairs ( getVehicleUpgrades ( e ) ) do
table.insert ( tabela, v )
end
local tuning = table.concat ( tabela, "," )
local owner=getElementData(e,"pojazd_przebieg") or 0
local model=getElementModel(e)
dbExec(polaczenie,"INSERT INTO `Zapis` (ID, Paliwo, Przebieg,Tuning,Owner,Model) VALUES (?,?,?,?,?,?)",id,paliwo,przebieg,tuning,owner,model)
destroyElement(e)
end
end
elseif source==odb then
if getElementType(e)=="player" then
local q=dbQuery(polacz...
18. Przerobienie skryptu
Sprawa wyglada tak ze mam kilka skryptow ktore mialem na starej wersji mta, a na tej jakos nie chca za bardzo chodzic gdy chce go zalaczyc to w konsoli serwera pokazuje ze resources nazwa failed, nie wiem moze to przez wersje multi czy cos nie mam pojecia, ale skrypty na wersji 1.0 czy tam 1.1 dzialaly, ktos moglby mi z tym pomoc?
19. Przerobienie portfela z CurrentDM pod ServerProject.
Cze??, mam pro?b?. Mo?e kto? przerobi? portfel CurrentDM (Servhost) pod ServerProject?

http://pastebin.com/YtsYzLqV

Stawiam zimne piwo z lodem :D
20. [SAMP] przerobienie obiektów
Jak przerobi? obiekty c createobject na createdynamicobject ? czy jako? tak xd sry jak z?y dzia?...
21. Przerobienie skryptu.
Witam wszystkich. Bardzo prosi?bym o przerobieniu tego skrypt naprawy aut.

https://github.com/lpiob/MTA-XyzzyRP/tree/master/resources/%5BXyzzyRP%5D/lss-naprawapojazdow

Chcia?bym aby ten skrypt by? pod ACL. Chodzi o to ?eby GUI naprawiania otwiera sie tylko danym osoba w ACL. Pr?bowa?em na r??ne sposoby ale mi si? nie uda?o.

Za pomoc stawiam zimne :piwo: :piwo: :piwo: :piwo: :piwo: :piwo:
22. [INNE] Przerobienie komendy
Siema. Dla niekt?rych to banalne a dla innych nie ;D
M?g?by kto? przerobi? ten kod tak, aby go?ciu zamiast po 2 ostrze?eniach dosta? kicka to ?eby po 3 ostrze?eniach dosta? bana?:

[code]CMD:warn(playerid,cmdtext[])
{
if(!Administrator[playerid] && !Moderator[playerid] && !vHeadAdmin[playerid]) return ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, ">> Informacje <<", "{FF0000}Nie masz uprawnie?!", "Spoko", "");
new gracz,powod[64];
if(sscanf(cmdtext,"us[64]",gracz,powod)){
ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, ">> Informacje <<", "›› |Wpisz| {FFFFFF}/warn [ID] [Pow?d]", "Spoko", "");
return 1;
}
if(gracz < 0 || gracz >= MAX_GRACZY) return ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, ">> Informacje <<", "›› |Info| {FFFFFF}Z?e ID gracza!", "Spoko", "");
if(!IsPlayerConnected(gracz)) return ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, ">> Informacje <<", "›› |Info| {FFFFFF}Ten gracz nie jest Online!", "Spoko", "");
if(WarnBlock[gracz]) return ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, ">> Informacje <<", "›› |Info| {FFFFFF}Ten gracz otrzyma? przed chwil? odstrze?enie od Admina!", "Spoko", &qu...
23. [INNE] Prosze o przerobienie komendy
Witam prosze was o przemienie tej komendy z zcmd na strcmp.

http://pastebin.com/yyCmG3yk
24. [INNE] Przerobienie komendy
Witam czy da?oby rade aby po wpisaniu komendy przez gracza sprawdza?o czy gracz posiada bro? z id 41 ? Je?eli posiada mo?e kontynuowa? komend? ?

Chcia?bym aby co? takiego by?o w tej komendzie :

Kod:

if (strcmp("/cgraffiti", cmdtext, true, 10) == 0)
{
ShowPlayerDialog(playerid, 1998, DIALOG_STYLE_MSGBOX, "Graffiti System", "Czy jeste? pewnie ?e chcesz zrobi? Graffiti?", "Tak", "Nie");
return 1;
}


Tworze system graffiti lecz zrobi?em go w skrypcie troche g?upio i nie umiem go doda? do gamemodu ;x x wi?c staram si? jako? zrobi? ?eby tylko gang m?g? u?ywa? graffiti. Dlatego chcia?bym aby tylko kto? kto ma bro? o id 41 m?g? u?ywa? tej komendy.
25. [INNE] Przerobienie komendy
Witam. Czy przerobil by mi kto? komend? z strcmp na dcmd? Oto komenda:
Kod:

dcmd_mandat(playerid, params[])
{
if(pTeam[playerid][gTeam] == TTRUCKER)
{
new moneyplayer;
new moneyplus;
mpt = strtok(cmdtext, idx);
if(!strlen(mpt)) {
SendClientMessage(playerid, COLOR_GREY, "/mandat [ID gracza] [suma]");
} else {
moneyplayer = strval(mpt);
mpt = strtok(cmdtext, idx);
if(!strlen(mpt)) {
SendClientMessage(playerid, COLOR_ADMIN, "Z?a waluta");
} else {
moneyplus = strval(mpt);
new moneyplayername[MAX_PLAYER_NAME];
GetPlayerName(moneyplayer,moneyplayername,sizeof(moneyplayername));
format(string, sizeof(string), "Policjant %s (id:%d) dal mandat w wysokosci %d$ graczowi %s (id: %d)",PlayerName(playerid),playerid, moneyplus, moneyplayername,giveplayerid);
printf(string);
format(string, sizeof(string), "Da?e? %d$ graczowi mandat w wysoko?ci %s $",moneyplus, moneyplayername);
SendClientMessage(playerid, COLOR_GREEN, string);
format(string, sizeof(string), "Policjant %s da? ci kar? mandatow? w wysoko?ci %d$",PlayerName(playerid),moneyplus);
SendClientMessage(moneyplayer, COLOR_GREEN, string);
GivePlayerMoney(moneyplayer, -moneyplus);
}
}
}
return 1;
}
Z g?ry dzi?kuj?
26. PRO¦BY O PRZEROBIENIE SKRYPTU
Z racji tego, że jest wiele osób, które w dziale Lua wrzucaj± jak±¶ czę¶ć kodu i prosz± o przerobienie go w jakim¶ konkretnym celu, postanowiłem utworzyć taki zbiorczy temat, by było się łatwiej i sprawniej poruszać.

Może mały regulamin:

  • Wrzucamy tutaj skrypty w postaci pliku (np. link ze strony hostingowej, tak by można było takie co¶ pobrać).
  • Opis ma być w miarę prosty i zrozumiały, a mianowicie: gdy np. wrzucacie plik, w którym jest zasób odpowiedzialny za spawnowanie pojazdów, to piszecie krótko, np. "chcę, by ten skrypt zapisywał również pojazdy, które będ± należały do gracza X".
  • Posty, które będ± zawierały tylko x linijek kodu, a nie będzie w nich pliku do pobrania, będ± usuwane automatycznie.
  • W momencie, gdy kto¶ zna rozwi±zanie problemu, pisze do swojego "zleceniodawcy" na prywatn± skrzynkę, a nie spami tutaj postami typu "ja to potrafię zrobić, napisz na GG: X".
  • Tematy o podobnej tre¶ci, znajduj±ce się w innych tematach niż ten, będ± usuwane.


I raz jeszcze powtórzę: nie wrzucamy kodów tutaj, lecz pliki z zasobami (chodzi mi o to, by były tam zarówno pliki .lua, jak i inne). Wszystkie zasoby, które będ± niekompletne, będ± usuwane.

Miłego programowania ;)
27. Prosze o Przerobienie mapy
Witam, Mam Problem z przerobieniem mapy o to moj error:

C:Documents and SettingsKarolPulpitpawnoincludea_samp.inc(17) : fatal error 100: cannot read from file: "core"

Compilation aborted.Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase


1 Error.

Prosz? o przerobienie na AMX Obiecuje dam piwkaa:P

DZIEKUJ? Pozdro Karol07210

LINK DO MAPY---- http://www.sendspace.com/file/wru9m5

[ Dodano: 2013-04-13, 10:42 ]
Prosze /Lock
28. [INNE] Przerobienie cmd
Witam mam tak? komend? skuj i chce aby?cie mi pomogli zrobi? co? takiego ?e jak ten skuty gracz wyjdzie z serwera to robi automatycznie kill timer. A i czy da si? co? takiego zrobic ze jak skuje 1 gracza to nie moge ju? 2 sku? i pisze juz sku?es jednego.

[code]if (strcmp(cmd, "/skuj", true)==0){
{
new ulecz[256];
ulecz = strtok(cmdtext, idx);
new gracz = strval(ulecz);
if(wpolicji[playerid]){
if(!strlen(ulecz))
{
SendClientMessage(playerid, COLOR_RED, "WPISZ: /skuj [id gracza]");
return 1;
}
new dis;
dis = GetDistanceBetweenPlayers(playerid,gracz);
if(dis <= 2){
SendClientMessage(playerid, COLOR_GREEN, "Sku?e? gracza.");
SetPlayerAttachedObject(gracz, 0, 19418, 6, -0.011000, 0.028000, -0.022000, -15.600012, -33.699977, -81.700035, 0.891999, 1.000000, 1.168000);
timerSkucia[playerid] = SetTimerEx("skutyTP", 500, true, "ii", playerid, gracz);
SetPlayerSpecialAction(gracz, SPECIAL_ACTION_CUFFED);
TogglePlayerControllable(gracz, 0);
for(new k = 0; k < MAX_PLAYERS; k++)
{
if(IsPlayerConnected(k))
{
if(gTeam[k] == TEAM_MEDYK)
{
DisablePlayerCheckpoint(k);
}
}
}
SendClientMessage(gracz, COLOR_RED, "Policjant sku? Ci?.");
}
else {
SendClientMessage(playerid, COLOR_RED, "Jeste? za daleko od gracza");
}
}
}
return 1;
}


if (strcmp(cmd, "/uskuj", true)==0){
{
new ulecz[256];
ulecz = strtok(cmdtext, idx);
new gracz = strval(ulecz);
if(wpolicji[playeri...
29. [INNE] Przerobienie mapki
Witam mam errory przy przerobieniu mapy .. Oto i one :
C:UsersPrzemekDownloadsPST2012V0.1(2).pwn(17738) : error 012: invalid function call, not a valid address
C:UsersPrzemekDownloadsPST2012V0.1(2).pwn(17738) : warning 215: expression has no effect
C:UsersPrzemekDownloadsPST2012V0.1(2).pwn(17738) : warning 215: expression has no effect
C:UsersPrzemekDownloadsPST2012V0.1(2).pwn(17738) : error 001: expected token: ";", but found ")"
C:UsersPrzemekDownloadsPST2012V0.1(2).pwn(17738) : error 029: invalid expression, assumed zero
C:UsersPrzemekDownloadsPST2012V0.1(2).pwn(17738) : fatal error 107: too many error messages on one line



Kod :
Kod:

for (new i = 0; i < sizeof(Licznik); i++) if (IsPlayerConnected(i))
{
if (showed[i])
{
PlayerTextDrawHide(i, Licznik[i]);
showed[i] = false;
}

PlayerTextDrawDestroy(i, Licznik[i]);
}


return 1;


Linijka numer 17738 :
Kod:

PlayerTextDrawHide(i, Licznik[i]);
30. [INNE] Prosze o przerobienie komendy /set admin
Witam! Nie b?d? pisa? nic na wst?pie, odrazu przejd? do sedna sprawy... Potrzebuje przerobi? komend? z administratorskiej na og?lno dost?pn?... Za pomoc dam pifffko :D :piwo:

Oto kod komendy:
[code]
else if(!strcmp(comm1,"admin",true))
{
if(PlayerInfo[playerid][UID] < 1) return PlayerPlaySound(playerid, 1085, 0.0, 0.0, 0.0);
new playerid2, admin;
if(sscanf(comm2, "dd", playerid2, admin))
{
ShowPlayerDialog(playerid, DIALOG_INFO, DIALOG_STYLE_MSGBOX, "Informacja", "/set admin [id gracza/nick] [poziom admina]", "Okey", "");
return 1;
}
if(PlayerInfo[playerid][UID] == 1 && admin > 0) return 1;
if(admin > 5)
{
ShowPlayerDialog(playerid, DIALOG_INFO, DIALOG_STYLE_MSGBOX, "Informacja", "Poziom administratora nie mo?e by? wi?kszy ni? 5.", "Okey", "");
return 1;
}

if(admin == 0)
{
format(str, sizeof(str), "DELETE FROM `grp_members` WHERE `what` = '6' AND `whatid` = '%d' AND `player_uid` = '%d'", PlayerInfo[playerid2][AL], PlayerInfo[playerid2][UID]);
mysql_check();
print("[MYSQL] /set admin 1");
mysql_query2(str);
mysql_free_result();
}
if(PlayerInfo[playerid2][AL] == 0)
{
format(str, sizeof(str), "INSERT INTO `grp_members` (`what`, `whatid`, `rank`, `player_uid`) VALUES ('6', '%d', '0', '%d')", admin, PlayerInfo[...
31. [INNE] Przerobienie mapki
Tutaj podaje errory :
[code]C:UsersPrzemekDesktoptmz.pwn(5399) : error 017: undefined symbol "DajDoSS"
C:UsersPrzemekDesktoptmz.pwn(5403) : error 017: undefined symbol "DajDoLL"
C:UsersPrzemekDesktoptmz.pwn(5407) : error 017: undefined symbol "DajDoSA"
C:UsersPrzemekDesktoptmz.pwn(5411) : error 017: undefined symbol "DajDoPolicji"
C:UsersPrzemekDesktoptmz.pwn(5415) : error 017: undefined symbol "DajDoPogotowia"
C:UsersPrzemekDesktoptmz.pwn(5419) : error 017: undefined symbol "DajDoPD"
C:UsersPrzemekDesktoptmz.pwn(5423) : error 017: undefined symbol "DajDoTAXI"
C:UsersPrzemekDesktoptmz.pwn(5427) : error 017: undefined symbol "DajDoSN"
C:UsersPrzemekDesktoptmz.pwn(5431) : error 017: undefined symbol "DajDoSG"
C:UsersPrzemekDesktoptmz.pwn(5435) : error 017: undefined symbol "DajDoET"
C:UsersPrzemekDesktoptmz.pwn(5439) : error 017: undefined symbol "DajDoGT"
C:UsersPrzemekDesktoptmz.pwn(5443) : error 017: undefined symbol "DajDoBT"
C:UsersPrzemekDesktoptmz.pwn(5447) : error 017: undefined symbol "DajDoWoj"
C:UsersPrzemekDesktoptmz.pwn(5451) : error 017: undefined symbol "DajDoVIP"
C:UsersPrzemekDesktoptmz.pwn(5643) : error 017: undefined symbol "ZapiszStaty"
C:UsersPrzemekDesktoptmz.pwn(5673) : error 017: undefined symbol "PlayerName"
C:UsersPrzemekDesktoptmz.pwn(5705) : error 017: undefined symbol "P...
32. [INNE] Przerobienie mapki
Mam b??d z przerobieniem GameMode oto b??d :
Kod:

C:UsersPrzemekDesktoppsz.pwn(467) : error 037: invalid string (possibly non-terminated string)
C:UsersPrzemekDesktoppsz.pwn(467) : error 017: undefined symbol "GM"
C:UsersPrzemekDesktoppsz.pwn(467) : error 017: undefined symbol "Zaladowany"
C:UsersPrzemekDesktoppsz.pwn(467) : fatal error 107: too many error messages on one line




Linijka:
Kod:

print("n+------------------+");
print(" GM Zaladowany Pomyslnie);
print("+------------------+n");
33. [INNE] Proszę o przerobienie
Witam

Mo?e mi to kto? przerobi??:http://wklej.org/id/914281/

Chodzi mi ?e opr?cz komunikatu w logach wy?wiet?a? si? r?wnie? na czacie w grze gdy zostanie wykryty atak i ?eby po wykryciu odrazu ban.STAWIAM ZIMNE PIWKO
34. [INNE] Pro¶ba o przerobienie
Cze?? mam pytanie czy m?g?by mi kto? przerobic to
na strcmd oczywi?cie nagroda nie ominie :arrow: :arrow: :+: :piwo: :piwo:

[code]
#include <a_samp>
#include <zcmd>

new Text:FigurkaTD,PFigurka;

public OnFilterScriptInit()
{
FigurkaTD = TextDrawCreate(142.000000, 368.000000, "_");
TextDrawBackgroundColor(FigurkaTD, 255);
TextDrawFont(FigurkaTD, 1);
TextDrawLetterSize(FigurkaTD, 0.200000, 1.000000);
TextDrawColor(FigurkaTD, -1);
TextDrawSetOutline(FigurkaTD, 1);
TextDrawSetProportional(FigurkaTD, 1);
TextDrawUseBox(FigurkaTD, 1);
TextDrawBoxColor(FigurkaTD, 64);
TextDrawTextSize(FigurkaTD, 300.000000, -130.000000);
return 1;
}

CMD:figurka(playerid, cmdtext[])
{
if(GetPVarInt(playerid, "FigurkaWyjeb") != 0)
return SendClientMessage(playerid, -1, "** Utworzy?e?(a?) ju? figurke !! ! **");

if(isnull(cmdtext))
return SendClientMessage(playerid, 0x33AA33AA, "** Wpisz /figurka [podpowiedz] **");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");

new Float:X[3];
GetPlayerPos(playerid, X[0], X[1], X[2]);
TextDrawShowForAll(FigurkaTD);
new StringF[128];
SendClientMessage(playerid, 0xFF0000AA, "########################################");
format(StringF,128,"** Figurka jest na mapie podpowied?: %s **", cmdtext);
SendClientMessageToAll(0x33AA33AA, StringF);
SendClientMessage(pla...
35. [INNE] Przerobienie skryptu.
Witam.Mam do was takie pytanie.Mam skrypt "Ucze?" chodzi w nim o to ,?e admina daje graczu ucznia i ten sie loguje przez komend? np/uloguj ,ale to ka?dy wie.Przechodz?c do sedna sprawy chodzi mi o to czy da si? przerobi? ten skrypt na to by administrator m?g? si? tak logowa? ?Chodzi mi o to by np.Wchodz? na serwer jako RCON i daje komend? /dajadmina id i gracz ma Admina tylko ze nie zna RCONA tylko loguj si? przez cmd /alogin.I czy w taki spos?b poprzez takie logowanie admin bedzi? m?g? dawa? walizki lub tworzy? event ?Czekam na odpowiedz ,je?eli jest mo?liwe takie przerobienie to prosi? bym o wi?cej informacji na ten temat.
36. [GF] przerobienie systemu prywatnych pojazdów
Chc? przerobi? system priv?w ?eby by?o mo?na kupi? 2 auta, ale nie mam poj?cia jak to zrobi?.
Oto kod kt?ry uda?o mi si? wygrzeba?:
[quote]pKey[128],[/quote]
[quote]format(var, 32, "Key=%sn", PlayerInfo[playerid][pKey]);fwrite(hFile, var);[/quote]
[quote] if(strcmp(cmd, "/pojazd", true) == 0 || strcmp(cmd, "/p", true) == 0)
{
if(IsPlayerConnected(playerid))
{
new x_nr[256];
x_nr = strtok(cmdtext, idx);
if(!strlen(x_nr))
{
SendClientMessage(playerid, COLOR_WHITE, "[Usage:] /(p)ojazd [u?ycie]");
SendClientMessage(playerid, COLOR_WHITE, "[Usages:] parkuj | zamek | sprzedaj | sprzedajk | kolor");
return 1;
}
if(strcmp(x_nr,"sprzedaj",true) == 0)
{
if(GetPlayerVehicleID(playerid) == PlayerInfo[playerid][pCarKey])
{
GetPlayerName(playerid, sendername, sizeof(sendername));
new ownvehkey;
if(GetPlayerVehicleID(playerid) == PlayerInfo[playerid][pCarKey]) { ownvehkey = PlayerInfo[playerid][pCarKey]; }
else { return 1; }
if(strcmp(sendername, DynamicCars[ownvehkey][cOwner], true) == 0)
{
new carsellprice = DynamicCars[ownvehkey][cValue] / 4 * 3;
new Float:x,Float:y,Float:z;
new Float:a;
DynamicCars[ownvehkey][cOwned] = 0;
...
37. [INNE] Przerobienie skryptu ,udoskolenie
Witam chcia? bym doda? taki bajer , ?e jak samoch?d mam poni?ej jakie? warto?ci hp lub takiej samej to nie mo?na by by?o odpali? silnika .





Jak kto? by wiedza? jak to zrobi? lub napisze ?e ma poda? jak?? linijk? kodu do dam edita bo w tym monecie nie wiem co mam da? z kodu :(
38. [INNE] Przerobienie mapy na R2
Witam bardzo prosz? o przerobienie mapy honest-rp je?eli wgl mog? was o to prosi? nie wiem czy dawa? link z racji szacunku do pracy autora kto chc? wzi??? jest w temacie Honest-RP oczywi?cie daje piwo i ?apk? w g?r?. Oczywi?cie sam bym to zrobi? ale zbytnio nie potrafie wyskakuje mi error o tre?ci
Cytat:

C:Documents and SettingsmonikaPulpitpawnohonest.pwn(18) : fatal error 100: cannot read from file: "sscanf2"

Compilation aborted.Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase


1 Error.

Je?eli robi? co? ?le prosz? mi napisa? to na nast?pny raz sam zrobie.

Pozdrawiam.
39. [INNE] przerobienie cmd
Witam.
Kod:

if(strcmp(cmd, "/przydzielpojazd", true) == 0)
{
if(IsPlayerConnected(playerid))
{
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_LIGHTYELLOW2, "[U?YJ:] /przydzielpojazd [ID Frakcji]");
return 1;
}
new thecar = strval(tmp);
if (PlayerInfo[playerid][pAdmin] >= 3)
{
if(IsPlayerInAnyVehicle(playerid))
{
if(thecar < 11 || 255)
{
new car = GetPlayerVehicleID(playerid) - 1;
new vehicleid = GetPlayerVehicleID(playerid);
DynamicCars[car][FactionCar] = thecar;
new wstring[128];
format(wstring, sizeof(wstring), "Przydzieli?e? pojazd o ID %d dla frakcji: %d.", vehicleid,thecar);
SendClientMessage(playerid,COLOR_ADMINCMD, wstring);
SaveDynamicCars();
}
else
{
SendClientMessage(playerid, COLOR_LIGHTYELLOW2, "B??dne ID Frakcji.");
}
}
else
{
SendClientMessage(playerid, COLOR_LIGHTYELLOW2, "Nie jeste? w aucie!");
}
}
else
{
ShowPlayerDialog(playerid, 544, 0, "Informacja", "Nie masz uprawnie? i nie mo?esz u?ywa? tej komendy.", "OK", "Anuluj");
}
}
return 1;
}


DynamicCars[car][wlasciciel]

jak zrobi? aby t? cmd przydziela?o pojazd graczu nie frakcji za pomoc :piwo:
40. Przerobienie skryptu
Witam ostatnio pobra?em skrypt zombies
Czy m?g? by kto? zrobi? ?eby po zabicu jednego dawa?o 50$
link