[Request] Can someone please fix my code to grab half of a 64x32 image

[achap89]

```
Dim itemnum
Dim itempic
Dim MaxFrames
MaxFrames = (DDSD_Item(itempic).lWidth / 2) / 32
itemnum = GetPlayerEquipment(MyIndex, weapon)
If itemnum > 0 Then
itempic = Item(itemnum).Pic
Picture1.Picture = LoadPicture("data files\graphics\items\" & MaxFrames & ".bmp")
Else
Exit Sub
End If

```

I know I need to use what Sub BltEquipment()  But im new to coding and cant figure out how to use it if someone would walk me through it Plz add me on msn [email protected]

[evilbunnie]

Engine_BltToDC