Jump to content

#TeKa

Members
  • Posts

    199
  • Joined

  • Last visited

Everything posted by #TeKa

  1. انا لا اري اي مساعدا i not see any help
  2. http://up.top4top.net/downloadf-116bjyp1-zip.html خد جربو وشوف ايه المشكلة و ارفعو و اعطهوني
  3. دلوقتي اشتغل بس الصوت بردو ما يشتغل اول لما اضغط tab شوف الاكواد local anzar = createMarker (-711,957,12.382266998291, "cylinder", 1.5, 200,100,100,150) createBlipAttachedTo(anzar,56) --- bindKey ("tab","down",function () if isElementWithinMarker(localPlayer, anzar ) then playSound("anzaar.mp3") end end)
  4. شوف مو شغال ما ظبط شوف يقول لي في الدي بق ERROR: Loading script failed: markersound/client.lua:13: ')' expected (to close '(' at line 5) near ''
  5. ما ظبط شوف local anzar = createMarker (-711,957,12.382266998291, "cylinder", 1.5, 200,100,100,150) createBlipAttachedTo(anzar,56) --EventBinding addEventHandler ("onMarkerHit",root, bindKey ("tab","down", function () if isElementWithinMarker(localPlayer, anzar ) then playSound("anzaar.mp3") end end)
  6. السلام عليكم سويت ماركر ان لما يدخلو يضغط TAB تشتغل اغنية المهم انا جربتو الماركر اشتغل بس لما ادخل و ادوس TAB ما يشتغل الاغنية الاكواد local anzar = createMarker (-711,957,12.382266998291, "cylinder", 1.5, 200,100,100,150) createBlipAttachedTo(anzar,56) --EventBinding addEventHandler ("onMarkerHit",anzar, function () bindKey ("tab","down") PlaySound("anzaar.mp3",true) end)
  7. يا اخوي شوف انا رفعت المود صلحو و اعطهوني http://up.top4top.net/downloadf-113t32o1-zip.html
  8. بردو ما نفعت الاكواد addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end setAccountData(vAcc,'Weapon',getPlayerWeapon(source)) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local v_Data = getAccountData(acc,'Weapon') if ( v_Data ) then getPlayerWeapon(source,v_Data) end end) --savemoney function playerLogin (thePreviousAccount, theCurrentAccount, autoLogin) if not (isGuestAccount (getPlayerAccount(source))) then local accountData = getAccountData (theCurrentAccount, "money") if (accountData) then local playerMoney = getAccountData(theCurrentAccount, "money") setPlayerMoney(source, playerMoney) else setPlayerMoney(source, 500) end end end addEventHandler("onPlayerLogin", getRootElement(), playerLogin) function onQuit() if not (isGuestAccount (getPlayerAccount (source))) then account = getPlayerAccount (source) if (account) then setAccountData(account,"money", tostring(getPlayerMoney(source))) end end end addEventHandler("onPlayerQuit", getRootElement(), onQuit) -----saveArmour addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end setAccountData(vAcc,'Armor',getPedArmor(source)) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local v_Data = getAccountData(acc,'Armor') if ( v_Data ) then setPedArmor(source,vData) end end ) --------------------------------------------savehealth---------------------------------- addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end setAccountData(vAcc,'HP',getElementHealth(source)) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local v_Data = getAccountData(acc,'HP') if ( v_Data ) then setPedArmor(source,vData) end end ) -----حفظ المكان ---------------------------------------savepostitioncj------------------------------------- addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end local x,y,z = getElementPosition(source) setAccountData(vAcc,'Position_x',x) setAccountData(vAcc,'Position_y',y) setAccountData(vAcc,'Position_z',z) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local x_Data = getAccountData(acc,'Position_x') local y_Data = getAccountData(acc,'Position_y') local z_Data = getAccountData(acc,'Position_z') setElementPosition(source,x_Data,y_Data,z_Data) end )
  9. شوف الا ن و ايش يجي ERROR: Loading script failed: saveweapon/server.lua:1: unecpected symbol near '
  10. ما ظبطط بردو بس جالي في الدي بق الان ERROR: Loading script failed: saveweapon/server.lua:12 ')' expected (to close '(' at line 10) near 'end'
  11. ما نفعت بردو نفس الي يقولو في الدي بق
  12. كذا كود بس ما بيشتغلو هو فيهم كل السيفات بس ياريت تصحيح بيجي في ال debugscript 3 ERROR: Loading script failed: saveweapon/server.lua:11: ')' expected (to close '(' atline 9) near 'end' serverside --saveweapon addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end setAccountData(vAcc,'Weapon',getPlayerWeapon(source) end end ) addEventHandler('onPlayerLogin',root, function(_,acc) local v_Data = getAccountData(acc,'Weapon') if ( v_Data ) then getPlayerWeapon(source,v_Data) end) --savemoney function playerLogin (thePreviousAccount, theCurrentAccount, autoLogin) if not (isGuestAccount (getPlayerAccount(source))) then local accountData = getAccountData (theCurrentAccount, "money") if (accountData) then local playerMoney = getAccountData(theCurrentAccount, "money") setPlayerMoney(source, playerMoney) else setPlayerMoney(source, 500) end end end addEventHandler("onPlayerLogin", getRootElement(), playerLogin) function onQuit() if not (isGuestAccount (getPlayerAccount (source))) then account = getPlayerAccount (source) if (account) then setAccountData(account,"money", tostring(getPlayerMoney(source))) end end end addEventHandler("onPlayerQuit", getRootElement(), onQuit) -----saveArmour addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end setAccountData(vAcc,'Armor',getPedArmor(source)) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local v_Data = getAccountData(acc,'Armor') if ( v_Data ) then setPedArmor(source,vData) end end ) --------------------------------------------savehealth---------------------------------- addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end setAccountData(vAcc,'HP',getElementHealth(source)) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local v_Data = getAccountData(acc,'HP') if ( v_Data ) then setPedArmor(source,vData) end end ) -----حفظ المكان ---------------------------------------savepostitioncj------------------------------------- addEventHandler('onPlayerQuit',root, function() local vAcc = getPlayerAccount(source) if not vAcc or isGuestAccount(vAcc) then return end local x,y,z = getElementPosition(source) setAccountData(vAcc,'Position_x',x) setAccountData(vAcc,'Position_y',y) setAccountData(vAcc,'Position_z',z) end ) addEventHandler('onPlayerLogin',root, function(_,acc) local x_Data = getAccountData(acc,'Position_x') local y_Data = getAccountData(acc,'Position_y') local z_Data = getAccountData(acc,'Position_z') setElementPosition(source,x_Data,y_Data,z_Data) end )
  13. يا جماعه انا عاوز حل مش كل واحد يجي يكلم و خلاص انا كاتب حل مش تتعرفو ع نفسكم في الموضوع
  14. اول شييء انا عملت مود تغير لون الاسم المفروض الكود 100% شغال بس المشكله بيجلي في debugscript ERROR: Loading script failed: nametag/server.lua:6: unexpected symbol near ERROR: Loading script failed: nametag/client.lua:2 '=' expected near 'guiWindowSetSizable' حل سريع ارجوكم server side addEventHandler( 'onClientGUIClick', root, function() if (source == theNametagShopWindowAcceptButton) then if (tonumber(guiGetText (theNametagShopWindowRedEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowGreenEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowBlueEdit)) ~= nil) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) triggerServerEvent ("gameMenuButtonClick",getLocalPlayer(),"nametagShopAccept",tonumber(guiGetText (theNametagShopWindowRedEdit)),tonumber(guiGetText (theNametagShopWindowGreenEdit)),tonumber(guiGetText (theNametagShopWindowBlueEdit))) end elseif (source == theNametagShopWindowCloseButton) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) elseif (buttonname == "theNametagShopWindowAcceptButton") then if (getPlayerMoney (source) > 2499) then local charactername = getPlayerNametagText (source) local accountName = getAccountName(getPlayerAccount(source)) local characterindex = getCharacterIndexByCharacterName (accountName,charactername) local playerRoot = xmlFindChild (root,"player",findPlayerIndexByName (tostring(accountName))) local characterRoot = xmlNodeGetChildren (playerRoot,tonumber(characterindex)-1) if (characterRoot) then setPlayerNametagColor (source,tonumber(arg1),tonumber(arg2),tonumber(arg3)) triggerClientEvent ("lolmodOpenInfoWindow",source,"Nametag color succesfully bought!") xmlNodeSetAttribute (characterRoot,"cr",tonumber(arg1)) xmlNodeSetAttribute (characterRoot,"cg",tonumber(arg2)) xmlNodeSetAttribute (characterRoot,"cb",tonumber(arg3)) xmlSaveFile (root) takePlayerMoney (source,1250) end end end ) client side GUIEditor = { edit = {}, button = {}, label = {}, window = {}, } addEventHandler ("onClientResourceStart",getResourceRootElement(), function() theNametagShopWindow = guiCreateWindow(0.0575,0.2917,0.1963,0.375,"Nametag Shop",true) guiWindowSetSizable(GUIEditor.window[1], false) theNametagShopWindowRedLabel = guiCreateLabel(0.051,0.1333,0.535,0.0933,"Red",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowRedLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowRedLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowRedLabel,"left",false) theNametagShopWindowGreenLabel = guiCreateLabel(0.051,0.24,0.5096,0.1022,"Green",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowGreenLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowGreenLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowGreenLabel,"left",false) theNametagShopWindowBlueLabel = guiCreateLabel(0.051,0.3511,0.5414,0.0978,"Blue",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowBlueLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowBlueLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowBlueLabel,"left",false) theNametagShopWindowRedEdit = guiCreateEdit(0.6306,0.12,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowGreenEdit = guiCreateEdit(0.6306,0.2222,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowBlueEdit = guiCreateEdit(0.6306,0.3244,0.293,0.1022,"255",true,theNametagShopWindow) guiEditSetMaxLength (theNametagShopWindowRedEdit,3) guiEditSetMaxLength (theNametagShopWindowGreenEdit,3) guiEditSetMaxLength (theNametagShopWindowBlueEdit,3) theNametagShopWindowExampleTextLabel = guiCreateLabel(0.0573,0.4578,0.879,0.12,"Example Text",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowExampleTextLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowExampleTextLabel,"center") guiLabelSetHorizontalAlign(theNametagShopWindowExampleTextLabel,"center",false) theNametagShopWindowAcceptButton = guiCreateButton(0.0573,0.6089,0.8726,0.2089,"Buy Nametag\n1250$",true,theNametagShopWindow) theNametagShopWindowCloseButton = guiCreateButton(0.0573,0.8356,0.8854,0.12,"Close",true,theNametagShopWindow) nametagshopMarker = createMarker (-1951.66,642.98,45.5625,"cylinder",2,0,255,255,127) createBlipAttachedTo(nametagshopMarker,30) ---------- ----marker addEventHandler ("onClientMarkerHit",getRootElement(), function(hitElement,matchingDimension) if (getElementType (hitElement) == "player") and (hitElement == getLocalPlayer()) then if (source == nametagshopMarker) then showCursor (true,true) guiSetVisible (theNametagShopWindow,true) end end end ) ثاني مود شغال و كل شييء بس لما اجي اشتري سلاح ما يشتغل هو محل اسلحة حصري و جديد ساعدوني بجي اشتري سلاح ما يشتري client side addEventHandler ("onClientResourceStart",getResourceRootElement(), function() sx,sy = guiGetScreenSize () ammunation_Window = {} ammunation_Button = {} ammunation_Grid = {} ammunation_Image = {} weapons = {{1,"Brass Knuckles",1,25},{2,"Golf club",1,50},{3,"Nightstick",1,50},{5,"Baseball Bat",1,50}, {6,"Shovel",1,50},{7,"Pool cue",1,50},{8,"Katana",1,1000},{9,"Chainsaw",1,1000}, {10,"Purple dildo",1,10},{11,"Short Dildo",1,5},{12,"Viberator",1,15},{13,"Flowers",1,10}, {15,"Cane",1,50},{16,"Grenade",3,2500},{17,"Tear Gas",3,2000},{18,"Molotov Cocktail",3,2000}, {39,"Satchel Charges",3,2500},{22,"Pistol",34,100},{24,"Desert Eagle",14,100},{25,"Shotgun",10,175}, {26,"Sawn-Off Shotgun",10,200},{27,"Spas-12",14,250},{28,"Uzi",100,160},{29,"MP5",60,200},{32,"Tec-9",100,120}, {30,"AK-47",30,200},{31,"M4",50,500},{33,"Country Rifle",10,100},{34,"Sniper Rifle",10,200}, --[[{35,"Rocket Launcher",1,7500},]]{37,"Flamethrower",50,500},{41,"Spraycan",500,25}, {42,"Fire Extinguisher",42,500,100},{43,"Camera",36,50},{44,"Night vision goggles",1,10}, {45,"Infrared goggles",1,10},{46,"Parachute",1,25}} ammunation_Window[1] = guiCreateWindow(sx*.5-200,sy*.5-167,399,334,"Ammu Nation",false) guiSetVisible (ammunation_Window[1],false) guiWindowSetSizable (ammunation_Window[1],false) ammunation_Grid[1] = guiCreateGridList(11,28,203,294,false,ammunation_Window[1]) guiGridListAddColumn(ammunation_Grid[1],"Weapon",0.55) guiGridListAddColumn(ammunation_Grid[1],"Ammo",0.10) guiGridListAddColumn(ammunation_Grid[1],"Price",0.15) for i,v in pairs (weapons) do local row = guiGridListAddRow (ammunation_Grid[1]) guiGridListSetItemText (ammunation_Grid[1],row,1,v[2],false,false) guiGridListSetItemText (ammunation_Grid[1],row,2,tostring(v[3]),false,true) guiGridListSetItemText (ammunation_Grid[1],row,3,tostring(v[4]) .. "$",false,true) end ammunation_Button[1] = guiCreateButton(220,29,165,37,"Buy weapon",false,ammunation_Window[1]) ammunation_Button[2] = guiCreateButton(220,70,165,37,"Close window",false,ammunation_Window[1]) ammunation_Image[1] = guiCreateStaticImage(220,113,165,209,"ammu.png",false,ammunation_Window[1]) ammunationmarkerpos = {{295.45,-38.21,1000.6,1},{295.56,-80.6,1000.6,4},{312.037,-165.84,998.7,6},{314.01,-133.72,998.7,7},{290.27,-109.57,1000.61,6}} for i,v in pairs (ammunationmarkerpos) do for j=1,12 do local marker = createMarker (295.7265625,-79.8408203125,1000.515625,"cylinder",1,255,0,150) setElementDimension( marker, 0) setElementInterior( marker , 4 ) setElementData(marker,"ammunation",j) end end end) addEventHandler ("onClientGUIClick",getRootElement(), function(button) if button == "left" then if source == ammunation_Button[1] then local r,c = guiGridListGetSelectedItem (ammunation_Grid[1]) if r then local weapon = guiGridListGetItemText (ammunation_Grid[1],r,1) local tableid = nil local weaopnid = nil for i,v in pairs (weapons) do if weapon == v[2] then weaponid = v[1] tableid = i break end end if tableid then local ammo = weapons[tableid][3] local price = weapons[tableid][4] triggerServerEvent ("ammunationBuy",getLocalPlayer(),weaponid,weapon,ammo,price) else exports.js_infowindow:showInfoWindow("You have to select a weapon first!") end else exports.js_infowindow:showInfoWindow("You have to select a weapon first!") end elseif source == ammunation_Button[2] then guiSetVisible (ammunation_Window[1],false) showCursor (false,false) end end end) addEventHandler ("onClientMarkerHit",getRootElement(), function(hitElement,dimension) if hitElement == getLocalPlayer() and dimension then if getElementData (source,"ammunation") then guiSetVisible (ammunation_Window[1],true) showCursor (true,true) end end end) server side ----event2 addEvent("ammunationBuy",root, addEventHandler("ammunationBuy",getRootElement(), function () local r,c = guiGridListGetSelectedItem (ammunation_Grid[1]) if r then local weaponName = guiGridListGetItemText (ammunation_Grid[1],r,1) local weaponTable = findWeaponbyAmmuNationName (weaponName) if (weaponTable) then local weaponName = arg1 local weaponAmmo = arg2 local weaponCost = arg3 local weaponID = arg4 if (getPlayerMoney(source) >= tonumber(weaponCost)) then giveWeapon (source,tonumber(weaponID),tonumber(weaponAmmo),true) takePlayerMoney (source,tonumber(weaponCost)) outputChatBox("Succesfully bought/nWeapon:/n " ..weaponName.. "/n " .. weaponAmmo.. "ammo/n" ..weaponCost .."$/nCome back later.",getRootElement(),255,0,255) else outputChatBox("Poor guy :<\nYou are too poor to buy this weapon!",getRootElement(),255,0,255) end end) حل للمودين سريععععع
  15. ايه الخطاء فيها Server-only function مش شغال شوف بيجيلي ايه دلوقتي بعد لما ضفة السيرفر debugserver ERROR: Loading script failed: nametag/server.lua:6: unexpected symbol near ' debugclient ERROR: Loading script failed: nametag/client.lua:2 '=' expected near 'guiWindowSetSizable' server side addEventHandler( 'onClientGUIClick', root, function() if (source == theNametagShopWindowAcceptButton) then if (tonumber(guiGetText (theNametagShopWindowRedEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowGreenEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowBlueEdit)) ~= nil) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) triggerServerEvent ("gameMenuButtonClick",getLocalPlayer(),"nametagShopAccept",tonumber(guiGetText (theNametagShopWindowRedEdit)),tonumber(guiGetText (theNametagShopWindowGreenEdit)),tonumber(guiGetText (theNametagShopWindowBlueEdit))) end elseif (source == theNametagShopWindowCloseButton) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) elseif (buttonname == "theNametagShopWindowAcceptButton") then if (getPlayerMoney (source) > 2499) then local charactername = getPlayerNametagText (source) local accountName = getAccountName(getPlayerAccount(source)) local characterindex = getCharacterIndexByCharacterName (accountName,charactername) local playerRoot = xmlFindChild (root,"player",findPlayerIndexByName (tostring(accountName))) local characterRoot = xmlNodeGetChildren (playerRoot,tonumber(characterindex)-1) if (characterRoot) then setPlayerNametagColor (source,tonumber(arg1),tonumber(arg2),tonumber(arg3)) triggerClientEvent ("lolmodOpenInfoWindow",source,"Nametag color succesfully bought!") xmlNodeSetAttribute (characterRoot,"cr",tonumber(arg1)) xmlNodeSetAttribute (characterRoot,"cg",tonumber(arg2)) xmlNodeSetAttribute (characterRoot,"cb",tonumber(arg3)) xmlSaveFile (root) takePlayerMoney (source,1250) end end end ) client side theNametagShopWindow = guiCreateWindow(0.0575,0.2917,0.1963,0.375,"Nametag Shop",true) guiWindowSetSizable(theNametagShopWindow, false) theNametagShopWindowRedLabel = guiCreateLabel(0.051,0.1333,0.535,0.0933,"Red",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowRedLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowRedLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowRedLabel,"left",false) theNametagShopWindowGreenLabel = guiCreateLabel(0.051,0.24,0.5096,0.1022,"Green",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowGreenLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowGreenLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowGreenLabel,"left",false) theNametagShopWindowBlueLabel = guiCreateLabel(0.051,0.3511,0.5414,0.0978,"Blue",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowBlueLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowBlueLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowBlueLabel,"left",false) theNametagShopWindowRedEdit = guiCreateEdit(0.6306,0.12,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowGreenEdit = guiCreateEdit(0.6306,0.2222,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowBlueEdit = guiCreateEdit(0.6306,0.3244,0.293,0.1022,"255",true,theNametagShopWindow) guiEditSetMaxLength (theNametagShopWindowRedEdit,3) guiEditSetMaxLength (theNametagShopWindowGreenEdit,3) guiEditSetMaxLength (theNametagShopWindowBlueEdit,3) theNametagShopWindowExampleTextLabel = guiCreateLabel(0.0573,0.4578,0.879,0.12,"Example Text",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowExampleTextLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowExampleTextLabel,"center") guiLabelSetHorizontalAlign(theNametagShopWindowExampleTextLabel,"center",false) theNametagShopWindowAcceptButton = guiCreateButton(0.0573,0.6089,0.8726,0.2089,"Buy Nametag\n1250$",true,theNametagShopWindow) theNametagShopWindowCloseButton = guiCreateButton(0.0573,0.8356,0.8854,0.12,"Close",true,theNametagShopWindow) guiSetVisible(theNametagShopWindow,false) nametagshopMarker = createMarker (-1951.66,642.98,45.5625,"cylinder",2,0,255,255,127) ---------- addEventHandler ("onClientMarkerHit",getRootElement(), function(hitElement,matchingDimension) if (getElementType (hitElement) == "player") and (hitElement == getLocalPlayer()) then if (source == nametagshopMarker) then showCursor (true,true) guiSetVisible (theNametagShopWindow,true) end end end )
  16. شوفو بيطعلي ايه في debugscript ERROR: Loading script failed: nametag/client.lua:3: '=' expected near 'guiWindowSetSizable'
  17. طيب شوف عدلت شييء theNametagShopWindow = guiCreateWindow(0.0575,0.2917,0.1963,0.375,"Nametag Shop",true) guiWindowSetSizable(theNametagShopWindow, false) theNametagShopWindowRedLabel = guiCreateLabel(0.051,0.1333,0.535,0.0933,"Red",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowRedLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowRedLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowRedLabel,"left",false) theNametagShopWindowGreenLabel = guiCreateLabel(0.051,0.24,0.5096,0.1022,"Green",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowGreenLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowGreenLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowGreenLabel,"left",false) theNametagShopWindowBlueLabel = guiCreateLabel(0.051,0.3511,0.5414,0.0978,"Blue",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowBlueLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowBlueLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowBlueLabel,"left",false) theNametagShopWindowRedEdit = guiCreateEdit(0.6306,0.12,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowGreenEdit = guiCreateEdit(0.6306,0.2222,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowBlueEdit = guiCreateEdit(0.6306,0.3244,0.293,0.1022,"255",true,theNametagShopWindow) guiEditSetMaxLength (theNametagShopWindowRedEdit,3) guiEditSetMaxLength (theNametagShopWindowGreenEdit,3) guiEditSetMaxLength (theNametagShopWindowBlueEdit,3) theNametagShopWindowExampleTextLabel = guiCreateLabel(0.0573,0.4578,0.879,0.12,"Example Text",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowExampleTextLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowExampleTextLabel,"center") guiLabelSetHorizontalAlign(theNametagShopWindowExampleTextLabel,"center",false) theNametagShopWindowAcceptButton = guiCreateButton(0.0573,0.6089,0.8726,0.2089,"Buy Nametag\n1250$",true,theNametagShopWindow) theNametagShopWindowCloseButton = guiCreateButton(0.0573,0.8356,0.8854,0.12,"Close",true,theNametagShopWindow) guiSetVisible(theNametagShopWindow,false) nametagshopMarker = createMarker (-1951.66,642.98,45.5625,"cylinder",2,0,255,255,127) ------- addEventHandler( 'onClientGUIClick', root, function() if (source == theNametagShopWindowAcceptButton) then if (tonumber(guiGetText (theNametagShopWindowRedEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowGreenEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowBlueEdit)) ~= nil) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) triggerServerEvent ("gameMenuButtonClick",getLocalPlayer(),"nametagShopAccept",tonumber(guiGetText (theNametagShopWindowRedEdit)),tonumber(guiGetText (theNametagShopWindowGreenEdit)),tonumber(guiGetText (theNametagShopWindowBlueEdit))) end elseif (source == theNametagShopWindowCloseButton) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) elseif (buttonname == "theNametagShopWindowAcceptButton") then if (getPlayerMoney (source) > 2499) then local charactername = getPlayerNametagText (source) local accountName = getAccountName(getPlayerAccount(source)) local characterindex = getCharacterIndexByCharacterName (accountName,charactername) local playerRoot = xmlFindChild (root,"player",findPlayerIndexByName (tostring(accountName))) local characterRoot = xmlNodeGetChildren (playerRoot,tonumber(characterindex)-1) if (characterRoot) then setPlayerNametagColor (source,tonumber(arg1),tonumber(arg2),tonumber(arg3)) triggerClientEvent ("lolmodOpenInfoWindow",source,"Nametag color succesfully bought!") xmlNodeSetAttribute (characterRoot,"cr",tonumber(arg1)) xmlNodeSetAttribute (characterRoot,"cg",tonumber(arg2)) xmlNodeSetAttribute (characterRoot,"cb",tonumber(arg3)) xmlSaveFile (root) takePlayerMoney (source,1250) end end end end ) ---------- addEventHandler ("onClientMarkerHit",getRootElement(), function(hitElement,matchingDimension) if (getElementType (hitElement) == "player") and (hitElement == getLocalPlayer()) then if (source == nametagshopMarker) then showCursor (true,true) guiSetVisible (theNametagShopWindow,true) end end end )
  18. اختصار مو مهم اني احطهم في ال Server هو شغل بس يجيلي كلام في دي بق اقراء فوق و تعرف
  19. و مش شغاله معايا ليه ارفعها و اعطيني الرابط
  20. theNametagShopWindow = guiCreateWindow(0.0575,0.2917,0.1963,0.375,"Nametag Shop",true) guiWindowSetSizable(theNametagShopWindow,false) theNametagShopWindowRedLabel = guiCreateLabel(0.051,0.1333,0.535,0.0933,"Red",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowRedLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowRedLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowRedLabel,"left",false) theNametagShopWindowGreenLabel = guiCreateLabel(0.051,0.24,0.5096,0.1022,"Green",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowGreenLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowGreenLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowGreenLabel,"left",false) theNametagShopWindowBlueLabel = guiCreateLabel(0.051,0.3511,0.5414,0.0978,"Blue",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowBlueLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowBlueLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowBlueLabel,"left",false) theNametagShopWindowRedEdit = guiCreateEdit(0.6306,0.12,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowGreenEdit = guiCreateEdit(0.6306,0.2222,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowBlueEdit = guiCreateEdit(0.6306,0.3244,0.293,0.1022,"255",true,theNametagShopWindow) guiEditSetMaxLength (theNametagShopWindowRedEdit,3) guiEditSetMaxLength (theNametagShopWindowGreenEdit,3) guiEditSetMaxLength (theNametagShopWindowBlueEdit,3) theNametagShopWindowExampleTextLabel = guiCreateLabel(0.0573,0.4578,0.879,0.12,"Example Text",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowExampleTextLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowExampleTextLabel,"center") guiLabelSetHorizontalAlign(theNametagShopWindowExampleTextLabel,"center",false) theNametagShopWindowAcceptButton = guiCreateButton(0.0573,0.6089,0.8726,0.2089,"Buy Nametag\n1250$",true,theNametagShopWindow) theNametagShopWindowCloseButton = guiCreateButton(0.0573,0.8356,0.8854,0.12,"Close",true,theNametagShopWindow) guiSetVisible(theNametagShopWindow,false) nametagshopMarker = createMarker (-1951.66,642.98,45.5625,"cylinder",2,0,255,255,127) ------- addEventHandler( 'onClientGUIClick', root, function() if (source == theNametagShopWindowAcceptButton) then if (tonumber(guiGetText (theNametagShopWindowRedEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowGreenEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowBlueEdit)) ~= nil) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) triggerServerEvent ("gameMenuButtonClick",getLocalPlayer(),"nametagShopAccept",tonumber(guiGetText (theNametagShopWindowRedEdit)),tonumber(guiGetText (theNametagShopWindowGreenEdit)),tonumber(guiGetText (theNametagShopWindowBlueEdit))) end elseif (source == theNametagShopWindowCloseButton) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) elseif (buttonname == "theNametagShopWindowAcceptButton") then if (getPlayerMoney (source) > 2499) then local charactername = getPlayerNametagText (source) local accountName = getAccountName(getPlayerAccount(source)) local characterindex = getCharacterIndexByCharacterName (accountName,charactername) local playerRoot = xmlFindChild (root,"player",findPlayerIndexByName (tostring(accountName))) local characterRoot = xmlNodeGetChildren (playerRoot,tonumber(characterindex)-1) if (characterRoot) then setPlayerNametagColor (source,tonumber(arg1),tonumber(arg2),tonumber(arg3)) triggerClientEvent ("lolmodOpenInfoWindow",source,"Nametag color succesfully bought!") xmlNodeSetAttribute (characterRoot,"cr",tonumber(arg1)) xmlNodeSetAttribute (characterRoot,"cg",tonumber(arg2)) xmlNodeSetAttribute (characterRoot,"cb",tonumber(arg3)) xmlSaveFile (root) takePlayerMoney (source,1250) end end end end ) ---------- addEventHandler ("onClientMarkerHit",getRootElement(), function(hitElement,matchingDimension) if (getElementType (hitElement) == "player") and (hitElement == getLocalPlayer()) then if (source == nametagshopMarker) then showCursor (true,true) guiSetVisible (theNametagShopWindow,true) end end end ) ما نفعت يقلي ERROR: Loading script failed: nametag/client.lua:2 '=' expected near 'guiWindowSetSizable'
  21. السلام عليكم انا عملت مود تغير اللون الاسم بس ما يشتغل يطلعلي في debugscript 3 ERROR: Loading script failed: nametag/client.lua:29:'' expected near 'end' الكود client side theNametagShopWindow = guiCreateWindow(0.0575,0.2917,0.1963,0.375,"Nametag Shop",true) guiWindowSetSizable(theNametagShopWindow,false) theNametagShopWindowRedLabel = guiCreateLabel(0.051,0.1333,0.535,0.0933,"Red",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowRedLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowRedLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowRedLabel,"left",false) theNametagShopWindowGreenLabel = guiCreateLabel(0.051,0.24,0.5096,0.1022,"Green",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowGreenLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowGreenLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowGreenLabel,"left",false) theNametagShopWindowBlueLabel = guiCreateLabel(0.051,0.3511,0.5414,0.0978,"Blue",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowBlueLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowBlueLabel,"top") guiLabelSetHorizontalAlign(theNametagShopWindowBlueLabel,"left",false) theNametagShopWindowRedEdit = guiCreateEdit(0.6306,0.12,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowGreenEdit = guiCreateEdit(0.6306,0.2222,0.293,0.1022,"255",true,theNametagShopWindow) theNametagShopWindowBlueEdit = guiCreateEdit(0.6306,0.3244,0.293,0.1022,"255",true,theNametagShopWindow) guiEditSetMaxLength (theNametagShopWindowRedEdit,3) guiEditSetMaxLength (theNametagShopWindowGreenEdit,3) guiEditSetMaxLength (theNametagShopWindowBlueEdit,3) theNametagShopWindowExampleTextLabel = guiCreateLabel(0.0573,0.4578,0.879,0.12,"Example Text",true,theNametagShopWindow) guiLabelSetColor(theNametagShopWindowExampleTextLabel,255,255,255) guiLabelSetVerticalAlign(theNametagShopWindowExampleTextLabel,"center") guiLabelSetHorizontalAlign(theNametagShopWindowExampleTextLabel,"center",false) theNametagShopWindowAcceptButton = guiCreateButton(0.0573,0.6089,0.8726,0.2089,"Buy Nametag\n1250$",true,theNametagShopWindow) theNametagShopWindowCloseButton = guiCreateButton(0.0573,0.8356,0.8854,0.12,"Close",true,theNametagShopWindow) guiSetVisible(theNametagShopWindow,false) end ) nametagshopMarker = createMarker (-1951.66,642.98,45.5625,"cylinder",2,0,255,255,127) ------- elseif (source == theNametagShopWindowAcceptButton) then if (tonumber(guiGetText (theNametagShopWindowRedEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowGreenEdit)) ~= nil) and (tonumber(guiGetText (theNametagShopWindowBlueEdit)) ~= nil) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) triggerServerEvent ("gameMenuButtonClick",getLocalPlayer(),"nametagShopAccept",tonumber(guiGetText (theNametagShopWindowRedEdit)),tonumber(guiGetText (theNametagShopWindowGreenEdit)),tonumber(guiGetText (theNametagShopWindowBlueEdit))) end elseif (source == theNametagShopWindowCloseButton) then guiSetVisible (theNametagShopWindow,false) showCursor (false,false) end ------ elseif (buttonname == "theNametagShopWindowAcceptButton") then if (getPlayerMoney (source) > 2499) then local charactername = getPlayerNametagText (source) local accountName = getAccountName(getPlayerAccount(source)) local characterindex = getCharacterIndexByCharacterName (accountName,charactername) local playerRoot = xmlFindChild (root,"player",findPlayerIndexByName (tostring(accountName))) local characterRoot = xmlNodeGetChildren (playerRoot,tonumber(characterindex)-1) if (characterRoot) then setPlayerNametagColor (source,tonumber(arg1),tonumber(arg2),tonumber(arg3)) triggerClientEvent ("lolmodOpenInfoWindow",source,"Nametag color succesfully bought!") xmlNodeSetAttribute (characterRoot,"cr",tonumber(arg1)) xmlNodeSetAttribute (characterRoot,"cg",tonumber(arg2)) xmlNodeSetAttribute (characterRoot,"cb",tonumber(arg3)) xmlSaveFile (root) takePlayerMoney (source,1250) end end end) ---------- addEventHandler ("onClientMarkerHit",getRootElement(), function(hitElement,matchingDimension) if (getElementType (hitElement) == "player") and (hitElement == getLocalPlayer()) then if (source == nametagshopMarker) then showCursor (true,true) guiSetVisible (theNametagShopWindow,true) end end)
  22. ياريت انك تخلي بدل ال No Team تخليها Normal و ال Police Officer عشان بعض الناس بيخلهلوها كدا عموما بالتوفيق لك
  23. شوف هكذا addEventHandler ("nameChangeName"),root addEvent ("nameChangeName"),root setAccountName = function ( plr, old, new ) if old and new then local oldAccount, newAccount, newPass = getAccount ( old ), getAccount ( new ), "mta"..math.random(10000,100000) if oldAccount and not newAccount then if addAccount ( new, newPass ) then local newAccount = getAccount ( new ) local player = getAccountPlayer ( oldAccount ) for index, value in pairs ( getAllAccountData ( oldAccount ) ) do setAccountData ( newAccount, index, value ) end for index, value in ipairs ( aclGroupList ( ) ) do if isObjectInACLGroup ( "user."..old, value ) then aclGroupAddObject ( value, "user."..new ) aclGroupRemoveObject ( value, "user."..old ) end end if player then logOut ( player ) logIn ( player, newAccount, newPass ) if plr == player then outputChatBox ( "* Your new account and password: [ "..new.." ] [ "..newPass.." ].", player, 255, 255, 0, true ) else outputChatBox ( "* Your new account and password: [ "..new.." ] [ "..newPass.." ].", player, 255, 255, 0, true ) outputChatBox ( "* New account and password: [ "..new.." ] [ "..newPass.." ].", plr, 255, 255, 0, true ) end else outputChatBox ( "* New account and password: [ "..new.." ] [ "..newPass.." ].", plr, 255, 255, 0, true ) end setTimer ( removeAccount, 100, 1, oldAccount ) return true end end end return false end end addEventHandler ( "onClientGUIClick", root, function () if source == GUIEditor_Button[5] then function ( player, _, old, new ) setAccountName ( player, old, new ) end )
×
×
  • Create New...