DarkDino

Sorry!! im wrong THIS FIX ! THANK YOU SCOTT ! I forget to put "LoadTexture Tex_Inventory" RESOLVED!

I add this D: and the black box appear equal :c

scotter how to change the black texture to dx8 texture? 

Nooo , The problem is  This the black box, i need delete this .

D: Noo the bug in EO 3.0 is this  I add this RenderTexture Tex_Gui, frmMain.picInventory.CurrentX, frmMain.picInventory.CurrentX, 0, 0, Tex_Gui.Width + 15, Tex_Gui.Height + 15, Tex_Gui.Width + 15, Tex_Gui.Height + 15 Add this because I see it in a forum solution

I have this error from DX8 3.0 Source!, I try to fix it but have a problem. I add this RenderTexture Tex_Gui, frmMain.picInventory.CurrentX, frmMain.picInventory.CurrentX, 0, 0, Tex_Gui.Width + 15, Tex_Gui.Height + 15, Tex_Gui.Width + 15, Tex_Gui.Height + 15 Below this Direct3D_Device.BeginScene And declare Tex_Gui etc etc, but in the game dont show Inventory.png Please help 

How to play animation? on death NPC Position? i try but crash.

Hi psl, I use DX8 3.0

I understand, but cant use SendAnimation? Call SendAnimation to position of NPC?

How to send an animation when an NPC dies? D:?

Yes i have D:

Please help in error Sbuscript out of Range D:!?

For i = 1 To Stats.Stat_Count - 1 Buffer.WriteByte .stat(i)

This is my error D: [attachment=645:fefe.JPG]

Buffer.WriteLong MapNpc(GetPlayerMap(index)).Npc(mapNpcNum).Vital(HP) Error in this line :c "Sub index out of range" Please help D: to fix

Works nice !

Oh nice !

Nice 

thanks but i have this guild system .. problem is in this system –------------------ Error1: Call CheckGuild Error Sub or Function Error 2: TempPlayer Error Sub or Function ------------------------------ **CLIENT SIDE** i fix, nice system  add in modDatabase: ``` Public Sub CheckGuilds() Dim I As Long ' If debug mode, handle error then exit out If Options.Debug = 1 Then On Error GoTo ErrorHandler I = 1 NumGuilds = 1 ReDim Tex_Guild(1) While FileExist(GFX_PATH & "guilds\" & I & GFX_EXT) ReDim Preserve Tex_Guild(NumGuilds) NumTextures = NumTextures + 1 ReDim Preserve gTexture(NumTextures) Tex_Guild(NumGuilds).filepath = App.Path & GFX_PATH & "guilds\" & I & GFX_EXT Tex_Guild(NumGuilds).Texture = NumTextures NumGuilds = NumGuilds + 1 I = I + 1 Wend NumGuilds = NumGuilds - 1 If NumGuilds = 0 Then Exit Sub For I = 1 To NumGuilds LoadTexture Tex_Guild(I) Next ' Error handler Exit Sub ErrorHandler: HandleError "CheckGuilds", "modDatabase", Err.Number, Err.Description, Err.Source, Err.HelpContext Err.Clear Exit Sub End Sub ``` Add/Declare in Public Sub DrawPlayer ``` Dim X2 As Long, Y2 As Long ``` If have problems with TempPlayer, Replace all code with this: ``` GuildString = Player(Index).GuildName X2 = ConvertMapX(GetPlayerX(Index) * PIC_X) + Player(Index).xOffset + (PIC_X \ 2) - (getWidth(Font_Default, (Trim$(GuildString))) / 2) - 18 Y2 = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).yOffset - (Tex_Character(GetPlayerSprite(Index)).Height / 4) If Not Player(Index).GuildName = vbNullString Then RenderTexture Tex_Guild(Player(Index).GuildLogo), X2, Y2, 0, 0, 16, 16, 16, 16, D3DColorRGBA(255, 255, 255, 200) End If ``` **SERVER SIDE** below this in ModConstant Public Const ITEM_TYPE_SPELL As Byte = 7 Add this Public Const ITEM_TYPE_LOGO_GUILD As Byte = 8 Good Luck!

Error in Call CheckGuilds  sub or function! fix pls

thanks

Nice, Thanks !

You are the best (;!

Level Required Don't Work !

work! marvelous :3 thanks!