Witam, mam problem z dodaniem do skryptu z prac? funkcji, ?e mog? j? mie? tylko gracze, kt?rzy maj? premium. Niestety po wielu pr?bach nie mam poj?cia jak to zrobi? Za pomoc i Zdj?cie db3 z b??dem.
[lua]
bindKey("e", "down", function()
if not isElementWithinMarker(localPlayer, praca) then return end
if not getElementData(localPlayer, "player:premium") then
if not exports["premium"]:isPremium(localPlayer) then
outputChatBox(" Ta praca dostepna jest tylko dla konta premium.")
return
end
if not getElementData(localPlayer, "gracz_praca") then
local losuj = math.random(2, #miejscamagazynier)
setElementData(localPlayer, "gracz_praca", true)
--outputChatBox("* Od??? skrzynk? na p??k?.")
setPedAnimation ( localPlayer, "CARRY", "crry_prtial", 1,true )
local cel = createMarker(miejscamagazynier[losuj][1], miejscamagazynier[losuj][2], miejscamagazynier[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
...
Witajcie mam taki problem do systemu logowania/zajestrowania wiec zaloguje sie to mi spawnuje w jedne miesce a chcia?bym aby mi pokazala wybieralka postaci.Bede wdzieczny dam piwa oraz respekt.prosze o pomoc. Zle zrobilem system to ktos mi poda dobry
podam kod systemu logowania
Przedstawiam wam skrypt mojego autorstwa na system Policji.
Skrypt jest dosy? rozbudowany o klika paneli zar?wno dla zwyk?ych policjant?w jak i dla Lider?w (Komendant?w)
[b][size=18]Skrypt posiada:[/size][/b]
*Panel Komendanta z mo?liwo?ci? zatrudniania, zwalniania, zmiany stopnia policjanta oraz nadania mu terminu wa?no?ci i numeru legitymacji.
*Panel Policjanta kt?ry ma mo?liwo?? wystawienia mandatu graczowi.
*Panel Mandatu kt?ry pojawia si? graczowi kt?ry dosta? mandat. Gracz ma mo?liwo?? przyj?cia oraz odrzucenia mandatu.
*Panel Wi?zienia z mo?liwo?ci? umieszczenai gracza w celi na dowoln? ilo?? minut. Policjant ma do wybory 3 cele.
*Pilot Policjanta do gara?u.
*Policjant ma mo?liwo?? okazania legitymacji graczowi kt?ry go o to poprosi.
*Przebieralnie kt?ra znajduj? si? w interiorze komendy.
*System kajdanek dzi?ki kt?remu policjant mo?e zaaresztowa? gracza i spokojnie transportowa? go swoim pojazdem.
*Panel sp?aty mandat?w znajduj?cy sie na komendzie po wej?ciu w czerwony marker.
*Do skryptu do??czona jest tak?e mapa z samochodami oraz gara?em w komendzie LS. Do aut policyjnych mo?e wsiadac osoba zatrudniona w Policji ale musi by? tak?e na s?u?bie czyli ropocz?? j? w przebieralni.
[b][size=18]Komendy:[/size]
[/b]
/panel_kom - Panel komendanta. Aby dzia?a? poprawnie nale?y w folderze "p_komendanta" w pliku "s.lua" w 3 linijce zmienic login maciek00 na login z gry komendanta.
!
Chcia?bym Ci zaprezentowa? skrypt, kt?rego napisanie zaj??o mi oko?o 15-20 minut.
Jest on dosy? prosty, wchodzisz w marker, je?li jeste? w ACL, kt?re wpiszesz w c-side w "grupa_acl" to wy?wietli Ci si? GUI, wybierasz z kt?rej kamery chcesz podgl?d, i widzisz co si? dzieje. Przydatne na serwery RP/RPG.
Nie wydaj? plik?w zakompilowanych, bo skrypt jest (jak dla mnie) bardzo prosty w napisaniu.
GUI nie wydaje mi si? najgorsze, mo?na powiedzie? ?e (wg mnie) "jest ok"
hej ostatnio robi?em system pojazd?w i p?tla mi nie dzia?a w onResourceStart
[lua]local conn = dbConnect("sqlite","vehicles.db")
dbExec(conn, "CREATE TABLE IF NOT EXISTS veh (model INTEGER, posx FLOAT, posy FLOAT, posz FLOAT, rotx FLOAT, roty FLOAT, rotz FLOAT, red INTEGER, green INTEGER, blue INTEGER, player TEXT)")
function namePart(name)
local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil
if name then
for _, player in ipairs(getElementsByType("player")) do
local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower()
if name_:find(name, 1, true) then
return player
end
end
end
end
function resp()
outputChatBox("start1")
local q = dbQuery(conn, "SELECT * FROM veh")
outputChatBox("asd1")
local res, _, rowid = dbPoll(q, -1, true)
outputChatBox("asd2")
outputChatBox("asd3")
for k, v in ipairs(res) do
outputChatBox("asd4")
local veh = createVehicle(v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"])
outputChatBox("resp pojazduf")
setVehicleColor(veh, v["red"], v["green"], v["blue"])
outputChatBox("asd5&quo...
Witam chcia?em si? zapyta? o system zapisu Sqlite czy Mysql?
Co jest bezpieczniejsze, i czy przy 30-40 graczach na serwerze [serwer posiadam na servprojeckt] ma to znaczenie na obci??enia serwera wzgl?dem zapisu Sqlite. [lagi,cofki.itd]
Wcze?niej posiada?em tylko serwery na sampie i tam nie robi?o zbytnio r??nicy np dini czy mysql przy takiej ilo?ci graczy. Mapa sama w sobie te? nie b?dzie jakim? rpg czy rp czy dazy.
Licz? na jakie? wskaz?wki je?eli nie ten dzia? to sorka
Witam, mam pewien problem. chodzi o to ?e chc? zrobi? drugi system BW = respawn w mijscu gdzi? zgino?e?. i zrobi?em taki kod na bw lecz nie respi mnie nie daje mi ?ycia nwm czemu prosz? o pomoc dzienkuj? za ka?da pomoc daje piwo za pomoc kod jest po stronie serwera tutaj macie kod:::
function BW(thePlayer) setTimer(function() setElementHealth(thePlayer, 70) end, 5000, 1) end
addEventHandler("onPlayerWasted", getRootElement(), BW)
Witam, nie dzia?a mi pewien skrypt na system BW::: BW = jak zginiesz to respisz si? w tym samym mijscu. og??em co? mi nie dzia?a z tym ?e jak masz 10hp to cb zamra?a lecz po 30 sekundach nie odmra?a ci? i nie wiem co zrobi?em ?le. jak by kto? m?g? pom?c to prosze. jest to po stronie serwera to jest kod:
function BW(thePlayer)
if getElementHealth(source) <= 10 then
setElementFrozen(source, true) setTimer(function() setElementFrozen(source, false) end, 30000, 1) end
end
addEventHandler("onPlayerDamage", root, BW)
Mam ma?y problem z dynamicznym systemem. Mam dodawane przystanki dynamicznie i po wpisaniu /autobus gdy nie jeste?my na przystanku wysy?a wiadomo?? do gracza, ?e nie znajduje si? na przystanku. Gdy jestem na przystanku wy?wietla si? GUI z miejscami gdzie mog? si? uda?, tylko wysy?a mi wtedy te? wiadomo??, ?e nie znajduj? si? na przystanku, pomimo ?e na nim jestem i GUI si? wy?wietli?o.
Kod:
CMD:autobus(playerid, params[])
{
new bool:info;
if(IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, CYAN, "CT: "BIA?Y"Nie mo?esz by? w "TURKUSOWY"?adnym poje?dzie"BIA?Y".");
if(GetPlayerMoney(playerid) < 70) return SendClientMessage(playerid, GREEN, "CT: "BIA?Y"Nie sta? Ci? na "ZIELONY"przejazd"BIA?Y"!");
for(new x = 0; x < MAX_PRZYSTANKOW; x++)
{
if(IsPlayerInRangeOfPoint(playerid, 10.0, Przystanek[x][pX], Przystanek[x][pY], Przystanek[x][pZ]))
{ info = false; //wy?wietlanie okienka gui z przystankami }
else
{ info = true;
}
}
if(info == true) return SendClientMessage(playerid, LIGHT_GREEN, "CT: "BIA?Y"Nie znajdujesz si? na "JASNO_ZIELONY"przystanku autobusowym"BIA?Y".");
return 1;
}
Bez u?ycia zmiennej bool, tylko zwyk?ego else te? to nie dzia?a.
Witajcie moi kochani! prezentuje wam m?j pierwszy w 100%-tach dzia?aj?cy skrypt xd.. Jest to bardzo prosty i skromny, system upomnie?. Ma w sobie tylko jedn? komende, a mianowicie /upomnienie [nick] [pow?d] ... Proste? chyba tak!
SPRAWY ACL
Dost?p do komendy opisanej powy?ej maj? nast?puj?ce rangi.
Je?eli skrypt zosta? wgrany poprawnie, jeste?cie np. w SuperModeratorach a komenda nie dzia?a, mo?liwe ?e macie starsz? wersje ACL. W tym wypadku do takiej grupy nale?y doda? nast?puj?ce uprawnienie: command.upomnienie
Ukryta wiadomość / Hidden message(aby ją zobaczyć musisz postawić użytkownikowi)
Wiadomość została ukryta, aby ją przeczytać należy się zalogować.
Odpowiedzi na kilka pyta?:
P: Jak doda? inne rangi do skryptu?
O:Ok. linijki 36 s? rangi dodane przezemnie. Dodawaj je wed?ug wzoru.
P:POMOCY! Jestem w grupie Super Moderator i nie moge nada? upomnienia!
O:Jak nie czytasz dok?adnie postu to sie nie dziw
P: Hmm... Widze tu skopiowanie!
O:Nie dziw sie, skrypt by? tak?e pisany dla u?ytkownik?w Community. A to nie tylko polacy, ?ebym pisa? nazwy funkcji po polsku
Witam posiadam problem z systemem pojazd?w Pana Prezesa.
B??d polega na tym ?e po kupnie auta ka?dy mo?e do niego wej?? i dopiero po restarcie skryptu mo?e wej?? tylko w?a?ciciel pojazdu.
Drugi problem to po restarcie skryptu wszystkie auta przenosi do Salonu.
Jak to naprawi??
Pomo?ecie?
Witam mam problem mianowicie chodzi o to ze mam system glodu i jak weide dobra jest ok do momentu gdy nie zeidzie glod i potem caly czas wyswietla sie wiadomosc a tera dam kawalek kodu (Ta wiadomosc powtarza si? ca?y czas co 1 sekund i zasmieca czat)
[code]enum DaneGracza
{
Glod,
Sen
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == REGISTER)
{
if(response)
{
if(strlen(inputtext))
{
if(strlen(inputtext) >= 6)
{
Rejestracja(playerid, inputtext);
new Nick[MAX_PLAYER_NAME];
GetPlayerName(playerid, Nick, sizeof(Nick));
new Wiadomosc[500];
format(Wiadomosc, sizeof(Wiadomosc), "{F9F9FC}Witaj %s(%d) zapoznaj si? naszym regulaminem!n{FF0000}1.Zakaz tworzenia multikont!(kara za multikonto to ban)n2.Zakaz obrazy innych(kara za obraze mute 10min + warn)", Nick, playerid);
ShowPlayerDialog(playerid, REGULAMIN, DIALOG_STYLE_MSGBOX, NAZWASERWERA, Wiadomosc, "Zarejestruj", "Anuluj");
}
else
{
new NGracza[MAX_PLAYER_NAME];
new InfoNaStart[500];
GetPlayerName(playerid, NGracza, sizeof(NGracza));
format(InfoNaStart, sizeof(InfoNaStart), "{2DFF00}Witaj {AAAAAA}%s(%d){2DFF00} na "NAZWASERWERA "n{2DFF00}Aby gra? na naszym serwerze musisz za?o?y?nk?t? wpisuj?c has?o a nast?pnie klikaj?? nZarejestruj(Has?o musi zawierac min. 6 znak?w) ", NGracza, playerid);
ShowPlayerDialog(playeri...
Mam taki problem ?e chce napisa? level system lecz nie wiem jak si? za to zabra? w LUA. Szuka?em w internecie ale s? tylko takie ?e samemu wpisujemy w kodzie od ilu do ilu jest dany level a ja chce zrobi? taki ?e serwer automatycznie stworzy levle na podstawie exp jaki gracz posiada.
Cze??! Chcia?bym stworzy? system za?adunk?w i roz?adunk?w, jednak nie wiem jak za to si? zabra? (tak wiem n00bik ze mnie )
To ma wygladac tak:
Ze gracz wpisuje /zlecenie
I pojawiaja mu sie zlecenie
Wybiera sobie wpisujac, np. /kurs [id zlecenia]
I pojawiaja mu sie znaczniki na mapie gdzie ma jechac, aby sie zaladowac, i gdzie ma jechac aby sie rozladowac
Mozna dac gotowy kod, ja go sobie najwyzej przerobie ^^
dbExec(handler, "CREATE TABLE IF NOT EXISTS 'organizacje' (organizacja TEXT, wlasciciel TEXT, r INTEGER, g INTEGER, b INTEGER)")
function org()
local query = dbQuery(handler, "SELECT * FROM organizacje")
local result, num_rows, errormsg = dbPoll (query, -1)
for i,v in pairs(result) do
local team = createTeam(v["organizacja"] ,tonumber(v["r"]), tonumber(v["g"]), tonumber(v["b"]))
if team then
setElementData(team, "wlasciciel", v["wlasciciel"])
setPlayerTeam(, team)
end
end
end
addEventHandler("onResourceStart", getRootElement(), org)
function zapiszOrg()
for i,v in pairs(getElementsByType("team")) do
local owner = getElementData(v, "wlasciciel")
if owner then
local r, g, b = getTeamColor(v)
local team = getTeamName(v)
dbExec(handler, "INSERT INTO 'organizacje' (organizacja, wlasciciel, r, g, b) VALUES (?,?,?,?,?)", team, owner, r, g, b)
end
end
end
setTimer(zapiszOrg, 5000, 0)
addEventHandler("onResourceStop", getRootElement(), zapiszOrg)
function asd(plr, cmd, team, r, g, b)
if team and r and g and b then
local team = createTeam(team, r, g, b)
setElementData(team, "wlasciciel", getPlayerName(plr))
outputChatBox("Stworzyles team o na...
Napisa?em sobie system derb?w lecz mam problem z ich zaka?czaniem, ot?? gdy wpisze /derbykoniec powinno teleportowa? ca?y serwer na spawn, a teleportuje tylko mnie.
s-side:
addCommandHandler("derbykoniec", function(thePlayer) local accName = getAccountName ( getPlayerAccount ( thePlayer ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "event" ) ) then
outputChatBox(">> Koniec derb?w!",root,255,0,0,true)
if ( getElementDimension ( thePlayer ) == 1 ) then
setElementDimension ( thePlayer, 0 ) setElementPosition ( thePlayer, 1477.61, -1704.15, 14.05 )
for i,v in ipairs(getElementsByType("vehicle", resourceRoot)) do respawnVehicle(v) setElementFrozen(v, true) setVehicleEngineState ( v, false ) end
end
end
end)
Czesc, chcialem napisalem sobie kodzik na "dawanie" mi ownera pojazdu jednak?e co? mi nie dzia?a.
Kodzik: (s-side)
function zerowanie ( thePlayer ) local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) -- get his account name if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) then -- Does he have access to Admin functions? local veh = getPedOccupiedVehicle ( thePlayer ) local id = getElementData(veh, "car_id") or " " if veh then
ustawDanePojazdu(veh, 'id', PrzemeK) local query = dbQuery(handler, "INSERT INTO pojazdy (wlasciciel, model, x, y, z, rot, ca, cb, cc, przebieg, paliwo) VALUES (?, ?, ?, ?, ?, ?,?,?,?,?,?)", wlasciciel, id, x, y, z, rot, r, g, b, 50, 0) end
end
end
addCommandHandler("elo", zerowanie)
Witam jak dorobi? do Skryptu Systempojazdowbypanprezes mo?liwo?? kupowania w sklepie aut Np. Stoi Infernus i piszemy /kuppojazd i kupujemy pojazd jak to zrobi??
Witam upubliczniam wersj? 0.2a chorego skryptu systemu gwa?tu co zosta?o ulepszone ?
- Dodano box dla gracza kt?ry chce zgwa?ci? gracza.
- System zap?odnienia
- System Aborcji
- System porodu (po porodzie niemowlak zostaje wyrzucony do ?mieci)
Zapraszam do pobierania i dzi?kuje za testy tym osob?:
pgs.Dejv
Nickk888SAMP
Bruniasty
es.NitroFuN[PSZ]
[LB]Wolv
ravesti.
Mati_(POL)
Teraz download:
Ukryta wiadomość / Hidden message(aby ją zobaczyć musisz postawić użytkownikowi)
Wiadomość została ukryta, aby ją przeczytać należy się zalogować.
Je?li chcesz u?ywa? tego na swoim serwerze bardzo ci? prosz? wklej CreateLabels do gamemoda zawarty jest tam autor pomocnicy i testerzy
w razie b??d?w prosz? pisa?
Witam chc? zrobi? system truck. Mam komend? po wpisaniu kt?rej ma si? respi? przyczepa dla tira w wybranym prze zemnie miejscu i problem jest taki, ?e respi si? ona jedna na drugiej
System expa dzia?a ale dlaczego nie dzia?a to
czesc skryptu z clienta [lua]local rangi={
{1, "Nowy", 0},
{2, "Poczatkujacy", 100},
}
function asd()
for k,v in ipairs(rangi) do
if getElementData(source, "Exp") >= tonumber(v[3]) then
setElementData(source, "Lvl", tonumber(v[1]))
setElementData(source, "Ranga", tonumber(v[2]))
else
return
end
end
end
addEventHandler("onClientRender", root, asd)[/lua]
server (czesc) [lua]addEventHandler("onPlayerLogin", root,
function()
local acc = getPlayerAccount(source)
for k,v in ipairs(rangi) do
setElementData(source, "Exp", getAccountData(acc, "Exp"))
setElementData(source, "Lvl", getAccountData(acc, "Lvl"))
setElementData(source, "Ranga", getAccountData(acc, "Ranga"))
if not getElementData(source, "Exp") or not getElementData(source, "Lvl") or not getElementData(source, "Ranga") then
setElementData(source, "Exp", 0)
setElementData(source, "Lvl", 1)
setElementData(source, "Ranga", "Nowy")
end
end
end
)
function quitPlayer()
local acc = getPlayerAccount(source)
if acc then
setAccountData(acc, "Exp", getElementData(source, "Exp"))
setAccountData(acc, "Lvl", getElementData(source, "Lvl"))
setAccountData(acc, "Ranga", ...
Witam!
Chcia?bym Wam przedstawi? System prac By Stw0reK, kt?ry napisa?em z nud?w System prac mia? przypomina? ten z serwer?w typu tokyo.
Do podanych ju? prac typu: fbi, policjan, medyk, stra?ak itp. zosta?a dodana praca dziwki
Komendy skyptu:
Witajcie jest to m?j drugi skrypt kt?ry zrobi?em dla was skrypt jest w wersji 1.2 Alpha Co to jest ? Jest to system Banku kt?ry umo?liwia wiedzie co Funkcje Skrypt posiada Wp?acanie, wyp?acanie, Przelew pieni?dzy
Cze??, mam taki ma?y problem.. ot?? ten kawa?ek kodu mi nie dzia?a i nie wiem z jakiego powodu. Tak jestem ACL administratora, wi?c to nie o to chodzi. Je?li wiesz o co chodzi to prosz? napisz mi pod spodem, za pomoc oczywi?cie zimne .
function dajPaliwo() local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) local pojazd = getPedOccupiedVehicle( thePlayer )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) then if pojazd then
setElementData(pojazd, "daj_Paliwo", 100) end
addCommandHandler("dajpaliwo", dajPaliwo) end