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

[ES]Map Converter


varinyc
 Share

Recommended Posts

I'm Trying to change Map name lengths from 20 to 40, so I've created (or attempted to) create a converter just for this purpose.

But I don't know how to get it to convert the Tiles x___x

```
    For X = 0 To MAX_MAPX
        For Y = 0 To MAX_MAPY
            NewRec.Tile(X, Y).Ground = OldRec.Tile(X, Y).Ground
            NewRec.Tile(X, Y).Mask = OldRec.Tile(X, Y).Mask
            NewRec.Tile(X, Y).Anim = OldRec.Tile(X, Y).Anim
            NewRec.Tile(X, Y).Mask2 = OldRec.Tile(X, Y).Mask2
            NewRec.Tile(X, Y).M2Anim = OldRec.Tile(X, Y).M2Anim
            NewRec.Tile(X, Y).Fringe = OldRec.Tile(X, Y).Fringe
            NewRec.Tile(X, Y).FAnim = OldRec.Tile(X, Y).FAnim
            NewRec.Tile(X, Y).Fringe2 = OldRec.Tile(X, Y).Fringe2
            NewRec.Tile(X, Y).F2Anim = OldRec.Tile(X, Y).F2Anim
            NewRec.Tile(X, Y).Type = OldRec.Tile(X, Y).Type
            NewRec.Tile(X, Y).Data1 = OldRec.Tile(X, Y).Data1
            NewRec.Tile(X, Y).Data2 = OldRec.Tile(X, Y).Data2
            NewRec.Tile(X, Y).Data3 = OldRec.Tile(X, Y).Data3
            NewRec.Tile(X, Y).String1 = OldRec.Tile(X, Y).String1
            NewRec.Tile(X, Y).String2 = OldRec.Tile(X, Y).String2
            NewRec.Tile(X, Y).String3 = OldRec.Tile(X, Y).String3
            NewRec.Tile(X, Y).Light = OldRec.Tile(X, Y).Light
            NewRec.Tile(X, Y).GroundSet = OldRec.Tile(X, Y).GroundSet
            NewRec.Tile(X, Y).MaskSet = OldRec.Tile(X, Y).MaskSet
            NewRec.Tile(X, Y).AnimSet = OldRec.Tile(X, Y).AnimSet
            NewRec.Tile(X, Y).Mask2Set = OldRec.Tile(X, Y).Mask2Set
            NewRec.Tile(X, Y).M2AnimSet = OldRec.Tile(X, Y).M2AnimSet
            NewRec.Tile(X, Y).FringeSet = OldRec.Tile(X, Y).FringeSet
            NewRec.Tile(X, Y).FAnimSet = OldRec.Tile(X, Y).FAnimSet
            NewRec.Tile(X, Y).Fringe2Set = OldRec.Tile(X, Y).Fringe2Set
            NewRec.Tile(X, Y).F2AnimSet = OldRec.Tile(X, Y).F2AnimSet
        Next Y
    Next X

```
It always gets stuck in there, first map - first tile as an RTE 9 Am I doing it wrong o.0
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...