FormTiles.cs

using RetroDevStudio;
using RetroDevStudio.Displayer;
using RetroDevStudio.Formats;
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Drawing.Configuration;
using System.Linq;
using System.Reflection;
using System.Runtime.InteropServices;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using static ElementEditor.Project;
using static System.Windows.Forms.VisualStyles.VisualStyleElement.TextBox;

namespace ElementEditor
{
  public partial class FormTiles : Form
  {
    private Project         m_Project;
    private Project.Screen  m_Screen;
    private int             m_UsedCharsetIndex = -1;

    public event EventHandler    TileSelected;
    public event EventHandler    FallingTilesModified;
    public event EventHandler    Modified;




    public int SelectedTileIndex
    {
      get
      {
        return listTiles.SelectedIndex;
      }
    }



    public FormTiles()
    {
      InitializeComponent();
    }



    internal void UpdateTiles( Project Project, Project.Screen Screen, bool ForceUpdate = false )
    {
      m_Project = Project;
      m_Screen = Screen;
      if ( m_Screen == null )
      {
        return;
      }

      if ( ( m_UsedCharsetIndex == m_Screen.CharsetIndex )
      &&   ( !ForceUpdate ) )
      {
        // no changes
        listFallingTiles.BeginUpdate();
        listFallingTiles.Items.Clear();
        foreach ( var item in m_Screen.FallingTiles )
        {
          if ( ( item == 254 )
          ||   ( item == 0 ) )
          {
            // special items have no bitmap!
            listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( item, null ) );
          }
          else
          {
            listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( item, (Bitmap)listTiles.Items[item] ) );
          }
        }
        listFallingTiles.EndUpdate();

        return;
      }
      m_UsedCharsetIndex = m_Screen.CharsetIndex;
      listTiles.BeginUpdate();
      listTiles.Items.Clear();

      CharsetProject charSet = m_Project.Charsets[m_Screen.CharsetIndex];
      var charsetInfo = m_Project.CharsetProjects[m_Screen.CharsetIndex];
      foreach ( var element in Project.Elements )
      {
        var memoryImage = new GR.Image.MemoryImage( element.Characters.Width * 8, element.Characters.Height * 8, GR.Drawing.PixelFormat.Format32bppRgb );

        for ( int i = 0; i < element.Characters.Width; ++i )
        {
          for ( int j = 0; j < element.Characters.Height; ++j )
          {
            if ( charSet != null )
            {
              CharacterDisplayer.DisplayChar( charSet, element.Characters[i, j].Char, memoryImage, i * 8, j * 8,
                element.Characters[i, j].Color,
                charSet.Colors.BackgroundColor,
                charSet.Colors.MultiColor1,
                charSet.Colors.MultiColor2,
                charSet.Colors.BGColor4,
                charsetInfo.Multicolor ? TextCharMode.COMMODORE_MULTICOLOR : TextCharMode.COMMODORE_HIRES );
            }
          }
        }
        listTiles.Items.Add( memoryImage.GetAsBitmap() );
      }
      if ( Project.Screens.Count > 0 )
      {
        listTiles.ItemHeight = Project.Screens[0].TileHeight * 2 * 8;
        listFallingTiles.ItemHeight = Project.Screens[0].TileHeight * 2 * 8;
      }

      listFallingTiles.BeginUpdate();
      listFallingTiles.Items.Clear();
      foreach ( var item in m_Screen.FallingTiles )
      {
        if ( ( item == 254 )
        ||   ( item == 0 ) )
        {
          // special items have no bitmap!
          listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( item, null ) );
        }
        else
        {
          listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( item, (Bitmap)listTiles.Items[item] ) );
        }
      }
      listFallingTiles.EndUpdate();

      listTiles.EndUpdate();
    }



    private void listTiles_DrawItem( object sender, DrawItemEventArgs e )
    {
      if ( e.Index != -1 )
      {
        var bmp = (Bitmap)listTiles.Items[e.Index];

        e.DrawBackground();

        var bounds = new Rectangle( e.Bounds.Left, e.Bounds.Top, e.Bounds.Width - 1, e.Bounds.Height - 1 );
        if ( bounds.Width > listTiles.ItemHeight )
        {
          bounds.Width = listTiles.ItemHeight;
        }

        e.Graphics.DrawImage( bmp, bounds );
        if ( ( e.State & DrawItemState.Selected ) != 0 )
        {
          e.Graphics.DrawRectangle( new Pen( Color.Aqua, 1 ), bounds );
        }
      }
      else
      {
        e.DrawBackground();
      }
    }



    private void listTiles_SelectedIndexChanged( object sender, EventArgs e )
    {
      TileSelected?.Invoke( this, e );
    }



    private void listTiles_MouseDoubleClick( object sender, MouseEventArgs e )
    {
      if ( listTiles.SelectedIndex != -1 )
      {
        if ( listFallingTiles.Items.Count < 256 )
        {
          // do not allow empty, border and cherry
          if ( ( listTiles.SelectedIndex != 0 )
          &&   ( listTiles.SelectedIndex != 3 )
          &&   ( listTiles.SelectedIndex != 12 ) )
          {
            listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( (byte)listTiles.SelectedIndex, (Bitmap)listTiles.Items[listTiles.SelectedIndex] ) );
            FallingTilesModified?.Invoke( this, e );
          }
        }
      }
    }



    private void listFallingTiles_DrawItem( object sender, DrawItemEventArgs e )
    {
      if ( e.Index != -1 )
      {
        var item = (Tuple<byte,Bitmap>)listFallingTiles.Items[e.Index];
        var bmp = item.Item2;

        e.DrawBackground();

        var bounds = new Rectangle( e.Bounds.Left, e.Bounds.Top, e.Bounds.Width - 1, e.Bounds.Height - 1 );
        if ( bounds.Width > listFallingTiles.ItemHeight )
        {
          bounds.Width = listFallingTiles.ItemHeight;
        }

        if ( item.Item1 == 254 )
        {
          e.Graphics.DrawString( "RAND", e.Font, SystemBrushes.WindowText, bounds );
        }
        else if ( item.Item1 == 0 )
        {
          e.Graphics.DrawString( "END", e.Font, SystemBrushes.WindowText, bounds );
        }
        else
        {
          e.Graphics.DrawImage( bmp, bounds );
        }
        if ( ( e.State & DrawItemState.Selected ) != 0 )
        {
          e.Graphics.DrawRectangle( new Pen( Color.Aqua, 1 ), bounds );
        }
      }
      else
      {
        e.DrawBackground();
      }
    }



    private void listFallingTiles_SelectedIndexChanged( object sender, EventArgs e )
    {
      btnShiftDown.Enabled = ( ( listFallingTiles.SelectedIndex != -1 )
                            && ( listFallingTiles.SelectedIndex + 1 < listFallingTiles.Items.Count ) );
      btnShiftUp.Enabled = ( listFallingTiles.SelectedIndex > 0 );
      btnDelete.Enabled = listFallingTiles.SelectedIndex != -1;
      btnCopy.Enabled = listFallingTiles.SelectedIndex != -1;
    }



    private void btnShiftUp_Click( object sender, EventArgs e )
    {
      if ( listFallingTiles.SelectedIndex > 0 )
      {
        listFallingTiles.BeginUpdate();

        int index1 = listFallingTiles.SelectedIndex - 1;
        int index2 = listFallingTiles.SelectedIndex;
        var item1 = listFallingTiles.Items[index1];
        var item2 = listFallingTiles.Items[index2];

        listFallingTiles.Items.RemoveAt( index2 );
        listFallingTiles.Items.Insert( index1, item2 );
        listFallingTiles.SelectedIndex = index1;
        listFallingTiles.EndUpdate();

        FallingTilesModified?.Invoke( this, e );
      }
    }



    private void btnShiftDown_Click( object sender, EventArgs e )
    {
      if ( listFallingTiles.SelectedIndex + 1 < listFallingTiles.Items.Count )
      {
        listFallingTiles.BeginUpdate();

        int index1 = listFallingTiles.SelectedIndex;
        int index2 = listFallingTiles.SelectedIndex + 1;
        var item1 = listFallingTiles.Items[index1];
        var item2 = listFallingTiles.Items[index2];

        listFallingTiles.Items.RemoveAt( index2 );
        listFallingTiles.Items.Insert( index1, item2 );
        listFallingTiles.SelectedIndex = index2;
        listFallingTiles.EndUpdate();

        FallingTilesModified?.Invoke( this, e );
      }
    }



    private void btnDelete_Click( object sender, EventArgs e )
    {
      if ( listFallingTiles.SelectedIndex != -1 )
      {
        listFallingTiles.Items.RemoveAt( listFallingTiles.SelectedIndex );
        FallingTilesModified?.Invoke( this, e );
      }
    }



    private void btnCopy_Click( object sender, EventArgs e )
    {
      if ( ( listFallingTiles.SelectedIndex != -1 )
      && ( listFallingTiles.Items.Count < 256 ) )
      {
        listFallingTiles.Items.Add( listFallingTiles.Items[listFallingTiles.SelectedIndex] );
        FallingTilesModified?.Invoke( this, e );
      }
    }



    private void btnRandom_Click( object sender, EventArgs e )
    {
      if ( listFallingTiles.Items.Count < 256 )
      {
        listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( 254, null ) );
        FallingTilesModified?.Invoke( this, e );
      }
    }



    private void btnEnd_Click( object sender, EventArgs e )
    {
      if ( listFallingTiles.Items.Count < 256 )
      {
        listFallingTiles.Items.Add( new Tuple<byte, Bitmap>( 0, null ) );
        FallingTilesModified?.Invoke( this, e );
      }
    }



  }
}