Korish0074

Там в клео скрипте для гта есть некоторые понятные функции {$CLEO} 0A95: enable_thread_saving 014B: 9@ = init_parked_car_generator 601 1 1 0 alarm 0 door_lock 0 1 40000 at -1968.4062 100.8711 27.6875 angle 90.0 014C: set_parked_car_generator 9@ cars_to_generate_to 101 while true wait 0 if player.Defined($player_char) then if 856E: not car 30@ defined then if 03CA: object 31@ exists then object.Destroy(31@) end if 00EC: actor $PLAYER_ACTOR 0 near_point -1968.4062 100.8711 radius 200.0 200.0 then 073E: get_car_in_sphere -1968.4062 100.8711 26.6875 radius 10.0 model 601 handle_as 30@ end else if 83CA: not object 31@ exists then model.Load(362) repeat wait 0 until model.Available(362) object.Create(31@ 362 0.0 0.0 -100.0) model.Destroy(362) if and 056E: car 30@ defined 03CA: object 31@ exists then 0681: attach_object 31@ to_car 30@ with_offset 0.3 0.0 2.0 rotation 0.0 30.0 94.0 car.SetImmunities(30@ 1 1 1 1 1) 053F: set_car 30@ tires_vulnerability 0 end else if 056E: car 30@ defined then if actor.InCar($PLAYER_ACTOR 30@) then if 0AB0: key_pressed 219 // [ button - lock doors then 020A: set_car 30@ door_status_to 2 end if 82BF: not car 30@ sunk then 068D: get_camera_position_to 0@ 1@ 2@ 068E: get_camera_target_point_to 3@ 4@ 5@ 0174: 17@ = car 30@ Z_angle //-----------------------------------------------------------вычисляем угол по X 050A: 6@ = distance_between_XYZ 0@ 1@ 2@ and_XYZ 3@ 4@ 5@ 0087: 10@ = 5@ // (float) 0063: 10@ -= 2@ // (float) 0073: 10@ /= 6@ // (float) = sin 0087: 7@ = 10@ // (float) 0087: 8@ = 10@ // (float) 006B: 10@ *= 7@ // (float) 006B: 10@ *= 7@ // (float) 10@ /= 6.0 005B: 8@ += 10@ // (float) 10@ *= 6.0 006B: 10@ *= 7@ // (float) 006B: 10@ *= 7@ // (float) 10@ *= 0.075 005B: 8@ += 10@ // (float) 10@ /= 0.075 006B: 10@ *= 7@ // (float) 006B: 10@ *= 7@ // (float) 10@ *= 0.0446 005B: 8@ += 10@ // (float) arcsinX = X + (X^3)/6 + (X^5)*3/40 + (X^7)*15/336 8@ *= -57.296 // переводим радианы в градусы 8@ += 360.0 //-----------------------------------------------------------вычисляем угол по Z 0063: 3@ -= 0@ // (float) 0063: 4@ -= 1@ // (float) 0604: get_Z_angle_for_point 3@ 4@ store_to 2@ // 1 параметр - x2-x1 2 параметр - y2-y1 //-----------------------------------------------------------вычисляем смещения по осям X и Y 0063: 2@ -= 17@ // (float) 2@ += 270.0 // пусть миниган будет располагаться справа от водяной пушки 02F6: 3@ = cosine 2@ // (float) синус 02F7: 4@ = sine 2@ // (float) косинус 3@ *= -0.3 4@ *= 0.3 //-----------------------------------------------------------прикрепляем миниган 2@ -= 176.0 // 94 градуса - поправка на расположение опорной точки минигана if 8@ < 320.0 then 8@ = 320.0 end if 8@ > 395.0 then 8@ = 395.0 end if and 056E: car 30@ defined 03CA: object 31@ exists then 0681: attach_object 31@ to_car 30@ with_offset 3@ 4@ 2.0 rotation 0.0 8@ 2@ if 0AB0: key_pressed 2 // ПКМ - огонь then 0400: store_coords_to 11@ 12@ 13@ from_object 31@ with_offset 1.17 0.0 0.42 0400: store_coords_to 14@ 15@ 16@ from_object 31@ with_offset 1150.0 -100.0 550.0 06BC: create_M4_shoot_from 11@ 12@ 13@ target 14@ 15@ 16@ energy 1000 066E: create_particle "GUNFLASH" attached_to_object 31@ with_offset 1.17 0.0 0.42 rotation 0.866024961519 0 0.500000766025 flag 1 handle_as 18@ 064C: make_particle 18@ visible 064F: remove_references_to_particle 18@ end end end // not car sunk else 020A: set_car 30@ door_status_to 0 // door unlock if or 8202: not actor $PLAYER_ACTOR near_car 30@ radius 200.0 200.0 flag 0 02BF: car 30@ sunk then car.RemoveReferences(30@) end end // actor in car end // car defined end // object 31@ exists end end end

Нужна помощь, я собрал детали разных скриптов Server theVehicle = createVehicle(600, 2530.413, -1710.22, 13.323, 0, 0, 0, "SpawN") setElementData(theVehicle,"rocket",true) zenit = createObject(3884, 2530.621, -1715.385, 12.489) attachElements(zenit, theVehicle, 0,-1.8,-0.5) function bindKeyStartFire() bindKey(source,"1","down",startfireRocket) end addEventHandler("onPlayerJoin", getRootElement(),bindKeyStartFire) function startfireRocket(source) if isPedInVehicle(source) then local vehicle = getPedOccupiedVehicle(source) if getElementData(vehicle,"rocket") == true then if getVehicleController(vehicle) == source then local x,y,z = getElementPosition(vehicle) local rx,ry,rz = getVehicleRotation(vehicle) if getElementData(vehicle,"rocket_Progress") == 100 then triggerClientEvent("fireRocket", getRootElement(), source, x, y, z, rz,vehicle) else playSoundFrontEnd(source,5) outputChatBox("#CC0033[СЕРВЕР]: #339933 Прогресс востоновления зенитной установки не завершон! Осталось "..tostring(100 - getElementData(vehicle,"rocket_Progress"))..".", source, 0, 0, 0,true) end end end end end function explodeZUvehicle() if getVehicleOccupant(source) then local player = getVehicleOccupant(source) if (getElementData(source,"rocket") == true) then triggerClientEvent(player, "destroiGui", getRootElement(),player) end end end addEventHandler("onVehicleExplode", getRootElement(), explodeZUvehicle) --[[Поворот ракетницы по напровлению камеры function moveZenit(Rz) setElementAttachedOffsets(zenit, 0,-1.8,-0.5, 0,0,Rz) end addEvent("moveZenit", true) addEventHandler("moveZenit", getRootElement(), moveZenit) Client local function getCameraRotation() local px, py, pz, lx, ly, lz = getCameraMatrix() local rotz = 6.2831853071796 - math.atan2 ( ( lx - px ), ( ly - py ) ) % 6.2831853071796 local rotx = math.atan2 ( lz - pz, getDistanceBetweenPoints2D ( lx, ly, px, py ) ) return rotx, 180, rotz end function getPlayerCameraRot() x,y,z = getCameraRotation() triggerServerEvent("moveZenit", getRootElement(), z) end function setRenderCR() if not getCRot then getCRot = true addEventHandler("onClientRender", getRootElement(), getPlayerCameraRot) else getCRot = false removeEventHandler("onClientRender", getRootElement(), getPlayerCameraRot) end end addCommandHandler("start",setRenderCR) ]] --//Запуск рокеты... function fireRocket(source,x, y, z, rz,vehicle) if source == getLocalPlayer() then createProjectile(source, 19, x, y, z+3, 900, nil, 0,-15,-(rz+180),0,0,0) theVehicle = vehicle guiSetText(textProgress,"0%") guiProgressBarSetProgress(ProgressBar,0) setElementData(theVehicle,"rocket_Progress",0) addEventHandler("onClientRender", getRootElement(), progresBarZU) end end addEvent("fireRocket", true) addEventHandler("fireRocket", getRootElement(), fireRocket) function infoTextZU(element) if source == getLocalPlayer() then text = guiCreateLabel(633,218,118,12,"3EHuTHA9I yCTAHOBKA",false) guiLabelSetColor(text,0,0,0,100) guiSetFont(text,"default-small") text2fon = guiCreateLabel(633,218,118,12,"3EHuTHA9I yCTAHOBKA",false) guiLabelSetColor(text2fon,255,255,255) guiSetFont(text2fon,"default-small") ProgressBar = guiCreateProgressBar(624,230,133,19,false) guiProgressBarSetProgress(ProgressBar,100) textProgress = guiCreateLabel(679,231,50,13,"100%",false) guiLabelSetColor(textProgress,255,255,255) end end function progresBarZU() if getElementData(theVehicle,"rocket_Progress") ~= 100 then guiSetText(textProgress,tostring(getElementData(theVehicle,"rocket_Progress")+1).."%") guiProgressBarSetProgress(ProgressBar,getElementData(theVehicle,"rocket_Progress")+1) setElementData(theVehicle,"rocket_Progress",getElementData(theVehicle,"rocket_Progress")+1) else removeEventHandler("onClientRender", getRootElement(), progresBarZU) end if getElementData(theVehicle,"rocket_Progress") < 50 then guiLabelSetColor(textProgress,0,0,0) else guiLabelSetColor(textProgress,255,255,255) end end function addProgressBar(theVehicle, seat, jacked) if seat == 0 then if getElementData(theVehicle,"rocket") == true then if (not getElementData(theVehicle,"rocket_Progress")) then setElementData(theVehicle,"rocket_Progress",100) end infoTextZU() guiSetText(textProgress,tostring(getElementData(theVehicle,"rocket_Progress")).."%") guiProgressBarSetProgress(ProgressBar,getElementData(theVehicle,"rocket_Progress")) end end end addEventHandler("onClientPlayerVehicleEnter", getRootElement(), addProgressBar) function destroyProgressBar(theVehicle, seat, jacked ) if seat == 0 then if getElementData(theVehicle,"rocket") == true then destroyElement(textProgress) destroyElement(ProgressBar) destroyElement(text) destroyElement(text2fon) setElementData(theVehicle,"rocket_Progress",100) removeEventHandler("onClientRender", getRootElement(), progresBarZU) end end end addEventHandler("onClientPlayerVehicleExit", getRootElement(), destroyProgressBar) function destroiGui(source) if source == getLocalPlayer() then if getElementData(theVehicle,"rocket") == true then destroyElement(textProgress) destroyElement(ProgressBar) destroyElement(text) destroyElement(text2fon) removeEventHandler("onClientRender", getRootElement(), progresBarZU) end end end addEvent("destroiGui", true) addEventHandler("destroiGui", getRootElement(), destroiGui) Create Weapon function createMinigunWeapon() local x, y, z = getElementPosition(getLocalPlayer()) local weapon = createWeapon("minigun", x, y, z + 1) setWeaponClipAmmo ( weapon,99999) setWeaponState ( weapon,"firing") end addCommandHandler("createminigun", createMinigunWeapon) Прошу помощи, нужно соеденить все и чтоб получилось: http://www.gtavicecity.ru/gta-san-andre ... yotom.html

Возможно. Можно узнать, как?

theVehicle = createVehicle(600, 2530.413, -1710.22, 13.323, 0, 0, 0, "SpawN") setElementData(theVehicle,"rocket",true) zenit = createObject(3884, 2530.621, -1715.385, 12.489) attachElements(zenit, theVehicle, 0,-1.8,-0.5) function bindKeyStartFire() bindKey(source,"1","down",startfireRocket) end addEventHandler("onPlayerJoin", getRootElement(),bindKeyStartFire) function startfireRocket(source) if isPedInVehicle(source) then local vehicle = getPedOccupiedVehicle(source) if getElementData(vehicle,"rocket") == true then if getVehicleController(vehicle) == source then local x,y,z = getElementPosition(vehicle) local rx,ry,rz = getVehicleRotation(vehicle) if getElementData(vehicle,"rocket_Progress") == 100 then triggerClientEvent("fireRocket", getRootElement(), source, x, y, z, rz,vehicle) else playSoundFrontEnd(source,5) outputChatBox("#CC0033[СЕРВЕР]: #339933 Прогресс востоновления зенитной установки не завершон! Осталось "..tostring(100 - getElementData(vehicle,"rocket_Progress"))..".", source, 0, 0, 0,true) end end end end end function explodeZUvehicle() if getVehicleOccupant(source) then local player = getVehicleOccupant(source) if (getElementData(source,"rocket") == true) then triggerClientEvent(player, "destroiGui", getRootElement(),player) end end end addEventHandler("onVehicleExplode", getRootElement(), explodeZUvehicle) function moveZenit(Rz) setElementAttachedOffsets(zenit, 0,-1.8,-0.5, 0,0,Rz) end addEvent("moveZenit", true) addEventHandler("moveZenit", getRootElement(), moveZenit) Данная функция устанавливает на транспорт Picador зинитку, возможно ли поменять функцию вместо зинитки, пулемёт с прицелом?

Debug ничего не пишет, но и человека не убивает выстрелом в голову

Я хочу создать обычный headshot но чтоб он работал только у тех у кого есть указаные скины в скрипте

Помогите мне, у меня не работает: local nonOpenables = { --this is easier [290]=true, [291]=true, [292]=true } addEvent "onPlayerHeadshot" addEventHandler("onPlayerDamage", getRootElement(), function (attacker, weapon, bodypart, loss, hitPlayer,thePlayer) local skin = getElementModel (thePlayer) if bodypart == 9 then if nonOpenables[skin] then local result = triggerEvent("onPlayerHeadshot", source, attacker, weapon, loss) if result == true then killPed(source, attacker, weapon, bodypart) end end end end )

Помогите настроить правельно local nonOpenables = { --this is easier [290]=true, [291]=true, [292]=true } addEvent "onPlayerHeadshot" addEventHandler("onPlayerDamage", getRootElement(), function (attacker, weapon, bodypart, loss, hitPlayer,thePlayer) local skin = getElementModel (thePlayer) if bodypart == 9 then if nonOpenables[skin] then local result = triggerEvent("onPlayerHeadshot", source, attacker, weapon, loss) if result == true then killPed(source, attacker, weapon, bodypart) end end end end )

Помогите мне данный скрипт переписать в lua forward ColorUpdate(playerid); new Colors[25] = { 0xFF0000FF, 0xFF2C00FF, 0xFF5000FF, 0xFF8700FF, 0xFFA700FF, 0xFFDC00FF, 0xFFFB00FF, 0xC4FF00FF, 0x7BFF00FF, 0x00FF00FF, 0x00FF1EFF, 0x00FF3BFF, 0x00FF7CFF, 0x00FFAEFF, 0x00FFD5FF, 0x00FFFFFF, 0x00CCFFFF, 0x00ACFFFF, 0x0083FFFF, 0x0054FFFF, 0x0000FFFF, 0x2C00FFFF, 0x5F00FFFF, 0x9B00FFFF, 0xCB00FFFF }; new Text3D:Label[MAX_PLAYERS]; new Hentum[MAX_PLAYERS]; new number[MAX_PLAYERS]; new count[MAX_PLAYERS]; public OnPlayerConnect(playerid) { number[playerid] = 0; Hentum[playerid] = 0; Label[playerid] = Create3DTextLabel("",0,30.0,40.0,50.0,70.0,0,1); Attach3DTextLabelToPlayer(Label[playerid], playerid, 0.0, 0.0, 0.4); return 1; } public ColorUpdate(playerid) { count[playerid] = SetTimerEx("ColorUpdate",200,0,"i",playerid); Update3DTextLabelText(Label[playerid], Colors[number[playerid]], ".:Админ:."); SetPlayerColor(playerid,Colors[number[playerid]]); number[playerid]++; if(number[playerid] == 25) { number[playerid] = 1; } if(Hentum[playerid] == 0) { KillTimer(count[playerid]); Update3DTextLabelText(Label[playerid], Colors[number[playerid]], ""); } return 1; } public OnPlayerCommandText(playerid, cmdtext[]) { if(!strcmp(cmdtext,"/adminlabel",true)) { if (!IsPlayerAdmin(playerid)) { SendClientMessage(playerid, 0x33CCFFAA, "* Вы не админ!"); return 1; } if(Hentum[playerid] == 0) { Hentum[playerid] = 1; ColorUpdate(playerid); SendClientMessage(playerid, 0x33CCFFAA, "* Вы включили статус админа!"); } else { KillTimer(count[playerid]); Update3DTextLabelText(Label[playerid], Colors[number[playerid]], ""); Hentum[playerid] = 0; SendClientMessage(playerid, 0x33CCFFAA, "* Вы выключили статус админа!"); } return 1; } return 0; }

Помогите тут есть один мод https://community.multitheftauto.com/in ... ls&id=2074 как настроить его для админов?

Помогите ставлю модель оружия, запускаю файл, качает модели, по окончанию Timed Out вылетает, захожу заного, сново Timed Out, и так пока не выключу "Gang skins" version="2.0" type="script" /> function replaceModel() txd = engineLoadTXD("data/ak47.txd",355) engineImportTXD(txd,355) dff = engineLoadDFF("data/ak47.dff",355) engineReplaceModel(dff,355) end addEventHandler ( "onClientResourceStart", getResourceRootElement(getThisResource()), replaceModel) addCommandHandler ( "reloadcar", replaceModel )

x, y, size = -2144.5, 295.55911254883, 120 local greenzone = createColRectangle ( 228.22802734375, 313, 25.700000762939, 312 ) local greenzonemaparea = createRadarArea (228.22802734375, 313, 25.700000762939, 312, 0, 255, 0, 120) function greenzoneEnter ( thePlayer, matchingDimension ) if getElementType( thePlayer ) ~= "player" then return end outputChatBox ( "* You Entered The Greenzone!", thePlayer, 50, 252, 3 ) toggleControl ( thePlayer, "fire", false ) toggleControl ( thePlayer, "next_weapon", false ) toggleControl ( thePlayer, "previous_weapon", false ) setPedWeaponSlot ( thePlayer, 0 ) toggleControl ( thePlayer, "aim_weapon", false ) toggleControl ( thePlayer, "vehicle_fire", false ) toggleControl ( thePlayer, "vehicle_secondary_fire", false ) end addEventHandler ( "onColShapeHit", greenzone, greenzoneEnter ) function greenzoneExit ( thePlayer, matchingDimension ) if getElementType( thePlayer ) ~= "player" then return end outputChatBox ( "* You Left The Greenzone!", thePlayer, 50, 252, 3 ) toggleControl ( thePlayer, "fire", true ) toggleControl ( thePlayer, "next_weapon", true ) toggleControl ( thePlayer, "previous_weapon", true ) toggleControl ( thePlayer, "aim_weapon", true ) toggleControl ( thePlayer, "vehicle_fire", true ) toggleControl ( thePlayer, "vehicle_secondary_fire", true ) end addEventHandler ( "onColShapeLeave", greenzone, greenzoneExit ) Помогите никак не могу стройку в SF накрыть

Как руссифицировать Help panel

[2013-03-05 23:34:14] WARNING: @login.lua:406: Bad argument @ 'getAccountData' [Expected account at argument 1, got boolean] [2013-03-05 23:34:14] WARNING: @login.lua:459: Bad argument @ 'getAccountData' [Expected account at argument 1, got boolean] Mod Mta DayZ помогите при регистрации пишет Error

нет мне нужна помощь немогу понять в чём ошибка function Makemarker500 () local theMarker = createMarker ( -2273, 2420.3999023438, -5,"cylinder",2, 0, 0, 0, 0 ) setElementData ( theMarker, "teleportid", 500 ) end addEventHandler ( "onResourceStart", getRootElement(), Makemarker500 ) function Teleporthit500 ( hitPlayer, matchingDimension ) local teleportid = getElementData ( source, "teleportid" ) if getElementModel () == 253 then if teleportid == 500 then setElementPosition ( hitPlayer, 2269.3999023438, 550.5, 7.8000001907349) end end addEventHandler("onMarkerHit", getRootElement (), Teleporthit500)

помогите зделать телепорт на скин я не понимаю function Makemarker500 () local theMarker = createMarker ( -2425.6000976563, 2307.8000488281, -4.5,"cylinder",2, 0, 0, 0, 0 ) setElementData ( theMarker, "teleportid", 500 ) end addEventHandler ( "onResourceStart", getRootElement(), Makemarker500 ) function Teleporthit500 ( hitPlayer, matchingDimension ) local teleportid = getElementData ( source, "teleportid" ) if teleportid == 500 then setElementPosition ( hitPlayer, 2346.8000488281, 633.20001220703, 10.699999809265) end end addEventHandler("onMarkerHit", getRootElement (), Teleporthit500)

ну допустим этот телепорт и что мне написать? function Makemarker500 () local theMarker = createMarker ( -2425.6000976563, 2307.8000488281, -4.5,"cylinder",2, 0, 0, 0, 0 ) setElementData ( theMarker, "teleportid", 500 ) end addEventHandler ( "onResourceStart", getRootElement(), Makemarker500 ) function Teleporthit500 ( hitPlayer, matchingDimension ) local teleportid = getElementData ( source, "teleportid" ) if teleportid == 500 then setElementPosition ( hitPlayer, 2346.8000488281, 633.20001220703, 10.699999809265) end end addEventHandler("onMarkerHit", getRootElement (), Teleporthit500)

возможно как-то создать телепорт по скину? система такая: человек с скином указаным скрипте может использовать телепорт а другие немогут

буду благодарен если вы мне поможете: мне надо что нибудь такое что положит сервер консоль сломает, кароче зделает полный краш сервера, есть такой скрипт?

как зделать чтоб объект двигался вниз верх? постояно

помогите зделать, чтоб снайпера убивала с 1 удара в любое попадание

как зделать пушку паутинку типо стреляеш и тебя тросом туда тянет

вариант 3 у меня было 5 друзей которые работали за идею

а ты не можеш дать ссылку на эти работы? Нет никаких ссылок на эти работы! С чего ты вобще взял, что они в паблике есть? ты можеш в скайпе по микрофону расказать?что и как писать

а ты не можеш дать ссылку на эти работы?