изначально будет false, так как ничего в хэш-таблицу под данным дочерним ключем записано не было

я о видео моего бурана.

<- картинка

странно оно всё конечно работает

if not HaveSavedBoolean(HT, TimerId, 'ends') and GetRandomInt(1, 100) <= 30 then

function SpellBlizzardCallback1 takes nothing returns nothing
	local integer i // Номер тика
	local integer last // Номер последнего тика
	local integer xk // Ключ для x
	local integer yk // Ключ для y
	local real x // Координата x
	local real y // Координата y
	
	set Timer = GetExpiredTimer()
	set TimerId = GetHandleId(Timer)
    
	set Caster = LoadUnitHandle(HT, TimerId, 'cstr')
	set CasterX = LoadReal(HT, TimerId, 'cstX')
	set CasterY = LoadReal(HT, TimerId, 'cstY')

	set i = LoadInteger(HT, TimerId, 'tick') // Получаем номер тика
	call SaveInteger(HT, TimerId, 'tick', i + 1) // Увеличиваем тик на единицу

	set last = LoadInteger(HT, TimerId, 'last') // Получаем номер последнего тика

	// Проверяем флаг и рандомим плямбу
	if HaveSavedBoolean(HT, TimerId, 'ends') and GetRandomInt(1, 100) <= 30 then
		// Рандомим координаты плямбы.
		set x = CasterX + SpellBlizzardRange * GetRandomReal(-1, 1)
		set y = CasterY + SpellBlizzardRange * GetRandomReal(-1, 1)

		set last = last + 8 // Откладываем на восемь тиков
		call SaveInteger(HT, TimerId, 'last', last) // Сохраняем тик последнего урона

		// Расчитываем ключ для сохранения
		set xk = last * 2
		set yk = xk + 1

		// Сохраняем координаты
		call SaveReal(HT, TimerId, xk, x)
		call SaveReal(HT, TimerId, yk, y)

		// Спавним эффект
		// DestroyEffect ... лень писать
	endif

	// Проверяем плямбу на текущем тике
	set xk = i * 2
	set yk = xk + 1

	// Для проверки тупо проверяем, сохранено ли что либо на ячейке
	if HaveSavedReal(HT, TimerId, xk) then 
		set x = LoadReal(HT, TimerId, xk)
		set y = LoadReal(HT, TimerId, yk)

		// Наносим урон в координанах
	endif

	// Проверяем приказ и пишем флаг
	if GetUnitCurrentOrder(Caster) != 0xd0079 then // blizzard
		call SaveBoolean(HT, TimerId, 'ends', true)
	endif

	// Останавливаем каст если выполнены условия
	if HaveSavedBoolean(HT, TimerId, 'ends') and i >= last then 
		call PauseTimer(Timer)
		call DestroyTimer(Timer)
		call FlushChildHashtable(HT, TimerId)
	endif
endfunction 

Вместо этого не умножаю на два, а просто вместо единицы прибавляю 100 для уверенности.

set i = 14 // Номер тика, integer
set xk = i * 2 // Ключ x, integer
set yk = xk + 1 // Ключ y, integer
set x = GetReal(xk) // Значение x, real
set y = GetReal(yk) // Значение y, real

я использую StringHash()

А вот автору удобнее работать со своим кодом.

у каждого свои 100500 систем

nazarpunk, что-то понял но 80% не понял :D

xk = i * 2
yk = i * 2 + 1

знал бы ты что я год назад лепил...