commit
7247aa1789
@ -0,0 +1,272 @@ |
|||||||
|
script_name('squad-mats') |
||||||
|
script_author("Serhiy_Rubin") |
||||||
|
script_version("02.02.2023") |
||||||
|
sampev = require 'samp.events' |
||||||
|
inicfg = require "inicfg" |
||||||
|
dlstatus = require("moonloader").download_status |
||||||
|
|
||||||
|
function main() |
||||||
|
if not isSampLoaded() or not isSampfuncsLoaded() then return end |
||||||
|
while not isSampAvailable() do wait(0) end |
||||||
|
repeat wait(0) until sampGetCurrentServerName() ~= "SA-MP" |
||||||
|
repeat wait(0) until sampGetCurrentServerName():find("Samp%-Rp.Ru") or sampGetCurrentServerName():find("SRP") |
||||||
|
local server = getSampRpServerName() |
||||||
|
if server == "" then |
||||||
|
thisScript():unload() |
||||||
|
end |
||||||
|
config.init() |
||||||
|
sampRegisterChatCommand("squadid",function(para) |
||||||
|
if para:find("%d+") then |
||||||
|
config.data.squad_id = tonumber(para:match("(%d+)")) |
||||||
|
config.save(config.data) |
||||||
|
addChatMessage("Установлен новый ID сквада: "..config.data.squad_id) |
||||||
|
end |
||||||
|
end) |
||||||
|
wait(-1) |
||||||
|
end |
||||||
|
|
||||||
|
-->> CONFIG |
||||||
|
config = {} |
||||||
|
config.data = {} |
||||||
|
local x1, y1 = convertGameScreenCoordsToWindowScreenCoords(14, 310) |
||||||
|
config.default = { |
||||||
|
squad_id = -1, |
||||||
|
mats = 0, |
||||||
|
mats_price = 8 |
||||||
|
} |
||||||
|
config.directory = string.format("%s\\moonloader\\config\\%s\\", getGameDirectory(), thisScript().name) |
||||||
|
config.init = function() |
||||||
|
if not doesDirectoryExist("moonloader\\config") then |
||||||
|
createDirectory("moonloader\\config") |
||||||
|
end |
||||||
|
if not doesDirectoryExist(config.directory) then |
||||||
|
createDirectory(config.directory) |
||||||
|
end |
||||||
|
config.address = string.format("%s\\%s-%s.json", config.directory, getSampRpServerName(), getLocalPlayerNickname()) |
||||||
|
if not doesFileExist(config.address) then |
||||||
|
config.save(config.default) |
||||||
|
end |
||||||
|
config.read() |
||||||
|
for k,v in pairs(config.default) do |
||||||
|
if config.data[k] == nil then |
||||||
|
config.data[k] = v |
||||||
|
end |
||||||
|
end |
||||||
|
config.save(config.data) |
||||||
|
end |
||||||
|
config.save = function(data) |
||||||
|
local file, error = io.open(config.address, "w") |
||||||
|
if file == nil then |
||||||
|
addChatMessage(error) |
||||||
|
end |
||||||
|
file:write(encodeJson(data)) |
||||||
|
file:flush() |
||||||
|
io.close(file) |
||||||
|
end |
||||||
|
config.read = function() |
||||||
|
local readJson = function() |
||||||
|
local file, error = io.open(config.address, "r") |
||||||
|
if file then |
||||||
|
config.data = decodeJson(file:read("*a")) |
||||||
|
io.close(file) |
||||||
|
if config.data == nil then |
||||||
|
addChatMessage("Ошибка чтения конфига! Сбрасываю конфиг!") |
||||||
|
config.save(config.default) |
||||||
|
end |
||||||
|
end |
||||||
|
end |
||||||
|
local result = pcall(readJson) |
||||||
|
if not result then |
||||||
|
addChatMessage("Ошибка чтения конфига! Сбрасываю конфиг!") |
||||||
|
config.save(config.default) |
||||||
|
end |
||||||
|
if config.data == nil then |
||||||
|
config.error = true |
||||||
|
addChatMessage("Ошибка чтения конфига! Пробую ещё раз прочесть") |
||||||
|
config.read() |
||||||
|
else |
||||||
|
if config.error then |
||||||
|
addChatMessage("Конфиг был успешно загружен!") |
||||||
|
config.error = false |
||||||
|
end |
||||||
|
end |
||||||
|
end |
||||||
|
|
||||||
|
-->> COUNTER |
||||||
|
counter = {} |
||||||
|
counter.reset = 0 |
||||||
|
counter.weapon = { |
||||||
|
["SD Pistol"] = 34, |
||||||
|
["Desert Eagle"] = 63, |
||||||
|
["Shotgun"] = 90, |
||||||
|
["MP5"] = 180, |
||||||
|
["AK-47"] = 180, |
||||||
|
["M4"] = 300, |
||||||
|
["Rifle"] = 300 |
||||||
|
} |
||||||
|
|
||||||
|
dialog = {} |
||||||
|
dialog.id = -1 |
||||||
|
dialog.text = [[[0] SD Pistol [34 п. 34 м.] |
||||||
|
[1] Desert Eagle [21 п. 63 м.] |
||||||
|
[2] Shotgun [30 п. 90 м.] |
||||||
|
[3] MP5 [90 п. 180 м.] |
||||||
|
[4] AK-47 [90 п. 180 м.] |
||||||
|
[5] M4 [100 п. 300 м.] |
||||||
|
[6] Rifle [30 п. 300 м.] |
||||||
|
]] |
||||||
|
dialog.convertText = function(text) |
||||||
|
text = string.format("%s\n \nВсего потрачено: %d матов\nСтоимость: %d вирт\n> Оплатить сейчас", text, config.data.mats, (config.data.mats * config.data.mats_price)) |
||||||
|
return text |
||||||
|
end |
||||||
|
dialog.reshow = function() |
||||||
|
local text = dialog.convertText(dialog.text) |
||||||
|
local bs = raknetNewBitStream() |
||||||
|
raknetBitStreamWriteInt16(bs, dialog.id) |
||||||
|
raknetBitStreamWriteInt8(bs, 2) |
||||||
|
raknetBitStreamWriteInt8(bs, 4) |
||||||
|
raknetBitStreamWriteString(bs, "Меню") |
||||||
|
raknetBitStreamWriteInt8(bs, 7) |
||||||
|
raknetBitStreamWriteString(bs, "Выбрать") |
||||||
|
raknetBitStreamWriteInt8(bs, 7) |
||||||
|
raknetBitStreamWriteString(bs, "Закрыть") |
||||||
|
raknetBitStreamWriteInt8(bs, string.len(text)) |
||||||
|
raknetBitStreamWriteString(bs, text) |
||||||
|
raknetEmulRpcReceiveBitStream(61,bs) |
||||||
|
raknetDeleteBitStream(bs) |
||||||
|
end |
||||||
|
|
||||||
|
-->> EVENTS |
||||||
|
function sampev.onServerMessage(color, message) |
||||||
|
if message:find("%[Офис%]{FFFFFF} Вы взяли {00FFBF}(.+) %(%d+ .+%) {FFFFFF}с оружейного шкафа офиса!") then |
||||||
|
local weapon = message:match("%[Офис%]{FFFFFF} Вы взяли {00FFBF}(.+) %(%d+ .+%) {FFFFFF}с оружейного шкафа офиса!") |
||||||
|
config.data.mats = config.data.mats + counter.weapon[weapon] |
||||||
|
config.save(config.data) |
||||||
|
dialog.reshow() |
||||||
|
end |
||||||
|
if message == " Операция выполнена" and os.time() - counter.reset <= 2 then |
||||||
|
addChatMessage("Счетчик материалов обнулен!") |
||||||
|
config.data.mats = 0 |
||||||
|
config.save(config.data) |
||||||
|
end |
||||||
|
if message == " Вы не в сообществе" and os.time() - counter.reset <= 2 then |
||||||
|
addChatMessage("Укажите ID сообщества командой /squadid [ID]") |
||||||
|
end |
||||||
|
end |
||||||
|
function sampev.onShowDialog(dialogId, style, title, button1, button2, text) |
||||||
|
addChatMessage(style) |
||||||
|
if title == "Меню" and text == dialog.text then |
||||||
|
dialog.id = dialogId |
||||||
|
text = dialog.convertText(text) |
||||||
|
return { dialogId, style, title, button1, button2, text } |
||||||
|
end |
||||||
|
end |
||||||
|
function sampev.onSendDialogResponse(dialogId, button, listboxId, input) |
||||||
|
if listboxId == 10 then |
||||||
|
counter.reset = os.time() |
||||||
|
sampSendChat("/squad bank "..config.data.squad_id.." "..(config.data.mats * config.data.mats_price)) |
||||||
|
return false |
||||||
|
end |
||||||
|
end |
||||||
|
|
||||||
|
-->> NEW FUNCTION |
||||||
|
function getLocalPlayerNickname() |
||||||
|
return sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED))) |
||||||
|
end |
||||||
|
function getServerAddress() |
||||||
|
local ip, port = sampGetCurrentServerAddress() |
||||||
|
return string.format("%s:%s", ip, port) |
||||||
|
end |
||||||
|
function getSampRpServerName() |
||||||
|
local result = "" |
||||||
|
local server = sampGetCurrentServerName():gsub("|", "") |
||||||
|
local server_find = { "02", "Two", "Revo", "Legacy", "Classic" } |
||||||
|
for i = 1, #server_find do |
||||||
|
if server:find(server_find[i]) then |
||||||
|
result = server_find[i] |
||||||
|
end |
||||||
|
end |
||||||
|
return result |
||||||
|
end |
||||||
|
function convertTableToString(table) |
||||||
|
local result = "" |
||||||
|
for i = 1, #table do |
||||||
|
result = string.format("%s%s\n", result, table[i]) |
||||||
|
end |
||||||
|
return result |
||||||
|
end |
||||||
|
function start_dialog(menu, put) -- module by trefa & modify (put & list in []) |
||||||
|
function _dialog(menu, id, outs, put) |
||||||
|
sampShowDialog(id, menu.settings.title, tbl_split(menu.settings.style, menu, menu.settings.forward ,menu.settings.backwards ,menu.settings.score), menu.settings.btn1, (menu.settings.btn2 ~= nil and menu.settings.btn2 or _), menu.settings.style) |
||||||
|
repeat |
||||||
|
wait(0) |
||||||
|
if put ~= nil and sampIsDialogActive() then |
||||||
|
sampSetCurrentDialogEditboxText(put) |
||||||
|
put = nil |
||||||
|
end |
||||||
|
local result, button, list, input = sampHasDialogRespond(id) |
||||||
|
if result then |
||||||
|
local out, outs = menu[((menu.settings.style == 0 or menu.settings.style == 1 or menu.settings.style == 3) and 1 or ((list + 1) > #menu[1] and 2 or 1))][((menu.settings.style == 0 or menu.settings.style == 1 or menu.settings.style == 3) and 1 or ((list + 1) > #menu[1] and (list - #menu[1]) + 1 or list + 1))].click(button, list, input, outs) |
||||||
|
if type(out) == "table" then |
||||||
|
return _dialog(out, id - 1, outs, put) |
||||||
|
elseif type(out) == "boolean" then |
||||||
|
if not out then |
||||||
|
return out |
||||||
|
end |
||||||
|
return _dialog(menu, id, outs, put) |
||||||
|
end |
||||||
|
end |
||||||
|
until result |
||||||
|
end |
||||||
|
|
||||||
|
function tbl_split(style, tbl, forward ,backwards ,score) |
||||||
|
if style == 2 or style == 4 or style == 5 then |
||||||
|
text = (style == 5 and tbl[1].text.."\n" or "") |
||||||
|
for i, val in ipairs(tbl[1]) do |
||||||
|
text = text..""..forward..""..(score and "["..(i-1).."] " or "")..""..val.title..""..backwards |
||||||
|
end |
||||||
|
if tbl[2] ~= nil then |
||||||
|
for _, val in ipairs(tbl[2]) do |
||||||
|
text = text..""..forward..""..val.title..""..backwards |
||||||
|
end |
||||||
|
end |
||||||
|
return text |
||||||
|
end |
||||||
|
return tbl[1].text |
||||||
|
end |
||||||
|
|
||||||
|
return _dialog(menu, 1337, outs, put) |
||||||
|
end |
||||||
|
function getNicknamesOnline() |
||||||
|
local result = {} |
||||||
|
for i = 0, sampGetMaxPlayerId(false) do |
||||||
|
if sampIsPlayerConnected(i) or select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)) == i then |
||||||
|
result[sampGetPlayerNickname(i)] = i |
||||||
|
end |
||||||
|
end |
||||||
|
return result |
||||||
|
end |
||||||
|
function addChatMessage(text) |
||||||
|
local tag = string.format("{667dff}[%s]{FFFFFF} ", thisScript().name) |
||||||
|
sampAddChatMessage(tag..text, 0xFFFFFFFF) |
||||||
|
end |
||||||
|
|
||||||
|
-->> SCRIPT UTF-8 |
||||||
|
-->> utf8(table path, incoming variables encoding, outcoming variables encoding) |
||||||
|
-->> table path example { "sampev", "onShowDialog" } |
||||||
|
-->> encoding options nil | AnsiToUtf8 | Utf8ToAnsi |
||||||
|
_utf8 = load([=[return function(utf8_func, in_encoding, out_encoding); if encoding == nil then; encoding = require("encoding"); encoding.default = "CP1251"; u8 = encoding.UTF8; end; if type(utf8_func) ~= "table" then; return false; end; if AnsiToUtf8 == nil or Utf8ToAnsi == nil then; AnsiToUtf8 = function(text); return u8(text); end; Utf8ToAnsi = function(text); return u8:decode(text); end; end; if _UTF8_FUNCTION_SAVE == nil then; _UTF8_FUNCTION_SAVE = {}; end; local change_var = "_G"; for s = 1, #utf8_func do; change_var = string.format('%s["%s"]', change_var, utf8_func[s]); end; if _UTF8_FUNCTION_SAVE[change_var] == nil then; _UTF8_FUNCTION = function(...); local pack = table.pack(...); readTable = function(t, enc); for k, v in next, t do; if type(v) == 'table' then; readTable(v, enc); else; if enc ~= nil and (enc == "AnsiToUtf8" or enc == "Utf8ToAnsi") then; if type(k) == "string" then; k = _G[enc](k); end; if type(v) == "string" then; t[k] = _G[enc](v); end; end; end; end; return t; end; return table.unpack(readTable({_UTF8_FUNCTION_SAVE[change_var](table.unpack(readTable(pack, in_encoding)))}, out_encoding)); end; local text = string.format("_UTF8_FUNCTION_SAVE['%s'] = %s; %s = _UTF8_FUNCTION;", change_var, change_var, change_var); load(text)(); _UTF8_FUNCTION = nil; end; return true; end]=]) |
||||||
|
function utf8(...) |
||||||
|
pcall(_utf8(), ...) |
||||||
|
end |
||||||
|
|
||||||
|
utf8({ "sampShowDialog" }, "Utf8ToAnsi") |
||||||
|
utf8({ "sampSendChat" }, "Utf8ToAnsi") |
||||||
|
utf8({ "sampAddChatMessage" }, "Utf8ToAnsi") |
||||||
|
utf8({ "print" }, "Utf8ToAnsi") |
||||||
|
utf8({ "renderGetFontDrawTextLength" }, "Utf8ToAnsi") |
||||||
|
utf8({ "renderFontDrawText" }, "Utf8ToAnsi") |
||||||
|
utf8({ "sampHasDialogRespond" }, nil, "AnsiToUtf8") |
||||||
|
utf8({ "sampev", "onServerMessage" }, "AnsiToUtf8", "Utf8ToAnsi") |
||||||
|
utf8({ "sampev", "onShowDialog" }, "AnsiToUtf8", "Utf8ToAnsi") |
||||||
|
utf8({ "sampev", "onSendDialogResponse" }, "AnsiToUtf8", "Utf8ToAnsi") |
||||||
Loading…
Reference in new issue