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

Use Middle mouse button as eye dropper[EO]


Leed88
 Share

Recommended Posts

I really like eye dropper in other editors didn't see one in origins. This simple fix almost acts as eye dropper when clicking on map with middle mouse button. It doesn't actually select tile but will put the row in map edit window but might not put column in window on wide tilesets.

In module modGameEditors Sub MapEditorMouseDown find the line
```
If Not isInBounds Then Exit Sub
```

below that line insert the following
```
' Eye dropper for tiles with middle mouse button
    If Button = vbMiddleButton And Map.Tile(CurX, CurY).Layer(CurLayer).Tileset Then
        If frmEditor_Map.optLayers.Value Then

            With Map.Tile(CurX, CurY)
                frmEditor_Map.scrlTileSet.Value = .Layer(CurLayer).Tileset

                If .Layer(CurLayer).y < frmEditor_Map.scrlPictureY.Max - 10 Then
                    frmEditor_Map.scrlPictureY.Value = .Layer(CurLayer).y
                Else
                  If .Layer(CurLayer).y < 10 Then
                        .Layer(CurLayer).y = 1
                    Else

                        frmEditor_Map.scrlPictureY.Value = .Layer(CurLayer).y - 10
                    End If
                End If
            End With
        End If
    End If
```
If you changed the size of your tileset display you might need to change the 10's.

edit- had to change code for very short tilesets found this out when using a tileset I was making
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...