hexyz is tower defense game, and a lua library for dealing with hexagonal grids
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

184 lines
4.8 KiB

math.randomseed(os.time())
math.random()
math.random()
math.random()
-- assets/non-or-trivial code
require "color"
require "sound"
require "texture"
require "src/entity"
require "src/extra"
require "src/geometry"
require "src/hexyz"
require "src/grid"
require "src/mob"
require "src/projectile"
require "src/tower"
-- Globals
WIN = am.window{
width = 1920,
height = 1080,
title = "hexyz",
}
OFF_SCREEN = vec2(WIN.width * 2) -- arbitrary pixel position that is garunteed to be off screen
WORLD = false -- root scene node of everything considered to be in the game world
TIME = 0 -- runtime of the current game in seconds (not whole program runtime)
SCORE = 0 -- score of the player
MONEY = 0 -- available resources
MOUSE = false -- position of the mouse at the start of every frame, if an action is tracking it
-- global audio settings
MUSIC_VOLUME = 0.1
SFX_VOLUME = 0.1
-- top right display types
local TRDTS = {
NOTHING = -1,
CENTERED_EVENQ = 0,
EVENQ = 1,
HEX = 2,
PLATFORM = 3,
PERF = 4,
SEED = 5
}
local TRDT = TRDTS.SEED
local function game_action(scene)
if SCORE < 0 then game_end() end
TIME = TIME + am.delta_time
SCORE = SCORE + am.delta_time
MOUSE = WIN:mouse_position()
local hex = pixel_to_hex(MOUSE - WORLDSPACE_COORDINATE_OFFSET)
local rounded_mouse = hex_to_pixel(hex) + WORLDSPACE_COORDINATE_OFFSET
local evenq = hex_to_evenq(hex)
local centered_evenq = evenq{ y = -evenq.y } - vec2(math.floor(HEX_GRID_WIDTH/2)
, math.floor(HEX_GRID_HEIGHT/2))
local tile = HEX_MAP.get(hex.x, hex.y)
local hot = is_interactable(tile, evenq{ y = -evenq.y })
do_entity_updates()
do_mob_spawning()
if WIN:mouse_pressed"left" then
if hot and is_buildable(hex, tile, nil) then
make_and_register_tower(hex)
end
end
if WIN:key_pressed"escape" then game_end()
elseif WIN:key_pressed"f1" then TRDT = (TRDT + 1) % #table.keys(TRDTS)
end
if tile and hot then
WIN.scene"hex_cursor".center = rounded_mouse
else
WIN.scene"hex_cursor".center = OFF_SCREEN
end
WIN.scene"score".text = string.format("SCORE: %.2f", SCORE)
WIN.scene"money".text = string.format("MONEY: %d", MONEY)
do
local str = ""
if TRDT == TRDTS.CENTERED_EVENQ then
str = centered_evenq.x .. "," .. centered_evenq.y .. " (cevenq)"
elseif TRDT == TRDTS.EVENQ then
str = evenq.x .. "," .. evenq.y .. " (evenq)"
elseif TRDT == TRDTS.HEX then
str = hex.x .. "," .. hex.y .. " (hex)"
elseif TRDT == TRDTS.PLATFORM then
str = string.format("%s %s lang %s", am.platform, am.version, am.language())
elseif TRDT == TRDTS.PERF then
str = table.tostring(am.perf_stats())
elseif TRDT == TRDTS.SEED then
str = "SEED: " .. HEX_MAP.seed
end
WIN.scene"coords".text = str
end
end
function game_end()
WIN.scene.paused = true
-- de-initialize stuff
delete_all_entities()
SCORE = 0
WIN.scene = game_scene()
end
function update_score(diff)
SCORE = SCORE + diff
end
local function toolbelt()
local toolbelt_height = hex_height(HEX_SIZE) * 2
local toolbelt = am.group{
am.rect(WIN.left, WIN.bottom, WIN.right, WIN.bottom + toolbelt_height, COLORS.TRANSPARENT)
}
--[[
local padding = 22
local size = toolbelt_height - padding
for i = 0, 0 do
toolbelt:append(
am.translate(vec2(size + padding, 0) * i + vec2(WIN.left + padding/3, WIN.bottom + padding/3))
^ am.rect(0, 0, size, size, COLORS.BLACK)
)
end
]]
return toolbelt
end
-- @NOTE must be global to allow the game_action to reference it
function game_scene()
local score = am.translate(WIN.left + 10, WIN.top - 20) ^ am.text("", "left"):tag"score"
local money = am.translate(WIN.left + 10, WIN.top - 40) ^ am.text("", "left"):tag"money"
local coords = am.translate(WIN.right - 10, WIN.top - 20) ^ am.text("", "right", "top"):tag"coords"
local hex_cursor = am.circle(OFF_SCREEN, HEX_SIZE, COLORS.TRANSPARENT, 6):tag"hex_cursor"
local curtain = am.rect(WIN.left, WIN.bottom, WIN.right, WIN.top, COLORS.TRUE_BLACK)
curtain:action(coroutine.create(function()
am.wait(am.tween(curtain, 3, { color = vec4(0) }, am.ease.out(am.ease.hyperbola)))
WIN.scene:remove(curtain)
end))
HEX_MAP, WORLD = random_map()
local scene = am.group{
WORLD,
curtain,
hex_cursor,
toolbelt(),
score,
money,
coords,
}
scene:action(game_action)
--scene:action(am.play(SOUNDS.TRACK1))
return scene
end
load_textures()
WIN.scene = game_scene()
noglobals()