|
blizzard.j codes for wc1.23 or below
[codes=jass]
globals
//===================================================
// Database Variable For 1.23
//===================================================
gamecache udg_DB_database = null
endglobals
//============================================================================
// GetHandle Fcuntion For 1.23
//============================================================================
function DB_H2I takes handle h returns integer
return h
return 0
endfunction
//============================================================================
// StringHash Fcuntion For 1.23
//============================================================================
function DB_RBS2I takes string s returns integer
return s
return 0
endfunction
//============================================================================
// Assist Fcuntions For 1.23 (Don't use these in your program)
//============================================================================
function DB_I2Player takes integer i returns player
return i
return null
endfunction
function DB_I2Widget takes integer i returns widget
return i
return null
endfunction
function DB_I2Destructable takes integer i returns destructable
return i
return null
endfunction
function DB_I2Item takes integer i returns item
return i
return null
endfunction
function DB_I2Unit takes integer i returns unit
return i
return null
endfunction
function DB_I2Ability takes integer i returns ability
return i
return null
endfunction
function DB_I2Timer takes integer i returns timer
return i
return null
endfunction
function DB_I2Trigger takes integer i returns trigger
return i
return null
endfunction
function DB_I2TriggerCondition takes integer i returns triggercondition
return i
return null
endfunction
function DB_I2TriggerAction takes integer i returns triggeraction
return i
return null
endfunction
function DB_I2Event takes integer i returns event
return i
return null
endfunction
function DB_I2Force takes integer i returns force
return i
return null
endfunction
function DB_I2Group takes integer i returns group
return i
return null
endfunction
function DB_I2Location takes integer i returns location
return i
return null
endfunction
function DB_I2Rect takes integer i returns rect
return i
return null
endfunction
function DB_I2BoolExpr takes integer i returns boolexpr
return i
return null
endfunction
function DB_I2Sound takes integer i returns sound
return i
return null
endfunction
function DB_I2Effect takes integer i returns effect
return i
return null
endfunction
function DB_I2UnitPool takes integer i returns unitpool
return i
return null
endfunction
function DB_I2ItemPool takes integer i returns itempool
return i
return null
endfunction
function DB_I2Quest takes integer i returns quest
return i
return null
endfunction
function DB_I2QuestItem takes integer i returns questitem
return i
return null
endfunction
function DB_I2DefeatCondition takes integer i returns defeatcondition
return i
return null
endfunction
function DB_I2TimerDialog takes integer i returns timerdialog
return i
return null
endfunction
function DB_I2Leaderboard takes integer i returns leaderboard
return i
return null
endfunction
function DB_I2Multiboard takes integer i returns multiboard
return i
return null
endfunction
function DB_I2MultiboardItem takes integer i returns multiboarditem
return i
return null
endfunction
function DB_I2Trackable takes integer i returns trackable
return i
return null
endfunction
function DB_I2Dialog takes integer i returns dialog
return i
return null
endfunction
function DB_I2Button takes integer i returns button
return i
return null
endfunction
function DB_I2TextTag takes integer i returns texttag
return i
return null
endfunction
function DB_I2Lightning takes integer i returns lightning
return i
return null
endfunction
function DB_I2Image takes integer i returns image
return i
return null
endfunction
function DB_I2Ubersplat takes integer i returns ubersplat
return i
return null
endfunction
function DB_I2Region takes integer i returns region
return i
return null
endfunction
function DB_I2FogState takes integer i returns fogstate
return i
return null
endfunction
function DB_I2FogModifier takes integer i returns fogmodifier
return i
return null
endfunction
//============================================================================
// Database Init Functions For 1.23
//============================================================================
function DB_InitDatabase takes nothing returns nothing
call FlushGameCache(udg_DB_database)
set udg_DB_database = InitGameCache("DatabaseSystem")
endfunction
//============================================================================
// Database Functions For 1.23
//============================================================================
function DB_StoreBoolean takes handle h, string key, boolean value returns nothing
if value != true and HaveStoredBoolean(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredBoolean(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreBoolean(udg_DB_database, I2S(DB_H2I(h)), key, value)
endif
endfunction
//============================================================================
function DB_LoadBoolean takes handle h, string key returns boolean
if HaveStoredBoolean(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return GetStoredBoolean(udg_DB_database, I2S(DB_H2I(h)), key)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return false
endif
endfunction
//============================================================================
function DB_StoreInteger takes handle h, string key, integer value returns nothing
if value == 0 and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, value)
endif
endfunction
//============================================================================
function DB_LoadInteger takes handle h, string key returns integer
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return 0
endif
endfunction
//============================================================================
function DB_StoreReal takes handle h, string key, real value returns nothing
if value == 0.00 and HaveStoredReal(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredReal(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreReal(udg_DB_database, I2S(DB_H2I(h)), key, value)
endif
endfunction
//============================================================================
function DB_LoadReal takes handle h, string key returns real
if HaveStoredReal(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return GetStoredReal(udg_DB_database, I2S(DB_H2I(h)), key)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return 0.00
endif
endfunction
//============================================================================
function DB_StoreString takes handle h, string key, string value returns nothing
if (value == "" or value == null) and HaveStoredString(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredString(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreString(udg_DB_database, I2S(DB_H2I(h)), key, value)
endif
endfunction
//============================================================================
function DB_LoadString takes handle h, string key returns string
if HaveStoredString(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return GetStoredString(udg_DB_database, I2S(DB_H2I(h)), key)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StorePlayer takes handle h, string key, player value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadPlayer takes handle h, string key returns player
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Player(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreWidget takes handle h, string key, widget value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadWidget takes handle h, string key returns widget
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Widget(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreDestructable takes handle h, string key, destructable value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadDestructable takes handle h, string key returns destructable
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Destructable(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreItem takes handle h, string key, item value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadItem takes handle h, string key returns item
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Item(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreUnit takes handle h, string key, unit value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadUnit takes handle h, string key returns unit
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Unit(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreAbility takes handle h, string key, ability value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadAbility takes handle h, string key returns ability
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Ability(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTimer takes handle h, string key, timer value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTimer takes handle h, string key returns timer
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Timer(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTrigger takes handle h, string key, trigger value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTrigger takes handle h, string key returns trigger
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Trigger(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTriggerCondition takes handle h, string key, triggercondition value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTriggerCondition takes handle h, string key returns triggercondition
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2TriggerCondition(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTriggerAction takes handle h, string key, triggeraction value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTriggerAction takes handle h, string key returns triggeraction
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2TriggerAction(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreEvent takes handle h, string key, event value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadEvent takes handle h, string key returns event
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Event(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreForce takes handle h, string key, force value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadForce takes handle h, string key returns force
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Force(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreGroup takes handle h, string key, group value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadGroup takes handle h, string key returns group
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Group(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreLocation takes handle h, string key, location value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadLocation takes handle h, string key returns location
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Location(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreRect takes handle h, string key, rect value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadRect takes handle h, string key returns rect
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Rect(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreBoolExpr takes handle h, string key, boolexpr value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadBoolExpr takes handle h, string key returns boolexpr
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2BoolExpr(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreSound takes handle h, string key, sound value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadSound takes handle h, string key returns sound
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Sound(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreEffect takes handle h, string key, effect value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadEffect takes handle h, string key returns effect
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Effect(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreUnitPool takes handle h, string key, unitpool value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadUnitPool takes handle h, string key returns unitpool
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2UnitPool(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreItemPool takes handle h, string key, itempool value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadItemPool takes handle h, string key returns itempool
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2ItemPool(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreQuest takes handle h, string key, quest value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadQuest takes handle h, string key returns quest
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Quest(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreQuestItem takes handle h, string key, questitem value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadQuestItem takes handle h, string key returns questitem
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2QuestItem(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreDefeatCondition takes handle h, string key, defeatcondition value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadDefeatCondition takes handle h, string key returns defeatcondition
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2DefeatCondition(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTimerDialog takes handle h, string key, timerdialog value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTimerDialog takes handle h, string key returns timerdialog
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2TimerDialog(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreLeaderboard takes handle h, string key, leaderboard value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadLeaderboard takes handle h, string key returns leaderboard
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Leaderboard(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreMultiboard takes handle h, string key, multiboard value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadMultiboard takes handle h, string key returns multiboard
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Multiboard(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreMultiboardItem takes handle h, string key, multiboarditem value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadMultiboardItem takes handle h, string key returns multiboarditem
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2MultiboardItem(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTrackable takes handle h, string key, trackable value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTrackable takes handle h, string key returns trackable
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Trackable(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreDialog takes handle h, string key, dialog value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadDialog takes handle h, string key returns dialog
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Dialog(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreButton takes handle h, string key, button value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadButton takes handle h, string key returns button
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Button(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTextTag takes handle h, string key, texttag value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadTextTag takes handle h, string key returns texttag
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2TextTag(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreLightning takes handle h, string key, lightning value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadLightning takes handle h, string key returns lightning
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Lightning(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreImage takes handle h, string key, image value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadImage takes handle h, string key returns image
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Image(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreUbersplat takes handle h, string key, ubersplat value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadUbersplat takes handle h, string key returns ubersplat
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Ubersplat(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreRegion takes handle h, string key, region value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadRegion takes handle h, string key returns region
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2Region(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreFogState takes handle h, string key, fogstate value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadFogState takes handle h, string key returns fogstate
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2FogState(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreFogModifier takes handle h, string key, fogmodifier value returns nothing
if value == null and HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
call FlushStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key)
else
call StoreInteger(udg_DB_database, I2S(DB_H2I(h)), key, DB_H2I(value))
endif
endfunction
//============================================================================
function DB_LoadFogModifier takes handle h, string key returns fogmodifier
if HaveStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key) == true then
return DB_I2FogModifier(GetStoredInteger(udg_DB_database, I2S(DB_H2I(h)), key))
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_DeleteHandleData takes handle h returns nothing
call FlushStoredMission(udg_DB_database, I2S(DB_H2I(h)))
endfunction
[/codes]
blizzard.j codes for wc1.24b
[codes=jass]
globals
//===================================================
// Database Variable For 1.24
//===================================================
hashtable udg_DB_database = null
endglobals
//============================================================================
// GetHandle Fcuntion For 1.24
//============================================================================
function DB_H2I takes handle h returns integer
return GetHandleId(h)
endfunction
//============================================================================
// StringHash Fcuntion For 1.24
//============================================================================
function DB_RBS2I takes string s returns integer
return StringHash(s)
endfunction
//============================================================================
// Database Init Functions For 1.24
//============================================================================
function DB_InitDatabase takes nothing returns nothing
call FlushParentHashtable(udg_DB_database)
set udg_DB_database = InitHashtable()
endfunction
//============================================================================
// Database Functions For 1.24
//============================================================================
function DB_StoreBoolean takes handle h, string key, boolean value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value != true and HaveSavedBoolean(udg_DB_database, hid, sh) == true then
call RemoveSavedBoolean(udg_DB_database, hid, sh)
else
call SaveBoolean(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadBoolean takes handle h, string key returns boolean
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedBoolean(udg_DB_database, hid, sh) == true then
return LoadBoolean(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return false
endif
endfunction
//============================================================================
function DB_StoreInteger takes handle h, string key, integer value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == 0 and HaveSavedInteger(udg_DB_database, hid, sh) == true then
call RemoveSavedInteger(udg_DB_database, hid, sh)
else
call SaveInteger(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadInteger takes handle h, string key returns integer
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedInteger(udg_DB_database, hid, sh) == true then
return LoadInteger(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return 0
endif
endfunction
//============================================================================
function DB_StoreReal takes handle h, string key, real value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == 0.00 and HaveSavedReal(udg_DB_database, hid, sh) == true then
call RemoveSavedReal(udg_DB_database, hid, sh)
else
call SaveReal(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadReal takes handle h, string key returns real
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedReal(udg_DB_database, hid, sh) == true then
return LoadReal(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return 0.00
endif
endfunction
//============================================================================
function DB_StoreString takes handle h, string key, string value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if (value == "" or value == null) and HaveSavedString(udg_DB_database, hid, sh) == true then
call RemoveSavedString(udg_DB_database, hid, sh)
else
call SaveStr(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadString takes handle h, string key returns string
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedString(udg_DB_database, hid, sh) == true then
return LoadStr(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StorePlayer takes handle h, string key, player value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadPlayerHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SavePlayerHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadPlayer takes handle h, string key returns player
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadPlayerHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreWidget takes handle h, string key, widget value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadWidgetHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveWidgetHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadWidget takes handle h, string key returns widget
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadWidgetHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreDestructable takes handle h, string key, destructable value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadDestructableHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveDestructableHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadDestructable takes handle h, string key returns destructable
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadDestructableHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreItem takes handle h, string key, item value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadItemHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveItemHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadItem takes handle h, string key returns item
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadItemHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreUnit takes handle h, string key, unit value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadUnitHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveUnitHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadUnit takes handle h, string key returns unit
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadUnitHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreAbility takes handle h, string key, ability value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadAbilityHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveAbilityHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadAbility takes handle h, string key returns ability
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadAbilityHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTimer takes handle h, string key, timer value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTimerHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTimerHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTimer takes handle h, string key returns timer
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTimerHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTrigger takes handle h, string key, trigger value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTriggerHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTriggerHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTrigger takes handle h, string key returns trigger
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTriggerHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTriggerCondition takes handle h, string key, triggercondition value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTriggerConditionHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTriggerConditionHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTriggerCondition takes handle h, string key returns triggercondition
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTriggerConditionHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTriggerAction takes handle h, string key, triggeraction value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTriggerActionHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTriggerActionHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTriggerAction takes handle h, string key returns triggeraction
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTriggerActionHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTriggerEvent takes handle h, string key, event value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTriggerEventHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTriggerEventHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTriggerEvent takes handle h, string key returns event
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTriggerEventHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreForce takes handle h, string key, force value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadForceHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveForceHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadForce takes handle h, string key returns force
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadForceHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreGroup takes handle h, string key, group value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadGroupHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveGroupHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadGroup takes handle h, string key returns group
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadGroupHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreLocation takes handle h, string key, location value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadLocationHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveLocationHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadLocation takes handle h, string key returns location
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadLocationHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreRect takes handle h, string key, rect value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadRectHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveRectHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadRect takes handle h, string key returns rect
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadRectHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreBooleanExpr takes handle h, string key, boolexpr value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadBooleanExprHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveBooleanExprHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadBooleanExpr takes handle h, string key returns boolexpr
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadBooleanExprHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreSound takes handle h, string key, sound value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadSoundHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveSoundHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadSound takes handle h, string key returns sound
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadSoundHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreEffect takes handle h, string key, effect value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadEffectHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveEffectHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadEffect takes handle h, string key returns effect
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadEffectHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreUnitPool takes handle h, string key, unitpool value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadUnitPoolHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveUnitPoolHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadUnitPool takes handle h, string key returns unitpool
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadUnitPoolHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreItemPool takes handle h, string key, itempool value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadItemPoolHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveItemPoolHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadItemPool takes handle h, string key returns itempool
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadItemPoolHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreQuest takes handle h, string key, quest value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadQuestHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveQuestHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadQuest takes handle h, string key returns quest
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadQuestHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreQuestItem takes handle h, string key, questitem value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadQuestItemHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveQuestItemHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadQuestItem takes handle h, string key returns questitem
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadQuestItemHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreDefeatCondition takes handle h, string key, defeatcondition value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadDefeatConditionHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveDefeatConditionHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadDefeatCondition takes handle h, string key returns defeatcondition
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadDefeatConditionHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTimerDialog takes handle h, string key, timerdialog value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTimerDialogHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTimerDialogHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTimerDialog takes handle h, string key returns timerdialog
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTimerDialogHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreLeaderboard takes handle h, string key, leaderboard value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadLeaderboardHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveLeaderboardHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadLeaderboard takes handle h, string key returns leaderboard
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadLeaderboardHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreMultiboard takes handle h, string key, multiboard value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadMultiboardHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveMultiboardHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadMultiboard takes handle h, string key returns multiboard
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadMultiboardHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreMultiboardItem takes handle h, string key, multiboarditem value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadMultiboardItemHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveMultiboardItemHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadMultiboardItem takes handle h, string key returns multiboarditem
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadMultiboardItemHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTrackable takes handle h, string key, trackable value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTrackableHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTrackableHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTrackable takes handle h, string key returns trackable
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTrackableHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreDialog takes handle h, string key, dialog value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadDialogHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveDialogHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadDialog takes handle h, string key returns dialog
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadDialogHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreButton takes handle h, string key, button value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadButtonHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveButtonHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadButton takes handle h, string key returns button
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadButtonHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreTextTag takes handle h, string key, texttag value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadTextTagHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveTextTagHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadTextTag takes handle h, string key returns texttag
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadTextTagHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreLightning takes handle h, string key, lightning value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadLightningHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveLightningHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadLightning takes handle h, string key returns lightning
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadLightningHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreImage takes handle h, string key, image value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadImageHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveImageHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadImage takes handle h, string key returns image
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadImageHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreUbersplat takes handle h, string key, ubersplat value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadUbersplatHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveUbersplatHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadUbersplat takes handle h, string key returns ubersplat
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadUbersplatHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreRegion takes handle h, string key, region value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadRegionHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveRegionHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadRegion takes handle h, string key returns region
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadRegionHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreFogState takes handle h, string key, fogstate value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadFogStateHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveFogStateHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadFogState takes handle h, string key returns fogstate
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadFogStateHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_StoreFogModifier takes handle h, string key, fogmodifier value returns nothing
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if value == null and HaveSavedHandle(udg_DB_database, hid, sh) == true and LoadFogModifierHandle(udg_DB_database, hid, sh) != null then
call RemoveSavedHandle(udg_DB_database, hid, sh)
else
call SaveFogModifierHandle(udg_DB_database, hid, sh, value)
endif
endfunction
//============================================================================
function DB_LoadFogModifier takes handle h, string key returns fogmodifier
local integer hid = DB_H2I(h)
local integer sh = StringHash(key)
if HaveSavedHandle(udg_DB_database, hid, sh) == true then
return LoadFogModifierHandle(udg_DB_database, hid, sh)
else
//call DisplayTextToPlayer(GetLocalPlayer(), 0., 0., "DBS: Key not found")
return null
endif
endfunction
//============================================================================
function DB_DeleteHandleData takes handle h returns nothing
call FlushChildHashtable(udg_DB_database, DB_H2I(h))
endfunction
[/codes] |
|