Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

[ES] More tileset buttons don't work?


MrAvi
 Share

Recommended Posts

I use ES and I am trying to get more then the default 10 buttons to get more tilesets. Now you can only use up to 10 and I have 29 tilesets. So I edited it but it doesn't work. Yes I am pretty much sure that this is an noobish question and the script is all messed up. But I'm here to learn.

```
Private Sub cmdtype_Click(index As Integer)
    If index = 1 Then
        MapEditorSelectedType = 1

        Me.fraAttribs.Visible = False
        Me.fraLayers.Visible = True
        Me.frmtile.Visible = True
    ElseIf index = 2 Then
        MapEditorSelectedType = 2

        Me.shpSelected.Width = 32
        Me.shpSelected.Height = 32

        Me.fraLayers.Visible = False
        Me.frmtile.Visible = False
        Me.fraAttribs.Visible = True
    Else
        MapEditorSelectedType = 3

        Me.fraAttribs.Visible = False
        Me.fraLayers.Visible = False
        Me.frmtile.Visible = False
        Me.Option1(27).value = True

        Me.picBackSelect.Picture = LoadPicture(App.Path & "\GFX\Tiles29.bmp")

        EditorSet = 29

        scrlPicture.max = Int((picBackSelect.Height - picBack.Height) / PIC_Y)
    End If
End Sub
```
EDIT: I edited the Client.VBP by the way, (edited the code from FrmMapEditor)

EDIT2: I edited this now in ModConstants, still nothing;

```
Public Const ExtraSheets = 10
```to
```
Public Const ExtraSheets = 29
```
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...