Jump to content

Seba500PLK

Members
  • Posts

    239
  • Joined

  • Last visited

Everything posted by Seba500PLK

  1. check local GUIEditor= { window = { }, edit = { }, label = { }, button = { }, scrollbar = { }, gridlist = { } } local Crafts = { {"Iron", 1}, {"Oil", 2}, {"Explosifs", 3} } local Weapons = { {"Brass Knuckles", 1}, {"Golf Club", 2}, {"Nightstick", 3}, {"Knife", 4}, {"Baseball Bat", 5}, {"Cane", 15}, {"Shovel", 6}, {"Pool Cue", 7}, {"Katana", 8}, {"Chainsaw", 9}, {"Colt 45", 22}, {"Silenced", 23}, {"Desert Eagle", 24}, {"Shotgun", 25}, {"Spawn-off", 26}, {"Spaz-12", 27}, {"UZI", 28}, {"MP5", 29}, {"TEC-9", 32}, {"AK47", 30}, {"M4", 31}, {"Country sniper", 33}, {"Sniper", 34}, {"Rocket Lanuncher", 35}, {"Heat-Seeking RPG", 36}, {"Flamethrower", 37}, {"Minigun", 38}, {"Grenade", 16}, {"Tear gas", 17}, {"Molotov", 18}, {"Satchel", 39}, {"Satchel detonator", 40}, {"Spraycan", 41}, {"Fire Extinguisher", 42}, {"Camera", 43}, {"Night vision goggles", 44}, {"Infrared oggles", 45}, {"Parachute", 46}, {"Long Dildo", 10}, {"Short Dildo", 11}, {"Vibrator", 12}, {"Flowers", 14}, } function createCraftWindow() GUIEditor.window [1]= guiCreateWindow(251, 224, 1230, 557, "Craft Window", false) GUIEditor.gridlist[1] = guiCreateGridList(10, 33, 266, 354, false, GUIEditor.window[1]) inctenrotry = guiGridListAddColumn(GUIEditor.gridlist[1], "Inventory", 0.60) GUIEditor.gridlist[2] = guiCreateGridList(350, 33, 266, 354, false, GUIEditor.window[1]) crafts= guiGridListAddColumn(GUIEditor.gridlist[2], "Craftable objects", 0.60) GUIEditor.gridlist[3] = guiCreateGridList(697, 33, 266, 354, false, GUIEditor.window[1]) weapons = guiGridListAddColumn(GUIEditor.gridlist[3], "Weapons", 0.60) GUIEditor.label[1] = guiCreateLabel(243, 443, 71, 18, "Amount:", false, GUIEditor.window[1]) GUIEditor.edit[1] = guiCreateEdit(324, 443, 143, 24, "", false, GUIEditor.window[1]) GUIEditor.button[1]= guiCreateButton(524, 434, 106, 43, "Craft", false, GUIEditor.window[1]) GUIEditor.scrollbar[1] = guiCreateScrollBar(530, 4, 15, 187, false, false, GUIEditor.window[1]) guiWindowSetMovable(GUIEditor.window[1], false) guiWindowSetSizable(GUIEditor.window[1], false) guiSetVisible(GUIEditor.window[1], false) for _, v in ipairs(Crafts) do local row = guiGridListAddRow(GUIEditor.gridlist[2]) guiGridListSetItemText(GUIEditor.gridlist[2], row, 1, v[1], false, false) guiGridListSetItemData(GUIEditor.gridlist[2], row, 1, v[2]) end for _, v in ipairs(Weapons) do local row = guiGridListAddRow(GUIEditor.gridlist[3]) guiGridListSetItemText(GUIEditor.gridlist[3], row, 1, v[1], false, false) guiGridListSetItemData(GUIEditor.gridlist[3], row, 1, v[2]) end end addEventHandler("onClientGUIChanged", root, function() guiSetText(GUIEditor.edit[1], string.gsub(guiGetText(GUIEditor.edit[1]), "%W", "")) end) function showCraftWindow() createCraftWindow() guiSetVisible(GUIEditor.window[1], not guiGetVisible(GUIEditor.window[1])) showCursor(not isCursorShowing) guiSetInputEnabled(not guiGetInputEnabled()) end bindKey("F9", "down", showCraftWindow) addEventHandler("onClientGUIClick", root, function(button, state) if source == GUIEditor.button[1] then if guiGridListGetSelectedItem(GUIEditor.gridlist[2]) == - 1 then outputChatBox("Select a craft object!", 255, 0, 0) return end local craftID = guiGridListGetItemData(GUIEditor.gridlist[2], guiGridListGetSelectedItem(GUIEditor.gridlist[2]), 1) local amount = guiGetText(GUIEditor.edit[1]) if craftID == 1 and amount ~= "" then setElementData(localPlayer, "iron", tonumber(amount)) local row =guiGridListAddRow(GUIEditor.gridlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], row, 1, "iron",false, false) guiGridListSetItemData(GUIEditor.gridlist[1], row, 1, iron) elseif craftID == 2 and amount ~= "" then setElementData(localPlayer, "oil", tonumber(amount)) local row = guiGridListAddRow(GUIEditor.gridlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], row, 1, "oil", false, false) guiGridListSetItemData(GUIEditor.gridlist[1], row, 1, oil) elseif craftID == 3 and amount ~= "" then setElementData(localPlayer, "explosifs", tonumber(amount)) local row = guiGridListAddRow(GUIEditor.girdlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], row, 1, "explosifs", false, false) guiGridListSetItemData(GUIEditor.gridlist[1], row, 1, explosifs) end elseif source == guiGridListGetSelectedItem(GUIEditor.gridlist[3]) then for _, v in ipairs(getPedWeapon(localPlayer)) do local row = guiGridListAddRow(GUIEditor.gridlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], row, 1, v, false, false) guiGridListSetItemData(GUIEditor.gridlist[1], row, 1, v) end if guiGridListGetSelectedItem(GUIEditor.gridlist[3]) == -1 then outputChatBox("You need select a weapon!", 255, 0, 0) return end local weaponID = guiGridListGetItemData(GUIEditor.gridlist[3], guiGridListGetSelectedItem(GUIEditor.gridlist[1]), 1) local iron = getElementData(localPlayer, "iron") local oil = getElementData(localPlayer, "oil") local explosifs = getElementData(localPlayer, "explosifs") if iron >= 10 and oil >= 15 then if weaponID == 1 or weaponID == 2 or weaponID == 3 or weaponID == 4 or weaponID == 5 or weaponID == 6 or weaponID == 7 or weaponID == 8 or weaponID == 9 or weaponID == 10 or weaponID == 11 or weaponID == 12 or weaponID == 14 or weaponID == 15 or weaponID == 40 or weaponID == 44 or weaponID == 45 or weaponID == 46 then givePedWeapon(localPlayer, weaponID, 1, true) iron = iron - 10 oil = oil - 15 elseif weaponID == 22 or weaponID == 23 or weaponID == 24 then givePedWeapon(localPlayer, weaponID, 400, true) iron = iron - 10 oil = oil - 15 elseif weaponID == 25 or weaponID == 26 or weaponID == 27 then givePedWeapon(localPlayer, weaponID, 350, true) iron = iron - 10 oil= oil - 15 elseif weaponID == 28 or weaponID == 29 or weaponID == 32 then givePedWeapon(localPlayer, weaponID, 300, true) iron = iron - 10 oil = oil - 15 elseif weaponID == 30 or weaponID == 31 then givePedWeapon(localPlayer, weaponID, 200, true) iron = iron - 10 oil = oil - 15 elseif weaponID == 33 or weaponID == 34 then givePedWeapon(localPlayer, weaponID, 150, true) iron = iron - 10 oil = oil - 15 elseif weaponID == 38 or weaponID == 41 or weaponID == 42 or weaponID == 37 then givePedWeapon(localPlayer, weaponID, 250, true) iron = iron - 10 oil = oil - 15 elseif weaponID == 43 then givePedWeapon(localPlayer, weaponID, 100, true) iron = iron - 10 oil = oil - 15 end elseif iron >= 10 and oil >= 15 and explosifs >= 20 then if weaponID == 16 or weaponID == 17 or weaponID == 18 or weaponID == 39 or weaponID == 35 or weaponID == 36 then givePedWeapon(localPlayer, weaponID, 50, true) iron = iron - 10 oil = oil - 15 explosifs = explosifs - 20 end end end end)
  2. Seba500PLK

    --

    edit in topbar chat c.lua ------------------------------------------ -- TopBarChat -- ------------------------------------------ -- Developer: Braydon Davis -- -- File: c.lua -- -- Copyright 2013 (C) Braydon Davis -- -- All rights reserved. -- ------------------------------------------ -- Script Version: 1.4 -- ------------------------------------------ local maxMessages = 5; -- The max messages that will show (on each bar) local DefaultTime = 8; -- The max time each message will show if time isn't defined. ------------------------------------------ -- For scripters only -- ------------------------------------------ local sx_, sy_ = guiGetScreenSize ( ) local sx, sy = sx_/1280, sy_/720 -- you got xXMADEXx's resolution :3 plz no hak mi local DefaultPos = true; local messages_top = { } local messages_btm = { } function sendClientMessage ( msg, r, g, b, pos, time ) -- Msg: String -- R: Int (0-255) -- G: Int (0-255) -- B: Int (0-255) -- Pos: Boolean -- Time: Int if ( not msg ) then return false end if ( pos == nil ) then pos = DefaultPos end local r, g, b = r or 255, g or 255, b or 255 local time = tonumber ( time ) or DefaultTime local data = { message = msg, r = r, g = g, b = b, alpha=0, locked=true, rTick = getTickCount ( ) + (time*1000) } --> Scripters note: --> The remove and intro fades are handled in the render event if ( pos == true or pos == "top" ) then table.insert ( messages_top, data ) return true elseif ( pos == false or pos == "bottom" ) then table.insert ( messages_btm, data ) return true end return false end addEvent ( getResourceName ( getThisResource ( ) )..":sendClientMessage", true ) addEventHandler ( getResourceName ( getThisResource ( ) )..":sendClientMessage", root, sendClientMessage ) function dxDrawNotificationBar ( ) local doRemove = { top = { }, bottom = { } } -- This is used so it prevents the next message from flashing -- Top Message Bar for i, v in pairs ( messages_top ) do local i = i - 1 if ( not v.locked ) then v.alpha = v.alpha - 3 if ( v.alpha <= 20 ) then table.insert ( doRemove.top, i+1 ) end messages_top[i+1].alpha = v.alpha else if ( v.alpha < 160 ) then v.alpha = v.alpha + 1 messages_top[i+1].alpha = v.alpha end if ( v.rTick <= getTickCount ( ) ) then v.locked = false messages_top[i+1].locked=false end end dxDrawRectangle ( (sx_/2-530/2), i*25, 530, 25, tocolor ( 0, 0, 0, v.alpha ) ) dxDrawText ( tostring ( v.message ), 0, i*25, sx_, (i+1)*25, tocolor ( v.r, v.g, v.b, v.alpha*1.59375 ), sy*1, "default-bold", "center", "center", false, false, true, true) end if ( #messages_top > maxMessages and messages_top[1].locked ) then messages_top[1].locked = false end -- Bottom Message Bar for i, v in pairs ( messages_btm ) do if ( not v.locked ) then v.alpha = v.alpha - 3 if ( v.alpha <= 20 ) then table.insert ( doRemove.bottom, i ) end messages_btm[i].alpha = v.alpha else if ( v.alpha < 160 ) then v.alpha = v.alpha + 1 messages_btm[i].alpha = v.alpha end if ( v.rTick <= getTickCount ( ) ) then v.locked = false messages_btm[i].locked=false end end dxDrawRectangle ( (sx_/2-530/2), sy_-(i*25), 530, 25, tocolor ( 0, 0, 0, v.alpha ) ) dxDrawText ( tostring ( v.message ), 0, sy_-(i*25), sx_, sy_-((i-1)*25), tocolor ( v.r, v.g, v.b, v.alpha*1.59375 ), sy*1, "default-bold", "center", "center", false, false, true, true) end if ( #messages_btm > maxMessages and messages_btm[1].locked ) then messages_btm[1].locked = false end -- handle message removes if ( #doRemove.top > 0 )then for i, v in pairs ( doRemove.top ) do table.remove ( messages_top, v ) end end if ( #doRemove.bottom > 0 ) then for i, v in pairs ( doRemove.bottom ) do table.remove ( messages_btm, v ) end end end addEventHandler ( "onClientRender", root, dxDrawNotificationBar ) ------------------------------ -- For development -- ------------------------------ addCommandHandler ( 'rt', function ( ) for i=1, 5 do sendClientMessage ( "Testing - Index ".. tostring ( i ), 255, 255, 255, false ) sendClientMessage ( "Testing - Index ".. tostring ( i ), 255, 255, 255, true ) end end )
  3. Seba500PLK

    --

    you have the last version?
  4. function loginPlayer(username, password) local account = getAccount(username, password) if user ~= nil or user ~= "" or pass ~= nil or pass ~= "" then if (account ~= false) then logIn(client, account, password) triggerClientEvent("closeLoginGUI", client) showCursor(client, false) showChat(client, true) else outputChatBox("Invalid username & password!", client, 255, 0, 0) end else outputChatBox("Please enter username and password.", client) end end addEvent("loginPlayer", true) addEventHandler("loginPlayer", getRootElement(), loginPlayer) function createAccount(username, password) if (password ~= "" and password ~= nil and username ~= "" and username ~= nil) then local addedAccount = addAccount(username, password) if (addedAccount) then outputChatBox("You have been successfully registered and logged in!", client) loginPlayer(username, password) triggerClientEvent("closeRegisterGUI", client) else outputChatBox("An account with your username is already registered.", client) end else outputChatBox("Please enter username and password.", client) end end addEvent("registerPlayer", true) addEventHandler("registerPlayer", getRootElement(), createAccount) function showGUI() triggerClientEvent("nobfokopenlogin", source) fadeCamera(source, true, 5) setCameraMatrix(source, 1468.8785400391, -919.25317382813, 100.153465271, 1468.388671875, -918.42474365234, 99.881813049316) end addEventHandler("onPlayerJoin", getRootElement(), showGUI) addEventHandler("onResourceStart", resourceRoot, function() setGameType ("FTA: v1.0.0") resetMapInfo() for _, player in ipairs (getElementsByType("player")) do kickPlayer(player, client) end end ) function createTeams() admin = createTeam("Admin", 0, 255, 0) noteam = createTeam("Unemployed", 255, 255, 0) end addEventHandler("onResourceStart", resourceRoot, createTeams) exports.scoreboard:addScoreboardColumn('Country') function showcountry() local flag = exports.admin:getPlayerCountry ( source ) if flag then setElementData(source,"Country",flag) end end addEventHandler("onPlayerJoin",getRootElement(),showcountry) function showPos(thePlayer) x,y,z = getElementPosition(thePlayer) outputChatBox("X, Y, Z: " .. x .. "," .. y .. "," .. z, client) end addCommandHandler("pos", showPos) function onLogout () cancelEvent() outputChatBox("Logout command has been disabled due to abuse.", source, 255, 0, 0) end addEventHandler ("onPlayerLogout", getRootElement(), onLogout) function chatbox(text, msgtype) if (msgtype == 0) then cancelEvent() local name = getPlayerName(source) local r, g, b = getPlayerNametagColor(source) local country = exports.admin:getPlayerCountry(source) outputChatBox("["..country.."] " .. name .. ": "..text, client, r, g, b) end end addEventHandler("onPlayerChat", root, chatbox)
  5. please write table StartSkinsW
  6. Seba500PLK

    --

    what is sendClientMessage ?
  7. because GUIEditor.edit[1] is no set.add addEventHandler("onClientResourceStart", resourceRoot, createCraftWindow) under function createCraftWindow
  8. Seba500PLK

    [Help] Dx

    function isMouseWithinRangeOf(psx,psy,pssx,pssy) if not isCursorShowing() then return false end local cx,cy = getCursorPosition() cx,cy = cx*x,cy*y if cx >= psx and cx <= psx+pssx and cy >= psy and cy <= psy+pssy then return true,cx,cy else return false end end function dx() dxDrawRectangle (0, 0, 100, 50, tocolor ( 195, 195, 195, 50 ) ) dxDrawText ("#B01010CLICK!",0, 0, 100, 50, tocolor(195, 195, 195, 255), 15, "default", "center", "center", false, false, true, true) CursorInButton = isMouseWithinRangeOf(0, 0, 100, 50) if CursorInButton then dxDrawRectangle (0, 0, 100, 50, tocolor ( 195, 195, 195, 100 ) ) end end addEventHandler("onClientRender", root, dx) function click(theButton, press) if theButton == "mouse1" and press == true then if CursorInButton then outputChatBox("wow") end end end addEventHandler("onClientKey", root, click)
  9. elseif currentWeaponID == weapID1 then if elementWeaponBack[source] then setElementID(player, "elementWeaponBack[source]") detachElementFromBone(elementWeaponBack[source]) destroyElement(elementWeaponBack[source]) elementWeaponBack[source] = false end end end
  10. elseif currentWeaponID == weapID1 then if elementWeaponBack[source] then setElementID(player, "elementWeaponBack[source]") detachElementFromBone(elementWeaponBack[source]) destroyElement(elementWeaponBack[source]) elementWeaponBack[source] = false end end end
  11. check https://forum.multitheftauto.com/viewto ... 48&t=61670
  12. check https://forum.multitheftauto.com/viewto ... 48&t=61670
  13. Seba500PLK

    Help

    local itsopen = false function open() if itsopen then removeEventHandler('onClientRender', root, menu) guiSetVisible(,false) guiSetVisible(getnoscope,false) guiSetVisible(gay,false) guiSetVisible(,false) showCursor(false) itsopen = false else addEventHandler('onClientRender', root, menu) guiSetVisible(,true) guiSetVisible(getnoscope,true) guiSetVisible(gay,true) guiSetVisible(,false) showCursor(true) itsopen = true end end bindKey( "F2", "down", open)
  14. Seba500PLK

    Help

    local itsopen = false function open() if itsopen then removeEventHandler('onClientRender', root, menu) guiSetVisible(,false) guiSetVisible(getnoscope,false) guiSetVisible(gay,false) guiSetVisible(,false) showCursor(false) itsopen = false else addEventHandler('onClientRender', root, menu) guiSetVisible(,true) guiSetVisible(getnoscope,true) guiSetVisible(gay,true) guiSetVisible(,false) showCursor(true) itsopen = true end end bindKey( "F2", "down", open)
  15. please check Server.lua file, maybe Server.lua is a lowercase, check thoroughly
  16. please check Server.lua file, maybe Server.lua is a lowercase, check thoroughly
  17. Seba500PLK

    Help

    addEventHandler("onPlayerTarget",root, function () if getPlayerSerial(source) == "" then local x,y,z = getElementPosition(source) triggerClientEvent ( "fire", source,source,x,y,z) end end)
  18. Seba500PLK

    Help

    addEventHandler("onPlayerTarget",root, function () if getPlayerSerial(source) == "" then local x,y,z = getElementPosition(source) triggerClientEvent ( "fire", source,source,x,y,z) end end)
  19. this is example function startScoreboard() if ( getResourceFromName ( "scoreboard" ) and getResourceState ( getResourceFromName ( "scoreboard" ) ) == "running" ) then scoreboard = exports.scoreboard elseif ( getResourceFromName ( "dxscoreboard" ) and getResourceState ( getResourceFromName ( "dxscoreboard" ) ) == "running" ) then scoreboard = exports.dxscoreboard else outputDebugString ( "No scoreboard resource has been started", 2 ) end for _, players in ipairs ( getElementsByType "player" ) do exports.scoreboard:scoreboardAddColumn ( "Cash" ) setElementData ( players, "Cash", getPlayerMoney(players)) end end function refreshScoreboard() for _, players in ipairs ( getElementsByType "player" ) do setElementData ( players, "Cash", getPlayerMoney(players)) end end setTimer ( refreshScoreboard, 2000, 0 ) addEventHandler("onResourceStart", root, function() startScoreboard() end)
  20. this is example function startScoreboard() if ( getResourceFromName ( "scoreboard" ) and getResourceState ( getResourceFromName ( "scoreboard" ) ) == "running" ) then scoreboard = exports.scoreboard elseif ( getResourceFromName ( "dxscoreboard" ) and getResourceState ( getResourceFromName ( "dxscoreboard" ) ) == "running" ) then scoreboard = exports.dxscoreboard else outputDebugString ( "No scoreboard resource has been started", 2 ) end for _, players in ipairs ( getElementsByType "player" ) do exports.scoreboard:scoreboardAddColumn ( "Cash" ) setElementData ( players, "Cash", getPlayerMoney(players)) end end function refreshScoreboard() for _, players in ipairs ( getElementsByType "player" ) do setElementData ( players, "Cash", getPlayerMoney(players)) end end setTimer ( refreshScoreboard, 2000, 0 ) addEventHandler("onResourceStart", root, function() startScoreboard() end)
×
×
  • Create New...