Compare text

Find the difference between two text files

Real-time diff

Unified diff

Collapse lines

Highlight change

Syntax highlighting

Tools

Untitled diff

Created 7 years agoDiff never expires

83 removals

514 lines

25 additions

461 lines

package.path = package.path .. ";data/scripts/lib/?.lua"

require ("galaxy")

require ("utility")

require ("faction")

require ("randomext")

require("stringutility")

local Dialog = require("dialogutility")

-- Don't remove or alter the following comment, it tells the game the namespace this script lives in. If you remove it, the script will break.

-- namespace Scrapyard

Scrapyard = {}

-- server

local licenses = {}

local illegalActions = {}

local newsBroadcastCounter = 0

-- client

local tabbedWindow = 0

local planDisplayer = 0

local sellButton = 0

local sellWarningLabel = 0

local priceLabel1 = 0

local priceLabel2 = 0

local priceLabel3 = 0

local priceLabel4 = 0

local licenseDuration = 0

local uiMoneyValue = 0

local visible = false

-- if this function returns false, the script will not be listed in the interaction window on the client,

-- even though its UI may be registered

function Scrapyard.interactionPossible(playerIndex, option)

return CheckFactionInteraction(playerIndex, -10000)

end

function Scrapyard.restore(data)

-- clear earlier data

licenses = data.licenses

illegalActions = data.illegalActions

end

function Scrapyard.secure()

-- save licenses

local data = {}

data.licenses = licenses

data.illegalActions = illegalActions

return data

end

-- this function gets called on creation of the entity the script is attached to, on client and server

function Scrapyard.initialize()

if onServer() then

Sector():registerCallback("onHullHit", "onHullHit")

local station = Entity()

if station.title == "" then

station.title = "Scrapyard"%_t

end

if onClient() and EntityIcon().icon == "" then

EntityIcon().icon = "data/textures/icons/pixel/scrapyard_fat.png"

InteractionText().text = Dialog.generateStationInteractionText(Entity(), random())

end

-- this function gets called on creation of the entity the script is attached to, on client only

-- AFTER initialize above

-- create all required UI elements for the client side

function Scrapyard.initUI()

local res = getResolution()

local size = vec2(700, 650)

local menu = ScriptUI()

local mainWindow = menu:createWindow(Rect(res * 0.5 - size * 0.5, res * 0.5 + size * 0.5))

menu:registerWindow(mainWindow, "Scrapyard"%_t)

mainWindow.caption = "Scrapyard"%_t

mainWindow.showCloseButton = 1

mainWindow.moveable = 1

-- create a tabbed window inside the main window

tabbedWindow = mainWindow:createTabbedWindow(Rect(vec2(10, 10), size - 10))

-- create a "Sell" tab inside the tabbed window

local sellTab = tabbedWindow:createTab("Sell Ship"%_t, "", "Sell your ship to the scrapyard"%_t)

size = sellTab.size

planDisplayer = sellTab:createPlanDisplayer(Rect(0, 0, size.x - 20, size.y - 60))

planDisplayer.showStats = 0

sellButton = sellTab:createButton(Rect(0, size.y - 40, 150, size.y), "Sell Ship"%_t, "onSellButtonPressed")

sellWarningLabel = sellTab:createLabel(vec2(200, size.y - 30), "Warning! You will not get refunds for crews or turrets!"%_t, 15)

sellWarningLabel.color = ColorRGB(1, 1, 0)

-- create a second tab

local salvageTab = tabbedWindow:createTab("Salvaging /*UI Tab title*/"%_t, "", "Buy a salvaging license"%_t)

size = salvageTab.size -- not really required, all tabs have the same size

local textField = salvageTab:createTextField(Rect(0, 0, size.x, 50), "You can buy a temporary salvaging license here. This license makes it legal to damage or mine wreckages in this sector."%_t)

textField.padding = 7

salvageTab:createButton(Rect(size.x - 210, 80, 200 + size.x - 210, 40 + 80), "Buy License"%_t, "onBuyLicenseButton1Pressed")

salvageTab:createButton(Rect(size.x - 210, 130, 200 + size.x - 210, 40 + 130), "Buy License"%_t, "onBuyLicenseButton2Pressed")

salvageTab:createButton(Rect(size.x - 210, 180, 200 + size.x - 210, 40 + 180), "Buy License"%_t, "onBuyLicenseButton3Pressed")

salvageTab:createButton(Rect(size.x - 210, 230, 200 + size.x - 210, 40 + 230), "Buy License"%_t, "onBuyLicenseButton4Pressed")

local fontSize = 18

salvageTab:createLabel(vec2(15, 85), "5", fontSize)

salvageTab:createLabel(vec2(15, 135), "15", fontSize)

salvageTab:createLabel(vec2(15, 185), "30", fontSize)

salvageTab:createLabel(vec2(15, 235), "60", fontSize)

salvageTab:createLabel(vec2(60, 85), "Minutes"%_t, fontSize)

salvageTab:createLabel(vec2(60, 135), "Minutes"%_t, fontSize)

salvageTab:createLabel(vec2(60, 185), "Minutes"%_t, fontSize)

salvageTab:createLabel(vec2(60, 235), "Minutes"%_t, fontSize)

priceLabel1 = salvageTab:createLabel(vec2(200, 85), "", fontSize)

priceLabel2 = salvageTab:createLabel(vec2(200, 135), "", fontSize)

priceLabel3 = salvageTab:createLabel(vec2(200, 185), "", fontSize)

priceLabel4 = salvageTab:createLabel(vec2(200, 235), "", fontSize)

timeLabel = salvageTab:createLabel(vec2(10, 310), "", fontSize)

end

-- this function gets called whenever the ui window gets rendered, AFTER the window was rendered (client only)

function Scrapyard.renderUI()

if tabbedWindow:getActiveTab().name == "Sell Ship"%_t then

renderPrices(planDisplayer.lower + 20, "Ship Value:"%_t, uiMoneyValue, nil)

end

-- this function gets called every time the window is shown on the client, ie. when a player presses F and if interactionPossible() returned 1

function Scrapyard.onShowWindow()

local ship = Player().craft

-- get the plan of the player's ship

local plan = ship:getPlan()

planDisplayer.plan = plan

if ship.isDrone then

sellButton.active = false

sellWarningLabel:hide()

else

sellButton.active = true

sellWarningLabel:show()

end

priceLabel1.caption = "$${money}"%_t % {money = Scrapyard.getLicensePrice(Player(), 5)}

priceLabel2.caption = "$${money}"%_t % {money = Scrapyard.getLicensePrice(Player(), 15)}

priceLabel3.caption = "$${money}"%_t % {money = Scrapyard.getLicensePrice(Player(), 30)}

priceLabel4.caption = "$${money}"%_t % {money = Scrapyard.getLicensePrice(Player(), 60)}

uiMoneyValue = Scrapyard.getShipValue(plan)

Scrapyard.getLicenseDuration()

visible = true

end

-- this function gets called every time the window is closed on the client

function Scrapyard.onCloseWindow()

local station = Entity()

displayChatMessage("Please, do come again."%_t, station.title, 0)

visible = false

end

function Scrapyard.onSellButtonPressed()

invokeServerFunction("sellCraft")

end

function Scrapyard.onBuyLicenseButton1Pressed()

invokeServerFunction("buyLicense", 60 * 5)

end

function Scrapyard.onBuyLicenseButton2Pressed()

invokeServerFunction("buyLicense", 60 * 15)

end

function Scrapyard.onBuyLicenseButton3Pressed()

invokeServerFunction("buyLicense", 60 * 30)

end

function Scrapyard.onBuyLicenseButton4Pressed()

invokeServerFunction("buyLicense", 60 * 60)

end

-- this function gets called once each frame, on client only

function Scrapyard.getUpdateInterval()

return 1

end

function Scrapyard.updateClient(timeStep)

licenseDuration = licenseDuration - timeStep

if visible then

if licenseDuration > 0 then

timeLabel.caption = "Your license will expire in ${time}."%_t % {time = createReadableTimeString(licenseDuration)}

else

timeLabel.caption = "You don't have a valid license."%_t

end

function Scrapyard.transactionComplete()

ScriptUI():stopInteraction()

end

function Scrapyard.getLicenseDuration()

invokeServerFunction("sendLicenseDuration")

end

function Scrapyard.setLicenseDuration(duration)

licenseDuration = duration

end

-- this function gets called once each frame, on client and server

--function update(timeStep)

--end

function Scrapyard.getLicensePrice(orderingFaction, minutes)

local price = minutes * 150 * (1.0 + GetFee(Faction(), orderingFaction)) * Balancing_GetSectorRichnessFactor(Sector():getCoordinates())

local discountFactor = 1.0

if minutes > 5 then discountFactor = 0.93 end

if minutes > 15 then discountFactor = 0.86 end

if minutes > 40 then discountFactor = 0.80 end

return round(price * discountFactor);

end

-- this function gets called once each frame, on server only

function Scrapyard.updateServer(timeStep)

local station = Entity();

newsBroadcastCounter = newsBroadcastCounter + timeStep

if newsBroadcastCounter > 60 then

Sector():broadcastChatMessage(station.title, 0, "Get a salvaging license now and try your luck with the wreckages!"%_t)

newsBroadcastCounter = 0

end

for factionIndex, actions in pairs(illegalActions) do

-- counter for update, this is only executed once per second to save performance.

for playerIndex, actions in pairs(illegalActions) do

actions = actions - 1

if actions <= 0 then

illegalActions[factionIndex] = nil

illegalActions[playerIndex] = nil

else

illegalActions[factionIndex] = actions

illegalActions[playerIndex] = actions

end

for factionIndex, time in pairs(licenses) do

for playerIndex, time in pairs(licenses) do

time = time - timeStep

local faction = Faction(factionIndex)

if not faction then goto continue end

local here = false

if faction.isAlliance then

faction = Alliance(factionIndex)

elseif faction.isPlayer then

faction = Player(factionIndex)

local px, py = faction:getSectorCoordinates()

local sx, sy = Sector():getCoordinates()

here = (px == sx and py == sy)

end

local doubleSend = false

local msg = nil

-- warn player if his time is running out

if time + 1 > 10 and time <= 10 then

if here then

Player(playerIndex):sendChatMessage(station.title, 0, "Your salvaging license will run out in 10 seconds."%_t);

msg = "Your salvaging license will run out in 10 seconds."%_t

Player(playerIndex):sendChatMessage(station.title, 2, "Your salvaging license will run out in 10 seconds."%_t);

else

msg = "Your salvaging license in %s will run out in 10 seconds."%_t

end

doubleSend = true

end

if time + 1 > 20 and time <= 20 then

if here then

Player(playerIndex):sendChatMessage(station.title, 0, "Your salvaging license will run out in 20 seconds."%_t);

msg = "Your salvaging license will run out in 20 seconds."%_t

Player(playerIndex):sendChatMessage(station.title, 2, "Your salvaging license will run out in 20 seconds."%_t);

else

msg = "Your salvaging license in %s will run out in 20 seconds."%_t

end

doubleSend = true

end

if time + 1 > 30 and time <= 30 then

if here then

Player(playerIndex):sendChatMessage(station.title, 0, "Your salvaging license will run out in 30 seconds. Renew it and save yourself some trouble!"%_t);

msg = "Your salvaging license will run out in 30 seconds. Renew it and save yourself some trouble!"%_t

else

msg = "Your salvaging license in %s will run out in 30 seconds. Renew it and save yourself some trouble!"%_t

end

if time + 1 > 60 and time <= 60 then

if here then

Player(playerIndex):sendChatMessage(station.title, 0, "Your salvaging license will run out in 60 seconds. Renew it NOW and save yourself some trouble!"%_t);

msg = "Your salvaging license will run out in 60 seconds. Renew it NOW and save yourself some trouble!"%_t

else

msg = "Your salvaging license in %s will run out in 60 seconds. Renew it NOW and save yourself some trouble!"%_t

end

if time + 1 > 120 and time <= 120 then

if here then

Player(playerIndex):sendChatMessage(station.title, 0, "Your salvaging license will run out in 2 minutes. Renew it immediately and save yourself some trouble!"%_t);

msg = "Your salvaging license will run out in 2 minutes. Renew it immediately and save yourself some trouble!"%_t

else

msg = "Your salvaging license in %s will run out in 2 minutes. Renew it immediately and save yourself some trouble!"%_t

end

if time < 0 then

licenses[factionIndex] = nil

licenses[playerIndex] = nil

if here then

Player(playerIndex):sendChatMessage(station.title, 0, "Your salvaging license expired. You may no longer salvage in this area."%_t);

msg = "Your salvaging license expired. You may no longer salvage in this area."%_t

else

msg = "Your salvaging license in %s expired. You may no longer salvage in this area."%_t

end

else

licenses[factionIndex] = time

licenses[playerIndex] = time

end

if msg then

local x, y = Sector():getCoordinates()

local coordinates = "${x}:${y}" % {x = x, y = y}

faction:sendChatMessage(station.title, 0, msg, coordinates)

if doubleSend then

faction:sendChatMessage(station.title, 2, msg, coordinates)

end

::continue::

end

function Scrapyard.sellCraft()

local buyer, ship, player = getInteractingFaction(callingPlayer, AlliancePrivilege.ModifyCrafts, AlliancePrivilege.SpendResources)

if not buyer then return end

-- don't allow selling drones, would be an infinite income source

if ship.isDrone then return end

-- Create Wreckage

local position = ship.position

local plan = ship:getPlan();

-- remove the old craft

Sector():deleteEntity(ship)

-- create a wreckage in its place

local wreckageIndex = Sector():createWreckage(plan, position)

local moneyValue = Scrapyard.getShipValue(plan)

buyer:receive(moneyValue)

invokeClientFunction(player, "transactionComplete")

end

function Scrapyard.getShipValue(plan)

local sum = plan:getMoneyValue()

local resourceValue = {plan:getResourceValue()}

for i, v in pairs (resourceValue) do

sum = sum + Material(i - 1).costFactor * v * 10;

end

-- players only get money, and not even the full value.

-- This is to avoid exploiting the scrapyard functionality by buying and then selling ships

return sum * 0.75

end

function Scrapyard.buyLicense(duration)

local buyer, ship, player = getInteractingFaction(callingPlayer, AlliancePrivilege.SpendResources)

if not buyer then return end

local price = Scrapyard.getLicensePrice(buyer, duration / 60) -- minutes!

local station = Entity()

local canPay, msg, args = buyer:canPay(price)

if not canPay then

player:sendChatMessage(station.title, 1, msg, unpack(args));

return;

end

buyer:pay(price)

-- register player's license

licenses[buyer.index] = duration

-- send a message as response

local minutes = licenses[buyer.index] / 60

player:sendChatMessage(station.title, 0, "You bought a %s minutes salvaging license."%_t, minutes);

player:sendChatMessage(station.title, 0, "%s cannot be held reliable for any damage to ships or deaths caused by salvaging."%_t, Faction().name);

Scrapyard.sendLicenseDuration()

end

function Scrapyard.sendLicenseDuration()

local duration = licenses[callingPlayer]

if duration ~= nil then

invokeClientFunction(Player(callingPlayer), "setLicenseDuration", duration)

end

function Scrapyard.onHullHit(objectIndex, block, shootingCraftIndex, damage, position)

local object = Entity(objectIndex)

if object and object.isWreckage then

local shooter = Entity(shootingCraftIndex)

if shooter then

local faction = Faction(shooter.factionIndex)

if not faction.isAIFaction and licenses[faction.index] == nil then

Scrapyard.unallowedDamaging(shooter, faction, damage)

end

function Scrapyard.unallowedDamaging(shooter, faction, damage)

local pilots = {}

if faction.isAlliance then

for _, playerIndex in pairs({shooter:getPilotIndices()}) do

local player = Player(playerIndex)

if player then

table.insert(pilots, player)

end

elseif faction.isPlayer then

table.insert(pilots, Player(faction.index))

end

local station = Entity()

local actions = illegalActions[faction.index]

if actions == nil then

actions = 0

end

newActions = actions + damage

for _, player in pairs(pilots) do

if actions < 10 and newActions >= 10 then

player:sendChatMessage(station.title, 0, "Salvaging or damaging wreckages in this sector is illegal. Please buy a salvaging license."%_t);