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: dawanie
1. dawanie broni
na localu dzia?a?o a gdy postawi?em serwer to ju? nie dzia?a i pojawia sie b??d
attempt to compare nil with nubmer

Kod:


if isMouseInPosition((screenW - 180) / 2, (screenH - 35) / 2, 180, 35) then
if getElementData(localPlayer,"player:rank") < 10 then
outputChatBox("#64a0ff[AsortymentSAPD] #ffffff* Posiadasz zbyt nisk? range na ten przedmiot!", 255, 255, 255, true)
else
triggerServerEvent ("giveweapon", getLocalPlayer(), "27","60")
setPedWeaponSlot(localPlayer, 3)
end
end
2. kasyno pobieranie hajsu z banku i dawanie kasy do banku
c.lua
[lua]

--[[
Casino - slot machine
@author Hyperion/R3fr3Sh <[email protected]>
@copyright 2017 Hyperion/R3fr3Sh <[email protected]>
@license GPLv3
]]


-- source of the background:http://www.freepik.com/free-vector/valentine-s-background-design_1024958.htm#term=slot (for both internal and external drum parts)
-- background edited by MrDadosz [email protected] using GIMP
local drum = "img/drum.png"
local druminteral = "img/cards.png"
-- general settings
local settings = {}
settings.drumColor = tocolor(0, 125, 255)
settings.stake = 30000000 -- starting stake
settings.stakeMax = 500000000 -- maximum stake
settings.stakeMin = 1000000 -- minimum stake
settings.stakeStep = 1000000 -- step of a stake
settings.font = "font/Roboto.ttf"
settings.language = "english"
settings.jackpotSound = "sounds/jackpot.ogg" -- SOURCE: https://www.freesound.org...6/sounds/51671/ "This work is licensed under the Attribution Noncommercial License."
settings.positionsCol = { -- slot machine colshape positions
-- {x, y, z, size, dimension, interior}
{1135.08, -3.87, 1000.68, 0.3, 0, 12},
{1132.90, -1.66, 1000.68, 0.3, 0, 12},
{1134.91, 0.61, 1000.68, 0.3, 0, 12},
{1127.99, 3.01, 1000.68, 0.3, 0, 12},
{1126.95, 3.01, 1000.68, 0.3, 0, 12},
{1125.90, 3.01, 1000.68, 0.3, 0, 12},
{1124.87, 3.01, 1000.68, 0.3, 0, 12},
}

-- don't modify these unless you...
3. dawanie zarobkow z pracy do bankomatu
Witam Chc? zrobi? export do bazy danych tak aby po wjechaniu w punkt na pracy dostawalo si? hajs do bankomatu nie do hudu


[lua]function busDriver(el, md)
if el ~= localPlayer or not md then return end
if jobTarget > maxTarget and getPedOccupiedVehicle(el) then return end
if jobTarget == maxTarget and not getPedOccupiedVehicle(el) then return end

if jobTarget == #districtsBus then
finishJob()
playSoundFrontEnd(5)
addEventHandler("onClientRender",root,render3)
setTimer(renderstop3,2000,1)
--outputChatBox("* Zako�czy�e�/a� prac�.")
else
kasa = math.random(75,150)
showMarker()
playSoundFrontEnd(12)
if getElementData(el,"player:premium") then
addEventHandler("onClientRender",root,render4)
setTimer(renderstop4,1000,1)
--outputChatBox("* Zidentyfikowa?e?(a?) punkt i otrzymujesz 100 PLN.")
local id = getElementData(el, "player:sid")
exports["pystories-db"]:dbSet("UPDATE pystories_users SET bank_money=bank_money+15000 WHERE id=?", id)
setElementData(el,"player:srp", getElementData(el,"player:srp")+math.random(0,1))
else
--outputChatBox("* Zidentyfikowa?e?(a?) punkt i otrzymujesz 75 PLN.")
addEventHandler("onClientRender",root,render4)
...
4. Skrypt pracy - dawanie kasy
Witam mamy taki kod, zmieni?em nadanie kasy domy?lne na takie z bazy danych, ale kasy nie nadaje

[ Dodano: 2020-03-30, 12:13 ]
Kod:

else
exports.hud:sendBottomNotification(localPlayer, "Sadzenie Truskawek", "Zasadzi?e? Truskawki, zarobi?e? 15$")
setElementData(el,"player:reputation", getElementData(el,"player:reputation")+math.random(0,1))
exports.global:giveMoney(client, rate)
5. Dawanie premki po zarejestrowaniu .
Witam ot?? pr?bowa?em doda? do panelu logowania dawanie premki gdy dany gracz si? zarejestruje lecz nie wychodzi?o mi to.
element data na premke
[lua]setElementData("player:premium", 7)[/lua]
t? 7 doda?em bo chc? by dawa?o na 7dni.
kod s_logowanie
[lua]
--[[
--[[
Panel Logowania by Kurianusz @2016 .
Regulamin /Licencja
Korzystanie z tego kodu tylko je?eli posiadasz tzw. copyrights. Zakaz usuwania tej notatki!
Pami?taj ?e nielegalne korzystanie z kodu podpada pod kodeks karny :> Tak samo jak usuni?cie tej notatki!
]]



function sprawdzorganizacje(plr)
local x = exports['ogrpg-db']:dbGet("SELECT spawn from ogrpg_organization_list join ogrpg_organizations on ogrpg_organizations.code = ogrpg_organization_list.id WHERE uid=? and not(spawn=?)",getElementData(plr,"player:uid"),"0,0,0")
if x and #x > 0 then
local t = split(x[1].spawn, ",")
return t
end
return false
end

function getAdmin(plr,level)
if level then
local result=exports["ogrpg-db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=? AND level=?", getPlayerSerial(plr), level)
if result and #result > 0 then
return true
else
return false
end
else
local result=exports["ogrpg-db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=?", getPlayerSerial(plr))
if result and #result > 0 then
return true
else
return false
end
end
end

addEvent("l...
6. Skrypt na dawanie pieniędzy pomiędzy graczami na mta
Witam wszystkich czy kto? ma jaki? skrypt na dawanie pieniedzy w mta?
7. Dawanie hajsu do banku
Witam ot??, mam spraw? zrobi?by mi kto?, ?e jak si? odbiera wyp?at? z frakcji daje ja do banku? element data banku bank_money
kod
local marker=createMarker(-2776.52, -376.177.44-0.955"cylinder"1.1255800)
setElementInterior(marker,0)
setElementDimension(marker,0)
local text=createElement('text')
setElementPosition(text,-2776.52, -376.177.44)
setElementData(text,"name","Wyp?atynFrakcyjne")
setElementInterior(text,0)
setElementDimension(text,0)

addEventHandler("onMarkerHit"marker, function(el,md)
    
local uid getElementData(el,"player:uid")
    
local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_factions WHERE uid=?"uid)
    if 
#result > 0 then
        
if Frakcje[result[1].codethen
            
if getElementData(el,"player:workinjob") and getElementData(el,"player:workinjob") >= 1 then
                local money 
= (Frakcje[result[1].code] * getElementData(el,"player:workinjob"))
                
outputChatBox("* Otrzymujesz "..money.."  $ za przepracowanych "..getElementData(el,"player:workinjob").." minut!",el)
                
givePlayerMoney(el,money)
                
setElementData(el,"player:workinjob",0)
            else
                
outputChatBox("* Nie masz nic do odebrania!",el)
            
end
        
else
            
outputChatBox("* Nie jeste? w frakcji, kt?ra mo?e odbiera? wyp?aty!",el)
        
end
    end
end
)
8. Jaka komenda na dawanie premium na ogrpg
Tak ja w temacie za pomoc dam piwo
9. Możecie pomóc żeby dodać 3 range komend na dawanie premek
Siema mo?ecie pom?c ?eby doda? dla rangi 3 komende na dawanie premek

if exports['pystories-admin']:getAdmin(plr,4then
10. Dawanie admina
Chc? da? Admina przez mysql daje sobie dziala..
Daje komus nie dziala
Dodaje w kolumny wartosci klikam wstaw i niby jest ktos /duty i nie dziala sprawdzalem na sobie dwa razy i mi dzia?a a innym nie powie ktos o co chodzi?
Reconnecty byly robione.. licze na szybk? odpowiedz stawiam piwko
11. Jaka była komenda na dawanie hajsu danemu gracozwi
witam,
mam komendy /run givePlayerMoney ale nie wiem jak dac konkretnemu graczowi
12. Dawanie gotówki na start
Witam mam problem gdy? chce zeby gracz jak wchodzil na serwer pierwszy raz to dostaje 2000 na start ale nie wiem jak to zrobic oto moj kod ktory nie dzia?a:
Server:
Kod:

addEventHandler("onPlayerLogin",root,
function (thePlayer)
kasa = getPlayerMoney ( thePlayer )
if (kasa == 0)
givePlayerMoney ( thePlayer, 2000 )
else
cancelEvent()
end
end
)
13. Dawanie Reputacji Z Prac
[center][b]Witam[/b]
Mam taki problem po zmianie zarobk?w chodzi o to ze jak uda?o mi si? zrobi? zarobki z prac do bankomat?w to nie dostaje reputacji.[/center]
trigger z pracy
[lua]triggerServerEvent("WyplataPraca",root, 10)[/lua]
a tu kod kt?ry powinien dawa? reputacje.
S:
[lua]addEvent("givePlayerMoney", true)
addEventHandler("givePlayerMoney", root, function(value,value2)
-- nie zalogowana osoba a fuj
if not tonumber(value) then return end
if not getElementData(source,"player:logged") then return end
givePlayerMoney(source,value*2)
local rnd={math.random(1,30),math.random(1,2)}
if rnd[1] == 1 or rnd[1] == 15 or rnd[1] == 26 then
local rep=getElementData(source,"player:reputation") or 0
local xd=rep+rnd[2]
setElementData(source,"player:reputation",xd)
triggerClientEvent(source, "reputation:show", resourceRoot, rnd)
end
end)

addEvent("takePlayerMoney", true)
addEventHandler("takePlayerMoney", root, function(how)
if not getElementData(source,"player:logged") then return end
if not tonumber(how) then return end
takePlayerMoney(source,how);
end)

-- Kod s?u??cy od usuwania danego pojazdu
addEvent("destroyVehicle", true)
addEventHandler("destroyVehicle", root, function(veh)
if not veh then return end
destroyElement(veh)
if obiekt[veh] then
destroyElement(obiekt[veh])
end
end)

-- Kod s?u?...
14. dawanie kasy
close
15. Dawanie MYSQL Admina
Jak da? admina przez MYSQL

http://imgur.com/c0WH3qP
16. Dawanie paliwa oraz ID
Siemaneczko, mam pi?kny skrypt na pojazdy z salonu, ale mam 2 problemy, a mianowicie takie, ?e nie wiem do cholery jak zrobi?, aby dawa?o X Litr?w paliwa oraz kolejne ID pojazdu na rejestracji (Np. SF 1). Ma kto? jaki? pomys? jak to zrobi?? Dam repk? oraz zimne piwko! :)
17. Dawanie rangi ACL przez komende
Witam mam takie pytanie , czy mo?liwe jest dawanie rangi ACL za pomoc? komendy bez zasob?w kt?re oferuje serwer MTA

Za pomoc prawilne :piwo:
18. Dawanie broni
Witam mam pytanie , jak mog? zrobi? tak ?e po wpisaniu komendy /suszarka , ranga ACL Moderator dostaje dostanie suszarke (Colt 45 ) ?

za pomoc :arrow: :piwo: R*
19. Dawanie skina po zalogowaniu
Witam. Mam problem z dawaniem skina po zalogowaniu. Ot??, jak wybior? spawn to daje mi skina CJ. Mo?e to kto? poprawi??

S-Side z logowania:

[lua]function PlayerLogin(username,password,checksave)
if not (username == "") then
if not (password == "") then
local account = getAccount ( username,password )
if ( account ~= false ) then
logIn(source, account, password)
setCameraTarget(source, source)
outputChatBox ("Gratulacje! Zalogowa?e? si? poprawnie!", source)
triggerClientEvent (source,"Zacznij",getRootElement())
toggleControl (source, "fire", false)
toggleControl (source, "aim_weapon", false)
end
end
end
end
addEvent("onRequestLogin",true)
addEventHandler("onRequestLogin",getRootElement(),PlayerLogin)

function registerPlayer(username,password,passwordConfirm)
if not (username == "") then
if not (password == "") then
local account = getAccount (username,password)
if (account == false) then
local accountAdded = addAccount(tostring(username),tostring(password))
if (accountAdded) then
triggerClientEvent (source, "Zaloguj", root, source)
else
triggerClientEvent( source, "Konto_jest", root, source)
end
else
triggerClientEvent ( source, "Nick_Konto", root, source)
end
else
triggerClientEvent ...
20. Dawanie Broni
Prosz? o jaki? kodzik kt?ry po wej sci w marker bedzie nam dawa?o bro? o id 14
21. Dawanie auta
Siema, tutaj ?ysy, ja z problemem:
Napisa?em skrypt z poradnika, i nie dzia?a :/ .
Mogliby?cie pom?c? Oczywi?cie, daje Grza?ca, na ocieplenie :) .
Chcia?bym aby w kodzie znajdowa? si? w markerze text3d, z napisem: Darmowe Buffalo, ale nie wiem jak to zrobi? ;/.
KOD:
Kod:

function auto ( thePlayer )
createVehicle ( 402, -2534.1706542969, 2361.3276367188, 4.9856700897217 )
marker = createMarker ( -2534.1706542969, 2361.3276367188, 4.9856700897217, "cylinder", 1.5, 255, 255, 255, 170 )
end
addEventHandler ( "onMarkerHit", marker, auto )

Pozdrawiam,
?ysy.

[ Dodano: 2014-12-27, 12:29 ]
Wydaje mi si?, ?e musz? dwa razy end da?, ale nie jestem pewien.
22. [DM] Komenda Administratora RCON na dawanie respektu
Witam mo?e mi kto? z was da? komend? dla admina rcon na dawanie respektu graczom?

z g?ry dzi?ki!
23. [INNE] [MySQL] Dawanie lidera.
Witam, mam problem gdy? chce zapisa? lidera do MySQL ale si? co? nie zapisuje. Gdy daje lidera to dzia?a dobrze, ale lidera nie zapisuje.
Kod:

CMD:dajlider(playerid, params[])
{
new id;

if(sscanf(params, "dd",player,id))
return ShowPlayerDialog(playerid, 0, DIALOG_STYLE_MSGBOX, "Info", "U?yj: /dajlider <id gracza> <1>nnID Frakcji:ntPolicja - 1", "Rozumiem", "");

Gracz[player][pFrakcja]=id;
Gracz[player][pLider]=id;

format(String64, sizeof(String64), "Admin %s doda? Ci? jako lidera frakcji.", PlayerName(playerid));
ShowPlayerDialog(player, 0, DIALOG_STYLE_MSGBOX, "Info", String64, "Rozumiem", "");
format(String64, sizeof(String64), "Doda?e? %s jako lidera frakcji o ID:%d.", PlayerName(player),id);
ShowPlayerDialog(playerid, 0, DIALOG_STYLE_MSGBOX, "Info", String64, "Rozumiem", "");

format(Query128, sizeof(Query128), "UPDATE `Policja` SET `Lider` = '1' WHERE `Nick` = '%s'", PlayerName(player));
mysql_query(Query128);

printf("[Lider] Nick: %s, Lider: %d, Pracownik: %d", PlayerName(playerid), Gracz[playerid][pLider], Gracz[playerid][pPracownik]);

return 1;
}

Za pomoc dzi?kuje, ka?d? wypowied? nagradzam :piwo: .
24. dawanie pieniedzy
Witajcie.

Jak w tym kodzie zrobi? tak ?eby gracz nie m?g? dawa? wi?cej ni? ma w portfelu ?


function money_func(player,cmd,playername,money)
    if 
playername and money then
      local player2 
getPlayerFromName(playername)
      if 
player2 then
       
if tonumber(money) and tonumber(money) >= 1 then
           givePlayerMoney
(player2,tonumber(money))
           
takePlayerMoney(player,tonumber(money))
       
end
      end
    
else
         
outputChatBox("Podpowiedz: /dajkase [Nick Gracza] [Kwota]",player)
    
end
end
addCommandHandler
("pay",money_func)


Pozdrawiam :)
25. [INNE] Dawanie Administratora
Hejo. Mam problem z komend?.. a raczej zupe?nie nie wiem jak j? zrobi?.

Chce zrobi? dawanie/usuwanie przez komend? HeadAdmina w mysql.
Mam zmienn?
Kod:

new HeadAdmin[MAX_PLAYERS];


i chce najlepiej aby w tabeli "Players" robi?o kolejn? linijke HeadAdmin i tam by mo?na by?o zmienia? z 1 na 0 lub na odwr?t.. Wiadomo chyba o co chodzi? ?e jak dam HeadAdmina graczu o nick'u
to ustawia 1. A gdy mu wezm? ustawia 0.

Za pomoc sypne du?? ilosci? respektu oraz piw
26. [INNE] Dawanie Admina
Czesc mam pytanie jak zrobic komende na dawanie admina zebym nie musia? dawac rcon ??

:arrow: :piwo:
27. [INNE] Komenda na dawanie score
Witam.

Jak zrobi? komend? dla admina, kt?ry jest zalogowany na RCON'a aby m?g? dawa? dan? ilo?? score dla jakiego? gracza ?

Pozdrawiam i za pomoc rozdaj? :arrow: :piwo:
28. [INNE] Komenda na dawanie jetpacka
Mam w mapie tak? komend?

Kod:

COMMAND:givejet(playerid,params[])
{

if(!IsAdmin(playerid))
{
SendClientMessage(playerid, COLOR_ERROR, " (b??d) Nie jeste? administratorem.");
return 1;
}

new PlayerId;
if(sscanf(params, "ud", PlayerId))
{
SendClientMessage(playerid, COLOR_ERROR, "/givejet [id gracza]");
return 1;
}

if(!IsPlayerConnected(playerid))
{
SendClientMessage(playerid, COLOR_ERROR, " (b??d) Gracz Ten nie jest Online.");
return 1;
}

SetPlayerSpecialAction(playerid, 2);

new String[255];
format(String, sizeof(String), "Administrator %s (%d) da?(a) ci Jetpacka", Player[playerid][Name], playerid);
SendClientMessage(playerid,COLOR_GREEN, String);
format(String, sizeof(String), "Da?e?(a?) Jetpacka graczowi %s (%d).", Player[PlayerId][Name], PlayerId);
SendClientMessage(playerid,COLOR_GREEN, String);
return 1;
}


Jednak nie dzia?a ona tak jak powinna. Zamiast dawa? jetpacka danemu graczowi daje mi :-? Je?eli wie kto? jak to naprawi? prosz? o pomoc.