天工维度魔兽争霸开发者社区-全国最大的TJ集中营-原提百万联盟

标题: Jass功能:唯一ID表 [打印本页]
作者: arrssg    时间: 2023-8-3 23:23
标题: Jass功能:唯一ID表
本帖最后由 arrssg 于 2023-8-8 16:02 编辑

不知道有用没?

  1. #ifndef UniqueTableIncluded
  2. #define UniqueTableIncluded
  3. library UniqueTable
  4. globals
  5. private hashtable table=InitHashtable()
  6. private integer columns=0
  7. endglobals

  9. function UT_IsValidColumn takes integer column returns boolean
  10.     return column>0 and column<=columns
  11. endfunction
  12. function UT_NewColumn takes nothing returns integer
  13.     set columns=columns+1
  14.     return columns
  15. endfunction
  16. function UT_RemoveColumn takes integer column returns boolean
  17.     if(UT_IsValidColumn(column))then
  18.         call FlushChildHashtable(table,column)
  19.         return true
  20.     endif
  21.     return false
  22. endfunction

  24. function UT_IsValidSpace takes integer column,integer space returns boolean
  25.     if(space<=0)then
  26.         return false
  27.     endif
  28.     if(UT_IsValidColumn(column))then
  29.         return false
  30.     endif
  31.     return HaveSavedInteger(table,column,space)
  32. endfunction
  33. function UT_NewSpace takes integer column,integer value returns integer
  34.     local integer space=LoadInteger(table,column,-1)+1
  35.     call SaveInteger(table,column,-1,space)
  36.     call SaveInteger(table,column,space,value)
  37.     return space
  38. endfunction

  40. function UT_RemoveSpace takes integer column,integer space returns boolean
  41.     if(not UT_IsValidSpace(column,space))then
  42.         return false
  43.     endif
  44.     call RemoveSavedInteger(table,column,space)
  45.     return true
  46. endfunction

  48. function UT_SetValue takes integer column,integer space,integer value returns nothing
  49.     if(not UT_IsValidSpace(column,space))then
  50.         return
  51.     endif
  52.     call SaveInteger(table,column,space,value)
  53. endfunction
  54. function UT_GetValue takes integer column,integer space returns integer
  55.     if(not UT_IsValidSpace(column,space))then
  56.         return 0
  57.     endif
  58.     return LoadInteger(table,column,space)
  59. endfunction

  61. endlibrary
  62. #endif
复制代码






欢迎光临 天工维度魔兽争霸开发者社区-全国最大的TJ集中营-原提百万联盟 (http://bbs.mvprpg.com/) Powered by Discuz! X3.4