Jump to content

ertlflorian1

Members
  • Posts

    145
  • Joined

  • Last visited

Everything posted by ertlflorian1

  1. This is my script: clientsite addEvent ("updateBankauszug", true) addEventHandler ("updateBankauszug", root, function (player, wert, state, grund) bankindex = 1 if (state == "+") then art = "Einnahme" else art = "Ausgabe" end repeat setElementData (player, "Art"..bankindex+1, getElementData (player, "Art"..bankindex)) setElementData (player, "Wert"..bankindex+1, getElementData (player, "Wert"..bankindex)) setElementData (player, "Grund"..bankindex+1, getElementData (player, "Grund"..bankindex)) bankindex = bankindex + 1 until (bankindex == 12) setElementData (player, "Wert1", setDotsInNumber (wert).."$") setElementData (player, "Grund1", grund) setElementData (player, "Art1", art) bankindex = 1 end ) example: old Art1 = new Art2 new Art1 = art (Einnahme or Ausgabe) old Art2 = new Art3 old Art3 = new Art4 old Wert1 = new Wert2 new Wert1 = wert old Wert2 = new Wert3 old Art3 = new Wert4 util 12 It dosnt work right, no error
  2. How I can attach the zero at the end? tonumber automatically put the zero at the end away? addCommandHandler ("ma", function (player, cmd, zahl) outputChatBox (tonumber ("1".."."..zahl.."0")) end) so it must be look /ma 1 result 1.10 but it looks like so /ma 1 result 1.1 Has anybody a idea how I can solve this problem I need this for a money script?
  3. Why it everytime outputs for a and e 1? addCommandHandler ("mi", function (player, cmd, wert) zahl = tostring (wert) outputChatBox (zahl) a , e = string.find (zahl, ".") outputChatBox ("a:"..a.." e:"..e) end) Example: Ingame /mi 41.1 then a: 2 e: 3
  4. I want to have tocolor serverside thats my attempt: Serverside: function tocolor (player, r, g, b) triggerClientEvent (player, "tocolor", player, player, r, g, b) end addEvent ("tocolorback", true) addEventHandler ("tocolorback", root, function (player, code) return code end) function testfun (player) local r, g, b = 255, 233, 232 local colorname = tocolor (player, r, g, b) outputChatBox (colorname) end addCommandHandler ("test", testfun) Clientside: addEvent ("tocolor", true) addEventHandler ("tocolor", root, function (player, r, g, b) local code = tocolor (r, g, b) triggerServerEvent ("tocolorback", player, code) end) Error: Attempt to concatenate local colorname a nil value
  5. The function getNextWangCarsLieferung will be performed very often if i hide the setTimer (resetallcars(), milli, 1) getNextWangCarsLieferung only will be once permormed ?? local wangcarslieferungh = 20 local wangcarslieferungm = 33 -- Bei wangcarslieferungh eine Zahl zwischen 00-23 angeben und bei wangcarslieferungm eine Zahl zwischen 01-59 function getNextWangCarsLieferung () if (wangcarslieferungh >= 0) and (wangcarslieferungh <= 23) and (wangcarslieferungm >= 1) and (wangcarslieferungm <= 59) then local time = getRealTime () local minutesofreset = wangcarslieferungm+(wangcarslieferungh*60) local currentminutes = time.minute+(time.hour*60) if (minutesofreset >= currentminutes) then outputChatBox ("1") local milli = (minutesofreset-currentminutes)*60000 outputChatBox(milli) setTimer (resetallcars(), milli, 1) else outputChatBox ("2") local milli = ((minutesofreset-currentminutes)+1440)*60000 outputChatBox(milli) setTimer (resetallcars(), milli, 1) end end end addEventHandler ("onResourceStart", getResourceRootElement (getThisResource()), getNextWangCarsLieferung) function resetallcars () local query = dbQuery ( handler, "SELECT * FROM wangcars") for i, row in pairs (dbPoll(query, -1)) do local queryi = dbQuery ( handler, "UPDATE wangcars SET Stueck='3' WHERE Name='"..row.Name.."'" ) dbFree (queryi) setElementData (root, "stueck"..string.upper(string.sub(row.Name, 1, 1))..string.sub(row.Name, 2, string.len(row.Name)), 3) end setTimer (getNextWangCarsLieferung(), 500000, 1) outputChatBox ("Wang Cars hat gerade eine Lieferung bekommen!", root, 0, 255, 0) end
  6. How i can get from the string veh1 or veh2 the car veh1 and veh2? local veh1 = createVehicle (...) local veh2 = createVehicle (...) for i=1, 2 do local name = "veh"..i local x, y, z = getElementPosition (name) outputChatBox (x..", "..y..", "..z) end
  7. I have edited the Post the were because of the bad word filter of the website
  8. local noobcar1 = createVehicle(462, -2458.33398, 779.5, 34.842, 0, 0, 90, "1") local noobcar2 = createVehicle(462, -2463, 774.5, 34.842, 0, 0, 0, "2") local noobcar3 = createVehicle(462, -2464.5, 774.5, 34.842, 0, 0, 0, "3") local noobcar4 = createVehicle(462, -2466, 774.5, 34.842, 0, 0, 0, "4") local noobcar5 = createVehicle(462, -2472, 774.5, 34.842, 0, 0, 0, "5") local noobcar6 = createVehicle(462, -2473.5, 774.5, 34.842, 0, 0, 0, "6") local noobcar7 = createVehicle(462, -2467.5, 774.5, 34.842, 0, 0, 0, "7") local noobcar8 = createVehicle(462, -2478, 774.5, 34.842, 0, 0, 0, "8") local noobcar9 = createVehicle(462, -2470.5, 774.5, 34.842, 0, 0, 0, "9") local noobcar10 = createVehicle(462, -2476.5, 774.5, 34.842, 0, 0, 0, "10") local noobcar11 = createVehicle(462, -2475, 774.5, 34.842, 0, 0, 0, "11") local noobcar12 = createVehicle(462, -2469, 774.5, 34.842, 0, 0, 0, "12") local noobcar13 = createVehicle(462, -2479.5, 774.5, 34.842, 0, 0, 0, "13") local noobcar14 = createVehicle(462, -2481, 774.5, 34.842, 0, 0, 0, "14") local noobcar15 = createVehicle(462, -2482.5, 774.5, 34.842, 0, 0, 0, "15") local noobcar16 = createVehicle(462, -2484, 774.5, 34.842, 0, 0, 0, "16") local noobcar17 = createVehicle(462, -2485.5, 774.5, 34.842, 0, 0, 0, "17") local noobcar18 = createVehicle(462, -2458.33398, 790, 34.842, 0, 0, 90, "18") local noobcar19 = createVehicle(462, -2458.33398, 785.5, 34.842, 0, 0, 90, "19") local noobcar20 = createVehicle(462, -2458.33398, 784, 34.842, 0, 0, 90, "20") local noobcar21 = createVehicle(462, -2458.33398, 781, 34.842, 0, 0, 90, "21") local noobcar22 = createVehicle(462, -2458.33398, 782.5, 34.842, 0, 0, 90, "22") local noobcar23 = createVehicle(462, -2458.33398, 787, 34.842, 0, 0, 90, "23") local noobcar24 = createVehicle(462, -2458.33398, 788.5, 34.842, 0, 0, 90, "24") local noobcar25 = createVehicle(462, -2458.33398, 791.5, 34.842, 0, 0, 90, "25") local noobcar26 = createVehicle(462, -2458.33398, 793, 34.842, 0, 0, 90, "26") local noobcar27 = createVehicle(462, -2458.33398, 794.5, 34.842, 0, 0, 90, "27") local noobcar28 = createVehicle(462, -2458.33398, 796, 34.842, 0, 0, 90, "28") local noobcar29 = createVehicle(462, -2495.17603, 779, 34.842, 0, 0, 270, "29") local noobcar30 = createVehicle(462, -2495.17603, 780.5, 34.842, 0, 0, 270, "30") local noobcar31 = createVehicle(462, -2495.17603, 782, 34.842, 0, 0, 270, "31") local noobcar32 = createVehicle(462, -2495.17603, 783.5, 34.842, 0, 0, 270, "32") local noobcar33 = createVehicle(462, -2495.17603, 785, 34.842, 0, 0, 270, "33") local noobcar34 = createVehicle(462, -2495.17603, 786.5, 34.842, 0, 0, 270, "34") local noobcar35 = createVehicle(462, -2495.17603, 788, 34.842, 0, 0, 270, "35") local noobcar36 = createVehicle(462, -2495.17603, 789.5, 34.842, 0, 0, 270, "36") local noobcar37 = createVehicle(462, -2495.17603, 791, 34.842, 0, 0, 270, "37") local noobcar38 = createVehicle(462, -2495.17603, 792.5, 34.842, 0, 0, 270, "38") local noobcar39 = createVehicle(462, -2495.17603, 794, 34.842, 0, 0, 270, "39") local noobcar40 = createVehicle(462, -2492.5, 796, 34.842, 0, 0, 180, "40") local noobcar41 = createVehicle(462, -2491, 796, 34.842, 0, 0, 180, "41") local noobcar42 = createVehicle(462, -2489.5, 796, 34.842, 0, 0, 180, "42") local noobcar43 = createVehicle(462, -2488, 796, 34.842, 0, 0, 180, "43") local noobcar44 = createVehicle(462, -2486.5, 796, 34.842, 0, 0, 180, "44") local noobcar45 = createVehicle(462, -2485, 796, 34.842, 0, 0, 180, "45") local noobcar46 = createVehicle(462, -2483.5, 796, 34.842, 0, 0, 180, "46") local noobcar47 = createVehicle(462, -2482, 796, 34.842, 0, 0, 180, "47") local noobcar48 = createVehicle(462, -2480.5, 796, 34.842, 0, 0, 180, "48") local noobcar49 = createVehicle(462, -2479, 796, 34.842, 0, 0, 180, "49") noobnoobcars = {} for i = 1, 49, 1 do noobnoobcars[tostring("noobcar"..i)] = true end for key, index in pairs ( noobnoobcars ) do setVehiclePaintjob(key, 3) toggleVehicleRespawn (key, true) setVehicleRespawnDelay (key, 300000) setVehicleIdleRespawnDelay (key, 600000) setElementData (key, "freeCar", true) end
  9. I did try once this local wangcarspickup1 = createPickup (-1949.04004, 273.31299, 35.187, 3, 1239, 0) --faggio local wangcarspickupcol1 = getElementColShape (wangcarspickup1) local wangcarspickup2 = createPickup (-1958.81104, 300.50101, 35.187, 3, 1239, 0) --tampa local wangcarspickupcol2 = getElementColShape (wangcarspickup2) local wangcarspickup3 = createPickup (-1957.479, 297.42899, 35.187, 3, 1239, 0) --huntley local wangcarspickupcol3 = getElementColShape (wangcarspickup3) local wangcarspickup4 = createPickup (-1956.50903, 294.133, 35.187, 3, 1239, 0) --comet local wangcarspickupcol4 = getElementColShape (wangcarspickup4) local wangcarspickup5 = createPickup (-1955.90503, 290.896, 35.187, 3, 1239, 0) --windsor local wangcarspickupcol5 = getElementColShape (wangcarspickup5) local wangcarscols = { [wangcarspickupcol1]=true, [wangcarspickupcol2]=true, [wangcarspickupcol3]=true, [wangcarspickupcol4]=true, [wangcarspickupcol5]=true, } function onWangCarsColLeave (player, dim) if (dim == true) and (getElementType(player)=="player") and (wangcarscols[source]) then outputChatBox ("bam") end end addEventHandler ("onColShapeLeave", root, onWangCarsColLeave) no error nothing
  10. Why is there no "onPickupLeave" in Wiki and what Event i kann use when a player is leaving a pickup?
  11. Why it dont work i every time get the output "nein" also when i hit wangcarspickup1..? local wangcarspickup1 = createPickup (-1949.04004, 273.31299, 35.187, 3, 1239, 0) --faggio local wangcarspickup2 = createPickup (-1958.81104, 300.50101, 35.187, 3, 1239, 0) --tampa local wangcarspickup3 = createPickup (-1957.479, 297.42899, 35.187, 3, 1239, 0) --huntley local wangcarscars = { [wangcarspickup1]=true, [wangcarspickup2]=true, [wangcarspickup3]=true, } function onWangCarsPickupHit (player) if (source == wangcarscars[source]) then outputChatBox ("ja") else outputChatBox ("nein") end end addEventHandler ("onPickupHit", root, onWangCarsPickupHit)
  12. function checkifcorrectpw (pw) for i = 32, 255, 1 do if i < 49 or i > 57 and i < 65 or i > 95 and i < 97 or i > 122 then if string.find (pw, string.char (i), 1, true) then return true break elseif i == 255 and not string.find (pw, string.char (i), 1, true) then return false end end end end Dont work error: Loaddin script failed ... end expected ( to close if at 6) near break?
  13. why it dont work? function checkifcorrectpw (pw) for i = 32, 255, 1 do if i < 49 or i > 57 and i < 65 or i > 95 and i < 97 or i > 122 then if string.find (pw, string.char (i), 1, true) then break return true elseif i == 255 and not string.find (pw, string.char (i), 1, true) then return false end end end end
  14. addEventHandler ("onClientGUIClick", getRootElement(), function (state) if state == "left" then if source == regbut then local p1 = guiGetText (pwf1) local p2 = guiGetText (pwf2) local day = guiGetText (T) local month = guiGetText (M) local year = guiGetText (J) local mailt = guiGetText (email) local laenge = #p1 local tlaenge = #day local mlaenge = #month local jlaenge = #year local maillaenge = #mailt if (p1 ~= p2) then outputChatBox ("Bitte gib zwei gleiche Passwörter ein!", 255,0,0) end if (p1 == p2) and (laenge < -- s8) --> or (laenge > 19) then outputChatBox ("Dein Passwort muss zwischen 8 und 20 Zeichen lang sein!", 255,255,0) end if (p1 == p2) and (laenge > 7) and (p1 == "12345678") and (laenge < 21) then outputChatBox ("Wähle ein anderes Passwort!", 255,255,0) end if (ifbdisvalid (tlaenge, mlaenge, jlaenge, day, month, year ) == false) and (ifmailisvalid (maillaenge, mailt ) == false ) and (p1 == p2) and (laenge > 7) and (p1 ~= "12345678") and (laenge < 21) then outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox (" ") outputChatBox ("Herzlich willkommmen auf "..ServerName..", wir wünschen dir viel Spaß!", 0,255,0) m = guiRadioButtonGetSelected(selectm) w = guiRadioButtonGetSelected(selectw) local pname = getPlayerName (localPlayer) if (m == true) then rgeschlecht = "Mann" else rgeschlecht = "Frau" end triggerServerEvent ("onRegisterButtonClick", localPlayer, localPlayer, p1, mailt, day, month, year, rgeschlecht ) guiSetVisible (Fenster, false) showCursor (false) guiSetInputEnabled (false) elseif (ifbdisvalid (tlaenge, mlaenge, jlaenge, day, month, year ) == false) and (ifmailisvalid (maillaenge, mailt ) == true ) and (p1 == p2) and (laenge > 7) and (p1 ~= "12345678") and (laenge < 21) then outputChatBox ("Bitte gib eine ordentliche E-Mail Adresse ein!", 255,0,0) elseif (ifbdisvalid (tlaenge, mlaenge, jlaenge, day, month, year ) == true) and (ifmailisvalid (maillaenge, mailt ) == true ) and (p1 == p2) and (laenge > 7) and (p1 ~= "12345678") and (laenge < 21) then outputChatBox ("Bitte gib eine ordentliche E-Mail Adresse ein!", 255,0,0) elseif (ifbdisvalid (tlaenge, mlaenge, jlaenge, day, month, year ) == true) and (ifmailisvalid (maillaenge, mailt ) == false ) and (p1 == p2) and (laenge > 7) and (p1 ~= "12345678") and (laenge < 21) then outputChatBox ("Bitte gib ein ordentliches Geburtsdatum ein!", 255,0,0) end end end end) How i can make this script easier (shorter)?
  15. When i enter the Marker after onHitMarker14 =? Why when i set then the Dimension and the Interior manual to zero it work? Kein error Debugscript Client: function onHitMarker14 (player, dimension) if(dimension == true) then setElementData (player, "nextmarker", nil) destroyElement (_G[getPlayerName(player).."m14"]) destroyElement (_G[getPlayerName(player).."b14"]) outputChatBox ("Du hast die Fahrprüfung erfolgreich abgeschlossen!", 0,255,0) triggerServerEvent ("removeEventOnVehicleExit", player, player, player) triggerServerEvent ("ClientRemovePedFromVehicle", player, player, player) local x, y, z = getElementPosition (player) local r1, r2, r3 = getElementRotation(player) setElementPosition (player, x, y, z) setElementRotation (player, r1, r2, r3) setElementDimension (player, 0) setElementInterior (player, 0) local makinglic = getElementData (player, "makeingLizense") destroyAllClientObjects (player) if (makinglic == "A") then setElementData (player, "A", 1) elseif (makinglic == "B") then setElementData (player, "B", 1) elseif (makinglic == "C") then setElementData (player, "C", 1) end end end Server Teleporter: function warpinfahrschule (player, matchingDimension) if (getElementType(player)=="player") and (matchingDimension == true) and not (isPedInVehicle (player)) then setElementInterior (player, 3) setElementPosition (player, 384.808624,173.804992,1008.382812) end end addEventHandler ("onMarkerHit", fahrschuleeingang, warpinfahrschule)
  16. This is my client code: function outputfahrlehrer (player) local int = getElementData (player, "int") setElementRotation (_G[getPlayerName(player).."fahrschullehrer"], 0,0,0) _G[getPlayerName(player).."o1"] = createObject(2948, -2186.88501, 285.69199, 34.32, 0, 0, 90) setElementDimension (_G[getPlayerName(player).."o1"], int) _G[getPlayerName(player).."o2"] = createObject(2948, -2184.95996, 285.69199, 34.32, 0, 0, 270) setElementDimension (_G[getPlayerName(player).."o2"], int) _G[getPlayerName(player).."o3"] = createObject(2011, -2184.46509, 285.96701, 34.32, 0, 0, 0) setElementDimension (_G[getPlayerName(player).."o3"], int) _G[getPlayerName(player).."o4"] = createObject(2011, -2187.33398, 285.961, 34.32, 0, 0, 0) setElementDimension (_G[getPlayerName(player).."o4"], int) _G[getPlayerName(player).."o5"] = createObject(10973, -2188.44507, 277.12601, 37.947, 0, 0, 90) setObjectScale (_G[getPlayerName(player).."o5"], 0.2) setElementDimension (_G[getPlayerName(player).."o5"], int) setElementCollisionsEnabled (_G[getPlayerName(player).."o5"], false) _G[getPlayerName(player).."o6"] = createObject(11480, -2160.70508, 293.80402, 38.067, 0, 0, 90) setElementDimension (_G[getPlayerName(player).."o6"], int) _G[getPlayerName(player).."o7"] = createObject(11480, -2160.72998, 293.80002, 34.292, 0, 180, 270) setElementDimension (_G[getPlayerName(player).."o7"], int) _G[getPlayerName(player).."o8"] = createObject(11480, -2166.94629, 293.80078, 34.292, 0, 179.995, 270) setElementDimension (_G[getPlayerName(player).."o8"], int) _G[getPlayerName(player).."o9"] = createObject(11480, -2166.94531, 293.7998, 38.092, 0, 0, 90) setElementDimension (_G[getPlayerName(player).."o9"], int) _G[getPlayerName(player).."o10"] = createObject(974, -2157.52002, 293.79001, 35.373, 0, 0, 269.992) setObjectScale (_G[getPlayerName(player).."o10"], 1.078) setElementDimension (_G[getPlayerName(player).."o10"], int) _G[getPlayerName(player).."o11"] = createObject(2955, -2169.88599, 290.19299, 35.534, 0, 0, 90) --tuer setElementDimension (_G[getPlayerName(player).."o11"], int) _G[getPlayerName(player).."o12"] = createObject(11319, -2170.10742, 293.77051, 35.4, 0, 0, 0) --tor setElementDimension (_G[getPlayerName(player).."o12"], int) _G[getPlayerName(player).."warptovehm"] = createMarker(-2169.194, 289.4989, 34.3, "cylinder", 1, 255,0,0) --warpmarker setElementDimension (_G[getPlayerName(player).."warptovehm"], int) _G[getPlayerName(player).."o13"] = createObject(2955, -2169.797, 290.247, 35.284, 0, 0, 90) --tuer setElementDimension (_G[getPlayerName(player).."o13"], int) _G[getPlayerName(player).."o14"] = createObject(2922, -2168.204, 290.278, 35.340, 0, 0, 0) setElementDimension (_G[getPlayerName(player).."o14"], int) --triggerServerEvent ("createVehAndWarpIn", player, player, player) _G[getPlayerName(player).."klicker"] = createObject(3065, -2168.196, 290.272, 35.3, 0, 0, 0) setElementDimension (_G[getPlayerName(player).."klicker"], int) setElementAlpha (_G[getPlayerName(player).."klicker"], 0) setElementFrozen (_G[getPlayerName(player).."klicker"], true) addEventHandler ("onClientClick", root, openfahrschulegate) addEventHandler ("onClientMarkerHit", _G[getPlayerName(player).."warptovehm"], warpintogarage) outputChatBox ("Fahrlehrer: #FFFFFFBitte geh in den Marker!", 255,255,0, true) _G[getPlayerName(player).."fahrschulwarp"] = createMarker (358.30859375, 216.8501953125, 1007.3828125, "cylinder", 1, 255, 0, 0) setElementInterior (_G[getPlayerName(player).."fahrschulwarp"], 3) setElementDimension (_G[getPlayerName(player).."fahrschulwarp"], getElementData (player, "int")) addEventHandler ("onClientMarkerHit", _G[getPlayerName(player).."fahrschulwarp"], warpOutFromFahrschule) _G[getPlayerName(player).."vehicle"] = createVehicle(445, -2164.427, 293.678, 35.032, 0,0,90) setElementDimension (_G[getPlayerName(player).."vehicle"], int) _G[getPlayerName(player).."beifahrer"] = createPed(147, -2164.427, 293.978, 37.1) setElementDimension (_G[getPlayerName(player).."beifahrer"], int) warpPedIntoVehicle (_G[getPlayerName(player).."beifahrer"], _G[getPlayerName(player).."vehicle"], 1) setElementData (_G[getPlayerName(player).."vehicle"], "Fahrschule", "true") addEventHandler ("onClientVehicleExit", _G[getPlayerName(player).."vehicle"], ifPlayerWantsToExit) end I cant enter this vehicle but all others why?
  17. It changes on every start to a random map!!
  18. How i can get the count of alive players? Thats is my attempt players = 0 function checkPlayers () players = 0 for index, veh in ipairs( getElementsByType("player") ) do players = players+1 if getElementHealth(veh) <= 0 then players = players-1 end return players end end setTimer (function () local intplayers = checkPlayers() --if (intplayers == 2) then --destroyElement (obj1) --destroyElement (obj1) outputChatBox (intplayers, root) end, 500,0)
  19. And how i can create createObject(11480, -2160.70508, 293.80402, 38.067, 0, 0, 90) createObject(11480, -2160.72998, 293.80002, 34.292, 0, 180, 270) createObject(11480, -2166.94702, 293.80099, 34.292, 0, 180, 270) createObject(11480, -2166.94604, 293.80002, 38.092, 0, 0, 90) in every dimension=?
×
×
  • Create New...