GTAONLINE.PL :: PROŚBY O PRZEROBIENIE SKRYPTU

Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

"DestroY" napisał/a:

Kod:

local marker = createMarker (358.5, 179.4, 1008.0,  "cylinder", 1.0, 255, 0, 0)

setElementInterionr(marker,3)

local marker = createMarker (358.5, 179.4, 1008.0, "cylinder", 1.0, 255, 0, 0)
setElementInterior(marker,3)

Użytkownik: 20.10.2015r
GTAO Member: 06.03.2016r
Support-Team: 20.01.2016r
Moderator: 30.03.2016r
Mod-Team: 08.10.2016r
Vice Admin: 04.05.2018r
Administrator: 03.05.2022r

[you]
! Koniecznie zapoznaj się z regulaminem forum.
Pamiętaj, aby zawsze go przestrzegać, nie mniej ważne są również regulaminy działów, w których się wypowiadasz!
Zamiast zakładać temat po kilka razy, bo jest usuwany przez Administrację, przejrzyj regulamin i napisz poprawnie temat!
Sprawy z administracją możesz załatwiać anonimowo w tym dziale.
Najważniejsze informacje od Administracji możesz przeczytać tutaj oraz tutaj.

Pro?ba o przerobienie Skryptu na Bankomat z Paczki Skrypt?w LSS

http://pastebin.com/Upaptr9m

Kod przeniesiony na pastebin'a ze wzgl?du na generowane b??dy. Je?eli kto? doda ten kod bez uprzedniego wys?ania na pastebin'a i podania odno?nika do niego to potraktuj? to jako u?ywanie b??d?w.

prosz? o po??czenie 2 gamemod?w, 1 to dayz a drogi to bezpieczna strefa pr?bowa?em sam je po??czy? ale godmode mi nie dzia?a? a to link do obydwu gamemodow one s? w jednym rar.
http://hostuje.net/file.p...f5a1065ac20e478

Witam chcia?bym zrobi? dmon dla Administratora tylko nie wiem zbytnio jak jak narazie zrobi?em co? takiego lecz wydaje mi sie ze tego moze uzywac kazdy i w dodatku nie dziala ;/
Dacie rade jako? to ogarn?? ? oczywi?cie piwko leci !

addCommandHandler("dmon", function(plr,cmd)
            toggleControl(plr, "fire", true)
            toggleControl(plr, "action", true)
            toggleControl(plr, "aim_weapon", true)
end)

"demoniskoxd" napisał/a:

Server-side:

function dm(plr,cmd)
 local accName = getAccountName(getPlayerAccount(plr))
 if isObjectInACLGroup("user."..accName, aclGetGroup("Admin") then
  toggleControl(plr, "fire", true)
  toggleControl(plr, "action", true)
  toggleControl(plr, "aim_weapon", true)
 end
end
addCommandHandler("dmon",dm)

Totalnie tego nie ogarniam , je?eli kto? mi przerobi ten skrypt (2 kody) Dostaaje Zimneee

Kod:

--[[

	Resource: OURGame

	Developers: Split <split.programista@gmail.com>

	Copyright <split.programista@gmail.com> 2015-2016

	You have no right to use this code without my permission.

]]

local isVehicles=nil

local isCzesci={

	-- Nazwa tuningu, id czesci, cena

	{"Spoiler Pro", 1000, 1500},

	{"Spoiler Win", 1001, 2500},

	{"Spoiler Drag", 1002, 3500},

	{"Spoiler Alpha", 1003, 4500},

	{"Spoiler Fury", 1023, 3500},

	{"Wheels Offroad", 1025, 1000},

	{"Spoiler Alien", 1049, 1500},

	{"Spoiler X-Flow", 1050, 2000},

	{"Wheels Shadow", 1073, 1500},

	{"Wheels Mega", 1074, 1500},

	{"Wheels Rimshine", 1075, 2000},

	{"Wheels Wires", 1076, 2500},

	{"Wheels Classic", 1077, 3500},

	{"Wheels Twist", 1078, 2500},

	{"Wheels Cutter", 1079, 3000},

	{"Wheels Switch", 1080, 2000},

	{"Wheels Grove", 1081, 4000},

	{"Wheels Import", 1082, 3000},

	{"Wheels Dollar", 1083, 2000},

	{"Wheels Trance", 1084, 3000},

	{"Wheels Atomic", 1085, 2700},

	{"Stereo", 1086, 1000},

	{"Hydraulics", 1087, 10500},

	{"Wheels Ahab", 1096, 5500},

	{"Wheels Virtual", 1097, 8500},

	{"Wheels Access", 1098, 6500},

}

local wn={}

wn.window=guiCreateWindow(0.18, 0.19, 0.64, 0.62, "", true)

wn.grid=guiCreateGridList(0.03, 0.07, 0.62, 0.89, true, wn.window)

guiGridListAddColumn(wn.grid, "Nazwa(ID)", 0.5)

guiGridListAddColumn(wn.grid, "Koszt", 0.5)

wn.btn_submit=guiCreateButton(0.67, 0.08, 0.31, 0.33, "Zamontuj", true, wn.window)

wn.btn_close=guiCreateButton(0.67, 0.63, 0.31, 0.33, "Zdemontuj", true, wn.window)

guiSetVisible(wn.window, false)

addEventHandler("onClientMarkerHit", resourceRoot, function(el,md)

	if not md or el~=localPlayer then return end

	local cs=getElementData(source, "tn_cs")

	if not cs then return end

	local job=getElementData(source,"tn_faction")

	local ljob=getElementData(el,"player:faction")

	if job ~= ljob then

		outputChatBox("* Nie jeste? zatrudniony w tym warsztacie.", 255, 0, 0)

		return

	end

	local vehicles=getElementsWithinColShape(cs,"vehicle")

	if #vehicles < 1 then

		outputChatBox("* Na stanowisku monta?u nie ma ?adnego pojazdu.", 255, 0, 0)

		return

	end

	if #vehicles > 1 then

		outputChatBox("* Na stanowisku monta?u jest zbyt du?o pojazd?w.", 255, 0, 0)

		return

	end

	if getElementHealth(vehicles[1]) < 900 then

		outputChatBox("* Pojazd jest zbyt uszkodzony aby zamontowa? ?wiat?a.", 255, 0, 0)

		return

	end

	isVehicles=vehicles[1]

	showCursor(true,false)

	guiGridListClear(wn.grid)

	guiSetVisible(wn.window, true)

	for i,v in ipairs(isCzesci) do

		local row=guiGridListAddRow(wn.grid)

		guiGridListSetItemText(wn.grid, row, 1, v[1].."("..v[2]..")", false, false)

		guiGridListSetItemData(wn.grid, row, 1, v[2], false, false)

		guiGridListSetItemText(wn.grid, row, 2, v[3].." Funt?w", false, false)

		guiGridListSetItemData(wn.grid, row, 2, v[3], false, false)

	end

end)

addEventHandler("onClientMarkerLeave", resourceRoot, function(el,md)

	if el~=localPlayer then return end

	isVehicles=nil

	showCursor(false)

	guiSetVisible(wn.window, false)

end)

addEventHandler("onClientGUIClick", wn.btn_submit, function()

	if not isVehicles then return end

	selectedRow=guiGridListGetSelectedItem(wn.grid) or -1

	if selectedRow < 0 then return end

	local model=guiGridListGetItemData(wn.grid, selectedRow, 1)

	local cost=tonumber(guiGridListGetItemData(wn.grid, selectedRow, 2))

	if not cost then return end

	if cost > getPlayerMoney(localPlayer) then

		outputChatBox("* Nie posiadasz tyle got?wki.", 255, 0, 0)

		return

	end

	triggerServerEvent("takePlayerMoney", localPlayer, cost)

	triggerServerEvent("montazElementu", root, isVehicles, "tuning", model, cost)

end)

addEventHandler("onClientGUIClick", wn.btn_close, function()

	if not isVehicles then return end

	selectedRow=guiGridListGetSelectedItem(wn.grid) or -1

	if selectedRow < 0 then return end

	local model=guiGridListGetItemData(wn.grid, selectedRow, 1)

	local cost=tonumber(guiGridListGetItemData(wn.grid, selectedRow, 2))

	if not model or not cost then return end

	triggerServerEvent("montazElementu", root, isVehicles, "demtuning", model, cost/2)

end)

Kod:

--[[

	Resource: OURGame

	Developers: Split <split.programista@gmail.com>

	Copyright <split.programista@gmail.com> 2015-2016

	You have no right to use this code without my permission.

]]

local stanowiskaSwiatla = {

	stanowiskoDoherty={

		mpos={-2730.54, 217.73, 4.48}, -- marker

		cpos={-2731.35, 214.37, 4.48-1.20, 13.30, 6.00, 5.20}, -- cuboid

		faction_id=2, -- (id) frakcja kt?ra b?dzie mia?a dost?p

		text="Montarz tuningu"

	},

}

for i,v in pairs(stanowiskaSwiatla) do

	v.cuboid=createColCuboid(unpack(v.cpos))

	v.marker=createMarker(v.mpos[1], v.mpos[2], v.mpos[3]-0.60, "cylinder", 1.2, 0, 0, 255, 100)

	setElementData(v.marker,"tn_faction",v.faction_id)

	setElementData(v.marker,"tn_cs",v.cuboid)

	t=createElement("text")

	setElementData(t,"name",v.text)

	setElementPosition(t,v.mpos[1], v.mpos[2], v.mpos[3])

end

[ Dodano: 2016-03-25, 11:02 ]
Oczywi?cie pod ACL Tuner

AteX,

Mam b??dy w konsoli

[2016-03-25 15:53] start: Requested by Console
[2016-03-25 15:53] Starting dmon
[2016-03-25 15:53] SCRIPT ERROR: dmon/dm.lua:3: ')' expected near 'then'
[2016-03-25 15:53] ERROR: Loading script failed: dmon/dm.lua:3: ')' expected near 'then'
[2016-03-25 15:53] start: Resource 'dmon' started

"demoniskoxd" napisał/a:

AteX,

Mam b??dy w konsoli

[2016-03-25 15] start: Requested by Console
[2016-03-25 15] Starting dmon
[2016-03-25 15] SCRIPT ERROR: dmon/dm.lua:3: ')' expected near 'then'
[2016-03-25 15] ERROR: Loading script failed: dmon/dm.lua:3: ')' expected near 'then'
[2016-03-25 15] start: Resource 'dmon' started

Wystarcz? podstawy angielskiego, aby zrozumie?, ?e uci??em jeden nawias

function dm(plr,cmd)
 local accName = getAccountName(getPlayerAccount(plr))
 if isObjectInACLGroup("user."..accName, aclGetGroup("Admin")) then
  toggleControl(plr, "fire", true)
  toggleControl(plr, "action", true)
  toggleControl(plr, "aim_weapon", true)
 end
end
addCommandHandler("dmon",dm)

AteX,
Czy tak czy siak nie chce mi to dzia?a?,nadal mam blokad? bicia ;/

demoniskoxd, A jeste? w grupie ACL 'Admin'?

Odwa?ny,
Jasne,jestem

demoniskoxd, AteX Ci napisa?, ?e ucia? jeden nawias to powinno tak wygl?da?:

Kod:

function dm(plr,cmd)

 local accName = getAccountName(getPlayerAccount(plr))

 if isObjectInACLGroup("user."..accName, aclGetGroup("Admin")) then

  toggleControl(plr, "fire", true)

  toggleControl(plr, "action", true)

  toggleControl(plr, "aim_weapon", true)

 end

end

addCommandHandler("dmon",dm)

Strona s-side.

"demoniskoxd" napisał/a:

Odwa?ny,
Jasne,jestem

Przed chwil? testowa?em na lokalnym serwerze i wszystko dzia?a. Na pewno masz wszystko jak trzeba? S-side na 100%?

demoniskoxd, sam przetestowa?em to na lokalnym u mnie dzia?a, przy okazji jak by? chcia? to tutaj meta:

Kod:

<meta>

  <script src="s.lua" type="server" /> 

  </meta>

Wszystko mam zrobione jak piszecie,tak czy siak nie chce mi zadzia?a? ....

--- s.lua

function dm(plr,cmd)
 local accName = getAccountName(getPlayerAccount(plr))
 if isObjectInACLGroup("user."..accName, aclGetGroup("Admin")) then
  toggleControl(plr, "fire", true)
  toggleControl(plr, "action", true)
  toggleControl(plr, "aim_weapon", true)
 end
end
addCommandHandler("dmon",dm)

<meta> 
<script src="s.lua" type="server" /> 
</meta>