Category

Development Platform
Home > SourceCode/Document > Game Program > Game Server Simulator > View Code
KScriptValueSet.cpp
Package: SwordOnline.rar　[view]
Upload User: dzyhzl
Upload Date: 2019-04-29
Package Size: 56270k
Code Size: 4k
Category:

Game Server Simulator

Development Platform:

C/C++

KScriptValueSet.cpp：Code Content
  1. // KScriptValueSet.cpp: implementation of the KScriptValueSet class.
  2. //
  3. //////////////////////////////////////////////////////////////////////
  4. #include "KCore.h"
  6. #include "KScriptValueSet.h"
  7. #include "KIniFile.h"
  8. KScriptValueSet g_ScriptValueSet;
  9. //////////////////////////////////////////////////////////////////////
  10. // Construction/Destruction
  11. //////////////////////////////////////////////////////////////////////
  13. KScriptValueSet::KScriptValueSet()
  14. {
  16. }
  18. KScriptValueSet::~KScriptValueSet()
  19. {
  21. }
  24. BOOL KScriptValueSet::Load(char * FileName)
  25. {
  26. KIniFile File;
  27. if (!File.Load(FileName)) return FALSE;
  29. char ValueName[40];
  30. strcpy(ValueName, "");
  31. while (File.GetNextKey("StringValue", ValueName, ValueName))
  32. {
  33. char StringValue[100];
  34. File.GetString("StringValue", ValueName, "", StringValue, 100);
  35. TStringValueNode * pNode = new TStringValueNode(ValueName, StringValue);
  36. m_StringValueList.AddTail(pNode);
  37. }
  39. strcpy(ValueName,"");
  40. while (File.GetNextKey("IntegerValue", ValueName, ValueName))
  41. {
  42. int nValue;
  43. File.GetInteger("IntegerValue", ValueName, 0, &nValue);
  44. TIntegerValueNode * pNode = new TIntegerValueNode(ValueName, nValue);
  45. m_IntegerValueList.AddTail(pNode);
  46. }
  47. return TRUE;
  48. }
  50. BOOL KScriptValueSet::Save(char * FileName)
  51. {
  53. KIniFile File;
  54. File.Load(FileName);
  56. TStringValueNode * pStrNode = (TStringValueNode*)m_StringValueList.GetHead();
  57. while(pStrNode)
  58. {
  59. File.WriteString("StringValue", pStrNode->ValueName, pStrNode->strValue);
  60. pStrNode = (TStringValueNode*)pStrNode->GetNext();
  61. }
  63. TIntegerValueNode * pIntNode = (TIntegerValueNode*)m_IntegerValueList.GetHead();
  64. while(pIntNode)
  65. {
  66. File.WriteInteger("IntegerValue", pIntNode->ValueName, pIntNode->intValue);
  67. pIntNode = (TIntegerValueNode * ) pIntNode->GetNext();
  68. }
  70. File.Save(FileName);
  71. return TRUE;
  72. }
  74. BOOL KScriptValueSet::SetValue(char * pValueName, char * pValue)
  75. {
  76. TStringValueNode * pNode = (TStringValueNode *) SearchValue(pValueName, 0);
  77. if (pNode == NULL)
  78. {
  79. AddValue(pValueName , pValue);
  80. return FALSE;
  81. }
  82. else 
  83. {
  84. strcpy(pNode->strValue, pValue);
  85. return TRUE;
  86. }
  87. return FALSE;
  88. }
  90. BOOL KScriptValueSet::SetValue(char * pValueName, int  nValue)
  91. {
  92. TIntegerValueNode * pNode = (TIntegerValueNode *) SearchValue(pValueName, 1);
  94. if (pNode == NULL)
  95. {
  96. AddValue(pValueName, nValue);
  97. return FALSE;
  98. }
  99. else
  100. {
  101. pNode->intValue = nValue;
  102. return TRUE;
  103. }
  105. return FALSE;
  106. }
  110. BOOL KScriptValueSet::GetValue(char * pValueName, char * pValue)
  111. {
  112. TStringValueNode * pNode = (TStringValueNode *) SearchValue(pValueName, 0);
  113. if (pNode == NULL) {strcpy(pValue,""); return FALSE;};
  114. strcpy(pValue, pNode->strValue);
  115. return TRUE;
  116. }
  118. BOOL KScriptValueSet::GetValue(char * pValueName, int *pValue)
  119. {
  120. TIntegerValueNode * pNode = (TIntegerValueNode *) SearchValue(pValueName, 1);
  121. if (pNode == NULL) {*pValue = 0 ; return FALSE;};
  122. *pValue = pNode->intValue;
  123. return TRUE;
  124. }
  127. void KScriptValueSet::AddValue(char * pValueName , char * pValue)
  128. {
  129. TStringValueNode * pNode = new TStringValueNode(pValueName, pValue);
  130. m_StringValueList.AddTail(pNode);
  131. }
  133. void KScriptValueSet::AddValue(char * pValueName, int Value)
  134. {
  135. TIntegerValueNode * pNode = new TIntegerValueNode(pValueName, Value);
  136. m_IntegerValueList.AddTail(pNode);
  137. }
  139. KNode* KScriptValueSet::SearchValue(char * pValueName, int nType)
  140. {
  141. switch(nType)
  142. {
  143. case 0:
  144. {
  145. TStringValueNode * pNode = (TStringValueNode*)m_StringValueList.GetHead();
  146. while (pNode)
  147. {
  148. if (!strcmp(pNode->ValueName, pValueName)) return pNode;
  149. pNode = (TStringValueNode*)pNode->GetNext();
  150. }
  152. }break;
  153. case 1:
  154. {
  155. TIntegerValueNode * pNode = (TIntegerValueNode*)m_IntegerValueList.GetHead();
  156. while (pNode)
  157. {
  158. if (!strcmp(pNode->ValueName, pValueName)) return pNode;
  159. pNode = (TIntegerValueNode*)pNode->GetNext();
  160. }
  162. }break;
  163. }
  164. return NULL;
  165. }