Mirage Source

Free ORPG making software.
It is currently Sat Apr 27, 2024 6:51 pm

View unanswered posts | View active topics


Board index » Announcements » Archive (2006-2011) » Resources

All times are UTC




Post new topic Reply to topic  Page 2 of 3
  [ 71 posts ]  Go to page Previous  1, 2, 3  Next
  Print view Previous topic | Next topic 
Author Message
halla
 Post subject:
PostPosted: Sat Jan 06, 2007 1:42 am 
Offline
Pro

Joined: Sat Jun 03, 2006 8:32 pm
Posts: 415
I got this working. Only problem I am having is that when I double click something all the item images go away in the picboxes. If you click on one it still shows it in the other box and you can still equip stuff. Its just the inventory icons go blank. Any ideas why?

I tried messing with double click to figure it out.
Top
 Profile  
 
Rian
 Post subject:
PostPosted: Sat Jan 06, 2007 3:43 am 
Offline
Persistant Poster
User avatar

Joined: Tue May 30, 2006 2:07 am
Posts: 836
Location: Nashville, Tennessee, USA
Google Talk: rs.ruggles@gmail.com
sound's like the timer isn't working the right way or dosn't haafe the right code.

i've been looking into combing bigreds editor loading tut?anay one tried this? ineed help with it :P

ps, i'nm ubery drunk!

_________________
I'm on Facebook! Google Plus My Youtube Channel My Steam Profile

Image
Top
 Profile  
 
halla
 Post subject:
PostPosted: Sat Jan 06, 2007 4:28 am 
Offline
Pro

Joined: Sat Jun 03, 2006 8:32 pm
Posts: 415
Sonire wrote:
sound's like the timer isn't working the right way or dosn't haafe the right code.

i've been looking into combing bigreds editor loading tut?anay one tried this? ineed help with it :P

ps, i'nm ubery drunk!


hmm I checked the code for it and its right.

in Double Click code...

Code:
For D = 1 To MAX_INV


in other parts of the code its 0 to MAX_INV - 1

I tried changing to that but then I get subscript out of range.
Top
 Profile  
 
Rian
 Post subject:
PostPosted: Sat Jan 06, 2007 5:42 pm 
Offline
Persistant Poster
User avatar

Joined: Tue May 30, 2006 2:07 am
Posts: 836
Location: Nashville, Tennessee, USA
Google Talk: rs.ruggles@gmail.com
halla wrote:
Sonire wrote:
sound's like the timer isn't working the right way or dosn't haafe the right code.

i've been looking into combing bigreds editor loading tut?anay one tried this? ineed help with it :P

ps, i'nm ubery drunk!


hmm I checked the code for it and its right.

in Double Click code...

Code:
For D = 1 To MAX_INV


in other parts of the code its 0 to MAX_INV - 1

I tried changing to that but then I get subscript out of range.


GSD, help dammit! This code needs to be rewritten.

_________________
I'm on Facebook! Google Plus My Youtube Channel My Steam Profile

Image
Top
 Profile  
 
Tony
 Post subject:
PostPosted: Sat Jan 06, 2007 6:36 pm 
Offline
Persistant Poster
User avatar

Joined: Wed Nov 29, 2006 11:25 pm
Posts: 860
Location: Ayer
Just go through elysium source and rip it T.T
Top
 Profile  
 
Matt
 Post subject:
PostPosted: Sat Jan 06, 2007 6:40 pm 
This tut works fine. I used it and have no problems.

And ripping things from ES isn't the solution to everything Pando.
Top
  
 
Xlithan
 Post subject:
PostPosted: Sat Jan 06, 2007 7:09 pm 
Offline
Pro
User avatar

Joined: Wed Sep 20, 2006 1:06 pm
Posts: 368
Location: UK
Google Talk: steve.bluez@googlemail.com
ES has a lot of bugs with it's features, not to mention there's been a hell of alot of code changes which makes many things incompatible with MS code anymore.
Top
 Profile  
 
halla
 Post subject:
PostPosted: Sat Jan 06, 2007 8:31 pm 
Offline
Pro

Joined: Sat Jun 03, 2006 8:32 pm
Posts: 415
Advocate wrote:
This tut works fine. I used it and have no problems.

And ripping things from ES isn't the solution to everything Pando.


Weird. I went through and im pretty sure I have everything the same as the tut here.
Top
 Profile  
 
Tony
 Post subject:
PostPosted: Sat Jan 06, 2007 8:44 pm 
Offline
Persistant Poster
User avatar

Joined: Wed Nov 29, 2006 11:25 pm
Posts: 860
Location: Ayer
Blitting to the screen is much funner and challenging. I think its faster rather than blitting to countless picture boxes.

Image

<3
Top
 Profile  
 
halla
 Post subject:
PostPosted: Sat Jan 06, 2007 10:17 pm 
Offline
Pro

Joined: Sat Jun 03, 2006 8:32 pm
Posts: 415
ok but this has no relevance to the question I asked.
Top
 Profile  
 
halla
 Post subject:
PostPosted: Sat Jan 06, 2007 10:34 pm 
Offline
Pro

Joined: Sat Jun 03, 2006 8:32 pm
Posts: 415
Only differences I see... ok I had to dim E as long in the one sub cause it wasnt in this code.

Also I have 3.0.7 so theres a frmInvetory. I removed that.

' Call SendUseItem(frmInventory.lstInv.ListIndex + 1)
Call SendUseItem(lstInv.ListIndex + 1)

Since there is a lstInv in frmMirage it shouldnt matter. Thats about all I changed. I just went through and all the codes right.
Top
 Profile  
 
GodSentDeath
 Post subject:
PostPosted: Sat Jan 06, 2007 10:44 pm 
Offline
Regular
User avatar

Joined: Tue Jul 04, 2006 5:50 am
Posts: 98
Sonire wrote:
GSD, help dammit! This code needs to be rewritten.

lol I remember saying I would re-write this like a year ago... Sadly I haven't gotten around to it and probably won't =P

I can't really help with your problem halla, just MAKE SURE you go through EVERY step and do them PROPERLY =P
Top
 Profile  
 
halla
 Post subject:
PostPosted: Sat Jan 06, 2007 10:53 pm 
Offline
Pro

Joined: Sat Jun 03, 2006 8:32 pm
Posts: 415
oh I did I can even check again... did you originally write this for 3.0.3? If so it shouldnt matter im using 3.0.7

Its something when you use an item or double click it makes all the pictures go away.

Also the label use item it wont let me click it some reason... I can only use an item by double clicking it.
Top
 Profile  
 
Krloz
 Post subject:
PostPosted: Sun Feb 11, 2007 9:17 pm 
Offline
Knowledgeable
User avatar

Joined: Thu Jun 29, 2006 12:11 am
Posts: 120
Kuja wrote:
Blitting to the screen is much funner and challenging. I think its faster rather than blitting to countless picture boxes.

Image

<3


SInce im not a pro can someone give me a small guide ?. Just small tips on how to start it? =p

_________________
©Krloz 2004-2006. all rights, lefts and other directions reserved
Image
Top
 Profile  
 
Robin
 Post subject:
PostPosted: Sun Feb 11, 2007 10:43 pm 
Offline
Submit-Happy
User avatar

Joined: Fri Jun 16, 2006 7:01 am
Posts: 2768
Location: Yorkshire, UK
Erm. Kuja might still have my little guide in his inbox.

_________________
Quote:
Robin:
Why aren't maps and shit loaded up in a dynamic array?
Jacob:
the 4 people that know how are lazy
Robin:
Who are those 4 people?
Jacob:
um
you, me, and 2 others?


Image
Top
 Profile  
 
Tony
 Post subject:
PostPosted: Thu Feb 15, 2007 1:05 am 
Offline
Persistant Poster
User avatar

Joined: Wed Nov 29, 2006 11:25 pm
Posts: 860
Location: Ayer
Krloz wrote:
Kuja wrote:
Blitting to the screen is much funner and challenging. I think its faster rather than blitting to countless picture boxes.

Image

<3


SInce im not a pro can someone give me a small guide ?. Just small tips on how to start it? =p


Look at the tut umm Group Hug. xD

Thats all i can actually say. Oh and go to umm.. pscode.com and find Fox. Took me a while to actually figure everything out. But it was worth it. I lost all my code cause I reformatted my comp without saving whatsoever. and waiting for friggin solid to give me my gfx files that I went through trouble spriting. AHH off topic.

But yeah. Group Hug post should help.

The clicking on item took me like an hour to complete. But it was easy. :] Maybe If I redo the thing I might post a tutorial on it if you deserve it.

_________________
Image
Top
 Profile  
 
Krloz
 Post subject:
PostPosted: Fri Feb 16, 2007 2:51 am 
Offline
Knowledgeable
User avatar

Joined: Thu Jun 29, 2006 12:11 am
Posts: 120
I know I dont deserve it =P . I haven't had time to work on this becoz of rl things with my girl xD

_________________
©Krloz 2004-2006. all rights, lefts and other directions reserved
Image
Top
 Profile  
 
Tony
 Post subject:
PostPosted: Fri Feb 16, 2007 4:38 am 
Offline
Persistant Poster
User avatar

Joined: Wed Nov 29, 2006 11:25 pm
Posts: 860
Location: Ayer
Krloz wrote:
I know I dont deserve it =P . I haven't had time to work on this becoz of rl things with my girl xD


I didn't mean it. Just try fox out and then tell me if you get problems and I'll help. YAMEAN

_________________
Image
Top
 Profile  
 
Robin
 Post subject:
PostPosted: Fri Feb 16, 2007 10:33 am 
Offline
Submit-Happy
User avatar

Joined: Fri Jun 16, 2006 7:01 am
Posts: 2768
Location: Yorkshire, UK
Group Hug! only explains how to lock the DC, which is all that you needed to get the blted inventory working.

Krloz is gonna need the sub which loops through the inventory blting the items, the alphablending code (Fox) and also the lock DC.

I think.

_________________
Quote:
Robin:
Why aren't maps and shit loaded up in a dynamic array?
Jacob:
the 4 people that know how are lazy
Robin:
Who are those 4 people?
Jacob:
um
you, me, and 2 others?


Image
Top
 Profile  
 
Tony
 Post subject:
PostPosted: Sat Feb 17, 2007 8:03 pm 
Offline
Persistant Poster
User avatar

Joined: Wed Nov 29, 2006 11:25 pm
Posts: 860
Location: Ayer
Kite wrote:
Group Hug! only explains how to lock the DC, which is all that you needed to get the blted inventory working.

Krloz is gonna need the sub which loops through the inventory blting the items, the alphablending code (Fox) and also the lock DC.

I think.


That was pretty easy but my days with vb6 is OVER. Until I return haha.

_________________
Image
Top
 Profile  
 
Da Undead
 Post subject:
PostPosted: Mon Apr 30, 2007 1:55 am 
Offline
Knowledgeable

Joined: Tue Apr 17, 2007 10:18 pm
Posts: 148
Location: USA, Texas
ok im havng an error :
Quote:
Method or data member not found

Highlights:
Code:
.Picture =


Line:
Code:
picInv2.Picture = LoadPicture()


Sub:
Code:
Private Sub PicInv_Click(Index As Integer)
Dim D As Long
Dim e As Long
For D = 0 To MAX_INV - 1
On Error Resume Next
If Index = D Then
    lstInv.Selected(D) = True
    If Item(GetPlayerInvItemNum(MyIndex, lstInv.SelCount + D + e)).Name = "" Then
        picInv2.Picture = LoadPicture()
        IName.Caption = ""
    Else
        If Item(GetPlayerInvItemNum(MyIndex, D + 1)).Type = ITEM_TYPE_CURRENCY Then
            IName.Caption = Trim(Item(GetPlayerInvItemNum(MyIndex, D + 1)).Name) & " (" & GetPlayerInvItemValue(MyIndex, D + 1) & ")"
            Call BitBlt(picInv2.hdc, 0, 0, PIC_X, PIC_Y, picItems.hdc, 0, Item(GetPlayerInvItemNum(MyIndex, D + 1)).Pic * PIC_Y, SRCCOPY)
        Else
                ' Check if this item is being worn
            If GetPlayerWeaponSlot(MyIndex) = D + 1 Or GetPlayerArmorSlot(MyIndex) = D + 1 Or GetPlayerHelmetSlot(MyIndex) = D + 1 Or GetPlayerShieldSlot(MyIndex) = D + 1 Then
                IName.Caption = Trim(Item(GetPlayerInvItemNum(MyIndex, D + 1)).Name) & " (worn)"
                Call BitBlt(picInv2.hdc, 0, 0, PIC_X, PIC_Y, picItems.hdc, 0, Item(GetPlayerInvItemNum(MyIndex, D + 1)).Pic * PIC_Y, SRCCOPY)
            Else
                IName.Caption = Trim(Item(GetPlayerInvItemNum(MyIndex, D + 1)).Name)
                Call BitBlt(picInv2.hdc, 0, 0, PIC_X, PIC_Y, picItems.hdc, 0, Item(GetPlayerInvItemNum(MyIndex, D + 1)).Pic * PIC_Y, SRCCOPY)
            End If
        End If
    End If
End If
Next D
End Sub
Top
 Profile  
 
Lea
 Post subject:
PostPosted: Mon Apr 30, 2007 2:35 am 
Offline
Community Leader
User avatar

Joined: Sun May 28, 2006 10:29 pm
Posts: 1762
Location: Salt Lake City, UT, USA
Google Talk: Darunada@gmail.com
Looks like you edited the picture box. PicInv2 is the name of a picture box on the form?

Check that.

_________________
I'm on Facebook! Google Plus LinkedIn My Youtube Channel Send me an email Call me with Skype Check me out on Bitbucket Yup, I'm an EVE Online player!
Why not try my app, ColorEye, on your Android devlce?
Do you like social gaming? Fight it out in Battle Juice!

I am a professional software developer in Salt Lake City, UT.
Top
 Profile  
 
Da Undead
 Post subject:
PostPosted: Mon Apr 30, 2007 3:33 am 
Offline
Knowledgeable

Joined: Tue Apr 17, 2007 10:18 pm
Posts: 148
Location: USA, Texas
Fixed it, i just like deleted it and then created it again. Now im getting an "Method or data member not found"

for .hdc

in

Code:
Call BitBlt(picInv2.hdc, 0, 0, PIC_X, PIC_Y, picItems.hdc, 0, Item(GetPlayerInvItemNum(MyIndex, D + 1)).Pic * PIC_Y, SRCCOPY)
Top
 Profile  
 
Styre
 Post subject:
PostPosted: Mon Apr 30, 2007 7:07 am 
Offline
Regular

Joined: Thu Mar 22, 2007 3:32 pm
Posts: 31
After putting this code in my Source I have an Error at:

Code:
Function GetPlayerInvItemNum(ByVal Index As Long, ByVal InvSlot As Long) As Long
    GetPlayerInvItemNum = Player(Index).Inv(InvSlot).Num
End Function


Highlights:
Code:
GetPlayerInvItemNum = Player(Index).Inv(InvSlot).Num


Error:

Code:
rte 9: Subscript our of range


this is when i click the button to open my Inventory
Top
 Profile  
 
Matt
 Post subject:
PostPosted: Mon Apr 30, 2007 11:36 am 
Do you have a higher or lower max_inv compared to the amount of pic boxes you put? If your max_inv is say, 50, and you only put 24 boxes, that would cause a problem.

I think..
Top
  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  Page 2 of 3
  [ 71 posts ]  Go to page Previous  1, 2, 3  Next

Board index » Announcements » Archive (2006-2011) » Resources

All times are UTC


Who is online

Users browsing this forum: No registered users and 25 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Group