// TO-DO: Update this. It's VERY dated.
void CUser::GetUserInfo(Packet & pkt)
{
CKnights *pKnights = NULL;
pkt.SByte();
pkt << m_pUserData->m_id
<< uint16(getNation()) << m_pUserData->m_bKnights << uint16(m_pUserData->m_bFame);
if (isInClan())
pKnights = m_pMain->m_KnightsArray.GetData(m_pUserData->m_bKnights);
if (pKnights == NULL)
{
// should work out to be 11 bytes, 6-7 being cape ID.
pkt << uint32(0) << uint16(0) << uint16(-1) << uint16(0) << uint8(0);
}
else
{
pkt << uint8(0) // grade type
<< pKnights->m_strName
<< pKnights->m_byGrade << pKnights->m_byRanking
<< uint16(0) // symbol/mark version
<< uint16(-1) // cape ID
<< uint8(0) << uint8(0) << uint8(0); // cape RGB
}
pkt << getLevel() << m_pUserData->m_bRace << m_pUserData->m_sClass
<< GetSPosX() << GetSPosZ() << GetSPosY()
<< m_pUserData->m_bFace << m_pUserData->m_nHair
<< m_bResHpType << uint32(m_bAbnormalType)
<< m_bNeedParty
<< m_pUserData->m_bAuthority
<< m_pUserData->m_sItemArray[BREAST].nNum << m_pUserData->m_sItemArray[BREAST].sDuration
<< m_pUserData->m_sItemArray[LEG].nNum << m_pUserData->m_sItemArray[LEG].sDuration
<< m_pUserData->m_sItemArray[BREAST].nNum << m_pUserData->m_sItemArray[BREAST].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[LEG].nNum << m_pUserData->m_sItemArray[LEG].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[HEAD].nNum << m_pUserData->m_sItemArray[HEAD].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[GLOVE].nNum << m_pUserData->m_sItemArray[GLOVE].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[FOOT].nNum << m_pUserData->m_sItemArray[FOOT].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[SHOULDER].nNum << m_pUserData->m_sItemArray[SHOULDER].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[RIGHTHAND].nNum << m_pUserData->m_sItemArray[RIGHTHAND].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[LEFTHAND].nNum << m_pUserData->m_sItemArray[LEFTHAND].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[CWING].nNum << m_pUserData->m_sItemArray[CWING].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[CTOP].nNum << m_pUserData->m_sItemArray[CTOP].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[CHELMET].nNum << m_pUserData->m_sItemArray[CHELMET].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[CRIGHT].nNum << m_pUserData->m_sItemArray[CRIGHT].sDuration << uint8(0)
<< m_pUserData->m_sItemArray[CLEFT].nNum << m_pUserData->m_sItemArray[CLEFT].sDuration << uint8(0)
<< getZoneID() << uint8(-1) << uint8(-1) << uint16(0) << uint16(0) << uint16(0);
}
void CUser::ZoneChange(int zone, float x, float z)
{
m_bZoneChangeFlag = true;
C3DMap* pMap = nullptr;
_ZONE_SERVERINFO *pInfo = nullptr;
pMap = g_pMain->GetZoneByID(zone);
if (!pMap)
return;
if( pMap->m_bType == 2 ) { // If Target zone is frontier zone.
if( GetLevel() < 20 && g_pMain->m_byBattleOpen != SNOW_BATTLE)
return;
}
if( g_pMain->m_byBattleOpen == NATION_BATTLE ) { // Battle zone open
if( m_bZone == BATTLE_ZONE ) {
if( pMap->m_bType == 1 && m_bNation != zone && (zone < 10 || zone > 21)) { // ???? ?????? ???? ????..
if( m_bNation == KARUS && !g_pMain->m_byElmoradOpenFlag ) {
TRACE("#### ZoneChange Fail ,,, id=%s, nation=%d, flag=%d\n", GetName().c_str(), m_bNation, g_pMain->m_byElmoradOpenFlag);
return;
}
else if( m_bNation == ELMORAD && !g_pMain->m_byKarusOpenFlag ) {
TRACE("#### ZoneChange Fail ,,, id=%s, nation=%d, flag=%d\n", GetName().c_str(), m_bNation, g_pMain->m_byKarusOpenFlag);
return;
}
}
}
else if( pMap->m_bType == 1 && m_bNation != zone && (zone < 10 || zone > 21)) { // ???? ?????? ???? ????..
return;
}
//
else if( pMap->m_bType == 2 && zone == ZONE_RONARK_LAND ) { // You can't go to frontier zone when Battlezone is open.
Packet result(WIZ_WARP_LIST, uint8(2));
result << uint8(0);
Send(&result);
return;
}
//
}
else if( g_pMain->m_byBattleOpen == SNOW_BATTLE ) { // Snow Battle zone open
if( pMap->m_bType == 1 && m_bNation != zone ) { // ???? ?????? ???? ????..
return;
}
else if( pMap->m_bType == 2 && (zone == ZONE_RONARK_LAND || zone == ZONE_BATTLE ) ) { // You can't go to frontier zone when Battlezone is open.
return;
}
}
else { // Battle zone close
if( pMap->m_bType == 1 && m_bNation != zone && (zone < 10 || zone > 21))
return;
}
m_bWarp = 0x01;
UserInOut(INOUT_OUT);
if( m_bZone == ZONE_SNOW_BATTLE ) {
//TRACE("ZoneChange - name=%s\n", m_id);
SetMaxHp( 1 );
}
bool bSameZone = (GetZoneID() == zone);
m_bZone = zone;
m_curx = x;
m_curz = z;
if (!bSameZone)
{
SetZoneAbilityChange();
// Reset the user's anger gauge when leaving the zone
// Unknown if this is official behaviour, but it's logical.
if (GetAngerGauge() > 0)
UpdateAngerGauge(0);
/*
Here we also send a clan packet with subopcode 0x16 (with a byte flag of 2) if war zone/Moradon
or subopcode 0x17 (with nWarEnemyID) for all else
*/
#if 0
if (isInClan())
{
CKnights * pKnights = g_pMain->GetClanPtr(GetClanID());
if (pKnights != nullptr
&& pKnights->bKnightsWarStarted)
{
Packet clanPacket(WIZ_KNIGHTS_PROCESS);
if ((GetZoneID() / 100) == 1
|| GetZoneID() == 21)
clanPacket << uint8(0x17) << uint8(2);
else
clanPacket << uint16(0x16) << uint16(0 /*nWarEnemyID*/);
Send(&clanPacket);
}
}
#endif
if (GetZoneID() == ZONE_SNOW_BATTLE)
{
SetMaxHp();
}
if (isInParty())
PartyRemove(GetSocketID());
ResetWindows();
}
m_pMap = pMap;
if( g_pMain->m_nServerNo != pMap->m_nServerNo ) {
pInfo = g_pMain->m_ServerArray.GetData( pMap->m_nServerNo );
if( !pInfo )
return;
UserDataSaveToAgent();
m_bLogout = 2; // server change flag
SendServerChange(pInfo->strServerIP, 2);
return;
}
SetRegion(GetNewRegionX(), GetNewRegionZ());
Packet result(WIZ_ZONE_CHANGE, uint8(3)); // magic numbers, sigh.
result << uint16(GetZoneID()) << GetSPosX() << GetSPosZ() << GetSPosY() << g_pMain->m_byOldVictory;
Send(&result);
if (!m_bZoneChangeSameZone)
{
m_sWhoKilledMe = -1;
m_iLostExp = 0;
m_bRegeneType = 0;
m_tLastRegeneTime = 0;
m_sBind = -1;
InitType3();
InitType4();
CMagicProcess::CheckExpiredType9Skills(this, true);
SetUserAbility();
}
result.Initialize(AG_ZONE_CHANGE);
result << GetSocketID() << GetZoneID();
Send_AIServer(&result);
m_bZoneChangeSameZone = false;
m_bZoneChangeFlag = false;
}
void CUser::Chat(Packet & pkt)
{
Packet result(WIZ_CHAT);
uint8 type = pkt.read<uint8>();
char finalstr[1024] = "";
std::string buff, chatstr;
bool isAnnouncement = false;
if (isMuted())
return;
pkt >> chatstr;
if (chatstr.empty() || chatstr.size() > 128)
return;
// Process GM commands
if (isGM() && ProcessChatCommand(chatstr))
return;
#if 0 // Removed this - all it seems to do is cause chat to break for GMs (is it 19xx+ only?)
if( isGM() && type == GENERAL_CHAT)
type = 0x14;
#endif
uint8 bNation = GetNation();
uint16 sessID = GetSocketID();
// Handle GM notice & announcement commands
if (type == PUBLIC_CHAT || type == ANNOUNCEMENT_CHAT)
{
// Trying to use a GM command without authorisation? Bad player!
if (!isGM())
return;
if (type == ANNOUNCEMENT_CHAT)
type = WAR_SYSTEM_CHAT;
// This is horrible, but we'll live with it for now.
// Pull the notice string (#### NOTICE : %s ####) from the database.
CString noticeText = g_pMain->GetServerResource(IDP_ANNOUNCEMENT);
// Format the chat string around it, so our chat data is within the notice
sprintf_s(finalstr, sizeof(finalstr), noticeText, chatstr.c_str());
bNation = KARUS; // arbitrary nation
sessID = -1;
isAnnouncement = true;
}
result.SByte();
result << type << bNation << sessID;
if (isAnnouncement)
{
result << uint8(0); // GM notice/announcements show no name (so specify length of 0)
result.DByte();
result << finalstr; // now tack on the formatted message from the user
}
else
{
result << m_pUserData.m_id; // everything else provides a name
result.DByte();
result << chatstr; // now tack on the chat message from the user
}
switch (type)
{
case GENERAL_CHAT:
g_pMain->Send_NearRegion(&result, GetMap(), GetRegionX(), GetRegionZ(), GetX(), GetZ());
break;
case PRIVATE_CHAT:
{
if (m_sPrivateChatUser == GetSocketID())
break;
CUser *pUser = g_pMain->GetUserPtr(m_sPrivateChatUser);
if (pUser != NULL)
pUser->Send(&result);
} break;
case PARTY_CHAT:
if (isInParty())
g_pMain->Send_PartyMember(m_sPartyIndex, &result);
break;
case SHOUT_CHAT:
if (m_pUserData.m_sMp < (m_iMaxMp / 5))
break;
// Characters under level 35 require 3,000 coins to shout.
if (!isGM()
&& GetLevel() < 35
&& !GoldLose(SHOUT_COIN_REQUIREMENT))
break;
MSpChange(-(m_iMaxMp / 5));
SendToRegion(&result);
break;
case KNIGHTS_CHAT:
if (isInClan())
g_pMain->Send_KnightsMember(GetClanID(), &result);
break;
case PUBLIC_CHAT:
case ANNOUNCEMENT_CHAT:
if (isGM())
g_pMain->Send_All(&result);
break;
case COMMAND_CHAT:
if (getFame() == COMMAND_CAPTAIN)
g_pMain->Send_CommandChat(&result, m_pUserData.m_bNation, this);
break;
case MERCHANT_CHAT:
if (isMerchanting())
SendToRegion(&result);
break;
case WAR_SYSTEM_CHAT:
if (isGM())
g_pMain->Send_All(&result);
break;
}
}
void CUser::Chat(Packet & pkt)
{
Packet result;
uint16 sessID;
uint8 type = pkt.read<uint8>(), bNation;
string chatstr, finalstr, strSender, * strMessage;
bool isAnnouncement = false;
if (isMuted())
return;
pkt >> chatstr;
if (chatstr.empty() || chatstr.size() > 128)
return;
// Process GM commands
if (isGM() && ProcessChatCommand(chatstr))
return;
#if 0 // Removed this - all it seems to do is cause chat to break for GMs (is it 19xx+ only?)
if( isGM() && type == GENERAL_CHAT)
type = 0x14;
#endif
// Handle GM notice & announcement commands
if (type == PUBLIC_CHAT || type == ANNOUNCEMENT_CHAT)
{
// Trying to use a GM command without authorisation? Bad player!
if (!isGM())
return;
if (type == ANNOUNCEMENT_CHAT)
type = WAR_SYSTEM_CHAT;
// This is horrible, but we'll live with it for now.
// Pull the notice string (#### NOTICE : %s ####) from the database.
// Format the chat string around it, so our chat data is within the notice
g_pMain->GetServerResource(IDP_ANNOUNCEMENT, &finalstr, chatstr.c_str());
isAnnouncement = true;
}
if (isAnnouncement)
{
// GM notice/announcements show no name, so don't bother setting it.
strMessage = &finalstr; // use the formatted message from the user
bNation = KARUS; // arbitrary nation
sessID = -1;
}
else
{
strMessage = &chatstr; // use the raw message from the user
strSender = GetName(); // everything else uses a name, so set it
bNation = GetNation();
sessID = GetSocketID();
}
ChatPacket::Construct(&result, type, strMessage, &strSender, bNation, sessID);
switch (type)
{
case GENERAL_CHAT:
g_pMain->Send_NearRegion(&result, GetMap(), GetRegionX(), GetRegionZ(), GetX(), GetZ());
break;
case PRIVATE_CHAT:
{
CUser *pUser = g_pMain->GetUserPtr(m_sPrivateChatUser);
if (pUser != nullptr)
pUser->Send(&result);
} break;
case PARTY_CHAT:
if (isInParty())
g_pMain->Send_PartyMember(m_sPartyIndex, &result);
break;
case SHOUT_CHAT:
if (m_sMp < (m_iMaxMp / 5))
break;
// Characters under level 35 require 3,000 coins to shout.
if (!isGM()
&& GetLevel() < 35
&& !GoldLose(SHOUT_COIN_REQUIREMENT))
break;
MSpChange(-(m_iMaxMp / 5));
SendToRegion(&result);
break;
case KNIGHTS_CHAT:
if (isInClan())
g_pMain->Send_KnightsMember(GetClanID(), &result);
break;
case PUBLIC_CHAT:
case ANNOUNCEMENT_CHAT:
if (isGM())
g_pMain->Send_All(&result);
break;
case COMMAND_CHAT:
if (GetFame() == COMMAND_CAPTAIN)
g_pMain->Send_CommandChat(&result, m_bNation, this);
break;
case MERCHANT_CHAT:
if (isMerchanting())
SendToRegion(&result);
break;
case ALLIANCE_CHAT:
if (isInClan())
{
CKnights *pKnights = g_pMain->GetClanPtr(GetClanID());
if (pKnights != nullptr && pKnights->isInAlliance())
g_pMain->Send_KnightsAlliance(pKnights->GetAllianceID(), &result);
}
break;
case WAR_SYSTEM_CHAT:
if (isGM())
g_pMain->Send_All(&result);
break;
}
}
void CUser::ZoneChange(uint16 sNewZone, float x, float z)
{
C3DMap * pMap = g_pMain->GetZoneByID(sNewZone);
if (pMap == nullptr)
return;
ZoneChangeError errorReason;
if (!CanChangeZone(pMap, errorReason))
{
Packet result;
switch (errorReason)
{
case ZoneChangeErrorWrongLevel:
/* this will depend on the zone */
break;
case ZoneChangeErrorWarActive:
result.Initialize(WIZ_WARP_LIST);
result << uint8(2) << uint8(4);
Send(&result);
break;
case ZoneChangeErrorNeedLoyalty:
/* does this have an error? */
break;
}
return;
}
m_bWarp = true;
m_bZoneChangeFlag = true;
UserInOut(INOUT_OUT);
if (sNewZone == ZONE_SNOW_BATTLE)
SetMaxHp(1);
if (GetZoneID() != sNewZone)
{
SetZoneAbilityChange();
// Reset the user's anger gauge when leaving the zone
// Unknown if this is official behaviour, but it's logical.
if (GetAngerGauge() > 0)
UpdateAngerGauge(0);
/*
Here we also send a clan packet with subopcode 0x16 (with a byte flag of 2) if war zone/Moradon
or subopcode 0x17 (with nWarEnemyID) for all else
*/
#if 0
if (isInClan())
{
CKnights * pKnights = g_pMain->GetClanPtr(GetClanID());
if (pKnights != nullptr
&& pKnights->bKnightsWarStarted)
{
Packet clanPacket(WIZ_KNIGHTS_PROCESS);
if (pMap->isWarZone() || byNewZone == ZONE_MORADON)
clanPacket << uint8(0x17) << uint8(2);
else
clanPacket << uint16(0x16) << uint16(0 /*nWarEnemyID*/);
Send(&clanPacket);
}
}
#endif
if (sNewZone == ZONE_SNOW_BATTLE)
SetMaxHp();
if (isInParty())
PartyRemove(GetSocketID());
ResetWindows();
}
m_bZone = (uint8) sNewZone; // this is 2 bytes to support the warp data loaded from SMDs. It should not go above a byte, however.
SetPosition(x, 0.0f, z);
m_pMap = pMap;
if (g_pMain->m_nServerNo != pMap->m_nServerNo)
{
_ZONE_SERVERINFO *pInfo = g_pMain->m_ServerArray.GetData(pMap->m_nServerNo);
if (pInfo == nullptr)
return;
UserDataSaveToAgent();
m_bLogout = 2; // server change flag
SendServerChange(pInfo->strServerIP, 2);
return;
}
SetRegion(GetNewRegionX(), GetNewRegionZ());
Packet result(WIZ_ZONE_CHANGE, uint8(ZoneChangeTeleport));
result << uint16(GetZoneID()) << GetSPosX() << GetSPosZ() << GetSPosY() << g_pMain->m_byOldVictory;
Send(&result);
if (!m_bZoneChangeSameZone)
{
m_sWhoKilledMe = -1;
m_iLostExp = 0;
m_bRegeneType = 0;
m_tLastRegeneTime = 0;
m_sBind = -1;
InitType3();
InitType4();
CMagicProcess::CheckExpiredType9Skills(this, true);
SetUserAbility();
}
result.Initialize(AG_ZONE_CHANGE);
result << GetSocketID() << GetZoneID();
Send_AIServer(&result);
m_bZoneChangeSameZone = false;
m_bZoneChangeFlag = false;
}
