Ruins of Hell
-
Posts
6715 -
Joined
-
Last visited
Never
Content Type
Profiles
Forums
Calendar
Posts posted by Ruins of Hell
-
-
Congratulations to Socuine!
@Synergy:
> Finishing off the tutorials section:
>
> I don't need this, and most people on the forum don't, but if you want to make it more newb-friendly, this would be a big help.
Socuine is more of a designer guy. jcsnider or I would probably be better fits to finish the tutorials. -
@killzoz:
> I think i am missing some stuff like i can not delete the tut of Eclipse - Event System 2.3 or eo_2_0_0 can someone please help me and how can i make a interface for my self for free?
I can't really understand what you are saying. Can you please elaborate? What is the issue? -
@natman777:
> Thanks that worked for the server but the file that says Eclispe Orgins in the client folder it says Run-time error '429':
> ActiveX componet cant create project
[Follow this tutorial.](http://www.touchofdeathforums.com/smf2/index.php/topic,68360.msg736593.html#msg736593) -
-
We don't offer support for any versions of Eclipse older than Eclipse Origins.
-
-
High damage
in Q & A
I think you are confused about what each stat does:
> Strength:
> Adds to your max melee hit at [STR / 2]
> Adds to your base melee damage reduction from a successful block at [STR / 2]
> Adds to your base parry rate at [STR * 0.25]
>
> Endurance:
> Adds to your max health at [END * 5]
>
> Intelligence:
> Adds to your max mana at [INT * 10]
>
> Agility:
> Adds to your base armour rating at [AGI * 2]
> Adds to your base dodge rate at [AGI / 83.3]
> Adds to your base crit rate at [AGI / 52.08]
>
> Willpower:
> Adds to your health regen rate at [(WILL * 0.8) + 6]
> Adds to your mana regen rate at [(WILL / 4) + 12.5] -
-
-
-
_Notation_: [project]:[module]:[line (or from_line - to_line)].
Each error is followed by a solution.
Error is on MapConvert:modLogic.bas:68.
```
ReDim OldMap.Tile(0 To NewMap.MaxX, 0 To NewMap.MaxY)
```
>! ReDim deletes the entire array, and then resizes it. If you need to preserve the array contents, you must use ReDim Preserve.
One more error at MapConvert:modLogic.bas:32-40.
```
Private Sub LoadMap(ByVal SFileName As String)
Dim filename As String
Dim F As Long
filename = App.Path & "\old\" & SFileName
F = FreeFile
Open filename For Binary As #F
Get #F, , OldMap
Close #F
End Sub
```
>! Your Sub LoadMap is incorrect. Eclipse uses a dynamic array for the tiles, to allow elastic x and y. Your Sub LoadMap attempts to shove in the data with no regards for the dynamic array. For a correct way to do so, look at server:modDatabase.bas:993-1038. -
@DrAken:
> 0
██████████████████████████████████████████████████████████████████████████
███████████████████████████████████████████████████████████████████████████████████████
███████████████████████████████████████ ████████████
██████████████████████████ ███████████████████████ ████████
████████████████████ ███████████████ ███████ ██████
█████████████ ██████████████████ █████ ██████
██████████ ████████████████ ████ ██████
██████████ ███████████ ████████████ ███████████ ████ ██████
████████ ███ ████████████████████████████████ ███████ ████ ██████
████████ █ █████ ███ ██████
███████ ████████████████████ ████ ███ ██████
████████ ███████████ ██ ██████ ████ ███ ██████
██████ █████ ███████ ███ ████ ███ ███ ██████
████ ███ ██ ██ ███ ███ ██ █████
███ ██ ██ ██ ██ █ █████
████ █ ██ ██ ██ ███ ██████
████ ██ ██ ██ █ █ █████
████ █ █ █ █████████ █ █ █████
█████ █ ███████████████████████ █████
█████ █ ██████████████████████████████ █████
███████ █████████ █ ████████████ █████████████████████ █████
██████ ███████████████████ █ █████████ ██████████████████████ ███████
██████ ███████████████████████ ███████ ███████████████ █████ ███████
███████ ███████████████████████████ ███████ ██████████████████████ ████ ███████ █ ████████████
██████ █████████████████ ██████████████████████████████ ██ ██████ ████████████████████████████████ ███████ █████████████ ████████
████████ █████ █████████████████████████████████ ██████ ███████████████ ████████████ ██ ███ ██████
███████ ███ ████████████████████ ████████████████ ██ ██ ████████████ ██ ██████
███████ ███ ███ █████████ ██████████ █████ ███████████████████ █ █████
██████ ███ ████ ████ ████ ██████ █████████████████████████ █ █████
██████ █ ███ ███████████ ████ █████████ ████████████ ██████ █ █████
█████ ██ █ █████████████████ ████ ███████████████████████████ ██ ██████ █████
█████ ██ █ ████████████████████ ████ ████ █████████████████████ ████ █████ █ █████
█████ ██ █ ███ ███████████████ █████ █████ ████ █████ █ █████
█████ ██ █ █ ████████████ ███████ ██████ ████ █ ████
████ ██ █ ████ ██████████ ████████ ███████████ █████ █ ████
████ ██ █ ████ ███████ █████████ ██ ██████████████████ ████ █ ████
███████ ██ ████ ███████ ████████████ ██ ██████████ █████████ █████ █ ████
████ █ ███ █████ ███████ █████ █████████████ ███████████ ███████████ █████ █ ████
██████ ████ ██████ █████████ ████ ████████████ ████████████ ████ █ █████
███████ ████████ █████████████ ██████████████ ████ ██████████████ █████ ████ █ █████
██████████ ████████ ████ ████ █████ ██████████████ █████ ███████████████ █████ ████ █ █████
█████ █████ ███████████ ████ ████ █████████████ ██████ ██████████████████ ███████ ███ ████ ██████
█████ █ █████████████ ██████ ███ █████ ████████████████ █████ █████████ ██ ██ ██████
██████ ████████████████ █ ███████████ ████████████████ █████ ████████████ ███ ██████
█████ ███████████████████ █████████ ████████████████ ██████ █████████████ ███ ██████
█████ ███████████████████████ ██████ █████████████████ ██████████████████████ █████ ███████
█████ █████████ ██████████████████ █ ███████████████████████ ██████████████████████ ███████
█████ ████████ █████ ████████████████████████████████████████████████████████ █████ ██████████████ █████ ████████
█████ ████████ ████ ████████████████████████████████████████████ ████ ████████████████ █████ █ ██████
████ ████████ ████ ████ ███████████████████████████████ ████ ███████████████████ █ █████ ██████
████ ████████ █████ █████ ████ ████ █████ ███████████████████████ ██████ ██████
████ ███████████████ ██████ █████ ████ █████████████████████ █████ █████ ██████
█████ ███████████████ █████ █████ ████ ██████████████████████ █████ ██████ █████
Ã¢â€“Ë†Ã¢â€“Ë†Ã¢â€“Ë†Ã¢â€“Ë†Ã¢â€“Ë -
-
-
Did you do this step of the tutorial?
> **At the end of modHandleData, add this:**
> ```
> Private Sub HandleMapReport(ByVal Index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long)
> Dim Buffer As clsBuffer
> Dim MapNum As Integer
>
> Set Buffer = New clsBuffer
> Buffer.WriteBytes Data()
>
> frmMapReport.lstMaps.Clear
>
> For MapNum = 1 To MAX_MAPS
> frmMapReport.lstMaps.AddItem MapNum & ": " & Buffer.ReadString
> Next MapNum
>
> frmMapReport.Show
>
> Set Buffer = Nothing
> End Sub
>
> ``` -
@General:
> You're not understanding what I'm saying, rather then storing the sound files as names. Such as "Slash.wav" why not store them as numbers "1.wav". To me, that would be far easier to use.
It's not like sprites where you can see a picture of the sprite as you select it. It would be much easier to pick a name that says "Slash.wav" than to listen through all the sounds for "12.wav". Sounds NEED a name in order to be maintainable. That is why they are handled differently from all the other systems. -
@TheChoosenOne:
> Server never got Automation. No we aren't using fmod.dll (it is not there in the folder so i am guessing it is not used.) I 2 think it is sound. I never got it in the game and I haven't put on music and sound.
> P.S the automation occurs on Crystalshire 2.
You said the server received an error. Can you run the server through VB6 and tell us what that error is? -
@General:
> Why in the hell would you store sound files as strings in the first place?
>
> I like storing everything in numbers, hell. In my project my player files are in numerical order rather then saved as the default strings.
It stores the sound file's name in the ItemRec, which is far more efficient than loading the sound file as a binary blob (storing blobs in a database is a bad idea, as it discourages caching and other optimization techniques). It does not store the sound file in the Item because that would be crazy.
Also, VB6 strings are just an array of bytes. -
-
@General:
> ```
> If GetPlayerEquipment(MyIndex, Weapon) > 0 Then
> soundName = Trim$(Item(entityNum).Sound)
> PlaySound soundName
> End If
> ```Why are you using```
> Trim$
> ```
> The variable is not a string, so there is no reason to treat it like one. Instead you could leave it as is
> ```
> Item(entityNum).Sound
> ```
>
> We would want to use Trim$ if we wanted to remove blank spaces from the back and front of a string, for example.
>
> ```
> LolName = trim$(frmLol.lbl1.caption)
>
> Buffer.Writestring LolName
> ```
>
> Of course, lets say you stored a number in a Textbox, or a Label. You would want to get the value of the string by using
>
> ```
> Val(frmLol.lbl1.caption)
> ```
> The variable is not a string, so there is no reason to treat it like one. Instead you could leave it as is
> ```
> Item(entityNum).Sound
> ```
Yes it is. Trim$ is used for constant length strings.
```
Private Type ItemRec
Name As String * NAME_LENGTH
Desc As String * 255
Sound As String * NAME_LENGTH
Pic As Long
Type As Byte
Data1 As Long
Data2 As Long
Data3 As Long
ClassReq As Long
AccessReq As Long
LevelReq As Long
Mastery As Byte
Price As Long
Add_Stat(1 To Stats.Stat_Count - 1) As Byte
Rarity As Byte
Speed As Long
Handed As Long
BindType As Byte
Stat_Req(1 To Stats.Stat_Count - 1) As Byte
Animation As Long
Paperdoll As Long
AddHP As Long
AddMP As Long
AddEXP As Long
CastSpell As Long
instaCast As Byte
End Type
```
```
Sound As String * NAME_LENGTH
```
```
Sound As String * NAME_LENGTH
```
```
String * NAME_LENGTH
```
* * *
Anyway, now back to the question.
If we look at PlayMapSound, we see the following function header:
```
Public Sub PlayMapSound(ByVal x As Long, ByVal y As Long, ByVal entityType As Long, ByVal entityNum As Long)
```
Now we can use the Player's x and y for the first two parameters. But then we see something we haven't see before "entityType". If we scroll down, we see a Select Case switch. So to do an item, entityType should be SoundEntity.seItem. Lastly, we need the item's number. In this case the weapon. So we piece it together…
```
PlayMapSound GetPlayerX(MyIndex), GetPlayerY(MyIndex), SoundEntity.seItem, GetPlayerEquipment(MyIndex, Weapon)
```
Almost done. Now hop over to Sub CheckAttack (as you have previously noted), and under:
```
If Player(MyIndex).Attacking = 0 Then
```
add:
```
If GetPlayerEquipment(MyIndex, Weapon) > 0 Then
PlayMapSound GetPlayerX(MyIndex), GetPlayerY(MyIndex), SoundEntity.seItem, GetPlayerEquipment(MyIndex, Weapon)
End If
```
And so we are finished. Compile and enjoy.
* * *
The observant reader will note that the check was already done in the sub when the attack speed was calculated. However, this will play the sound even if the player simply holds the control button, therefore a different check is needed.
There's also a problem with this tutorial, it doesn't broadcast the attack sound to all the players. Personally I would find it annoying if it did, but if you want, you should look into Sub HandleAttack server-side. -
@General:
> This is most likely occurring because for some reason, somewhere in you're code its attempting to divide "11" by "0", which can't be done in Visual Basic 6 and will return the error you are getting.
>
> Try and figure out why the number 11 is being divided by equals 0\. A quick fix would be to check if the variable is greater then 0, and if not exit the sub/function.
>
> Example:
> ```
> If X > Then
> ```
>
> Or
>
> ```
> If X = 0 Then Exit Sub
> ```
> Although, that is a great check to leave in the code. But you are going to want to further investigate this and find the source of the error.
Runtime error 11 literally means "Division by Zero". It does not indicate that 11/0 is being called. In fact, -1/0, 0/0, 5/0, etc., will all produce the same error.
My idea is to use the Debug feature (or VB6, but the Debug feature is easier) to pin-point the cause of error. -
-
-
@Erwin:
> Changed back the theme to the old one isn't smart, but at least add the old black theme to the theme selecting thing in http://www.touchofdeathforums.com/smf2/index.php?action=theme;sa=pick
> I think alot people will actually use it.
Removed the session data from the end of your post. I'm not sure how SMF works but to be safe I removed it anyway. (Plus any moderator / admin who clicked that link might have ended up changing your theme by accident.)
Item animations
in Q & A
Posted