开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 模拟服务器 > 查看源码
ObjectPlayer.cpp
资源名称：LegendOfMir2_Server020418.zip　[点击查看]
上传用户：szopptop
上传日期：2013-04-23
资源大小：1047k
文件大小：98k
源码类别：

模拟服务器

开发平台：

Visual C++

ObjectPlayer.cpp：源码内容
  1. #include "stdafx.h"
  3. #define _MSG_GOOD "+GOOD/"
  4. #define _MSG_FAIL "+FAIL/"
  6. CMagicInfo* GetMagicInfo(int nMagicID);
  7. int GetBack(int nDirection);
  8. CMirMap* GetMap(char *pszMapName);
  10. CPlayerObject* GetUserHuman(char *pszCharName);
  12. void SendRDBSocket(int nCertification, char *pszData1, char *pszData2, int nData2Len);
  14. void CPlayerObject::Constructor()
  15. {
  16. m_bEmpty = true;
  17. m_wObjectType = _OBJECT_HUMAN;
  19. m_nViewRange = 12;
  20. m_dwSearchTime = GetTickCount();
  21. m_dwSearchTick = 1000;
  23. m_fIsDead = FALSE;
  25. m_btLight = 2;
  27. m_fAdminMode = FALSE;
  29. m_dwLastCryTime = 0;
  31. m_fIsCapture = FALSE;
  32. }
  34. bool CPlayerObject::IsEmpty()
  35. {
  36. return m_bEmpty;
  37. }
  39. CPlayerObject::CPlayerObject(): CCharObject(NULL)
  40. {
  41. Constructor();
  42. }
  44. CPlayerObject::CPlayerObject(CUserInfo* pUserInfo): CCharObject(pUserInfo)
  45. {
  46. Constructor();
  47. }
  49. BOOL CPlayerObject::IsProperTarget(CCharObject* pTargetObject)
  50. {
  51. BOOL fFlag = FALSE;
  53. if (!pTargetObject)
  54. return fFlag;
  56. int nMode = m_pUserInfo->GetAttackMode();
  58. switch (nMode)
  59. {
  60. case HAM_ALL:
  61. if (!(pTargetObject->m_wObjectType & _OBJECT_NPC))
  62. fFlag = TRUE;
  63. break;
  64. case HAM_PEACE:
  65. if (pTargetObject->m_wObjectType & _OBJECT_ANIMAL)
  66. fFlag = TRUE;
  67. break;
  68. case HAM_GROUP:
  69. /*                  if not ((target.RaceServer >= RC_NPC) and (target.RaceServer <= RC_PEACENPC)) then
  70.              Result := TRUE;
  71.           if target.RaceServer = RC_USERHUMAN then
  72.              if IsGroupMember (target) then
  73.                 Result := FALSE; */
  74. break;
  75. case HAM_GUILD:
  76. /*                  if not ((target.RaceServer >= RC_NPC) and (target.RaceServer <= RC_PEACENPC)) then
  77.              Result := TRUE;
  78.           if target.RaceServer = RC_USERHUMAN then
  79.              if MyGuild <> nil then begin
  80.                 if TGuild(MyGuild).IsMember(target.UserName) then
  81.                    Result := FALSE;
  82.                 if BoGuildWarArea and (target.MyGuild <> nil) then begin  //巩颇傈,傍己傈 瘤开俊 乐澜
  83.                    if TGuild(MyGuild).IsAllyGuild(TGuild(target.MyGuild)) then
  84.                       Result := FALSE;
  85.                 end;
  86.              end;
  87.        end; */
  88. break;
  89. case HAM_PKATTACK:
  90. /*
  91.           if not ((target.RaceServer >= RC_NPC) and (target.RaceServer <= RC_PEACENPC)) then
  92.              Result := TRUE;
  93.           if target.RaceServer = RC_USERHUMAN then
  94.              if self.PKLevel >= 2 then begin  //傍拜窍绰 磊啊 弧盎捞
  95.                 if target.PKLevel < 2 then Result := TRUE
  96.                 else Result := FALSE;
  97.              end else begin
  98.                 //傍拜窍绰 磊啊 闰嫡捞
  99.                 if target.PKLevel >= 2 then Result := TRUE
  100.                 else Result := FALSE;
  101.              end;
  102.        end;
  103. */ break;
  104. }
  106. /* if target.RaceServer = RC_USERHUMAN then begin
  107.         if (InSafeZone) or (target.InSafeZone) then begin
  108.            Result := FALSE;
  109.         end;
  111.         if not target.BoInFreePKArea then begin  //傍己傈 瘤开俊辑绰 力寇 等促.
  112.            if (PKLevel >= 2) and (Abil.Level > 10) then begin //绊乏 弧盎捞甸
  113.               if (target.Abil.Level <= 10) and (target.PKLevel < 2) then //历肪 馒茄 檬焊甫 傍拜 给茄促.
  114.                  Result := FALSE;
  115.            end;
  116.            if (Abil.Level <= 10) and (PKLevel < 2) then begin //历肪 馒茄 檬焊
  117.               if (target.PKLevel >= 2) and (target.Abil.Level > 10) then //绊肪 弧盎捞甸阑 傍拜给茄促.
  118.                  Result := FALSE;
  119.            end;
  120.         end;
  122.         //甘 捞悼饶 3檬 悼救篮 傍拜 给窍绊 救 寸窃
  123.         if (GetTickCount - MapMoveTime < 3000) or (GetTickCount - target.MapMoveTime < 3000) then
  124.            Result := FALSE;
  126.      end else begin
  127.         if target.Master = self then begin  //郴 何窍
  128.            if HumAttackMode <> HAM_ALL then  //葛滴 傍拜 老锭父 何窍啊 傍拜凳
  129.               Result := FALSE;
  130.         end else begin
  131.            if target.Master <> nil then
  132.               Result := IsProperTarget(target.Master);
  133.         end;
  134.      end; */
  136. return fFlag;
  137. }
  139. void CPlayerObject::GetCharName(char *pszCharName)
  140. { 
  141. strcpy(pszCharName, m_szName); 
  142. }
  144. BOOL CPlayerObject::ReadBook(char *pszMakeIndex)
  145. {
  146. if (!m_pUserInfo) return FALSE;
  148. int nMagicID = m_pUserInfo->GetMagicID(pszMakeIndex);
  150. if (m_pUserInfo->IsMyMagic(nMagicID)) return FALSE;
  152. CMagicInfo* pMagicInfo = GetMagicInfo(nMagicID);
  154. if (pMagicInfo)
  155. {
  156. if (((pMagicInfo->sJob == m_pUserInfo->GetJob()) || pMagicInfo->sJob == 99) && m_Ability.Level >= pMagicInfo->sNeed[0])
  157. {
  158. char szEncodeMsg[256];
  159. _TDEFAULTMESSAGE DefMsg;
  160. _LPTHUMANMAGICRCD lpHumanMagicRcd = new _THUMANMAGICRCD;
  162. if (lpHumanMagicRcd)
  163. {
  164. lpHumanMagicRcd->btMagicID = nMagicID;
  165. lpHumanMagicRcd->btLevel = 0;
  166. lpHumanMagicRcd->btUseKey = 0;
  167. lpHumanMagicRcd->nCurrTrain = 0;
  169. m_pUserInfo->m_lpTMagicRcd.AddNewNode(lpHumanMagicRcd);
  171. RecalcAbilitys();
  173. _TCLIENTMAGICRCD tClientMagicRcd;
  175. tClientMagicRcd.btMagicID = lpHumanMagicRcd->btMagicID;
  176. tClientMagicRcd.btLevel = lpHumanMagicRcd->btLevel;
  177. tClientMagicRcd.btUseKey = lpHumanMagicRcd->btUseKey;
  178. tClientMagicRcd.nCurrTrain = lpHumanMagicRcd->nCurrTrain;
  180. tClientMagicRcd.tStdMagic.btEffect = (BYTE)g_pMagicInfo[lpHumanMagicRcd->btMagicID].sEffect;
  181. tClientMagicRcd.tStdMagic.btEffectType = (BYTE)g_pMagicInfo[lpHumanMagicRcd->btMagicID].sEffectType;
  182. memcpy(&tClientMagicRcd.tStdMagic.sNeed, g_pMagicInfo[lpHumanMagicRcd->btMagicID].sNeed, sizeof(tClientMagicRcd.tStdMagic.sNeed));
  183. memcpy(&tClientMagicRcd.tStdMagic.nTrain, g_pMagicInfo[lpHumanMagicRcd->btMagicID].nTrain, sizeof(tClientMagicRcd.tStdMagic.nTrain));
  184. tClientMagicRcd.tStdMagic.btDefSpell = (BYTE)g_pMagicInfo[lpHumanMagicRcd->btMagicID].sDefSpell;
  185. tClientMagicRcd.tStdMagic.nDelayTime = g_pMagicInfo[lpHumanMagicRcd->btMagicID].sDelay;
  187. fnMakeDefMessage(&DefMsg, SM_ADDMAGIC, 0, 0, 0, 1);
  188. int nPos = fnEncode6BitBufA((unsigned char *)&tClientMagicRcd, szEncodeMsg, sizeof(_TCLIENTMAGICRCD), sizeof(szEncodeMsg));
  189. szEncodeMsg[nPos] = '';
  190. SendSocket(&DefMsg, szEncodeMsg);
  192. return TRUE;
  193. }
  194. }
  195. }
  197. return FALSE;
  198. }
  200. BOOL CPlayerObject::EatItem(char *pszMakeIndex)
  201. {
  202. int nStdIndex = m_pUserInfo->GetGenItemStdIdx(pszMakeIndex);
  204. if (g_pStdItemEtc[nStdIndex].wStdMode != 0) return FALSE;
  206. if (g_pStdItemEtc[nStdIndex].wShape == 1)
  207. IncHealthSpell(g_pStdItemEtc[nStdIndex].wDuraMax/*+hp*/, g_pStdItemEtc[nStdIndex].dwRSource/*+mp*/);
  208. else
  209. {
  210. if ((m_IncHealth + g_pStdItemEtc[nStdIndex].wDuraMax < 500) && (g_pStdItemEtc[nStdIndex].wDuraMax > 0))
  211. m_IncHealth += (WORD)g_pStdItemEtc[nStdIndex].wDuraMax;
  213. if ((m_IncSpell + g_pStdItemEtc[nStdIndex].dwRSource < 500) && (g_pStdItemEtc[nStdIndex].dwRSource > 0))
  214. m_IncSpell += (WORD)g_pStdItemEtc[nStdIndex].dwRSource;
  215. }
  217. return TRUE;
  218. }
  220. BOOL CPlayerObject::ServerGetEatItem(int nItemIndex, char *pszMakeIndex)
  221. {
  222. if (!m_pUserInfo) return FALSE;
  224. _TDEFAULTMESSAGE DefMsg;
  225. BOOL fFlag = FALSE;
  227. _LPTGENERALITEMRCD lptGenItem = m_pUserInfo->GetUseGenItem(pszMakeIndex);
  229. if (lptGenItem)
  230. {
  231. switch (g_pStdItemEtc[nItemIndex].wStdMode)
  232. {
  233. case 0:
  234. {
  235. if (EatItem(pszMakeIndex))
  236. {
  237. m_pUserInfo->RemoveGenItem(lptGenItem);
  238. fFlag = TRUE;
  239. }
  241. break;
  242. }
  243. case 3:
  244. {
  245. break;
  246. }
  247. case 4:
  248. {
  249. if (ReadBook(pszMakeIndex))
  250. {
  251. m_pUserInfo->RemoveGenItem(lptGenItem);
  253. if (m_pUserInfo->m_lpTMagicErgumSkill)
  254. {
  255. if (!m_pUserInfo->m_fLongHitSkill)
  256. {
  257. m_pUserInfo->AllowLongHitSkill(TRUE);
  258. SendSocket(NULL, "+LNG");
  259. }
  260. }
  262. if (m_pUserInfo->m_lpTMagicBanwolSkill)
  263. {
  264. if (!m_pUserInfo->m_fWideHitSkill)
  265. {
  266. m_pUserInfo->AllowWideHitSkill(TRUE);
  267. SendSocket(NULL, "+WID");
  268. }
  269. }
  271. fFlag = TRUE;
  272. }
  274. break;
  275. }
  276. }
  277. }
  279. if (fFlag)
  280. {
  281.   fnMakeDefMessage(&DefMsg, SM_EAT_OK, 0, 0, 0, 0);
  282. SendSocket(&DefMsg, NULL);
  283. }
  284. else
  285. {
  286.   fnMakeDefMessage(&DefMsg, SM_EAT_FAIL, 0, 0, 0, 0);
  287. SendSocket(&DefMsg, NULL);
  288. }
  290. return fFlag;
  291. }
  293. void CPlayerObject::SendAddItem(_LPTUSERITEMRCD lpTItemRcd)
  294. {
  295. _TDEFAULTMESSAGE SendDefMsg;
  296. _TCLIENTITEMRCD tClientItemRcd;
  297. char szEncodeMsg[256];
  299. fnMakeDefMessage(&SendDefMsg, SM_ADDITEM, (int)this, 0, 0, 1);
  301. if (lpTItemRcd->szMakeIndex[0] != 'G')
  302. {
  303. g_pStdItemSpecial[lpTItemRcd->nStdIndex].GetStandardItem(&tClientItemRcd);
  304. g_pStdItemSpecial[lpTItemRcd->nStdIndex].GetUpgradeStdItem(&tClientItemRcd, lpTItemRcd);
  306. if (strlen(lpTItemRcd->szPrefixName))
  307. strcpy(tClientItemRcd.tStdItem.szPrefixName, lpTItemRcd->szPrefixName);
  308. else
  309. ZeroMemory(tClientItemRcd.tStdItem.szPrefixName, sizeof(tClientItemRcd.tStdItem.szPrefixName));
  310. }
  311. else
  312. {
  313. g_pStdItemEtc[lpTItemRcd->nStdIndex].GetStandardItem(&tClientItemRcd);
  314. g_pStdItemEtc[lpTItemRcd->nStdIndex].GetUpgradeStdItem(&tClientItemRcd, lpTItemRcd);
  315. }
  317. memcpy(tClientItemRcd.szMakeIndex, lpTItemRcd->szMakeIndex, 12);
  319. tClientItemRcd.nDura = lpTItemRcd->nDura;
  320. tClientItemRcd.nDuraMax = lpTItemRcd->nDuraMax;
  322. int nPos =  fnEncode6BitBufA((unsigned char *)&tClientItemRcd, szEncodeMsg, sizeof(_TCLIENTITEMRCD), sizeof(szEncodeMsg));
  323. szEncodeMsg[nPos] = '';
  325. SendSocket(&SendDefMsg, szEncodeMsg);
  326. }
  328. BOOL CPlayerObject::PickUp()
  329. {
  330. CMapItem* pMapItem = m_pMap->GetItem(m_nCurrX, m_nCurrY);
  332. if (pMapItem)
  333. {
  334. if (memcmp(pMapItem->szName, g_szGoldName, memlen(g_szGoldName) - 1) == 0)
  335. {
  336. if (m_pMap->RemoveObject(m_nCurrX, m_nCurrY, OS_ITEMOBJECT, (VOID *)pMapItem))
  337. {
  338. if (m_pUserInfo->IncGold(pMapItem->nCount))
  339. {
  340. AddRefMsg(RM_ITEMHIDE, 0, (int)pMapItem, m_nCurrX, m_nCurrY, NULL);
  342. GoldChanged();
  344. delete pMapItem;
  345. pMapItem = NULL;
  347. return TRUE;
  348. }
  349. else
  350. m_pMap->AddNewObject(m_nCurrX, m_nCurrY, OS_ITEMOBJECT, (VOID *)pMapItem);
  351. }
  352. }
  353. else
  354. {
  355. if (m_pUserInfo->IsEnoughBag())
  356. {
  357. if (m_pMap->RemoveObject(m_nCurrX, m_nCurrY, OS_ITEMOBJECT, (VOID *)pMapItem))
  358. {
  359. _LPTUSERITEMRCD lptItemRcd = (_LPTUSERITEMRCD)pMapItem->pItem;
  361. if (int nUpdate = UpdateItemToDB(lptItemRcd, _ITEM_ACTION_PICKUP))
  362. {
  363. AddRefMsg(RM_ITEMHIDE, 0, (int)pMapItem, m_nCurrX, m_nCurrY, NULL);
  365. if (nUpdate == 2)
  366. {
  367. SendAddItem(lptItemRcd);
  368. m_pUserInfo->m_lpTItemRcd.AddNewNode(lptItemRcd);
  369. }
  371. delete pMapItem;
  372. pMapItem = NULL;
  373. }
  374. }
  375. }
  376. }
  377. }
  379. return FALSE;
  380. }
  381. /*function  TCreature.PickUp: Boolean;
  382. var
  383.    i: integer;
  384.    pu: PTUserItem;
  385.    pmi: PTMapItem;
  386.    ps: PTStdItem;
  387.    hum: TUserHuman;
  388. begin
  389.    Result := FALSE;
  390.    if BoDealing then exit;  //背券吝俊绰 拱扒阑 林阑 荐 绝促.
  391.    pmi := PEnvir.GetItem (CX, CY);
  392.    if pmi <> nil then begin
  393.       if CompareText (pmi.Name, '陛傈') = 0 then begin
  394.          if PEnvir.DeleteFromMap (CX, CY, OS_ITEMOBJECT, TObject(pmi)) = 1 then begin
  395.             if IncGold (pmi.Count) then begin
  396.                SendRefMsg (RM_ITEMHIDE, 0, integer(pmi), CX, CY, '');
  397.                //肺弊巢辫
  398.                AddUserLog ('凛扁_' +
  399.                            MapName + '_' +
  400.                            IntToStr(CX) + '_' +
  401.                            IntToStr(CY) + '_' +
  402.                            UserName + '_' +
  403.                            '陛傈_' +
  404.                            IntToStr(pmi.count));
  405.                GoldChanged;
  406.                Dispose (pmi);
  407.             end else
  408.                PEnvir.AddToMap (CX, CY, OS_ITEMOBJECT, TObject(pmi));
  409.          end;
  410.       end else
  411.          if IsEnoughBag then begin
  412.             if PEnvir.DeleteFromMap (CX, CY, OS_ITEMOBJECT, TObject(pmi)) = 1 then begin
  413.                new (pu);
  414.                pu^ := pmi.UserItem;
  415.                ps := UserEngine.GetStdItem (pu.Index);
  416.                if (ps <> nil) and IsAddWeightAvailable (UserEngine.GetStdItemWeight(pu.Index)) then begin
  417.                   SendMsg (self, RM_ITEMHIDE, 0, integer(pmi), CX, CY, '');
  418.                   AddItem (pu);
  419.                   //肺弊巢辫
  420.                   if not IsCheapStuff (ps.StdMode) then
  421.                      AddUserLog ('凛扁_' +
  422.                                  MapName + '_' +
  423.                                  IntToStr(CX) + '_' +
  424.                                  IntToStr(CY) + '_' +
  425.                                  UserName + '_' +
  426.                                  UserEngine.GetStdItemName (pu.Index) + '_' +
  427.                                  IntToStr(pu.MakeIndex));
  428.                   Dispose (pmi);
  429.                   if RaceServer = RC_USERHUMAN then begin
  430.                      if self is TUserHuman then begin
  431.                         hum := TUserHuman(self);
  432.                         TUserHuman(hum).SendAddItem (pu^);
  433.                      end;
  434.                   end;
  435.                   Result := TRUE;
  436.                end else begin
  437.                   Dispose (pu);
  438.                   PEnvir.AddToMap (CX, CY, OS_ITEMOBJECT, TObject(pmi));
  439.                end;
  440.             end;
  441.          end;
  442.    end;
  443. end;
  444. */
  446. int CPlayerObject::UpdateItemToDB(_LPTUSERITEMRCD lpMakeItemRcd, int nAction)
  447. {
  448. char szQuery[1024];
  450. char szMakeDay[7];
  451. char szMakeIndex[6];
  453. ZeroMemory(szMakeDay, sizeof(szMakeDay));
  454. ZeroMemory(szMakeIndex, sizeof(szMakeIndex));
  456. memcpy(szMakeDay, &lpMakeItemRcd->szMakeIndex[1], 6);
  457. memcpy(szMakeIndex, &lpMakeItemRcd->szMakeIndex[7], 5);
  459. if (atoi(szMakeDay) == 0 && atoi(szMakeIndex) == 0)
  460. {
  461. _TMAKEITEMRCD tMakeItemRcd;
  463. tMakeItemRcd.szStdType = lpMakeItemRcd->szMakeIndex[0];
  464. tMakeItemRcd.nDura = lpMakeItemRcd->nDura;
  465. tMakeItemRcd.nDuraMax = lpMakeItemRcd->nDuraMax;
  466. tMakeItemRcd.nStdIndex = lpMakeItemRcd->nStdIndex;
  467. memcpy(tMakeItemRcd.btValue, lpMakeItemRcd->btValue, sizeof(lpMakeItemRcd->btValue));
  469. _TDEFAULTMESSAGE Def;
  470. char szEncodeMsg1[24];
  471. char szEncodeMsg2[128];
  473. fnMakeDefMessage(&Def, DB_MAKEITEMRCD2, (int)this, 0, 0, 0);
  475. int nPos = fnEncodeMessageA(&Def, szEncodeMsg1, sizeof(szEncodeMsg1));
  476. szEncodeMsg1[nPos] = '';
  478. nPos = fnEncode6BitBufA((unsigned char *)lpMakeItemRcd, szEncodeMsg2, sizeof(_LPTMAKEITEMRCD), sizeof(szEncodeMsg2));
  480. strcpy(&szEncodeMsg2[nPos], m_pUserInfo->m_szUserID);
  481. strcat(szEncodeMsg2, "/");
  482. strcat(szEncodeMsg2, m_pUserInfo->m_szCharName);
  484. SendRDBSocket(2, szEncodeMsg1, szEncodeMsg2, strlen(szEncodeMsg2));
  486. return 1;
  487. }
  489. switch (nAction)
  490. {
  491. case _ITEM_ACTION_CREATE:
  492. {
  493. /* sprintf(szQuery, "INSERT TBL_CHARACTER_ITEM (FLD_LOGINID, FLD_CHARNAME, FLD_STDTYPE, FLD_MAKEDATE, FLD_MAKEINDEX, "
  494. "FLD_STDINDEX, FLD_DURA, FLD_DURAMAX, FLD_VALUE1, FLD_VALUE2, FLD_VALUE3, FLD_VALUE4, FLD_VALUE5, "
  495. "FLD_VALUE6, FLD_VALUE7, FLD_VALUE8, FLD_VALUE9, FLD_VALUE10, FLD_VALUE11, FLD_VALUE12, FLD_VALUE13, "
  496. "FLD_VALUE14, FLD_LASTOWNER, FLD_LASTACTION) "
  497. "VALUES( '%s', '%s', '%c', '%s', '%05d', %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d, %s, %d )", 
  498. pszUserID, pszCharName, lpMakeItemRcd->szMakeIndex[0], g_szYesterDay, g_nItemIndexCnt,
  499. lpMakeItemRcd->nStdIndex, lpMakeItemRcd->nDura, lpMakeItemRcd->nDuraMax, 
  500. lpMakeItemRcd->btValue[0], lpMakeItemRcd->btValue[1], lpMakeItemRcd->btValue[2], lpMakeItemRcd->btValue[3], 
  501. lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[6], lpMakeItemRcd->btValue[7], 
  502. lpMakeItemRcd->btValue[8], lpMakeItemRcd->btValue[9], lpMakeItemRcd->btValue[10], lpMakeItemRcd->btValue[11], 
  503. lpMakeItemRcd->btValue[12], lpMakeItemRcd->btValue[13], pszCharName, _ITEM_ACTION_CREATE);
  504. */ break;
  505. }
  506. case _ITEM_ACTION_THROW:
  507. {
  508. sprintf(szQuery, "UPDATE TBL_CHARACTER_ITEM SET FLD_LOGINID='%s', FLD_CHARNAME='%s', "
  509. "FLD_DURA=%d, FLD_DURAMAX=%d, FLD_VALUE1=%d, FLD_VALUE2=%d, FLD_VALUE3=%d, FLD_VALUE4=%d, FLD_VALUE5=%d, "
  510. "FLD_VALUE6=%d, FLD_VALUE7=%d, FLD_VALUE8=%d, FLD_VALUE9=%d, FLD_VALUE10=%d, FLD_VALUE11=%d, FLD_VALUE12=%d, FLD_VALUE13=%d, "
  511. "FLD_VALUE14=%d, FLD_LASTOWNER='%s', FLD_LASTACTION=%d "
  512. "WHERE FLD_STDTYPE='%c' AND FLD_MAKEDATE='%s' AND FLD_MAKEINDEX='%s' AND FLD_STDINDEX=%d",
  513. "0", "WEMADE", lpMakeItemRcd->nDura, lpMakeItemRcd->nDuraMax, 
  514. lpMakeItemRcd->btValue[0], lpMakeItemRcd->btValue[1], lpMakeItemRcd->btValue[2], lpMakeItemRcd->btValue[3], 
  515. lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[6], lpMakeItemRcd->btValue[7], 
  516. lpMakeItemRcd->btValue[8], lpMakeItemRcd->btValue[9], lpMakeItemRcd->btValue[10], lpMakeItemRcd->btValue[11], 
  517. lpMakeItemRcd->btValue[12], lpMakeItemRcd->btValue[13], m_pUserInfo->m_szCharName, _ITEM_ACTION_THROW,
  518. lpMakeItemRcd->szMakeIndex[0], szMakeDay, szMakeIndex, lpMakeItemRcd->nStdIndex);
  519. break;
  520. }
  521. case _ITEM_ACTION_PICKUP:
  522. {
  523. sprintf(szQuery, "UPDATE TBL_CHARACTER_ITEM SET FLD_LOGINID='%s', FLD_CHARNAME='%s', "
  524. "FLD_DURA=%d, FLD_DURAMAX=%d, FLD_VALUE1=%d, FLD_VALUE2=%d, FLD_VALUE3=%d, FLD_VALUE4=%d, FLD_VALUE5=%d, "
  525. "FLD_VALUE6=%d, FLD_VALUE7=%d, FLD_VALUE8=%d, FLD_VALUE9=%d, FLD_VALUE10=%d, FLD_VALUE11=%d, FLD_VALUE12=%d, FLD_VALUE13=%d, "
  526. "FLD_VALUE14=%d, FLD_LASTOWNER='%s', FLD_LASTACTION=%d "
  527. "WHERE FLD_STDTYPE='%c' AND FLD_MAKEDATE='%s' AND FLD_MAKEINDEX='%s' AND FLD_STDINDEX=%d",
  528. m_pUserInfo->m_szUserID, m_pUserInfo->m_szCharName, lpMakeItemRcd->nDura, lpMakeItemRcd->nDuraMax, 
  529. lpMakeItemRcd->btValue[0], lpMakeItemRcd->btValue[1], lpMakeItemRcd->btValue[2], lpMakeItemRcd->btValue[3], 
  530. lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[6], lpMakeItemRcd->btValue[7], 
  531. lpMakeItemRcd->btValue[8], lpMakeItemRcd->btValue[9], lpMakeItemRcd->btValue[10], lpMakeItemRcd->btValue[11], 
  532. lpMakeItemRcd->btValue[12], lpMakeItemRcd->btValue[13], "WEMADE", _ITEM_ACTION_PICKUP,
  533. lpMakeItemRcd->szMakeIndex[0], szMakeDay, szMakeIndex, lpMakeItemRcd->nStdIndex);
  534. break;
  535. }
  536. case _ITEM_ACTION_UPDATE:
  537. {
  538. sprintf(szQuery, "UPDATE TBL_CHARACTER_ITEM SET "
  539. "FLD_DURA=%d, FLD_DURAMAX=%d, FLD_VALUE1=%d, FLD_VALUE2=%d, FLD_VALUE3=%d, FLD_VALUE4=%d, FLD_VALUE5=%d, "
  540. "FLD_VALUE6=%d, FLD_VALUE7=%d, FLD_VALUE8=%d, FLD_VALUE9=%d, FLD_VALUE10=%d, FLD_VALUE11=%d, FLD_VALUE12=%d, FLD_VALUE13=%d, "
  541. "FLD_VALUE14=%d, FLD_LASTOWNER='%s', FLD_LASTACTION=%d, FLD_PREFIXNAME='%s' "
  542. "WHERE FLD_STDTYPE='%c' AND FLD_MAKEDATE='%s' AND FLD_MAKEINDEX='%s' AND FLD_STDINDEX=%d",
  543. lpMakeItemRcd->nDura, lpMakeItemRcd->nDuraMax, 
  544. lpMakeItemRcd->btValue[0], lpMakeItemRcd->btValue[1], lpMakeItemRcd->btValue[2], lpMakeItemRcd->btValue[3], 
  545. lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[5], lpMakeItemRcd->btValue[6], lpMakeItemRcd->btValue[7], 
  546. lpMakeItemRcd->btValue[8], lpMakeItemRcd->btValue[9], lpMakeItemRcd->btValue[10], lpMakeItemRcd->btValue[11], 
  547. lpMakeItemRcd->btValue[12], lpMakeItemRcd->btValue[13], m_pUserInfo->m_szCharName, _ITEM_ACTION_UPDATE, lpMakeItemRcd->szPrefixName,
  548. lpMakeItemRcd->szMakeIndex[0], szMakeDay, szMakeIndex, lpMakeItemRcd->nStdIndex);
  549. break;
  550. }
  552. default:
  553. return 0;
  554. }
  556. CRecordset *pRec = g_pConnGame->CreateRecordset();
  558. if ( !pRec->Execute( szQuery ) || pRec->GetRowCount() <= 0 )
  559. {
  560. InsertLogMsg(_T("UpdateItemToDB : 盎脚 坷幅"));
  561. g_pConnGame->DestroyRecordset( pRec );
  563. return 0;
  564. }
  566. g_pConnGame->DestroyRecordset( pRec );
  568. return 2;
  569. }
  571. void CPlayerObject::WeightChanged()
  572. {
  573. if (m_pUserInfo)
  574. {
  575. m_WAbility.Weight = m_pUserInfo->CalcBagWeight();
  576. UpdateProcess(this, RM_WEIGHTCHANGED, 0, 0, 0, 0, NULL); 
  577. }
  578. }
  580. void CPlayerObject::Whisper(char *pszChar, char *pszMsg)
  581. {
  582. char szChatMsg[512];
  583. int nLen;
  585. CPlayerObject* pPlayerObject = GetUserHuman(pszChar);
  587. if (pPlayerObject)
  588. {
  589. nLen = memlen(m_pUserInfo->m_szCharName);
  591. memmove(szChatMsg, m_pUserInfo->m_szCharName, (nLen - 1));
  592. memmove(&szChatMsg[nLen - 1], "=> ", 3);
  593. memmove(&szChatMsg[nLen + 2], pszMsg, memlen(pszMsg));
  595. pPlayerObject->AddProcess(this, RM_WHISPER, 0, 0, 0, 0, szChatMsg);
  596. }
  597. else
  598. {
  599. TCHAR wszMsg[64];
  601. nLen = memlen(pszChar);
  603. LoadString(g_hInst, IDS_CANTFIND_HUMAN, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  605. memmove(szChatMsg, pszChar, (nLen - 1));
  606. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, &szChatMsg[nLen - 1], sizeof(szChatMsg) - nLen, NULL, NULL);
  608. SysMsg(szChatMsg, 0);
  609. }
  610. }
  611. /*procedure TUserHuman.Whisper (whostr, saystr: string);
  612. var
  613.    hum: TUserHuman;
  614.    svidx: integer;
  615. begin
  616.    hum := TUserHuman (UserEngine.GetUserHuman (whostr));
  617.    if hum <> nil then begin
  618.       if not hum.ReadyRun then begin
  619.          SysMsg (whostr + '丛俊霸 皋技瘤甫 傈崔 且 荐 绝嚼聪促.', 0);
  620.          exit;
  621.       end;
  622.       if not hum.BoHearWhisper or hum.IsBlockWhisper (UserName) then begin
  623.          SysMsg (whostr + '丛篮 庇加富 芭何吝 涝聪促.', 0);
  624.          exit;
  625.       end;
  626.       hum.SendMsg (self, RM_WHISPER, 0, 0, 0, 0, UserName + '=> ' + saystr);
  627.    end else begin
  628.       if UserEngine.FindOtherServerUser (whostr, svidx) then begin
  629.          UserEngine.SendInterMsg (ISM_WHISPER, svidx, whostr + '/' + UserName + '=> ' + saystr);
  630.       end else
  631.          SysMsg (whostr + '丛阑 茫阑 荐 绝嚼聪促.', 0);
  632.    end;
  633. end;
  634. }
  635. */
  637. int CPlayerObject::CalcGetExp(int nTagLevel, int nTagHP)
  638. {
  639. int nExp;
  641. if (m_Ability.Level < nTagLevel + 10) nExp = nTagHP;
  642. else
  643. nExp = nTagHP - ROUND((nTagHP / 15) * (m_Ability.Level - (nTagLevel + 10)));
  645. if (nExp <= 0)
  646. nExp = 1;
  648. return nExp;
  649. }
  651. void CPlayerObject::AddBodyLuck(double fLuck)
  652. {
  653. /* if (fLuck > 0) && (
  654.    if (r > 0) and (BodyLuck < 5 * BODYLUCKUNIT) then
  655.       BodyLuck := BodyLuck + r;
  656.    if (r < 0) and (BodyLuck > -(5 * BODYLUCKUNIT)) then
  657.       BodyLuck := BodyLuck + r;
  659.    n := Trunc (BodyLuck / BODYLUCKUNIT);
  660.    if n > 5 then n := 5;
  661.    if n < -10 then n := -10;
  662.    BodyLuckLevel := n;
  663. end;
  664. */
  665. }
  667. void CPlayerObject::WinExp(int nExp)
  668. {
  669. m_Ability.Exp += nExp;
  671. AddBodyLuck (nExp * 0.002);
  673. AddProcess(this, RM_WINEXP, 0, nExp, 0, 0);
  675. if (m_Ability.Exp >= m_Ability.MaxExp)
  676. {
  677. m_Ability.Exp -= m_Ability.MaxExp;
  678. m_Ability.Level++;
  679. HasLevelUp(m_Ability.Level - 1);
  681. AddBodyLuck (100);
  682. /*      AddUserLog ('肪诀_' +
  683.                   UserName + '_' +
  684.                   IntToStr(Abil.Level) + '_' +
  685.                   IntToStr(Abil.Exp)); */
  686. }
  687. }
  689. void CPlayerObject::GainExp(int nExp)
  690. {
  691. WinExp(nExp);
  692. }
  693. /*
  694. procedure TCreature.GainExp (exp: longword);
  695. var
  696.    i, n, sumlv, dexp: integer;
  697.    cret: TCreature;
  698. const
  699.    bonus: array[0..GROUPMAX] of Real = (1, 1.2, 1.3, 1.4, 1.5, 1.6, 1.7, 1.8, 1.9, 2, 2.1, 2.2);
  700. begin
  701.    try
  702.       if GroupOwner <> nil then begin
  703.          sumlv := 0;
  704.          n := 0;
  705.          for i:=0 to GroupOwner.GroupMembers.Count-1 do begin
  706.             cret := TCreature(GroupOwner.GroupMembers.Objects[i]);
  707.             if not cret.Death and (PEnvir = cret.PEnvir) and (abs(CX-cret.CX) <= 12) and (abs(CY-cret.CY) <= 12) then begin
  708.                sumlv := sumlv + cret.Abil.Level;
  709.                Inc (n);
  710.             end;
  711.          end;
  712.          if (sumlv > 0) and (n > 1) then begin
  713.             if n in [0..GROUPMAX] then
  714.                exp := Round (exp * bonus[n]);
  715.             for i:=0 to GroupOwner.GroupMembers.Count-1 do begin
  716.                cret := TCreature(GroupOwner.GroupMembers.Objects[i]);
  717.                if not cret.Death and (PEnvir = cret.PEnvir) and (abs(CX-cret.CX) <= 12) and (abs(CY-cret.CY) <= 12) then
  718.                   cret.WinExp (Round (exp / sumlv * cret.Abil.Level));
  719.             end;
  720.          end else
  721.             WinExp (exp);
  722.       end else
  723.          WinExp (exp);
  724.    except
  725.       MainOutMessage ('[Exception] TCreature.GainExp');
  726.    end;
  727. end;
  728. */
  730. void CPlayerObject::HasLevelUp(int nPrevLevel)
  731. {
  732.    m_Ability.MaxExp = NEEDEXPS[m_Ability.Level];
  734.    RecalcLevelAbilitys();
  735. /*
  736. {$IFDEF FOR_ABIL_POINT}
  737. //4/16老 何磐 利侩
  738.    if prevlevel + 1 = Abil.Level then begin
  739.       BonusPoint := BonusPoint + GetBonusPoint (Job, Abil.Level);  //肪诀俊 蝶弗 焊呈胶
  740.       SendMsg (self, RM_ADJUST_BONUS, 0, 0, 0, 0, '');
  741.    end else begin
  742.       if prevlevel <> Abil.Level then begin
  743.          //焊呈胶 器牢飘甫 贸澜何磐 促矫 拌魂茄促.
  744.          BonusPoint := GetLevelBonusSum (Job, Abil.Level);
  745.          FillChar (BonusAbil, sizeof(TNakedAbility), #0);
  746.          FillChar (CurBonusAbil, sizeof(TNakedAbility), #0);
  747.          //if prevlevel <> 0 then begin
  748.          RecalcLevelAbilitys;  //饭骇俊 蝶弗 瓷仿摹甫 拌魂茄促.
  749.          //end else begin
  750.          //   RecalcLevelAbilitys_old;
  751.          //   BonusPoint := 0;
  752.          //end;
  753.          SendMsg (self, RM_ADJUST_BONUS, 0, 0, 0, 0, '');
  754.       end;
  755.    end;
  756. {$ENDIF}
  757. */
  758. RecalcAbilitys();
  760. AddProcess(this, RM_LEVELUP, 0, m_Ability.Exp, 0, 0, NULL);
  761. }
  763. void CPlayerObject::RecalcHitSpeed()
  764. {
  765. m_nHitDouble = 0;
  767. /*HitPoint := DEFHIT + BonusAbil.Hit;*/
  768. m_btHitPoint = 5;
  770.    /*case Job of
  771.       2: SpeedPoint := DEFSPEED + BonusAbil.Speed + 3;  //档荤绰 扁夯 刮酶捞 臭促.
  772.       else SpeedPoint := DEFSPEED + BonusAbil.Speed;
  773.    end;*/
  774. if (m_pUserInfo->GetJob() == 2)
  775. m_btSpeedPoint = DEFSPEED + 3;
  776. else
  777. m_btSpeedPoint = DEFSPEED;
  779. m_pUserInfo->m_lpTMagicErgumSkill = NULL;
  780. m_pUserInfo->m_lpTMagicBanwolSkill = NULL;
  781. m_pUserInfo->m_lpTMagicFireSwordSkill = NULL;
  782. m_pUserInfo->m_lpTMagicOneSwordSkill = NULL;
  783. m_pUserInfo->m_lpTMagicIlkwangSkill = NULL;
  784. m_pUserInfo->m_lpTMagicPowerHitSkill = NULL;
  786. PLISTNODE pListNode = m_pUserInfo->m_lpTMagicRcd.GetHead();
  788. while (pListNode)
  789. {
  790. _LPTHUMANMAGICRCD lptUserMagicRcd = m_pUserInfo->m_lpTMagicRcd.GetData(pListNode);
  792. switch (lptUserMagicRcd->btMagicID)
  793. {
  794. case _SKILL_ILKWANG:
  795. {
  796. m_pUserInfo->m_lpTMagicIlkwangSkill = lptUserMagicRcd;
  798. if (lptUserMagicRcd->btLevel > 0)
  799. m_btHitPoint += ROUND(8 / 3 * lptUserMagicRcd->btLevel);
  801. break;
  802. }
  803. case _SKILL_ERGUM:
  804. m_pUserInfo->m_lpTMagicErgumSkill = lptUserMagicRcd;
  805. break;
  806. case _SKILL_BANWOL:
  807. m_pUserInfo->m_lpTMagicBanwolSkill = lptUserMagicRcd;
  808. break;
  809. case _SKILL_FIRESWORD:
  810. {
  811. m_pUserInfo->m_lpTMagicFireSwordSkill = lptUserMagicRcd;
  812. m_nHitDouble = 4 + lptUserMagicRcd->btLevel * 4;  //+40% ~ +160%
  813. break;
  814. }
  815. case _SKILL_ONESWORD:
  816. {
  817. m_pUserInfo->m_lpTMagicOneSwordSkill = lptUserMagicRcd;
  819. if (lptUserMagicRcd->btLevel > 0)
  820. m_btHitPoint += ROUND(9 / 3 * lptUserMagicRcd->btLevel);
  822. break;
  823. }
  824. case _SKILL_YEDO:
  825. {
  826. m_pUserInfo->m_lpTMagicPowerHitSkill = lptUserMagicRcd;
  828. if (lptUserMagicRcd->btLevel > 0)
  829. m_btHitPoint += ROUND(3 / 3 * lptUserMagicRcd->btLevel);
  831. m_btHitPlus = 5 + lptUserMagicRcd->btLevel;
  833. m_pUserInfo->m_btAttackSkillCount = 7 - lptUserMagicRcd->btLevel;
  834. m_pUserInfo->m_btAttackSkillPointCount = rand() % m_pUserInfo->m_btAttackSkillCount;
  836. break;
  837. }
  838. }
  840. pListNode = m_pUserInfo->m_lpTMagicRcd.GetNext(pListNode);
  841. }
  842. }
  844. void CPlayerObject::RecalcAbilitys()
  845. {
  846. BOOL fCGHI[4];
  848. m_btAntiPoison = 0;
  849. m_btPoisonRecover = 0;
  850. m_btHealthRecover = 0;
  851. m_btSpellRecover = 0;
  852. m_btAntiMagic = 1;   //扁夯 10%
  854. m_sHitSpeed = 0;
  856. fCGHI[0] = FALSE;
  857. fCGHI[1] = FALSE;
  858. fCGHI[2] = FALSE;
  859. fCGHI[3] = FALSE;
  861. BOOL fOldHumHideMode = m_fHumHideMode;
  863. ZeroMemory(&m_AddAbility, sizeof(m_AddAbility));
  865. m_WAbility = m_Ability;
  867. m_WAbility.Weight = 0;
  868. m_WAbility.HandWeight = 0;
  869. m_WAbility.WearWeight = 0;
  871. _LPTUSERITEMRCD lpUserItemRcd = NULL;
  873. for (int i = U_DRESS; i <= U_RINGR; i++)
  874. {
  875. if (lpUserItemRcd = m_pUserInfo->GetAccessory(i))
  876. {
  877. g_pStdItemSpecial[lpUserItemRcd->nStdIndex].ApplyItemParameters(&m_AddAbility);
  879. if ( i == U_RIGHTHAND || i == U_WEAPON )
  880. m_WAbility.HandWeight += g_pStdItemSpecial[lpUserItemRcd->nStdIndex].wWeight;
  881. else
  882. m_WAbility.WearWeight += g_pStdItemSpecial[lpUserItemRcd->nStdIndex].wWeight; 
  884. if ( i == U_WEAPON )
  885. m_AddAbility.WeaponStrong = (BYTE)g_pStdItemSpecial[lpUserItemRcd->nStdIndex].dwRSource; // 公扁狼 碍档. 碍档啊 臭栏搁 肋 救 磺俺咙
  886. }
  887. }
  889. m_WAbility.Weight = m_pUserInfo->CalcBagWeight();
  891. // BEGIN:篮脚贱
  892. if ((m_fFixedHideMode) && (m_wStatusArr[STATE_TRANSPARENT] > 0))
  893. m_fHumHideMode = TRUE;
  895. if (m_fHumHideMode)
  896. {
  897. if (!fOldHumHideMode)
  898. {
  899. m_nCharStatus = GetCharStatus();
  900. AddRefMsg(RM_CHARSTATUSCHANGED, m_sHitSpeed/*wparam*/, m_nCharStatus, 0, 0, NULL);
  901. }
  902. }
  903. else
  904. {
  905. if (fOldHumHideMode)
  906. {
  907. m_wStatusArr[STATE_TRANSPARENT] = 0;
  908. m_nCharStatus = GetCharStatus();
  909. AddRefMsg(RM_CHARSTATUSCHANGED, m_sHitSpeed/*wparam*/, m_nCharStatus, 0, 0, NULL);
  910. }
  911. }
  912. // END:篮脚贱
  914. RecalcHitSpeed();
  916. // BEGIN:Light (Candle)
  917. BYTE btOldLight = m_btLight;
  919. _LPTGENERALITEMRCD lpTItemRcd = m_pUserInfo->GetRightHand();
  921. if (lpTItemRcd)
  922. {
  923. if (lpTItemRcd->nDura > 0)
  924. m_btLight = 8;
  925. else
  926. m_btLight = 2;
  927. }
  928. else
  929. m_btLight = 2;
  931. if (btOldLight != m_btLight)
  932. AddRefMsg(RM_CHANGELIGHT, 0, 0, 0, 0, NULL);
  933. // END
  935. m_btAntiMagic += m_AddAbility.AntiMagic;
  936. m_btHitPoint += m_AddAbility.HIT;
  937. m_btSpeedPoint += m_AddAbility.SPEED;
  938. m_btAntiPoison += m_AddAbility.AntiPoison;
  939. m_btPoisonRecover += m_AddAbility.PoisonRecover;
  940. m_btHealthRecover += m_AddAbility.HealthRecover;
  941. m_btSpellRecover += m_AddAbility.SpellRecover;
  942. m_sHitSpeed += m_AddAbility.HitSpeed;
  943. //   Luck := Luck + AddAbil.Luck;
  944. //   Luck := Luck - AddAbil.UnLuck;
  946. m_WAbility.MaxHP = m_Ability.MaxHP + m_AddAbility.HP;
  947. m_WAbility.MaxMP = m_Ability.MaxMP + m_AddAbility.MP;
  948. m_WAbility.AC = MAKEWORD(LOBYTE(m_AddAbility.AC)  + LOBYTE(m_Ability.AC),  HIBYTE(m_AddAbility.AC)  + HIBYTE(m_Ability.AC));
  949. m_WAbility.MAC = MAKEWORD(LOBYTE(m_AddAbility.MAC) + LOBYTE(m_Ability.MAC), HIBYTE(m_AddAbility.MAC) + HIBYTE(m_Ability.MAC));
  950. m_WAbility.DC = MAKEWORD(LOBYTE(m_AddAbility.DC)  + LOBYTE(m_Ability.DC),  HIBYTE(m_AddAbility.DC)  + HIBYTE(m_Ability.DC));
  951. m_WAbility.MC = MAKEWORD(LOBYTE(m_AddAbility.MC)  + LOBYTE(m_Ability.MC),  HIBYTE(m_AddAbility.MC)  + HIBYTE(m_Ability.MC));
  952. m_WAbility.SC = MAKEWORD(LOBYTE(m_AddAbility.SC)  + LOBYTE(m_Ability.SC),  HIBYTE(m_AddAbility.SC)  + HIBYTE(m_Ability.SC));
  954. if (m_wStatusArr[STATE_DEFENCEUP] > 0) // 规绢仿 惑铰
  955. m_WAbility.AC = MAKEWORD(LOBYTE(m_WAbility.AC), HIBYTE(m_WAbility.AC) + 2 + (m_Ability.Level / 7));
  957. if (m_wStatusArr[STATE_MAGDEFENCEUP] > 0) // 付亲仿 惑铰
  958. m_WAbility.MAC = MAKEWORD(LOBYTE(m_WAbility.MAC), HIBYTE(m_WAbility.MAC) + 2 + (m_Ability.Level / 7));
  960. UpdateProcess(this, RM_CHARSTATUSCHANGED, m_sHitSpeed/*wparam*/, m_nCharStatus, 0, 0, NULL);
  961. }
  963. void CPlayerObject::ServerGetMagicKeyChange(int nMagicID, int nUseKey)
  964. {
  965. PLISTNODE pListNode = m_pUserInfo->m_lpTMagicRcd.GetHead();
  967. while (pListNode)
  968. {
  969. _LPTHUMANMAGICRCD lptUserMagicRcd = m_pUserInfo->m_lpTMagicRcd.GetData(pListNode);
  971. if (lptUserMagicRcd)
  972. {
  973. if (lptUserMagicRcd->btMagicID == nMagicID)
  974. {
  975. lptUserMagicRcd->btUseKey = nUseKey;
  976. break;
  977. }
  978. }
  980. pListNode = m_pUserInfo->m_lpTMagicRcd.GetNext(pListNode);
  981. }
  982. }
  984. void CPlayerObject::SendMyMagics()
  985. {
  986. char szEncodeMsg[4096];
  987. int nPos = 0;
  989. _TDEFAULTMESSAGE DefMsg;
  991. int nCnt = m_pUserInfo->EncodeMyMagic(szEncodeMsg, sizeof(szEncodeMsg), nPos);
  993. szEncodeMsg[nPos] = '';
  995. fnMakeDefMessage(&DefMsg, SM_SENDMYMAGIC, 0, 0, 0, nCnt);
  997. SendSocket(&DefMsg, szEncodeMsg);
  998. }
  1000. void CPlayerObject::SendBagItems()
  1001. {
  1002. char szEncodeMsg[8096];
  1003. int nCnt = m_pUserInfo->m_lpTItemRcd.GetCount();
  1004. int nGenCnt = m_pUserInfo->m_lpTGenItemRcd.GetCount();
  1005. int nPos = 0;
  1007. _TCLIENTITEMRCD tClientItemRcd;
  1008. _TDEFAULTMESSAGE DefMsg;
  1010. if (nCnt)
  1011. {
  1012. PLISTNODE pListNode = m_pUserInfo->m_lpTItemRcd.GetHead();
  1014. while (pListNode)
  1015. {
  1016. _LPTUSERITEMRCD lptUserItemRcd = m_pUserInfo->m_lpTItemRcd.GetData(pListNode);
  1018. if (lptUserItemRcd)
  1019. {
  1020. g_pStdItemSpecial[lptUserItemRcd->nStdIndex].GetStandardItem(&tClientItemRcd);
  1021. g_pStdItemSpecial[lptUserItemRcd->nStdIndex].GetUpgradeStdItem(&tClientItemRcd, lptUserItemRcd);
  1023. memcpy(tClientItemRcd.szMakeIndex, lptUserItemRcd->szMakeIndex, 12);
  1025. tClientItemRcd.nDura = lptUserItemRcd->nDura;
  1026. tClientItemRcd.nDuraMax = lptUserItemRcd->nDuraMax;
  1028. if (strlen(lptUserItemRcd->szPrefixName))
  1029. strcpy(tClientItemRcd.tStdItem.szPrefixName, lptUserItemRcd->szPrefixName);
  1030. else
  1031. ZeroMemory(tClientItemRcd.tStdItem.szPrefixName, sizeof(tClientItemRcd.tStdItem.szPrefixName));
  1033. nPos += fnEncode6BitBufA((unsigned char *)&tClientItemRcd, &szEncodeMsg[nPos], sizeof(_TCLIENTITEMRCD), sizeof(szEncodeMsg) - nPos);
  1035. szEncodeMsg[nPos++] = '/';
  1036. }
  1038. pListNode = m_pUserInfo->m_lpTItemRcd.GetNext(pListNode);
  1039. }
  1040. }
  1042. if (nGenCnt)
  1043. {
  1044. char szVal[5];
  1046. ZeroMemory(szVal, sizeof(szVal));
  1048. PLISTNODE pListNode = m_pUserInfo->m_lpTGenItemRcd.GetHead();
  1050. while (pListNode)
  1051. {
  1052. _LPTGENERALITEMRCD lptGenItemRcd = m_pUserInfo->m_lpTGenItemRcd.GetData(pListNode);
  1054. if (lptGenItemRcd)
  1055. {
  1056. memcpy(tClientItemRcd.szMakeIndex, lptGenItemRcd->szMakeIndex, 12);
  1058. tClientItemRcd.nDura = lptGenItemRcd->nDura;
  1059. tClientItemRcd.nDuraMax = lptGenItemRcd->nDuraMax;
  1061. g_pStdItemEtc[lptGenItemRcd->nStdIndex].GetStandardItem(&tClientItemRcd);
  1063. nPos += fnEncode6BitBufA((unsigned char *)&tClientItemRcd, &szEncodeMsg[nPos], sizeof(_TCLIENTITEMRCD), sizeof(szEncodeMsg) - nPos);
  1065. szEncodeMsg[nPos++] = '/';
  1066. }
  1068. pListNode = m_pUserInfo->m_lpTGenItemRcd.GetNext(pListNode);
  1069. }
  1070. }
  1072. szEncodeMsg[nPos] = '';
  1074. fnMakeDefMessage(&DefMsg, SM_BAGITEMS, (int)this, 0, 0, nCnt + nGenCnt);
  1076. SendSocket(&DefMsg, szEncodeMsg);
  1077. }
  1079. void CPlayerObject::RecalcLevelAbilitys()
  1080. {
  1081. int n;
  1082. float nLevel = m_Ability.Level;
  1084. switch (m_pUserInfo->m_THumanRcd.btJob)
  1085. {
  1086. case 2: // 档荤
  1087. {
  1088.             m_Ability.MaxHP = 14 + ROUND((nLevel / 6 + 2.5) * nLevel);
  1089.             m_Ability.MaxMP = 13 + ROUND((nLevel / 8)* 2.2 * nLevel);
  1090.             m_Ability.MaxWeight = 50 + ROUND((nLevel / 4) * nLevel);
  1091.             m_Ability.MaxWearWeight = 15 + ROUND((nLevel / 50) * nLevel);
  1092.             m_Ability.MaxHandWeight = 12 + ROUND((nLevel / 42) * nLevel);
  1094.             n = (int)nLevel / 7;
  1095.             
  1096. m_Ability.DC = MAKEWORD(_MAX(n-1, 0), _MAX(1, n));
  1097.             m_Ability.MC = 0;
  1098.             m_Ability.SC = MAKEWORD(_MAX(n-1, 0), _MAX(1, n));
  1099.             m_Ability.AC = 0;
  1100.             
  1101. n = ROUND(nLevel / 6);
  1103.             m_Ability.MAC = MAKEWORD(n / 2, n + 1);
  1105. break;
  1106. }
  1107. case 1: // 贱荤
  1108. {
  1109.             m_Ability.MaxHP = 14 + ROUND((nLevel / 15 + 1.8) * nLevel);
  1110.             m_Ability.MaxMP = 13 + ROUND((nLevel / 5 + 2) * 2.2 * nLevel);
  1111.             m_Ability.MaxWeight = 50 + ROUND((nLevel / 5) * nLevel);
  1112.             m_Ability.MaxWearWeight = 15 + ROUND((nLevel / 100) * nLevel);
  1113.             m_Ability.MaxHandWeight = 12 + ROUND((nLevel / 90) * nLevel);
  1115.             n = (int)nLevel / 7;
  1117. m_Ability.DC = MAKEWORD(_MAX(n-1, 0), _MAX(1, n));
  1118.             m_Ability.MC = MAKEWORD(_MAX(n-1, 0), _MAX(1, n));
  1119.             m_Ability.SC = 0;
  1120.             m_Ability.AC = 0;
  1121.             m_Ability.MAC = 0;
  1123. break;
  1124. }
  1125. case 0: // 傈荤
  1126. {
  1127.             m_Ability.MaxHP = 14 + ROUND((nLevel / 4 + 4) * nLevel);
  1128.             m_Ability.MaxMP = 11 + (int)(nLevel * 2);
  1129.             m_Ability.MaxWeight = 50 + ROUND((nLevel / 3) * nLevel);
  1130.             m_Ability.MaxWearWeight = 15 + ROUND((nLevel / 20) * nLevel);
  1131.             m_Ability.MaxHandWeight = 12 + ROUND((nLevel / 13) * nLevel);
  1132.             m_Ability.DC = MAKEWORD(_MAX((int)(nLevel / 7) - 1, 1), _MAX(1, int(nLevel / 5)));
  1133.             m_Ability.SC = 0;
  1134.             m_Ability.MC = 0;
  1135.             m_Ability.AC = MAKEWORD(0, int(nLevel / 7));
  1136.             m_Ability.MAC = 0;
  1138. break;
  1139. }
  1140. }
  1142. if (m_Ability.HP > m_Ability.MaxHP) m_Ability.HP = m_Ability.MaxHP;
  1143. if (m_Ability.MP > m_Ability.MaxMP) m_Ability.MP = m_Ability.MaxMP;
  1144. }
  1146. void CPlayerObject::Initialize()
  1147. {
  1148. if (!m_pUserInfo) return;
  1150. m_dwLatestHitTime = 0;
  1151. m_nHitTimeOverCount = 0;
  1153. m_nCurrX = m_pUserInfo->m_THumanRcd.nCX;
  1154. m_nCurrY = m_pUserInfo->m_THumanRcd.nCY;
  1155. m_nDirection = m_pUserInfo->m_THumanRcd.nDirection;
  1156. m_pMap = GetMap(m_pUserInfo->m_THumanRcd.szMapName);
  1158. memcpy(m_szName, m_pUserInfo->m_szCharName, memlen(m_pUserInfo->m_szCharName));
  1160. if (m_pMap)
  1161. {
  1162. AddProcess(this, RM_LOGON, 0, 0, 0, 0, NULL); 
  1164. m_pMap->AddNewObject(m_nCurrX, m_nCurrY, OS_MOVINGOBJECT, this);
  1166. AddRefMsg(RM_TURN, m_nDirection, m_nCurrX, m_nCurrY, 0, NULL);
  1168. m_Ability.Level = m_pUserInfo->m_THumanRcd.szLevel;
  1169. m_Ability.Exp = m_pUserInfo->m_THumanRcd.nExp;
  1171. m_Ability.MaxExp = NEEDEXPS[m_Ability.Level];
  1173. RecalcLevelAbilitys();
  1174. RecalcAbilitys();
  1176. m_btBright = g_nMirDayTime;
  1178. AddProcess(this, RM_ABILITY, 0, 0, 0, 0, NULL);
  1179. AddProcess(this, RM_SUBABILITY, 0, 0, 0, 0, NULL);
  1180. AddProcess(this, RM_DAYCHANGING, 0, 0, 0, 0, NULL);
  1181. AddProcess(this, RM_SENDUSEITEMS, 0, 0, 0, 0, NULL);
  1182. AddProcess(this, RM_SENDMYMAGIC, 0, 0, 0, 0, NULL);
  1184. // BEGIN : Send Attack Mode Msg
  1185. TCHAR wszMsg[128];
  1186. char szMsg[128];
  1188. LoadString(g_hInst, m_pUserInfo->GetAttackMode() + IDS_ATTACKMODE_ALL, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1189. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1190. SysMsg(szMsg, 1);
  1192. LoadString(g_hInst, IDS_ATTACKMODE_CHGMODE, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1193. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1194. SysMsg(szMsg, 1);
  1195. // END : Send Attack Mode Msg
  1196. }
  1197. }
  1198. /*
  1199. void CPlayerObject::SendSocket(_LPTDEFAULTMESSAGE lpDefMsg, char *pszPacket)
  1200. {
  1201. DWORD dwBytesSends = 0;
  1202. _TMSGHEADER MsgHdr;
  1204. MsgHdr.nCode = 0xAA55AA55;
  1205. MsgHdr.wIdent = GM_DATA;
  1206. MsgHdr.wUserGateIndex = m_pUserInfo->m_nUserGateIndex;
  1207. MsgHdr.wUserListIndex = m_pUserInfo->m_nUserServerIndex;
  1208. MsgHdr.nSocket = m_pUserInfo->m_sock;
  1210. if (lpDefMsg)
  1211. {
  1212. if (pszPacket)
  1213. {
  1214. int nLength = memlen(pszPacket);
  1216. if (nLength >= 256) return; // If pszPacket is too long.
  1218. MsgHdr.nLength = sizeof(_TDEFAULTMESSAGE) + nLength;
  1220. m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.len = sizeof(_TMSGHEADER) + MsgHdr.nLength;
  1222. memmove(m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer, (char *)&MsgHdr, sizeof(_TMSGHEADER));
  1223. memmove(&m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[sizeof(_TMSGHEADER)], lpDefMsg, sizeof(_TDEFAULTMESSAGE));
  1224. memmove(&m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[sizeof(_TMSGHEADER) + sizeof(_TDEFAULTMESSAGE)], pszPacket, MsgHdr.nLength - sizeof(_TDEFAULTMESSAGE));
  1226. m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.len] = '';
  1227. }
  1228. else
  1229. {
  1230. MsgHdr.nLength = sizeof(_TDEFAULTMESSAGE);
  1232. m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.len = sizeof(_TMSGHEADER) + MsgHdr.nLength;
  1234. memmove(m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer, (char *)&MsgHdr, sizeof(_TMSGHEADER));
  1235. memmove(&m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[sizeof(_TMSGHEADER)], lpDefMsg, sizeof(_TDEFAULTMESSAGE));
  1236. m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.len] = '';
  1237. }
  1238. }
  1239. else
  1240. {
  1241. int nLen = (memlen(pszPacket) - 1);
  1243. MsgHdr.nLength = -(nLen);
  1245. m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.len = sizeof(_TMSGHEADER) + nLen;
  1247. memmove(m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer, (char *)&MsgHdr, sizeof(_TMSGHEADER));
  1248. memmove(&m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[sizeof(_TMSGHEADER)], pszPacket, nLen);
  1249. m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer[m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.len] = '';
  1250. }
  1252. m_pUserInfo->m_pGateInfo->OverlappedEx[1].nOvFlag = OVERLAPPED_SEND;
  1253. m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf.buf = m_pUserInfo->m_pGateInfo->OverlappedEx[1].Buffer;
  1255. WSASend(m_pUserInfo->m_pGateInfo->m_sock, &m_pUserInfo->m_pGateInfo->OverlappedEx[1].DataBuf, 1, &dwBytesSends, 0, (OVERLAPPED *)&m_pUserInfo->m_pGateInfo->OverlappedEx[1], NULL);
  1256. }
  1257. */
  1258. BOOL CPlayerObject::DoRideHorse(int nDir, int fRideFlag)
  1259. {
  1260. // if (fRideFlag == m_xAbility.m_fRideHorse)
  1261. // {
  1262. /* if (m_xAbility.m_fRideHorse)
  1263. AddRefMsg(RM_RIDE, 0, 0, 0, 0, NULL);
  1264. else
  1265. AddRefMsg(RM_RIDE, 1, 0, 0, 0, NULL);
  1266. */
  1267. // return TRUE;
  1268. // }
  1270. return FALSE;
  1271. }
  1273. void CPlayerObject::MakeFeature()
  1274. {
  1275. m_tFeature.btGender = m_pUserInfo->GetGenderFeature();
  1276. m_tFeature.btWear = m_pUserInfo->GetDressFeature();
  1277. m_tFeature.btHair = m_pUserInfo->GetHairFeature();
  1278. m_tFeature.btWeapon = m_pUserInfo->GetWeaponFeature();
  1280. m_tFeatureEx.btHorse = m_pUserInfo->GetHorseFeatureEx();
  1281. m_tFeatureEx.dwHairColor = 0xFFFF;
  1282. m_tFeatureEx.dwWearColor = 0xFFFF;
  1283. }
  1285. BOOL CPlayerObject::CheckTakeOnItem(WORD wWhere, _LPTUSERITEMRCD lpTItemRcd)
  1286. {
  1287. TCHAR wszMsg[64];
  1288. char szMsg[64];
  1290. int nNeed = g_pStdItemSpecial[lpTItemRcd->nStdIndex].wNeed;
  1291. int nNeedLevel = g_pStdItemSpecial[lpTItemRcd->nStdIndex].wNeedLevel;;
  1292. int nWeight = g_pStdItemSpecial[lpTItemRcd->nStdIndex].wWeight;
  1294. if (wWhere == U_DRESS)
  1295. {
  1296. if (lpTItemRcd->szMakeIndex[0] != 'B') return FALSE;
  1298. if (g_pStdItemSpecial[lpTItemRcd->nStdIndex].wStdMode == 10) // 巢磊渴
  1299. {
  1300. if (m_tFeature.btGender != 0)
  1301. {
  1302. LoadString(g_hInst, IDS_MALE_WEAR, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1303. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1304. SysMsg(szMsg, 0);
  1306. return FALSE;
  1307. }
  1308. }
  1309. else if (g_pStdItemSpecial[lpTItemRcd->nStdIndex].wStdMode == 11) // 咯磊渴
  1310. {
  1311. if (m_tFeature.btGender != 1)
  1312. {
  1313. LoadString(g_hInst, IDS_FEMALE_WEAR, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1314. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1315. SysMsg(szMsg, 0);
  1317. return FALSE;
  1318. }
  1319. }
  1320. }
  1321.    
  1322. if ((wWhere == U_WEAPON) || (wWhere == U_RIGHTHAND))
  1323. {
  1324. if (m_WAbility.MaxHandWeight < nWeight)
  1325. {
  1326. LoadString(g_hInst, IDS_NOTENOUGH_VALUE, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1327. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1328. SysMsg(szMsg, 0);
  1330. return FALSE;
  1331. }
  1332. }
  1333. else
  1334. {
  1335. if (m_WAbility.MaxWearWeight < nWeight + m_pUserInfo->CalcWearWeightEx(wWhere))
  1336. {
  1337. LoadString(g_hInst, IDS_NOTENOUGH_WEIGHT, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1338. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1339. SysMsg(szMsg, 0);
  1341. return FALSE;
  1342. }
  1343. }
  1345. switch (nNeed)
  1346. {
  1347. case 0:
  1348. if (m_WAbility.Level < nNeedLevel) goto _NOTENOUGH_VALUE;
  1349. break;
  1350. case 1:
  1351. if (HIBYTE(m_WAbility.DC) < nNeedLevel) goto _NOTENOUGH_VALUE;
  1352. break;
  1353. case 2:
  1354. if (HIBYTE(m_WAbility.MC) < nNeedLevel) goto _NOTENOUGH_VALUE;
  1355. break;
  1356. case 3:
  1357. if (HIBYTE(m_WAbility.SC) < nNeedLevel) goto _NOTENOUGH_VALUE;
  1358. break;
  1359. }
  1361. return TRUE;
  1363. _NOTENOUGH_VALUE:
  1365. LoadString(g_hInst, IDS_NOTENOUGH_VALUE, wszMsg, sizeof(wszMsg)/sizeof(TCHAR));
  1366. WideCharToMultiByte(CP_ACP, 0, wszMsg, -1, szMsg, sizeof(szMsg), NULL, NULL);
  1367. SysMsg(szMsg, 0);
  1369. return FALSE;
  1370. }
  1372. void CPlayerObject::ServerGetTakeOnGenItem(WORD wWhere, char *pszItemIndex)
  1373. {
  1374. _LPTGENERALITEMRCD lpTGenItemRcd = NULL;
  1375. _TDEFAULTMESSAGE DefMsg;
  1377. if (m_pUserInfo->m_lpTGenItemRcd.GetCount())
  1378. {
  1379. PLISTNODE pListNode = m_pUserInfo->m_lpTGenItemRcd.GetHead();
  1381. while (pListNode)
  1382. {
  1383. lpTGenItemRcd = m_pUserInfo->m_lpTGenItemRcd.GetData(pListNode);
  1385. if (memcmp(pszItemIndex, lpTGenItemRcd->szMakeIndex, _MAKEITEMINDEX) == 0)
  1386. {
  1387. memcpy(m_pUserInfo->m_THumanRcd.szTakeItem[wWhere], lpTGenItemRcd->szMakeIndex, _MAKEITEMINDEX);
  1389. RecalcAbilitys();
  1391. LONG lFeature = GetFeatureToLong();
  1393. AddProcess(this, RM_ABILITY, 0, 0, 0, 0, NULL);
  1394. AddProcess(this, RM_SUBABILITY, 0, 0, 0, 0, NULL);
  1396. fnMakeDefMessage(&DefMsg, SM_TAKEON_OK, lFeature, 0, 0, 0);
  1397. SendSocket(&DefMsg, NULL);
  1399. AddRefMsg(RM_FEATURECHANGED, 0, lFeature, 0, 0, NULL);
  1401. return;
  1402. }
  1404. pListNode = m_pUserInfo->m_lpTGenItemRcd.GetNext(pListNode);
  1405. }
  1406. }
  1408. fnMakeDefMessage(&DefMsg, SM_TAKEON_FAIL, 2, 0, 0, 0);
  1409. SendSocket(&DefMsg, NULL);
  1410. }
  1412. void CPlayerObject::ServerGetTakeOnItem(WORD wWhere, char *pszItemIndex)
  1413. {
  1414. _TDEFAULTMESSAGE DefMsg;
  1416. _LPTUSERITEMRCD lpTItemRcd = m_pUserInfo->GetItem(pszItemIndex);
  1418. if (lpTItemRcd)
  1419. {
  1420. if (CheckTakeOnItem(wWhere, lpTItemRcd))
  1421. {
  1422. memcpy(m_pUserInfo->m_THumanRcd.szTakeItem[wWhere], lpTItemRcd->szMakeIndex, _MAKEITEMINDEX);
  1424. switch (wWhere)
  1425. {
  1426. case U_DRESS:
  1427. m_tFeature.btWear = m_pUserInfo->GetDressFeature();
  1428. break;
  1429. case U_WEAPON:
  1430. m_tFeature.btWeapon = m_pUserInfo->GetWeaponFeature();
  1431. break;
  1432. }
  1434. RecalcAbilitys();
  1436. LONG lFeature = GetFeatureToLong();
  1438. AddProcess(this, RM_ABILITY, 0, 0, 0, 0, NULL);
  1439. AddProcess(this, RM_SUBABILITY, 0, 0, 0, 0, NULL);
  1441. fnMakeDefMessage(&DefMsg, SM_TAKEON_OK, lFeature, 0, 0, 0);
  1442. SendSocket(&DefMsg, NULL);
  1444. AddRefMsg(RM_FEATURECHANGED, 0, lFeature, 0, 0, NULL);
  1446. return;
  1447. }
  1448. else
  1449. {
  1450. fnMakeDefMessage(&DefMsg, SM_TAKEON_FAIL, 1, 0, 0, 0);
  1451. SendSocket(&DefMsg, NULL);
  1453. return;
  1454. }
  1455. }
  1457. fnMakeDefMessage(&DefMsg, SM_TAKEON_FAIL, 2, 0, 0, 0);
  1458. SendSocket(&DefMsg, NULL);
  1459. }
  1461. void CPlayerObject::ServerGetTakeOffItem(WORD wWhere, char *pszItemIndex)
  1462. {
  1463. _LPTUSERITEMRCD lpTItemRcd = NULL;
  1464. _TDEFAULTMESSAGE DefMsg;
  1466. // PLISTNODE pListNode = m_pUserInfo->m_lpTItemRcd.GetHead();
  1468. // while (pListNode)
  1469. // {
  1470. // lpTItemRcd = m_pUserInfo->m_lpTItemRcd.GetData(pListNode);
  1472. if (memcmp(m_pUserInfo->m_THumanRcd.szTakeItem[wWhere], pszItemIndex, _MAKEITEMINDEX) == 0)
  1473. {
  1474. ZeroMemory(m_pUserInfo->m_THumanRcd.szTakeItem[wWhere], _MAKEITEMINDEX);
  1475. memcpy(m_pUserInfo->m_THumanRcd.szTakeItem[wWhere], "0", 2);
  1477. switch (wWhere)
  1478. {
  1479. case U_DRESS:
  1480. m_tFeature.btWear = m_pUserInfo->GetDressFeature();
  1481. break;
  1482. case U_WEAPON:
  1483. m_tFeature.btWeapon = m_pUserInfo->GetWeaponFeature();
  1484. break;
  1485. }
  1487. RecalcAbilitys();
  1489. LONG lFeature = GetFeatureToLong();
  1491. AddProcess(this, RM_ABILITY, 0, 0, 0, 0, NULL);
  1492. AddProcess(this, RM_SUBABILITY, 0, 0, 0, 0, NULL);
  1494. fnMakeDefMessage(&DefMsg, SM_TAKEOFF_OK, lFeature, 0, 0, 0);
  1495. SendSocket(&DefMsg, NULL);
  1497. AddRefMsg(RM_FEATURECHANGED, 0, lFeature, 0, 0, NULL);
  1498. }
  1499. else
  1500. {
  1501. fnMakeDefMessage(&DefMsg, SM_TAKEOFF_FAIL, 1, 0, 0, 0);
  1502. SendSocket(&DefMsg, NULL);
  1503. }
  1504. }
  1506. void CPlayerObject::SendMapName()
  1507. {
  1508. if (m_pMap)
  1509. {
  1510. _TDEFAULTMESSAGE DefMsg;
  1511. char szEncodeMsg[256];
  1513. fnMakeDefMessage(&DefMsg, SM_MAPDESCRIPTION, 0, 0, 0, 0);
  1515. int nPos = fnEncode6BitBufA((unsigned char *)m_pMap->m_szMapTextName, szEncodeMsg, memlen(m_pMap->m_szMapTextName) - 1, sizeof(szEncodeMsg));
  1516. szEncodeMsg[nPos] = '';
  1518. SendSocket(&DefMsg, szEncodeMsg);
  1519. }
  1520. }
  1522. void CPlayerObject::SendNewMap()
  1523. {
  1524. if (m_pMap)
  1525. {
  1526. _TDEFAULTMESSAGE DefMsg;
  1527. char szEncodeMsg[256];
  1529. fnMakeDefMessage(&DefMsg, SM_NEWMAP, (int)this, m_nCurrX, m_nCurrY, MAKEWORD(DayBright(), m_pMap->m_btSeries));
  1531. int nPos = fnEncode6BitBufA((unsigned char *)m_pMap->m_szMapName, szEncodeMsg, memlen(m_pMap->m_szMapName) - 1, sizeof(szEncodeMsg));
  1532. szEncodeMsg[nPos] = '';
  1534. SendSocket(&DefMsg, szEncodeMsg);
  1535. }
  1536. }
  1538. BYTE CPlayerObject::DayBright()
  1539. {
  1540. int n;
  1541. //               begin
  1542. //                  if PEnvir.Darkness then n := 1
  1543. //                  else
  1544. if (m_btBright == 1)
  1545. n = 0;
  1546. else if (m_btBright == 3)
  1547. n = 1;
  1548. else
  1549. n = 2;
  1551. /*                  if PEnvir.DayLight then n := 0; */
  1553. return n;
  1554. }
  1556. void CPlayerObject::Run()
  1557. {
  1558. if (RestoreHealSpell())
  1559. Die();
  1561. // 家券 坷宏璃飘 八荤
  1562. if (m_xSlaveObjList.GetCount())
  1563. {
  1564. PLISTNODE pListNode = m_xSlaveObjList.GetHead();
  1566. while (pListNode)
  1567. {
  1568. CCharObject* pCharObject = m_xSlaveObjList.GetData(pListNode);
  1570. if (pCharObject)
  1571. {
  1572. if (pCharObject->m_fIsDead || pCharObject->m_fIsGhost || pCharObject->m_pMasterObject != this)
  1573. pListNode = m_xSlaveObjList.RemoveNode(pListNode);
  1574. else
  1575. pListNode = m_xSlaveObjList.GetNext(pListNode);
  1576. }
  1577. }
  1578. }
  1580. CCharObject::Run();
  1581. }
  1583. WORD CPlayerObject::GetThisCharColor()
  1584. {
  1585. return _CHAT_COLOR3;
  1586. }
  1588. void CPlayerObject::ServerGetButch(CCharObject* pCharObject, int nX, int nY, int nDir)
  1589. {
  1590. if ((abs(nX - m_nCurrX) <= 2) && (abs(nY - m_nCurrY) <= 2))
  1591. {
  1592. if (m_pMap->IsValidObject(nX, nY, 2, pCharObject))
  1593. {
  1594. CAnimalObject* pAnimalObject = dynamic_cast<CAnimalObject*>(pCharObject);
  1596. if (pAnimalObject)
  1597. {
  1598. if (pAnimalObject->m_fIsDead && !pAnimalObject->m_fSkeleton)
  1599. {
  1600. int n = 5 + rand() % 16;
  1601. int m = 100 + rand() % 201;
  1603. pAnimalObject->m_nMeatQuality -= n;
  1604. pAnimalObject->m_nBodyLeathery -= m;
  1606. if (pAnimalObject->m_nMeatQuality < 0) 
  1607. pAnimalObject->m_nMeatQuality = 0;
  1609. if (pAnimalObject->m_nBodyLeathery <= 0)
  1610. {
  1611. //               if (animal.RaceServer >= RC_ANIMAL) and (animal.RaceServer < RC_MONSTER) then begin  //荤娇鞍捞 绊扁甫林绰 巴父, 秦榜肺 函窃
  1612. //                  animal.BoSkeleton := TRUE;
  1613. //                  animal.ApplyMeatQuality;
  1614. //                  animal.SendRefMsg (RM_SKELETON, animal.Dir, animal.CX, animal.CY, 0, '')
  1615. //               end;
  1616. pAnimalObject->m_fSkeleton = TRUE;
  1617. pAnimalObject->AddRefMsg(RM_SKELETON, pAnimalObject->m_nDirection, pAnimalObject->m_nCurrX, pAnimalObject->m_nCurrY, 0, NULL);
  1619. // if (!pAnimalObject->TakeCretBagItems())
  1620. // SysMag("酒公巴档 掘瘤 给沁嚼聪促.", 0);
  1622. pAnimalObject->m_nBodyLeathery = 50;
  1623. }
  1625. m_dwDeathTime = GetTickCount();
  1626. }
  1627. }
  1628. }
  1630. m_nDirection = nDir;
  1631. }
  1633. AddRefMsg(RM_BUTCH, nDir, m_nCurrX, m_nCurrY, 0, NULL);
  1634. }
  1636. BOOL CPlayerObject::SpellXY(int nKey, int nTargetX, int nTargetY, int nTargetObj)
  1637. {
  1638. if (!m_pUserInfo) return FALSE;
  1640. _LPTHUMANMAGICRCD lptMagicRcd = m_pUserInfo->GetMagicRcdByKey(nKey);
  1642. if (lptMagicRcd)
  1643. {
  1644. CMagicInfo* pMagicInfo = GetMagicInfo(lptMagicRcd->btMagicID);
  1646. if (pMagicInfo)
  1647. {
  1648. int nSpellPoint = pMagicInfo->GetSpellPoint(lptMagicRcd->btLevel);
  1650. switch (lptMagicRcd->btMagicID)
  1651. {
  1652. case _SKILL_ERGUM:
  1653. {
  1654. if (!m_pUserInfo->m_fLongHitSkill)
  1655. {
  1656. m_pUserInfo->AllowLongHitSkill(TRUE);
  1657. SendSocket(NULL, "+LNG");
  1658. }
  1659. else
  1660. {
  1661. m_pUserInfo->AllowLongHitSkill(FALSE);
  1662. SendSocket(NULL, "+ULNG");
  1663. }
  1665. return TRUE;
  1666. }
  1667. case _SKILL_BANWOL:
  1668. {
  1669. if (!m_pUserInfo->m_fWideHitSkill)
  1670. {
  1671. m_pUserInfo->AllowWideHitSkill(TRUE);
  1672. SendSocket(NULL, "+WID");
  1673. }
  1674. else
  1675. {
  1676. m_pUserInfo->AllowWideHitSkill(FALSE);
  1677. SendSocket(NULL, "+UWID");
  1678. }
  1680. return TRUE;
  1681. }
  1682. case _SKILL_FIRESWORD:
  1683. {
  1684. if (m_pUserInfo->AllowFireHitSkill())
  1685. {
  1686. DamageSpell(nSpellPoint);
  1687. HealthSpellChanged();
  1689. SendSocket(NULL, "+FIR");
  1690. }
  1692. return TRUE;
  1693. }
  1694. }
  1696. if (m_WAbility.MP >= nSpellPoint)
  1697. {
  1698. DamageSpell(nSpellPoint);
  1699. HealthSpellChanged();
  1701. GetNextDirection(nTargetX, nTargetY);
  1703. switch (lptMagicRcd->btMagicID)
  1704. {
  1705. case _SKILL_HANGMAJINBUB:
  1706. case _SKILL_DEJIWONHO:
  1707. case _SKILL_FIRECHARM:
  1708. case _SKILL_FIRE:
  1709. case _SKILL_FIREBALL2:
  1710. case _SKILL_FIREBALL:
  1711. case _SKILL_BIGCLOAK:
  1712. case _SKILL_CLOAK:
  1713. AddRefMsg(RM_SPELL2, pMagicInfo->sEffect, nTargetX, nTargetY, pMagicInfo->nIndex, NULL);
  1714. break;
  1715. case _SKILL_MOOTEBO:
  1716. DoMotaebo();
  1717. return TRUE;
  1718. default:
  1719. AddRefMsg(RM_SPELL, pMagicInfo->sEffect, nTargetX, nTargetY, pMagicInfo->nIndex, NULL);
  1720. break;
  1721. }
  1723. return DoSpell(lptMagicRcd, nTargetX, nTargetY, (CCharObject*)nTargetObj);
  1724. }
  1725. } // if (pMagicInfo)
  1726. }
  1728. return FALSE;
  1729. }
  1731. BOOL CPlayerObject::DoSpell(_LPTHUMANMAGICRCD lptMagicRcd, int TargetX, int TargetY, CCharObject* pTargetObject)
  1732. {
  1733. BOOL fTrain = FALSE;
  1735. CMagicInfo* pMagicInfo = GetMagicInfo(lptMagicRcd->btMagicID);
  1737. if (!pMagicInfo) return FALSE;
  1739. switch (lptMagicRcd->btMagicID)
  1740. {
  1741. case _SKILL_SHOWHP: // 沤扁颇楷
  1742. {
  1743. if (!DoShowHP(pTargetObject, pMagicInfo, lptMagicRcd->btLevel))
  1744. return FALSE;
  1746. break;
  1747. }
  1748. case _SKILL_HEALLING: // 雀汗贱
  1749. {
  1750. if (!pTargetObject)
  1751. {
  1752. pTargetObject = (CCharObject*)this;
  1754. TargetX = m_nCurrX;
  1755. TargetY = m_nCurrY;
  1756. }
  1758. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow() + LOBYTE(m_WAbility.SC) * 2, lptMagicRcd->btLevel), 
  1759. (HIBYTE(m_WAbility.SC) - LOBYTE(m_WAbility.SC)) * 2 + 1);
  1761. if (pTargetObject->m_WAbility.HP < pTargetObject->m_WAbility.MaxHP)
  1762. {
  1763. pTargetObject->AddDelayProcess(this, RM_MAGHEALING, 0, nPwr, 0, 0, NULL, 800);
  1764. #ifdef _DEBUG
  1765. char szMsg[64];
  1767. sprintf(szMsg, "%s 雀汗矫糯 - PW:%d HP:%d", pTargetObject->m_szName, nPwr, pTargetObject->m_WAbility.HP);
  1768. SysMsg(szMsg, 0);
  1769. #endif
  1770. }
  1772. break;
  1773. }
  1774. case _SKILL_BIGHEALLING: // 措雀汗贱
  1775. {
  1776. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow() + LOBYTE(m_WAbility.SC) * 2, lptMagicRcd->btLevel), 
  1777. (HIBYTE(m_WAbility.SC) - LOBYTE(m_WAbility.SC)) * 2 + 1);
  1779. if (MagBigHealing(nPwr, TargetX, TargetY))
  1780. fTrain = TRUE;
  1782. break;
  1783. }
  1784. case _SKILL_LIGHTENING: // 碍拜
  1785. {
  1786. if (IsProperTarget(pTargetObject))
  1787. {
  1788. if (pTargetObject->m_btAntiMagic <= (rand() % 10))
  1789. {
  1790. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC), 
  1791. HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC) + 1);
  1793. if (pTargetObject->m_wObjectType & _OBJECT_ANIMAL)
  1794. {
  1795. fTrain = TRUE;
  1797. if (((CMonsterObject*)pTargetObject)->m_btLifeAttrib == LA_UNDEAD)
  1798. nPwr = ROUND(nPwr * 1.5);
  1799. }
  1801. AddDelayProcess(this, RM_DELAYMAGIC, nPwr, MAKELONG(TargetX, TargetY), 2, (int)pTargetObject, NULL, 1400);
  1802. }
  1803. else
  1804. pTargetObject = NULL;
  1805. }
  1807. break;
  1808. }
  1809. case _SKILL_FIREBALL: // 拳堪厘
  1810. case _SKILL_FIREBALL2: // 陛碍拳堪厘 
  1811. {
  1812. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC), 
  1813. HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC) + 1);
  1815. AddDelayProcess(this, RM_DELAYMAGIC, nPwr, MAKELONG(TargetX, TargetY), 2, (int)pTargetObject, NULL, 900);
  1816. /*         if user.MagCanHitTarget (user.CX, user.CY, target) then begin
  1817.     if user.IsProperTarget (target) then begin
  1818.        if (target.AntiMagic <= Random(10)) and (abs(target.CX-xx) <= 1) and (abs(target.CY-yy) <= 1) then begin
  1819.           with user do begin
  1820.              pwr := GetAttackPower (
  1821.                          GetPower (MPow(pum)) + Lobyte(WAbil.MC),
  1822.                          ShortInt(Hibyte(WAbil.MC)-Lobyte(WAbil.MC)) + 1
  1823.                       );
  1824.              //pwr := GetPower (MPow(pum)) + (Lobyte(WAbil.MC) + Random(Hibyte(WAbil.MC)-Lobyte(WAbil.MC) + 1));
  1825.              //鸥百 嘎澜, 饶俊 瓤苞唱鸥巢
  1826.              //target.SendDelayMsg (user, RM_MAGSTRUCK, 0, pwr, 0, 0, '', 1200 + _MAX(Abs(CX-xx),Abs(CY-yy)) * 50 );
  1827.           end;
  1828.           //rm-delaymagic俊辑 selecttarget阑 贸府茄促.
  1829.           user.SendDelayMsg (user, RM_DELAYMAGIC, pwr, MakeLong(xx, yy), 2, integer(target), '', 600);
  1830.           if (target.RaceServer >= RC_ANIMAL) then train := TRUE;
  1831.        end else
  1832.           target := nil;
  1833.     end else
  1834.        target := nil;
  1835.  end else
  1836.     target := nil; */
  1837. break;
  1838. }
  1839. case _SKILL_FIREWIND: // 拳堪浅
  1840. {
  1841. if (MagPushArround(3) > 0) fTrain = TRUE;
  1843. break;
  1844. }
  1845. case _SKILL_FIRE: // 堪荤厘
  1846. {
  1847. int nX = 0, nY = 0;
  1849. int nDir = GetNextDirection(TargetX, TargetY);
  1851. if (GetNextPosition(nDir, 1, nX, nY))
  1852. {
  1853. GetNextPosition(nDir, 5, TargetX, TargetY);
  1855. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC), 
  1856. HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC) + 1);
  1858. if (MagPassThroughMagic(nX, nY, TargetX, TargetY, nDir, nPwr, FALSE) > 0)
  1859. fTrain = TRUE;
  1860. }
  1862. break;
  1863. }
  1864. case _SKILL_SHOOTLIGHTEN: // 汾牢厘
  1865. {
  1866. int nX = 0, nY = 0;
  1868. int nDir = GetNextDirection(TargetX, TargetY);
  1870. if (GetNextPosition(nDir, 1, nX, nY))
  1871. {
  1872. GetNextPosition(nDir, 8, TargetX, TargetY);
  1874. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC), 
  1875. HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC) + 1);
  1877. if (MagPassThroughMagic(nX, nY, TargetX, TargetY, nDir, nPwr, TRUE) > 0)
  1878. fTrain = TRUE;
  1879. }
  1881. break;
  1882. }
  1883. case _SKILL_SHIELD: // 林贱狼阜
  1884. {
  1885. if (MagBubbleDefenceUp(lptMagicRcd->btLevel, pMagicInfo->GetPower(15 + GetRPow(m_WAbility.MC), lptMagicRcd->btLevel)))
  1886. fTrain = TRUE;
  1888. break;
  1889. }
  1890. case _SKILL_EATTHFIRE: // 瘤堪贱
  1891. {
  1892. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC), 
  1893. HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC) + 1);
  1895. if (MagMakeFireCross(nPwr, pMagicInfo->GetPower(10, lptMagicRcd->btLevel) + GetRPow(m_WAbility.MC) / 2, TargetX, TargetY))
  1896. fTrain = TRUE;
  1898. break;
  1899. }
  1900. case _SKILL_FIREBOOM: // 气凯颇
  1901. case _SKILL_SNOWWIND: // 葫汲浅
  1902. {
  1903. if (MagBigExplosion(GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC), 
  1904. HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC) + 1), 
  1905. TargetX, TargetY, 1))
  1906. fTrain = TRUE;
  1908. break;
  1909. }
  1910. case _SKILL_AMYOUNSUL:
  1911. case _SKILL_HANGMAJINBUB:
  1912. case _SKILL_DEJIWONHO:
  1913. case _SKILL_CLOAK:
  1914. case _SKILL_FIRECHARM:
  1915. case _SKILL_HOLYSHIELD:
  1916. case _SKILL_BIGCLOAK:
  1917. case _SKILL_SKELLETON:
  1918. {
  1919. if (_LPTGENERALITEMRCD lptItem = m_pUserInfo->CanUseBujuk())
  1920. {
  1921. if (lptItem->nDura >= 1)
  1922. {
  1923. lptItem->nDura--;
  1925. AddProcess(this, RM_DURACHANGE, U_ARMRINGL, lptItem->nDura, lptItem->nDuraMax, 0);
  1927. switch (lptMagicRcd->btMagicID)
  1928. {
  1929. case _SKILL_HANGMAJINBUB: // 亲付柳过
  1930. {
  1931. int nPwr = GetAttackPower(pMagicInfo->GetPower13(60, lptMagicRcd->btLevel) + 5 * LOBYTE(m_WAbility.SC),
  1932. 5 * (HIBYTE(m_WAbility.SC) - LOBYTE(m_WAbility.SC)) + 1);
  1934. if (MagMakeDefenceArea(TargetX, TargetY, 3, nPwr, STATE_MAGDEFENCEUP))
  1935. fTrain = TRUE;
  1937. break;
  1938. }
  1939. case _SKILL_DEJIWONHO: // 措瘤盔龋
  1940. {
  1941. int nPwr = GetAttackPower(pMagicInfo->GetPower13(60, lptMagicRcd->btLevel) + 5 * LOBYTE(m_WAbility.SC),
  1942. 5 * (HIBYTE(m_WAbility.SC) - LOBYTE(m_WAbility.SC)) + 1);
  1944. if (MagMakeDefenceArea(TargetX, TargetY, 3, nPwr, STATE_DEFENCEUP))
  1945. fTrain = TRUE;
  1947. break;
  1948. }
  1949. case _SKILL_CLOAK: // 篮脚贱
  1950. {
  1951. if (MagMakePrivateTransparent(pMagicInfo->GetPower13(30, lptMagicRcd->btLevel) + 3 * GetRPow(m_WAbility.SC)))
  1952. fTrain = TRUE;
  1954. break;
  1955. }
  1956. case _SKILL_BIGCLOAK: // 措篮脚贱
  1957. {
  1958. if (MagMakeGroupTransparent(TargetX, TargetY, pMagicInfo->GetPower13(30, lptMagicRcd->btLevel) + 3 * GetRPow(m_WAbility.SC)))
  1959. fTrain = TRUE;
  1961. break;
  1962. }
  1963. case _SKILL_FIRECHARM: // 气混拌
  1964. {
  1965. int nPwr = GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.SC), 
  1966. HIBYTE(m_WAbility.SC) - LOBYTE(m_WAbility.SC) + 1);
  1968. AddDelayProcess(this, RM_DELAYMAGIC, nPwr, MAKELONG(TargetX, TargetY), 2, (int)pTargetObject, NULL, 900);
  1970. break;
  1971. }
  1972. case _SKILL_HOLYSHIELD: // 搬拌
  1973. {
  1974. if (MagMakeHolyCurtain(pMagicInfo->GetPower13(40, lptMagicRcd->btLevel) + 3 * GetRPow(m_WAbility.SC), TargetX, TargetY) > 0)
  1975. fTrain = TRUE;
  1977. break;
  1978. }
  1979. case _SKILL_SKELLETON: // 归榜家券贱
  1980. {
  1981. int nX, nY;
  1983. GetFrontPosition(nX, nY);
  1985. if (MakeSlave(94, nX, nY, lptMagicRcd->btLevel, 1, 48 * 60 * 60))
  1986. fTrain = TRUE;
  1988. break;
  1989. }
  1990. }
  1991. }
  1992. else
  1993. return FALSE;
  1994. }
  1995. else
  1996. return FALSE;
  1998. break;
  1999. }
  2000. case _SKILL_SINSU: // 脚荐家券
  2001. {
  2002. if (_LPTGENERALITEMRCD lptItem = m_pUserInfo->CanUseBujuk())
  2003. {
  2004. if (lptItem->nDura >= 5)
  2005. {
  2006. lptItem->nDura -= 5;
  2008. AddProcess(this, RM_DURACHANGE, U_ARMRINGL, lptItem->nDura, lptItem->nDuraMax, 0);
  2010. if (GetAvailablePosition(m_pMap, TargetX, TargetY, 3))
  2011. {
  2012. AddDelayProcess(this, RM_MAKESLAVE, 161, TargetX, TargetY, lptMagicRcd->btLevel, NULL, 1200);
  2013. fTrain = TRUE;
  2014. }
  2015. else
  2016. return FALSE;
  2017. }
  2018. else
  2019. return FALSE;
  2020. }
  2021. else
  2022. return FALSE;
  2024. break;
  2025. }
  2026. case _SKILL_KILLUNDEAD:
  2027. {
  2028. if (pTargetObject)
  2029. {
  2030. if (IsProperTarget(pTargetObject))
  2031. {
  2032. // if (MagTurnUnDead(pTargetObject, TargetX, TargetY, lptMagicRcd->btLevel))
  2033. MagTurnUndead(pTargetObject, TargetX, TargetY, lptMagicRcd->btLevel);
  2034. fTrain = TRUE;
  2035. }
  2036. }
  2038. break;
  2039. }
  2040. case _SKILL_TAMMING:
  2041. break;
  2042. case _SKILL_LIGHTFLOWER:
  2043. {
  2044. if (MagElecBlizzard(GetAttackPower(pMagicInfo->GetPower(pMagicInfo->MPow(), lptMagicRcd->btLevel) + LOBYTE(m_WAbility.MC),
  2045. (HIBYTE(m_WAbility.MC) - LOBYTE(m_WAbility.MC)) + 1)))
  2046. fTrain = TRUE;
  2048. break;
  2049. }
  2050. }
  2052. /*   if not nofire then begin
  2053.       with user do begin
  2054.          if needfire then
  2055.             SendRefMsg (RM_MAGICFIRE, 0, MakeWord(pum.pDef.EffectType, pum.pDef.Effect), MakeLong(xx, yy), integer(target), '');
  2056.          //嘎篮 惑措
  2057.          if (pum.Level < 3) and train then
  2058.             if Abil.Level >= pum.pDef.NeedLevel[pum.Level] then begin
  2059.                //荐访饭骇俊 档崔茄 版快
  2060.                user.TrainSkill (pum, 1 + Random(3));
  2061.                if not CheckMagicLevelup (pum) then
  2062.                   SendDelayMsg (user, RM_MAGIC_LVEXP, 0, pum.pDef.MagicId, pum.Level, pum.CurTrain, '', 1000);
  2063.             end;
  2064.       end;
  2065.       Result := TRUE;
  2066.    end; */
  2068. AddRefMsg(RM_MAGICFIRE, 0, lptMagicRcd->btMagicID, MAKELONG(TargetX, TargetY), (LONG)pTargetObject, NULL);
  2070. if (lptMagicRcd->btLevel < 3)
  2071. {
  2072. if (m_Ability.Level >= pMagicInfo->sNeed[lptMagicRcd->btLevel])
  2073. TrainSkill(lptMagicRcd, 1 + (rand() % 3));
  2074. }
  2076. return TRUE;
  2077. }
  2079. void CPlayerObject::TrainSkill(_LPTHUMANMAGICRCD lptMagicRcd, int nTrain)
  2080. {
  2081. if (m_fFastTrain)
  2082. lptMagicRcd->nCurrTrain += (nTrain * 3);
  2083. else
  2084. lptMagicRcd->nCurrTrain += nTrain;
  2085. }
  2087. BOOL CPlayerObject::MakeSlave(int nMonRace, int nX, int nY, int nLevel, int nMax, DWORD dwRoyaltySec)
  2088. {
  2089. CMonRaceInfo* pMonRaceInfo = &g_pMonRaceInfo[nMonRace];
  2091. if (pMonRaceInfo)
  2092. {
  2093. CMonsterObject* pMonsterObject = (CMonsterObject*)AddCreatureSysop(nX, nY, pMonRaceInfo, FALSE);
  2095. if (pMonsterObject)
  2096. {
  2097. pMonsterObject->m_pMasterObject = this;
  2099. m_xSlaveObjList.AddNewNode(pMonsterObject);
  2100. /*         mon.MasterRoyaltyTime := GetTickCount + longword(royaltysec) * 1000;
  2101.          mon.SlaveMakeLevel := slevel;
  2102.          mon.SlaveExpLevel := slevel;
  2103.          mon.RecalcAbilitys; //ApplySlaveLevelAbilitys;
  2104.          if mon.WAbil.HP < mon.WAbil.MaxHP then begin
  2105.             mon.WAbil.HP := mon.WAbil.HP + (mon.WAbil.MaxHP - mon.WAbil.HP) div 2;
  2106.          end;
  2107.          mon.ChangeNameColor;
  2108.          SlaveList.Add (mon);
  2109.          Result := mon;
  2110.  */
  2111. return TRUE;
  2112. }
  2113. }
  2115. return FALSE;
  2116. }
  2118. void CPlayerObject::Operate()
  2119. {
  2120. if (!m_pUserInfo) return;
  2122. if (m_pUserInfo->m_fFireHitSkill)
  2123. {
  2124. if (GetTickCount() - m_pUserInfo->m_dwLatestFireHitTime > 20 * 1000)
  2125. {
  2126. TCHAR szText[64];
  2127. char szMsg[64];
  2129. m_pUserInfo->m_fFireHitSkill = FALSE;
  2131. LoadString(g_hInst, IDS_TIMEOUT_FIREHIT, szText, sizeof(szText)/sizeof(TCHAR));
  2132. WideCharToMultiByte(CP_ACP, 0, szText, -1, szMsg, sizeof(szMsg), NULL, NULL);
  2133. SysMsg(szMsg, 0);
  2135. SendSocket(NULL, "+UFIR");
  2136. }
  2137. }
  2139. if (m_nEvent >= 0)
  2140. {
  2141. if ((m_nEvent >= 0) && (m_nEvent < g_nNumOfMoveMapEventInfo))
  2142. {
  2143. CMirMap* pMirMap = GetMap(g_pMoveMapEventInfo[m_nEvent].szDMapFileName);
  2145. if (pMirMap)
  2146. SpaceMove(g_pMoveMapEventInfo[m_nEvent].nDX, g_pMoveMapEventInfo[m_nEvent].nDY, pMirMap);
  2148. m_nEvent = -1;
  2149. }
  2150. }
  2152. Run();
  2154. int nCount = m_DelayProcessQ.GetCount();
  2155. int nPos;
  2157. _TDEFAULTMESSAGE DefMsg;
  2158. _LPTPROCESSMSG lpProcessMsg;
  2160. if (nCount)
  2161. {
  2162. for (int i = 0; i < nCount; i++)
  2163. {
  2164. lpProcessMsg = (_LPTPROCESSMSG)m_DelayProcessQ.PopQ();
  2166. if (lpProcessMsg)
  2167. {
  2168. if (GetTickCount() < lpProcessMsg->dwDeliveryTime)
  2169. {
  2170. m_DelayProcessQ.PushQ((BYTE *)lpProcessMsg);
  2171. continue;
  2172. }
  2174. switch (lpProcessMsg->wIdent)
  2175. {
  2176. case RM_MAGIC_LVEXP:
  2177. {
  2178. fnMakeDefMessage(&DefMsg, SM_MAGIC_LVEXP, lpProcessMsg->lParam3, 
  2179. (WORD)lpProcessMsg->lParam2, (WORD)lpProcessMsg->lParam1, 0);
  2180. SendSocket(&DefMsg, NULL);
  2182. break;
  2183. }
  2184. case RM_STRUCK:
  2185. {
  2186. lpProcessMsg->pCharObject->AddRefMsg(RM_STRUCK, lpProcessMsg->wParam, lpProcessMsg->lParam1, 
  2187. lpProcessMsg->lParam2, lpProcessMsg->lParam3, NULL);
  2188. break;
  2189. }
  2190. case RM_DOOPENHEALTH:
  2191. {
  2192. MakeOpenHealth();
  2193. break;
  2194. }
  2195. case RM_MAGHEALING:
  2196. {
  2197. if (m_IncHealing + lpProcessMsg->lParam1 < 300)
  2198. {
  2199. m_IncHealing += (BYTE)lpProcessMsg->lParam1;
  2200. m_btPerHealing = 5;
  2201. }
  2202. else
  2203. {
  2204. m_IncHealing = 300;
  2205. }
  2207. break;
  2208. }
  2209. case RM_DELAYMAGIC:
  2210. {
  2211. CCharObject* pTargetObject = (CCharObject*)lpProcessMsg->lParam3;
  2212. int nMagPower = lpProcessMsg->wParam;
  2214. if (pTargetObject)
  2215. {
  2216. int n = pTargetObject->GetMagStruckDamage(nMagPower);
  2218. if (n > 0)
  2219. {
  2220. SelectTarget(pTargetObject);
  2222. if (pTargetObject->m_wObjectType & _OBJECT_ANIMAL)
  2223. nMagPower = ROUND(nMagPower * 1.2);
  2225. // Debug Code
  2226. char szMsg[64];
  2228. sprintf(szMsg, "%s 付过 嘎澜 - PW:%d", pTargetObject->m_szName, nMagPower);
  2229. SysMsg(szMsg, 0);
  2230. // Debug Code
  2232. if ((abs(LOWORD(lpProcessMsg->lParam1) - pTargetObject->m_nCurrX) <= (int)lpProcessMsg->lParam2) &&
  2233. (abs(HIWORD(lpProcessMsg->lParam1) - pTargetObject->m_nCurrY) <= (int)lpProcessMsg->lParam2))
  2234. pTargetObject->AddProcess(this, RM_MAGSTRUCK, 0, nMagPower, 0, 0, NULL);
  2235. }
  2236. }
  2238. break;
  2239. }
  2240. case RM_MAGSTRUCK:
  2241. {
  2242. AddProcess(lpProcessMsg->pCharObject, lpProcessMsg->wIdent, lpProcessMsg->wParam, lpProcessMsg->lParam1, 
  2243. lpProcessMsg->lParam2, lpProcessMsg->lParam3, NULL);
  2244. break;
  2245. }
  2246. case RM_TRANSPARENT:
  2247. {
  2248. lpProcessMsg->pCharObject->MagMakePrivateTransparent(lpProcessMsg->lParam1);
  2249. break;
  2250. }
  2251. case RM_MAKESLAVE:
  2252. {
  2253. MakeSlave(lpProcessMsg->wParam, lpProcessMsg->lParam1, lpProcessMsg->lParam2, lpProcessMsg->lParam3, 1, 48 * 60 * 60);
  2255. break;
  2256. }
  2257. } // switch
  2259. delete lpProcessMsg;
  2260. lpProcessMsg = NULL;
  2261. }
  2262. }
  2263. }
  2265. nCount = m_ProcessQ.GetCount();
  2267. if (nCount)
  2268. {
  2269. char szEncodeMsg[256];
  2270. _TMESSAGEBODYWL MsgBodyWL;
  2271. _TSHORTMSSEAGE tsMsg;
  2272. _TCHARDESC CharDesc;
  2274. for (int i = 0; i < nCount; i++)
  2275. {
  2276. // EnterCriticalSection(&m_cs);
  2277. lpProcessMsg = (_LPTPROCESSMSG)m_ProcessQ.PopQ();
  2278. // LeaveCriticalSection(&m_cs);
  2280. //#ifdef _DEBUG
  2281. // _RPT4(_CRT_WARN, "CPlayerObject::Operate - %d, %d, %d, %d", lpProcessMsg->wIdent, lpProcessMsg->wParam, lpProcessMsg->lParam1, lpProcessMsg->lParam2);
  2282. // _RPT1(_CRT_WARN, " %d n", lpProcessMsg->lParam3);
  2283. //#endif
  2284. if (lpProcessMsg)
  2285. {
  2286. switch (lpProcessMsg->wIdent)
  2287. {
  2288. case CM_TURN:
  2289. {
  2290. if (!m_fIsDead)
  2291. {
  2292. if (TurnXY(lpProcessMsg->lParam1, lpProcessMsg->lParam2, lpProcessMsg->wParam)) // x, y, dir
  2293. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2294. else
  2295. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2296. }
  2297. else
  2298. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2300. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2301. SendSocket(NULL, szEncodeMsg);
  2303. break;
  2304. }
  2305. case CM_WALK:
  2306. {
  2307. if (!m_fIsDead)
  2308. {
  2309. // if (WalkXY(lpProcessMsg->lParam1, lpProcessMsg->lParam2, lpProcessMsg->wParam))
  2310. if (WalkTo(lpProcessMsg->wParam)) // dir
  2311. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2312. else
  2313. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2314. }
  2315. else
  2316. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2318. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2319. SendSocket(NULL, szEncodeMsg);
  2321. break;
  2322. }
  2323. case CM_RUN:
  2324. {
  2325. if (!m_fIsDead)
  2326. {
  2327. // if (RunXY(lpProcessMsg->lParam1, lpProcessMsg->lParam2, lpProcessMsg->wParam))
  2328. if (RunTo(lpProcessMsg->wParam)) // dir
  2329. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2330. else
  2331. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2332. }
  2333. else
  2334. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2336. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2337. SendSocket(NULL, szEncodeMsg);
  2339. break;
  2340. }
  2341. case CM_HIT:
  2342. case CM_LONGHIT:
  2343. case CM_WIDEHIT:
  2344. case CM_FIREHIT:
  2345. case CM_POWERHIT:
  2346. {
  2347. if (!m_fIsDead)
  2348. {
  2349. if (HitXY(lpProcessMsg->wIdent, lpProcessMsg->lParam1, lpProcessMsg->lParam2, lpProcessMsg->wParam, lpProcessMsg->lParam3))
  2350. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2351. else
  2352. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2353. }
  2354. else
  2355. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2357. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2358. SendSocket(NULL, szEncodeMsg);
  2360. break;
  2361. }
  2362. case CM_RIDE:
  2363. {
  2364. if (!m_fIsDead)
  2365. {
  2366. if (DoRideHorse(lpProcessMsg->wParam, lpProcessMsg->lParam1))
  2367. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2368. else
  2369. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2370. }
  2371. else
  2372. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2374. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2375. SendSocket(NULL, szEncodeMsg);
  2377. break;
  2378. }
  2379. case CM_SAY:
  2380. {
  2381. if (lpProcessMsg->pszData)
  2382. ProcessForUserSaid(lpProcessMsg->pszData);
  2383. break;
  2384. }
  2385. case CM_SPELL:
  2386. {
  2387. if (!m_fIsDead)
  2388. {
  2389. if (SpellXY(lpProcessMsg->wParam, lpProcessMsg->lParam1, lpProcessMsg->lParam2, lpProcessMsg->lParam3))
  2390. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2391. else
  2392. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2393. }
  2394. else
  2395. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2397. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2398. SendSocket(NULL, szEncodeMsg);
  2400. break;
  2401. }
  2402. case CM_SITDOWN:
  2403. {
  2404. if (!m_fIsDead)
  2405. memmove(szEncodeMsg, _MSG_GOOD, sizeof(_MSG_GOOD));
  2406. else
  2407. memmove(szEncodeMsg, _MSG_FAIL, sizeof(_MSG_FAIL));
  2409. ValToAnsiStr(GetTickCount(), &szEncodeMsg[sizeof(_MSG_GOOD) - 1]);
  2410. SendSocket(NULL, szEncodeMsg);
  2412. break;
  2413. }
  2414. case CM_TAKEONITEM:
  2415. {
  2416. if (lpProcessMsg->pszData)
  2417. {
  2418. char szDecodeData[16];
  2420. nPos = fnDecode6BitBufA(lpProcessMsg->pszData, szDecodeData, 12);
  2421. szDecodeData[nPos] = '';
  2423. if (szDecodeData[0] == 'G')
  2424. ServerGetTakeOnGenItem((WORD)lpProcessMsg->lParam2, szDecodeData);
  2425. else
  2426. ServerGetTakeOnItem((WORD)lpProcessMsg->lParam2, szDecodeData);
  2427. }
  2429. break;
  2430. }
  2431. case CM_TAKEOFFITEM:
  2432. {
  2433. if (lpProcessMsg->pszData)
  2434. {
  2435. char szDecodeData[16];
  2437. nPos = fnDecode6BitBufA(lpProcessMsg->pszData, szDecodeData, 12);
  2438. szDecodeData[nPos] = '';
  2440. ServerGetTakeOffItem((WORD)lpProcessMsg->lParam2, szDecodeData);
  2441. }
  2443. break;
  2444. }
  2445. case CM_QUERYUSERNAME:
  2446. {
  2447. GetQueryUserName((CCharObject*)lpProcessMsg->lParam1, lpProcessMsg->lParam2/*x*/, lpProcessMsg->lParam3/*y*/);
  2448. break;
  2449. }
  2450. case CM_QUERYBAGITEMS:
  2451. {
  2452. SendBagItems();
  2454. break;
  2455. }
  2456. case CM_EAT:
  2457. {
  2458. if (lpProcessMsg->pszData)
  2459. {
  2460. char szDecodeData[16];
  2462. nPos = fnDecode6BitBufA(lpProcessMsg->pszData, szDecodeData, 12);
  2463. szDecodeData[nPos] = '';
  2465. ServerGetEatItem(lpProcessMsg->wParam, szDecodeData);
  2466. }
  2468. break;
  2469. }
  2470. case CM_MAGICKEYCHANGE:
  2471. {
  2472. ServerGetMagicKeyChange(lpProcessMsg->wParam, lpProcessMsg->lParam1);
  2473. break;
  2474. }
  2475. case CM_DROPITEM:
  2476. {
  2477. char szDecodeData[16];
  2478. BOOL fFlag = FALSE;
  2480. if (lpProcessMsg->pszData)
  2481. {
  2482. nPos = fnDecode6BitBufA(lpProcessMsg->pszData, szDecodeData, 12);
  2483. szDecodeData[nPos] = '';
  2485. if (szDecodeData[0] == 'G')
  2486. {
  2487. if (m_pUserInfo->UserDropGenItem(lpProcessMsg->wParam, szDecodeData))
  2488. fFlag = TRUE;
  2489. }
  2490. else
  2491. {
  2492. if (m_pUserInfo->UserDropItem(lpProcessMsg->wParam, szDecodeData))
  2493. fFlag = TRUE;
  2494. }
  2496. if (fFlag)
  2497. fnMakeDefMessage(&DefMsg, SM_DROPITEM_SUCCESS, 0, lpProcessMsg->wParam, 0, 0);
  2498. else
  2499. fnMakeDefMessage(&DefMsg, SM_DROPITEM_FAIL, 0, lpProcessMsg->wParam, 0, 0);
  2500. }
  2501. else
  2502. fnMakeDefMessage(&DefMsg, SM_DROPITEM_FAIL, 0, lpProcessMsg->wParam, 0, 0);
  2504. nPos = fnEncode6BitBufA((unsigned char *)szDecodeData, szEncodeMsg, 12, sizeof(szEncodeMsg));
  2505. szEncodeMsg[nPos] = '';
  2507. SendSocket(&DefMsg, szEncodeMsg);
  2509. break;
  2510. }
  2511. case CM_PICKUP:
  2512. {
  2513. if ((m_nCurrX == (int)lpProcessMsg->lParam3) && (m_nCurrY == (int)lpProcessMsg->lParam2))
  2514. PickUp();
  2516. break;
  2517. }
  2518. case CM_BUTCH:
  2519. {
  2520. ServerGetButch((CCharObject*)lpProcessMsg->lParam1, lpProcessMsg->lParam2/*x*/, lpProcessMsg->lParam3/*y*/, lpProcessMsg->wParam); 
  2521. break;
  2522. }
  2523. case RM_LOGON:
  2524. {
  2525. SendNewMap();
  2527. fnMakeDefMessage(&DefMsg, SM_LOGON, (int)this, 
  2528. (unsigned short)m_nCurrX, (unsigned short)m_nCurrY, MAKEWORD(m_nDirection, lpProcessMsg->pCharObject->m_btLight));
  2530. nPos =  fnEncode6BitBufA((unsigned char *)&lpProcessMsg->pCharObject->m_tFeature, szEncodeMsg, sizeof(_TOBJECTFEATURE), sizeof(szEncodeMsg));
  2531. nPos += fnEncode6BitBufA((unsigned char *)&((CPlayerObject *)lpProcessMsg->pCharObject)->m_tFeatureEx, &szEncodeMsg[nPos], sizeof(_TOBJECTFEATUREEX), sizeof(szEncodeMsg) - nPos);
  2532. szEncodeMsg[nPos] = '';
  2534. SendSocket(&DefMsg, szEncodeMsg);
  2536. GetQueryUserName(this, m_nCurrX, m_nCurrY);
  2538. SendMapName();
  2540. break;
  2541. }
  2542. case RM_HEAR:
  2543. case RM_CRY:
  2544. case RM_WHISPER:
  2545. case RM_SYSMESSAGE:
  2546. case RM_SYSMESSAGE2:
  2547. case RM_GROUPMESSAGE:
  2548. case RM_GUILDMESSAGE:
  2549. case RM_MERCHANTSAY:
  2550. case RM_MONSTERSAY:
  2551. {
  2552. if (lpProcessMsg->pszData)
  2553. {
  2554. switch (lpProcessMsg->wIdent)
  2555. {
  2556. case RM_HEAR:
  2557. fnMakeDefMessage(&DefMsg, SM_HEAR, (int)lpProcessMsg->pCharObject, _CHAT_COLOR3, _CHAT_COLOR1, 0);
  2558. break;
  2559. case RM_CRY:
  2560. fnMakeDefMessage(&DefMsg, SM_HEAR, (int)lpProcessMsg->pCharObject, _CHAT_COLOR1, _CHAT_COLOR7, 0);
  2561. break;
  2562. case RM_WHISPER:
  2563. fnMakeDefMessage(&DefMsg, SM_WHISPER, (int)lpProcessMsg->pCharObject, 7, _CHAT_COLOR1, 0);
  2564. break;
  2565. case RM_SYSMESSAGE:
  2566. fnMakeDefMessage(&DefMsg, SM_SYSMESSAGE, (int)lpProcessMsg->pCharObject, _CHAT_COLOR3, _CHAT_COLOR8, 0);
  2567. break;
  2568. case RM_SYSMESSAGE2:
  2569. fnMakeDefMessage(&DefMsg, SM_SYSMESSAGE, (int)lpProcessMsg->pCharObject, _CHAT_COLOR3, _CHAT_COLOR4, 0);
  2570. break;
  2571. case RM_GROUPMESSAGE:
  2572. fnMakeDefMessage(&DefMsg, SM_SYSMESSAGE, (int)lpProcessMsg->pCharObject, _CHAT_COLOR3, _CHAT_COLOR1, 0);
  2573. break;
  2574. case RM_GUILDMESSAGE:
  2575. fnMakeDefMessage(&DefMsg, SM_GUILDMESSAGE, (int)lpProcessMsg->pCharObject, _CHAT_COLOR3, _CHAT_COLOR1, 0);
  2576. break;
  2577. case RM_MERCHANTSAY:
  2578. fnMakeDefMessage(&DefMsg, SM_MERCHANTSAY, (int)lpProcessMsg->pCharObject, 0, 0, 1);
  2579. break;
  2580. case RM_MONSTERSAY:
  2581. fnMakeDefMessage(&DefMsg, SM_MONSTERSAY, (int)lpProcessMsg->pCharObject, _CHAT_COLOR3, _CHAT_COLOR1, 0);
  2582. break;
  2583. }
  2585. nPos = fnEncode6BitBufA((unsigned char *)lpProcessMsg->pszData, szEncodeMsg, memlen(lpProcessMsg->pszData), sizeof(szEncodeMsg));
  2586. szEncodeMsg[nPos] = '';
  2588. SendSocket(&DefMsg, szEncodeMsg);
  2589. }
  2591. break;
  2592. }
  2593. case RM_RIDE:
  2594. {
  2595. break;
  2596. }
  2597. case RM_TURN:
  2598. {
  2599. if (lpProcessMsg->pCharObject != this)
  2600. {
  2601. fnMakeDefMessage(&DefMsg, SM_TURN, (int)lpProcessMsg->pCharObject, 
  2602. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, MAKEWORD(lpProcessMsg->wParam, lpProcessMsg->pCharObject->m_btLight));
  2604. CharDesc.Feature = lpProcessMsg->pCharObject->GetFeatureToLong();
  2605. CharDesc.Status = lpProcessMsg->pCharObject->m_nCharStatus;
  2607. nPos =  fnEncode6BitBufA((unsigned char *)&CharDesc, szEncodeMsg, sizeof(_TCHARDESC), sizeof(szEncodeMsg));
  2609. if (lpProcessMsg->pCharObject->m_wObjectType & _OBJECT_HUMAN)
  2610. nPos += fnEncode6BitBufA((unsigned char *)&((CPlayerObject *)lpProcessMsg->pCharObject)->m_tFeatureEx, &szEncodeMsg[nPos], sizeof(_TOBJECTFEATUREEX), sizeof(szEncodeMsg) - nPos);
  2612. if (lpProcessMsg->pszData)
  2613. nPos += fnEncode6BitBufA((unsigned char *)lpProcessMsg->pszData, &szEncodeMsg[nPos], memlen(lpProcessMsg->pszData) - 1, sizeof(szEncodeMsg) - nPos);
  2615. szEncodeMsg[nPos] = '';
  2617. SendSocket(&DefMsg, szEncodeMsg);
  2618. }
  2620. break;
  2621. }
  2622. case RM_WALK:
  2623. {
  2624. if (lpProcessMsg->pCharObject != this)
  2625. {
  2626. fnMakeDefMessage(&DefMsg, SM_WALK, (int)lpProcessMsg->pCharObject, 
  2627. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, MAKEWORD(lpProcessMsg->wParam, lpProcessMsg->pCharObject->m_btLight));
  2629. CharDesc.Feature = lpProcessMsg->pCharObject->GetFeatureToLong();
  2630. CharDesc.Status = lpProcessMsg->pCharObject->m_nCharStatus;
  2632. nPos =  fnEncode6BitBufA((unsigned char *)&CharDesc, szEncodeMsg, sizeof(_TCHARDESC), sizeof(szEncodeMsg));
  2634. if (lpProcessMsg->pCharObject->m_wObjectType & _OBJECT_HUMAN)
  2635. nPos += fnEncode6BitBufA((unsigned char *)&((CPlayerObject *)lpProcessMsg->pCharObject)->m_tFeatureEx, &szEncodeMsg[nPos], sizeof(_TOBJECTFEATUREEX), sizeof(szEncodeMsg) - nPos);
  2637. szEncodeMsg[nPos] = '';
  2639. SendSocket(&DefMsg, szEncodeMsg);
  2640. //  cdesc.Feature := TCreature(msg.sender).Feature;
  2641. //  cdesc.Status := TCreature(msg.sender).CharStatus;
  2642. //  SendSocket (@Def, EncodeBuffer (@cdesc, sizeof(TCharDesc)));
  2643. //#ifdef _DEBUG
  2644. // _RPT4(_CRT_WARN, "SM_WALK[%x]:%x, %d-%dn", ,(int)this, (int)lpProcessMsg->pCharObject, lpProcessMsg->lParam1, lpProcessMsg->lParam2);
  2645. //#endif
  2646. }
  2648. break;
  2649. }
  2650. case RM_RUN:
  2651. {
  2652. if (lpProcessMsg->pCharObject != this)
  2653. {
  2654. fnMakeDefMessage(&DefMsg, SM_RUN, (int)lpProcessMsg->pCharObject, 
  2655. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, MAKEWORD(lpProcessMsg->wParam, lpProcessMsg->pCharObject->m_btLight));
  2657. CharDesc.Feature = lpProcessMsg->pCharObject->GetFeatureToLong();
  2658. CharDesc.Status = lpProcessMsg->pCharObject->m_nCharStatus;
  2660. nPos =  fnEncode6BitBufA((unsigned char *)&CharDesc, szEncodeMsg, sizeof(_TCHARDESC), sizeof(szEncodeMsg));
  2662. if (lpProcessMsg->pCharObject->m_wObjectType & _OBJECT_HUMAN)
  2663. nPos += fnEncode6BitBufA((unsigned char *)&((CPlayerObject *)lpProcessMsg->pCharObject)->m_tFeatureEx, &szEncodeMsg[nPos], sizeof(_TOBJECTFEATUREEX), sizeof(szEncodeMsg) - nPos);
  2665. szEncodeMsg[nPos] = '';
  2667. SendSocket(&DefMsg, szEncodeMsg);
  2668. }
  2670. break;
  2671. }
  2672. case RM_BUTCH:
  2673. {
  2674. if (lpProcessMsg->pCharObject != this)
  2675. {
  2676. fnMakeDefMessage(&DefMsg, SM_BUTCH, (int)lpProcessMsg->pCharObject, 
  2677. (unsigned short)lpProcessMsg->lParam1/*x*/, (unsigned short)lpProcessMsg->lParam2/*y*/, lpProcessMsg->wParam/*Dir*/);
  2679. SendSocket(&DefMsg, NULL);
  2680. }
  2682. break;
  2683. }
  2684. case RM_HIT:
  2685. {
  2686. if (lpProcessMsg->pCharObject != this)
  2687. {
  2688. fnMakeDefMessage(&DefMsg, SM_HIT, (int)lpProcessMsg->pCharObject, 
  2689. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, MAKEWORD(LOBYTE(lpProcessMsg->wParam), lpProcessMsg->lParam3));//lpProcessMsg->pCharObject->m_nLight);
  2691. SendSocket(&DefMsg, NULL);
  2692. }
  2694. break;
  2695. }
  2696. case RM_LONGHIT:
  2697. {
  2698. if (lpProcessMsg->pCharObject != this)
  2699. {
  2700. fnMakeDefMessage(&DefMsg, SM_LONGHIT, (int)lpProcessMsg->pCharObject, 
  2701. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, lpProcessMsg->wParam);//lpProcessMsg->pCharObject->m_nLight);
  2703. SendSocket(&DefMsg, NULL);
  2704. }
  2706. break;
  2707. }
  2708. case RM_WIDEHIT:
  2709. {
  2710. if (lpProcessMsg->pCharObject != this)
  2711. {
  2712. fnMakeDefMessage(&DefMsg, SM_WIDEHIT, (int)lpProcessMsg->pCharObject, 
  2713. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, lpProcessMsg->wParam);//lpProcessMsg->pCharObject->m_nLight);
  2715. SendSocket(&DefMsg, NULL);
  2716. }
  2718. break;
  2719. }
  2720. case RM_FIREHIT:
  2721. {
  2722. if (lpProcessMsg->pCharObject != this)
  2723. {
  2724. fnMakeDefMessage(&DefMsg, SM_FIREHIT, (int)lpProcessMsg->pCharObject, 
  2725. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, lpProcessMsg->wParam);//lpProcessMsg->pCharObject->m_nLight);
  2727. SendSocket(&DefMsg, NULL);
  2728. }
  2730. break;
  2731. }
  2732. case RM_POWERHIT:
  2733. {
  2734. if (lpProcessMsg->pCharObject != this)
  2735. {
  2736. fnMakeDefMessage(&DefMsg, SM_POWERHIT, (int)lpProcessMsg->pCharObject, 
  2737. (unsigned short)lpProcessMsg->lParam1, (unsigned short)lpProcessMsg->lParam2, lpProcessMsg->wParam);//lpProcessMsg->pCharObject->m_nLight);
  2739. SendSocket(&DefMsg, NULL);
  2740. }
  2742. break;
  2743. }
  2744. case RM_SPELL:
  2745. case RM_SPELL2:
  2746. {
  2747. if (lpProcessMsg->pCharObject != this)
  2748. {
  2749. WORD wIdent;
  2750. char szMagicID[8];
  2752. if (lpProcessMsg->wIdent == RM_SPELL)
  2753. wIdent = SM_SPELL;
  2754. else
  2755. wIdent = SM_SPELL2;
  2757. fnMakeDefMessage(&DefMsg, wIdent, (int)lpProcessMsg->pCharObject, 
  2758. (unsigned short)lpProcessMsg->lParam1/*x*/, (unsigned short)lpProcessMsg->lParam2/*y*/, lpProcessMsg->wParam/*effect*/);
  2759. ValToAnsiStr(lpProcessMsg->lParam3, szMagicID); // MagicID
  2760. nPos = fnEncode6BitBufA((unsigned char *)szMagicID, szEncodeMsg, memlen(szMagicID) - 1, sizeof(szEncodeMsg));
  2761. szEncodeMsg[nPos] = '';
  2762. SendSocket(&DefMsg, szEncodeMsg);
  2763. }
  2765. break;
  2766. }
  2767. case RM_MAGICFIRE:
  2768. {
  2769. // char szMagicID[8];
  2771. fnMakeDefMessage(&DefMsg, SM_MAGICFIRE, (int)lpProcessMsg->pCharObject, 
  2772. LOWORD(lpProcessMsg->lParam2)/*x*/, HIWORD(lpProcessMsg->lParam2)/*y*/, (WORD)lpProcessMsg->lParam1);
  2773. nPos = fnEncode6BitBufA((unsigned char *)&lpProcessMsg->lParam3, szEncodeMsg, sizeof(DWORD), sizeof(szEncodeMsg));
  2774. szEncodeMsg[nPos] = '';
  2776. // ValToAnsiStr(lpProcessMsg->lParam3, szMagicID); // MagicID
  2777. SendSocket(&DefMsg, szEncodeMsg);
  2779. break;
  2780. }
  2781. case RM_STRUCK:
  2782. case RM_STRUCK_MAG:
  2783. {
  2784. if (lpProcessMsg->wParam > 0)
  2785. {
  2786. if (lpProcessMsg->pCharObject)
  2787. {
  2788. if (lpProcessMsg->pCharObject == this)
  2789. {
  2790. m_dwHealthTick = 0;
  2791. m_dwSpellTick = 0;
  2792. m_btPerHealth--;
  2793. m_btPerSpell--;
  2794. }
  2796. fnMakeDefMessage(&DefMsg, SM_STRUCK, (int)lpProcessMsg->pCharObject, 
  2797. lpProcessMsg->pCharObject->m_WAbility.HP/*HP*/, lpProcessMsg->pCharObject->m_WAbility.MaxHP/*MaxHP*/, lpProcessMsg->wParam);
  2799. MsgBodyWL.lParam1 = lpProcessMsg->pCharObject->GetFeatureToLong();
  2800. MsgBodyWL.lParam2 = lpProcessMsg->pCharObject->m_nCharStatus;
  2802. MsgBodyWL.nTag1 = lpProcessMsg->lParam3;
  2804. nPos = fnEncode6BitBufA((unsigned char *)&MsgBodyWL, szEncodeMsg, sizeof(MsgBodyWL), sizeof(szEncodeMsg));
  2805. szEncodeMsg[nPos] = '';
  2807. m_dwHealthTick = 0;
  2808. m_dwSpellTick = 0;
  2810. SendSocket(&DefMsg, szEncodeMsg);
  2811. }
  2812. }
  2814. break;
  2815. }
  2816. case RM_RUSH:
  2817. case RM_PUSH:
  2818. {
  2819. // if (lpProcessMsg->pCharObject != this)
  2820. // {
  2821. if (lpProcessMsg->wIdent == RM_PUSH)
  2822. fnMakeDefMessage(&DefMsg, SM_BACKSTEP, (int)lpProcessMsg->pCharObject, (unsigned short)lpProcessMsg->lParam1/*x*/, 
  2823. (unsigned short)lpProcessMsg->lParam2/*y*/, lpProcessMsg->wParam);
  2824. else if (lpProcessMsg->wIdent == RM_RUSH)
  2825. fnMakeDefMessage(&DefMsg, SM_RUSH, (int)lpProcessMsg->pCharObject, (unsigned short)lpProcessMsg->lParam1/*x*/, 
  2826. (unsigned short)lpProcessMsg->lParam2/*y*/, lpProcessMsg->wParam);
  2827. // }
  2829. SendSocket(&DefMsg, NULL);
  2831. break;
  2832. }
  2833. case RM_DISAPPEAR:
  2834. {
  2835. fnMakeDefMessage(&DefMsg, SM_DISAPPEAR, (int)lpProcessMsg->pCharObject, 0, 0, 0);
  2836. SendSocket(&DefMsg, NULL);
  2837. break;
  2838. }
  2839. case RM_CLEAROBJECTS:
  2840. {
  2841. fnMakeDefMessage(&DefMsg, SM_CLEAROBJECTS, 0, 0, 0, 0);
  2842. SendSocket(&DefMsg, NULL);
  2843. break;
  2844. }
  2845. case RM_CHANGEMAP:
  2846. {
  2847.   fnMakeDefMessage(&DefMsg, SM_CHANGEMAP, (int)this, m_nCurrX, m_nCurrY, MAKEWORD(DayBright(), m_pMap->m_btSeries));
  2848. nPos = fnEncode6BitBufA((unsigned char *)m_pMap->m_szMapName, szEncodeMsg, memlen(m_pMap->m_szMapName) - 1, sizeof(szEncodeMsg));
  2849. szEncodeMsg[nPos] = '';
  2850. SendSocket(&DefMsg, szEncodeMsg);
  2852. SendMapName();
  2854. break;
  2855. }
  2856. case RM_SPACEMOVE_SHOW:
  2857. {
  2858. break;
  2859. }
  2860. case RM_DOOROPEN:
  2861. {
  2862.   fnMakeDefMessage(&DefMsg, SM_DOOROPEN, 1, (unsigned short)lpProcessMsg->lParam1, 0, 0);
  2863. SendSocket(&DefMsg, NULL);
  2865. break;
  2866. }
  2867. case RM_ABILITY:
  2868. {
  2869. fnMakeDefMessage(&DefMsg, SM_ABILITY, m_pUserInfo->m_THumanRcd.dwGold, m_pUserInfo->m_THumanRcd.btJob, 0, 0);
  2870. nPos = fnEncode6BitBufA((unsigned char *)&m_WAbility, szEncodeMsg, sizeof(m_WAbility), sizeof(szEncodeMsg));
  2871. szEncodeMsg[nPos] = '';
  2872. SendSocket(&DefMsg, szEncodeMsg);
  2874. break;
  2875. }
  2876. case RM_SUBABILITY:
  2877. {
  2878. fnMakeDefMessage(&DefMsg, SM_SUBABILITY, MAKELONG(MAKEWORD(m_btAntiMagic, 0), 0), MAKEWORD(m_btHitPoint, m_btSpeedPoint), MAKEWORD(m_btAntiPoison, m_btPoisonRecover), MAKEWORD(m_btHealthRecover, m_btSpellRecover));
  2879. SendSocket(&DefMsg, NULL);
  2880. break;
  2881. }
  2882. case RM_DEATH:
  2883. {
  2884. if (lpProcessMsg->lParam3 == 1)
  2885. fnMakeDefMessage(&DefMsg, SM_NOWDEATH, (int)lpProcessMsg->pCharObject, (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, lpProcessMsg->wParam);
  2886. else
  2887. fnMakeDefMessage(&DefMsg, SM_DEATH, (int)lpProcessMsg->pCharObject, (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, lpProcessMsg->wParam);
  2889. CharDesc.Feature = lpProcessMsg->pCharObject->GetFeatureToLong();
  2890. CharDesc.Status = lpProcessMsg->pCharObject->m_nCharStatus;
  2892. nPos = fnEncode6BitBufA((unsigned char *)&CharDesc, szEncodeMsg, sizeof(CharDesc), sizeof(szEncodeMsg));
  2893. szEncodeMsg[nPos] = '';
  2895. SendSocket(&DefMsg, szEncodeMsg);
  2897. break;
  2898. }
  2899. case RM_SKELETON:
  2900. {
  2901. fnMakeDefMessage(&DefMsg, SM_SKELETON, (int)lpProcessMsg->pCharObject, (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, lpProcessMsg->wParam);
  2903. CharDesc.Feature = lpProcessMsg->pCharObject->GetFeatureToLong();
  2904. CharDesc.Status = lpProcessMsg->pCharObject->m_nCharStatus;
  2906. nPos = fnEncode6BitBufA((unsigned char *)&CharDesc, szEncodeMsg, sizeof(CharDesc), sizeof(szEncodeMsg));
  2907. szEncodeMsg[nPos] = '';
  2909. SendSocket(&DefMsg, szEncodeMsg);
  2911. break;
  2912. }
  2913. case RM_LEVELUP:
  2914. {
  2915. fnMakeDefMessage(&DefMsg, SM_LEVELUP, m_Ability.Exp, m_Ability.Level, 0, 0);
  2916. SendSocket(&DefMsg, NULL);
  2918. fnMakeDefMessage(&DefMsg, SM_ABILITY, m_pUserInfo->m_THumanRcd.dwGold, m_pUserInfo->m_THumanRcd.btJob, 0, 0);
  2919. nPos = fnEncode6BitBufA((unsigned char *)&m_WAbility, szEncodeMsg, sizeof(m_WAbility), sizeof(szEncodeMsg));
  2920. szEncodeMsg[nPos] = '';
  2921. SendSocket(&DefMsg, szEncodeMsg);
  2923. fnMakeDefMessage(&DefMsg, SM_SUBABILITY, MAKELONG(MAKEWORD(m_btAntiMagic, 0), 0), MAKEWORD(m_btHitPoint, m_btSpeedPoint), MAKEWORD(m_btAntiPoison, m_btPoisonRecover), MAKEWORD(m_btHealthRecover, m_btSpellRecover));
  2924. SendSocket(&DefMsg, NULL);
  2926. break;
  2927. }
  2928. case RM_HEALTHSPELLCHANGED:
  2929. {
  2930. fnMakeDefMessage(&DefMsg, SM_HEALTHSPELLCHANGED, (int)lpProcessMsg->pCharObject, m_WAbility.HP, m_WAbility.MP, m_WAbility.MaxHP);
  2931. SendSocket(&DefMsg, NULL);
  2933. break;
  2934. }
  2935. case RM_FEATURECHANGED:
  2936. {
  2937. fnMakeDefMessage(&DefMsg, SM_FEATURECHANGED, (int)lpProcessMsg->pCharObject, LOWORD(lpProcessMsg->lParam1), HIWORD(lpProcessMsg->lParam1), 0);
  2938. SendSocket(&DefMsg, NULL);
  2940. break;
  2941. }
  2942. case RM_OPENHEALTH:
  2943. {
  2944. fnMakeDefMessage(&DefMsg, SM_OPENHEALTH, (int)lpProcessMsg->pCharObject, lpProcessMsg->pCharObject->m_WAbility.HP
  2945. , lpProcessMsg->pCharObject->m_WAbility.MaxHP, 0);
  2946. SendSocket(&DefMsg, NULL);
  2948. break;
  2949. }
  2950. case RM_CLOSEHEALTH:
  2951. {
  2952. fnMakeDefMessage(&DefMsg, SM_CLOSEHEALTH, (int)lpProcessMsg->pCharObject, 0, 0, 0);
  2953. SendSocket(&DefMsg, NULL);
  2955. break;
  2956. }
  2957. case RM_SENDUSEITEMS:
  2958. {
  2959. fnMakeDefMessage(&DefMsg, SM_SENDUSEITEMS, 0, 0, 0, 0);
  2960. nPos = fnEncode6BitBufA((unsigned char *)m_pUserInfo->m_THumanRcd.szTakeItem, szEncodeMsg, sizeof(m_pUserInfo->m_THumanRcd.szTakeItem), sizeof(szEncodeMsg));
  2961. szEncodeMsg[nPos] = '';
  2962. SendSocket(&DefMsg, szEncodeMsg);
  2964. break;
  2965. }
  2966. case RM_SENDMYMAGIC:
  2967. {
  2968. SendMyMagics();
  2970. break;
  2971. }
  2972. case RM_DAYCHANGING:
  2973. {
  2974. fnMakeDefMessage(&DefMsg, SM_DAYCHANGING, 0, m_btBright, DayBright(), 0);
  2975. SendSocket(&DefMsg, NULL);
  2977. break;
  2978. }
  2979. case RM_MAGSTRUCK:
  2980. case RM_MAGSTRUCK_MINE:
  2981. {
  2982. int nVal = GetMagStruckDamage(lpProcessMsg->lParam1);
  2984. if (nVal > 0)
  2985. {
  2986. StruckDamage(nVal);
  2987. HealthSpellChanged();
  2988. AddRefMsg(RM_STRUCK_MAG, nVal, m_WAbility.HP, m_WAbility.MP, (int)lpProcessMsg->pCharObject, NULL);
  2989. }
  2991. break;
  2992. }
  2993. case RM_CHARSTATUSCHANGED:
  2994. {
  2995. fnMakeDefMessage(&DefMsg, SM_CHARSTATUSCHANGED, (int)lpProcessMsg->pCharObject, 
  2996. LOWORD(lpProcessMsg->lParam1), HIWORD(lpProcessMsg->lParam1), lpProcessMsg->wParam);
  2997. SendSocket(&DefMsg, NULL);
  2999. break;
  3000. }
  3001. case RM_CHANGELIGHT:
  3002. {
  3003. fnMakeDefMessage(&DefMsg, SM_CHANGELIGHT, (int)lpProcessMsg->pCharObject, 
  3004. lpProcessMsg->pCharObject->m_btLight, 0, 0);
  3005. SendSocket(&DefMsg, NULL);
  3006. break;
  3007. }
  3008. case RM_MAGIC_LVEXP:
  3009. {
  3010. fnMakeDefMessage(&DefMsg, SM_MAGIC_LVEXP, lpProcessMsg->lParam3, 
  3011. (WORD)lpProcessMsg->lParam2, (WORD)lpProcessMsg->lParam1, 0);
  3012. SendSocket(&DefMsg, NULL);
  3013. break;
  3014. }
  3015. case RM_DIGUP:
  3016. {
  3017. fnMakeDefMessage(&DefMsg, SM_DIGUP, (int)lpProcessMsg->pCharObject, 
  3018. (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, MAKEWORD(lpProcessMsg->wParam, lpProcessMsg->pCharObject->m_btLight));
  3020. MsgBodyWL.lParam1 = lpProcessMsg->pCharObject->GetFeatureToLong();
  3021. MsgBodyWL.lParam2 = lpProcessMsg->pCharObject->m_nCharStatus;
  3022. MsgBodyWL.nTag1 = lpProcessMsg->lParam3;
  3024. nPos = fnEncode6BitBufA((unsigned char *)&MsgBodyWL, szEncodeMsg, sizeof(MsgBodyWL), sizeof(szEncodeMsg));
  3025. szEncodeMsg[nPos] = '';
  3027. SendSocket(&DefMsg, szEncodeMsg);
  3029. break;
  3030. }
  3031. case RM_DIGDOWN:
  3032. {
  3033. fnMakeDefMessage(&DefMsg, SM_DIGDOWN, (int)lpProcessMsg->pCharObject, 
  3034. (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, 0);
  3035. SendSocket(&DefMsg, NULL);
  3037. break;
  3038. }
  3039. case RM_ITEMSHOW:
  3040. {
  3041. fnMakeDefMessage(&DefMsg, SM_ITEMSHOW, lpProcessMsg->lParam1, 
  3042. (WORD)lpProcessMsg->lParam2, (WORD)lpProcessMsg->lParam3, lpProcessMsg->wParam);
  3044. nPos = fnEncode6BitBufA((unsigned char *)lpProcessMsg->pszData, szEncodeMsg, memlen(lpProcessMsg->pszData) - 1, sizeof(szEncodeMsg));
  3045. szEncodeMsg[nPos] = '';
  3047. SendSocket(&DefMsg, szEncodeMsg);
  3049. break;
  3050. }
  3051. case RM_ITEMHIDE:
  3052. {
  3053. fnMakeDefMessage(&DefMsg, SM_ITEMHIDE, lpProcessMsg->lParam1, 
  3054. (WORD)lpProcessMsg->lParam2, (WORD)lpProcessMsg->lParam3, 0);
  3055. SendSocket(&DefMsg, NULL);
  3057. break;
  3058. }
  3059. case RM_DURACHANGE:
  3060. {
  3061. fnMakeDefMessage(&DefMsg, SM_DURACHANGE, lpProcessMsg->lParam1, 
  3062. (WORD)lpProcessMsg->wParam, LOWORD(lpProcessMsg->lParam2), HIWORD(lpProcessMsg->lParam2));
  3063. SendSocket(&DefMsg, NULL);
  3065. break;
  3066. }
  3067. case RM_WEIGHTCHANGED:
  3068. {
  3069. fnMakeDefMessage(&DefMsg, SM_WEIGHTCHANGED, m_WAbility.Weight, m_WAbility.WearWeight, m_WAbility.HandWeight, 0); 
  3071. SendSocket(&DefMsg, NULL);
  3073. break;
  3074. }
  3075. case RM_GOLDCHANGED:
  3076. {
  3077. fnMakeDefMessage(&DefMsg, SM_GOLDCHANGED, (int)m_pUserInfo->GetGold(), 0, 0, 0); 
  3079. SendSocket(&DefMsg, NULL);
  3081. break;
  3082. }
  3083. case RM_WINEXP:
  3084. {
  3085. fnMakeDefMessage(&DefMsg, SM_WINEXP, m_Ability.Exp, (WORD)lpProcessMsg->lParam1, 0, 0); 
  3087. SendSocket(&DefMsg, NULL);
  3089. break;
  3090. }
  3091. case RM_SHOWEVENT:
  3092. {
  3093. tsMsg.wIdent = HIWORD(lpProcessMsg->lParam2);
  3094. tsMsg.wMsg = 0;
  3096. fnMakeDefMessage(&DefMsg, SM_SHOWEVENT, (int)lpProcessMsg->lParam1, lpProcessMsg->wParam, LOWORD(lpProcessMsg->lParam2), (WORD)lpProcessMsg->lParam3); 
  3098. nPos = fnEncode6BitBufA((unsigned char *)&tsMsg, szEncodeMsg, sizeof(_TSHORTMSSEAGE), sizeof(szEncodeMsg));
  3099. szEncodeMsg[nPos] = '';
  3101. SendSocket(&DefMsg, szEncodeMsg);
  3103. break;
  3104. }
  3105. case RM_HIDEEVENT:
  3106. {
  3107. fnMakeDefMessage(&DefMsg, SM_HIDEEVENT, (int)lpProcessMsg->lParam1, lpProcessMsg->wParam, (WORD)lpProcessMsg->lParam2, (WORD)lpProcessMsg->lParam3); 
  3109. SendSocket(&DefMsg, NULL);
  3111. break;
  3112. }
  3113. case RM_CHANGENAMECOLOR:
  3114. {
  3115. fnMakeDefMessage(&DefMsg, SM_CHANGENAMECOLOR, (int)lpProcessMsg->pCharObject, lpProcessMsg->pCharObject->GetThisCharColor(), 0, 0); 
  3117. SendSocket(&DefMsg, NULL);
  3119. break;
  3120. }    
  3121. case RM_FLYAXE:
  3122. {
  3123. if (lpProcessMsg->lParam3 != 0)
  3124. {
  3125. MsgBodyWL.lParam1 = ((CCharObject*)lpProcessMsg->lParam3)->m_nCurrX;
  3126. MsgBodyWL.lParam2 = ((CCharObject*)lpProcessMsg->lParam3)->m_nCurrY;
  3127. MsgBodyWL.nTag1 = LOWORD(lpProcessMsg->lParam3);
  3128. MsgBodyWL.nTag2 = HIWORD(lpProcessMsg->lParam3);
  3130. fnMakeDefMessage(&DefMsg, SM_FLYAXE, (int)lpProcessMsg->pCharObject, (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, lpProcessMsg->wParam/*Dir*/);
  3131. nPos = fnEncode6BitBufA((unsigned char *)&MsgBodyWL, szEncodeMsg, sizeof(MsgBodyWL), sizeof(szEncodeMsg));
  3132. szEncodeMsg[nPos] = '';
  3134. SendSocket(&DefMsg, szEncodeMsg);
  3136. }
  3138. break;
  3139. }
  3140. case RM_LIGHTING:
  3141. {
  3142. if (lpProcessMsg->lParam3 != 0)
  3143. {
  3144. MsgBodyWL.lParam1 = ((CCharObject*)lpProcessMsg->lParam3)->m_nCurrX;
  3145. MsgBodyWL.lParam2 = ((CCharObject*)lpProcessMsg->lParam3)->m_nCurrY;
  3146. MsgBodyWL.nTag1 = lpProcessMsg->lParam3;
  3147. MsgBodyWL.nTag2 = lpProcessMsg->wParam;
  3149. fnMakeDefMessage(&DefMsg, SM_LIGHTING, (int)lpProcessMsg->pCharObject, (WORD)lpProcessMsg->lParam1, (WORD)lpProcessMsg->lParam2, lpProcessMsg->pCharObject->m_nDirection);
  3150. nPos = fnEncode6BitBufA((unsigned char *)&MsgBodyWL, szEncodeMsg, sizeof(MsgBodyWL), sizeof(szEncodeMsg));
  3151. szEncodeMsg[nPos] = '';
  3153. SendSocket(&DefMsg, szEncodeMsg);
  3155. }
  3157. break;
  3158. }
  3159. case RM_ITEMUPDATE:
  3160. {
  3161. fnMakeDefMessage(&DefMsg, SM_ITEMUPDATE, (int)lpProcessMsg->pCharObject, (WORD)lpProcessMsg->wParam, (WORD)0, 0);
  3162. nPos = fnEncode6BitBufA((unsigned char *)lpProcessMsg->pszData, szEncodeMsg, memlen(lpProcessMsg->pszData), sizeof(szEncodeMsg));
  3163. szEncodeMsg[nPos] = '';
  3165. SendSocket(&DefMsg, szEncodeMsg);
  3167. break;
  3168. }
  3169. case RM_USERNAME:
  3170. {
  3171. fnMakeDefMessage(&DefMsg, SM_USERNAME, (int)lpProcessMsg->pCharObject, lpProcessMsg->pCharObject->GetThisCharColor(), (WORD)0, 0);
  3172. nPos = fnEncode6BitBufA((unsigned char *)lpProcessMsg->pszData, szEncodeMsg, memlen(lpProcessMsg->pszData), sizeof(szEncodeMsg));
  3173. szEncodeMsg[nPos] = '';
  3175. SendSocket(&DefMsg, szEncodeMsg);
  3177. break;
  3178. }
  3179. case RM_CHANGEFACE:
  3180. {
  3181. if (lpProcessMsg->lParam1 && lpProcessMsg->lParam2)
  3182. {
  3183. fnMakeDefMessage(&DefMsg, SM_CHANGEFACE, (int)lpProcessMsg->lParam1, LOWORD(lpProcessMsg->lParam2), HIWORD(lpProcessMsg->lParam2), 0);
  3185. CharDesc.Feature = lpProcessMsg->pCharObject->GetFeatureToLong();
  3186. CharDesc.Status = lpProcessMsg->pCharObject->m_nCharStatus;
  3188. nPos = fnEncode6BitBufA((unsigned char *)&CharDesc, szEncodeMsg, sizeof(CharDesc), sizeof(szEncodeMsg));
  3189. szEncodeMsg[nPos] = '';
  3191. SendSocket(&DefMsg, szEncodeMsg);
  3192. }
  3194. break;
  3195. }
  3196. } // switch
  3198. if (lpProcessMsg->pszData)
  3199. {
  3200. delete [] lpProcessMsg->pszData;
  3201. lpProcessMsg->pszData = NULL;
  3202. }
  3204. delete lpProcessMsg;
  3205. lpProcessMsg = NULL;
  3206. } // if
  3207. } // for loop
  3208. }
  3209. }