Scroll of Perfect Pets(Different)

[raventh1984]

Hi Epvpers,

Well i was using the Scroll of raised pets from jopsi.

Its an nice system it only has some flaws in it.
For example if the pet is out you cant click any items in your inventory.
Jopsi has provided the solution and i am thankfull of that.

But i was thinking way would you put that system in MoverSkill instead of DPSrvr.

So thats what i did i used most of the code from jopsi and altered it an bit

Now its all working when the pet is out you can click on your items and you also wont have to click on the pet itself to put it back into your inventory again.


here we go

DPSrvr.h

#ifdef __RAISED_PET
BOOL DoUseItemTarget_PerfectPet( CUser* pUser, CItemElem* pMaterial, CItemElem* pTarget );
#endif

DPSrvr.cpp

After

 Spoiler

case II_SYS_SYS_SCR_PETAWAKECANCEL: // ½Ã½ºÅÛ Æê °¢¼º Ãë¼Ò
b = DoUseItemTarget_InitializeRandomOption( pUser, pTarget, CRandomOptionProperty::eSystemPet,
TID_GAME_PETAWAKECANCEL_S00, TID_GAME_PETAWAKECANCEL_E00,
"r", "PETAWAKECANCEL" );
break;
#endif // __PET_0519

Put this

 Spoiler

#ifdef __RAISED_PET
case II_SYS_LION:
case II_SYS_RABBIT:
case II_SYS_TIGER:
case II_SYS_FOX:
case II_SYS_DRAGON:
case II_SYS_HIPPOGRIPH:
case II_SYS_HORSE:
b = DoUseItemTarget_PerfectPet(pUser, pMaterial, pTarget);
break;
#endif

Add to the bottom of DPSrvr.cpp
This

 Spoiler

#ifdef __RAISED_PET
BOOL CDPSrvr:oUseItemTarget_PerfectPet( CUser* pUser, CItemElem* pMaterial, CItemElem* pTarget )
{
BOOL bPet;
BYTE nKind;
BYTE nExpRate = 99; //EXP RATE
BYTE nLevel = 5;// S KLASSE
BYTE nLife = 25;//Life is 25
CPet* pPet = pUser->GetPet();

if( pTarget->GetProp()->dwItemKind1 == IK1_GENERAL && pTarget->GetProp()->dwItemKind3 == IK3_EGG )
{
if( pUser->GetPet()->GetLevel() != PL_EGG )
{
pUser->AddText( "You can only use an scroll of Perfect pets on Eggs!" );
return FALSE;
}

switch( pMaterial->m_dwItemId )
{
case II_SYS_LION:
nKind = 1;
bPet = TRUE;
break;
case II_SYS_RABBIT:
nKind = 2;
bPet = TRUE;
break;
case II_SYS_TIGER:
nKind = 0;
bPet = TRUE;
break;
case II_SYS_HORSE:
nKind = 6;
bPet = TRUE;
break;
case II_SYS_DRAGON:
nKind = 4;
bPet = TRUE;
break;
case II_SYS_HIPPOGRIPH:
nKind = 5;
bPet = TRUE;
break;
case II_SYS_FOX:
nKind = 3;
bPet = TRUE;
break;

default:
break;
}
if( bPet == TRUE)
{
if( nLevel > PL_S )
return TRUE;

CItemElem* pItemElem2 = pUser->GetPetItem();
pPet->SetKind( nKind );
pPet->SetLevel( nLevel );
pItemElem2->m_dwItemId = pPet->GetItemId();
pPet->SetEnergy( pPet->GetMaxEnergy() );
DWORD dwExp = pPet->GetMaxExp() * nExpRate / 100;
pPet->SetExp( dwExp );

for( int i = 0; i < 6; i++ )
pPet->SetAvailLevel(i, 9 );

pPet->SetLife( nLife );

if( pUser->HasPet() )
pUser->RemovePet();

g_dpDBClient.CalluspPetLog( pUser->m_idPlayer, pItemElem2->GetSerialNumber(), 0, PETLOGTYPE_LEVELUP, pPet ); //Log the change into database

pUser->AddPet( pPet, PF_PET_GET_AVAIL ); // PET EINFÜGEN
g_UserMng.AddPetLevelup( pUser, MAKELONG( (WORD)pPet->GetIndex(), (WORD)pPet->GetLevel() ) );
pUser->UpdateItem( (BYTE)pMaterial->m_dwObjId, UI_NUM, 0 );//Remove the scroll
//return TRUE;

}
}
return FALSE;
}
#endif __RAISED_PET

Add to VersionCommon.h in WorldServer
#define __RAISED_PET

Compile the WorldServer and voila you are done.

@Credits Jopsi for the base code

Original thread for the resource

[FunkyJustice]

I have a question, is this a fix from the system? sry my english is very bad

Kann das jemand bitte grob übersetzen?

[raventh1984]

This is indeed the fix. Added it to my server and its working like it should do.

[Paintii]

 Spoiler

Originally Posted by raventh1984

Hi Epvpers,

Well i was using the Scroll of raised pets from jopsi.

Its an nice system it only has some flaws in it.
For example if the pet is out you cant click any items in your inventory.
Jopsi has provided the solution and i am thankfull of that.

But i was thinking way would you put that system in MoverSkill instead of DPSrvr.

So thats what i did i used most of the code from jopsi and altered it an bit

Now its all working when the pet is out you can click on your items and you also wont have to click on the pet itself to put it back into your inventory again.


here we go

DPSrvr.h

#ifdef __RAISED_PET
BOOL DoUseItemTarget_PerfectPet( CUser* pUser, CItemElem* pMaterial, CItemElem* pTarget );
#endif

DPSrvr.cpp

After

 Spoiler

case II_SYS_SYS_SCR_PETAWAKECANCEL: // ½Ã½ºÅÛ Æê °¢¼º Ãë¼Ò
b = DoUseItemTarget_InitializeRandomOption( pUser, pTarget, CRandomOptionProperty::eSystemPet,
TID_GAME_PETAWAKECANCEL_S00, TID_GAME_PETAWAKECANCEL_E00,
"r", "PETAWAKECANCEL" );
break;
#endif // __PET_0519

Put this

 Spoiler

#ifdef __RAISED_PET
case II_SYS_LION:
case II_SYS_RABBIT:
case II_SYS_TIGER:
case II_SYS_FOX:
case II_SYS_DRAGON:
case II_SYS_HIPPOGRIPH:
case II_SYS_HORSE:
b = DoUseItemTarget_PerfectPet(pUser, pMaterial, pTarget);
break;
#endif

Add to the bottom of DPSrvr.cpp
This

 Spoiler

#ifdef __RAISED_PET
BOOL CDPSrvr:oUseItemTarget_PerfectPet( CUser* pUser, CItemElem* pMaterial, CItemElem* pTarget )
{
BOOL bPet;
BYTE nKind;
BYTE nExpRate = 99; //EXP RATE
BYTE nLevel = 5;// S KLASSE
BYTE nLife = 25;//Life is 25
CPet* pPet = pUser->GetPet();

if( pTarget->GetProp()->dwItemKind1 == IK1_GENERAL && pTarget->GetProp()->dwItemKind3 == IK3_EGG )
{
if( pUser->GetPet()->GetLevel() != PL_EGG )
{
pUser->AddText( "You can only use an scroll of Perfect pets on Eggs!" );
return FALSE;
}

switch( pMaterial->m_dwItemId )
{
case II_SYS_LION:
nKind = 1;
bPet = TRUE;
break;
case II_SYS_RABBIT:
nKind = 2;
bPet = TRUE;
break;
case II_SYS_TIGER:
nKind = 0;
bPet = TRUE;
break;
case II_SYS_HORSE:
nKind = 6;
bPet = TRUE;
break;
case II_SYS_DRAGON:
nKind = 4;
bPet = TRUE;
break;
case II_SYS_HIPPOGRIPH:
nKind = 5;
bPet = TRUE;
break;
case II_SYS_FOX:
nKind = 3;
bPet = TRUE;
break;

default:
break;
}
if( bPet == TRUE)
{
if( nLevel > PL_S )
return TRUE;

CItemElem* pItemElem2 = pUser->GetPetItem();
pPet->SetKind( nKind );
pPet->SetLevel( nLevel );
pItemElem2->m_dwItemId = pPet->GetItemId();
pPet->SetEnergy( pPet->GetMaxEnergy() );
DWORD dwExp = pPet->GetMaxExp() * nExpRate / 100;
pPet->SetExp( dwExp );

for( int i = 0; i < 6; i++ )
pPet->SetAvailLevel(i, 9 );

pPet->SetLife( nLife );

if( pUser->HasPet() )
pUser->RemovePet();

g_dpDBClient.CalluspPetLog( pUser->m_idPlayer, pItemElem2->GetSerialNumber(), 0, PETLOGTYPE_LEVELUP, pPet ); //Log the change into database

pUser->AddPet( pPet, PF_PET_GET_AVAIL ); // PET EINFÜGEN
g_UserMng.AddPetLevelup( pUser, MAKELONG( (WORD)pPet->GetIndex(), (WORD)pPet->GetLevel() ) );
pUser->UpdateItem( (BYTE)pMaterial->m_dwObjId, UI_NUM, 0 );//Remove the scroll
//return TRUE;

}
}
return FALSE;
}
#endif __RAISED_PET

Add to VersionCommon.h in WorldServer
#define __RAISED_PET

Compile the WorldServer and voila you are done.

@Credits Jopsi for the base code

Original thread for the resource

Originally Posted by Fire'

Kann das jemand bitte grob übersetzen?

Scroll von Jopsi benutzt, schönes System, einige Bugs...
Wenn das perfekte Pet draußen ist, kann man danach nichts im Inventar anklicken. Jopsi hatte ne Lösung dazu und er dachte daran das System an eine andere Stelle zu verfrachten "MoverSkill \anstatt/ DPSrvr"
Benutzt wird größtenteils Jopsis Code, wurde aber ein bissl modifiziert.
Mit den vorangegangenen erklärten Änderungen, sollte das gefixt sein.



Sprich um auf deine Frage zurückzukommen Fire', ja, es ist ein Fix zu Jopsis "Scroll of perfect Pet".

[Desmater]

Originally Posted by Fire'

I have a question, is this a fix from the system? sry my english is very bad

Kann das jemand bitte grob übersetzen?

Er hat das System von Jopsi genommen und nach seinen Vorstellungen verbessert, allerdings hat er es anders implementiert wenn ich ihn richtig verstanden habe.

[jeromerz]

any tut on how to make it 9/9/9/9/9 instead of 1/3/5/7/9

[raventh1984]

This is for 9/9/9/9/9

[Laymi]

But you could re edit the pet levels for yourself by editing

for( int i = 0; i < 6; i++ )
pPet->SetAvailLevel(i, 9 );

quite easy

Greetz

[jeromerz]

how can i fix this error?



i already defined the Pets in defineItem.h

[Serenity-.]

There are many more Errors to Fix boy xD

[raventh1984]

Originally Posted by jeromerz

how can i fix this error?



i already defined the Pets in defineItem.h

This has nothing to do with the pets defined in defineItem.h

Look closer at your errors and then you will see it.

Also re-check your code. You must have placed something inside the wrong function

[jeromerz]

Originally Posted by raventh1984

This has nothing to do with the pets defined in defineItem.h

Look closer at your errors and then you will see it.

Also re-check your code. You must have placed something inside the wrong function

FIXED SIR ^^ THANKS

[jeromerz]

i already fixed that error but my problem is when i try to use the scroll of box like thing nothing happens the eggs stays as an egg

[raventh1984]

The egg must be summoned out.
Also be sure you use the correct spec_item/propitem entrance.

[jeromerz]

yeap i manage to add it right and the egg is summoned i double click the box icon then nothing.. the source is fixed already defined it on world server and no errors was found during compiling method.. the problem now is ingame the scroll doesn't work.

15	II_SYS_LION	IDS_PROPITEM_TXT_013278	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013279		1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0																																																																																																																															
15	II_SYS_RABBIT	IDS_PROPITEM_TXT_013280	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013281		1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0																																																																																																																														
15	II_SYS_FOX	IDS_PROPITEM_TXT_013282	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013283		1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0																																																																																																																														
15	II_SYS_TIGER	IDS_PROPITEM_TXT_013288	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013289		1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0																																																																																																																														
15	II_SYS_DRAGON	IDS_PROPITEM_TXT_013284	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013285		1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0																																																																																																																														
15	II_SYS_HIPPOGRIPH	IDS_PROPITEM_TXT_013286	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013286	1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0																																																																																																																													
15	II_SYS_II_SYS_HORSE	IDS_PROPITEM_TXT_013288	1	1	IK1_SYSTEM	IK2_SYSTEM	IK3_SCROLL	=	=	1	=	0	=	=	=	=	=	=	=	0	=	=	1	=	=	1	1	=	=	=	=	_NONE	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	XI_SYS_EXPAN01	=	=	=	=	=	=	WUI_NOW	=	=	=	=	=	=	=	=	=	0	0	0	0	0	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	=	"""Itm_SysSysScrBxLuck.dds"""	0	""""""	IDS_PROPITEM_TXT_013289	1	300	0	0	1	0	0	0	1	0	2	=	=	=	=	=	=	=	=	=	=	1	1	1	1	1	0

my spec_item.txt