Jump to content

Monsthers

Members
  • Posts

    108
  • Joined

  • Last visited

Everything posted by Monsthers

  1. Hola tengo este panel login pero esta dando este error, ya e intentado de todo asta e pedido ayuda a scripter privados y no emos podido arreglarlo Error [2015-12-08 17:56:21] ERROR: rpgLogin\sql.lua:24: Database query failed: no such column: loggedin [2015-12-08 17:56:21] ERROR: rpgLogin\sql.lua:26: attempt to index field '?' (a nil value) Script --[[ +---------------------------------------------------------------------------- | SAMS:RPG v1 | ======================================== | by SAMS Scripting Team | All rights reserved. | [url=http://www.sams.net]http://www.sams.net[/url] | ======================================== +----------------------------------------------------------------------------- | You are not allowed to adapt, copy, redistribute this script. | You are not allowed to use this script outside servers ran by [url=http://www.samsYUDA.net]www.samsYUDA.net[/url] +----------------------------------------------------------------------------- ]]-- local blockedUsernames = {["console"] = true,["admin"]= true,["moderator"]= true,["guest"]= true,["none"]= true,["saes"]= true,["[saes]"]= true,["sa housing agency"]= true,["sa_housing_agency"] = true} executeSQLQuery("CREATE TABLE IF NOT EXISTS user_data (id INTEGER PRIMARY KEY AUTOINCREMENT, username TEXT, pwsalted TEXT, groups TEXT, email TEXT, money INTEGER, wanted TINYINT, jailed BOOLEAN, lastnick TEXT, lastlogin TEXT)") function playerLogin(username,password,serial) if getElementData(source,"loggedIn") then return triggerClientEvent(source,"RPGlogin.errorBox",source,"You are already logged in.") end local ip = getPlayerIP(source) local playername = getPlayerName(source) local playerQuery = executeSQLQuery("SELECT id, loggedin FROM user_data WHERE username = ? AND pwsalted = ? LIMIT 1",username,password) if playerQuery and #playerQuery > 0 then if (playerQuery[1].loggedin == 1) then return triggerClientEvent(source,"RPGlogin.errorBox",source,"Your account is already in use.") end local account = setElementData(source,"username",username) local id = setElementData(source,"id",playerQuery[1].id) if account and id then local thetime = getRealTime() local MM = thetime.month+1 if MM < 10 then MM = "0"..MM end local DD = thetime.monthday if DD < 10 then DD = "0"..DD end local thedate = (thetime.year+1900).."-"..MM.."-"..DD local ip = getPlayerIP(source) local serial = getPlayerSerial(source) executeSQLQuery("UPDATE user_data SET lastlogin = '"..thedate.."', ip = '"..ip.."', serial = '"..serial.."', loggedin = 1 WHERE username = '"..username.."'") outputChatBox("You are now logged in as: "..username,source,0,255,255) setElementData(source,"loggedIn",true) triggerEvent("onPlayerLogIn",source,playerQuery[1].id,username) triggerClientEvent(source,"RPGlogin.clearLoginGUI",source) outputServerLog(("RPGlogin: %s has successfully logged in as %q. (IP: %s Serial: %s)"):format(playername,username,ip,serial)) triggerClientEvent(source,"RPGlogin.hideLogin",source,true) else triggerClientEvent(source,"RPGlogin.errorBox",source,"Login failed.") end elseif playerQuery then triggerClientEvent(source,"RPGlogin.errorBox",source,"Invalid password specified.") outputServerLog(("RPGlogin: %s failed to log in as %q. Wrong password. (IP: %s Serial: %s)"):format(playername,username,ip,serial)) else triggerClientEvent(source,"RPGlogin.errorBox",source,"An error occurred, please try again") end end addEvent("RPGlogin.playerLogin",true) addEventHandler("RPGlogin.playerLogin",root,playerLogin) function registerPlayer(username,password,email) if username and password and email then if not blockedUsernames[username] then if not username:match("[%s%p]") then local accountQuery = executeSQLQuery("SELECT id FROM user_data WHERE username=? LIMIT 1",username) if accountQuery and #accountQuery == 0 then if executeSQLInsert("user_data","'"..username.."','"..password.."','"..email.."',0,0,1000","'username','pwsalted','email','wanted','jailed','money'") then triggerClientEvent(source,"RPGlogin.showLogin",source) triggerClientEvent(source,"RPGlogin.errorBox",source,"Account registration completed. Your username is "..username..". Remember it.") else triggerClientEvent(source,"RPGlogin.errorBox",source,"Account registration failed") end elseif accountQuery and #accountQuery > 0 then triggerClientEvent(source,"RPGlogin.errorBox",source,"An account with this name has already been registered") else triggerClientEvent(source,"RPGlogin.errorBox",source,"Account registration failed") end else triggerClientEvent(source,"RPGlogin.errorBox",source,"The username you register must not contain any spacing or punctuation") end else triggerClientEvent(source,"RPGlogin.errorBox",source,"This username is blocked") end end end addEvent("RPGlogin.playerRegisterAccount",true) addEventHandler("RPGlogin.playerRegisterAccount",root,registerPlayer) function markAsLogOut() local id = getElementData(source,"id") if id then executeSQLUpdate("user_data","loggedin = 0","id = "..id) end end addEventHandler("onPlayerQuit", root,markAsLogOut) addEvent("onPlayerLogOut",true) addEventHandler("onPlayerLogOut",root,function() setElementData(source,"loggedIn",false) local username = getElementData(source,"username") local id = getElementData(source,"id") if id then executeSQLUpdate("user_data","loggedin = 0","id = "..id) end if not username then username = "N/A" end local ip = getPlayerIP(source) local serial = getPlayerSerial(source) if ip and serial then outputServerLog("RPGlogin: "..getPlayerName(source).." has logged out from '"..username.."' (IP: "..ip.." Serial: "..serial..")") end setElementData(source,"username",nil) setElementData(source,"id",nil) triggerClientEvent(source,"RPGlogin.showLogin",source) killPed(source) fadeCamera(source,false) setElementInterior(source,0) setElementDimension(source,0) end)
  2. Hola, e posteado varios errores de script, el cual necesito crear tablas y cosas asi! pero e tratado con otros scripter y me an dicho que podria crear una base de datos sqlite en vez de usar tablas, pues vale, En vez de crear una base de datos para un script que un hacker me podria robar con todo y base de datos, porque no usar la db que tiene mta? Ahora mi pregunta es como conecto un script a esa base de datos? Si alguien me puede ayudar en privado seria de mucha ayuda! solo es conectar el script a esa base de datos, Ya los guiones estan listos
  3. Hola e visto un script en el forum scripter del lado de english y lo e utilizado es libre de derechos solo que no borren los derechos de autor! pues vale ese no es el caso, Lo e utilizado y funciona perfecto pero al agregar 2 autos no me deja entrar en otros autos. Primero vean el codigo vehicle1 = createVehicle( 416, 2031.5, -1431.7, 17.3, 0, 0, 359.996 ) -- This car is spawn in hospital ls vehicle2 = createVehicle( 416, 2014.5, -1417.1, 17.3, 0, 0, 262 ) -- This car is spawn in hospital ls vehicle3 = createVehicle( 416, 1182.6, -1338.3, 13.9, 0, 4, 272 ) -- This car is spawn in hospital ls vehicle4 = createVehicle( 416, 1182, -1308.6, 13.9, 0, 3.999, 272 ) -- This car is spawn in hospital ls vehicle = createVehicle( modelID, x, y, z, rotX, rotY, rotZ ) state = setVehicleDoorState ( vehicle, 1, 1 ) function lockPrivate( player, seat, jacked ) if ( source == vehicle1 and vehicle2 or vehicle3 and vehicle4 ) then local playerTeam = getPlayerTeam ( player ) local oldTeamName = getTeamName ( playerTeam ) if ( oldTeamName ~= "Emergency" ) then cancelEvent() exports.SAcommands:sendMessage("*INFO* To use this vehicle, you need to be be spawn as the following: Emergency", 240,240,240) else exports.SAcommands:sendMessage("*INFO* Welcome to your vehicle,Sir!", 240,240,240) end end end addEventHandler ( "onVehicleStartEnter", getRootElement(), lockPrivate ) setVehicleDamageProof(vehicle, true) -----car won't take damage (change it to false if you want to take damage) -----Made by Alen141(ingame name:Jimboy)------ -----Special thanks to : Solidsnake14(ingame name:Castillo)----- -----Visit SAUR Utopia RPG, IP: 128.204.203.103:22003----- -----Feel free to edit script on your own----- -----Don't remove credits----- Asi lo quiero yo que tenga para 4 Vehiculos que son 4 ambulancia que estan spawneada en los 2 hospitales 2 en cada hospital! Si pongo una y no estoy en el team "Emergency" sale el mensaje de que no puede subir y aki el error con 1 solo createvehicle añadido puedo entrar a todos los autos que no sean ambulancia y no sale el mensaje de que no puedo subir! y al agregar 2 createvehicle no me deja entrar a ningun vehiculo si no soy "Emergency" Es decir que al agregar 2 createvehicle ese script utiliza como si todos los autos de gta son solo para el team emergency y asi no lo quiero tambien agregare patrullas pero sera en otro script y no quisiera que pasara lo mismo Aqui el script original vehicle1 = createVehicle( 416, 2031.5, -1431.7, 17.3, 0, 0, 359.996 ) -- This car is spawn in hospital ls vehicle = createVehicle( modelID, x, y, z, rotX, rotY, rotZ ) state = setVehicleDoorState ( vehicle, 1, 1 ) function lockPrivate( player, seat, jacked ) if ( source == vehicle1 ) then local playerTeam = getPlayerTeam ( player ) local oldTeamName = getTeamName ( playerTeam ) if ( oldTeamName ~= "Emergency" ) then cancelEvent() exports.SAcommands:sendMessage("*INFO* To use this vehicle, you need to be be spawn as the following: Emergency", 240,240,240) else exports.SAcommands:sendMessage("*INFO* Welcome to your vehicle,Sir!", 240,240,240) end end end addEventHandler ( "onVehicleStartEnter", getRootElement(), lockPrivate ) setVehicleDamageProof(vehicle, true) -----car won't take damage (change it to false if you want to take damage) -----Made by Alen141(ingame name:Jimboy)------ -----Special thanks to : Solidsnake14(ingame name:Castillo)----- -----Visit SAUR Utopia RPG, IP: 128.204.203.103:22003----- -----Feel free to edit script on your own----- -----Don't remove credits----- Asi mas o menos vino, claro sin el exports a SAcommands ese es otro script, VALE Porfavor si pudieran postear el codigo arreglado ya que es un script muy comun y no se consegue asi otro entra como yo agarre este script en la comunidad english puede que un latino tambien lo use!
  4. This is the tablet? local iconsTable = executeSQLSelect("icon_data","houseid,status,x,y,z") for k,v in ipairs(iconsTable) do local id = v.houseid local status = v.status if string.find(id,"safe") then local pickup = createPickup(v.x,v.y,v.z,3,1277,1000) buyIcons[pickup] = {pickup,status,id} createBlipAttachedTo(pickup,35,1,255,255,255,100,0,50 ) elseif string.find(id,"marine") then local pickup = createPickup(v.x,v.y,v.z,3,1277,1000) buyIcons[pickup] = {pickup,status,id} createBlipAttachedTo(pickup,9,1,255,255,255,100,0,50 ) elseif string.find(id,"vehicle_trader") then local pickup = createPickup(v.x,v.y,v.z,3,1274,1000) buyIcons[pickup] = {pickup,status,id} elseif string.find(id,"boat_trader") then local pickup = createPickup(v.x,v.y,v.z,3,1274,1000) buyIcons[pickup] = {pickup,status,id} elseif string.find(id,"bank") then
  5. A esto te refieres? local pickup = createPickup(v.x,v.y,v.z,3,1277,1000) buyIcons[pickup] = {pickup,status,id} createBlipAttachedTo(pickup,35,1,255,255,255,100,0,50 ) elseif string.find(id,"marine") then local pickup = createPickup(v.x,v.y,v.z,3,1277,1000) buyIcons[pickup] = {pickup,status,id} createBlipAttachedTo(pickup,9,1,255,255,255,100,0,50 ) elseif string.find(id,"vehicle_trader") then local pickup = createPickup(v.x,v.y,v.z,3,1274,1000) buyIcons[pickup] = {pickup,status,id} elseif string.find(id,"boat_trader") then local pickup = createPickup(v.x,v.y,v.z,3,1274,1000) buyIcons[pickup] = {pickup,status,id} elseif string.find(id,"bank") then local pickup = createPickup(v.x,v.y,v.z,3,1274,1000) buyIcons[pickup] = {pickup,status,id} elseif string.find(id,"gang") or string.find(id,"squad") or string.find(id,"company") then local pickup = createPickup(v.x,v.y,v.z,3,1314,1000) buyIcons[pickup] = {pickup,status,id}
  6. Hola, tengo un housing para mi server rpg este housing tiene, tienda de autos tienda de botes y tienda de casa, en esta gui podras gurdar tus autos y armas. pero tiene algunos errores. el cual e pedido ayuda a un scripter de facebook y me dijo que el script necesita una base de datos! yo no tengo ni la mas minima idea de que tipo de base necesite y como crearla! No uso mysql Aqui el error [2015-11-21 19:05:45] ERROR: RPGhousing\rpghousing.lua:221: Database query failed: no such table: icon_data [2015-11-21 19:05:45] ERROR: RPGhousing\rpghousing.lua:222: bad argument #1 to 'ipairs' (table expected, got string) Lineas del error local iconsTable = executeSQLSelect("icon_data","houseid,status,x,y,z") for k,v in ipairs(iconsTable) do local id = v.houseid local status = v.status if string.find(id,"safe") then
  7. Hello, i have a housing for my server RPG. but needs a data base for save all, this housing has, car shop, boat shop and house shop. one scripter he told me without data base no work the script, I don't know create a data base, Somebody help me, Please, Only i lack this script for open my server . Please help me and Thank you! Error in debugscript [2015-11-21 19:05:45] ERROR: RPGhousing\rpghousing.lua:221: Database query failed: no such table: icon_data [2015-11-21 19:05:45] ERROR: RPGhousing\rpghousing.lua:222: bad argument #1 to 'ipairs' (table expected, got string) Line of error local iconsTable = executeSQLSelect("icon_data","houseid,status,x,y,z") for k,v in ipairs(iconsTable) do local id = v.houseid local status = v.status if string.find(id,"safe") then
  8. Hello, i have this error in Housing In debugscript : ERROR: Loading script failed: RPGhousing\rpghousing.lua:8: '}' expected (to close '{' at line 7) near '=' Here the line of script local zoneLimits = { ["Los Santos"] = 3, ["San Fierro"] = 3, ["Las Venturas"] = 3, ["Bone County"] = 1, ["Red County"] = 1, ["Flint County"] = 1, ["Whetstone"] = 1, ["Tierra Robada"] = 1, ["Unknown"] = 1 }
  9. Hola a todos, bueh e conseguido este script en la comunidad es de dar un spawn a carros! los que yo quiera poner! es el que mas me gusto pero ese no es el problema, cuando lo baje venia con 1 solo createMarker y yo le agrege 11 mas pero al agregarlos los 11 mas ninguno abre, si pongolo solo 1 funciona pero si agrego los otros 11 no quiere salir la gui! ¿Que problema tendra? Aqui el client.lua local vehicleMarker = createMarker (1538.88,-1686.07,13.55,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (1188.35,-1331.75,13.56,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (2034.61,-1437.47,17.32,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (1374.35,416.79,19.78,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (1624.37,1817.87,10.82,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (2578.49,1978.19,10.82,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (-331.47,1063.28,19.74,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (-1504.19,2533.95,55.69,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (-2641.08,620.4,14.45,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (-2206.39,-2299.49,30.63,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (-1568.97,653.7,7.19,"cylinder", 3, 0,0,0 ) local vehicleMarker = createMarker (2242.02,26.46,26.44,"cylinder", 3, 0,0,0 ) -- Blip Of Spawn Cars local VehicleBlip = createBlip (1538.88,-1686.07,13.55,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (1188.35,-1331.75,13.56,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (2034.61,-1437.47,17.32,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (1374.35,416.79,19.78,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (1624.37,1817.87,10.82,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (2578.49,1978.19,10.82,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (-331.47,1063.28,19.74,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (-1504.19,2533.95,55.69,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (-2641.08,620.4,14.45,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (-2206.39,-2299.49,30.63,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (-1568.97,653.7,7.19,35,0, 0, 0, 0, 0, 0, 250) local VehicleBlip = createBlip (2242.02,26.46,26.44,35,0, 0, 0, 0, 0, 0, 250) outputDebugString("Blip visible distance: "..getBlipVisibleDistance(blip)) --250 setBlipVisibleDistance(blip, 250) window = guiCreateWindow(553, 212, 270, 241, "Spawn Cars", false) guiWindowSetSizable(window, false) guiSetAlpha(window, 1.00) carlist = guiCreateGridList(9, 29, 254, 143, false, window) guiGridListAddColumn(carlist, "Free Cars", 0.9) guiGridListAddColumn(carlist, "ID" , 0) spawn = guiCreateButton(18, 191, 96, 40, "Spawn Car", false, window) guiSetFont(spawn, "default-bold-small") guiSetProperty(spawn, "NormalTextColour", "FF01D51A") close = guiCreateButton(167, 191, 93, 40, "Close Car List", false, window) guiSetFont(close, "default-bold-small") guiSetProperty(close, "NormalTextColour", "FF31491A") guiSetVisible(window , false) cars = { {"Alpha" , 602 }, {"BMX" , 481 }, {"Club", 589}, {"Faggio" , 462 }, } function addCars () for i , cars in ipairs (cars) do local row = guiGridListAddRow(carlist) guiGridListSetItemText(carlist,row,1,cars[1],false,false) guiGridListSetItemText(carlist,row,2,cars[2],false,false) end end addEventHandler("onClientResourceStart",getResourceRootElement(getThisResource()),addCars) function closegui () if (source == close) then guiSetVisible(window , false) showCursor(false) end end addEventHandler("onClientGUIClick" ,close , closegui) function showgui (hitElement) if getElementType(hitElement) == "player" and (hitElement == localPlayer ) and (not isPedInVehicle(localPlayer)) then if not guiGetVisible(window) then guiSetVisible(window , true) showCursor(true) end end end addEventHandler("onClientMarkerHit" , vehicleMarker , showgui) function showguil (leaveElement) if getElementType(leaveElement) == "player" and (leaveElement == localPlayer) then if guiGetVisible(window) then guiSetVisible(window , false) showCursor(false) end end end addEventHandler("onClientMarkerLeave" , vehicleMarker,showguil ) function spawnFreeCars () if ( source == spawn ) then local row,col = guiGridListGetSelectedItem(carlist) local modelid = guiGridListGetItemText(carlist,row,2) local carN = guiGridListGetItemText(carlist,row,1) if ( row and col ) then triggerServerEvent("spawn",localPlayer,modelid,carN) end end end addEventHandler("onClientGUIClick",spawn,spawnFreeCars) Aqui la server.lua Vehicle = {} function spawnCars(modelid , carN) if (isElement(Vehicle[source])) then outputChatBox("You can only spawn one free car to get another one you have to destroy your previous car using /des " , player,255,0,0) return end if ( modelid and carN) then local x,y,z = getElementPosition(source) Vehicle[source] = createVehicle(modelid,x,y, z) setElementData(source,"veh",Vehicle[source]) warpPedIntoVehicle(source,Vehicle[source]) outputChatBox("You have spawned "..tostring(carN).. " !" ,player,255,255,0) setElementData(source , "vehN" , carN) end end addEvent("spawn",true) addEventHandler("spawn",root,spawnCars) function dstrVeh (player) local carName = getElementData(player,"vehN") getPedOccupiedVehicle(player) local Veh = getElementData(player ,"veh") if (Veh) then destroyElement(Veh) outputChatBox("Your Spawner :[ " ..tostring(carName).." ] is destroyed",player,255,255,0) end end addCommandHandler("des",dstrVeh)
  10. Hello, I have this script which get an error that an event was not added ! but if added , I test this script local windows server and runs perfect, I try linux host and fails triggerClientEvent(player, "onSpawnSuccessful", getRootElement()) else triggerClientEvent(player, "onSpawnError", getRootElement() , "You Dont Have permission To Spawn As " .. skinName .. "") end end addEvent("onPlayerSpawnButton", true) addEventHandler("onPlayerSpawnButton", getRootElement(), playerSpawn) Here the error! http://imgur.com/8nu49ax
  11. Tengo todo añadido y aun asi sale este error! ya 2 scripter de la comunidad me an ayudado y no sabemos donde esta el error! yo pruebo este script en local server pero en windows y no sale ni 1 warning lo pruebo en host linux y sale este error! osea en windows funciona perfecto y en linux no! Aqui la parte donde se añadio el evento a server-side triggerClientEvent(player, "onSpawnSuccessful", getRootElement()) else triggerClientEvent(player, "onSpawnError", getRootElement() , "You Dont Have permission To Spawn As " .. skinName .. "") end end addEvent("onPlayerSpawnButton", true) addEventHandler("onPlayerSpawnButton", getRootElement(), playerSpawn) Aqui el error! http://imgur.com/8nu49ax
  12. Aun asi creadon .db no se guardan los grupos ni nada. y en consola da errores de call no runing to SASQL cuando entra el jugador no cuando incia el server y al iniciar el server se crea esto en el script http://es.tinypic.com/view.php?pic=2mm8zdf&s=9
  13. Aqui el meta.xml "NG Scripting Team" name="NG SQL" type="script" version="1.0" />
  14. Hola como varios sabran hace ayer hise un post de un problema que tenia mysql, decidi hacerle caso al tomas que fue el unico que respondio pues vale. ahora nose si estoy cambiando a sqlite bien, pues uso la opcion de exportar de phpmyadmin y al abrir el server nada falla, pero no guarda ni los grupo (GANG) ni los turf ni el job, osea como si esa parte no estuviese conectada, intente haciendo que el mismo script cree su propio sqlite y aun asi todo funciona pero no guarda nada! Alguna ayuda? soy Noob en scripting y recontra NOB en mysql primera vez que lo uso
  15. Hola, Espero que esten bien, pues vale me e bajado el gamemode Nerd Gaming y lo e probado en local. pues e tenido un problema, el gamemode viene un con un script llamado NGSQL y hay es donde pondria los datos de my phpmyadmin pues lo coloco y al abrir el server no envia ni crea las tablas al phpmyadmin. luego de leer un poquito me di cuenta de que el gamemode es ultra viejo de la 1.3 y probe bajandome la 1.3 y abriendo el server desde esa vercion. una vez que abri el server con la 1.3 se me crearon las tablas en el phpmyadmin. ok todo normal instale la 1.5 otra vez y funcionaba todo perfecto asta incluso creaba nuevas base de datos y sin tener que abrir el server en la 1.3 para que se envien las tablas otra vez ya no era necesario desde la 1.5 se podia. El problema es que ahora compre un hosting en cydrio y sigue el error de no crear las tablas, y ya hable con el hosting y hicimos lo mismo que hice yo en local instale la 1.3 para crear las tablas pero no salio lo mismo que ne local, Esta vez no se crearo las tablas y ahora de verdad no se que hacer. Una ayudita por fa aqui los errores [2015-10-27 02:02:53] ERROR: attempt to call a nil value [2015-10-27 02:02:53] ERROR: SATurf\server.lua:244: call: failed to call 'SASQL:db_exec' [string "?"] [2015-10-27 02:02:53] ERROR: attempt to call a nil value [2015-10-27 02:02:53] ERROR: SATurf\server.lua:245: call: failed to call 'SASQL:db_query' [string "?"] [2015-10-27 02:02:53] ERROR: SATurf\server.lua:246: attempt to get length of local 'query' (a boolean value) [2015-10-27 02:02:53] ERROR: attempt to call a nil value [2015-10-27 02:02:53] ERROR: SAUsedVehicles\s_used_vehicles.lua:56: call: failed to call 'SASQL:db_exec' [string "?"] [2015-10-27 02:02:53] ERROR: attempt to call a nil value [2015-10-27 02:02:53] ERROR: SAUsedVehicles\s_used_vehicles.lua:58: call: failed to call 'SASQL:db_query' [string "?"] [2015-10-27 02:02:53] ERROR: attempt to call a nil value [2015-10-27 02:02:53] ERROR: SAVehicles\vehicles\vehicles_s.lua:14: call: failed to call 'SASQL:db_exec' [string "?"] [2015-10-27 02:02:53] Creating new DB table version Aqui el meta del script NGSQL "NG Scripting Team" name="NG SQL" type="script" version="1.0" />
  16. Hola A todos, e visto en 2 servidores que tiene blip y arriba del blip tiene un nombre ejemplo el blip de la policia, arriba tiene un nombre que dice ''Police'' como para que lo identifiquen lo que no saben, Nose si me explico, quisiera poner algunos blip y arriba que tengan su nombre ejemplo un blip ''58 Gang_b'' y que arriba del blip diga Base[s.W.A.T] como le aria? Porfa si podrian postear un codigo seria de mucha ayuda.
  17. Usas teamviewer? asi podras ver mi pc y como esta el spawn_client y el spawn_server sin problemas. y podrias ver la consola del server
  18. Si en meta es tal spawn_server.lua y ya e intentado agregarle el trigger pero sigue dando el error que no fue agregado al server_side. una manera de agregarlo?
  19. En la consola sale esto = triggered serverside event onPlayerSpawnBut ton, but event is not added serverside creo que tendria que agregar tambien un triggerClientEvent pero lo agrego como dije aya arriba y aun nada que funciona
  20. Hola tengo un panel de spawn el cual me manda un error y es este = triggered serverside event onPlayerSpawnBut ton, but event is not added serverside, e intentado de todo en el server_side asta e puesto = triggerClientEvent("onPlayerSpawnButton", getRootElement(), playerSpawn) Pero aun asi nada, este es el codigo de server_side xmlUnloadFile(xml) -- Logout all players for safety. local players = getElementsByType ( "player" ) -- Get every player for k, player in ipairs ( players ) do -- For every player do the following... account = getPlayerAccount ( player ) -- Get every player's account if ( not isGuestAccount ( account ) ) then -- For every player that's logged in.... logOut ( player ) -- Log them out. end end addEventHandler("onPlayerLogout",getRootElement(),loggedOut) end addEventHandler("onResourceStart", resourceRoot, startup) function playerSpawn (spawnX, spawnY, spawnZ, team, permission, skin, weapons, player, skinName, sR, sG, sB ) local playerAccountName = getAccountName(getPlayerAccount(player)) --outputConsole("user." .. playerAccountName .. ", " .. permission) if isObjectInACLGroup ("user." .. playerAccountName, aclGetGroup(permission)) then spawnTeam = getTeamFromName(team) spawnPlayer (player, spawnX , spawnY, spawnZ, 0, skin, 0, 0, spawnTeam) -- spawns player with random skin fadeCamera (player, true) setCameraInterior (player, 0 ) setCameraTarget (player, player) local tR , tG , tB = getTeamColor(spawnTeam) local r = sR or tR local g = sG or tG local b = sB or tB playerBlips[player] = createBlipAttachedTo(player, 0, 2, r, g, b, 255, 0, 65535, getRootElement()) setPlayerNametagColor(player, r, g, b) if(weapons) then local weps = split(weapons, ",") for i, node in ipairs(weps) do --outputConsole(node) local wepinfo = split(node, ".") local wepid = wepinfo[1] --outputConsole(wepid) local wepammo = wepinfo[2] --outputConsole(wepammo) giveWeapon ( player, wepid, wepammo ) end end setAccountData(getPlayerAccount(player), "skinName", skinName) setElementData(player, "spawnedAs", skinName) triggerClientEvent(player, "onSpawnSuccessful", getRootElement()) else triggerClientEvent(player, "onSpawnError", getRootElement() , "You Dont Have permission To Spawn As " .. skinName .. "") end end addEvent("onPlayerSpawnButton", true) addEventHandler("onPlayerSpawnButton", getRootElement(), playerSpawn) function playerDespawn() local player = source if playerBlips[player] then if getElementType(playerBlips[player]) == "blip" then destroyElement(playerBlips[player]) end end end addEventHandler("onPlayerWasted", getRootElement(), playerDespawn) addEventHandler("onPlayerQuit", getRootElement(), playerDespawn) function saveProperty(a, b, c, playah) local player = playah or source local playeraccount = getPlayerAccount(player) if not isPedDead(player) then local x, y, z = getElementPosition(player) setAccountData(playeraccount, "x", x) setAccountData(playeraccount, "y", y) setAccountData(playeraccount, "z", z) local skin = getElementModel(player) setAccountData(playeraccount, "skin", skin) local team = getTeamName(getPlayerTeam(player)) setAccountData(playeraccount, "team", team) local permission = "spawn.spawn" setAccountData(playeraccount, "permission", permission) local weaponsarray = {} for i=1, 12 do if(getPedWeapon(player, i) ~= 0 and getPedTotalAmmo(player, i) > 0) then table.insert(weaponsarray, getPedWeapon(player, i) .. "." .. getPedTotalAmmo(player, i)) end end local weaponstring = table.concat(weaponsarray,",") setAccountData(playeraccount, "weapons", weaponstring) setAccountData(playeraccount, "aliveonquit", true) else setAccountData(playeraccount, "aliveonquit", false) setAccountData(playeraccount, "x", nil) setAccountData(playeraccount, "y", nil) setAccountData(playeraccount, "z", nil) setAccountData(playeraccount, "permission", nil) setAccountData(playeraccount, "team", nil) setAccountData(playeraccount, "skin", nil) setAccountData(playeraccount, "weapons", nil) end end addEventHandler("onPlayerQuit", getRootElement(), saveProperty) function wasPlayerAlive() if getAccountData(getPlayerAccount(source), "aliveonquit") then --outputConsole("Seems like playah wus alive!") local playerAccount = getPlayerAccount(source) local x = getAccountData(playerAccount, "x") local y = getAccountData(playerAccount, "y") local z = getAccountData(playerAccount, "z") local team = getAccountData(playerAccount, "team") local permission = getAccountData(playerAccount, "permission") local skin = getAccountData(playerAccount, "skin") local weps = getAccountData(playerAccount, "weapons") local skinName = getAccountData(playerAccount, "skinName") playerSpawn(x , y , z, team, permission, skin, weps, source, skinName) else triggerClientEvent(source, "onPlayerWasntAlive", source) end end addEvent("wasPlayerAliveEvent", true) addEventHandler("wasPlayerAliveEvent", getRootElement(), wasPlayerAlive) function loggedOut() cancelEvent() outputChatBox("You can't log out!", source, 255, 0 ,0) end function stopdown() local players = getElementsByType("player") for i, player in ipairs(players) do saveProperty(nil, nil, nil, player) end end addEventHandler("onResourceStop", resourceRoot, stopdown) Esta es la parte donde esta el Trigger en client triggerServerEvent("onPlayerSpawnButton", getLocalPlayer(), spawninfo["spawnX"] , spawninfo["spawnY"], spawninfo["spawnZ"], className, spawninfo['permission'], skinID,spawninfo['weapons'], getLocalPlayer(), skinName, spawninfo['r'] or nil, spawninfo['g'] or nil, spawninfo['b'] or nil, spawninfo['rot'], spawninfo['armor'] or 0) else displayError("Please make a selection!") end
  21. Hola tengo este script de Nerd Gaming es de una tienda de autos, pero esta en mysql y el hosting que compre no tiene ese servicio. como ago para pasarloa sqlite? Aqui la sql de nerd gaming "NG Scripting Team" name="NG SQL" type="script" version="1.0" /> y aqui el script de venta de autos addEventHandler ( "onResourceStart", resourceRoot, function ( ) exports['NGSQL']:db_query ( "CREATE TABLE IF NOT EXISTS vehicles ( Owner TEXT, VehicleID INT, ID INT, Color TEXT, Upgrades TEXT, Position TEXT, Rotation TEXT, Health TEXT, Visible INT, Fuel INT, Impounded INT, Handling TEXT )" ) end ) vehicles = { } local blip = { } local texts = { } function getAllAccountVehicles ( account ) local cars = { } local q = exports['NGSQL']:db_query ( "SELECT * FROM vehicles WHERE Owner=? ", tostring(account) ) for i, v in pairs ( q ) do table.insert ( cars, v ) end return cars end function showVehicle ( id, stat, player, msg ) if stat then if ( not isElement ( vehicles[id] ) ) then local q = exports['NGSQL']:db_query ( "SELECT * FROM vehicles WHERE VehicleID=? LIMIT 1", tostring(id) ) if ( q and type ( q ) == 'table' and #q > 0 ) then local d = q[1] local health = tonumber ( d['Health'] ) local owner, vehID = tostring ( d['Owner'] ), tonumber ( d['ID'] ) local color, upgrades = d['Color'], d['Upgrades'] local pos, rot = d['Position'], d['Rotation'] local pos = fromJSON ( pos ) local pos = split ( pos, ', ' ) local x, y, z = tonumber ( pos[1] ), tonumber ( pos[2] ), tonumber ( pos[3] ) local rot = fromJSON ( rot ) local rot = split ( rot, ', ' ) local rx, ry, rz = tonumber ( rot[1] ), tonumber ( rot[2] ), tonumber ( rot[3] ) local color = fromJSON ( color ) local color = split ( color, ', ' ) local r, g, b = tonumber ( color[1] ), tonumber ( color[2] ), tonumber ( color[3] ) local upgrades = fromJSON ( upgrades ) local hndl = fromJSON ( d['Handling'] ) vehicles[id] = createVehicle ( vehID, x, y, z, rx, ry, rz ) setElementData ( vehicles[id], "fuel", tonumber ( d['Fuel'] ) ) setVehicleColor ( vehicles[id], r, g, b ) setElementData ( vehicles[id], "NGVehicles:VehicleAccountOwner", tostring ( owner ) ) setElementData ( vehicles[id], "NGVehicles:VehicleID", id ) setElementHealth ( vehicles[id], tonumber ( health ) ) if ( hndl and type ( hndl ) == "table" ) then for i, v in pairs ( hndl ) do setVehicleHandling ( vehicles [ id ], tostring ( i ), v ) end end for i, v in ipairs ( upgrades ) do addVehicleUpgrade ( vehicles[id], tonumber ( v ) ) end exports['NGSQL']:db_query ( "UPDATE vehicles SET Visible=? WHERE VehicleID=?", '1', id ) if ( isElement ( blip[id] ) ) then destroyElement ( blip[id] ) end if ( isElement ( texts[id] ) ) then destroyElement ( texts[id] ) end texts[id] = exports['NGJobs']:create3DText ( owner.."'s vehicle", { 0, 0, 0.5 }, { 255, 255, 255 }, vehicles[id], { 5, true } ) if ( isElement ( player ) ) then blip[id] = createBlipAttachedTo ( vehicles[id], 51, 2, 255, 255, 255, 255, 0, 1500, player ) setElementData ( vehicles[id], "NGVehicles:VehiclePlayerOwner", player ) end addEventHandler ( "onVehicleDamage", vehicles[id], function ( ) local health = math.floor ( getElementHealth ( source ) ) if ( health <= 300 ) then local id = getElementData ( source, "NGVehicles:VehicleID" ) local driver = getVehicleOccupant ( source ) if ( driver ) then exports['NGMessages']:sendClientMessage ( "This vehicle is broken and requires a mechanic to fix it.", driver, 255, 0, 0 ) end showVehicle ( id, false ) end end ) addEventHandler ( "onVehicleStartEnter", vehicles[id], function ( p, s ) if ( getVehicleOccupant ( source ) )then local t = getPlayerTeam ( p ) if ( t ) then if ( exports['NGPlayerFunctions']:isTeamLaw ( getTeamName ( t ) ) and getPlayerWantedLevel ( getVehicleOccupant ( source ) ) > 0 and s == 0 ) then setVehicleLocked ( source, false ) return end end end if ( isVehicleLocked ( source ) ) then exports['NGMessages']:sendClientMessage ( "This vehicle is locked.", p, 255, 255, 0 ) cancelEvent ( ) end end ) addEventHandler ( "onVehicleEnter", vehicles[id], function ( p, seat ) local health = getElementHealth ( source ) local id = getElementData ( source, "NGVehicles:VehicleID" ) if ( health <= 300 ) then showVehicle ( id, false ) exports.ngmessages:sendClientMessage ( "This vehicle was hidden due to low health", p, 255, 0, 0 ) return end local acc = getPlayerAccount ( p ) if ( isGuestAccount ( acc ) ) then return end local acc = getAccountName ( acc ) local name = getVehicleNameFromModel ( getElementModel ( source ) ) local owner = getElementData ( source, 'NGVehicles:VehicleAccountOwner' ) if ( acc == owner ) then exports['NGMessages']:sendClientMessage ( "This is your "..name.."!", p, 0, 255, 0 ) else exports['NGMessages']:sendClientMessage ( "This "..name.." belongs to "..owner..".", p, 255, 255, 0 ) end end ) if ( msg ) then exports['NGMessages']:sendClientMessage ( "Your "..getVehicleNameFromModel(vehID).." is located in "..getZoneName(x,y,z)..", "..getZoneName(x,y,z,true).."!",player,0,255,0) end if ( isElement ( player ) and vehID ) then exports['NGLogs']:outputActionLog ( getPlayerName ( player ).." spawned their "..getVehicleNameFromModel ( vehID ) ) end return vehicles[id] end end return vehicles[id] else if ( isElement ( vehicles[id] ) ) then local pos = toJSON ( createToString ( getElementPosition ( vehicles[id] ) ) ) local rot = toJSON ( createToString ( getElementRotation ( vehicles[id] ) ) ) local color = toJSON ( createToString ( getVehicleColor ( vehicles[id], true ) ) ) local upgrades = toJSON ( getVehicleUpgrades ( vehicles[id] ) ) local health, fuel = tostring ( getElementHealth ( vehicles[id] ) ), tonumber ( getElementData ( vehicles[id], "fuel" ) ) local model = getElementModel ( vehicles[id] ) local hdnl = toJSON ( getVehicleHandling ( vehicles [ id ] ) ) exports['NGSQL']:db_query ( "UPDATE vehicles SET Color=?, Upgrades=?, Position=?, Rotation=?, Health=?, Fuel=?, Handling=? WHERE VehicleID=?", color, upgrades, pos, rot, health, fuel, hdnl, id ) destroyElement ( vehicles[id] ) vehicles[id] = nil exports['NGSQL']:db_query ( "UPDATE vehicles SET Visible=? WHERE VehicleID=?", '0', id ) if ( isElement ( blip[id] ) ) then destroyElement ( blip[id] ) end if ( isElement ( texts[id] ) ) then destroyElement ( texts[id] ) end if ( isElement ( player ) ) then exports['NGLogs']:outputActionLog ( getPlayerName ( player ).." hid their "..getVehicleNameFromModel ( model ) ) end end end return false end function warpVehicleToPlayer ( id, player ) if ( not isElement ( vehicles [ id ] ) ) then return false end if ( getElementInterior ( player ) ~= 0 or getElementDimension ( player ) ~= 0 ) then return false end if ( getVehicleController ( vehicles [ id ] ) ) then return false end local x, y, z = getElementPosition ( player ) local rot = getPedRotation ( player ) local rx, ry, rz = getElementRotation ( vehicles [ id ] ) setElementPosition ( vehicles [ id ], x, y, z + 1 ) setElementRotation ( vehicles [ id ], rx, ry, rot ) warpPedIntoVehicle ( player, vehicles [ id ] ) return true end function givePlayerVehicle ( player, vehID, r, g, b ) if ( isGuestAccount ( getPlayerAccount ( player ) ) ) then return false end local r, g, b = r or 0, g or 0, b or 0 local ids = exports['NGSQL']:db_query ( "SELECT VehicleID FROM vehicles" ) local id = math.random ( 0, 999999999 ); local idS = { } for i, v in ipairs ( ids ) do idS[tonumber(v['VehicleID'])] = true end local q = exports.ngsql:db_query ( "SELECT uniq_id FROM used_vehicles" ); if ( q and type ( q ) == "table" ) then for _, v in pairs ( q ) do idS[v.uniq_id] = true; end end while ( idS[id] ) do id = math.random ( 0, 999999999 ); end local pos = toJSON ( createToString ( getElementPosition ( player ) ) ) local rot = toJSON ( createToString ( 0, 0, getPedRotation ( player ) ) ) local color = toJSON ( createToString ( r, g, b ) ) local upgrades = toJSON ( { } ) local health = 1000 exports['NGLogs']:outputActionLog ( getPlayerName ( player ).." bought a "..getVehicleNameFromModel ( vehID ) ) exports['NGSQL']:db_query ( "INSERT INTO `vehicles` (`Owner`, `VehicleID`, `ID`, `Color`, `Upgrades`, `Position`, `Rotation`, `Health`, `Visible`, `Fuel`, `Impounded`, `Handling`) VALUES ( ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?);", getAccountName(getPlayerAccount(player)), tostring(id), tostring(vehID), color, upgrades, pos, rot, health, '100', '0', '0', toJSON ( getModelHandling ( vehID ) ) ) return id end function getAccountVehicles ( account ) local query = getAllAccountVehicles ( account ) if ( type ( query ) == 'table' and #query >= 1 ) then local rV = { } for i, v in pairs ( query ) do table.insert ( rV, { v['Owner'], v['VehicleID'], v['ID'], v['Color'], v['Upgrades'], v['Position'], v['Rotation'], v['Health'], v['Visible'], v['Fuel'], v['Impounded'], v['Handling'] } ) end return rV else return { } end end function sellVehicle ( player, id ) --showVehicle ( id, false ) local data = exports['NGSQL']:db_query ( "SELECT * FROM vehicles WHERE VehicleID=?", tostring(id) ) local model = tonumber ( data[1]['ID'] ) local price = nil for i, v in pairs ( vehicleList ) do for k, x in ipairs ( v ) do if ( x[1] == model ) then price = math.floor ( x[2] / 1.4 ) + math.random ( 500, 2200 ) if price > x[2] then while ( price >= x[2] ) do price = math.floor ( x[2] / 1.4 ) + math.random ( 100, 1000 ) end end break end end end exports['NGMessages']:sendClientMessage ( "You've sold your "..getVehicleNameFromModel ( model ).." for $"..convertNumber ( price ).."!", player, 0, 255, 0 ) givePlayerMoney ( player, price ) exports['NGSQL']:db_query ( "DELETE FROM vehicles WHERE VehicleID=?", tostring(id) ) exports['NGLogs']:outputActionLog ( getPlayerName ( player ).." sold their "..getVehicleNameFromModel ( model ).." (ID: "..tostring ( id )..")" ) end addEvent ( "NGVehicles:sellPlayerVehicle", true ) addEventHandler ( "NGVehicles:sellPlayerVehicle", root, sellVehicle ) addCommandHandler ( "hideall", function ( p ) local acc = getPlayerAccount ( p ) if ( isGuestAccount ( acc ) ) then return end local name = getAccountName ( acc ) exports['NGMessages']:sendClientMessage ( "All of your vehicles have been hidden.", p, 0, 255, 0 ) for i, v in pairs ( vehicles ) do if ( getElementData ( v, "NGVehicles:VehicleAccountOwner" ) == name ) then showVehicle ( i, false ) end end
  22. Me compre un hosting en cydrio.com el hosting todo muy bien facil de usar no lag. todos mis script al parecer funcionan pero tengo un menu de spawn que cuando lo probaba en loca funcionaba ala perfeccion ahora lo pase al host y no funciona que sera?
  23. como ago que mi trabajo se inicie a lo que el jugador eliga su clase? ejemplo que cuando el jugador eliga el trabajo de Trucker y precione spawn eso le dara una class y que al estar en dicha class el trabajo inicie. tendria que poner algo asi? function startTrucker() if getElementData(getLocalPlayer(), "class") == "Trucker" then outputDebugString("Trucker")
  24. Hola saludos a todos, bueno vamos al grano, se que hay un script que al matar a un jugador te dan dinero ese script esta en la comunidad se llama ''killmoney'' Pero como ago que cuando un jugador de un team (POLICE) mate a un jugador de otro team (CRIMINAL) Gane cierta cantida de dinero? Aki el codigo del script function rewardOnWasted ( ammo, killer, killerweapon, bodypart ) if ( killer ) and ( killer ~= source ) then givePlayerMoney ( killer, 1000 ) end end addEventHandler ( "onPlayerWasted", getRootElement(), rewardOnWasted )
×
×
  • Create New...