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

Dhamone

Members
  • Posts

    19
  • Joined

  • Last visited

    Never

Dhamone's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. even though the person is remembering their hopes and stuff, it is still occuring at the time of their death..just sounds a bit upbeat. just my oppinion though ;)
  2. hehe luv the doc phil model btw ;)
  3. gonna be quite honest here…as i often am when im drunk...if a seperation agreement in a divorce...which is written down and agreed to by both parties is nothing more then toilet paper..why do you honestly think any court of law will take you to court for stealing 2d grafx.. i understand the not wanting to step on someones grass..but quite frankly were making stuff for a dead tech.. get over yerself.
  4. Dhamone

    Snow

    -22C here think thats roughly -12 F and about 2 feet o snow
  5. Celeron 2.0 g, 1 g of ram,ATI Radeon 9550 128 mb averaged about 110 fps
  6. Just a few screenies , well I dont have a reason..guess because i dont have enough done yet to put it in wip. ![](http://i10.photobucket.com/albums/a129/dhamone/sample2.jpg) ![](http://i10.photobucket.com/albums/a129/dhamone/sample3.jpg) ![](http://i10.photobucket.com/albums/a129/dhamone/sample4.jpg) ![](http://i10.photobucket.com/albums/a129/dhamone/sampletile.jpg) my first attempt at most of this stuff, lemme know what ye think.
  7. Hey there first night with vb6 and allready questions, hehe. Managed to change screen size fairly easily, but when implementing the [http://www.touchofdeathforums.com/smf/index.php/topic,28926.msg254134.html#msg254134](http://www.touchofdeathforums.com/smf/index.php/topic,28926.msg254134.html#msg254134) I ran into a snag. Here is the code as i have it, I am using Stable. ``` 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 End If ``` now it compiles ok without error, problem is it types out every letter on its own line of the chat box…any help will be greatly appreciated.
  8. lol have to agree there, no sense spending that much..soon as it gets to your door its outdated.
  9. semi working on mine, have the issue with no vb6 or knowledge of how to use it to tweak. Issue i see soo far is just the spells being reset whenever you go in to edit them
  10. hehe i was thinking of a sci-fi mmo myself, yes they have been done before but at least they are not the mainstream. EvE online is a good one, and Earth and Beyond was a good one, and may be again as an emulation team is re-releasing it.
×
×
  • Create New...