menu.rb

# Copyright 2019 Victor David Santos
#
# This file is part of Super Bombinhas.
#
# Super Bombinhas is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# Super Bombinhas is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with Super Bombinhas.  If not, see <https://www.gnu.org/licenses/>.

require 'minigl'
require_relative 'world'
require_relative 'player'
require_relative 'options'
include MiniGL

class SavedGameButton < Button
  include FormElement

  def initialize(x, y)
    super(x: x, y: y, width: 368, height: 80)
  end
end

class NewGameButton < Button
  include FormElement

  attr_reader :text_id

  def initialize(index, x, y, menu)
    super(x: x, y: y, width: 368, height: 80) {
      menu.go_to_new_game(@index - 1)
      SB.play_sound @sound
    }
    @index = index
    @img = Res.img(:ui_bgGameSlot)
    @text = SB.text(:new_game)
    @text_id = :new_game
    @sound = Res.sound :btn1
  end

  def draw(alpha = 0xff, z_index = 0)
    @img.draw @x, @y, 0, 2, 2
    SB.font.draw_text_rel @index.to_s, @x + 365, @y + 40, 0, 1, 0.5, 3, 3, 0x80000000
    SB.text_helper.write_line(@text, @x + 185, @y + 24, :center, 0xffffff, 255, :border, 0, 2, 255, 0, 3, 3)
  end
end

class SavedGame
  include FormElement

  def initialize(index, x, y, name, bomb, world_stage, specs, score, stars, completion)
    @index = index
    @x = x
    @y = y
    @name = name
    @world_stage = world_stage
    @specs = specs.split(',').size
    @score = score
    @bg = Res.img(:ui_bgGameSlot)
    @bomb = Res.img("icon_Bomba#{bomb.capitalize}")
    @map_icon = Res.img(:icon_map)
    @spec_icon = Res.img(:icon_spec)
    @score_icon = Res.img(:icon_score)

    if stars.split(',').uniq.size == C::TOTAL_LEVELS
      @badge = Res.img(:ui_goldBadge)
      @glow_color = 0xffdd80
    elsif completion.to_i == 3
      @badge = Res.img(:ui_silverBadge)
      @glow_color = 0xeeeeee
    elsif completion.to_i > 0
      @badge = Res.img(:ui_bronzeBadge)
      @glow_color = 0xff9933
    end
    @effects = []
  end

  def update
    return unless @badge

    if rand < 0.05
      x = @x + rand(80) + 263
      y = @y + rand(82) - 7
      @effects << Effect.new(x, y, :fx_Glow1, 3, 2, 6, [0, 1, 2, 3, 4, 5, 4, 3, 2, 1, 0], 66)
    end

    @effects.reverse_each do |e|
      e.update
      @effects.delete(e) if e.dead
    end
  end

  def set_position(x, y)
    @x = x; @y = y
  end

  def draw
    @bg.draw @x, @y, 0, 2, 2
    @bomb.draw @x + 5, @y + 5, 0, 2, 2
    @map_icon.draw @x + 45, @y + 42, 0, 2, 2
    @spec_icon.draw @x + 120, @y + 42, 0, 2, 2
    @score_icon.draw @x + 185, @y + 42, 0, 2, 2
    if @badge
      @badge.draw(@x + 270, @y, 0, 2, 2)
      @effects.each { |e| e.draw(nil, 2, 2, 255, @glow_color) }
    end
    SB.font.draw_text_rel @index.to_s, @x + 365, @y + 40, 0, 1, 0.5, 3, 3, 0x80000000
    SB.text_helper.write_line @name, @x + 45, @y + 5, :left, 0xffffff, 255, :border, 0, 2, 255, 0, 3, 3
    SB.text_helper.write_line @world_stage, @x + 75, @y + 43
    SB.text_helper.write_line @specs.to_s, @x + 150, @y + 43
    SB.text_helper.write_line @score, @x + 215, @y + 43
  end
end

class CloudEffect
  attr_reader :dead

  def initialize(x, y, speed, scale)
    @img = Res.img(:fx_cloud)
    @x = x
    @y = y
    @speed = speed
    @scale = scale
  end

  def update
    @x += @speed
    @dead = true if @x > C::SCREEN_WIDTH
  end

  def draw
    @img.draw(@x, @y, 0, @scale, @scale)
  end
end

class Menu
  class << self
    def initialize
      @bg = Res.img :bg_start, true
      @title = Res.img :ui_title, true
      @clouds = []
      5.times do
        @clouds << CloudEffect.new(rand(500) - 1000, rand(210) - 10, 2 + rand * 3, 1.5 + rand * 1.5)
      end

      @form = Form.new(
        # 0 - start screen
        [
          MenuButton.new(250, :play) {
            @form.go_to_section 9
          },
          MenuButton.new(300, :help) {
            @form.go_to_section 7
          },
          MenuButton.new(350, :options) {
            Options.set_temp
            @form.go_to_section 5
          },
          MenuButton.new(400, :credits) {
            @form.go_to_section 6
          },
          MenuButton.new(450, :editor) {
            SB.show_editor
          },
          MenuButton.new(500, :exit, true) {
            @form.go_to_section(8)
          }
        ],
        # 1 - saved games
        [],
        # 2 - continue/delete saved game
        [
          MenuButton.new(295, :continue) {
            @form.go_to_section(11)
          },
          MenuButton.new(345, :delete) {
            @form.go_to_section 4
          },
          MenuButton.new(395, :back, true) {
            go_to_saved_games
          }
        ],
        # 3 - new game name input
        [
          (@txt_name = MenuTextField.new(295)),
          MenuText.new(:what_name, 400, 220, 400, :center),
          MenuButton.new(345, :play) {
            @form.go_to_section(11) unless @txt_name.text.empty?
          },
          MenuButton.new(395, :back, true) {
            go_to_saved_games
          }
        ],
        # 4 - confirm delete saved game
        [
          MenuText.new(:delete_confirm, 400, 270, 400, :center),
          MenuButton.new(345, :no, true) {
            @form.go_to_section(2)
          },
          MenuButton.new(395, :yes) {
            File.delete(@selected_game)
            add_game_slots
            go_to_saved_games
          }
        ],
        # 5 - options
        Options.get_menu,
        # 6 - credits
        [
          MenuButton.new(550, :back, true) {
            @form.go_to_section 0
          },
          MenuText.new(:credits_prog, 400, 157, 780, :center, 1.5),
          MenuText.new("Victor David Santos", 400, 180, 780, :center),
          MenuText.new(:credits_music, 400, 237, 780, :center, 1.5),
          MenuText.new("Zergananda (soundcloud.com/zergananda)\nFrancesco Corrado (soundcloud.com/franzcorradomusic)", 400, 260, 780, :center),
          MenuText.new(:special_thanks, 400, 347, 780, :center, 1.5),
          MenuText.new("Yuri David Santos  -  Maria Alice Armelin  -  Francesco Corrado\nVinícius de Araújo Barboza  -  Stefano Girardi  -  Jorge Maldonado Ventura", 400, 370, 780, :center),
          MenuText.new(:special_thanks2, 400, 440, 780, :center),
        ],
        # 7 - help
        [
          MenuButton.new(550, :back, true) {
            @form.go_to_section 0
          },
          MenuText.new(:help_text, 400, 170, 700, :center)
        ],
        # 8 - confirm exit
        [
          MenuText.new(:confirm_exit, 400, 250, 400, :center),
          MenuButton.new(310, :yes, false, 219) {
            SB.save_options
            exit
          },
          MenuButton.new(310, :no, true, 409) {
            @form.go_to_section(0)
          }
        ],
        # 9 - story/custom
        [
          MenuButton.new(295, :story) {
            go_to_saved_games
          },
          MenuButton.new(345, :custom) {
            set_custom_slots
            @form.go_to_section(10)
          },
          MenuButton.new(395, :back, true) {
            @form.go_to_section(0)
          }
        ],
        # 10 - select custom level
        [],
        # 11 - select difficulty mode
        [
          MenuText.new(:select_mode, 400, 180, 400, :center),
          MenuButton.new(230, :old_school) {
            start_game(false)
          },
          MenuText.new(:old_school_desc, 400, 270, 760, :center, 1.5),
          MenuButton.new(330, :casual) {
            start_game(true)
          },
          MenuText.new(:casual_desc, 400, 370, 760, :center, 1.5),
          MenuButton.new(430, :back, true) {
            if @custom_level
              @form.go_to_section(10)
            elsif @selected_game
              @form.go_to_section(2)
            else
              @form.go_to_section(3)
            end
          }
        ]
      )
      Options.form = @form

      add_game_slots
    end

    def update
      @clouds.reverse_each do |c|
        c.update
        if c.dead
          @clouds.delete(c)
          @clouds << CloudEffect.new(rand(500) - 1000, rand(210) - 10, 2 + rand * 3, 1.5 + rand * 1.5)
        end
      end
      if @form.cur_section_index == 3 && @form.section(3).cur_btn == @txt_name && SB.key_pressed?(:confirm)
        @form.go_to_section(11) unless @txt_name.text.empty?
      end
      @form.update
    end

    def reset
      @form.reset
      @txt_name.text = ''
      add_game_slots
      Options.form = @form
      SB.play_song Res.song(:main)
    end

    def update_lang
      @form.update_lang
    end

    def add_game_slots
      components = []
      @saved_games = []
      games = Dir["#{SB.save_dir}/*"].sort
      next_index = 0
      sound = Res.sound :btn1
      games.each do |g|
        file = g.split('/')[-1]
        next unless /^[0-9]$/ =~ file
        num = file.to_i
        (next_index...num).each do |i|
          components << NewGameButton.new(i + 1, 21 + (i % 2) * 390, 95 + (i / 2) * 90, self)
        end
        next_index = num + 1
        data = IO.readlines(g).map { |l| l.chomp }
        saved_game = SavedGame.new(num + 1, 21 + (num % 2) * 390, 95 + (num / 2) * 90, data[0], data[3], data[2], data[6], data[5], data[13], data[11])
        @saved_games << saved_game
        components << saved_game
        components <<
          SavedGameButton.new(21 + (num % 2) * 390, 95 + (num / 2) * 90) {
            @selected_game = g
            @form.go_to_section 2
            SB.play_sound sound
          }
      end
      (next_index...C::GAME_LIMIT).each do |i|
        components << NewGameButton.new(i + 1, 20 + (i % 2) * 390, 95 + (i / 2) * 90, self)
      end
      components << MenuButton.new(550, :back, true) {
        @form.go_to_section 9
      }
      components << MenuText.new(:choose_game, 780, 25, 380, :right)
      section = @form.section(1)
      section.clear
      components.each { |c| section.add(c) }
    end

    def set_custom_slots(page = 0)
      section = @form.section(10)
      section.clear
      section.add(MenuText.new(:select_level, 400, 230, 760, :center))
      levels = (Dir["#{SB.save_dir}/levels/*"].reduce([]) do |obj, l|
        stage = l.split('/')[-1].split('-')[0]
        obj << stage unless obj.include?(stage) || stage == '__temp'
        obj
      end).sort
      levels[(page * 20)...((page + 1) * 20)].each_with_index do |l, i|
        section.add(MenuButton.new(270 + (i / 4) * 50, l, false, 44 + (i % 4) * 180, true) {
          @custom_level = l
          @form.go_to_section(11)
        })
      end
      page_count = (levels.size - 1) / 20 + 1
      if page_count > 1 && page > 0
        section.add(MenuArrowButton.new(44, 550, 'Left') {
          set_custom_slots(page - 1)
        })
      end
      section.add(MenuButton.new(550, :back, true) {
        @form.go_to_section(9)
        @custom_level = nil
      })
      if page_count > 1 && page < page_count - 1
        section.add(MenuArrowButton.new(720, 550, 'Right') {
          set_custom_slots(page + 1)
        })
      end
    end

    def go_to_new_game(index)
      @new_game_index = index
      @form.go_to_section 3
    end

    def go_to_saved_games
      @selected_game = nil
      @form.go_to_section(1)
    end

    def start_game(casual)
      if @custom_level
        SB.load_custom_stage(@custom_level, casual)
      elsif @selected_game
        SB.load_game(@selected_game, casual)
      else
        SB.new_game(@txt_name.text.downcase, @new_game_index, casual)
      end
    end

    def draw
      @bg.draw 0, 0, 0, 2, 2
      @clouds.each(&:draw)
      @title.draw @form.cur_section_index == 1 ? 20 : 50, 20, 0, @form.cur_section_index == 1 ? 1 : 2, @form.cur_section_index == 1 ? 1 : 2
      @form.draw
      SB.font.draw_text("v1.5.2", 10, 579, 0, 1, 1, 0xff000000)
    end
  end
end