How to make damage look different

[turbocookie]

how do i make the damage above the players names to be like bublble writing ones? do i have to make a picture for each number and then edit some script?

someone please help

[Patrick]

It is in source. So get VB6 and ctrl-F damage blib or something to do with damage.

[turbocookie]

thanks ill take a look at it now =D

[Robin]

@turbocookie:

> how do i make the damage above the players names to be like bublble writing ones? do i have to make a picture for each number and then edit some script?
>
> someone please help

Ignore McNugget, he's an idiot.

The chat bubble system is actually a very poorly designed tiling system which would be difficult to port over to damage, especially if you have no programming experience.

[Akselj]

Well you don't have to port the chat bubble system. You could just use the backbuffer and draw an ellipse, it should appear as a bubble.

[Robin]

@AkselJ:

> Well you don't have to port the chat bubble system. You could just use the backbuffer and draw an ellipse, it should appear as a bubble.

Yes, removing any chat the player has constantly.

[Jaiden]

I can't see why you would want to do this in the first place, it would be very cumbersome and hardly visually pleasing.

[balliztik1]

Gonna take this a different route. You said "bubble writing", so I assume you mean using a different style font. If you actually did mean to use something like the chat bubble system, see above.

Currently, the font in Eclipse is universal. That is, you can't change one without changing all the others, at least not in a simple, one-edit format. The damage is handled via DrawText and the font is done via SetFont, shown below:

```
Public Sub SetFont(ByVal Font As String, ByVal Size As Byte)
    GameFont = CreateFont(Size, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, Font)
End Sub

Public Sub DrawText(ByVal hDC As Long, ByVal X, ByVal Y, ByVal Text As String, color As Long)
    Call SelectObject(hDC, GameFont)
    Call SetBkMode(hDC, vbTransparent)
    Call SetTextColor(hDC, RGB(0, 0, 0))
    Call TextOut(hDC, X + 1, Y + 0, Text, Len(Text))
    Call TextOut(hDC, X + 0, Y + 1, Text, Len(Text))
    Call TextOut(hDC, X - 1, Y - 0, Text, Len(Text))
    Call TextOut(hDC, X - 0, Y - 1, Text, Len(Text))
    Call SetTextColor(hDC, color)
    Call TextOut(hDC, X, Y, Text, Len(Text))
End Sub
```
Now, if you'll notice, GameFont is the only font style used when drawing text. You'd have to make a separate function, or some kind of conditional, to make this work. A simple copy and paste would work, but you'd have to change all the damage displays to match.

```
Public Sub SetFont2(ByVal Font As String, ByVal Size As Byte)
    GameFont2 = CreateFont(Size, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, Font)
End Sub

Public Sub DrawText2(ByVal hDC As Long, ByVal X, ByVal Y, ByVal Text As String, color As Long)
    Call SelectObject(hDC, GameFont2)
    Call SetBkMode(hDC, vbTransparent)
    Call SetTextColor(hDC, RGB(0, 0, 0))
    Call TextOut(hDC, X + 1, Y + 0, Text, Len(Text))
    Call TextOut(hDC, X + 0, Y + 1, Text, Len(Text))
    Call TextOut(hDC, X - 1, Y - 0, Text, Len(Text))
    Call TextOut(hDC, X - 0, Y - 1, Text, Len(Text))
    Call SetTextColor(hDC, color)
    Call TextOut(hDC, X, Y, Text, Len(Text))
End Sub
```
With this, all the damage displays could use a second font variable, GameFont2, which you could change to whatever you wanted, etc. etc.

If that was far from what you wanted, woops.

[turbocookie]

ummm, nah thats not far =]
infact i might just do it that way, im new to scripting so all this variable stuffs confusing
here is what i want, something like this.
see where it says 15 HIT! like that =]


[Anna Comnena]

Well for doing stuff like that you'd need to source in a way to track consecutive hits in certain time to count "combo" attacks, before you worry about displaying the combo results.
:P

[turbocookie]

you lost me… xD

i just need to know to change the font and put an image saying Hit!

[Anna Comnena]

Easy way make a spell animation that consists of the "HIT!" graphic. Call it to play on your target whenever an attack is successful. Same concept as the animated blood scripts.

[turbocookie]

iv never written a full script. i can edit little bits of them but i dont know how to do all that D=

[Robin]

This isn't scripting, it's programming.

[turbocookie]

well programming then =D
im still learning i can make all the crap on VB thats easy, just doing scripts. i get totally lost xD

[Robin]

This isn't particularly easy in VB6\. It's simpler to program into Origins. Just add an optional variable to the actionmsg packet to add an icon to be rendered behind the damage shown.