[EO 2 & 3]Target-Details Tutorial

[abhi2011]

> If the client wants to hack client values then they can go ahead it won't do anything…
>
> The vitals come directly from the server and you can display the information through targeting or combat system... i don't see how that is delayed..

The data can get corrupted while writing it. The packet can get lost.

[zomb88]

> The data can get corrupted while writing it. The packet can get lost.

If that is happening then combat fails, so if you have combat failing why add more stress on the server asking for target details which could be "corrupted while writing it"

[WK67]

I can't figure this out. I guess I'll just wait for the fix. *sigh*

[abhi2011]

Fixed the problem you guys were having.

Replace SendTargetDetails (Server side modServerTCP) with

```

Public Sub SendtargetDetails(ByVal index As Long)

Dim Buffer As clsBuffer

Dim target As Long, targetType As Long

Dim i As Long

target = TempPlayer(index).target

targetType = TempPlayer(index).targetType

Set Buffer = New clsBuffer

Buffer.WriteLong stargetdetails

Select Case targetType

Case TARGET_TYPE_PLAYER

Buffer.WriteString GetPlayerName(target)

Buffer.WriteByte GetPlayerLevel(target)

Buffer.WriteLong GetPlayerMaxVital(target, HP)

Buffer.WriteLong GetPlayerVital(target, HP)

For i = 1 To Stats.Stat_Count - 1

Buffer.WriteByte Player(target).stat(i)

Next i

Case TARGET_TYPE_NPC

With Npc(MapNpc(GetPlayerMap(index)).Npc(target).Num)

Buffer.WriteString Trim$(.Name)

Buffer.WriteByte .Level

Buffer.WriteLong .HP

Buffer.WriteLong MapNpc(GetPlayerMap(index)).Npc(target).Vital(HP)

For i = 1 To Stats.Stat_Count - 1

Buffer.WriteByte .stat(i)

Debug.Print .stat(i)

Next i

End With

Case TARGET_TYPE_NONE

Buffer.WriteString vbNullString

Buffer.WriteByte 1

Buffer.WriteLong 0

Buffer.WriteLong 0

For i = 1 To Stats.Stat_Count - 1

Buffer.WriteByte 0

Next i

End Select

SendDataTo index, Buffer.ToArray

Set Buffer = Nothing

End Sub

```
Rather than referencing the NPC Num for mapNpc I used the Target num. (Target variable is for MapNpcValue)

[WK67]

Jolly good! This works now! Fantastic. Expect to see this in UMWO once I release it.

[DarkDino]

> Fixed the problem you guys were having.
>
> Replace SendTargetDetails (Server side modServerTCP) with
>
> ```
>
> Public Sub SendtargetDetails(ByVal index As Long)
>
> Dim Buffer As clsBuffer
>
> Dim target As Long, targetType As Long
>
> Dim i As Long
>
> target = TempPlayer(index).target
>
> targetType = TempPlayer(index).targetType
>
> Set Buffer = New clsBuffer
>
> Buffer.WriteLong stargetdetails
>
> Select Case targetType
>
> Case TARGET_TYPE_PLAYER
>
> Buffer.WriteString GetPlayerName(target)
>
> Buffer.WriteByte GetPlayerLevel(target)
>
> Buffer.WriteLong GetPlayerMaxVital(target, HP)
>
> Buffer.WriteLong GetPlayerVital(target, HP)
>
> For i = 1 To Stats.Stat_Count - 1
>
> Buffer.WriteByte Player(target).stat(i)
>
> Next i
>
> Case TARGET_TYPE_NPC
>
> With Npc(MapNpc(GetPlayerMap(index)).Npc(target).Num)
>
> Buffer.WriteString Trim$(.Name)
>
> Buffer.WriteByte .Level
>
> Buffer.WriteLong .HP
>
> Buffer.WriteLong MapNpc(GetPlayerMap(index)).Npc(target).Vital(HP)
>
> For i = 1 To Stats.Stat_Count - 1
>
> Buffer.WriteByte .stat(i)
>
> Debug.Print .stat(i)
>
> Next i
>
> End With
>
> Case TARGET_TYPE_NONE
>
> Buffer.WriteString vbNullString
>
> Buffer.WriteByte 1
>
> Buffer.WriteLong 0
>
> Buffer.WriteLong 0
>
> For i = 1 To Stats.Stat_Count - 1
>
> Buffer.WriteByte 0
>
> Next i
>
> End Select
>
> SendDataTo index, Buffer.ToArray
>
> Set Buffer = Nothing
>
> End Sub
>
> ```
> Rather than referencing the NPC Num for mapNpc I used the Target num. (Target variable is for MapNpcValue)

This work now :3!!! Nicee! thanks!.

[Golf]

Thank you! The best tutorial ever 

[ShadowMaster]

Um… There one problem is when you have 3,0\. How do we make this thing render with DirectX 8 instead of 2.0 way.

[abhi2011]

This will work flawlessly with 3.0 because 3.0 doesn't use DX8 for the GUI but rather pictureboxes. If you are using engines like CS:DE EA or ER then you will have to render it.

Check out how the other GUI's are being rendered and do it the same way.

[ShadowMaster]

How do you go with turning the form into the gui graphics needed to render it? Plus I am not good at graphic editing stuff. And yes, I am using the EA version.

[abhi2011]

It is pretty simple to do. You declare a texture. Then you load the texture on to memory, then on a loop render the need stuff like pictures and stuff. Make sure this is done only if the tab for the Target Details is visible.

[Growlith1223]

nice job on this, keep on contributing to the community 

[abhi2011]

I have something to, then sure.