main.lua

local Ing = require "ingredient"
local Pot = require "potion"
local Cust = require "customer"
local GC = require "gameContent"
local GI = require "gameImages"
g = love.graphics

function love.load()

  GC.initialize()
  GI.initialize()
  
  love.math.setRandomSeed(os.time() + love.mouse.getX())
  
  ingredients[1].discovered = true
  ingredients[2].discovered = true
  ingredients[1].quantity = 300
  ingredients[2].quantity = 300
  
  bgmusic = love.audio.newSource("assets/theme.wav", "static")
  bgmusic:setLooping(true)
  bgmusic:play()
  
  keyFont = g.newImageFont("assets/keycaps.png", 'abcdefghijklmnopqrstuvwxyz./1234567890')
  regFont = g.newImageFont("assets/regular.png", 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890!?.,()\'":;@+-*/%#^= ')
  regSmFont = g.newImageFont("assets/regularSm.png", 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890!?.,()\'":;@+-*/%#^= ')
  potionSheet = g.newImage("assets/potiongrid.png")
  
  --important vars that manage game state which isn't janky at all
  state = {
    isBrewing = false,
    customerPresent = false,
    isSelling = false,
    isTalking = false,
    isBookOpen = false,
    isInspectingIngredients = false,
    isInspectingPotions = false,
    congratsPopover = nil,
    inspecting = nil,
    currentCustomer = nil,
    convoState = 1,
    currPage = 0
  }
  
  barrelContents = 0
  brewContents = {}
  forSale = {}
  onTable = {}
  minPage = 0
  maxPage = 34
  counter = 1
  lastTalked = 0
  errorMessage = nil
  intro = 1
  gameOver = false

end

function love.update(dt)
  if state.currentCustomer == nil and math.abs(lastTalked - counter) >= 400 then
    for i=1, table.getn(customers) do
      if (counter % (i*math.random(150)) == 0 and customers[i].visited == false) then
        state.customerPresent = true
        state.currentCustomer = customers[i]
        print(state.currentCustomer.name)
        customers[i].visited = true
        lastTalked = counter
        return
      end
    end
  end
  counter = counter + 1
  
end

function love.draw()
  
  if intro <= 4 then
    g.draw(titleCard)
    if intro > 1 then
      g.setColor(1,1,1,.75)
      g.rectangle('fill',0,0,800,600)
      g.reset()
      g.setFont(regFont)
      if intro == 2 then
        g.printf(introPage2, 100, 100, 600, 'center')
      elseif intro == 3 then
        g.printf(introPage3, 100, 100, 600, 'center')
      elseif intro == 4 then
        g.printf(introPage4, 100, 100, 600, 'center')
      end
    end
    
 elseif gameOver then
   g.draw(titleCard)
   g.setColor(1,1,1,.75)
    g.rectangle('fill',0,0,800,600)
    g.reset()
    g.setFont(regFont)
    g.printf(gameOverText, 100, 100, 600, 'center')
  
  else
  
  g.draw(background)
  
  
  g.setColor(.9,.9,.9,.75)
  g.rectangle('fill',436,200,60,30)
  g.reset()
  g.setFont(regFont)
  g.printf(barrelContents.."/10", 440, 200, 60)
  
  --show the ingredients that are discovered - currently testing has them all discovered
  g.setFont(keyFont)
  for i=1, table.getn(ingredients) do
    if ingredients[i].discovered == true then
      y = 42 + (62 * math.floor((i-1)/6))
      x = 26 + math.floor((350 * (i-1)) / 6) % 350
      if ingredients[i].quantity == 0 then
        g.setColor(1, 1, 1, .5)
        g.draw(ingredients[i].img, x, y)
        g.reset()
      else
        g.draw(ingredients[i].img, x, y)
      end
      
      if state.isBrewing or state.isInspectingIngredients then
        g.printf(ingredients[i].letterMap, x, y + 35, 30)
      end
      
    end
  end
  
  --show the potions on the table
  for i=1, table.getn(onTable) do
    x = 50 + (60 * i)
    y = 330
    g.draw(potionSheet, onTable[i].img, x, y)
    if state.isBrewing or state.isInspectingPotions or state.isSelling then
      g.printf(i, x, y+35, 30)
    end
    
  end
  
  --show details about a potion
  if state.isInspectingPotions then
    g.draw(brewBox, 420, 370)
    if state.inspecting then
      g.setFont(regFont)
      g.draw(potionSheet, state.inspecting.img, 430, 390)
      g.printf(state.inspecting.name, 488, 390, 300)
      g.setFont(regSmFont)
      g.printf(state.inspecting.desc, 430, 480, 360)
      g.printf("QNTY: "..state.inspecting.quantity, 530, 550, 100)
      g.setFont(keyFont)
    end
  end
  
  --show details about an ingredient
  if state.isInspectingIngredients then
    g.draw(brewBox, 420, 370)
    if state.inspecting then
      g.setFont(regFont)
      g.draw(state.inspecting.img, 430, 390)
      g.printf(state.inspecting.name, 488, 390, 300)
      g.setFont(regSmFont)
      g.printf(state.inspecting.desc, 430, 480, 360)
      g.printf("QNTY: "..state.inspecting.quantity, 530, 550, 100)
      g.setFont(keyFont)
    end
  end
  
  --show the potions that are for sale
  for i=1, table.getn(forSale) do
    g.draw(potionSheet, forSale[i].img, 670, 30)
    
  end
  
  
  --if a customer is here then open the door
  if state.customerPresent then
    g.draw(customer, 500, 116)
  else
    g.draw(door, 528, 69)
  end
  
  --if you're brewing, open the brew box
  if state.isBrewing then
    g.draw(brewBox, 420, 370)
    g.setFont(regSmFont)
    g.printf("Combine two ingredients:", 430, 390, 180)
    if table.getn(brewContents) > 0 then
      for i=1, table.getn(brewContents) do
        g.printf(brewContents[i].name, 430, 420 + 60*(i-1), 180)
      end
    end
    if table.getn(brewContents) >= 1 then
      g.printf("combines with", 430, 450, 180)
      if table.getn(brewContents) == 2 then
        g.printf(" to brew!", 450, 550, 100)
        g.setFont(keyFont)
        g.printf("9",430, 540, 30)
      end
    end
    
  elseif state.isBookOpen then
    g.draw(openBook)
    populateBook(state.currPage)
  elseif state.congratsPopover then
    if state.congratsPopover[1] == 'failure' then
      g.draw(uhoh)
      if state.congratsPopover[2] == 'convo' then
        g.setFont(regSmFont)
        if state.congratsPopover[3] then
          g.printf("You didn't give this customer what they wanted. Out of pure pity, they've given you an ingredient so that you might brew new potions (and maybe eventually someday the one they want.).", 140, 260, 500, 'center')
          g.setFont(regFont)
          g.draw(state.congratsPopover[3].img, 140, 360)
          g.printf(state.congratsPopover[3].name, 200, 360, 500)
          g.setFont(regSmFont)
          g.printf(state.congratsPopover[3].desc, 200, 400, 500)
        else
          g.printf("You didn't give this customer what they wanted. Out of pure pity, they've given you an ingredient, but unfortunately it's one you already have. BORING.", 140, 260, 500, 'center')
        end
      elseif state.congratsPopover[2] == 'brew' then
        g.setFont(regSmFont)
        g.printf("Your attempt at brewing a new potion didn't work. Now you must dump your useless sludge into the unstable mixture barrel, thus making it inherently more unstable. Your barrel is now "..barrelContents.."/10ths full.", 140, 260, 500)
      end
      
    else
      g.draw(congrats)
      if state.congratsPopover[2] == 'convo' then
        g.setFont(regSmFont)
        g.printf("You traded the customer what they wanted. As a token of their gratitude, they left you with a parting gift: a description of a potion they heard about long ago. Hopefully it helps. Might want to write it down.", 140, 260, 500, 'center')
        g.printf(state.congratsPopover[3], 140, 380, 500, 'center')
        
      elseif state.congratsPopover[2] == 'brew' then
        g.setFont(regFont)
        g.printf("You successfully discovered a new brew!", 100, 260, 600, 'center')
        g.draw(potionSheet, state.congratsPopover[3].img, 140, 360)
        g.printf(state.congratsPopover[3].name, 200, 360, 500)
        g.setFont(regSmFont)
        g.printf(state.congratsPopover[3].desc, 200, 400, 500)
      end
      
    end
    
  elseif (state.isTalking) then
    g.draw(dialogBox, 10, 340)
    g.draw(state.currentCustomer.img, 26, 352)
    g.setFont(regFont)
    if (state.convoState == 1) then
      g.printf("right arrow to continue", 400, 550, 500)
    end
    
    g.printf(state.currentCustomer.name, 28, 540, 200)
    g.printf(state.currentCustomer.content[state.convoState], 200, 380, 500)
    if state.convoState == 2 then
      g.setFont(keyFont)
      g.printf('y', 200, 550, 30)
      g.setFont(regFont)
      g.printf("for yes", 230, 544, 120)
      g.setFont(keyFont)
      g.printf('n', 380, 550, 30)
      g.setFont(regFont)
      g.printf("for no", 410, 544, 100)
    end
    g.setFont(keyFont)
  elseif not (state.isInspectingPotions or state.isInspectingIngredients or state.isSelling) then
    g.draw(brewSign, 140, 500)
    g.setFont(keyFont)
    g.printf('1', 258, 532, 30)
    g.draw(inspectSign, 50, 290)
    g.printf('4', 210, 295, 30)
    g.printf('5', 280, 295, 30)
    g.draw(sellSign, 534, 0)
    g.printf('2', 765, 6, 30)
    g.draw(bookSign, 650, 500)
    g.printf('6', 732, 520, 30)
    if state.customerPresent then
      g.draw(customerSign, 510, 230)
      g.printf('3', 515, 235, 30)
    end
    
  end
  
  if errorMessage then
    g.setFont(regFont)
    g.printf(errorMessage, 20, 348, 600)
  end
  end

end


--pretty much everything happens here!
function love.keyreleased(k)
  
  errorMessage = nil
  
  if intro <= 4 then
    intro = intro + 1
  end
  
  
  if k == 'right' and state.isBookOpen == true then
    state.currPage = math.min(state.currPage + 2, maxPage)
    return
  elseif k == 'left' and state.isBookOpen == true then
    state.currPage = math.max(state.currPage - 2, minPage)
    return
  end
  

  if not checkExit(k) then
    
    if state.isBrewing then
      tryAddIngredient(k)
    elseif state.isSelling then
      trySellPotion(k)
    elseif state.isTalking then
      conversation(k)
    elseif state.isInspectingIngredients then
      setInspectI(k)
    elseif state.isInspectingPotions then
      setInspectP(k)
    else
      tryChangeState(k)
    end
    
  else 
    exitStates()
  end  

end

--make sure that the user isn't trying to get out of the current state
function checkExit(k)
  if k == '0' or k == 'escape' then
    return true
  end
end

function setInspectI(k)
  state.inspecting = findIngredient(k)
  if state.inspecting and state.inspecting.discovered == false then state.inspecting = nil end
end

function setInspectP(k)
  if onTable[tonumber(k)] then
    state.inspecting = onTable[tonumber(k)]
  end
end


--validate that the ingredient can be added to brewContents
function tryAddIngredient(k)
  
  if table.getn(brewContents) == 2 then
    if k == '9' then
      tryCompleteBrew()
    end
    return
  end  
  
  ingred = findIngredient(k)
  if ingred ~= nil and ingred.discovered == false then ingred = nil return end
  
  if ingred == nil then
    ingred = findPotion(k)
    if ingred == nil then
      return
    end
  end
  
  if ingred.quantity >= 1 then
    table.insert(brewContents, ingred)
  end
  
end

--talking to a customer
function conversation(k)
  
  if state.convoState == 1 and k == 'right' then
    state.convoState = state.convoState + 1
  elseif state.convoState == 2 then
    if k == 'y' then
      for i=1, table.getn(forSale) do
        if forSale[i].id == state.currentCustomer.want then
          state.convoState = 3
          forSale[i].quantity = forSale[i].quantity - 1
          if forSale[i].quantity == 0 then table.remove(forSale, i) end
          goto continue        
        end
      end
      errorMessage = "*You don't have this potion up for sale.*"
      ::continue::
    elseif k == 'n' then
      state.convoState = 4
    end
  elseif state.convoState == 3 then
    exitStates()
    local hint = state.currentCustomer.givesHint
    state.congratsPopover = {'success', 'convo', potions[hint].desc}
    state.currentCustomer = nil
    state.customerPresent = false
    lastTalked = counter
  elseif state.convoState == 4 then
    exitStates()
    local ingredient = ingredients[state.currentCustomer.givesIngredient]
    ingredient.quantity = ingredient.quantity + 1
    if ingredient.discovered == true then
      ingredient = nil 
    else
      ingredient.discovered = true
    end
    state.congratsPopover = {'failure', 'convo', ingredient}
    
    state.currentCustomer = nil
    state.customerPresent = false
    lastTalked = counter
  end
  
  
end

--enter a different game state (exits other game states as well)
function tryChangeState(k)
  
  exitStates()
  
  if k == '1' then --start brew!
    state.isBrewing = true
  elseif k == '2' then --put potion up for sale!
    state.isSelling = true
  elseif k == '3' and state.customerPresent then --talk to customer!
    state.isTalking = true
  elseif k == '4' then --inspect ingredients
    state.isInspectingIngredients = true
  elseif k == '5' then --inspect potions
    state.isInspectingPotions = true
  elseif k == '6' then --book open
    state.isBookOpen = true
  end
  
end

--go back to totally neutral "nothing happening"
function exitStates()
  state.isBrewing = false
  state.isSelling = false
  state.isTalking = false
  state.isBookOpen = false
  state.isInspectingIngredients = false
  state.isInspectingPotions = false
  state.congratsPopover = nil
  state.inspecting = nil
  state.convoState = 1
  brewContents = {}
end

--check to see if the created potion is legit or not, add potion to table, congrats popover
function tryCompleteBrew()
  
  local i1 = brewContents[1].id
  local i2 = brewContents[2].id
  exitStates()
  local finalBrew = {i1, i2}
  ingredients[i1].quantity = ingredients[i1].quantity - 1
  ingredients[i2].quantity = ingredients[i2].quantity - 1

  table.sort(finalBrew)
  
  for i = 1, table.getn(potions) do
    if ingredientsMatch(potions[i].ingreds, finalBrew) then
      if potions[i].discovered == false then
        state.congratsPopover = {'success', 'brew', potions[i]}
        potions[i].discovered = true
      end
      potions[i].quantity = potions[i].quantity + 1
      if potions[i].quantity == 1 then 
        table.insert(onTable, potions[i])
      end
      return
    end
  end
  
  barrelContents = barrelContents + 1
  if barrelContents >= 10 then
    gameOver = true
  end
  
  state.congratsPopover = {'failure','brew',barrelContents}
  
end

function ingredientsMatch(a, b)
  
    if a[1] == b[1] and a[2] == b[2] then
      return true
    elseif a[1] == b[2] and a[2] == b[1] then
      return true
    end
    
    return false
  
  end

--return relevant ingredient based on matched keystroke
function findIngredient(k)
  
  for i=1, table.getn(ingredients) do
    if ingredients[i].letterMap == k then
      return ingredients[i]
    end
    
  end
  
  return nil
  
end

--return relevant potion based on matched keystroke
function findPotion(k)
  
  for i=1, table.getn(onTable) do
    if k == i then
      return onTable[i]
    end
  end
  
  return nil
  
end

function trySellPotion(k)
  
  local p = findPotion(tonumber(k))
  if not p then return end
  table.insert(forSale, p)
  removeTablePotion(p, tonumber(k))
  exitStates()
  
end

--validation happens in conversation()
function removeForSale(p)
  table.remove(forSale, p)
end

--validation happens in tryAddIngredient() and trySellPotion()
function removeTablePotion(p, k)
  if p.quantity == 1 then
    table.remove(onTable, k)
  else
    p.quantity = p.quantity - 1
  end
  
end

function populateBook(page)
  
  --ingredients pages 0 - 2
  if page <= 2 then
    local start = math.max(page * 6, 1)
    local opp = 0
    g.setFont(regFont)
    g.printf("INGREDIENTS", 60, 36, 320)
    g.setFont(regSmFont)
    for i=start, start + 12 do
      ing = ingredients[i]
      if ing.id - 6 >= start then
          opp = 350
        end
        local modif = i % 12
          if modif == 0 then
            modif = 12
          end
      if ing.discovered == true then
        x = 60 + opp
        y = 70 * modif + 10 - (opp + math.floor(opp*.1))
        g.draw(ing.img, x, y)
        g.printf(ing.name..': '..ing.desc, x + 56, y + 10, 290)
      else
        g.printf('#'..ing.id..' is undiscovered', 56 + opp, 70 * modif + 20 - (opp + math.floor(opp*.1)), 300)
      end
    end
    
  --potions pages 4 - ??
  elseif page <= 40 then
    local pstart = (page-4)/2*7
    local popp = 0
    local counter = 0
    g.setFont(regFont)
    g.printf("POTIONS #"..math.max(pstart,1).." - " .. math.min(pstart+7, 107), 60, 36, 300)
    g.setFont(regSmFont)
    for i=math.max(pstart,1), pstart + 8 do
      if page < 34 then
        p = potions[i]
      else
        if counter == 3 then return end
        p = potions[105 + counter]
        counter = counter + 1
      end
        if p.id - 3 > pstart then
          popp = 350
        else
          popp = 0
        end
        local modif = i % 7
          if modif == 0 then
            modif = 7
          end
        if p.discovered == true then
          x = 60 + popp
          y = 124 * (modif) - (popp ) - math.floor(popp*.25) - 30
            g.draw(potionSheet, p.img, x, y)
            g.printf(p.name..': '..p.desc, x + 56, y, 290)
            g.printf("*"..ingredients[p.ingreds[1]].name .. " + " .. ingredients[p.ingreds[2]].name.."*", x-6, y+100, 360)
            g.printf("-------------------------------------------------", x-6, y+110, 300)
        else
            g.printf('#'..p.id..' is undiscovered', 60 + popp, 124 * (modif) - (popp ) - math.floor(popp*.25) - 30, 300)
        end
      
    end
    
      

  end
  
end