[Feature] Visual Inventory

[Matt]

Follow this tutorial the same way as you normally would, but use this sub for BltInventory instead:

[code]Public Sub BltInventory()
Dim i As Long, PicNum As Long
Dim rec As DxVBLib.RECT
Dim rec_pos As DxVBLib.RECT

If frmMirage.picInvList.Visible Then
frmMirage.picInvList.Cls

For i = 1 To MAX_INV
If GetPlayerInvItemNum(MyIndex, i) > 0 And GetPlayerInvItemNum(MyIndex, i)