Snoozey

@Justn: > There aren't new buttons the downloadable picture just has what looks like buttons to go over the labels u can make new buttons with it and add in if u wanted too ;) Yeah, but shouldent they appear on my menu? Mine just say accept where yours has the green around accept.

Lets say I don't want endurance to scale. I just want armor only coming from the actual armor pieces. ``` If Not GetPlayerEquipment(index, Armor) > 0 And Not GetPlayerEquipment(index, Helmet) > 0 And Not GetPlayerEquipment(index, Shield) > 0 Then GetPlayerDef = 0.085 * GetPlayerStat(index, Endurance) + (GetPlayerLevel(index) / 5) Else GetPlayerDef = 0.085 * GetPlayerStat(index, Endurance) * Def + (GetPlayerLevel(index) / 5) End If ``` I would change this line ``` GetPlayerDef = 0.085 * GetPlayerStat(index, Endurance) * Def + (GetPlayerLevel(index) / 5) ``` I would delete GetPlayerStat ect. Or am I misreading this code? I believe this would be the only change with your code correct?

So, I was looking to modify how damage is calculated. Is this the formula I need to change for auto attack? (CTRL) ``` Function GetPlayerDamage(ByVal Index As Long) As Long Dim weaponNum As Long GetPlayerDamage = 0 ' Check for subscript out of range If IsPlaying(Index) = False Or Index MAX_PLAYERS Then Exit Function End If If GetPlayerEquipment(Index, Weapon) > 0 Then weaponNum = GetPlayerEquipment(Index, Weapon) GetPlayerDamage = 0.085 * 5 * (GetPlayerStat(Index, Strength) + GetPlayerStat(Index, Agility)) + Item(weaponNum).Data2 + (GetPlayerLevel(Index) / 5) Else GetPlayerDamage = 0.085 * 5 * GetPlayerStat(Index, Strength) + (GetPlayerLevel(Index) / 5) End If End Function ``` I added a little bit. If I am reading into this correctly this forumla should make agility and strength act the same for auto attack. Am I correct? If not where is this calculated?

I am stuck on the last part. I have not edited frm much, and I am learning as I go. I tried following the picture, but I don't really know what to do. Do I double click on something to add skill? I am just really confused on how to find where to add skill. I have been searching for "list" trying to find a list to add it too. [Update] If you are having issues, I used the information on the right hand side of the screen, and scrolled down for list. Click on it and the list should drop down, type in what you need. Seems to be working for me so far.

Hopefully it is ok to put this here. This tutorial will make all spells scale equal correct? Such that a warrior spell will scale at the same rate as a mage spell. I would like to make it so warrior spells scale the exact same way, but have there own formula. Not quit sure how to do something like this. I am assuming it would be a case type thing? like Case1: (this tutorial) Case2: (this tutorial + new forumula) Would I be correct? Also any help would be appropriated, I am not very good at coding, learning as I go.

I used this in my game. Works perfect! Just make sure you set the maps to safe. http://www.touchofdeathforums.com/smf/index.php/topic,70436.0.html

Hm, I don't have the new buttons for change sprite/accept. Really new to this, sorry.

@Jaxx: > For the healing spells, here is the fix > http://www.touchofdeathforums.com/smf/index.php/topic,78990.msg847267.html#msg847267 Ah many thanks was searching for "overheal" and not having much luck. Any idea on the command for map messages? Also with that fix it seems I will heal for 50 on the first hot tick, and then for 1 1 1 1 1 until the ticks end. Is this another bug or do I need to rexam the last fix?

1)Looking at the code ``` Call GlobalMsg(GetPlayerName(victim) & " has paid the price for being a Player Killer!!!", BrightRed) ``` Trying to get it to not do Globalmsg, and instead a map message. Can't find the syntax for that. 2) Having an issue where if I have 80 health total, and I have 20 life currently. If I heal for 71 it will display me at 20 life, until I take damage then it will do 80-(damage taken) Anyways to get it to display 80 after I heal, instead of displaying the 80 after i get hit?

@Scott: > Server side modGuild > > ``` > Public Type GuildRec > In_Use As Boolean > > Guild_Name As String > > Guild_Fileid As Long > > Guild_Members(1 To MAX_GUILD_MEMBERS) As GuildMemberRec > Guild_Ranks(1 To MAX_GUILD_RANKS) As GuildRanksRec > > 'Message of the day > Guild_MOTD As String * 100 > > Guild_RecruitRank As Integer > Guild_Color As Integer > > End Type > ``` > Change > ``` > Guild_Name As String > ``` > to > > ``` > Guild_Name As String * 20 > ``` > would limit it to 20 I was staring at that line wondering if that is what I needed. Thank you :]

@crzy: > like i said the + 16 is a y value… no one ever listens.... And the code you keep pasting has nothing to do with it.... The code is the original code I posted. I just edited my post because I figured it out. I did listen, however I misunderstood your original post. I figured it out and explained a little on where to find the values you were originally talking about. Also, Still looking for where to limit the amount of characters in a guild name.

[Update] I have narrowed my issue to a mime table, but I can't figure out how to do it for an ini. Example AddType application/x-shockwave-flash swf So I am trying to get the auto updater to work. i have it working on a throw away webs account. Now I am trying to get it to work with my real website. However, the update.ini just opens in the browser. The .rars will prompt for download as they should. I am receiving error 13 which I assume is because it can't find the update.ini. How can I make .ini files download instead of open?

@Joost: > If GetPlayerAccess(index) < 4 Then Exit Sub > > That code roughly translates into : If the player's admin access isn't sufficient, stop running this code. That's what Exit sub does. Exit sub does not move up to a previous sub or something like that. > > edit > > I misread your question > > ``` > If GetPlayerAccess(index) < 4 Then Exit Sub > Sub HandleRequestLevelUp(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) > ```This is def wrong, like you say. It should look like > ``` > > Sub HandleRequestLevelUp(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) > If GetPlayerAccess(index) < 4 Then Exit Sub > > ``` Thank you kind sir, I thought I was misunderstanding the instructions.

Still learning here, but I think I am misunderstanding the instructions. I assume the code would look like ``` If GetPlayerAccess(index) < 4 Then Exit Sub Sub HandleRequestLevelUp(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) ``` But if I do that the ``` If GetPlayerAccess(index) < 4 Then Exit Sub ```moves up to the previous sub.

New issue! It seems I can make a guild name very, very long. Is it possible to make it lets say only 10 characters long? I was trying to look for where the current limit is, but I can't seem to find it. Any help? @crzy: > @grim - go learn graphcs again… x is left and right and y is up and down..... > > Snoozey you dont change the x values. you change the Y value. think of x and y as graphs. So make the guild name y smaller than the name and vice versa. make the name y higher than the guild y... Still not working :/ ``` Public Sub DrawPlayerName(ByVal Index As Long) Dim TextX As Long Dim Text2Y As Long Dim color As Long Dim Name As String Dim Text2X As Long Dim TextY As Long Dim GuildString As String ``` Figured it out after playing for awhile. Look further down and you will see +16 or something like that. These are the values he was talking about.

@Growlith1223: > yes Did not work :/ ``` Public Sub DrawPlayerName(ByVal Index As Long) Dim Text2X As Long Dim Text2Y As Long Dim color As Long Dim Name As String Dim TextX As Long Dim TextY As Long Dim GuildString As String ```

@crzy: > As the maker of the link Lumiere posted… Don't ducking use it. Its shitty as hell and oh did i mention it is shitty as hell and very buggy... I actually found another one because of that one. I did not use it. Thanks for the heads up though!

Is this what I need to change to make the player name above the guild name. Like Playername Guildname If so do I just change textx to text2x? ect. Still learning. ``` Public Sub DrawPlayerName(ByVal Index As Long) Dim TextX As Long Dim TextY As Long Dim color As Long Dim Name As String UNDER ADD: Dim Text2X As Long Dim Text2Y As Long Dim GuildString As String ```

Thank you. Got that one fixed :]

1)Hello, I have been messing around with the chat commands. According to /help "!Player1 Hello" should send a message, however I am unable to press enter and have it send. I was looking around and it looks like the update 2.0 switched from / to !? Is this correct? Anyone know how to fix this issue? 2)Is there a friends list tutorial around here somewhere? Gonna keep searching through the forums for info. Thanks for the help in advance.

@Jaxx: > For the characters, make sure it's in bitmap form, and make sure there is no break in the number. For Example, you save a character sprite as 1.bmp, the next one has to be 2.bmp, there can not be a random number in there. > > For the hotbar, if you have vb6~~, I will get you a link to the fix~~ > here is the fix > > http://www.touchofdeathforums.com/smf/index.php/topic,69167.0.html Second time you saved my ass. Surprised this did not come up in the search :[. I feel like a fool now.

1)Looking to re keybind some things. Been looking through the files, was wondering which one bindings are saved in. 2) The character pictures are not showing up. I am using new sprites I added, and I have name the sprites and character images that correlate the same. Am I missing something? do I need to rebuild for a change like this? 3)New spells won't work on the hotbar. I can use the default spells just fine, but the new ones will not cast.

**Error in Update** VersionCount = GetVar(App.Path & "\tmpUpdate.ini", "UPDATER", "Version") **Config.ini** [Options] Game_Name=xxx Username= Password= SavePass= 1 IP=xxx Port= xxx MenuMusic=reddwarf.mid Music= 0 Sound= 0 Debug= 0 [UPDATER] GameWebsite=http://www.manaforged.com updateURL=http://rotmf.net63.net/Update/ NewsURL=http://rotmf.net63.net/news/news.html Version= 1 **client.vdb** ' Load a GUI image, if it does not exist.. Exit out of the program. Form_LoadPicture (App.Path & "\Data Files\graphics\gui\updater\update.jpg") Yes, the update.jpg is there. I checked, both jpgs are in the correct directory. Not really sure why I am having so many issues. Might be because it is 5 am. Will check back in the morning. Thanks in advance if anyone knows what is wrong.

@Jaxx: > I believe you can edit this for the player occupying one space > > http://www.touchofdeathforums.com/smf/index.php/topic,70436.0.html Downloading VB6 now, thank you! Hopefully it works. Works :] Many thanks

1) Any ways to allow players to walk on the same tile? Shops get crowded and people just can't get through. 2)Looking to re keybind some things. Been looking through the files, was wondering which one bindings are saved in. Added 3) The character pictures are not showing up. I am using new sprites I added, and I have name the sprites and character images that correlate the same. Am I missing something? No I need to rebuild for a change like this? 4)New spells won't work on the hotbar. I can use the default spells just fine, but the new ones will not cast.