Слив скрипта для секты Pears Project

Статус
В этой теме нельзя размещать новые ответы.

Qsany

Потрачен
Автор темы
464
147
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Здравствуйте, недавно блуждал по простором моего жёсткого диска и нашел таинственный скрипт.
Суть скрипта- упростить отыгровку секты на Pears Project путем бинда.
(Можно использовать и не на пирсе, т.к. есть бинды которые просто упростят отыгровку)



Первая команда : /thesekta
1halPxb.png



Дальше отыгровка
: /sek
o816g2U.png



Дальше отыгровка
: /sek2
wDXERWJ.png


Требуется Moonloader & Sampfuncs

Скачать еще можно тут



By: Жанка)0
Slil: Qsany
 

Вложения

  • sekta.lua
    15 KB · Просмотры: 183
Последнее редактирование:

Qsany

Потрачен
Автор темы
464
147
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Вот еще пуцка, мб кому то пригодится для написания своего биндера

Lua:
script_name("sekta")
script_description("/thesekta - Помощь")
script_version("v3.5")
script_author("mayweather")
script_dependencies("SAMPFUNCS, SAMP")
require("lib.moonloader")

jstart = 1
-- [[ 1 - Текст в чат игры. 2 - Текст в чат СампФункса. ]]

function main()
  while not isSampAvailable() do
    wait(1000)
  end
  if jstart == 1 then
    sampAddChatMessage("{ffffff}* [eb{cd0000}ante{ffffff}ev]: {cd0000}Специальный скрипт для сектантов успешно загружён. {ffffff}Версия скрипта: 3.5.", 0xC1C1C1)
    sampAddChatMessage("{ffffff}* [eb{cd0000}ante{ffffff}ev]:  {cd0000}Помощь по скрипту, доступные команды: {ffffff}/thesekta.", 0xC1C1C1)
    sampAddChatMessage("{ffffff}* [eb{cd0000}ante{ffffff}ev]:  {cd0000}Помощь в добавлении отыгровок: {ffffff}Jandarm Paparazzi.", 0xC1C1C1)
  elseif jstart == 2 then
    sampfuncsLog("{ffffff}* [eb{cd0000}ante{ffffff}ev]:  {cd0000}Помощь в добавлении отыгровок: J. Paparazzi.")
  end
  sampRegisterChatCommand("thesekta", thesekta)
  sampRegisterChatCommand("sek", sek)
  sampRegisterChatCommand("sek2", sek2)
  sampRegisterChatCommand("supd", supd)
  sampRegisterChatCommand("sekupd", sekupd)
  sampRegisterChatCommand("oldsekupd", oldsekupd)
  while true do
    wait(0)
        if sekid == '1' then
            sampSendChat("/do Пистолет за поясом.")
            wait(1000)
            sampSendChat("/me заведя руку за спину, ухватился за рукоять пистолета, после чего вытащил его.")
            sekid = nil
        end
        if sekid == '2' then
            sampSendChat("/do В заднем кармане находился острый нож.")
            wait(4000)
            sampSendChat("/me отогнув куртку, ухватился за рукоять ножа, после чего резко вытащил его.")
            wait(4000)
            sampSendChat("/me пригнувшись, разрезает футболку жертвы, затем со всей силы наносит удар.")
            wait(2100)
            sampSendChat("/do Нож вонзился полностью.")
            wait(4000)
            sampSendChat("/me грубо и не ровно, ведёт полосу от груди до пояса, после чего суёт руку внутрь.")
            wait(4000)
            sampSendChat("/todo Ахх, ты мой хороший...*нащупав внутри нужный орган.")
            wait(4000)
            sampSendChat("/me выдернув нужный орган, вонзил нож обратно в тело, затем встал.")
            wait(4000)
            sampSendChat("/obisk")
            sekid = nil
        end
        if sekid == '3' then
            sampSendChat("/me открыв окно автомобиля, взял автомат в левую руку ..")
            wait(2200)
            sampSendChat("/do .. после чего высунулся из окна.")
            sekid = nil
        end
        if sekid == '4' then
            sampSendChat("/do Под верхней одеждой, за поясом, находится длинный, острый нож.")
            wait(3500)
            sampSendChat("/me отогнув верхнюю одежду, ухватился за рукоять ножа, после чего ..")
            wait(2000)
            sampSendChat("/do .. резко вытащил лезвие.")
            sekid = nil
        end
        if sekid == '5' then
            sampSendChat("/do Автомат М4А1 висит на плече.")
            wait(3500)
            sampSendChat("/me скинув с плеча автомат, снимает с предохранителя, после чего ..")
            wait(1700)
            sampSendChat("/do .. передёргивает затвор.")
            sekid = nil
        end
        if sekid == '6' then
            sampSendChat("/do По ситуации, телефон неизвестного включен и может принимать звонки и сообщения.")
            wait(5000)
            sampSendChat("/do На телефон неизвестного пришло оповещение о новом заказе.")
            wait(5000)
            sampSendChat("/do В сообщении полностью расписана информация о заказе.")
            wait(5000)
            sampSendChat("/me набрал символы на клавиатуре, тем самым принял заказ.")
            wait(5000)
            sampSendChat("/me нажатием кнопки на корпусе КПК ставит его на блокировку, после чего ..")
            wait(1900)
            sampSendChat("/do .. кладет в правый карман брюк.")
            sekid = nil
        end
        if sekid == '7' then
            sampSendChat("/do Балаклава в кармане брюк.")
            wait(5000)
            sampSendChat("/me сунув руку в карман брюк, нащупывает ткань, затем вытаскивает балаклаву ..")
            wait(2500)
            sampSendChat("/do .. после чего натягивает её на голову.")
            sekid = nil
        end
        if sekid == '8' then
            sampSendChat("/me заведя руку за спину, достаёт пистолет, заряженный снотворным ..")
            wait(5000)
            sampSendChat("/do .. затем наводит его на шею человека, после чего нажимает на курок.")
            wait(5000)
            sampSendChat("/do По ситуации, в шею был сделан выстрел из пистолета со снотворным, поэтому человек должен потерять сознание.")
            wait(2300)
            sampSendChat("/do Что случилось с человеком?")
            sekid = nil
        end
        if sekid == '9' then
            sampSendChat("/me открыв багажник, хватает тело за подмышки, после чего взбрасывает в багажник ..")
            wait(6000)
            sampSendChat("/do .. ухватив за ноги, закидывает тело полностью, затем закрывает багажник.")
            sekid = nil
        end
        if sek2id == '1' then
            sampSendChat("/do Подсумка висит на поясе.")
            wait(3500)
            sampSendChat("/do В подсумке лежат дымовые шашки.")
            wait(5000)
            sampSendChat("/me резким движением, раскрывает подсумку, после чего вытаскивает несколько шашек ..")
            wait(2300)
            sampSendChat("/do .. и активировав их, разбрасывает на 360 градусов.")
            wait(5000)
            sampSendChat("/do Дымовые шашки нового поколения, поэтому они за миллисекунды задымили окрестность.")
            wait(4300)
            sampSendChat("/action Охватывая всю окрестность, стоит туча огромного дыма.")
            sek2id = nil
        end
        if sek2id == '2' then
            sampSendChat("/do В багажнике автомобиля, не подавая признаков жизни, лежит тело.")
            wait(6000)
            sampSendChat("/me открыв багажник, придерживая рукой, взглянул на тело, после чего другой рукой ..")
            wait(3300)
            sampSendChat("/do .. хватает тело за одежду.")
            wait(6000)
            sampSendChat("/todo Иди ко мне, родной...*шмыгнув носом и скидывая тело на землю.")
            wait(5000)
            sampSendChat("/do В каком положении лежит тело жертвы?")
            sek2id = nil
        end
            if sek2id == '3' then
            sampSendChat("/me нащупав в области шеи окончание маски, снизу вверх снимает её, затем скомкав ..")
            wait(4300)
            sampSendChat("/do .. откидывает в сторону.")
            wait(5000)
            sampSendChat("/do Из-за ткани, волосы на голове намагничены, поэтому они стоят дыбом.")
            sek2id = nil
        end
            if sek2id == '4' then
            sampSendChat("/me с разбегу, наносит удар в область груди человека напротив.")
            sek2id = nil
        end
            if sek2id == '5' then
            sampSendChat("/me подбежав к двери автомобиля, открывает её, после чего ударом по лицу ..")
            wait(4000)
            sampSendChat("/do .. вытаскивает человека из автомобиля.")
            sek2id = nil
        end
            if sek2id == '6' then
            sampSendChat("/me пригнувшись, схватил тело жертвы за ноги, после чего ..")
            wait(3500)
            sampSendChat("/do .. потащил за собой.")
            sek2id = nil
        end
            if sek2id == '7' then
            sampSendChat("/me приподняв правую руку вверх, медленно щелкнул пальцами.")
            wait(1000)
            sampSendChat("/do И тут, настигло неизвестных людей чудо темное.")
            sek2id = nil
        end
            if sek2id == '8' then
            sampSendChat("/me пригнувшись к телу, схватил его за руки, надавив на него всем весом.")
            wait(7000)
            sampSendChat("/me приподняв верхнюю одежду человека, медленно и с безумным выражением лица .. ")
            wait(7000)
            sampSendChat("/do .. ведёт пальцем по спине, выводя форму креста.")
            wait(7000)
            sampSendChat("/todo Будет не больно..Может щипать будет..*истерично рассмеявшись,подкинув нож перед собой и поймав его")
            wait(7000)
            sampSendChat("/me убрав руку со спины, резко размахнувшись, вонзил нож в спину человека ..")
            wait(7000)
            sampSendChat("/do .. после чего провёл на спине неровный символ креста.")
            wait(7000)
            sampSendChat("/do Незнакомец знает своё дело, соответственно нож вонзился на нужную глубину и не убил человека.")
            wait(7000)
            sampSendChat("/do Руки незнакомца в крови, со спины человека, медленно и густо стекают капли крови..")
            wait(7000)
            sampSendChat("/me выдернул нож из спины жертвы, после чего вытер кровь с ножа об одежду жертвы.")
            wait(5000)
            sampSendChat("/action На земле большое пятно крови.")
            sek2id = nil
     end
  end
end

function supd()
  downloadUrlToFile( "https://dl.dropboxusercontent.com/s/9ejjng2bzr39h2n/sekta.lua?dl=0", "moonloader/sekta.lua")
  sampAddChatMessage("{ffffff}* [eb{cd0000}ante{ffffff}ev]: {cd0000} Скрипт загружается. Проверяйте, скачался он или нет. {ffffff}[ /sekupd ]", 0xC1C1C1)
end

function sek(param)
  sekid = string.match(param, '(%d+)')
  if sekid ~= nil then
  else
   sampAddChatMessage("{cd0000}[ SEKtA ]:{ffffff} Помощь сектантам {cd0000}[ /sek Номер ] | Номера:", 0xC1C1C1)
   sampAddChatMessage("{cd0000}[{ffffff} 1 - Достать пистолет | 2 - Отрезать органы | 3 - Высунуть руку с оружием из окна машины {cd0000}]",0xC1C1C1)
   sampAddChatMessage("{cd0000}[{ffffff} 4 - Достать нож (RP) | 5 - Достать автомат (M4A1) | 6 - Принять заказ (КПК) | 7 - Достать и надеть маску {cd0000}]",0xC1C1C1)
   sampAddChatMessage("{cd0000}[{ffffff} 8 - Выстрелить из пистолета со снотворным | 9 - Закинуть тело в багажник {cd0000}]",0xC1C1C1)
  end
end

function sek2(param)
  sek2id = string.match(param, '(%d+)')
  if sek2id ~= nil then
  else
   sampAddChatMessage("{cd0000}[ SEKtA ]:{ffffff} Помощь сектантам, 2 часть {cd0000}[ /sek2 Номер ] | Номера:", 0xC1C1C1)
   sampAddChatMessage("{cd0000}[{ffffff} 1 - Дымовая граната | 2 - Достать из багажника жертву | 3 - Снять маску {cd0000}]",0xC1C1C1)
   sampAddChatMessage("{cd0000}[{ffffff} 4 - Удар ногой в грудь | 5 - Вытащить жертву из машины | 6 - Потащить лежащее тело за собой {cd0000}]",0xC1C1C1)
   sampAddChatMessage("{cd0000}[{ffffff} 7 - Отыграть форму для обрядов | 8 - Вырезать крест на спине жертвы {cd0000}]",0xC1C1C1)
  end
end

function thesekta()
  local thesekta = [[
{cd0000}
{cd0000}_____________________________________________________________________________________________
На свет вышел специальный скрипт для сектантов, который облегчит им отыгровку RP ;)
Доступные команды скрипта:    

{cd0000}* И{ffffff}нформация о скрипте - {cd0000}/thesekta ;
{cd0000}* С{ffffff}писок обновлений скрипта - {cd0000}/sekupd ;
{cd0000}* С{ffffff}писок СТАРЫХ обновлений скрипта - {cd0000}/oldsekupd ;
{cd0000}* А{ffffff}втообновление скрипта - {cd0000}/supd ;
{cd0000}* К{ffffff}оманды для отыгровки некоторых действий {cd0000}[ 1 часть ] - {cd0000}/sek 1-9 ;
{cd0000}* К{ffffff}оманды для отыгровки некоторых действий {cd0000}[ 2 часть ] - {cd0000}/sek2 1-9 ;
{cd0000}* К{ffffff}оманды для отыгровки некоторых действий {cd0000}[ 3 часть ] - {cd0000}SOON! ;
{cd0000}* К{ffffff}оманды для отыгровки некоторых действий {cd0000}[ 4 часть ] - {cd0000}SOON! ;
{cd0000} * Важно! Слив скрипта - запрещен. Чёрный Список секты. [ permanent ]
{cd0000}_____________________________________________________________________________________________
]]
  sampShowDialog(1010, "{cd0000} Информация о скрипте", thesekta, "{ffffff}Закрыть", "", 0)
end

function sekupd()
  local sekupd = [[
 
{cd0000}_______________________________________________________________________________________________________________________
 
{cd0000}* Changelog:
{cd0000}[10.08.2017]
{cd0000}- {ffffff}Скрипт полностью переделан и переименован.
{cd0000}- {ffffff}Цвет скрипта, отныне и навсегда, - красный.
{cd0000}- {ffffff}Некоторые слова в скрипте теперь не на русском, а на английском языке.
{cd0000}- {ffffff}Поправлены некоторые отыгровки в скрипте.
{cd0000}- {ffffff}М{ffffff}елкие изменения в скрипте.
{cd0000} * Удачного использования скрипта! ;)
{cd0000}_______________________________________________________________________________________________________________________
 
]]
  sampShowDialog(1010, "{cd0000} Список обновлений скрипта", sekupd, "{ffffff}Закрыть", "", 0)
end

function oldsekupd()
  local oldsekupd = [[
 
{cd0000}_______________________________________________________________________________________________________________________
 
{cd0000}* Old updates:
{cd0000}[16.12.2016] - [18.12.2016]
{cd0000}- {ffffff}Д{ffffff}обавлена задержка на каждую отыгровку ;
{cd0000}- {ffffff}П{ffffff}олностью изменены некоторые отыгровки ;
{cd0000}- {ffffff}Будет добавлена вторая часть доступных команд {cd0000}[ /sek2 ] {ffffff};
{cd0000}- {ffffff}Д{ffffff}обавлена 8-ая команда в {cd0000}[ /sek ] {ffffff}- Выстрелить из пистолета со снатворным {ffffff};
{cd0000}- {ffffff}К{ffffff}оманда {cd0000} [ /shelp ] {ffffff}изменена на {cd0000}[ /thesekta ] {ffffff};
{cd0000}- {ffffff}К{ffffff}оманды {cd0000} [ /sekinv ] {ffffff}больше не существует ;
{cd0000}- {ffffff}Д{ffffff}обавлена команда {cd0000}[ /sekupd ] {ffffff}- список обновлений скрипта ;
{cd0000}- {ffffff}Д{ffffff}обавлена последняя, 9-ая функция в {cd0000}[ /sek ] - Закинуть тело в багажник {ffffff};
{cd0000}- {ffffff}И{ffffff}зменена задержка на каждую отыгровку {cd0000}[ длинные - 5-6, мелкие - 2-3 ] {ffffff};
{cd0000}- {ffffff}Добавлена вторая часть доступных команд {cd0000}[ /sek2 ] {ffffff};
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 1-ая функция - Достать и кинуть дымовуху ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 2-ая функция - Достать из багажника жертву ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 3-ая функция - Снять маску ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 4-ая функция - Удар ногой в грудь ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 5-ая функция - Вытащить жертву из машины ;
{cd0000}- {ffffff}Отныне и навсегда, добавлена возможность автоматического обновления скрипта при его изменении {cd0000}[ /supd ] {ffffff};
{cd0000}- {ffffff}М{ffffff}елкие изменения в скрипте.
  {cd0000}[18.12.2016] - [21.12.2016]
{cd0000}- {ffffff}И{ffffff}зменена задержка на каждую отыгровку {cd0000}[ длинные - 5-6, мелкие - 2-3 ] {ffffff};
{cd0000}- {ffffff}Добавлена вторая часть доступных команд {cd0000}[ /sek2 ] {ffffff};
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 1-ая функция - Достать и кинуть дымовуху ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 2-ая функция - Достать из багажника жертву ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 3-ая функция - Снять маску ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 4-ая функция - Удар ногой в грудь ;
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 5-ая функция - Вытащить жертву из машины ;
{cd0000}- {ffffff}Отныне и навсегда, добавлена возможность автоматического обновления скрипта при его изменении {cd0000}[ /supd ] {ffffff};
{cd0000}- {ffffff}Во вторую часть доступных команд {cd0000}[ /sek2 ] {ffffff}добавлена 6-ая функция - Потащить лежащее тело за собой (схватив за ноги) ;
{cd0000}_______________________________________________________________________________________________________________________
 
]]
  sampShowDialog(1010, "{cd0000} Список старых обновлений скрипта", oldsekupd, "{ffffff}Закрыть", "", 0)
end
 
Последнее редактирование:

deddosouru

Смотрю аниме, служу Сатане
Друг
2,036
1,319
скрипт с автообновлением!
я надеюсь все понимают что после апдейта, бх не несет ответственности за содержимое скрипта
 
  • Нравится
Реакции: user116675, imring и Qsany

Qsany

Потрачен
Автор темы
464
147
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
скрипт с автообновлением!
я надеюсь все понимают что после апдейта, бх не несет ответственности за содержимое скрипта
смысл слива этого скрипта в коде.
любой может переписать под себя(наверн любой(я не могу(я не в счет)))
 

#Rewzeisch

Известный
121
10
Вообще-то ты его НЕ СЛИЛ, он лежит в открытом доступе на оф.форуме Pears Project -_-
 
  • Нравится
Реакции: imring

Qsany

Потрачен
Автор темы
464
147
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Статус
В этой теме нельзя размещать новые ответы.