[eo] Chest Attribute

[RaiKalGames]

chek if the button visible = false if its false change to true if its to true then you did something wrong

[erkro1]

Did you compile it?

[RaiKalGames]

oh yeah you have to compile and i normaly go to file and make exe

[BeCoolHero]

Ok, i have this compile errror!

http://i56.tinypic.com/2itg39s.png

On optSlide

[kibbelz]

Honestly, you can't even follow a very basic tutorial :/ The reason why optchest isn't visible is because you just dragged optchest onto fraattributes. you must create it ON fraattributes :/ Is is that hard to understand >.>

[Domino_]

Found Bug EO 2.0 when you pick up money it gives you this money but that what you had disapears.
example you have 200g in chest is 50g , you open chest and you dont have 250g but only 50g ….

[GermanLoner]

Hey guys im new to this and i have put it all in my coding but when i put it on my map i only see the C and no Chest sprite,i have one ready but not sure where to code i to ,any help would be appreciated

[GermanLoner]

and when i try to compile it and make an exe i get this
http://i1132.photobucket.com/albums/m567/JurgenHof/Untitled.png

[erkro1]

No need to double post, there is an Edit button for that.

For your problem, check if this:
```
Public Sub ChkDir(ByVal tDir As String, ByVal tName As String)
    If LCase$(Dir(tDir & tName, vbDirectory)) <> tName Then Call MkDir(tDir & tName)
End Sub
```
in **modDatabase**

[GermanLoner]

Thanx Erwin, I apologise for the double post, would u mind if i sent u messages if i need help?

[erkro1]

@GermanLoner:

> Thanx Erwin, I apologise for the double post, would u mind if i sent u messages if i need help?

No, of course not, you're welcome ;)

[Carri]

@Domino_:

> Found Bug EO 2.0 when you pick up money it gives you this money but that what you had disapears.
> example you have 200g in chest is 50g , you open chest and you dont have 250g but only 50g ….

I have this bug.  Does anyone have a code fix for it?

[RyokuHasu]

that's because this code was made poorly and doesn't use the correct way to give to your inventory.

"Sub HandleMapGetItem" and the data storage should be rewritten for this .

[kibbelz]

@Ryoku:

> that's because this code was made poorly and doesn't use the correct way to give to your inventory.
>
> "Sub HandleMapGetItem" and the data storage should be rewritten for this .

*Coughs*
Care to read this before you make any assumptions:

@kibbelz:

> Hey, This is just a conversion of the chest attribute system from [ES].

[RyokuHasu]

Ya but that doesn't change the fact this is still poorly made an should be re-written.

[kibbelz]

@Ryoku:

> Ya but that doesn't change the fact this is still poorly made an should be re-written.

And who says it has to be me.

[RyokuHasu]

No one said it had to be you.

[Justn]

@Ryoku:

> No one said it had to be you.

That's just kibbelz freaking out cause someone pointed out a bug in his tutorial he did the same when someone found a bug in his zelda grass mod. Anyways this still works great for items other than currency. =)

[Taegan]

@Justn:

> That's just kibbelz freaking out cause someone pointed out a bug in his tutorial he did the same when someone found a bug in his zelda grass mod. Anyways this still works great for items other than currency. =)

I remember this. I think it was SpicyWolf or whatever.

[Murdoc]

@Ryoku:

> No one said it had to be you.

Then you do it and quit whining already

[Growlith1223]

Hey i got a glitch…When trying to use this with Currency, it literally changes the amount you have, it doesnt add it..
for example you have like 400 Currency and the currency found is like 7 currency, it changes it to 7...
Someone plz help D:

[Ruins of Hell]

@Growlith1223:

> Hey i got a glitch…When trying to use this with Currency, it literally changes the amount you have, it doesnt add it..
> for example you have like 400 Currency and the currency found is like 7 currency, it changes it to 7...
> Someone plz help D:

Take a look at Function GetPlayerItemInvValue.

[Growlith1223]

Hi um..i can't find that Sub or function…What side would it be in? Server orClient and what mod would it be in?

[erkro1]

Don't be so lazy and use the search function and find out by yourself.

[Joyce]

Dear lord that is written terrible, you made new functions for the INI files which already exist? Say whaaaaat? Assigning values that aren't used in all states as well.. /bashes head into a wall.

Anyhow, here's my quick rewrite of the thing:
```
Sub HandleMapGetItem(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddR As Long, ByVal ExtraVar As Long)
    Dim b As Long

    If Map(GetPlayerMap(index)).Tile(GetPlayerX(index), GetPlayerY(index)).Type = TILE_TYPE_CHEST Then
        If Val(GetVar("data\chests\" & Trim(GetPlayerName(index)) & ".ini", "Chests_Map_" & Trim(STR(GetPlayerMap(index))), Trim(STR(GetPlayerX(index))) & "_" & Trim(STR(GetPlayerY(index))))) = 0 Then
            b = FindOpenInvSlot(index, Map(GetPlayerMap(index)).Tile(GetPlayerX(index), GetPlayerY(index)).data1)
            Call PlayerMsg(index, "You opened the chest and found " & Map(GetPlayerMap(index)).Tile(GetPlayerX(index), GetPlayerY(index)).data2 & " " & Item(Map(GetPlayerMap(index)).Tile(GetPlayerX(index), GetPlayerY(index)).data1).Name, White)
            Call SetPlayerInvItemNum(index, b, Map(GetPlayerMap(index)).Tile(GetPlayerX(index), GetPlayerY(index)).data1)
            Call SetPlayerInvItemValue(index, b, GetPlayerInvItemValue(index, b) + Map(GetPlayerMap(index)).Tile(GetPlayerX(index), GetPlayerY(index)).data2)
            Call PutVar("data\chests\" & Trim(GetPlayerName(index)) & ".ini", "Chests_Map_" & Trim(STR(GetPlayerMap(index))), Trim(STR(GetPlayerX(index))) & "_" & Trim(STR(GetPlayerY(index))), "1")
            Call SendInventoryUpdate(index, b)
        Else
            Call PlayerMsg(index, "You have already looted this chest!", BrightRed)
        End If
    Else
        Call PlayerMapGetItem(index)
    End If
End Sub
```
Just make sure to make a new folder in your server\data folder called Chests.. Should work fine, haven't tested it though. And this should also fix the issue of it not adding to, but replacing currencies.

EDIT: Fixed a typo.