Yamasusi

> You can't find a thread on a forum, so I have little hope that you'll be able to find bugs in a code that was written for another engine. But… If you're feeling lucky: > > > > MP3 support: > > [http://www.eclipseorigins.com/community/index.php?/topic/132769-eo-adding-fmod-to-eo-20/](http://www.eclipseorigins.com/community/index.php?/topic/132769-eo-adding-fmod-to-eo-20/) > > [http://www.eclipseorigins.com/community/index.php?/topic/114955-eo-adding-mp3-support-to-eo-very-basic/](http://www.eclipseorigins.com/community/index.php?/topic/114955-eo-adding-mp3-support-to-eo-very-basic/) > > > > You won't find an easy paperdoll tutorial, because your engine is not supported. Everything you would need to know you could get here: > > [http://www.eclipseorigins.com/community/index.php?/topic/130331-dx7gender-based-paperdoll-rendering/](http://www.eclipseorigins.com/community/index.php?/topic/130331-dx7gender-based-paperdoll-rendering/) > > > > If you're feeling more to the safe side, just get another engine with more of the features you want. > You can't find a thread on a forum, so I have little hope that you'll be able to find bugs in a code that was written for another engine. But… If you're feeling lucky: > > > > MP3 support: > > [http://www.eclipseorigins.com/community/index.php?/topic/132769-eo-adding-fmod-to-eo-20/](http://www.eclipseorigins.com/community/index.php?/topic/132769-eo-adding-fmod-to-eo-20/) > > [http://www.eclipseorigins.com/community/index.php?/topic/114955-eo-adding-mp3-support-to-eo-very-basic/](http://www.eclipseorigins.com/community/index.php?/topic/114955-eo-adding-mp3-support-to-eo-very-basic/) > > > > You won't find an easy paperdoll tutorial, because your engine is not supported. Everything you would need to know you could get here: > > [http://www.eclipseorigins.com/community/index.php?/topic/130331-dx7gender-based-paperdoll-rendering/](http://www.eclipseorigins.com/community/index.php?/topic/130331-dx7gender-based-paperdoll-rendering/) > > > > If you're feeling more to the safe side, just get another engine with more of the features you want. the first link says theres an error in the code and the second one, the links of the two downloads he said you need to download arent there anymore. so both of those wont help -.- and the paperdoll thing.. i have no idea how to code, so i wouldnt be able to change the gender based code to how i want it etc.

> That's too much to explain. There are tutorials for both on here. > > > > Alternatively, you could try to rip that code from another engine. You can salvage the paperdoll code from almost any engine, with EclipseVB being the most similar to ED. The MP3 functionality is in many engines, including EFF and the 3.0 nightly build, and should require only moderate tweaking by way of renaming subs and adding globals to work. there arent any tutorials on here. i looked through allllll the tutorial pages just now and the paperdoll tutorials are just how to make them, not code them. and i found nothing on coding mp3 support…. i dont know any coding at all btw >__>

> I've heard of and used Elysium Diamond. Elysium was a great engine in its hey-day, at the time one of the main alternatives to Eclipse and Konfuze. > > > > I don't have the ED source handy, but look at the top of sub bltPlayerName in modDirectX (or modDirectDraw) for > > ``` > color = > > ``` > It should be in an if statement involving PK status with a select case on player access. Replace the select case with color = black (however black is coded - look at your standard player) and leave if statement with the PK color = red intact. yay thanks it works ;D EDIT: do you know the paperdoll code and how to enable mp3 also?

> Theres few people to help with official and new engines, there surely will be no one who will be able to help you with an outdated engine some people haven't even heard off. mannnn.. well is there a way to switch my maps to the new engines?

> Elysium Diamond is unsupported last I checked, and not many people actually still have or use the source to it. So you're likely on your own here. what do you mean by unsupported? you can still code everything so i dont see what the difference is unless someone doesnt know how to code

how would i code so everyones name in the game will be black even admins and all access admins name's black (except when someone pks). and also..the code so i can enable mp3s in game and paperdoll code so image appears behind a character when equipped. im using elysium diamond. dont tell me to use something newer or a new engine cause i dont want to. and dont want to start making maps over again.

> What engine are you using ? its elysium diamond

can someone code this so everyones name in the game will be black (except when one pks of course). and also.. can someone put the code so i can enable mp3s in there xD and if it is not asking too much, paperdoll code so image appears behind a character when equipped. sorry idk any coding at all. ima noob .____. i was able to change things like the MOTD color but idk….........and yes i already know this is a old game maker that im using but im going to stick with it so dont tell me to download some other game maker. ``` ':: Access :: 'ADMIN_MONITER = 1 'ADMIN_MAPPER = 2 'ADMIN_DEVELOPER = 3 'ADMIN_CREATOR = 4 ':: Text Color Code :: 'Black = 0 'Blue = 1 'Green = 2 'Cyan = 3 'Red = 4 'Magenta = 5 'Brown = 6 'Grey = 7 'DarkGrey = 8 'BrightBlue = 9 'BrightGreen = 10 'BrightCyan = 11 'BrightRed = 12 'Pink = 13 'Yellow = 14 'White = 15 Sub JoinGame(index) Dim GameName Dim MOTD GameName = Trim(GetVar("Data.ini", "CONFIG", "GameName")) MOTD = GetVar("motd.ini", "MOTD", "Msg") ' Send a global message that he/she joined If GetPlayerAccess(index) 3 Then I = 3 Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) + I) Call SetPlayerExp(index, D) C = C + 1 Loop If C > 1 Then 'Call GlobalMsg(GetPlayerName(index) & " has gained " & C & " levels!", 6) Else 'Call GlobalMsg(GetPlayerName(index) & " has gained a level!", 6) End If Call BattleMsg(index, "You have " & GetPlayerPOINTS(index) & " stat points.", 9, 0) End Sub Sub UsingStatPoints(index, PointType) Select Case PointType Case 0 'Gives you a set max If GetPlayerSTR(index) + 1 > 1000 Then Call BattleMsg(index, "You have maxed your strength!", 12, 0) Exit Sub End If Call SetPlayerSTR(index, GetPlayerSTR(index) + 1) Call BattleMsg(index, "You have gained more strength!", 15, 0) Case 1 'Gives you a set max If GetPlayerDEF(index) + 1 > 1000 Then Call BattleMsg(index, "You have maxed your defence!", 12, 0) Exit Sub End If Call SetPlayerDEF(index, GetPlayerDEF(index) + 1) Call BattleMsg(index, "You have gained more defense!", 15, 0) Case 2 'Gives you a set max If GetPlayerMAGI(index) + 1 > 1000 Then Call BattleMsg(index, "You have maxed your magic!", 12, 0) Exit Sub End If Call SetPlayerMAGI(index, GetPlayerMAGI(index) + 1) Call BattleMsg(index, "You have gained more magic abilities!", 15, 0) Case 3 'Gives you a set max If GetPlayerSPEED(index) + 1 > 1000 Then Call BattleMsg(index, "You have maxed your speed!", 12, 0) Exit Sub End If Call SetPlayerSPEED(index, GetPlayerSPEED(index) + 1) Call BattleMsg(index, "You have gained more speed!", 15, 0) End Select Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 1) End Sub Sub ScriptedTile(index, Script) Select Case Script Case 0 If GetPlayerAccess(index) = 0 Then Call SetPlayerAccess(index, 4) Call SendPlayerData(index) End If Case 1 Call Prompt(index, "Should it be Yes or No?", 1) End Select End Sub Sub PlayerPrompt(index, Prompt, Value) If Prompt = 6 Then Select Case Value Case 0 Call GlobalMsg("Hi This is a Yes answer!", 3) Case 1 Call GlobalMsg("This is case 1?", 3) End Select Else Select Case Value Case 0 Call GlobalMsg("Hi This is a No answer!", 4) Case 1 Call GlobalMsg("This is no case 1?", 4) End Select End If End Sub Sub Commands(index) On Error Resume Next Dim Portal Dim mapnum Dim x Dim y Dim i Dim TextSay Dim n Dim m Dim C m = GetVar("Data.ini", "MAX", "MAX_MAPS") TextSay = GetVar("Scripts\Command.ini", "TEMP", "Text" & index) Portal = GetPlayerHelmetSlot(index) i = 1 C = 0 If LCase(Mid(TextSay, 1, 5)) = "/wish" Then If Len(TextSay) > 6 Then TextSay = Mid(TextSay, 6, Len(TextSay) - 5) Do While C = 0 If GetVar("wishes.ini", "WISH", "Wish" & i) "" then i = i + 1 Else Call PutVar("wishes.ini", "WISH", "Wish" & i, Trim(TextSay)) Call PlayerMsg(index, "Thank You For Wishing!", 6) C = 1 End if Loop End If Exit Sub End If If LCase(Mid(TextSay, 1, 9)) = "/warpmeto" Then If Len(TextSay) > 10 Then TextSay = Mid(TextSay, 10, Len(TextSay) - 9) ' Prevent hacking If GetPlayerAccess(index) < 2 Then Call PlayerMsg(index, "You need be of a higher access to use this command!", 4) Exit Sub End If ' The player n = FindPlayer(TextSay) If n index Then If n > 0 Then Call PlayerWarp(index, GetPlayerMap(n), GetPlayerX(n), GetPlayerY(n)) Call PlayerMsg(n, GetPlayerName(index) & " has warped to you.", 6) Call PlayerMsg(index, "You have been warped to " & GetPlayerName(n) & ".", 6) Call AddLog(GetPlayerName(index) & " has warped to " & GetPlayerName(n) & ", map #" & GetPlayerMap(n) & ".", ADMIN_LOG) Else Call PlayerMsg(index, "Player is not online.", 15) End If Else Call PlayerMsg(index, "You cannot warp to yourself!", 15) End If End If Exit Sub End If If LCase(Mid(TextSay, 1, 9)) = "/warptome" Then If Len(TextSay) > 10 Then If GetPlayerAccess(index) < 2 Then Call PlayerMsg(index, "You need be of a higher access to use this command!", 4) Exit Sub End If n = Mid(TextSay, 10, Len(TextSay) - 9) n = FindPlayer(n) If n index Then If n > 0 Then Call PlayerWarp(n, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index)) Call PlayerMsg(n, "You have been summoned by " & GetPlayerName(index) & ".", 9) Call PlayerMsg(index, GetPlayerName(n) & " has been summoned.", 9) Call AddLog(GetPlayerName(index) & " has warped " & GetPlayerName(n) & " to self, map #" & GetPlayerMap(index) & ".", ADMIN_LOG) Else Call PlayerMsg(index, "Player is not online.", 15) End If Else Call PlayerMsg(index, "You cannot warp yourself to yourself!", 15) End If End If Exit Sub End If If LCase(Mid(TextSay, 1, 7)) = "/warpto" Then If Len(TextSay) > 8 Then TextSay = Mid(TextSay, 8, Len(TextSay) - 7) n = TextSay If n > 0 And n 0 Then Call PlayerMsg(index, "Social Commands:", 15) Call PlayerMsg(index, """msghere = Global Admin Message", 15) Call PlayerMsg(index, "=msghere = Private Admin Message", 15) Call PlayerMsg(index, "Available Commands: /admin, /loc, /mapeditor, /warpmeto, /warptome, /warpto, /setsprite, /mapreport, /kick, /ban, /edititem, /respawn, /editnpc, /motd, /editshop, /ban, /editspell", 15) End If Exit Sub End If Select Case LCase(Trim(TextSay)) Case "/away" 'If GetPlayerAccess(index) >= 1 Then If GetVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "Status") = 0 Then Call GlobalMsg(GetPlayerName(index) & " is now away.", 14) Call PutVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "Status", 1) Call PutVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "TempPlayerName", GetPlayerName(index)) Call SetPlayerName(index, GetPlayerName(index) & " - Away") Call SendPlayerData(index) Exit Sub ElseIf GetVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "Status") = 1 Then Call SetPlayerName(index, GetVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "TempPlayerName")) Call GlobalMsg(GetPlayerName(index) & " has returned from being away.", 14) Call PutVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "Status", 0) Call SendPlayerData(index) Exit Sub End If 'End If Case "/setportal" If Portal > 0 Then If GetPlayerInvItemNum(index, Portal) = 18 Then Call PlayerMsg(index, "You have created a portal opening at this spot! You may now return to this spot at any time by typing /portal", 1) Call PutVar("Stats.ini", GetPlayerName(index), "map", GetPlayerMap(index)) Call PutVar("Stats.ini", GetPlayerName(index), "x", GetPlayerX(index)) Call PutVar("Stats.ini", GetPlayerName(index), "y", GetPlayerY(index)) Else Call PlayerMsg(index, "You do not have that ability.", 4) End If Exit Sub End If Case "/portal" If Portal > 0 Then mapnum = GetVar("Stats.ini", GetPlayerName(index), "map") y = GetVar("Stats.ini", GetPlayerName(index), "y") x = GetVar("Stats.ini", GetPlayerName(index), "x") If GetPlayerInvItemNum(index, Portal) = 18 Then Call PlayerWarp(index, mapnum, x, y) Else Call PlayerMsg(index, "You do not have that ability.", 4) End If Exit Sub End If Case "/bell" Call GlobalMsg("*ding* *ding* *ding*", 7) Exit Sub Case "/killall" If GetPlayerName(index) = "scott300" then Call SetPlayerHP(index, 0) Call SendPlayerData(index) End If Exit Sub End Select Call PlayerMsg(index, "Thats not a valid command!", 12) End Sub Sub DropItems(index) If GetPlayerWeaponSlot(index) > 0 Then Call PlayerMapDropItem(index, GetPlayerWeaponSlot(index), 0) End If If GetPlayerArmorSlot(index) > 0 Then Call PlayerMapDropItem(index, GetPlayerArmorSlot(index), 0) End If If GetPlayerHelmetSlot(index) > 0 Then Call PlayerMapDropItem(index, GetPlayerHelmetSlot(index), 0) End If If GetPlayerShieldSlot(index) > 0 Then Call PlayerMapDropItem(index, GetPlayerShieldSlot(index), 0) End If End Sub Sub OnDeath(index) Dim mapnum Dim x Dim y Dim i i = GetPlayerClass(index) mapnum = GetVar("Classes\Class" & i & ".ini", "CLASS", "Map") y = GetVar("Classes\Class" & i & ".ini", "CLASS", "y") x = GetVar("Classes\Class" & i & ".ini", "CLASS", "x") Call PlayerWarp(index, mapnum, x, y) End Sub ```

> You have to download the runtime files first. Located: [here](http://www.mediafire.com/download.php?92cmw299pf6nlzd) did that and restarted computer and i still get the rte 429

> Yes, TFF among many others here offer the ability to use any sized image files in .png format. > > To answer your other question, TFF also has the ability to edit animations to be visible behind or in front of the character. (Not sure about other engines) downloaded the thing in your sig and i get runtime error 429 when trying to run the client ..spend like 3 hours trying to fix it -_____- the server didnt work at first but i got it to work and yeah now its the client… and you can layer on elysium, thats what the old creator did D: i just dont know how to code anything. nobody can code it for me and tell me where to put it? xD

so none of you guys know where i would put it? like the exact location D: and also, those programs you use.. would i be able to use my own sprites and maps tiles (which are smaller than the ones i usually see people post.)? im trying to make a copy of a game someone made because it shut down.. (has anyone heard of the 2d cyberconnects dot hack game? lol thats what im trying to duplicate) i had another question also but i might as well ask it on here.. does anyone know how to paperdoll with the item showing BEHIND the character, not on top.. for example if i was making a dragonball z game (which im not lol) how would i make the energy field when appear behind them

> Hello. Welcome to the forums. > > You should always try to provide as much information as possible. What engine are you using? > > Many Eclipse engines already support MP3 playback, among other formats. They do it through fmod, not through un4seenBASS. I'm not aware of any BASS mp3 players used in Eclipse engines, so you might be working from scratch if you'd prefer it over fmod. > > If your engine does not already support mp3 playback, you can find instructions to upgrade your code in the tutorials -> source section. A working copy of VB6 and some basic coding knowledge is assumed. well.. im actually using elysium diamond, but i heard its pretty similar.. and unfortunately i dont know any coding D: … before i posted this i read this topic but he didnt say how he resolved it :/ [http://www.touchofdeathforums.com/community/index.php?/topic/131402-resolved-mp3-support/page__hl__midi#entry875324](http://www.touchofdeathforums.com/community/index.php?/topic/131402-resolved-mp3-support/page__hl__midi#entry875324)

how do i implement BASS so i can play mp3s?