Jump to content

TwiX!

Members
  • Posts

    905
  • Joined

  • Last visited

Everything posted by TwiX!

  1. если условие оставить только if aPlayers == 1 then тоже ничего не происходит.. может обработчик добавить?..
  2. в принципе не помню, давно уже у хоста интересовался, но если выжерживает 40-45 человек без лагов в 1.2, то чего уж там такого страшного добавили в 1.3? что при смене карты, у всех пинг сразу +1000 даже елси мало народу, от сюда тайм ауты, нетворк трабл и т.д ставил и чистый расе, тоесть всё оригинальное от раз-рабов, толку 0
  3. Проблема в версии 1.3 настраивал конфиг, всё оптимизировал, всё равно проблема осталась, в 1.2 да всё работает отлично, но покупать более мощный хост чтобы ничё не лагало? только из за ошибок разработчиков.. это бред
  4. YourItems = {{"Item1","10000$"},{"Item2","5000$"}} --например для магазина your_grid = guiCreateGridList(11,13,371,352,false,shop_tab) -- создаём грид лист your_memo = guiCreateMemo(390,196,197,115,"Please select an item for more information",false,shop_tab) -- создаём мемо for i,v in ipairs (YourItems) do -- Для все пунктов local row = guiGridListAddRow (your_grid) -- создаём ряд guiGridListSetItemText (your_grid, row, 1, v[1], false, true) -- Пишем в первый ряд надпись "Item1" guiGridListSetItemText (your_grid, row, 2, v[2], false, true) -- Пишем во 2 ряд деньги, "10000,или 5000" и т.д guiGridListSetItemColor (your_grid, row, 1, 0,255,0) -- делает 1 ряд зелёного цвета guiGridListSetItemColor (your_grid, row, 2, 255,0,0) -- 2 ряд красного end function memoInfo() local iteminfo1 = "Here your text" -- описание 1 local iteminfo2 = "BlaBlaBla" -- описание 2 if source == your_grid then -- если игрок нажал на грид лист то local selectedItem = guiGridListGetItemText(your_grid, guiGridListGetSelectedItem(your_grid), 1) -- получаем все твои созданные пункты if selectedItem == "Item1" then -- если выбран пункт 1 то guiSetText ( your_memo,iteminfo1 ) -- ставим текст в мемо "описание 1" elseif selectedItem == "Item2"-- then ещё или выбран пункт 2 guiSetText ( your_memo,iteminfo2) -- ставим текст в мемо "описание 2" else -- или если ничего не выбранно, заменяет текст на "Пожалуйста, выберите пункт для получения дополнительной информации" guiSetText ( your_memo,"Please select an item for more information") end -- закрываем строку 18 end --20 end -- саму функцию 14 addEventHandler("onClientGUIClick",getResourceRootElement(getThisResource()), memoInfo) --Обработчик для source
  5. 4 строка если живых и мёртвых игроков больше двух то.. local dPlayers = getDeadRacePlayers() local aPlayers = getAliveRacePlayers() это мёртвые/живые игроки 10 строка, если в живых отсаётся 1 игрок,(остальные умерли,) то должны сработать функции ниже.. но ничего не происходит, и ошибок тоже в дебаге нет Скрипт на гамемод расе..
  6. Сделал) Alive/Dead function getAliveRacePlayers() local alivePlayers = 0 for index,player in ipairs(getElementsByType("player")) do if getElementData(player,"state") == "alive" then alivePlayers = alivePlayers + 1 end end return alivePlayers end function getDeadRacePlayers() local deadPlayers = 0 for index,player in ipairs(getElementsByType("player")) do if getElementData(player,"state") == "dead" then deadPlayers = deadPlayers + 1 end end return deadPlayers end
  7. хочу чтобы когда на меня смотрели, ресовалась картинка но почему то не выходит.. (a*0.8 )) - Добавил пробел так как тут он ресует смайл должно быть (a*0.) -----------------Spectators local player = getLocalPlayer() setElementData ( player, "spectated", "" ) ------------------ function start () setTimer ( checkTarget, 1000, 0 ) end addEventHandler ( "onClientResourceStart", getResourceRootElement(), start ) ------------------ function checkTarget ( ) local target = getCameraTarget () local car = getPedOccupiedVehicle ( player ) if not ( car ) then car = "noCar" end if ( target ) then setElementData ( player, "spectated", target ) else setElementData ( player, "spectated", "" ) end for i,v in ipairs( getElementsByType ( "player" ) ) do if ( v ~= player ) then local vTarget = getElementData ( v, "spectated" ) if ( vTarget == car ) then setElementData ( player, "spectated", v ) end end end end ------------------ addEventHandler("onClientRender", root, function() for id, elem in pairs(playerLabel) do if guiGetVisible(elem) and string.len(guiGetText(elem)) > 4 then local x,y = guiGetPosition(elem, false ) local a = guiGetAlpha(elem) * 255 if not getKeyState("tab") then dxDrawColoredLabel(string.gsub(guiGetText(elem)," ", " #ffffff",1), 50,y,200,y+20, tocolor(255,255,255,a),{255,255,255,a}, 1, myfont, "left", "center", false,false,false) if getElementData(elem, "spectated") then dxDrawImage(2,y,16,16,"img/spec.png", 0,0,0,tocolor(255,255,255,255), false) end end if x < 100 then guiSetPosition(elem, sx+100,y,false) end end end for id, elem in pairs(posLabel) do if guiGetVisible(elem) and string.len(guiGetText(elem)) <= 4 then local x,y = guiGetPosition(elem, false ) local a = guiGetAlpha(elem) * 255 if not getKeyState("tab") then if getElementData(elem,"spectated") then dxDrawText(guiGetText(elem), 1,y+1,41,y+21, tocolor(0,0,0,math.floor(a*0.8 )), 1, myfont, "right", "center", false,false,false) dxDrawText(guiGetText(elem), 0,y,40,y+20, tocolor(255,139,0,a), 1, myfont, "right", "center", false,false,false) else dxDrawText(guiGetText(elem), 1,y+1,41,y+21, tocolor(0,0,0,math.floor(a*0.8 )), 1, myfont, "right", "center", false,false,false) dxDrawText(guiGetText(elem), 0,y,40,y+20, tocolor(255,255,255,a), 1, myfont, "right", "center", false,false,false) end end if x < 100 then guiSetPosition(elem, sx+100,y,false) end end end end ) Тут не весь код, дыбы не скомуниздили ПСЯ: ошибок нет, просто не ресует картинку Тоесть мне надо чтобы картинка была когда на тебя смотрят, когда нет убиралась
  8. just put the timer on this function, when player changed nick - start timer (10sec) if player use this command again, script told him "You cant change nick, wait 10 sec" local locktime = 0 addEventHandler('onClientPlayerChangeNick', root, function(oldNick, newNick) local locktime = getElementData(source,"LOCKTIME") if locktime == 1 then outputChatBox("You need to wait 10 seconds before use the /nick again",source,255,0,0,true) else outputChatBox('* ' .. oldNick .. ' is now known as ' .. newNick, 255, 100, 100) Lock(source) setTimer ( UnLock, get('locktime')*1000, 1 ,source) end end ) function Lock() setElementData(source,"LOCKTIME",1) end function UnLock() setElementData(source,"LOCKTIME",0) end Meta: <meta> <script src="" /> <settings> <setting name="*locktime" value="10" friendlyname="Nick Locktime" accept="true,false" group="Nick" desc="The locktime between each /nick command." /> </settings> </meta> Not testing
  9. вроде бы всё есть.. и проверка и установка стандартого цвета, не юзая панель всё равно ошибка) я тогда не знаю как ушёл думать когда я 1 ошибки нет, когда загружаю на сервер где много человек, эта фигня
  10. <setting name="*defaultvehiclecolor" value="1" friendlyname="Default Vehicle Color" accept="0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,61,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111,112,113,114,115,116,117,118,119,120,121,122,123,124,125,126" group="General Settings" desc="Set the default color for vehicles. Note, this will affect ONLY new coming players. See the colorlist in the userpanel to now each color's number." /> стоит.. ПСЯ function ClientReady(g_player) local serial = getPlayerSerial(g_player) local playername = getPlayerName(g_player) local defaultvCol = get("defaultvehiclecolor") CheckPlayer1 = executeSQLSelect ( "CarColors", "serial", "serial = '" .. serial .. "'" ) if ( type( CheckPlayer1 ) == "table" and #CheckPlayer1 == 0 ) or not CheckPlayer1 then executeSQLInsert ( "CarColors", "'"..serial.."','"..defaultvCol.."','"..defaultvCol.."','"..defaultvCol.."','"..defaultvCol.."','"..defaultvCol.."','"..defaultvCol.."'" ) end end addEvent("onClientReady",true) addEventHandler("onClientReady",getRootElement(),ClientReady)
  11. в чём проблема? function vehColor3() local serial = getPlayerSerial(source) local Col1 = executeSQLSelect ( "CarColors", "Col1","serial = '" .. serial .. "'") local Col2 = executeSQLSelect ( "CarColors", "Col2","serial = '" .. serial .. "'") local Col3 = executeSQLSelect ( "CarColors", "Col3","serial = '" .. serial .. "'") local Col4 = executeSQLSelect ( "CarColors", "Col4","serial = '" .. serial .. "'") local Col5 = executeSQLSelect ( "CarColors", "Col5","serial = '" .. serial .. "'") local Col6 = executeSQLSelect ( "CarColors", "Col6","serial = '" .. serial .. "'") setVehicleColor(PVeh,tonumber(Col1[1]["Col1"]),tonumber(Col2[1]["Col2"]),tonumber(Col3[1]["Col3"]),tonumber(Col4[1]["Col4"]),tonumber(Col5[1]["Col5"]),tonumber(Col6[1]["Col6"]) ) -- 218 CTPOKA end addEventHandler("onPlayerPickUpRacePickup",getRootElement(),vehColor3) addEventHandler("onPlayerReachCheckpoint",getRootElement(),vehColor3) function GetInfoPanel(g_player)--Kogda OTKPblBaeCIIIb Panelb, poly4aesh cvet u T.D local source = g_player local ip = getPlayerIP(source) local serial = getPlayerSerial(source) setElementData ( source ,"data.ip",ip,true) setElementData ( source ,"data.serial",serial,true) local Col1 = executeSQLSelect ( "CarColors", "Col1","serial = '" .. serial .. "'") local Col2 = executeSQLSelect ( "CarColors", "Col2","serial = '" .. serial .. "'") local Col3 = executeSQLSelect ( "CarColors", "Col3","serial = '" .. serial .. "'") local Col4 = executeSQLSelect ( "CarColors", "Col4","serial = '" .. serial .. "'") local Col5 = executeSQLSelect ( "CarColors", "Col5","serial = '" .. serial .. "'") local Col6 = executeSQLSelect ( "CarColors", "Col6","serial = '" .. serial .. "'") setElementData ( source ,"vehicle.col1",tonumber(Col1[1]["Col1"]),true) setElementData ( source ,"vehicle.col2",tonumber(Col2[1]["Col2"]),true) setElementData ( source ,"vehicle.col3",tonumber(Col3[1]["Col3"]),true) setElementData ( source ,"vehicle.col4",tonumber(Col4[1]["Col4"]),true) setElementData ( source ,"vehicle.col5",tonumber(Col5[1]["Col5"]),true) setElementData ( source ,"vehicle.col6",tonumber(Col6[1]["Col6"]),true) triggerClientEvent(source,"showGUI",source) end addEvent("showTehGUI",true) addEventHandler("showTehGUI", getRootElement(), GetInfo) Этот еррор убирается, если открыть панель, сохранить цвет, будет всё норм, кто этого не сделал, в дебаг эта ошибка
  12. learn english and dont use google translate verb and a noun, has a different translation or u can do it
  13. Типо того.. function cbinds() cLP = getLocalPlayer() local keys1 = getBoundKeys("vehicle_fire") local keys2 = getBoundKeys("vehicle_secondary_fire") if keys1 then for keyName, state in pairs(keys1) do bindKey(keyName, "down", cdoshoot) end end if keys2 then for keyName, state in pairs(keys2) do bindKey(keyName, "down", cdoshoot) end end theVehicle = getPedOccupiedVehicle(cLP) allowShoots() end function allowShoots() bindTrigger = 1 end function cdoshoot() if bindTrigger == 1 then if not isPlayerDead(cLP) then bindTrigger = 0 local x,y,z = getElementPosition(theVehicle) local rX,rY,rZ = getVehicleRotation(theVehicle) local x = x+4*math.cos(math.rad(rZ+90)) local y = y+4*math.sin(math.rad(rZ+90)) createProjectile(theVehicle, 19, x, y, z, 1.0, nil) setTimer(allowShoots, 3000, 1) end end end Можешь стрелять раз в 3 секунды
  14. https://wiki.multitheftauto.com/wiki/TriggerClientEvent EX SERVER: function FreezeS(player) setVehicleFrozen(getPedOccupiedVehicle(player), true) triggerClientEvent( "FreezeServerlol", getRootElement(), player ) end CLIENT: addEvent("FreezeServerlol", true) function FreezeC(player) outputChatBox ( "Hello! Your vehicle Frozen!", getRootElement(), player, 255, 0, 0, true ) end addEventHandler("FreezeServerlol", getRootElement(), FreezeC)
  15. чего? тебе надо доделать твой код, когда он нажал на кнопку, и получил текст из edit1 чё с ним дальше он будет делать причём здесь acl?
  16. edit1 = guiCreateEdit(214,84,190,29,"",false,tab) btn = guiCreateButton(215,128,191,30,"Create",false,tab) function Click() local getedit = guiGetText(edit1) if source == btn then --тут твой код end end addEventHandler("onClientGUIClick",getResourceRootElement(getThisResource()), Click)
  17. хватит флудить везде.. глупыми комментариями,там нет ничего сложного если понять Да ты у нас знаток скриптинга Я смотрю. Я не флужу а просто высказываю своё мнение и/или задаю вопросы. ну да ну да где я написал что я знаток скриптинка? снеба взял?
  18. Тебе всё показали, тебе почти доделали его, ты уже требуешь чтобы полностью сделали за тебя скрипт, флудишь во всех темах как я не раз говорил, этот раздел "помощь" а не "сделай мне" , ссылки ты кидать не можешь, так как не юзаешь вики нужно учиться, а не ждать чего-то от кого-то, и сделать самому
×
×
  • Create New...