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

Bobbus

Members
  • Posts

    569
  • Joined

  • Last visited

    Never

Bobbus's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. @įšçhíłłí1: > I have enough of a life not to post like 50 posts a day! Sorry for calling you out individually for this, and sorry for the random spam, but ugh, is that 'argument' really necessary? You base someone's having a life off of how many posts they make on a forum? I can look past age, because that's got nothing to do with maturity or anything like that, but when I hear someone say "I have more of a life than you because of my post count on an internet forum," I facepalm. I'm sorry for calling you out, I've just heard that so many times in my life, and it bugs the hell out of me. Carry on!
  2. Bobbus

    New Forsville

    Ah, I wish I were as logical as you >< I'll trash it and re-do it with your tips in mind. Thank you so much for helping me. I'll post the new version in few days.
  3. Bobbus

    New Forsville

    Ah, very good points. I'll get right to that. Thanks for the tips! :] Do you think the city itself is looking okay? Like, the houses and details and the like?
  4. Bobbus

    New Forsville

    That first map you posted was actually what inspired me to do this one. I've much to learn, but hopefully I'm making steps in the right direction. I'll keep checking out your maps and see what makes them as amazing as they are. Thanks :D
  5. Bobbus

    New Forsville

    Here's a map of the North District of the booming town of New Forsville. Enjoy! [![](http://img143.imageshack.us/img143/943/newforsville.png)](http://img143.imageshack.us/i/newforsville.png/)
  6. Alright, so, basically, here's what it now looks like: ``` If (KeyAscii = vbKeyReturn) Then frmStable.txtMyTextBox.Text = vbNullString If Player(MyIndex).Y - 1 > -1 Then If Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).Type = TILE_TYPE_SIGN And Player(MyIndex).Dir = DIR_UP Then Call AddText("The Sign Reads:", BLACK) If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String1) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String1), GREY) End If If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String2) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String2), GREY) End If If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String3) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String3), GREY) End If Exit Sub Else Call CheckMapGetItem If Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex)).Type TILE_TYPE_ITEM Then If frmStable.txtMyTextBox.Visible = False Then frmStable.txtMyTextBox.Visible = True frmStable.txtMyTextBox.SetFocus Else frmStable.picScreen.SetFocus frmStable.txtMyTextBox.Visible = False End If End If End If End If ``` So, it kind of works. The type-stuff-in box is now gone, and only appears when I press enter. However, when it is open, all my keystrokes are instantly posted. For example, if I type "Red" in the chat box, this is what happens in game: Bobbus:R Bobbus:Re Bobbus:Red And so fourth, for every word. Also, another problem: I can delete text not only in the type-stuff-in box, but also in the chatbox itself, which I do not want. Thanks for the tip with the change frmMirage to Stable, it worked :D Just gotta fix the rest of this stuff and i'll be alll set!
  7. In what ways would it be opened improperly? I just clicked on the Eclipse.vbp and then opened the Form.
  8. I found a guide on learning how to press Enter to talk. Basically, this is what it says: 1\. Set txtMyTextBox visibility, found in frmMirage, to False. 2\. Find, in modGameLogic: ``` If (KeyAscii = vbKeyReturn) Then frmMirage.txtMyTextBox.Text = vbNullString If Player(MyIndex).y - 1 > -1 Then If Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).Type = TILE_TYPE_SIGN And Player(MyIndex).Dir = DIR_UP Then Call AddText("The Sign Reads:", BLACK) If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String1) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String1), GREY) End If If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String2) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String2), GREY) End If If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String3) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String3), GREY) End If Exit Sub End If ``` And Replace with this: ``` If (KeyAscii = vbKeyReturn) Then frmMirage.txtMyTextBox.Text = vbNullString If Player(MyIndex).Y - 1 > -1 Then If Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).Type = TILE_TYPE_SIGN And Player(MyIndex).Dir = DIR_UP Then Call AddText("The Sign Reads:", BLACK) If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String1) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String1), GREY) End If If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String2) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String2), GREY) End If If Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String3) vbNullString Then Call AddText(Trim$(Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex) - 1).String3), GREY) End If Exit Sub Else Call CheckMapGetItem If Map(GetPlayerMap(MyIndex)).Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex)).Type TILE_TYPE_ITEM Then If frmMirage.txtMyTextBox.Visible = False Then frmMirage.txtMyTextBox.Visible = True frmMirage.txtMyTextBox.SetFocus Else frmMirage.picScreen.SetFocus frmMirage.txtMyTextBox.Visible = False End If End If End If End If ``` I've done those things, but I keep getting a "Variable not defined" error, and it highlights: ``` frmMirage ``` on the line: ``` frmMirage.txtMyTextBox.Text = vbNullString ``` Any help would be greatly appreciated. Sorry for the stupidity of this question.
  9. Game info: http://www.touchofdeathforums.com/smf/index.php/topic,60630.0.html What you're expected to do: Our team currently consists of 3 people. I'm not gonna lie, we're pretty laid-back. All we ask is that you script within 24 hours of us asking for a script. And we don't mean finishing it, but at least starting it. What you'll be expected to script: -The generic "Skill" and "Quest" scripts, obviously. I can give more detail into that if you want. -Weapons that can have poisons on them. -Damage over Time (DoT) spells, and Healing over Time (HoT) spells. -Stun spells (Freeze the target for a set amount of time). If you can do all of that and more, then you're perfect for the job! We're very laid-back and friendly. If you love scripting, and wish to do it for a real project, then this is your opportunity! Contact info: -Leave a reply here. -My MSN: [email protected] -Send me a Private Message here. We'd love to have you!
  10. Grats, man! My 'reflecting' is me going back and looking through older posts, seeing how much of a total douchebag I was. Some of the things I've said to people are mind-boggling to my current self, and I'm pretty disappointed that I actually said some of those things o_O Anyway, congratulations! You've always been someone I've looked up to, believe it or not. Cheers!
  11. Oh, Admiral, that's perfect! Thank you so much, that's a wonderful find!
  12. Bobbus

    Mapping For Fun

    I'm gonna miss that carpet. We became good pals in the time we had :/ Have you done anything that would cause that crash, or is it just random?
  13. That's what Eclipse Stable is using, isn't it? It's playing MP3's perfectly fine as of now.
  14. Basically, I'm looking for peaceful backround music mp3s. Like, songs you'd hear in a forest, or in a small village. Anyone know any good sites?
×
×
  • Create New...