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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 模拟服务器 > 查看源码
ScriptFuns.cpp
资源名称：SwordOnline.rar　[点击查看]
上传用户：dzyhzl
上传日期：2019-04-29
资源大小：56270k
文件大小：129k
源码类别：

模拟服务器

开发平台：

C/C++

ScriptFuns.cpp：源码内容
  1. /*******************************************************************************
  2. // FileName : ScriptFuns.cpp
  3. // FileAuthor : RomanDou
  4. // FileCreateDate : 2002-11-19 15:58:20
  5. // FileDescription : 脚本指令集
  6. // Revision Count :
  7. *******************************************************************************/
  8. #ifndef WIN32
  9. #include <string>
  10. #endif
  12. #include "KWin32.h"
  13. #include "KEngine.h"
  14. #include "KDebug.h"
  15. #include "KStepLuaScript.h"
  16. #include "LuaLib.h"
  17. #include "KScriptList.h"
  18. #include <string.h>
  19. #include "LuaFuns.h"
  20. #include "KCore.h"
  21. #include "KNpc.h"
  22. #include "KSubWorld.h"
  23. #include "KObjSet.h"
  24. #include "KItemSet.h"
  25. //#include "KNetClient.h"
  26. #include "KScriptValueSet.h"
  27. #include "KNpcSet.h"
  28. #include "KPlayerSet.h"
  29. #include "KPlayer.h"
  30. #include "KSubWorldSet.h"
  31. #include "KProtocolProcess.h"
  32. #include "KBuySell.h"
  33. #include "KTaskFuns.h"
  34. #include "KPlayerDef.h"
  35. #include "TaskDef.h"
  36. #ifdef _SERVER
  37. //#include "KNetServer.h"
  38. //#include "../MultiServer/Heaven/interface/iServer.h"
  39. #include "KNewProtocolProcess.h"
  40. #endif
  41. #include "KSortScript.h"
  42. #ifndef __linux
  43. #include "Shlwapi.h"
  44. #include "windows.h"
  45. #include "winbase.h"
  46. #include <direct.h>
  47. #else
  48. #include "unistd.h"
  49. #endif
  51. #ifdef _STANDALONE
  52. #include "KSG_StringProcess.h"
  53. #else
  54. #include "../../Engine/Src/KSG_StringProcess.h"
  55. #endif
  57. #ifndef WIN32
  58. typedef struct  _SYSTEMTIME
  59. {
  60.     WORD wYear;
  61.     WORD wMonth;
  62.     WORD wDayOfWeek;
  63.     WORD wDay;
  64.     WORD wHour;
  65.     WORD wMinute;
  66.     WORD wSecond;
  67.     WORD wMilliseconds;
  68. } SYSTEMTIME;
  69. typedef struct  _FILETIME
  70. {
  71.     DWORD dwLowDateTime;
  72.     DWORD dwHighDateTime;
  73. } FILETIME;
  74. #endif
  76. inline const char* _ip2a(DWORD ip) { in_addr ia; ia.s_addr = ip; return inet_ntoa(ia); }
  77. inline DWORD _a2ip(const char* cp) { return inet_addr(cp); }
  79. KScriptList g_StoryScriptList;
  80. KStepLuaScript * LuaGetScript(Lua_State * L);
  81. int GetPlayerIndex(Lua_State * L);
  82. extern int g_GetPriceToStation(int,int);
  83. extern int g_GetPriceToWayPoint(int,int);
  84. extern int g_GetPriceToDock(int ,int );
  86. //BitValue = GetBit(Value, BitNo)
  87. int LuaGetBit(Lua_State * L)
  88. {
  89. int nBitValue = 0;
  90. int nIntValue = (int)Lua_ValueToNumber(L, 1);
  91. int nBitNumber = (int)Lua_ValueToNumber(L, 2);
  93. if (nBitNumber >= 32 || nBitNumber <= 0) 
  94. goto lab_getbit;
  95. nBitValue = (nIntValue & (1 << (nBitNumber - 1))) != 0;
  96. lab_getbit:
  97. Lua_PushNumber(L, nBitValue);
  98. return 1;
  99. }
  101. //NewBit = SetBit(Value, BitNo, BitValue)
  102. int LuaSetBit(Lua_State * L)
  103. {
  104. int nIntValue = (int)Lua_ValueToNumber(L, 1);
  105. int nBitNumber = (int)Lua_ValueToNumber(L, 2);
  106. int nBitValue = (int)Lua_ValueToNumber(L,3);
  107. nBitValue = (nBitValue == 1);
  109. if (nBitNumber > 32 || nBitNumber <= 0) 
  110. goto lab_setbit;
  112. nIntValue = (nIntValue | (1 << (nBitNumber - 1)));
  113. lab_setbit:
  114. Lua_PushNumber(L, nIntValue);
  115. return 1;
  116. }
  118. //ByteValue = GetByte(Value, ByteNo)
  119. int LuaGetByte(Lua_State * L)
  120. {
  121. int nByteValue = 0;
  122. int nIntValue = (int)Lua_ValueToNumber(L, 1);
  123. int nByteNumber = (int)Lua_ValueToNumber(L, 2);
  125. if (nByteNumber > 4 || nByteNumber <= 0) 
  126. goto lab_getByte;
  127. nByteValue = (nIntValue & (0xff << ((nByteNumber - 1) * 8) )) >> ((nByteNumber - 1) * 8);
  129. lab_getByte:
  130. Lua_PushNumber(L, nByteValue);
  131. return 1;
  132. }
  134. //NewByte = SetByte(Value, ByteNo, ByteValue)
  135. int LuaSetByte(Lua_State * L)
  136. {
  137. BYTE * pByte = NULL;
  138. int nIntValue = (int)Lua_ValueToNumber(L, 1);
  139. int nByteNumber = (int)Lua_ValueToNumber(L, 2);
  140. int nByteValue = (int)Lua_ValueToNumber(L,3);
  141. nByteValue = (nByteValue & 0xff);
  143. if (nByteNumber > 4 || nByteNumber <= 0) 
  144. goto lab_setByte;
  146. pByte = (BYTE*)&nIntValue;
  147. *(pByte + (nByteNumber -1)) = (BYTE)nByteValue;
  148. //nIntValue = (nIntValue | (0xff << ((nByteNumber - 1) * 8) )) ;
  149. lab_setByte:
  150. Lua_PushNumber(L, nIntValue);
  151. return 1;
  152. }
  153. #ifdef _SERVER
  154. int LuaModifyRepute(Lua_State *L)
  155. {
  156. if (Lua_GetTopIndex(L) <1) 
  157. return 0;
  158. int nPlayerIndex = GetPlayerIndex(L);
  159. if (nPlayerIndex < 0)
  160. return 0;
  161. int nValue = (int)Lua_ValueToNumber(L,1);
  163. Player[nPlayerIndex].m_cTask.SetSaveVal(TASKVALUE_REPUTE, Player[nPlayerIndex].m_cTask.GetSaveVal(TASKVALUE_REPUTE) + nValue);
  164. if (nValue < 0)
  165. {
  166. char szMsg[100];
  167. sprintf(szMsg, "您的声望减少了%d点!", -nValue);
  168. // KPlayerChat::SendSystemInfo(1, nPlayerIndex, MESSAGE_SYSTEM_ANNOUCE_HEAD, (char *) szMsg, strlen(szMsg) );
  169. }
  170. else
  171. {
  172. char szMsg[100];
  173. sprintf(szMsg, "您的声望增加了%d点!", nValue);
  174. // KPlayerChat::SendSystemInfo(1, nPlayerIndex, MESSAGE_SYSTEM_ANNOUCE_HEAD, (char *) szMsg, strlen(szMsg) );
  175. }
  178. return 0;
  179. }
  181. int LuaGetRepute(Lua_State *L)
  182. {
  183. int nValue = 0;
  184. int nPlayerIndex = GetPlayerIndex(L);
  185. if (nPlayerIndex < 0)
  186. goto lab_getrepute;
  187. nValue = Player[nPlayerIndex].m_cTask.GetSaveVal(TASKVALUE_REPUTE);
  188. lab_getrepute:
  189. Lua_PushNumber(L, nValue);
  190. return 1;
  191. }
  192. #endif
  194. int GetSubWorldIndex(Lua_State * L)
  195. {
  196. Lua_GetGlobal(L, SCRIPT_SUBWORLDINDEX);
  197. if (lua_isnil(L,Lua_GetTopIndex(L)))
  198.         return -1;
  199. int nIndex = (int)Lua_ValueToNumber(L, Lua_GetTopIndex(L));
  200.     if (nIndex >= MAX_SUBWORLD || nIndex <= 0) 
  201. {
  202. _ASSERT(0);
  203. return -1;
  204. }
  205. if (SubWorld[nIndex].m_nIndex >= MAX_SUBWORLD || SubWorld[nIndex].m_nIndex < 0)
  206. {
  207. _ASSERT(0);
  208. return -1;
  209. }
  210.     return nIndex;
  211. }
  213. //Idx = SubWorldID2Idx(dwID)
  214. int LuaSubWorldIDToIndex(Lua_State * L)
  215. {
  216. int nTargetSubWorld = -1;
  217. int nSubWorldID = 0;
  218. if (Lua_GetTopIndex(L) < 1)
  219. goto lab_subworldid2idx;
  221. nSubWorldID = (int)Lua_ValueToNumber(L, 1);
  222. nTargetSubWorld = g_SubWorldSet.SearchWorld(nSubWorldID);
  224. lab_subworldid2idx:
  225. Lua_PushNumber(L, nTargetSubWorld);
  226. return 1;
  227. }
  230. /*
  231. Say(sMainInfo, nSelCount, sSel1, sSel2, sSel3, .....,sSeln) 
  232. Say(nMainInfo, nSelCount, sSel1, sSel2, sSel3, .....,sSeln) 
  233. Say(nMainInfo, nSelCount, SelTab)
  234. 如果是客户端的则不会向服务器端发送任何操作
  236.   Say(100, 3, 10, 23,43)
  237.   Say("选择什么？", 2, "是/yes", "否/no");
  238.   Say("选什么呀", 2, SelTab);
  239. */
  240. //**************************************************************************************************************************************************************
  241. // 界面脚本
  242. //**************************************************************************************************************************************************************
  243. int LuaSelectUI(Lua_State * L)
  244. {
  245. char * strMain  = NULL;
  246. int nMainInfo = 0;
  247. int nDataType = 0;
  248. int nOptionNum = 0;
  249. char * pContent = NULL;
  251. int nPlayerIndex = GetPlayerIndex(L);
  252. if (nPlayerIndex < 0) return 0;
  253. Player[nPlayerIndex].m_bWaitingPlayerFeedBack = false;
  255. int nParamNum = Lua_GetTopIndex(L);
  256. if (nParamNum < 2) return 0;
  258. if (Lua_IsNumber(L,2))
  259. {
  260. nOptionNum = (int)Lua_ValueToNumber(L,2);
  261. }
  262. else 
  263. {
  264. _ASSERT(0);
  265. return 0;
  266. }
  268. if  (Lua_IsNumber(L,1))
  269. {
  270. nMainInfo = (int)Lua_ValueToNumber(L,1);
  271. nDataType = 1 ;
  272. }
  273. else if (Lua_IsString(L, 1))  //检查主信息是字符串还是字符串标识号
  274. {
  275. strMain = (char *)Lua_ValueToString(L, 1);
  276. nDataType = 0 ;
  277. }
  278. else
  279. return 0;
  281. BOOL bStringTab = FALSE;//标识传进来的选项数据存放在一个数组中，还是许多字符串里
  283. if (Lua_IsString(L,3))
  284. bStringTab = FALSE;
  285. else if (Lua_IsTable(L, 3))
  286. {
  287. bStringTab = TRUE;
  288. }
  289. else 
  290. {if (nOptionNum > 0)  return 0;
  291. }
  293. if (bStringTab == FALSE)
  294. {
  295. //获得实际传入的选项的个数
  296. if (nOptionNum > nParamNum - 2) nOptionNum = nParamNum - 2;
  297. }
  299. if (nOptionNum > MAX_ANSWERNUM) nOptionNum = MAX_ANSWERNUM;
  301. PLAYER_SCRIPTACTION_SYNC UiInfo;
  302. UiInfo.m_bUIId = UI_SELECTDIALOG;
  303. UiInfo.m_bParam1 = nDataType;//主信息的类型，字符串(0)或数字(1)
  304. UiInfo.m_bOptionNum = nOptionNum;
  305. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  307. //主信息为字符串
  308. if (nDataType == 0)
  309. {
  310. if (strMain)
  311. sprintf(UiInfo.m_pContent, "%s", strMain);
  312. pContent = UiInfo.m_pContent;
  313. }
  314. else if (nDataType == 1) //主信息为数字标识
  315. {
  316. *(int *)UiInfo.m_pContent = nMainInfo;
  317. pContent = UiInfo.m_pContent + sizeof(int);
  318. *pContent = 0;
  319. }
  321. if (nOptionNum > MAX_ANSWERNUM)
  322. nOptionNum = MAX_ANSWERNUM;
  324. Player[nPlayerIndex].m_nAvailableAnswerNum = nOptionNum;
  326. for (int i  = 0; i < nOptionNum; i ++)
  327. {
  328. char  pAnswer[100];
  329. pAnswer[0] = 0;
  331. if (bStringTab)
  332. {
  333. Lua_PushNumber(L, i + 1);
  334. Lua_RawGet(L, 3);
  335. char * pszString = (char *)Lua_ValueToString(L, Lua_GetTopIndex(L));
  336. if (pszString)
  337. {
  338. g_StrCpyLen(pAnswer, pszString, 100);
  339. }
  340. }
  341. else 
  342. {
  343. char * pszString = (char *)Lua_ValueToString(L, i + 3);
  344. if (pszString)
  345. g_StrCpyLen(pAnswer, pszString, 100);
  346. }
  348. char * pFunName = strstr(pAnswer, "/");
  350. if (pFunName)
  351. {
  352. g_StrCpyLen(Player[nPlayerIndex].m_szTaskAnswerFun[i], pFunName + 1, sizeof(Player[nPlayerIndex].m_szTaskAnswerFun[0]));
  353. *pFunName = 0;
  354. sprintf(pContent, "%s|%s", pContent, pAnswer);
  355. }
  356. else 
  357. {
  358. strcpy(Player[nPlayerIndex].m_szTaskAnswerFun[i], "main");
  359. sprintf(pContent, "%s|%s", pContent, pAnswer);
  360. }
  361. }
  363. if (nDataType == 0)
  364. UiInfo.m_nBufferLen  = strlen(pContent);
  365. else 
  366. UiInfo.m_nBufferLen = strlen(pContent) + sizeof(int);
  368. #ifndef _SERVER
  369. UiInfo.m_bParam2 = 0;
  370. #else
  371. UiInfo.m_bParam2 = 1;
  372. #endif
  374. if (nOptionNum == 0)
  375. {
  376. Player[nPlayerIndex].m_bWaitingPlayerFeedBack = false;
  377. }
  378. else
  379. {
  380. Player[nPlayerIndex].m_bWaitingPlayerFeedBack = true;
  381. }
  383. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  384. return 0;
  385. }
  388. //PutMsg(szMsg/MsgId)
  389. int LuaSendMessageInfo(Lua_State * L)
  390. {
  391. if (Lua_GetTopIndex(L) < 1) 
  392. return 0;
  394. int nPlayerIndex = GetPlayerIndex(L);
  395. if (nPlayerIndex < 0) return 0;
  397. PLAYER_SCRIPTACTION_SYNC UiInfo;
  398. UiInfo.m_bUIId = UI_MSGINFO;
  399. UiInfo.m_bOptionNum = 1;
  400. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  402. int nMsgId = 0;
  404. if (Lua_IsNumber(L,1))
  405. {
  406. nMsgId = (int)Lua_ValueToNumber(L,1);
  407. *((int *)(UiInfo.m_pContent)) = nMsgId;
  408. UiInfo.m_bParam1 = 1;
  409. UiInfo.m_nBufferLen = sizeof(int);
  410. }
  411. else 
  412. {
  414. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  415. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent));
  416. UiInfo.m_bParam1 = 0;
  417. }
  419. #ifndef _SERVER
  420. UiInfo.m_bParam2 = 0;
  421. #else
  422. UiInfo.m_bParam2 = 1;
  423. #endif
  424. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  425. return 0;
  426. }
  428. //AddGlobalNews(Newsstr)
  429. int LuaAddGlobalNews(Lua_State * L)
  430. {
  431. if (Lua_GetTopIndex(L) < 1) 
  432. return 0;
  434. PLAYER_SCRIPTACTION_SYNC UiInfo;
  435. UiInfo.m_bUIId = UI_NEWSINFO;
  436. UiInfo.m_bOptionNum = NEWSMESSAGE_NORMAL;
  437. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  439. int nMsgId = 0;
  441. if (Lua_IsNumber(L,1))
  442. {
  443. nMsgId = (int)Lua_ValueToNumber(L,1);
  444. *((int *)(UiInfo.m_pContent)) = nMsgId;
  445. UiInfo.m_bParam1 = 1;
  446. UiInfo.m_nBufferLen = sizeof(int);
  447. }
  448. else 
  449. {
  450. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  451. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent));
  452. UiInfo.m_bParam1 = 0;
  453. }
  455. #ifndef _SERVER
  456. int nPlayerIndex = GetPlayerIndex(L);
  457. if (nPlayerIndex < 0) return 0;
  459. UiInfo.m_bParam2 = 0;
  460. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  461. #else
  462. UiInfo.m_bParam2 = 1;
  463. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  464. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  465. g_NewProtocolProcess.BroadcastGlobal(&UiInfo, UiInfo.m_wProtocolLong + 1);
  466. #endif
  467. return 0;
  468. }
  470. //AddLocalNews(Newsstr)
  471. int LuaAddLocalNews(Lua_State * L)
  472. {
  473. if (Lua_GetTopIndex(L) < 1) 
  474. return 0;
  476. PLAYER_SCRIPTACTION_SYNC UiInfo;
  477. UiInfo.m_bUIId = UI_NEWSINFO;
  478. UiInfo.m_bOptionNum = NEWSMESSAGE_NORMAL;
  479. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  481. int nMsgId = 0;
  483. if (Lua_IsNumber(L,1))
  484. {
  485. nMsgId = (int)Lua_ValueToNumber(L,1);
  486. *((int *)(UiInfo.m_pContent)) = nMsgId;
  487. UiInfo.m_bParam1 = 1;
  488. UiInfo.m_nBufferLen = sizeof(int);
  489. }
  490. else 
  491. {
  492. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  493. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent));
  494. UiInfo.m_bParam1 = 0;
  495. }
  497. #ifndef _SERVER
  498. int nPlayerIndex = GetPlayerIndex(L);
  499. if (nPlayerIndex < 0) return 0;
  501. UiInfo.m_bParam2 = 0;
  502. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  503. #else
  504. UiInfo.m_bParam2 = 1;
  505. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  506. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  507. g_NewProtocolProcess.BroadcastLocalServer(&UiInfo, UiInfo.m_wProtocolLong + 1);
  508. #endif
  509. return 0;
  510. }
  512. //AddGlobalCountNews(strNew/newid, time)
  513. int LuaAddGlobalCountNews(Lua_State * L)
  514. {
  515. if (Lua_GetTopIndex(L) < 2) 
  516. return 0;
  518. PLAYER_SCRIPTACTION_SYNC UiInfo;
  519. UiInfo.m_bUIId = UI_NEWSINFO;
  520. UiInfo.m_bOptionNum = NEWSMESSAGE_COUNTING;
  521. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  523. int nMsgId = 0;
  525. int nTime = (int)Lua_ValueToNumber(L,2);
  527. if (nTime <= 0)
  528. nTime = 1;
  530. if (Lua_IsNumber(L,1))
  531. {
  532. nMsgId = (int)Lua_ValueToNumber(L,1);
  533. *((int *)(UiInfo.m_pContent)) = nMsgId;
  534. UiInfo.m_bParam1 = 1;
  535. *(int *)((char *)UiInfo.m_pContent + sizeof(int)) = nTime;
  536. UiInfo.m_nBufferLen = sizeof(int) * 2;
  537. }
  538. else 
  539. {
  540. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  541. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent));
  542. *(int *)((char *)UiInfo.m_pContent + UiInfo.m_nBufferLen) = nTime;
  543. UiInfo.m_nBufferLen += sizeof(int);
  544. UiInfo.m_bParam1 = 0;
  545. }
  547. #ifndef _SERVER
  548. int nPlayerIndex = GetPlayerIndex(L);
  549. if (nPlayerIndex < 0) return 0;
  551. UiInfo.m_bParam2 = 0;
  552. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  553. #else
  554. UiInfo.m_bParam2 = 1;
  555. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  556. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  557. g_NewProtocolProcess.BroadcastGlobal(&UiInfo, UiInfo.m_wProtocolLong + 1);
  558. #endif
  559. return 0;
  560. }
  562. //AddLocalCountNews(strNew/newid, time)
  563. int LuaAddLocalCountNews(Lua_State * L)
  564. {
  565. if (Lua_GetTopIndex(L) < 2) 
  566. return 0;
  568. PLAYER_SCRIPTACTION_SYNC UiInfo;
  569. UiInfo.m_bUIId = UI_NEWSINFO;
  570. UiInfo.m_bOptionNum = NEWSMESSAGE_COUNTING;
  571. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  573. int nMsgId = 0;
  575. int nTime = (int)Lua_ValueToNumber(L,2);
  577. if (nTime <= 0)
  578. nTime = 1;
  580. if (Lua_IsNumber(L,1))
  581. {
  582. nMsgId = (int)Lua_ValueToNumber(L,1);
  583. *((int *)(UiInfo.m_pContent)) = nMsgId;
  584. UiInfo.m_bParam1 = 1;
  585. *(int *)((char *)UiInfo.m_pContent + sizeof(int)) = nTime;
  586. UiInfo.m_nBufferLen = sizeof(int) * 2;
  587. }
  588. else 
  589. {
  590. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  591. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent));
  592. *(int *)((char *)UiInfo.m_pContent + UiInfo.m_nBufferLen) = nTime;
  593. UiInfo.m_nBufferLen += sizeof(int);
  594. UiInfo.m_bParam1 = 0;
  595. }
  597. #ifndef _SERVER
  598. int nPlayerIndex = GetPlayerIndex(L);
  599. if (nPlayerIndex < 0) return 0;
  601. UiInfo.m_bParam2 = 0;
  602. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  603. #else
  604. UiInfo.m_bParam2 = 1;
  605. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  606. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  607. g_NewProtocolProcess.BroadcastLocalServer(&UiInfo, UiInfo.m_wProtocolLong + 1);
  608. #endif
  609. return 0;
  610. }
  612. //AddGlobalTimeNews(strNew/newid, year,month,day,hour,mins)
  613. int LuaAddGlobalTimeNews(Lua_State * L)
  614. {
  615. if (Lua_GetTopIndex(L) < 6) 
  616. return 0;
  618. PLAYER_SCRIPTACTION_SYNC UiInfo;
  619. UiInfo.m_bUIId = UI_NEWSINFO;
  620. UiInfo.m_bOptionNum = NEWSMESSAGE_TIMEEND;
  621. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  623. int nMsgId = 0;
  625. if (Lua_IsNumber(L,1))
  626. {
  627. nMsgId = (int)Lua_ValueToNumber(L,1);
  628. *((int *)(UiInfo.m_pContent)) = nMsgId;
  629. UiInfo.m_bParam1 = 1;
  630. UiInfo.m_nBufferLen = sizeof(int) + sizeof(SYSTEMTIME);
  631. }
  632. else 
  633. {
  634. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  635. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent)) + sizeof(SYSTEMTIME);
  636. UiInfo.m_bParam1 = 0;
  637. }
  639. SYSTEMTIME *pSystemTime =  (SYSTEMTIME *)((char *)UiInfo.m_pContent + UiInfo.m_nBufferLen - sizeof(SYSTEMTIME));
  640. memset(pSystemTime, 0, sizeof(SYSTEMTIME));
  642. SYSTEMTIME LocalTime ;
  643. memset(&LocalTime, 0, sizeof(SYSTEMTIME));
  645. LocalTime.wYear = (WORD)Lua_ValueToNumber(L,2);
  646. LocalTime.wMonth =(WORD)Lua_ValueToNumber(L,3);
  647. LocalTime.wDay = (WORD)Lua_ValueToNumber(L, 4);
  648. LocalTime.wHour = (WORD)Lua_ValueToNumber(L,5);
  649. LocalTime.wMinute = (WORD)Lua_ValueToNumber(L,6);
  650. FILETIME ft;
  651. FILETIME sysft;
  652. #ifdef WIN32
  653. SystemTimeToFileTime(&LocalTime, &ft);
  654. LocalFileTimeToFileTime(&ft, &sysft);
  655. FileTimeToSystemTime(&sysft, pSystemTime);
  656. #else
  657. memcpy(pSystemTime, &LocalTime, sizeof(LocalTime));
  658. #endif
  660. #ifndef _SERVER
  661. int nPlayerIndex = GetPlayerIndex(L);
  662. if (nPlayerIndex < 0) return 0;
  664. UiInfo.m_bParam2 = 0;
  665. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  666. #else
  667. UiInfo.m_bParam2 = 1;
  668. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  669. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  670. g_NewProtocolProcess.BroadcastGlobal(&UiInfo, UiInfo.m_wProtocolLong + 1);
  671. #endif
  672. return 0;
  673. }
  675. //AddLocalTimeNews(strNew/newid, year,month,day,hour,mins)
  676. int LuaAddLocalTimeNews(Lua_State * L)
  677. {
  678. if (Lua_GetTopIndex(L) < 6) 
  679. return 0;
  681. PLAYER_SCRIPTACTION_SYNC UiInfo;
  682. UiInfo.m_bUIId = UI_NEWSINFO;
  683. UiInfo.m_bOptionNum = NEWSMESSAGE_TIMEEND;
  684. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  686. int nMsgId = 0;
  688. if (Lua_IsNumber(L,1))
  689. {
  690. nMsgId = (int)Lua_ValueToNumber(L,1);
  691. *((int *)(UiInfo.m_pContent)) = nMsgId;
  692. UiInfo.m_bParam1 = 1;
  693. UiInfo.m_nBufferLen = sizeof(int) + sizeof(SYSTEMTIME);
  694. }
  695. else 
  696. {
  697. g_StrCpyLen(UiInfo.m_pContent, Lua_ValueToString(L,1), 64);
  698. UiInfo.m_nBufferLen = strlen(((char *)UiInfo.m_pContent)) + sizeof(SYSTEMTIME);
  699. UiInfo.m_bParam1 = 0;
  700. }
  702. SYSTEMTIME *pSystemTime =  (SYSTEMTIME *)((char *)UiInfo.m_pContent + UiInfo.m_nBufferLen - sizeof(SYSTEMTIME));
  703. memset(pSystemTime, 0, sizeof(SYSTEMTIME));
  705. SYSTEMTIME LocalTime ;
  706. memset(&LocalTime, 0, sizeof(SYSTEMTIME));
  708. LocalTime.wYear = (WORD)Lua_ValueToNumber(L,2);
  709. LocalTime.wMonth =(WORD)Lua_ValueToNumber(L,3);
  710. LocalTime.wDay = (WORD)Lua_ValueToNumber(L, 4);
  711. LocalTime.wHour = (WORD)Lua_ValueToNumber(L,5);
  712. LocalTime.wMinute = (WORD)Lua_ValueToNumber(L,6);
  713. FILETIME ft;
  714. FILETIME sysft;
  715. #ifdef WIN32
  716. SystemTimeToFileTime(&LocalTime, &ft);
  717. LocalFileTimeToFileTime(&ft, &sysft);
  718. FileTimeToSystemTime(&sysft, pSystemTime);
  719. #else
  720. memcpy(pSystemTime, &LocalTime, sizeof(LocalTime));
  721. #endif
  723. #ifndef _SERVER
  724. int nPlayerIndex = GetPlayerIndex(L);
  725. if (nPlayerIndex < 0) return 0;
  727. UiInfo.m_bParam2 = 0;
  728. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  729. #else
  730. UiInfo.m_bParam2 = 1;
  731. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  732. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  733. g_NewProtocolProcess.BroadcastLocalServer(&UiInfo, UiInfo.m_wProtocolLong + 1);
  734. #endif
  735. return 0;
  736. }
  738. //AddNote(str/strid)
  739. int LuaAddNote(Lua_State * L)
  740. {
  741. char * strMain  = NULL;
  742. int nMainInfo = 0;
  743. int nDataType = 0;
  745. int nPlayerIndex = GetPlayerIndex(L);
  746. if (nPlayerIndex < 0)
  747. return 0;
  749. int nParamNum = Lua_GetTopIndex(L);
  750. if (nParamNum < 1) 
  751. return 0;
  753. int nParam2 = 0;
  756. if  (Lua_IsNumber(L,1))
  757. {
  758. nMainInfo = (int)Lua_ValueToNumber(L,1);
  759. nDataType = 1 ;
  760. }
  761. else if (Lua_IsString(L, 1))  //检查主信息是字符串还是字符串标识号
  762. {
  763. strMain = (char *)Lua_ValueToString(L, 1);
  764. nDataType = 0 ;
  765. }
  766. else
  767. return 0;
  769. if (nParamNum > 1)
  770. {
  771. nParam2 = (int)Lua_ValueToNumber(L, 2);
  772. }
  774. PLAYER_SCRIPTACTION_SYNC UiInfo;
  775. UiInfo.m_bUIId = UI_NOTEINFO;
  776. UiInfo.m_bParam1 = nDataType;//主信息的类型，字符串(0)或数字(1)
  777. #ifndef _SERVER
  778. UiInfo.m_bParam2 = 0;
  779. #else
  780. UiInfo.m_bParam2 = 1;
  781. #endif
  783. UiInfo.m_bOptionNum = 0;
  784. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  786. //主信息为字符串
  787. if (nDataType == 0)
  788. {
  789. if (strMain)
  790. sprintf(UiInfo.m_pContent, "%s", strMain);
  791. int nLen = strlen(strMain);
  792. *(int*)(UiInfo.m_pContent + nLen) = nParam2;
  793. UiInfo.m_nBufferLen = nLen + sizeof(int);
  794. }
  795. else if (nDataType == 1) //主信息为数字标识
  796. {
  797. *(int *)UiInfo.m_pContent = nMainInfo;
  798. *(int *)(UiInfo.m_pContent + sizeof(int)) = nParam2;
  799. UiInfo.m_nBufferLen = sizeof(int) + sizeof(int);
  800. }
  802. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  803. return 0;
  804. }
  806. /*
  807. **
  808. **格式1:Talk(SentenceNum, CallBack-Fun(结束后的回调函数), sTalk1, sTalk2, sTalk3, sTalk4,...sTalkN);  
  809. Talk(SentenceNum, CallBack-Fun(结束后的回调函数), nTalk1, nTalk2,nTalk3,nTalk4,...nTalkN);  
  810. **格式2:Talk(SentenceNum, CallBack-Fun, SentenceTab);
  811. **例子:Talk(3,"EndTalk", "玩家：请问现在几点钟了？", "雇员：现在5点钟了","太谢谢你了！");
  812. **
  813. */
  815. int LuaTalkUI(Lua_State * L)
  816. {
  817. int nPlayerIndex = GetPlayerIndex(L);
  818. if (nPlayerIndex <= 0) 
  819. return 0;
  820. Player[nPlayerIndex].m_bWaitingPlayerFeedBack = false;
  821. int nMainInfo = 0;
  822. int nDataType = 0;
  823. int nOptionNum = 0;
  824. char * pContent = NULL;
  826. int nParamNum = Lua_GetTopIndex(L);
  827. if (nParamNum < 3) 
  828. return 0;
  830. if (Lua_IsNumber(L,1))
  831. {
  832. nOptionNum = (int)Lua_ValueToNumber(L,1);
  833. }
  834. else 
  835. {
  836. _ASSERT(0);
  837. return 0;
  838. }
  840. const char * pCallBackFun = Lua_ValueToString(L,2);
  842. //检查主信息是字符串还是字符串标识号
  844. if  (Lua_IsNumber(L,3))
  845. {
  846. nDataType = 1 ;
  847. }
  848. else if (Lua_IsString(L, 3)) 
  849. {
  850. nDataType = 0 ;
  851. }
  852. else
  853. return 0;
  856. //获得实际传入的选项的个数
  857. if (nOptionNum > nParamNum - 2) 
  858. nOptionNum = nParamNum - 2;
  860. PLAYER_SCRIPTACTION_SYNC UiInfo;
  861. UiInfo.m_bUIId = UI_TALKDIALOG;
  862. UiInfo.m_bParam1 = nDataType;//主信息的类型，字符串(0)或数字(1)
  863. UiInfo.m_bOptionNum = nOptionNum;
  864. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  865. pContent = UiInfo.m_pContent;
  866. pContent[0] = 0;
  867. size_t nContentLen = 0;
  868. for (int i  = 0; i < nOptionNum; i ++)
  869. {
  870. const char * pString = NULL;
  871. if (!nDataType)//StringInfo
  872. {
  873. pString = Lua_ValueToString(L, i + 3);
  874. if (nContentLen  + strlen(pString) >= MAX_SCIRPTACTION_BUFFERNUM)
  875. {
  876. nOptionNum = i;
  877. UiInfo.m_bOptionNum = nOptionNum;
  878. break;
  879. }
  880. nContentLen += strlen(pString);
  881. sprintf(pContent, "%s%s|", pContent, pString);
  882. }
  883. else
  884. {
  885. int j = (int)Lua_ValueToNumber(L, i + 3);
  886. sprintf(pContent, "%s%d|", pContent, j);
  887. }
  888. }
  889. UiInfo.m_nBufferLen  = strlen(pContent);
  891. if (!pCallBackFun || strlen(pCallBackFun) <= 0)
  892. {
  893. UiInfo.m_nParam = 0;
  894. Player[nPlayerIndex].m_nAvailableAnswerNum = 0;
  895. Player[nPlayerIndex].m_bWaitingPlayerFeedBack = false;
  896. }
  897. else
  898. {
  899. UiInfo.m_nParam = 1;
  900. Player[nPlayerIndex].m_nAvailableAnswerNum = 1;
  901. g_StrCpyLen(Player[nPlayerIndex].m_szTaskAnswerFun[0], pCallBackFun, sizeof(Player[nPlayerIndex].m_szTaskAnswerFun[0]));
  902. Player[nPlayerIndex].m_bWaitingPlayerFeedBack = true;
  903. }
  905. #ifndef _SERVER
  906. UiInfo.m_bParam2 = 0;
  907. #else
  908. UiInfo.m_bParam2 = 1;
  909. #endif
  911. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  912. return 0;
  914. }
  916. int LuaIncludeFile(Lua_State * L)
  917. {
  918. if (Lua_GetTopIndex(L) <= 0) return 0;
  920. if (Lua_IsString(L,1))
  921. {
  922. const char * pFileName = lua_tostring(L,1);
  923. char lszCurrentDirectory[MAX_PATH];
  924. int nLen = 0;
  925. if (pFileName[0] != '\' && pFileName[0] != '/')
  926. {
  927. getcwd(lszCurrentDirectory, MAX_PATH);
  928. nLen = strlen(lszCurrentDirectory);
  929. if (lszCurrentDirectory[nLen - 1] == '\' || lszCurrentDirectory[nLen - 1] == '/')
  930. lszCurrentDirectory[nLen - 1] = 0;
  931. #ifdef WIN32
  932. g_StrCat(lszCurrentDirectory, "\");
  933. g_StrCat(lszCurrentDirectory, (char*)pFileName);
  934. #else
  935. g_StrCat(lszCurrentDirectory, "/");
  936. g_StrCat(lszCurrentDirectory, (char*)pFileName);
  937. for (int i = 0; lszCurrentDirectory[i]; i++)
  938. {
  939. if (lszCurrentDirectory[i] == '\')
  940. lszCurrentDirectory[i] = '/';
  941. }
  942. #endif
  943. }
  944. else
  945. {
  946. g_GetRootPath(lszCurrentDirectory);
  947. nLen = strlen(lszCurrentDirectory);
  948. if (lszCurrentDirectory[nLen - 1] == '\' || lszCurrentDirectory[nLen - 1] == '/')
  949. lszCurrentDirectory[nLen - 1] = 0;
  950. #ifdef WIN32
  951. g_StrCat(lszCurrentDirectory, "\");
  952. g_StrCat(lszCurrentDirectory, (char*)pFileName + 1);
  953. #else
  954. g_StrCat(lszCurrentDirectory, "/");
  955. g_StrCat(lszCurrentDirectory, (char*)pFileName + 1);
  956. for (int i = 0; lszCurrentDirectory[i]; i++)
  957. {
  958. if (lszCurrentDirectory[i] == '\')
  959. lszCurrentDirectory[i] = '/';
  960. }
  961. #endif
  962. }
  963. strlwr(lszCurrentDirectory + nLen);
  964. lua_dofile(L, lszCurrentDirectory);
  965. return 0;
  966. }
  967. else
  968. return 0;
  969. }
  971. //**************************************************************************************************************************************************************
  972. // 任务脚本
  973. //**************************************************************************************************************************************************************
  975. int LuaGetTaskValue(Lua_State * L)
  976. {
  978. int nPlayerIndex = GetPlayerIndex(L);
  979. if (nPlayerIndex > 0) 
  980. {
  981. int nValue = (int)Player[nPlayerIndex].m_cTask.GetSaveVal((int)Lua_ValueToNumber(L,1));
  982. Lua_PushNumber(L, nValue);
  983. }
  984. else
  985. Lua_PushNil(L);
  987. return 1;
  988. }
  990. int LuaSetTaskValue(Lua_State * L)
  991. {
  992. int nPlayerIndex = GetPlayerIndex(L);
  993. int nValueIndex = (int)Lua_ValueToNumber(L, 1);
  994. int nValue = (int)Lua_ValueToNumber(L, 2);
  996. if (nPlayerIndex <= 0) return 0;
  997. Player[nPlayerIndex].m_cTask.SetSaveVal(nValueIndex, nValue);
  998. return 0;
  999. }
  1002. #ifndef _SERVER
  1003. #define MAX_TEMPVALUENUM_INCLIENT 500
  1004. int g_TempValue[MAX_TEMPVALUENUM_INCLIENT];
  1005. #endif
  1007. int LuaGetTempTaskValue(Lua_State * L)
  1008. {
  1009. int nTempIndex = (int)Lua_ValueToNumber(L, Lua_GetTopIndex(L));
  1011. #ifdef _SERVER
  1012. if(nTempIndex >= MAX_TEMP_TASK)
  1013. {
  1014. Lua_PushNil(L) ;
  1015. return 1;
  1016. }
  1017. int nPlayerIndex = GetPlayerIndex(L);
  1019. if (nPlayerIndex <= 0) 
  1020. {
  1021. Lua_PushNil(L);
  1022. return 1;
  1023. }
  1025. int nValue = Player[nPlayerIndex].m_cTask.GetClearVal(nTempIndex);
  1026. Lua_PushNumber(L, nValue);
  1027. #else
  1029. if (nTempIndex >= 0 && nTempIndex < MAX_TEMPVALUENUM_INCLIENT)
  1030. Lua_PushNumber(L, g_TempValue[nTempIndex]);
  1031. else 
  1032. Lua_PushNil(L);
  1033. #endif
  1034. return 1;
  1035. }
  1037. int LuaSetTempTaskValue(Lua_State * L)
  1038. {
  1039. int nTempIndex = (int)Lua_ValueToNumber(L, Lua_GetTopIndex(L) - 1);
  1040. int nValue = (int)Lua_ValueToNumber(L, Lua_GetTopIndex(L));
  1041. #ifdef _SERVER
  1042. Lua_GetGlobal(L, SCRIPT_PLAYERINDEX);
  1043. int nPlayerIndex = (int)Lua_ValueToNumber(L, Lua_GetTopIndex(L));
  1044. if (nPlayerIndex <= 0) return 0;
  1045. Player[nPlayerIndex].m_cTask.SetClearVal(nTempIndex, nValue);
  1046. #else
  1047. g_TempValue[nTempIndex] = nValue;
  1048. #endif
  1049. return 0;
  1050. }
  1052. #ifdef _SERVER
  1053. //---------------------------------交易、买卖、打开储藏箱-----------------------
  1054. //Sale(id)
  1055. //------------------------------------------------------------------------------
  1056. int LuaSale(Lua_State * L)
  1057. {
  1058. if (Lua_GetTopIndex(L) <= 0) return 0;
  1060. int nPlayerIndex = GetPlayerIndex(L);
  1061. if (nPlayerIndex > 0)
  1062. {
  1063. int nShopId = (int)Lua_ValueToNumber(L,1);
  1064. //----在以下加入买卖的实际代码!
  1065. BuySell.OpenSale(nPlayerIndex, nShopId - 1);
  1066. }
  1067. return 0;
  1068. }
  1070. int LuaTrade(Lua_State * L)
  1071. {
  1072. //Question 未写
  1073. return 0;
  1074. }
  1076. int LuaOpenBox(Lua_State * L)
  1077. {
  1078. int nPlayerIndex = GetPlayerIndex(L);
  1079. if (nPlayerIndex <= 0) return 0;
  1081. BYTE NetCommand = (BYTE)s2c_openstorebox;
  1082. g_pServer->PackDataToClient(Player[nPlayerIndex].m_nNetConnectIdx, &NetCommand, sizeof(BYTE));
  1083. return 0;
  1084. }
  1086. //---------------------------------时间任务-------------------------------------
  1087. //SetTimer(Time, TimerTaskId)
  1088. int LuaSetTimer(Lua_State  * L)
  1089. {
  1090. int nParamCount = Lua_GetTopIndex(L);
  1091. if (nParamCount < 2 ) return 0;
  1092. int nPlayerIndex  = GetPlayerIndex(L);
  1093. if (nPlayerIndex <= 0) return 0;
  1094. Player[nPlayerIndex].SetTimer((DWORD) (int)Lua_ValueToNumber(L, 1), (int)Lua_ValueToNumber(L,2));
  1095. return 0;
  1096. }
  1098. int LuaStopTimer(Lua_State * L)
  1099. {
  1100. int nPlayerIndex  = GetPlayerIndex(L);
  1101. if (nPlayerIndex <= 0) return 0;
  1102. Player[nPlayerIndex].CloseTimer();
  1103. return 0;
  1104. }
  1106. int LuaGetCurTimerId(Lua_State * L)
  1107. {
  1108. int nPlayerIndex  = GetPlayerIndex(L);
  1109. if (nPlayerIndex <= 0) 
  1110. {
  1111. Lua_PushNumber(L,0);
  1112. return 1;
  1113. }
  1114. int nTimerId = Player[nPlayerIndex].m_TimerTask.GetTaskId();
  1115. Lua_PushNumber(L, nTimerId);
  1116. return 1;
  1117. }
  1119. int LuaGetRestTime(Lua_State * L)
  1120. {
  1121. int nPlayerIndex  = GetPlayerIndex(L);
  1122. if (nPlayerIndex <= 0) 
  1123. {
  1124. Lua_PushNil(L);
  1125. return 1;
  1126. }
  1127. int nRestTime = Player[nPlayerIndex].m_TimerTask.GetRestTime();//m_dwTimeTaskTime - g_SubWorldSet.GetGameTime();
  1129. if (nRestTime > 0)
  1130. Lua_PushNumber(L, nRestTime);
  1131. else
  1132. Lua_PushNumber(L, 0);
  1134. return 1;
  1135. }
  1137. int LuaGetMissionRestTime(Lua_State * L)
  1138. {
  1139. int RestTime = 0;
  1140. if (Lua_GetTopIndex(L) >= 2)
  1141. {
  1142. int nSubWorldIndex = GetSubWorldIndex(L);
  1143. if (nSubWorldIndex >= 0) 
  1144. {
  1145. int nMissionId = (int)Lua_ValueToNumber(L, 1);
  1146. int nTimerId = (int)Lua_ValueToNumber(L, 2);
  1148. if (nMissionId < 0 || nTimerId < 0 )
  1149. goto lab_getmissionresttime;
  1151. KMission Mission;
  1152. Mission.SetMissionId(nMissionId);
  1153. KMission * pMission = SubWorld[nSubWorldIndex].m_MissionArray.GetData(&Mission);
  1154. if (pMission)
  1155. {
  1156. RestTime = (int)pMission->GetTimerRestTimer(nTimerId);
  1157. }
  1158. }
  1159. }
  1161. lab_getmissionresttime:
  1162. Lua_PushNumber(L, RestTime);
  1163. return 1;
  1164. }
  1167. //**************************************************************************************************************************************************************
  1168. // 组队脚本
  1169. //**************************************************************************************************************************************************************
  1170. int LuaIsLeader(Lua_State * L)
  1171. {
  1172. int nPlayerIndex = GetPlayerIndex(L);
  1173. if (nPlayerIndex > 0 ) 
  1174. {
  1175. if (Player[nPlayerIndex].m_cTeam.m_nFlag && Player[nPlayerIndex].m_cTeam.m_nFigure == TEAM_CAPTAIN)
  1176. Lua_PushNumber(L,1);
  1177. else 
  1178. Lua_PushNumber(L,0);
  1180. }
  1181. else 
  1182. Lua_PushNumber(L, 0);
  1183. return 1;
  1184. }
  1186. int LuaGetTeamId(Lua_State * L)
  1187. {
  1188. int nPlayerIndex = GetPlayerIndex(L);
  1189. if (nPlayerIndex > 0)
  1190. {
  1191. if (Player[nPlayerIndex].m_cTeam.m_nFlag)
  1192. Lua_PushNumber(L, Player[nPlayerIndex].m_cTeam.m_nID);
  1193. else Lua_PushNil(L);
  1194. }
  1195. else 
  1196. Lua_PushNil(L);
  1197. return 1;
  1198. }
  1200. int LuaGetTeamSize(Lua_State * L)
  1201. {
  1202. int nTeamSize = 0;
  1203. int nTeamId = -1;
  1204. if (Lua_GetTopIndex(L) >= 1)
  1205. {
  1206. nTeamId = Lua_ValueToNumber(L, 1);
  1207. }
  1208. else
  1209. {
  1210. int nPlayerIndex = GetPlayerIndex(L);
  1211. if (nPlayerIndex > 0)
  1212. {
  1213. if (Player[nPlayerIndex].m_cTeam.m_nFlag)
  1214. nTeamId = Player[nPlayerIndex].m_cTeam.m_nID;
  1215. else 
  1216. nTeamId = -1;
  1217. }
  1218. }
  1220. if (nTeamId < 0)
  1221. nTeamSize = 0;
  1222. else
  1223. nTeamSize = g_Team[nTeamId].m_nMemNum + 1;
  1224. Lua_PushNumber(L, nTeamSize);
  1225. return 1;
  1226. }
  1228. int LuaLeaveTeam(Lua_State * L)
  1229. {
  1230. int nPlayerIndex = GetPlayerIndex(L);
  1231. if (nPlayerIndex > 0)
  1232. {
  1233. if (Player[nPlayerIndex].m_cTeam.m_nFlag)
  1234. {
  1235. PLAYER_APPLY_LEAVE_TEAM sLeaveTeam;
  1236. sLeaveTeam.ProtocolType = c2s_teamapplyleave;
  1237. Player[nPlayerIndex].LeaveTeam((BYTE*)&sLeaveTeam);
  1238. }
  1239. }
  1240. return 0;
  1241. }
  1243. int LuaSetCreateTeamOption(Lua_State * L)
  1244. {
  1245. int nState = (int)Lua_ValueToNumber(L, 1);
  1247. int nPlayerIndex = GetPlayerIndex(L);
  1248. if (nPlayerIndex > 0)
  1249. {
  1250. if (nState)
  1251. Player[nPlayerIndex].m_cTeam.SetCanTeamFlag(nPlayerIndex, TRUE);
  1252. else
  1253. Player[nPlayerIndex].m_cTeam.SetCanTeamFlag(nPlayerIndex, FALSE);
  1254. }
  1255. return 0;
  1256. }
  1257. //**************************************************************************************************************************************************************
  1258. // 聊天消息脚本
  1259. //**************************************************************************************************************************************************************
  1261. int LuaMsgToPlayer(Lua_State * L)
  1262. {
  1263. if (Lua_GetTopIndex(L) <= 0) return 0;
  1264. int nPlayerIndex = GetPlayerIndex(L);
  1265. if (nPlayerIndex > 0) 
  1266. {
  1267. const char *  szMsg = Lua_ValueToString(L,1);
  1268. if (szMsg)
  1269. KPlayerChat::SendSystemInfo(1, nPlayerIndex, MESSAGE_SYSTEM_ANNOUCE_HEAD, (char *) szMsg, strlen(szMsg) );
  1270. }
  1272. return 0;
  1273. }
  1275. int LuaMsgToTeam(Lua_State * L)
  1276. {
  1277. if (Lua_GetTopIndex(L) <= 0 ) return 0;
  1279. int nPlayerIndex = GetPlayerIndex(L);
  1280. if (nPlayerIndex > 0)
  1281. {
  1282. if (Player[nPlayerIndex].m_cTeam.m_nID >= 0)
  1283. {
  1284. const char * szMsg = Lua_ValueToString(L,1);
  1285. int nTeamLeaderId = g_Team[Player[nPlayerIndex].m_cTeam.m_nID].m_nCaptain;
  1286. if (nTeamLeaderId > 0)
  1287. KPlayerChat::SendSystemInfo(1, nTeamLeaderId, "组队消息",(char *) szMsg, strlen(szMsg) );
  1289. for (int i = 0; i < MAX_TEAM_MEMBER; i ++)
  1290. {
  1291. int nMemberId = g_Team[Player[nPlayerIndex].m_cTeam.m_nID].m_nMember[i] ;
  1292. if (nMemberId > 0)
  1293. {
  1294. if (szMsg)
  1295. KPlayerChat::SendSystemInfo(1, nMemberId, "组队消息", (char *)szMsg, strlen(szMsg) );
  1296. }
  1297. }
  1298. }
  1299. }
  1300. return 0;
  1301. }
  1303. int LuaMsgToSubWorld(Lua_State * L)
  1304. {
  1305. if (Lua_GetTopIndex(L) <= 0 ) return 0;
  1307. const char * szMsg = Lua_ValueToString(L,1);
  1308. if (szMsg)
  1309. KPlayerChat::SendSystemInfo(0, 0, MESSAGE_SYSTEM_ANNOUCE_HEAD, (char *)szMsg, strlen(szMsg) );
  1310. return 0;
  1311. }
  1313. int LuaMsgToAroundRegion(Lua_State * L)
  1314. {
  1316. return 0;
  1317. }
  1319. //**************************************************************************************************************************************************************
  1320. // 主角脚本
  1321. //**************************************************************************************************************************************************************
  1323. //**************************************************************************************************************************************************************
  1324. // 主角脚本
  1325. //**************************************************************************************************************************************************************
  1327. /*功能：让玩家进入新的一个游戏世界
  1328. nPlayerIndex:主角的Index
  1329. nSubWorldIndex:游戏世界id
  1330. nPosX:
  1331. nPosY:
  1332. */
  1333. //NewWorld(WorldId, X,Y)
  1334. int  LuaEnterNewWorld(Lua_State * L) 
  1335. {
  1336. int nPlayerIndex = GetPlayerIndex(L);
  1337. if (nPlayerIndex < 0) 
  1338. return 0;
  1340. int nResult = 0;
  1341. if (Lua_GetTopIndex(L) >= 3)
  1342. {
  1343. DWORD dwWorldId = (DWORD)Lua_ValueToNumber(L, 1);
  1344. nResult = Npc[Player[nPlayerIndex].m_nIndex].ChangeWorld(dwWorldId, (int)Lua_ValueToNumber(L,2) * 32, (int)Lua_ValueToNumber(L,3) * 32);
  1345. }
  1346. Lua_PushNumber(L, nResult);
  1347. return 1;
  1348. }
  1350. //SetPos(X,Y)
  1351. int LuaSetPos(Lua_State * L)
  1352. {
  1353. int nParamCount = Lua_GetTopIndex(L);
  1354. if (nParamCount != 2) return 0;
  1355. int nPlayerIndex = GetPlayerIndex(L);
  1357. int nX = (int) Lua_ValueToNumber(L,1);
  1358. int nY = (int) Lua_ValueToNumber(L,2);
  1360. if (nPlayerIndex > 0)
  1361. {
  1362. Npc[Player[nPlayerIndex].m_nIndex].SetPos(nX * 32, nY * 32);
  1363. }
  1364. return 0;
  1365. }
  1367. int LuaGetPos(Lua_State * L)
  1368. {
  1369. int nPlayerIndex = GetPlayerIndex(L);
  1371. if (nPlayerIndex > 0)
  1372. {
  1373. int nPosX = 0;
  1374. int nPosY = 0;
  1375. Npc[Player[nPlayerIndex].m_nIndex].GetMpsPos(&nPosX, &nPosY);
  1376. Lua_PushNumber(L, nPosX);
  1377. Lua_PushNumber(L, nPosY);
  1378. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_SubWorldIndex); 
  1379. }
  1380. else
  1381. return 0;
  1382. return 3;
  1383. }
  1385. //W,X,Y = GetWorldPos()
  1386. int LuaGetNewWorldPos(Lua_State * L)
  1387. {
  1388. int nPlayerIndex = GetPlayerIndex(L);
  1390. if (nPlayerIndex > 0)
  1391. {
  1392. int nPosX = 0;
  1393. int nPosY = 0;
  1394. Npc[Player[nPlayerIndex].m_nIndex].GetMpsPos(&nPosX, &nPosY);
  1396. int nSubWorldIndex = Npc[Player[nPlayerIndex].m_nIndex].m_SubWorldIndex;
  1397. int nSubWorldID = 0;
  1398. if (nSubWorldIndex >= 0 && nSubWorldIndex < MAX_SUBWORLD)
  1399. {
  1400. nSubWorldID = SubWorld[nSubWorldIndex].m_SubWorldID;
  1401. }
  1403. Lua_PushNumber(L, nSubWorldID); 
  1404. Lua_PushNumber(L, ((int)(nPosX / 32)));
  1405. Lua_PushNumber(L, ((int)(nPosY / 32)));
  1406. }
  1407. else
  1408. {
  1409. Lua_PushNumber(L, 0);
  1410. Lua_PushNumber(L, 0);
  1411. Lua_PushNumber(L, 0);
  1412. return 3;
  1413. }
  1414. return 3;
  1415. }
  1418. int LuaDropItem(Lua_State *L)
  1419. {
  1420. return 0;
  1421. }
  1423. /*AddEventItem(id)*/
  1424. KTabFile g_EventItemTab;
  1425. int LuaAddEventItem(Lua_State *L)
  1426. {
  1427. // modify by spe 03/06/13
  1428. if (Lua_GetTopIndex(L) < 1)
  1429. return 0;
  1431. int nPlayerIndex = GetPlayerIndex(L);
  1433. if (nPlayerIndex <= 0)
  1434. {
  1435. Lua_PushNumber(L,0);
  1436. return 1;
  1437. }
  1439. int nEventId = 0;
  1440. if (Lua_IsNumber(L, 1))
  1441. {
  1442. nEventId = (int)Lua_ValueToNumber(L,1);
  1443. }
  1444. else
  1445. {
  1446. char * szEventItm = (char *)Lua_ValueToString(L,1);
  1448. if (!g_EventItemTab.GetInteger(szEventItm, "具体类别", 0, &nEventId))
  1449. {
  1450. Lua_PushNumber(L,0);
  1451. return 1;
  1452. }
  1453. }
  1455. int nIndex = ItemSet.Add(item_task, 0, 0, 0, nEventId, 0, 0, 1, 0);
  1457. if (nIndex <= 0) 
  1458. {
  1459. Lua_PushNumber(L,0);
  1460. return 1;
  1461. }
  1463. int x, y;
  1464. if (Player[nPlayerIndex].m_ItemList.CheckCanPlaceInEquipment(Item[nIndex].GetWidth(), Item[nIndex].GetHeight(), &x, &y))
  1465. {
  1466. Player[nPlayerIndex].m_ItemList.Add(nIndex, pos_equiproom, x, y);
  1467. }
  1468. else
  1469. {
  1470. int nIdx = Player[nPlayerIndex].m_ItemList.Hand();
  1471. if (nIdx)
  1472. {
  1473. Player[nPlayerIndex].m_ItemList.Remove(nIdx);
  1475. KMapPos sMapPos;
  1476. KObjItemInfo sInfo;
  1478. Player[nPlayerIndex].GetAboutPos(&sMapPos);
  1480. sInfo.m_nItemID = nIdx;
  1481. sInfo.m_nItemWidth = Item[nIdx].GetWidth();
  1482. sInfo.m_nItemHeight = Item[nIdx].GetHeight();
  1483. sInfo.m_nMoneyNum = 0;
  1484. strcpy(sInfo.m_szName, Item[nIdx].GetName());
  1485. sInfo.m_nColorID = 0;
  1486. sInfo.m_nMovieFlag = 1;
  1487. sInfo.m_nSoundFlag = 1;
  1489. int nObj = ObjSet.Add(Item[nIdx].GetObjIdx(), sMapPos, sInfo);
  1490. if (nObj >= 0)
  1491. {
  1492. if (Item[nIdx].GetGenre() == item_task)
  1493. {
  1494. Object[nObj].SetEntireBelong(nPlayerIndex);
  1495. }
  1496. else
  1497. {
  1498. Object[nObj].SetItemBelong(nPlayerIndex);
  1499. }
  1500. }
  1501. }
  1502. Player[nPlayerIndex].m_ItemList.Add(nIndex, pos_hand, 0 ,0);
  1503. }
  1504. Lua_PushNumber(L, 1);
  1505. return 1;
  1506. }
  1508. /*AddItem(nItemClass, nDetailType, nParticualrType, nLevel, nSeries, nLuck, nItemLevel..6)*/
  1509. int LuaAddItem(Lua_State * L)
  1510. {
  1511. int nPlayerIndex = GetPlayerIndex(L);
  1513. if (nPlayerIndex <= 0)
  1514. {
  1515. Lua_PushNumber(L,0);
  1516. return 1;
  1517. }
  1519. int nParamNum = Lua_GetTopIndex(L);
  1520. if (nParamNum < 7)
  1521. {
  1522. g_DebugLog("[Script]使用AddItem参数数量不符!");
  1523. Lua_PushNumber(L,0);
  1524. return 1;
  1525. }
  1527. int nItemClass = (int)Lua_ValueToNumber(L, 1);
  1528. int nDetailType = (int)Lua_ValueToNumber(L, 2);
  1529. int nParticularType = (int)Lua_ValueToNumber(L, 3);
  1530. int nLevel = (int)Lua_ValueToNumber(L, 4);
  1531. int nSeries = (int)Lua_ValueToNumber(L, 5);
  1532. int nLuck = (int)Lua_ValueToNumber(L, 6);
  1533. int nItemLevel[6];
  1535. ZeroMemory(nItemLevel, sizeof(nItemLevel));
  1536. nItemLevel[0] = (int)Lua_ValueToNumber(L, 7);
  1538. if (nParamNum >= 12)
  1539. {
  1540. nItemLevel[1] = (int)Lua_ValueToNumber(L, 8);
  1541. nItemLevel[2] = (int)Lua_ValueToNumber(L, 9);
  1542. nItemLevel[3] = (int)Lua_ValueToNumber(L, 10);
  1543. nItemLevel[4] = (int)Lua_ValueToNumber(L, 11);
  1544. nItemLevel[5] = (int)Lua_ValueToNumber(L, 12);
  1545. }
  1546. else
  1547. {
  1548. for (int i = 0; i < 5; i ++)
  1549. nItemLevel[i + 1] = nItemLevel[0];
  1550. }
  1552. int nIndex = ItemSet.Add(nItemClass, nSeries, nLevel, nLuck, nDetailType, nParticularType,  nItemLevel, g_SubWorldSet.GetGameVersion());
  1553. if (nIndex <= 0)
  1554. {
  1555. Lua_PushNumber(L, 0);
  1556. return 1;
  1557. }
  1559. int x, y;
  1560. if (Player[nPlayerIndex].m_ItemList.CheckCanPlaceInEquipment(Item[nIndex].GetWidth(), Item[nIndex].GetHeight(), &x, &y))
  1561. {
  1562. Player[nPlayerIndex].m_ItemList.Add(nIndex, pos_equiproom, x, y);
  1563. }
  1564. else
  1565. {
  1566. int nIdx = Player[nPlayerIndex].m_ItemList.Hand();
  1567. if (nIdx)
  1568. {
  1569. Player[nPlayerIndex].m_ItemList.Remove(nIdx);
  1571. KMapPos sMapPos;
  1572. KObjItemInfo sInfo;
  1574. Player[nPlayerIndex].GetAboutPos(&sMapPos);
  1576. sInfo.m_nItemID = nIdx;
  1577. sInfo.m_nItemWidth = Item[nIdx].GetWidth();
  1578. sInfo.m_nItemHeight = Item[nIdx].GetHeight();
  1579. sInfo.m_nMoneyNum = 0;
  1580. strcpy(sInfo.m_szName, Item[nIdx].GetName());
  1581. sInfo.m_nColorID = 0;
  1582. sInfo.m_nMovieFlag = 1;
  1583. sInfo.m_nSoundFlag = 1;
  1585. int nObj = ObjSet.Add(Item[nIdx].GetObjIdx(), sMapPos, sInfo);
  1586. if (nObj >= 0)
  1587. {
  1588. if (Item[nIdx].GetGenre() == item_task)
  1589. {
  1590. Object[nObj].SetEntireBelong(nPlayerIndex);
  1591. }
  1592. else
  1593. {
  1594. Object[nObj].SetItemBelong(nPlayerIndex);
  1595. }
  1596. }
  1597. }
  1598. Player[nPlayerIndex].m_ItemList.Add(nIndex, pos_hand, 0 ,0);
  1599. }
  1601. Lua_PushNumber(L,1);
  1603. return 1;
  1605. }
  1607. int LuaGetTaskItemCount(Lua_State * L)
  1608. {
  1610. if (Lua_GetTopIndex(L) > 0)
  1611. {
  1612. int nPlayerIndex = GetPlayerIndex(L);
  1613. if (nPlayerIndex > 0)
  1614. {
  1615. int nEventId = 0;
  1616. if (Lua_IsNumber(L, 1))
  1617. {
  1618. nEventId = (int)Lua_ValueToNumber(L,1);
  1619. }
  1620. else
  1621. {
  1622. char * szEventItm = (char *)Lua_ValueToString(L,1);
  1624. if (!g_EventItemTab.GetInteger(szEventItm, "具体类别", 0, &nEventId))
  1625. {
  1626. Lua_PushNumber(L,0);
  1627. return 1;
  1628. }
  1629. }
  1631. int nCount = Player[nPlayerIndex].m_ItemList.GetTaskItemNum(nEventId);
  1632. Lua_PushNumber(L, nCount);
  1633. }
  1634. else 
  1635. {
  1636. g_DebugLog("GetItemCount nPlayerIndex <= 0");
  1637. Lua_PushNumber(L,0);
  1638. }
  1639. }
  1640. else
  1641. {
  1642. g_DebugLog("GetItem 参数不够!");
  1643. Lua_PushNumber(L , 0);
  1644. }
  1646. return 1;
  1647. }
  1650. /*nPlayerIndex, nItemTemplateId
  1651. 功能：给玩家某个物品
  1652. */
  1653. /*
  1654. DelItem (nPlayerIndex, nItemTemplateId)
  1655. 功能：删除玩家身上某个物品
  1656. */
  1657. int LuaDelItem(Lua_State * L)
  1658. {
  1659. if (Lua_GetTopIndex(L) > 0)
  1660. {
  1661. int nPlayerIndex = GetPlayerIndex(L);
  1662. if (nPlayerIndex > 0)
  1663. {
  1664. int nEventId = 0;
  1665. if (Lua_IsNumber(L, 1))
  1666. {
  1667. nEventId = (int)Lua_ValueToNumber(L,1);
  1668. }
  1669. else
  1670. {
  1671. char * szEventItm = (char *)Lua_ValueToString(L,1);
  1672. if (!g_EventItemTab.GetInteger(szEventItm, "具体类别", 0, &nEventId))
  1673. {
  1674. return 0;
  1675. }
  1676. }
  1678. int nResult = Player[nPlayerIndex].m_ItemList.RemoveTaskItem(nEventId);
  1680. }
  1681. else 
  1682. {
  1683. g_DebugLog("[TASK] Can Not Del Item ");
  1684. }
  1685. }
  1686. else
  1687. {
  1688. g_DebugLog("HaveItem 参数不够!");
  1689. }
  1691. return 0;
  1692. }
  1693. /*HaveItem(nItemTemplateId);
  1694. 功能:检查玩家是否有某个物品
  1695. */
  1696. int LuaHaveItem(Lua_State *L)
  1697. {
  1698. if (Lua_GetTopIndex(L) > 0)
  1699. {
  1700. int nPlayerIndex = GetPlayerIndex(L);
  1701. if (nPlayerIndex > 0)
  1702. {
  1703. int nEventId = 0;
  1704. if (Lua_IsNumber(L, 1))
  1705. {
  1706. nEventId = (int)Lua_ValueToNumber(L,1);
  1707. }
  1708. else
  1709. {
  1710. char * szEventItm = (char *)Lua_ValueToString(L,1);
  1712. if (!g_EventItemTab.GetInteger(szEventItm, "具体类别", 0, &nEventId))
  1713. {
  1714. Lua_PushNumber(L,0);
  1715. return 1;
  1716. }
  1717. }
  1719. int nResult = Player[nPlayerIndex].m_ItemList.IsTaskItemExist(nEventId);
  1720. Lua_PushNumber(L, (nResult != 0));
  1721. }
  1722. else 
  1723. {
  1724. g_DebugLog("HaveItem nPlayerIndex <= 0");
  1725. Lua_PushNumber(L,0);
  1726. }
  1727. }
  1728. else
  1729. {
  1730. g_DebugLog("HaveItem 参数不够!");
  1731. Lua_PushNumber(L , 0);
  1732. }
  1734. return 1;
  1735. }
  1737. /*
  1738. AddMagic(nPlayerIndex, nMagicID, nLevel)
  1739. DelMagic(nPlayerIndex, nMagicId)
  1740. HaveMagic(nPlayerIndex, nMagicId)
  1741. GetMagicLevel(nPlayerIndex, nMagicId)
  1742. SetMagicLevel(nPlayerIndex, nMagicId, nLevel)
  1743. ModifyMagicLevel(nPlayerIndex ,nMagicId, nDLevel)
  1744. */
  1745. int LuaAddMagic(Lua_State * L)
  1746. {
  1747. int nParamCount = Lua_GetTopIndex(L);
  1748. int nPlayerIndex = 0;
  1749. if (nParamCount < 1) return 0;
  1750. nPlayerIndex = GetPlayerIndex(L);
  1751. if (nPlayerIndex <= 0) return 0;
  1752. int nSkillId = 0;
  1753. if (Lua_IsNumber(L, 1))
  1754. {
  1755. nSkillId = (int)Lua_ValueToNumber (L, 1);
  1756. }
  1757. else 
  1758. {
  1759. const char * sSkillName = Lua_ValueToString(L, 1);
  1760. g_OrdinSkillsSetting.GetInteger((char*)sSkillName, "SkillId", 0, &nSkillId);
  1761. if (nSkillId <= 0 ) return 0;
  1762. }
  1763.     Player[nPlayerIndex].m_nIndex;
  1764. int nLevel = 0;
  1765. if (nParamCount >=2)
  1766. nLevel = (int)Lua_ValueToNumber(L,2);
  1767. else
  1768. nLevel = 0;
  1770.     int nRet = Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.Add(nSkillId, nLevel);
  1771. if (nRet)
  1772. {
  1773. PLAYER_SKILL_LEVEL_SYNC NewSkill;
  1774. NewSkill.ProtocolType = s2c_playerskilllevel;
  1775. NewSkill.m_nSkillID = nSkillId;
  1776. NewSkill.m_nSkillLevel = Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.GetCurrentLevel(nSkillId);
  1777. NewSkill.m_nLeavePoint = Player[nPlayerIndex].m_nSkillPoint;
  1778. g_pServer->PackDataToClient(Player[nPlayerIndex].m_nNetConnectIdx, (BYTE*)&NewSkill, sizeof(PLAYER_SKILL_LEVEL_SYNC));
  1779. }
  1781. return 0;
  1782. }
  1784. int LuaDelMagic(Lua_State * L)
  1785. {
  1786. int nParamCount = Lua_GetTopIndex(L);
  1787. int nPlayerIndex = 0;
  1788. if (nParamCount < 1) return 0;
  1790.     nPlayerIndex = GetPlayerIndex(L);
  1792. if (nPlayerIndex <= 0) return 0;
  1794. int nSkillId = 0;
  1795. if (Lua_IsNumber(L, 1))
  1796. {
  1797. nSkillId = (int)Lua_ValueToNumber (L, 1);
  1798. }
  1799. else 
  1800. {
  1801. const char * sSkillName = Lua_ValueToString(L, 1);
  1802. g_OrdinSkillsSetting.GetInteger((char*)sSkillName, "SkillId", 0, &nSkillId);
  1803. if (nSkillId <= 0 ) return 0;
  1804. }
  1805. Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.Remove(nSkillId);
  1806. return 0;
  1808. }
  1812. int LuaHaveMagic(Lua_State * L)
  1813. {
  1814. int nParamCount = Lua_GetTopIndex(L);
  1815. int nPlayerIndex = 0;
  1816. if (nParamCount < 1) return 0;
  1818. nPlayerIndex = GetPlayerIndex(L);
  1820. if (nPlayerIndex <= 0) return 0;
  1822. int nSkillId = 0;
  1823. if (Lua_IsNumber(L, 1))
  1824. {
  1825. nSkillId = (int)Lua_ValueToNumber (L, 1);
  1826. }
  1827. else 
  1828. {
  1829. const char * sSkillName = Lua_ValueToString(L, 1);
  1830. g_OrdinSkillsSetting.GetInteger((char *)sSkillName, "SkillId", 0, &nSkillId);
  1831. if (nSkillId <= 0 ) 
  1832. {
  1833. Lua_PushNumber(L, -1);
  1834. }
  1835. return 1;
  1836. }
  1838. if (Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.FindSame(nSkillId))
  1839. {
  1840. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.GetLevel(nSkillId));
  1841. }
  1842. else
  1843. {
  1844. Lua_PushNumber(L, -1);
  1845. }
  1847. return 1;
  1848. }
  1850. int LuaGetSkillIdInSkillList(Lua_State * L)
  1851. {
  1852. if (Lua_GetTopIndex(L) < 1) 
  1853. return 0;
  1855. int nPlayerIndex = GetPlayerIndex(L);
  1856. if (nPlayerIndex <= 0) 
  1857. return 0;
  1858. int nSkillIndex = (int)Lua_ValueToNumber (L, 1);
  1859. int nSkillId = 0;
  1860. if (nSkillIndex > 0) 
  1861. {
  1862. nSkillId = Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.GetSkillId(nSkillIndex);
  1863. }
  1864. Lua_PushNumber(L, nSkillId);
  1865. return 1;
  1866. }
  1868. int LuaSetSkillLevel(Lua_State * L)
  1869. {
  1870. if (Lua_GetTopIndex(L) < 2) 
  1871. return 0;
  1873. int nPlayerIndex = GetPlayerIndex(L);
  1874. if (nPlayerIndex <= 0) 
  1875. return 0;
  1876. int nSkillId = 0;
  1878. if (Lua_IsNumber(L, 1))
  1879. {
  1880. nSkillId = (int)Lua_ValueToNumber (L, 1);
  1881. }
  1882. else 
  1883. {
  1884. const char * sSkillName = Lua_ValueToString(L, 1);
  1885. g_OrdinSkillsSetting.GetInteger((char *)sSkillName, "SkillId", 0, &nSkillId);
  1886. if (nSkillId <= 0 ) return 0;
  1887. }
  1888. int nLevel = (int)Lua_ValueToNumber(L, 2);
  1889. if (nLevel >= 0)
  1890. Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.SetSkillLevelDirectlyUsingId(nSkillId, nLevel);
  1891. return 0;
  1892. }
  1894. int LuaRollBackSkills(Lua_State * L)
  1895. {
  1896. int nPlayerIndex = GetPlayerIndex(L);
  1897. if (nPlayerIndex <= 0) 
  1898. return 0;
  1899. int nSkillId = 0;
  1900. int nTotalSkill = Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.ClearSkillLevel(true);
  1901. Lua_PushNumber(L, nTotalSkill);
  1902. return 1;
  1903. }
  1905. int LuaUpdateSkillList(Lua_State * L)
  1906. {
  1907. int nPlayerIndex = GetPlayerIndex(L);
  1908. if (nPlayerIndex <= 0) 
  1909. return 0;
  1910. Player[nPlayerIndex].SendSyncData_Skill();
  1911. return 0;
  1912. }
  1914. int LuaGetMagicLevel(Lua_State * L)
  1915. {
  1916. int nParamCount = Lua_GetTopIndex(L);
  1917. int nPlayerIndex = 0;
  1919. if (nParamCount < 1) return 0;
  1920. nPlayerIndex = GetPlayerIndex(L);
  1922. if (nPlayerIndex <= 0) return 0;
  1924. int nSkillId = 0;
  1925. if (Lua_IsNumber(L, 1))
  1926. {
  1927. nSkillId = (int)Lua_ValueToNumber (L, 1);
  1928. }
  1929. else 
  1930. {
  1931. const char * sSkillName = Lua_ValueToString(L, 1);
  1932. g_OrdinSkillsSetting.GetInteger((char *)sSkillName, "SkillId", 0, &nSkillId);
  1933. if (nSkillId <= 0 ) return 0;
  1934. }
  1935. Lua_PushNumber(L,Npc[Player[nPlayerIndex].m_nIndex].m_SkillList.GetLevel(nSkillId));
  1936. return 1;
  1938. }
  1939. /*
  1940. int LuaSetMagicLevel(Lua_State * L)
  1941. {
  1942. int nParamCount = Lua_GetTopIndex(L);
  1943. int nPlayerIndex = 0;
  1944. int nTemp = 0;
  1945. if (nParamCount < 1) return 0;
  1947.   nPlayerIndex = GetPlayerIndex(L);
  1948.   
  1949. if (nPlayerIndex <= 0) return 0;
  1951.   int nSkillId = 0;
  1952.   if (Lua_IsNumber(L, nTemp))
  1953.   {
  1954.   nSkillId = (int)Lua_ValueToNumber (L, 1);
  1955.   }
  1956.   else 
  1957.   {
  1958.   const char * sSkillName = Lua_ValueToString(L, 1);
  1959.   nSkillId = g_OrdinSkillsSetting.FindRow((char *)sSkillName) - 2;
  1960.   if (nSkillId <= 0 ) return 0;
  1961.   }
  1962.   int nNpcIndex = Player[nPlayerIndex].m_nIndex;
  1963.   if (nNpcIndex > 0)
  1964.   Lua_PushNumber(L,Npc[nNpcIndex].m_SkillList.SetSkillLevel(nSkillId, (int)Lua_ValueToNumber(L, 2)));
  1965.   return 0;
  1966.   }
  1967. */
  1968. //**************************************************************************************************************************************************************
  1969. // NPC操作脚本
  1970. //**************************************************************************************************************************************************************
  1971. /*nNpcTemplateId GetNpcTmpId(sName)
  1972. 功能从Npc模板中获得名称为sName的Npc在模板中的Id
  1973. sName:Npc名称
  1974. nNpcTemplateID:模板中Id
  1975. */
  1977. int LuaGetNpcTemplateID(Lua_State * L)
  1978. {
  1979. if (Lua_GetTopIndex(L) > 0)
  1980. {
  1981. if (Lua_IsString(L,1))
  1982. {
  1983. const char * pName = lua_tostring(L,1);
  1984. int nId = g_NpcSetting.FindRow((char*)pName) - 2;
  1985. Lua_PushNumber(L, nId);
  1986. }
  1987. else
  1988. return 0;
  1989. }
  1990. else 
  1991. return 0;
  1992. return 1;
  1993. }
  1995. /*
  1996. nNpcIndex AddNpc(nNpcTemplateId,nLevel, nSubWorldIndex, nPosX, nPosY )
  1998.   功能：增加一个特定的NPC
  1999.   参数：
  2000.   nNpcTemplateId: NPC在NPC模板中的id
  2001.   nLevel:Npc的等级
  2002.   nSubWorldIndex:所处的世界id
  2003.   nPosX：X (点坐标)
  2004.   nPosY：Y (点坐标)
  2005.   nNpcIndex:增加后，将返回该Npc在游戏世界的Index，如果不成功返回nil 
  2006. */
  2008. int LuaAddNpc(Lua_State * L)
  2009. {
  2010. char * pName = NULL;
  2011. int    nId = 0;
  2012. if (Lua_GetTopIndex(L) < 5) return 0;
  2014. if (Lua_IsNumber(L,1))
  2015. {
  2016. nId = (int)Lua_ValueToNumber(L,1);
  2017. }
  2018. else if (Lua_IsString(L,1))
  2019. {
  2020. pName = (char *)lua_tostring(L,1);
  2021. nId = g_NpcSetting.FindRow((char*)pName) - 2;
  2022. }
  2023. else return 0;
  2025. if (nId < 0) nId = 0;
  2027. int nLevel = (int)lua_tonumber(L,2);
  2028. //if (nLevel >= 128) nLevel = 127;
  2029. if (nLevel < 0 ) nLevel = 1;
  2031. int nNpcIdxInfo = MAKELONG(nLevel, nId);//(nId << 7) + nLevel;
  2032. //question
  2033. int nNpcIdx = NpcSet.Add(nNpcIdxInfo, (int)lua_tonumber(L, 3), (int)lua_tonumber(L,4), (int)lua_tonumber(L,5));
  2034. // g_StrCpy(Npc[nNpcIdx].Name, (char*)pName);
  2035. Lua_PushNumber(L, nNpcIdx);
  2036.     return 1;
  2037. }
  2039. /*nResult DelNpc (nNpcIndex)
  2040. 功能：删除一个特定的NPC
  2041. nResult:返回成功与否,1为成功,0为失败
  2042. */
  2043. int LuaDelNpc(Lua_State * L)
  2044. {
  2045. if (Lua_GetTopIndex(L) <= 0 ) return 0 ;
  2046. int nNpcIndex = (int)Lua_ValueToNumber(L, 1);
  2047. if (nNpcIndex > 0)
  2048. {
  2049. if (Npc[nNpcIndex].m_RegionIndex >= 0)
  2050. {
  2051. SubWorld[Npc[nNpcIndex].m_SubWorldIndex].m_Region[Npc[nNpcIndex].m_RegionIndex].RemoveNpc(nNpcIndex);
  2052. SubWorld[Npc[nNpcIndex].m_SubWorldIndex].m_Region[Npc[nNpcIndex].m_RegionIndex].DecRef(Npc[nNpcIndex].m_MapX, Npc[nNpcIndex].m_MapY, obj_npc);
  2053. }
  2054. NpcSet.Remove(nNpcIndex);
  2055. }
  2056. return 0;
  2057. }
  2059. /*
  2060. nDelCount DelNpcsInRgn(nSubWorld,nRegionId, nKind) 
  2061. 功能：删除某个游戏世界中某个Region内的所有某类的NPC
  2062. 返回:删除的Npc个数
  2063. */
  2065. int LuaDelNpcsInRgn(Lua_State * L)
  2066. {
  2067. //Question
  2068. return 0;
  2069. }
  2070. /*
  2071. nDelCount DelNpcsInWld(nSubWorldId, nKind)
  2072. 功能：删除某个游戏世界中的所有Npc
  2073. */
  2074. int LuaDelNpcsInWld(Lua_State * L)
  2075. {
  2076. return 0;
  2077. }
  2079. /*
  2080. SetNpcPos (nNpcIndex, x, y)
  2081. 功能：设置/修改一个NPC的位置
  2082. 参数：
  2083. nNpcIndex:Npc的id 
  2084. x：X坐标
  2085. y：Y坐标
  2086. */
  2087. int LuaSetNpcPos(Lua_State * L)
  2088. {
  2089. int nParamCount = 0;
  2090. if ((nParamCount = Lua_GetTopIndex(L)) < 3) return 0;
  2091. int nNpcIndex = (int)Lua_ValueToNumber(L, 1);
  2092. if (nNpcIndex <= 0) return 0;
  2093. Npc[nNpcIndex].m_MapX = (int)Lua_ValueToNumber(L, 2);
  2094. Npc[nNpcIndex].m_MapY = (int)Lua_ValueToNumber(L, 3);
  2096. return 0;
  2097. }
  2100. /*SetNpcDthSct (nNpcIndex, map, “*.txt” )
  2101. 功能：设置NPC死亡脚本
  2102. 参数：
  2103. nNpcIndex：NPCIndex
  2104. *.txt：脚本文件名
  2105. */
  2106. int LuaSetNpcActionScript(Lua_State * L)
  2107. {
  2108. if (Lua_GetTopIndex(L) < 2 ) return 0;
  2109. int nNpcIndex = (int)Lua_ValueToNumber(L, 1);
  2110. if (nNpcIndex <= 0 || nNpcIndex >= MAX_NPC) return 0;
  2111. strcpy(Npc[nNpcIndex].ActionScript, Lua_ValueToString(L,2));
  2112. Npc[nNpcIndex].m_ActionScriptID = g_FileName2Id((char *)Lua_ValueToString(L,2));
  2113. return 0;
  2114. }
  2116. /*
  2117. SetRevivalPos(subworldid = -1, revid )
  2118. 功能：设置Npc重生点
  2119. */
  2120. int LuaSetPlayerRevivalPos(Lua_State * L)
  2121. {
  2122. //Question
  2123. int nParamCount = Lua_GetTopIndex(L);
  2124. int nPlayerIndex = 0;
  2125. int nBeginIndex = 2;
  2126. nPlayerIndex = GetPlayerIndex(L);
  2127. int nSubWorldId = 0;
  2128. int nRevId = 0;
  2129. if (nPlayerIndex < 0) 
  2130. {
  2131. return 0;
  2132. }
  2134. if (nParamCount >= 2)
  2135. {
  2136. nSubWorldId = (int) Lua_ValueToNumber(L, 1);
  2137. nRevId = (int) Lua_ValueToNumber(L, 2);
  2138. }
  2139. else if (nParamCount == 1)
  2140. {
  2141. nSubWorldId = -1;
  2142. nRevId = (int) Lua_ValueToNumber(L, 1);
  2143. }
  2144. else 
  2145. {
  2146. return 0;
  2147. }
  2149. Player[nPlayerIndex].SetRevivalPos(nSubWorldId, nRevId);
  2150. return 0;
  2151. }
  2153. //**************************************************************************************************************************************************************
  2154. // 聊天消息脚本
  2155. //**************************************************************************************************************************************************************
  2157. //**********************************************************************************************
  2158. // 主角属性获得
  2159. //**********************************************************************************************
  2162. #define MacroFun_GetPlayerInfoInt(L, MemberName) { int nPlayerIndex = GetPlayerIndex(L);
  2163. if (nPlayerIndex > 0){ int nNpcIndex = Player[nPlayerIndex].m_nIndex; if (nNpcIndex > 0)Lua_PushNumber(L, Npc[nNpcIndex].MemberName);
  2164. else Lua_PushNil(L);}
  2165. else Lua_PushNil(L);
  2166. return 1;}
  2168. //阵营
  2169. int LuaGetPlayerCurrentCamp(Lua_State * L)
  2170. {
  2171. MacroFun_GetPlayerInfoInt(L, m_CurrentCamp);
  2172. }
  2174. int LuaGetPlayerCamp(Lua_State * L)
  2175. {
  2176. MacroFun_GetPlayerInfoInt(L, m_Camp);
  2177. }
  2179. int LuaSetPlayerCamp(Lua_State * L)
  2180. {
  2181. int nValue = (int)Lua_ValueToNumber(L,1);
  2182. if (nValue < 0 ) return 0;
  2184. int nPlayerIndex = GetPlayerIndex(L);
  2185. if (nPlayerIndex > 0)
  2186. {
  2187. Npc[Player[nPlayerIndex].m_nIndex].SetCamp(nValue);
  2188. }
  2189. return 0;
  2190. }
  2192. int LuaSetPlayerCurrentCamp(Lua_State * L)
  2193. {
  2194. int nValue = (int)Lua_ValueToNumber(L,1);
  2195. if (nValue < 0 ) return 0;
  2197. int nPlayerIndex = GetPlayerIndex(L);
  2198. if (nPlayerIndex > 0)
  2199. {
  2200. Npc[Player[nPlayerIndex].m_nIndex].SetCurrentCamp(nValue);
  2201. }
  2202. return 0;
  2203. }
  2205. int LuaSetNpcCurCamp(Lua_State * L)
  2206. {
  2207. int nNpcIndex = (int)Lua_ValueToNumber(L,1);
  2208. if (nNpcIndex <= 0 && nNpcIndex > MAX_NPC) return 0;
  2209. int nValue = (int )Lua_ValueToNumber(L,2);
  2210. if (nValue >= camp_num) return 0;
  2211. Npc[nNpcIndex].SetCurrentCamp(nValue);
  2212. return 0;
  2213. }
  2215. int LuaRestorePlayerCamp(Lua_State * L)
  2216. {
  2217. int nPlayerIndex = GetPlayerIndex(L);
  2218. if (nPlayerIndex > 0)
  2219. {
  2220. Npc[Player[nPlayerIndex].m_nIndex].RestoreCurrentCamp();
  2221. }
  2222. return 0;
  2223. }
  2225. int LuaOpenTong(Lua_State * L)
  2226. {
  2227. if (Lua_GetTopIndex(L) < 1) 
  2228. return 0;
  2230. int nPlayerIndex = GetPlayerIndex(L);
  2231. if (nPlayerIndex < 0) return 0;
  2233. PLAYER_SCRIPTACTION_SYNC UiInfo;
  2234. UiInfo.m_bUIId = UI_OPENTONGUI;
  2235. UiInfo.m_bOptionNum = 0;
  2236. UiInfo.m_nOperateType = SCRIPTACTION_UISHOW;
  2238. int nMsgId = 0;
  2240. UiInfo.m_bParam1 = 0;
  2241. UiInfo.m_nBufferLen = sizeof(int);
  2243. #ifndef _SERVER
  2244. UiInfo.m_bParam2 = 0;
  2245. Player[nPlayerIndex].DoScriptAction(&UiInfo);
  2246. #else
  2247. UiInfo.m_bParam2 = 1;
  2248. UiInfo.ProtocolType = (BYTE)s2c_scriptaction;
  2249. UiInfo.m_wProtocolLong = sizeof(PLAYER_SCRIPTACTION_SYNC) - MAX_SCIRPTACTION_BUFFERNUM + UiInfo.m_nBufferLen - 1;
  2250. g_NewProtocolProcess.BroadcastGlobal(&UiInfo, UiInfo.m_wProtocolLong + 1);
  2251. #endif
  2252. return 0;
  2253. }
  2257. //门派
  2258. int LuaGetPlayerFaction(Lua_State * L)
  2259. {
  2260. int nPlayerIndex = GetPlayerIndex(L);
  2261. if (nPlayerIndex > 0)
  2262. {
  2263. char FactionName[100];
  2264. Player[nPlayerIndex].GetFactionName(FactionName, 100);
  2265. Lua_PushString(L, FactionName);
  2266. }
  2267. else
  2268. {
  2269. Lua_PushString(L,"");
  2270. }
  2271. return 1;
  2272. }
  2274. int LuaChangePlayerFaction(Lua_State * L)
  2275. {
  2276. int nPlayerIndex = GetPlayerIndex(L);
  2277. int nResult = 0;
  2278. if (nPlayerIndex > 0)
  2279. {
  2280. const char * szFactionName = Lua_ValueToString(L,1);
  2281. Player[nPlayerIndex].LeaveCurFaction();
  2282. if (strlen(szFactionName) == 0) 
  2283. {
  2284. nResult = 1;
  2285. }
  2286. else
  2287. {
  2288. nResult = Player[nPlayerIndex].AddFaction((char *)szFactionName);
  2289. }
  2290. }
  2291. Lua_PushNumber(L, nResult);
  2292. return 1;
  2293. }
  2295. //抗性 *************************************************************************************
  2296. //0表示当前,1表示原始的,2表示最大的
  2297. int LuaGetPlayerColdResist(Lua_State * L)
  2298. {
  2299. int nPlayerIndex = GetPlayerIndex(L);
  2300. if (nPlayerIndex > 0)
  2301. {
  2302. int nType = (int)Lua_ValueToNumber(L,1);
  2303. switch((int)Lua_ValueToNumber(L,1))
  2304. {
  2305. case 0:
  2306. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_CurrentColdResist);break;
  2307. case 1:
  2308. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_ColdResist); break;
  2309. case 2:
  2310. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_ColdResistMax);break;
  2311. default:
  2312. Lua_PushNil(L);
  2313. } 
  2314. }
  2315. else 
  2316. Lua_PushNil(L);
  2317. return 1;
  2318. }
  2320. int LuaSetPlayerColdResist(Lua_State * L)
  2321. {
  2322. int nPlayerIndex = GetPlayerIndex(L);
  2323. if (nPlayerIndex > 0)
  2324. {
  2325. int nValue = (int)Lua_ValueToNumber(L,2);
  2326. if (nValue < 0) nValue = 0;
  2327. if (nValue > Npc[Player[nPlayerIndex].m_nIndex].m_ColdResistMax) nValue = Npc[Player[nPlayerIndex].m_nIndex].m_ColdResistMax;
  2329. int nType = (int)Lua_ValueToNumber(L,1);
  2331. switch((int)Lua_ValueToNumber(L,1))
  2332. {
  2333. case 0:
  2334. Npc[Player[nPlayerIndex].m_nIndex].m_CurrentColdResist = nValue;
  2335. break;
  2337. case 1:
  2338. Npc[Player[nPlayerIndex].m_nIndex].m_ColdResist = nValue;
  2339. break;
  2340. case 2:
  2341. Npc[Player[nPlayerIndex].m_nIndex].m_ColdResistMax = nValue;
  2342. break;
  2343. }
  2346. } 
  2347. return 0;
  2349. }
  2351. int LuaGetPlayerFireResist(Lua_State * L)
  2352. {
  2353. int nPlayerIndex = GetPlayerIndex(L);
  2354. if (nPlayerIndex > 0)
  2355. {
  2357. int nType = (int)Lua_ValueToNumber(L,1);
  2358. switch((int)Lua_ValueToNumber(L,1))
  2359. {
  2360. case 0:
  2361. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_CurrentFireResist);break;
  2362. case 1:
  2363. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_FireResist); break;
  2364. case 2:
  2365. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_FireResistMax);break;
  2366. default:
  2367. Lua_PushNil(L);
  2368. }
  2369. } 
  2370. else 
  2371. Lua_PushNil(L);
  2372. return 1;
  2373. }
  2375. int LuaSetPlayerFireResist(Lua_State * L)
  2376. {
  2377. int nPlayerIndex = GetPlayerIndex(L);
  2378. if (nPlayerIndex > 0)
  2379. {
  2382. int nValue = (int)Lua_ValueToNumber(L,2);
  2383. if (nValue < 0) nValue = 0;
  2384. if (nValue > Npc[Player[nPlayerIndex].m_nIndex].m_FireResistMax) nValue = Npc[Player[nPlayerIndex].m_nIndex].m_FireResistMax;
  2386. int nType = (int)Lua_ValueToNumber(L,1);
  2388. switch((int)Lua_ValueToNumber(L,1))
  2389. {
  2390. case 0:
  2391. Npc[Player[nPlayerIndex].m_nIndex].m_CurrentFireResist = nValue;
  2392. break;
  2394. case 1:
  2395. Npc[Player[nPlayerIndex].m_nIndex].m_FireResist = nValue;
  2396. break;
  2397. case 2:
  2398. Npc[Player[nPlayerIndex].m_nIndex].m_FireResistMax = nValue;
  2399. break;
  2400. }
  2403. } 
  2404. return 0;
  2406. }
  2409. int LuaGetPlayerLightResist(Lua_State * L)
  2410. {
  2411. int nPlayerIndex = GetPlayerIndex(L);
  2412. if (nPlayerIndex > 0)
  2413. {
  2414. int nType = (int)Lua_ValueToNumber(L,1);
  2415. switch((int)Lua_ValueToNumber(L,1))
  2416. {
  2417. case 0:
  2418. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_CurrentLightResist);break;
  2419. case 1:
  2420. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_LightResist); break;
  2421. case 2:
  2422. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_LightResistMax);break;
  2423. default:
  2424. Lua_PushNil(L);
  2425. }
  2426. } 
  2427. else
  2428. Lua_PushNil(L);
  2429. return 1;
  2430. }
  2432. int LuaSetPlayerLightResist(Lua_State * L)
  2433. {
  2434. int nPlayerIndex = GetPlayerIndex(L);
  2435. if (nPlayerIndex > 0)
  2436. {
  2438. int nValue = (int)Lua_ValueToNumber(L,2);
  2439. if (nValue < 0) nValue = 0;
  2440. if (nValue > Npc[Player[nPlayerIndex].m_nIndex].m_LightResistMax) nValue = Npc[Player[nPlayerIndex].m_nIndex].m_LightResistMax;
  2442. int nType = (int)Lua_ValueToNumber(L,1);
  2444. switch((int)Lua_ValueToNumber(L,1))
  2445. {
  2446. case 0:
  2447. Npc[Player[nPlayerIndex].m_nIndex].m_CurrentLightResist = nValue;
  2448. break;
  2450. case 1:
  2451. Npc[Player[nPlayerIndex].m_nIndex].m_LightResist = nValue;
  2452. break;
  2453. case 2:
  2454. Npc[Player[nPlayerIndex].m_nIndex].m_LightResistMax = nValue;
  2455. break;
  2456. }
  2457. } 
  2458. else 
  2459. Lua_PushNil(L);
  2460. return 0;
  2461. }
  2464. int LuaGetPlayerPoisonResist(Lua_State * L)
  2465. {
  2466. int nPlayerIndex = GetPlayerIndex(L);
  2467. if (nPlayerIndex > 0)
  2468. {
  2469. int nType = (int)Lua_ValueToNumber(L,1);
  2470. switch((int)Lua_ValueToNumber(L,1))
  2471. {
  2472. case 0:
  2473. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_CurrentPoisonResist);break;
  2474. case 1:
  2475. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_PoisonResist); break;
  2476. case 2:
  2477. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_PoisonResistMax);break;
  2478. default:
  2479. Lua_PushNil(L);
  2480. }
  2481. } 
  2482. else
  2483. Lua_PushNil(L);
  2484. return 1;
  2485. }
  2487. int LuaSetPlayerPoisonResist(Lua_State * L)
  2488. {
  2489. int nPlayerIndex = GetPlayerIndex(L);
  2490. if (nPlayerIndex > 0)
  2491. {
  2492. {
  2493. int nValue = (int)Lua_ValueToNumber(L,2);
  2494.             if (nValue < 0) nValue = 0;
  2495.             if (nValue > Npc[Player[nPlayerIndex].m_nIndex].m_PoisonResistMax) nValue = Npc[Player[nPlayerIndex].m_nIndex].m_PoisonResistMax;
  2497.             int nType = (int)Lua_ValueToNumber(L,1);
  2499. switch((int)Lua_ValueToNumber(L,1))
  2500. {
  2501. case 0:
  2502. Npc[Player[nPlayerIndex].m_nIndex].m_CurrentPoisonResist = nValue;
  2503. break;
  2505. case 1:
  2506. Npc[Player[nPlayerIndex].m_nIndex].m_PoisonResist = nValue;
  2507.                 break;
  2508. case 2:
  2509. Npc[Player[nPlayerIndex].m_nIndex].m_PoisonResistMax = nValue;
  2510.                 break;
  2511. }
  2512. }
  2514. } 
  2517. return 0;
  2519. }
  2521. int LuaGetPlayerPhysicsResist(Lua_State * L)
  2522. {
  2523. int nPlayerIndex = GetPlayerIndex(L);
  2524. if (nPlayerIndex > 0)
  2525. {
  2527. {
  2528. int nType = (int)Lua_ValueToNumber(L,1);
  2529. switch((int)Lua_ValueToNumber(L,1))
  2530. {
  2531. case 0:
  2532. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_CurrentPhysicsResist);break;
  2533. case 1:
  2534. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_PhysicsResist); break;
  2535. case 2:
  2536. Lua_PushNumber(L, Npc[Player[nPlayerIndex].m_nIndex].m_PhysicsResistMax);break;
  2537. default:
  2538. Lua_PushNil(L);
  2539. }
  2540. }
  2542. } 
  2543. else
  2544. Lua_PushNil(L);
  2545. return 1;
  2546. }
  2550. int LuaSetPlayerPhysicsResist(Lua_State * L)
  2551. {
  2552. int nPlayerIndex = GetPlayerIndex(L);
  2553. if (nPlayerIndex > 0)
  2554. {
  2556. {
  2557. int nValue = (int)Lua_ValueToNumber(L,2);
  2558.             if (nValue < 0) nValue = 0;
  2559.             if (nValue > Npc[Player[nPlayerIndex].m_nIndex].m_PhysicsResistMax) nValue = Npc[Player[nPlayerIndex].m_nIndex].m_PhysicsResistMax;
  2561.             int nType = (int)Lua_ValueToNumber(L,1);
  2563. switch((int)Lua_ValueToNumber(L,1))
  2564. {
  2565. case 0:
  2566. Npc[Player[nPlayerIndex].m_nIndex].m_CurrentPhysicsResist = nValue;
  2567. break;
  2569. case 1:
  2570. Npc[Player[nPlayerIndex].m_nIndex].m_PhysicsResist = nValue;
  2571.                 break;
  2572. case 2:
  2573. Npc[Player[nPlayerIndex].m_nIndex].m_PhysicsResistMax = nValue;
  2574.                 break;
  2575. }
  2576. }
  2578. } 
  2579. return 0;
  2581. }
  2584. //经验值*********************************************************************
  2585. int LuaGetPlayerExp(Lua_State *L)
  2586. {
  2587. int nPlayerIndex = GetPlayerIndex(L);
  2588. if (nPlayerIndex > 0)
  2589. {
  2590.         Lua_PushNumber(L, Player[nPlayerIndex].m_nExp);
  2591. }
  2592. else
  2593. Lua_PushNil(L);
  2594. return 1;
  2595. }
  2597. //AddExp(200,10,0)
  2598. int LuaModifyPlayerExp(Lua_State * L)
  2599. {
  2600. int bAllTeamGet = 0;
  2601. if(Lua_GetTopIndex(L) >= 3) bAllTeamGet = (int)Lua_ValueToNumber(L,3);
  2603. int nDValue = (int)Lua_ValueToNumber(L,1);
  2604. int nTarLevel = (int)Lua_ValueToNumber(L,2);
  2606. int nPlayerIndex = GetPlayerIndex(L);
  2607. if (nPlayerIndex > 0)
  2608. {
  2609. if (bAllTeamGet)
  2610. Player[nPlayerIndex].AddExp(nDValue, nTarLevel);
  2611. else
  2612. Player[nPlayerIndex].AddSelfExp(nDValue, nTarLevel);
  2613. }
  2614. return 0;
  2615. }
  2617. int LuaAddOwnExp(Lua_State * L)
  2618. {
  2619. if (Lua_GetTopIndex(L) <=0 ) return 0;
  2620. int nPlayerIndex = GetPlayerIndex(L);
  2621. if (nPlayerIndex > 0)
  2622. {
  2623. int nExp = (int)Lua_ValueToNumber(L,1);
  2624. if (nExp >= 0)
  2625. Player[nPlayerIndex].DirectAddExp((int)Lua_ValueToNumber(L,1));
  2626. }
  2627. return 0;
  2628. }
  2630. int LuaGetPlayerLevel(Lua_State * L)
  2631. {
  2632. int nPlayerIndex = GetPlayerIndex(L);