[EO] Fixing attributes not updating

Basically there’s a problem in EO in that if you change the value on a scroll bar (e.g. resources) it will still place the previous one. There is a clean copy of an EO 2.0.2 frmEditor_Map at the bottom of this topic for those who haven’t edited theirs.

Add this (in sub scrlResource_Change):

ResourceEditorNum = scrlResource.value

Under:

lblResource.Caption = "Resource: " & Resource(scrlResource.value).name

–----

Add this (in sub scrlMapWarp_Change):

EditorWarpMap = scrlMapWarp.value

Under:

lblMapWarp.Caption = "Map: " & scrlMapWarp.value

(Repeat this for EditorWarpX in scrlMapWarpX_Change and EditorWarpY in scrlMapWarpY_Change)

–—

Add this to the top of frmEditor_Map:

Private Sub cmbShop_Click()

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

EditorShop = cmbShop.ListIndex

' Error handler

Exit Sub

errorhandler:

HandleError "cmbShop_Click", "frmEditor_Map", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub

–—

Add this (in sub scrlKeyX_Change):

KeyOpenEditorX = scrlKeyX.value

Under:

lblKeyX.Caption = "X: " & scrlKeyX.value

(Repeat this for KeyOpenEditorY in sub scrlKeyY_Change)

–—

Add this (in sub scrlMapKey_Change):

KeyEditorNum = scrlMapKey.value

Under:

lblMapKey.Caption = "Item: " & Trim$(Item(scrlMapKey.value).name)

–—

Add this to the top of frmEditor_Map:

Private Sub chkMapKey_Click()

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

KeyEditorTake = chkMapKey.value

' Error handler

Exit Sub

errorhandler:

HandleError "chkMapKey_Click", "frmEditor_Map", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub

–—

Add this (in sub scrlMapItem_Change):

ItemEditorNum = scrlMapItem.value

Under:

lblMapItem.Caption = Trim$(Item(scrlMapItem.value).name) & " x" & scrlMapItemValue.value

–—

Add this (in sub scrlMapItemValue_Change):

ItemEditorValue = scrlMapItemValue.value

Under:

lblMapItem.Caption = Trim$(Item(scrlMapItem.value).name) & " x" & scrlMapItemValue.value

–—

Add this to the top of frmEditor_Map:

Private Sub cmbSlide_Click()

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

MapEditorSlideDir = cmbSlide.ListIndex

' Error handler

Exit Sub

errorhandler:

HandleError "cmbSlide_Click", "frmEditor_Map", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub

–—

Add this (in sub scrlTrap_Change):

MapEditorHealAmount = scrlTrap.value

Under:

lblTrap.Caption = "Amount: " & scrlTrap.value

–—

Add this to the top of frmEditor_Map:

Private Sub cmbHeal_Click()

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

MapEditorHealType = cmbHeal.ListIndex + 1

' Error handler

Exit Sub

errorhandler:

HandleError "cmbHeal_Click", "frmEditor_Map", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub

–—

Add this (in sub scrlHeal_Change):

MapEditorHealAmount = scrlHeal.value

Under:

lblHeal.Caption = "Amount: " & scrlHeal.value

–—

Add this to the top of frmEditor_Map:

Private Sub lstNpc_Click()

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

SpawnNpcNum = lstNpc.ListIndex + 1

' Error handler

Exit Sub

errorhandler:

HandleError "lstNpc_Click", "frmEditor_Map", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub

–—

Under the Select Case block (in scrlNPCDir_Change) add this:

SpawnNpcDir = scrlNpcDir.value

–—

I realise that’s a lot of work so here’s a copy of a clean EO 2.0.2 frmEditor_Map:

http://pastebin.com/n9xWaVbS

Nice fix, not too major though, only admins/devs will encounter this problem so its not a biggie 🙂

This fix is ​​for Original EO v2 (Robin)?

Yeah.

Could you explain better what it is this fix? what problem had in Eclipse Origins v2 what was corrected by you? I’m not understanding.

Log in to reply