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

egemert35

Members
  • Posts

    50
  • Joined

  • Last visited

    Never

egemert35's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. > what engeine you using dx7 or dx8? Dx8. I'll test again.
  2. Hello. Night Layer looks like Mask Layer, i want to change it, like fringe layer. This is possible?
  3. egemert35

    Weather

    > Looks nice, We will need something similar to this for Pokemon Rumble Online… Thank you. ![^_^](http://www.touchofdeathforums.com/community/public/style_emoticons//happy.png)
  4. [media]http://www.youtube.com/watch?v=7mFKInweROY[/media] How can i fix that? ![:unsure:](http://www.touchofdeathforums.com/community/public/style_emoticons//unsure.png)
  5. egemert35

    Jukebox MP3

    > The tutorial does not include the actual PlayMidi sub from what I see so this is a blind statement. From what I gather, there's only one place you see ".mid". > > Change that one line of code to: > > ``` > > Dim Path as String > > Path = lstJuke.List(lstJuke.ListIndex & ".mid" > > If FileExist(Path) Then > > PlayMidi Path > > Else > > Path = lstJuke.List(lstJuke.ListIndex & ".mp3" > > PlayMidi Path > > End If > > ``` > > Now this is untested, but the logic is correct compared to the information in the link you provided. Thank you bro. I just added PlayMusic lstJuke.List(lstJuke.ListIndex) & ".mp3" And worked. Like that: ``` Private Sub cmdPlay_Click() If Options.Music = 1 Then StopMusic PlayMusic lstJuke.List(lstJuke.ListIndex) & ".mid" PlayMusic lstJuke.List(lstJuke.ListIndex) & ".mp3" Else StopMusic End If End Sub ```
  6. egemert35

    Weather

    > looks good : ), (i has my own but its good to show others a example) Thanks. ![:)](http://www.touchofdeathforums.com/community/public/style_emoticons//smile.png)
  7. egemert35

    Weather

    > mind showing a test map with it in effect? so anyone knows how it will look before hand. Okay.Wait a minute. Look at the OP.
  8. egemert35

    Weather

    Hi guys.I made new fog type: Sandstorm And Weather.png >! Sandstorm >! ![](http://imageshack.us/a/img827/443/sandstormn.png) >! Weather >! ![](http://imageshack.us/a/img14/193/weatherrt.png) I hope you like. ![:)](http://www.touchofdeathforums.com/community/public/style_emoticons//smile.png) Edit: >! Rain: >! ![](http://img254.imageshack.us/img254/5868/70186936.png) >! Hail: >! ![](http://img824.imageshack.us/img824/6541/85245960.png) >! Snow: >! ![](http://img832.imageshack.us/img832/1986/64620645.png) >! Sandstorm (Fog) + Sandstorm (Weather) >! ![](http://img835.imageshack.us/img835/1023/42478191.png)
  9. I added Game Time: (Label8) and xx:xx (lblGameTime) to server.But labels are invisible. How can i fix that? Note: Label8 and lblGameTime Properties, Visible: True Note2: I'm using Dragon Eclipse. Edit: Sorry, my bad.I fixed.
  10. egemert35

    Jukebox MP3

    Note: I want to add MP3 + Midi format in Jukebox. Somebody?
  11. egemert35

    Jukebox MP3

    I tried but didn't work. ![
  12. egemert35

    Jukebox MP3

    [http://www.touchofde…ge__hl__jukebox](http://www.touchofdeathforums.com/community/index.php?/topic/119345-adding-a-jukebox/page__hl__jukebox) Guys, i want to change jukebox format, but how? (Midi to MP3) (Mortal Angels MP3 System Link Here: [http://www.touchofde…ng-mp3-to-eo23/](http://www.touchofdeathforums.com/community/index.php?/topic/128597-adding-mp3-to-eo23/))
  13. Okay, I understood now. Good job. ![:)](http://www.touchofdeathforums.com/community/public/style_emoticons//smile.png)
  14. I don't understand. [>! ![](http://mmohuts.com/wp-content/gallery/neo-online-full/neo-online-loot-warrior.jpg?ec9f9b)](http://mmohuts.com/wp-content/gallery/neo-online-full/neo-online-loot-warrior.jpg?ec9f9b) Like that?
  15. Hmm?? Wrong code? This part: **In [background=yellow]Item[/background]EditorInit, under** **``` If (frmEditor_Item.cmbType.ListIndex = ITEM_TYPE_SPELL) Then frmEditor_Item.fraSpell.Visible = True frmEditor_Item.scrlSpell.Value = .Data1 Else frmEditor_Item.fraSpell.Visible = False End If ```** **add** **``` If (frmEditor_Item.cmbType.ListIndex = ITEM_TYPE_SPELL) Then frmEditor_Item.fraSpell.Visible = True frmEditor_Item.scrlSpell.Value = .Data1 Else frmEditor_Item.fraSpell.Visible = False End If ```** You should edit this part.
×
×
  • Create New...