Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

adr990

Members
  • Posts

    101
  • Joined

  • Last visited

    Never

Everything posted by adr990

  1. Woah, that's a amazing GUI! I'm really stunned about it. Thanks for this Robin! Love the Hot Bar. :D Edit: @ Screenshot before; I really like the Combat System Message, I also like your idea's about your EO new combat system, topic. It makes a game have some great finishing touches.
  2. That's awesome Robin. :) Thank you.
  3. @Rithy58: > Robin, should I start using EO 1.1.0 or should I wait for the next one? > If it's coming out soon, I'll wait. > If you need a lot more time, I'll use EO 1.1.0. > > Sincerely, > Rithy I would actually like to know that too, I´m starting a new Project on EO, and I would like to directly start with 1.1.1 if it´s nearby, else I probably have to transfer stuff or start over all again. With all respects though, hehe. I really like EO.
  4. Heya, I've changed the EO MainGame Screen Resolution to 800*600, like may some others. Therefore I'd like to share this "fix". ``` Public Sub UpdateDrawMapName() DrawMapNameX = Camera.Left + ((MAX_MAPX + 900) * PIC_X / 1) - getWidth(TexthDC, Trim$(Map.Name)) DrawMapNameY = Camera.Top + 1 'Tnx Crest of Dark Select Case Map.Moral Case MAP_MORAL_NONE frmMainGame.Caption = GAME_NAME & " - " & Trim$(Map.Name) & " (PVP)" & " - " Case MAP_MORAL_SAFE frmMainGame.Caption = GAME_NAME & " - " & Trim$(Map.Name) & " (Safe Zone)" & " - " Case Else frmMainGame.Caption = GAME_NAME & " - " & Trim$(Map.Name) & " - " End Select End Sub ``` I didn't change any code really. But it solves the problem how the Map Name still was visible at the game map on the top left if you've done the 800*600 'mod'. And thanks for this, I really like how you've done it. So simple, but hey you just have to come up with this idea and workout, hmm. I wouldn't figure it that easy that is..
  5. Hey, nice job on this one. Looks easy to do. (Yet I'm in learning stage.) I should mess with this code some more. I hope to write some nice coding like a Ticket system or so. Just to start with. I will make a Tutorial too. These tutorials are helping me out step by step by applying them and mess around with them. Thanks, keep it up. I wonder how the Cancel or Reset system would work and keeping a Log of all your quests. Probably needs something to do inside the same .Ini. Or eventually another .Ini. ([Quests-Done] Quest1=Done/Busy/-) I'm trying to figure out it my self for now, it sure should be able to be done with just this code already. And I really like the ease of use of this In-Game Quest maker. I'm really gonna use this one. Thanks!
  6. This would be really cool! You already seem to have add everything, just how to get stuff stored..? I wouldn't know really but could this help out: http://www.freevbcode.com/ShowCode.Asp?ID=733 It show some code of storing a text, editing this up a little could may just do the job. (Just _trying_ to help out, hehe.)
  7. Hey all, I've tried a quite few things, but I can't get my custom tiles to work. As in when I do this: ``` Private Sub optWarp_Click() ClearAttributeDialogue picAttributes.Visible = True fraMapWarp.Visible = True scrlMapWarp.Max = MAX_MAPS scrlMapWarp.Value = 1 scrlMapWarpX.Max = MAX_BYTE scrlMapWarpY.Max = MAX_BYTE scrlMapWarpX.Value = 0 scrlMapWarpY.Value = 0 End Sub ```(This is the WARP Tile) But than a making a Custom Tile, like If level 80< than TILE_TYPE_BLOCKED (I really can't figure the Blocked tile code) call playermsg("You're to weak to enter") But than I go in game, and I want to put the Tile onto the map, via Map Editor, but it doesn't place the custom tile at all. :S If anyone could make a tutorial for this in EO. I would be very thankfully. As I came to realize I need help with this, really. Thanks in advance! Adr990
  8. Also, try to remove all NPC's first than star client and sever again and try. And for the scroll bar, limit it 4924 (Max) to avoid crash on client side. Probably just some Byte to Long changes to fix the crash I believe but didn't bother trying yet.
  9. 'Add an exception to the rule?' I gotta learn more VB6 to really understand that, or is it a lack of my English? Thanks for your time helping me though this Tile coding, really.
  10. Oops, I meant it otherwise. Like, I want to use the Block Attribute to avoid the player moving through that Tile. So like this: ``` If GetPlayerLevel(MyIndex) < 80 Then 'Call a Block Attribute Procedure Here (Which I don't know.) Call PlayerMsg(index, "Need to be at least lvl 80 to enter", red) ``` I hope that's more clearly.
  11. Okay I shall study the source code and try to figure out if there is a warp player procedure and I will google a tutorial for a flash or image pop up window in VB6\. I should be able to right? After studying the Source code of EO too ofcourse. – As for the 'Call BlockPlayer', I tried to find the Block Attribute procedure. But it's empty, like this: ``` Private Sub optBlocked_Click() End Sub ``` I think I should find it anywhere else in the Source code but I failed to do so. If you could show me how I should search for these procedures in source code for later. It would help me a lot I bet. Just wanted to point this out, EO is really helping people out learning VB6 in meanwhile they're creating something. At least that's how I feel about it. Good job robin!
  12. Hmm, okay, thanks. I'll redownload the source and so start over. Feels good to start over like this early. Just now the Source edits I'd like to add to EO is what I'm seeking for. Than I can finally start doing some real mapping heh. Edit: I'm having problems with commands in EO: Client > frmEditorMap ``` Private Sub Lvl80BelowBlock_Click() If GetPlayerLevel(MyIndex) < 80 Then [color]Call Call BlockPlayer(index)[/color] Call PlayerMsg(Index, "You need to seem stronger before the Guards will let you pass", red) End If Exit Sub End Sub ``` Why wouldn't that just work? I've also tried a way around: ``` Private Sub Lvl80BelowBlock_Click() If GetPlayerLevel(MyIndex) < 80 Then [color]Call PlayerWarp(Index, 4, 15, 10)[/color] Call PlayerMsg(Index, "You need to seem stronger before the Guards will let you pass", red) End If Exit Sub ``` One more thing, back in EE we could use Flash animations. I wouldn't mind to use .GIF Or just a plain .PNG/.BMP/.JPG to pop up for now. ``` Private Sub Lvl80BelowBlock_Click() If GetPlayerLevel(MyIndex) < 80 Then Call Flash(index, "Title.swf") Else Call PlayerMsg(index, "You might train a little more before getting in there", Red) End If Exit Sub End Sub ``` Thanks again, Adr990
  13. Heh yea that was what I meant with scripting. @ Error, the whole source code? Replacing all of it? That's a pain. :( If I really can't fix it otherswise I must life with it, heh. Where did this error came from anyhow?
  14. Hey all, I'm new to EO, and therefore I'm used to scripted NPC's and Tiles etc. (EE stuff.) Gladly Qazek made this for the NPC's already: http://www.touchofdeathforums.com/smf/index.php/topic,61017.0.html But as far as I know EO also doesn't have Scripted Tiles, or does it? I want to make stuff like 'If stand on scripted title check level is higher than 10 if lower than kick(warp/block) back'. And if incorrect class you connot go through the Tile. And if attack Tile, Tile layer changes, And randomly drops a item. (Grass > Cuccrency as in Zelda.) –-- I saw a script which had Bow Ammo, that's pretty genius. Any chance this is possible on EO? ---- And as there is no Item Durability in EO, may Robin already thought of adding this in EO once. If not, I would like to have a EO mod if possible at all. As I can imagine this to be a harder mod. ---- Last thing to make game be perfect: Stats Merchant in game! If player screwed up later in the game like only adding points to his Strenght, he may fails at fighting some NPC's or wearing weapons. I think that should be a pretty simple NPC script. Though I would not know how to take Stat points from player and add them back in scripts. ---- Thanks for your time I greatly appretice it, this would help me such a lot. And I bet I could create a few other source edits thanks to some of these source edits I'm asking for now. Of course I'm sharing these as soon as I made and tested them. Greetings, Adr990
  15. How did you made bigger (scrolling) maps? I always worked with scrolling maps and like it better. Also, I would like the Client game windows to be bigger. It's kinda small and so its also a small map. Thanks in advance!
  16. I think he wants the follow: If you attack a NPC (With CTRL button ofcourse) the NPC will pop up a picture.
  17. Works ~~almost~~ perfect here. :) Great script! This makes fights more realistic. Ok just set the Max in the Hscroll bars to 4924. That will avoid the client crash. :)
  18. DJMaxus you're the best. :D Thanks for this fix, keep it up! Ballie this is the best drop script ever seen on Eclipse. I'm p. sure. It does %'s and 1/10 14/20 everything. Thanks!
  19. @boneyou: > here's my whole sub. the error you were getting was probably the color wasn't dimmed > > ``` > Public Sub DrawNPCName(ByVal Index As Long) > Dim NpcName As String > Dim TextX As Long, TextY As Long, Sprite As Long, NpcNum As Long > Dim color As Long > > NpcNum = MapNpc(Index).Num > > If NpcNum = 0 Then > Exit Sub > End If > > Sprite = Npc(NpcNum).Sprite > NpcName = Trim$(Npc(NpcNum).Name) > > ' Calculate the X coordinate to place the name > TextX = ConvertMapX(MapNpc(Index).X * PIC_X) + MapNpc(Index).XOffset + (PIC_X \ 2) - getWidth(TexthDC, NpcName) > > If Sprite < 1 Or Sprite > NumCharacters Then > TextY = ConvertMapY(MapNpc(Index).Y * PIC_Y) + MapNpc(Index).YOffset - 17 > Else > TextY = ConvertMapY(MapNpc(Index).Y * PIC_Y) + MapNpc(Index).YOffset - (DDSD_Character(Sprite).lHeight) + 16 > End If > > ' Check npc behaviour > If NpcNum > 0 Then > > Select Case Npc(NpcNum).Behaviour > Case 0 ' NPC_BEHAVIOUR_ATTACKONSIGHT > color = RGB(255, 96, 0) > Case 1 ' NPC_BEHAVIOUR_ATTACKWHENATTACKED > color = QBColor(DarkGrey) > Case 2 ' NPC_BEHAVIOUR_FRIENDLY > color = QBColor(Cyan) > Case 3 ' NPC_BEHAVIOUR_SHOPKEEPER > color = QBColor(BrightGreen) > Case 4 ' NPC_BEHAVIOUR_GUARD > color = QBColor(Yellow) > End Select > Else > color = QBColor(BrightRed) > End If > > ' Draw name > Call DrawText(TexthDC, TextX, TextY, NpcName, color) > End Sub > ``` Neat. :) Thanks for this too, I'm using this at the moment. Keep it up! RGB(255,128,0 =/= Orange (yay)
  20. @Ertzel: > Well you have the code to display text, before all of the displaying text code is even handled, then u have it exiting the script before running it all… > > Try this > -snip- Hmm.. I see. Thanks a ton Ertzel link! It works flawless now. :) (Though, EO doesn't accept 'Orange' so I changed it to Blue, for the time being) @boneyou Your script doesn't work here. It gives compile errors. But indeed it is a nice idea.
  21. adr990

    Editor

    It's been a little while since I used EE, but I thought the Editor was used to edit the Scripts.txt it's a application to highlight some commands etc. The mining and fishing scripts are out there in the forums. http://www.touchofdeathforums.com/smf/index.php/board,78.0.html Use Mask1(or2) and Frame1(or2) for that. Just place the bridge tiles over each other with them. Try it, and magic happens. heh Good luck.
  22. Oh yes, sorry about that. I either will make them smaller or put them in spoilers next time. But thanks again, this fixed it. :) Also, if I did use this "Dim MaxMap as long" and change a little few other things on the MaxMaps scripts (If I found it.) I could have more maps than 255, right? (Also for NPC, Shops, etc.) And again, this is so far the best Eclipse MMORPG Maker I worked with. :) I'm getting used to it quickly also. Edit: My level up system is borken. I keep remaining op lvl1 with 25exp. Anyone else having this too? I'm messing with it now, though no success yet.
  23. ~~This is so useful. :) Thanks for this, it really makes it easier to change it, and you have less risk messing stuff up. Edit: I get the follow error while trying to compile. I've double checked everything, but everything should be correct. Image: >! ![](http://img594.imageshack.us/img594/6488/maxlvlerror.png) What to do?~~ Sloved.
  24. Thanks Tylian. I remember this propblem was even in EE. Good stuff, keep it up!
  25. adr990

    [EO] Map Report

    Thank you! Was already wondering what was wrong and this message of Robin. heh This makes life easier.
×
×
  • Create New...