Witam staram si? nauczy? j?zyka lua natrafilem na poradnik w kt?rym nie wiem dlaczego nie dziala mi ta komenda.
function createVehicleForPlayer(thePlayer, command, vehicleModel)
end
addCommandHandler("stworzpojazd", createVehicleForPlayer) createVehicleForPlayer(thePlayer,"stworzpojazd","468")
function createVehicleForPlayer(thePlayer, command, vehicleModel) local x,y,z = getElementPosition(thePlayer) x = x + 5
local createdVehicle = createVehicle(tonumber(vehicleModel),x,y,z) end
elo znowu mam problem , pastonowi?em zrobi? nowy skrypt i now? lokalizacje markera , na db3 nic nie pokazuje .Nie widze markera .
[lua]
addEventHandler("onClientResourceStart", root, function()
napad = guiCreateWindow(415, 222, 543, 390, "", false)
guiWindowSetSizable(napad, false)
buy = guiCreateButton(38, 108, 105, 33, "Ak47", false, napad)
end)
local marker = createMarker(2295.04639, -1686.69812, 13.62975, "cylinder")
addEventHandler("onClientMarkerHit", marker,
function(hitElement, md)
if hitElement ~= localPlayer then return end
if not md then return end
if source ~= marker then return end
guiSetVisible(napad, true)
showCursor(true, false)
end)
function getElementsWithinMarker(marker)
if (not isElement(marker) or getElementType(marker) ~= "marker") then
return false
end
local markerColShape = getElementColShape(marker)
local elements = getElementsWithinColShape(markerColShape)
return elements
end
function podmien()
if source == buttak then
if isElementWithinMarker(localPlayer, marker) then
dff = engineLoadDFF ( "ak47.dff", 355 )
engineReplaceModel ( dff, 355 )
txd = engineLoadTXD ( "ak47.txd" )
engineImportTXD ( txd, 355 )
if guiGetVisible(napad) == true then
guiSetVisible(napad, false)
...
Witam.
Podczas robienia pracy autobusy itp na potka?em na problem
Chcia?em ustawi? blokad? wyjazdu z miasta autem z pracy.
Stworzy?em colsphere ca?? t? p??kule i doda?em kordy do kodu.
B??du ?adnego nie sypie ale auta nie zabiera
local strefa = createColSphere (-2135, 60, 50, 750) --- -2135, 60, 50
addEventHandler("onColShapeLeave", strefa, function(veh)
if getElementModel(veh) == model then
if getElementData(veh, "Przystanek") then
if getVehicleOccupant(veh) then
outputChatBox("Nie opuszczaj strefy przystank?w.", getVehicleOccupant(veh))
end
destroyElement(veh)
end
end
end)
addEventHandler("onClientMarkerHit", marker,
function(hitElement, md)
if hitElement ~= localPlayer then return end
if not md then return end
guiSetVisible(napad, true)
showCursor(true, false)
end)
addEventHandler("onClientGUIClick", root, function(btn, state)
if btn == "left" and state == "up" then
if source == buttonRefuse then
guiSetVisible(napad, false)
showCursor(false)
end
end
end)
function getElementsWithinMarker(marker)
if (not isElement(marker) or getElementType(marker) ~= "marker") then
...
Witam mam problem dotycz?cej cmd:cars chodzi o to ?e jak wybieram "Komis Janusza" to nie wy?wietla si? a jak bior? inne np motocykle czy reszta to jest
Oto kod http://pastebin.com/vzUhHtbX
nie widz? markera w kt?rym wy?wietla si? GUI , wiem i znam pozycje markera , bo sam je ustala?em . My?l? ,?e gdzie? jest drobny b??d i nie potrafi?go znale??.
[lua]
local marker = createMarker(1821.38318, -1683.33215, 13.38281 , "cylinder")
addEventHandler("onClientMarkerHit", marker,
function(hitElement, md)
if hitElement ~= localPlayer then return end
if not md then return end
if source ~= marker then return end
guiSetVisible(napad, true)
showCursor(true, false)
end)
addEventHandler("onClientGUIClick", root, function(btn, state)
if btn == "left" and state == "up" then
if source == buttonRefuse then
guiSetVisible(napad, false)
showCursor(false)
end
end
end)
Tak jak w temacie . Dlaczego ten kod nie dzia?a i czy mo?ecie wyt?umaczy? krok po kroku dlaczego ? Zadnych b?ed?w w db . Marker jest ale panel si? nie pojawia.
Kod :
c-side
[lua]
okno = guiCreateWindow(256, 136, 286, 318, "Panel Pogotowia", false)
guiWindowSetSizable(okno, false)
guiSetVisible(okno, false)
|---------------------------------------------------
|--- LS BeachSide Filterscript
|-- Script v1.03
|-- 19th April 2015
|---------------------------------------------------
|-- LS BeachSide Building Elevator created
|---------------------------------------------------
Loaded 12 filterscripts.
Witam, tworz? skrypt polegaj?cy na tworzeniu si? dodatkowych obiekt?w ?wiat?a na wozach stra?ackich. Problem polega na tym, ?e gdy klikam klawisz odpowiadaj?cy za utworzenie tych obiekt?w to one si? nie pojawiaj?. B??d wyst?puje tylko w pobli?u bazy (troch? poni?ej 1000 obiekt?w). W dalszej odleg?o?ci od bazy si? pojawiaj?. Gdy u?ywam funkcji "CreateDynamicObject" te? b??du nie ma jednak?e wol? u?ywa? do tego celu "CreateObject" poniewa? obiekt wida? od razu i nie trzeba si? rusza? pojazdem. Czy jest jaka? funkcja kt?ra by naprawi?a ten problem ewentualnie usun??a to, ?e trzeba si? rusza? wozem ?eby obiekt zosta? stworzony ?
function fix1(thePlayer) local accName = getAccountName ( getPlayerAccount ( thePlayer ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) then
local theVehicle = getPedOccupiedVehicle ( thePlayer) local succes = fixVehicle ( theVehicle )
if ( succes ) then
outputConsole ("Pojazd naprawiony", thePlayer ) end
end
end
addCommandHandler("fix", fix1)
Siema. Ostatnio pobra?em sobie GM DayZ na serwer MTA i mam pewien problem poniewa? podczas chodzenia nie zabierana ani pragnienia ani g?odu.
Ni?ej podaj? kod na zabieranie owych status?w
--[[
function setHunger()
for i,player in ipairs(getElementsByType("player")) do
if getElementData(player,"logedin") then
value = gameplayVariables["loseHunger"]
addPlayerStats (player,"food",value)
end
end
end
setTimer(setHunger,60000,0)
function setThirsty()
for i,player in ipairs(getElementsByType("player")) do
if getElementData(player,"logedin") then
value = gameplayVariables["loseThirst"]
addPlayerStats (player,"thirst",value)
end
end
end
setTimer(setThirsty,60000,0)
function checkThirsty()
for i,player in ipairs(getElementsByType("player")) do
if getElementData(player,"logedin") then
value = 0
if getControlState (player,"sprint") then
value = gameplayVariables["sprintthirst"]
end
addPlayerStats (player,"thirst",value)
end
end
end
setTimer(checkThirsty,10000,0)
]]
function finishJob()
if jobMarker and isElement(jobMarker) then
destroyElement(jobMarker)
jobMarker = nil
end
if jobBlip and isElement(jobBlip) then
destroyElement(jobBlip)
jobBlip = nil
end
end
function hideNextPoint(el, md)
if el ~= localPlayer or not md then return end
if not getPedOccupiedVehicle(el) then return end
local pojazd = getPedOccupiedVehicle(el)
if not getElementData(pojazd, "pojazd_smieci") then setElementData(pojazd, "pojazd_smieci", 0) end
if getElementData(pojazd, "pojazd_smieci") > 1 then
outputChatBox("* Posiadasz 1 Pasa?era! Jedz do Celu.")
return
end
local smieci = getElementData(pojazd, "pojazd_smieci") + math.random(25, 35)
Mam taki problem. Poniewa? wgra?em tagi i w plikach freeroam znalzlem fr_server i usunalem z niego getplayerchat czy jakos tak.Problem by? taki ?e pisalo podwojnie po usunieciu nie pisze podwojnie ale nie da sie spawnoac aut
local punkty={
-- umlv={358.30,182.45,1007.38,interior=3,dimension=9}
szkolalatania={1480.00,-1699.35,14.05, interior=0, dimension=0},
}
for i,v in pairs(punkty) do
v.marker=createMarker(v[1],v[2],v[3],"cylinder", 1, 0,0,0,100)
setElementInterior(v.marker, v.interior)
setElementDimension(v.marker, v.dimension)
end
-- triggerServerEvent("requestEgzaminyInfo", resourceRoot)
addEvent("requestEgzaminyInfo", true)
addEventHandler("requestEgzaminyInfo", resourceRoot, function()
local character=getElementData(client, "users")
if not character then return end
local dbid=character.id
if not dbid then return end
local dane=exports.DB2:pobierzTabeleWynikow("select e.kod,e.opis,e.waznosc,e.koszt,eg.ts zdany,eg.ts + INTERVAL e.waznosc DAY>NOW() wazny FROM lss_egzaminy e LEFT JOIN lss_egzaminy_gracze eg ON eg.kod=e.kod AND eg.id_gracza=? WHERE e.active=1", dbid)
triggerClientEvent(client, "egzaminyInfoResponse", resourceRoot, dane)
end)
[code]addEvent ( "Logowanie:rozpocznij", true )
addEventHandler ( "Logowanie:rozpocznij", root, function ( login, haslo )
local q = exports["DB"]:wykonajKwerende ( "SELECT * FROM FC_Accounts WHERE Login = ?", login )
if #q == 0 then
return triggerClientEvent ( "Logowanie:blad", source, "Konto nie istnieje w bazie danych" )
end
for _,v in pairs ( q ) do
if v.haslo ~= haslo then
return triggerClientEvent ( "Logowanie:blad", source, "Has?o do konta '"..login.."' jest b??dne" )
end
end
local konto = getAccount ( login, haslo )
if konto == false then
local account = addAccount ( tostring(login), tostring(haslo) )
for i=0,5 do
outputChatBox ( " ", root )
end
else
local account = logIn ( source, konto, haslo )
end
triggerClientEvent ( "Logowanie:zakoncz", source )
for i = 0, 10 do
outputChatBox ( " ", source )
end
for _,v in pairs ( q ) do
if v.admin == 1 then
setElementData ( source, "ranga", "Admin" )
ranga = "#FF0000Administrator"
elseif v.moderator == 1 then
setElementData ( source, "ranga", "Mod" )
ranga = "#008000Moderator"
elseif v.admin == 0 and v.moderator == 0 then
setElementData ( source, "ranga", "Gracz" )
ranga = "#FFFFFFGracz"
end
setElementData ( source, "uid&q...
Witam mam problem natomiast mam serwer samp!
Wgrywam skrypty i odkrylem ze cos jest nie tak z skryptami a co natomiast?
To to ?e musz? si? bawi? ! z plikiem server.cfg !
A co dokladniej?
Gdy mam w server.cfg
filterscripts base gl_actions gl_property gl_realtime ls_mall attachments rangi c-ban races napraw AS rekord wojsko PrzepiszKod tune bazagangu PM cheats Cars Bronie_v.0.1
To jest problem bo gdzie nie dopisze np skrypte w server.cfg : rejestracja to dziala ale moze reszta dzialac lub nie! ze np : na koncu kolo base daje rejestracja ! to Bronie lub races albo co innego moze nie dzialac gdy usune tamte dzialaja!
da sie to naprawic?!
Dam piwko!
Witam chcia?bym, ?eby animacje zosta?y powtarzane dan? ilo?? razy przez p?tle. Jednak w praktyce nie dzia?a, co mam zrobi? (Pr?buje napisa? skrypt na podnoszenie sztangli)
Oto kod:
public OnPlayerCommandText(playerid, cmdtext[])
{
for (new mojapetla = 0; mojapetla < 10; mojapetla++)
{
if (strcmp("/cwicz", cmdtext, true, 10) == 0)
{
GameTextForPlayer(playerid, "~r~~h~Rozpoczoles cwiczenia", 3000, 3);
ApplyAnimation(playerid,"benchpress","gym_bp_geton",4.1,0,0,0,1,0);
ApplyAnimation(playerid,"benchpress","gym_bp_up_A",4.1,0,0,0,1,0);
ApplyAnimation(playerid,"benchpress","gym_bp_down",4.1,0,0,0,1,0);
return 1;
}
}
return 0;
}
Witam chcia?em zrobi? burdel i mam problem w tym ?e jak wbije dwie osoby to dalej pisz? "Musisz wej?? z drug? osob?" Kto? pomo?e? Za pomoc zimne tyskie leci
Mam taki problem i? nie wyjade mi pojazd z przechowywalni
oto kod z strony clienta :
[lua]local screenW, screenH = guiGetScreenSize()
local marker=createMarker(-366.55, 1193.08, 19.71, "cylinder", 2, 255,255,255,50)
local sphere=createColSphere(-349.17, 1155.57, 19.74,5)
local t=createElement("text")
setElementData(t,"scale",1.5)
setElementData(t,"name","Odbi?r pojazd?w")
setElementPosition(t,-366.55, 1193.08, 19.71)
addEvent("onParkingGetVehicles", true)
addEventHandler("onParkingGetVehicles", root, function(result)
guiGridListClear(wm.gridlist)
if not result then return end
for i,v in pairs(result) do
local row=guiGridListAddRow(wm.gridlist)
guiGridListSetItemText(wm.gridlist, row, 1, v["id"], false, false)
guiGridListSetItemText(wm.gridlist, row, 2, getVehicleNameFromModel(v["model&qu...
Witam,
Mam problem oto? nie moge zmieni? lss-bankomaty na swoj? baze danych prosze o pomoc
Tutaj kawa?ek kodu - W odpowiedziach prosz? napisa? co mam doda? / zmieni?
[code]--[[
@author Lukasz Biegaj <[email protected]>
@copyright 2011-2013 Lukasz Biegaj <[email protected]>
@license Dual GPLv2/MIT
@todo przerobic z zasobu DB na DB2
]]--
local function getPlayerID(plr)
local c=getElementData(client,"character")
if not c or not c.id then return nil end
return tonumber(c.id)
end
addEvent("onPlayerRequestATMInfo", true)
addEventHandler("onPlayerRequestATMInfo", resourceRoot, function()
local c=getElementData(client,"character")
if not c or not c.id then
triggerClientEvent(client,"doFillATMInfo", resourceRoot, false)
return
end
local dbid=tonumber(c.id)
if not dbid then
triggerClientEvent(client,"doFillATMInfo", resourceRoot, false)
return
end
local sr=exports.DB:pobierzWyniki("SELECT bank_money FROM lss_characters WHERE id="..(tonumber(dbid) or 0).." LIMIT 1")
if not sr or not sr.bank_money then
triggerClientEvent(client,"doFillATMInfo", resourceRoot, false)
return
end
triggerClientEvent(client,"doFillATMInfo", resourceRoot, true, tonumber(sr.bank_money))
end)
addEventHandler("onVehicleStartEnter",root,function(e,seat)
if seat==0 then
if getElementData(source,"frakcja") then
if getElementData(source,"frakcja")=="SAPD" then
if getElementData(e,"player:duty")~="SAPD" then
cancelEvent()
end
local q=dbQuery(db,"SELECT * FROM `Frakcje` WHERE `Nick`=?",getPlayerName(e))
local x=dbPoll(q,-1)
dbFree(q)
if x[1].Poziom<getElementData(source,"poziom") then
cancelEvent()
end
end
end
end
end)[/lua]
--------------------------------
Powie kto? w czym pr...
Witam m?j problem polega na tym, ?e po wej?ciu w pickup nic si? niedzje. Nie ma ?adnych DB3. Nie wiem o co chodzi, jak dla mnie jest wszystko w porz?dku, mo?e jaki? liter?wki ale w?tpie. Prosz? o pomoc.
function logfcsd(thePlayer) konto = getAccountName(getPlayerAccount(thePlayer))
if getElementData(thePlayer, "FCSD") == false then if isObjectInACLGroup("user." ..konto, aclGetGroup("FCSD")) then
setPlayerNametagColor(thePlayer, 255, 229, 180) skin = getElementModel(thePlayer) setElementData(thePlayer, "FCSD", true) outputChatBox("Wszed?es na s?u?b? w Fort Carson Sherrif Department !", thePlayer, 255, 229, 180)
else outputChatBox("Nie jestes zatrudniony w frakcji Fort Carson Sherrif Department !", thePlayer, 255, 229, 180) end else setElementModel(thePlayer, skin) setElementData(thePlayer, "FCSD", false) setPlayerNametagColor(thePlayer, 255, 255, 255) outputChatBox("Wyszed?es ze s?u?by w Fort Carson Sherrif Department !", thePlayer, 255, 229, 180) end
end
addEventHandler("onPickupHit", fcsd, logfcsd)
Mam taki skrypt. Ma on zapisywa? kas? po wyj?ciu z serwera lecz nie zapisuje. Co jest ?le?
function playerLogin (thePreviousAccount, theCurrentAccount, autoLogin)
if not (isGuestAccount (getPlayerAccount(source))) then
local accountData = getAccountData (theCurrentAccount, "kasa")
if (accountData) then
local playerMoney = getAccountData(theCurrentAccount, "kasa") playerMoney = tonumber(playerMoney) setPlayerMoney(source, playerMoney) end
end
end
addEventHandler("onPlayerLogin", getRootElement(), playerLogin)
function onQuit()
if not (isGuestAccount (getPlayerAccount (source))) then
account = getPlayerAccount (source)
if (account) then
setAccountData(account,"kasa", tostring(getPlayerMoney(source))) end
end
end
addEventHandler("onPlayerQuit", getRootElement(), onQuit)
witajcie chcialem prosic pomoc gdyz nie wiem czemu wgram wiecej obiektow do gamemoda (createObject) to nie ma nie ktorych oraz czsami komendy nie dzialaja prosze o pomoc nagroda to piwo
Witam. M?j problem polega na tym, ?e nie wysy?a wiadomo?ci do nikogo z administracji. Za pomoc stawiam
Server:
function sendAdmin(nazwa1, tresc1)
for i, v in ipairs (getElementsByType("player")) do
if hasObjectPermissionTo(v, "command.ban", true) then
outputChatBox("=============Raport============", v, 255, 255, 255, true) outputChatBox("Nick Gracza: "..nazwa1, v, 255, 255, 255, true) outputChatBox("Tre??: "..tresc1, v, 255, 255, 255, true) end
end
end
addEvent("pokazAdminowi", true) addEventHandler("pokazAdminowi", getRootElement(), sendAdmin)
if getElementData(localPlayer,"AdminsLvl") == 0 then
level= "gracz" elseif getElementData(localPlayer,"AdminsLvl") == 1 then
level= "vip" elseif getElementData(localPlayer,"AdminsLvl") == 2 then
level= "admin" end
Witam po raz kolejny . Tak jak w temacie ....
[lua]
okno = guiCreateWindow(241, 151, 325, 294, "Panel Policji", false)
guiWindowSetSizable(okno, false)
function skin1 (thePlayer)
if source == p1 then
setElementModel (thePlayer, 280)
outputChatBox ("Skin zosta? zmieniony .", player )
end
end
addEventHandler ("onClientGUIClick", p1, skin1 )
function skin2 (thePlayer)
if source == p2 then
setElementModel (thePlayer ,281)
outputChatBox ("Skin zosta? zmieniony .", player )
end
end
addEventHandler ("onClientGUIClick", p2, skin2 )
function skin3 (thePlayer)
if source == p3 then
setElementModel (thePlayer ,282)
outputChatBox ("Skin zosta? zmieniony .", player )
end...
[lua]bindKey("e", "down", function()
if not isElementWithinMarker(localPlayer, praca) then return end
if not getElementData(localPlayer, "gracz_praca") then
local losuj = math.random(2, #miejscaelektryk)
setElementData(localPlayer, "gracz_praca", true)
outputChatBox("#919191 Od??? telewizor na przyczep?.",255,255,255,true)
toggleControl("sprint", false)
setPedAnimation ( localPlayer, "CARRY", "crry_prtial", 1,true )
local cel = createMarker(miejscaelektryk[losuj][1], miejscaelektryk[losuj][2], miejscaelektryk[losuj][3]-1.0, "checkpoint", 1.0, 255, 0, 0)
local blip = createBlipAttachedTo(cel, 41)
addEventHandler("onClientMarkerHit", cel, function(el, md)
if not md or getElementType(el) ~= "player" then return end
if el ~= localPlayer then return end
if getPedOccupiedVehicle(el) then
outputChatBox("#919191 Nie mo?esz tego od?o?y? b?d?c w poje?dzie!",255,255,255,true)
return
end