adr990
-
Posts
101 -
Joined
-
Last visited
Never
Content Type
Profiles
Forums
Calendar
Posts posted by adr990
-
-
Yes and it's very easy to do so. :P
I suggest figuring this out yourself.
Just look for a code in EO that makes the player block (already told to much eh) , and the rest should be easy enough to figure yourself also.
Tutorials ain't make to just copy and paste and let others customize the code to your needs.
Unless you think the code actually has a problem, you should do things like this yourself.
Adr990
Hint:
You don't add another attribute for this, just change the code of kibbelz. -
Heya,
edit nvm, figured it out:
-=-
Also, are there any requirments for the NPC which will be the Pet?
Does it need atleast 1hp etc. and every stat 1 etc?
Thanks in advance,
Adr990 -
Oh I just fingured, and replaced the j's by i's instead of changing the Dim, I didn't see the Dim yet.
I'll fix it up the right way this time, eh.
And yes, this should fix it. :)
-=-
Yep, ofcourse it did. haha
Great man, thanks for helping me through those little mistakes of fail. -
Uh Zopto, read what Lightning just posted:
"put the PetMapCache global call and the PetMapCache type in modGlobals, not in a procedure. xD"
I placed it wrong too.. *shudders* .. [/ashamed]
So this:
```
Public Type PetCache
Pet(1 To MAX_MAP_NPCS) As Long
UpperBound As Long
End Type
Public PetMapCache(1 To MAX_MAPS) As PetCache
```
Should go in "modGlobals"
Edit:
Sorry for double post. -
I most of time comment thing out, yea, eheh.
I'll do that, right now, but.. Oh my, believe it or not..
I've got a new error:
fixed, replaced j's by i's.. as in tutorial.. somehow that got messed up. -
Ah, so there it was supposed to go. Oh my.. I should read more carefully.
Thanks for your time and help Lightning. :)
> I also just skimmed through the code and got rid of a few things which would cause an error. (Not for me, for you) ;)
Ah, I indeed noticed it was touched not to long ago.
So, I'll go and re add everything on both Server and Client again?
* Or actually, remove some code.. haha -
Oh, excuse me. eheh
I meant that I did update my previous post with my new problem:
> Ok I sloved the IsPet and PetData problem, but now I've got this:
>
> >! 
>
> I removed all NPC's and Map's.
> (though sometime I need to learn how to use and code a converter..)
>
> Edit: My 100th post, yay. eheh
Eh, yea.. this problems really makes me lost, I can't even think of something at the moment.
So, the Server compiling is telling me I didn't add the Sub of PetMapCache, or there is something wrong with PetMapCache at my side, but I can't fingure it out..
Edit:
```
Public Type PetCache
Pet(1 To MAX_MAP_NPCS) As Long
UpperBound As Long
End Type
Public PetMapCache(1 To MAX_MAPS) As PetCache
```
I think I've placed that code wrong.
I just placed it right after:
```
'View Current Pets on Map
If PetMapCache(Player(Index).Map).UpperBound > 0 Then
For j = 1 To PetMapCache(Player(Index).Map).UpperBound
Call NPCCache_Create(Index, Player(Index).Map, PetMapCache(Player(Index).Map).Pet(j))
Next
End If
```Because I thought it should be safe to do so.
Maybe I got it wrong there, eh? -
Oh it seems we've got the same problem hmp.
But no, I have no fix for us. I really can't think of anything this time.. heh
Edit:
lol @ Ugh -
@Lightning:
> Have you updated the MapNpc UDT correctly? You must have skipped it as I haven't seen that error since I released this tutorial. :P
Well I added:
IsPet As Byte
and
PetData As PetRec to Map
To 'MapNpcRec'
And it went on. .. to the next error.. :P
I've got this new problem, I edited my post just after you replied. eheh
(About PetMapCache… now I'm lost, heh) -
Ok I sloved the IsPet and PetData problem, but now I've got this:
>! 
I removed all NPC's and Map's.
(though sometime I need to learn how to use and code a converter..)
Edit: My 100th post, yay. eheh -
edit nvm
-
Nice kibbelz!
I was about to add something like that too. :P
Though I might edit it a little bit up.
Thanks man. -
Yes but, I like to have such things being easily editable for the person who will be doing the GUI's. eh
Oh, also, the picturebox should be set to False. Forgot to mention that. -
Cool! I saw this in some game before, and I thought it was a pretty cool addition to show how rich and stuff you are.
I'll try this, and eventually face the same problems as posts above. -
Yea, I know it sounds stupid, but only until now I realized what timers are for. .. eh
btw this is what my bar looks like:
(Yes, I didn't spend much time to the GUI placement, Stamina bar yet.)
>! 
>!  -
Hello everyone,
I wanted to add a delay on login, to avoid kind of problems you could possibly have if there wasn't a delay. :P
There probably are like almost none, but just in case.
Well here is the code:
Make a picturebox in frmMenu (I have it all over the Menu).
Name the picture box "delaypic", and set it to False.
Find "If isLoginLegal(txtLUser.text, txtLPass.text) Then", under "Private Sub lblLAccept_Click()", in frmMenu.
Replace everything under it with:
```
MsgBox "Please wait a while, until the Delay is over."
frmMenu.delaypic.Visible = True
frmMenu.delaypic.Picture = LoadPicture(App.Path & "\data files\graphics\load\" & "delay.bmp")
Sleep 10000
frmMenu.delaypic.Visible = False
Call MenuState(MENU_STATE_LOGIN)
End If
' Error handler
Exit Sub
errorhandler:
HandleError "lblLAccept_Click", "frmMenu", Err.Number, Err.Description, Err.Source, Err.HelpContext
Err.Clear
Exit Sub
End Sub
```
Ofcourse you can modify it to what every suits you.
I've got the idea from Reign of London's Eyecatch Framework.
And yes, I know the 'Msgbox' probably could be like a GUI pop up, I probably will update the tutorial for that later.
~Adr990 -
Ah nice man!
I was about to add that once in my game, just didn't get to it yet.
Thumbs up, heh.
I'm gonna test it out, -snip nvm-
Thanks for sharing this tutorial, I learned from it. :) (As I didn't have any idea where to start yet actually.. lol)
Edit: Works good. Though, I might do it the GetTickCount as suggested by lightning.
As timers do slow down the game? (idk)
I also will try and make it use the exp/hp/mp bar way, I believe there even was a whole tutorial about that, but first gonna try it myself.
Edit2:
@ Helladen:
Find:
```
Sub ProcessMovement(ByVal Index As Long)
```:)
-=-=-
Edit3:
Got it working, I'm fine with what I have here.
Now I wonder if I can make it some kind of stats out of it.
So that if people level up, they can upgrade their Stamina.
I'll go and try that. -
@QWERTYUIoP:
> Thought I'd report this; When you chat any longer than the picScreen, instead of going over the line, it just carries on, off-screen.
I know this is like almost a month old topic, but I didn't feel like creating a whole new topic for it.
But I have the same problem, and I can't figure out how to put a limit on it.
I tried random things, but nothing did what I wanted it to do, limiting the chars which you can type at once. -
Yea, that's actually a good idea too. :P
I indeed was making it a loading screen, as those 3D games have. But now I see what you wanted to do with it.. that's no bad idea at all!
Hmm, I'll see what I can do with it, I need to rebuild the GUI anyhow as of yet. :) -
I tried it, I had some spare time.
I like the idea!
But the loading times don't that that long, but sure it's okay if you have a active server and lot's of people playing it. So adding a timer delay would just delay it for no reason, besides the player still can be attacked?
I know that's where the timer is for, but still..
Anyhow I want to tweak it to only be there when there is a need to load it. I'll shear it when I'm done.
-=-=-=-=-=-=-=-=-=-=-=-=-
Edit - I'm done.
-=-=-=-=-=-=-=-=-=-=-=-=-
Ok instead of looking for this:
```
' Check if they can warp to a new map
If Map.Up > 0 Then
```
And do what Carim did, like adding timer etc.
Do this:
Go to:
```
Public Sub LoadMap(ByVal MapNum As Long)
Dim fileName As String
```
And find:
```
fileName = App.Path & MAP_PATH & "map" & MapNum & MAP_EXT
ClearMap
f = FreeFile
```
Right under that add:
```
frmMain.picCat.Visible = True
frmMain.picCat.Picture = LoadPicture(App.Path & "\data files\graphics\load\" & "load.bmp")
```
_(And yes, now instead of map 'eye' use: 'load' - also use only one image 'load.bmp')_
Which is just above:
```
Open fileName For Binary As #f
Get #f, , Map.Name
```
Now add the part to close it when loading is finished:
Find:
```
For X = 1 To MAX_MAP_NPCS
Get #f, , Map.Npc(X)
Next
```
Right after that add:
```
frmMain.picCat.Visible = False
```
Which should be right above:
```
Close #f
ClearTempTile
```
You're done!! :)
- Though, in most cases it will just show up for like… 1ms? :P I'm playing it local host and stuff, but I even tried 100x100 maps and it still didn't take long at all.
**You still must add the Picture box: 'picCat' like told before by Carim.**
~Adr990 -
I meant just one button on the Keyboard like: TAB to switch the checkbox, btw. :)
And thanks for pointing out about the transparency of the chatbox. Really gonna save some screen space, and make the GUI look better. -
Heh, yea I wanted to do something like that too.
I think this is the best way to do it, maybe I'll go and add a keyboard button switch for it too, besides being able changing it by mouse.
Thanks man.
-=-=-
Besides, how did you make the Chat transparent, I remember trying that quite a while ago.. But couldn't figure it out.
Edit:
http://www.touchofdeathforums.com/smf/index.php/topic,72039.0.html
I guess what Akio posted will work.
I can't try now though as I'm doing exams. Will try it after them though. heh -
Woah! Amazing!
Really nice.
Thanks dude, I will really try and play with it after I'm done with my exams. -
Awesome!
I will try and play with this after my exams.
Help Eclipse
in News
Posted