Jump to content

Korish0074

Members
  • Posts

    67
  • Joined

  • Last visited

Details

  • Gang
    Red

Korish0074's Achievements

Snitch

Snitch (10/54)

0

Reputation

  1. Там в клео скрипте для гта есть некоторые понятные функции {$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
  2. Нужна помощь, я собрал детали разных скриптов 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
  3. 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 зинитку, возможно ли поменять функцию вместо зинитки, пулемёт с прицелом?
  4. Debug ничего не пишет, но и человека не убивает выстрелом в голову
  5. Я хочу создать обычный headshot но чтоб он работал только у тех у кого есть указаные скины в скрипте
  6. Помогите мне, у меня не работает: 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 )
  7. Помогите настроить правельно 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 )
  8. Помогите мне данный скрипт переписать в 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; }
  9. Помогите тут есть один мод https://community.multitheftauto.com/in ... ls&id=2074 как настроить его для админов?
  10. Помогите ставлю модель оружия, запускаю файл, качает модели, по окончанию 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 )
  11. 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 накрыть
  12. [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
  13. нет мне нужна помощь немогу понять в чём ошибка 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)
×
×
  • Create New...