XGM Forum - Ошибка в коде?

Вот как-то не могу врубится... короче вот код триггера

Код:

function Trig_MineWithTimer_Func002Func003C takes nothing returns boolean
    if ( not ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) == 25.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineWithTimer_Func002Func004C takes nothing returns boolean
    if ( not ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) == 20.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineWithTimer_Func002Func005C takes nothing returns boolean
    if ( not ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) == 15.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineWithTimer_Func002Func006C takes nothing returns boolean
    if ( not ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) == 10.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineWithTimer_Func002Func007C takes nothing returns boolean
    if ( not ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) == 5.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineWithTimer_Func002Func008C takes nothing returns boolean
    if ( not ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) == 0.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineWithTimer_Func002A takes nothing returns nothing
    local effect e
    call SetUnitLifeBJ( GetEnumUnit(), ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) - 5.00 ) )
    if ( Trig_MineWithTimer_Func002Func003C() ) then
        call DestroyTextTagBJ( ty )
        call CreateTextTagLocBJ( "TRIGSTR_160", GetUnitLoc(GetEnumUnit()), 0, 14.00, 100, 0.00, 0.00, 0 )
        set ty = GetLastCreatedTextTag()
    else
    endif
    if ( Trig_MineWithTimer_Func002Func004C() ) then
        call DestroyTextTagBJ(ty)
        call CreateTextTagLocBJ( "TRIGSTR_161", GetUnitLoc(GetEnumUnit()), 0, 14.00, 100, 0.00, 0.00, 0 )
        set ty = GetLastCreatedTextTag()
    else
    endif
    if ( Trig_MineWithTimer_Func002Func005C() ) then
        call DestroyTextTagBJ(ty)
        call CreateTextTagLocBJ( "TRIGSTR_162", GetUnitLoc(GetEnumUnit()), 0, 14.00, 100, 0.00, 0.00, 0 )
        set ty = GetLastCreatedTextTag()
    else
    endif
    if ( Trig_MineWithTimer_Func002Func006C() ) then
        call DestroyTextTagBJ(ty)
        call CreateTextTagLocBJ( "TRIGSTR_163", GetUnitLoc(GetEnumUnit()), 0, 14.00, 100, 0.00, 0.00, 0 )
        set ty = GetLastCreatedTextTag()
    else
    endif
    if ( Trig_MineWithTimer_Func002Func007C() ) then
        call DestroyTextTagBJ( ty )
        call CreateTextTagLocBJ( "TRIGSTR_164", GetUnitLoc(GetEnumUnit()), 0, 14.00, 100, 0.00, 0.00, 0 )
        set ty = GetLastCreatedTextTag()
    else
    endif
    if ( Trig_MineWithTimer_Func002Func008C() ) then
        call DestroyTextTagBJ( ty )
        call AddSpecialEffectLocBJ( GetUnitLoc(GetEnumUnit()), "Objects\\Spawnmodels\\Human\\HCancelDeath\\HCancelDeath.mdl" )
        set e = GetLastCreatedEffectBJ()
        call UnitDamagePointLoc( GetEnumUnit(), 0, 250.00, GetUnitLoc(GetEnumUnit()), 2500.00, ATTACK_TYPE_SIEGE, DAMAGE_TYPE_NORMAL )
        call TriggerSleepAction( 1.00 )
        call DestroyEffectBJ( e )
        call DestroyTextTagBJ( ty )
    else
    endif
endfunction

function Trig_MineWithTimer_Actions takes nothing returns nothing
    local texttag ty
    call ForGroupBJ( GetUnitsOfTypeIdAll('n00C'), function Trig_MineWithTimer_Func002A )
endfunction

//===========================================================================
function InitTrig_MineWithTimer takes nothing returns nothing
    set gg_trg_MineWithTimer = CreateTrigger(  )
    call TriggerRegisterTimerEventPeriodic( gg_trg_MineWithTimer, 1.00 )
    call TriggerAddAction( gg_trg_MineWithTimer, function Trig_MineWithTimer_Actions )
endfunction

- выдает кучку ошибок - как я понял он не видит объявления локальной переменной ty - а теперь внимание вопрос - куда её поместить чтобы триггер работал?

Ваши права в разделе

Вы не можете создавать темы

Вы не можете отвечать на сообщения

Вы не можете прикреплять файлы

Вы можете скачивать файлы

BB-коды Вкл.

Смайлики Вкл.

[IMG] код Вкл.

HTML код Выкл.

DioD offline Опыт: 45,134 Активность:	Проверь сам в конце концов
18.06.2006, 03:33	#2 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Celebrate offline Опыт: 849 Активность:	ComotozNick ясное дело ругается ты же ty не объявляешь. Все локальные переменные должны объявляться в начале функции. И нах ты удаляешь тексттаг, когда его даже не создал?!
18.06.2006, 10:20	#3 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Celebrate offline Опыт: 849 Активность:	Код: `function Trig_MineWithTimer_Func002A takes nothing returns nothing local effect e call SetUnitLifeBJ...` ComotozNick а ty в этой функции не объявлена. В каждой новой функции - свои локалки :)
18.06.2006, 12:37	#5 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

ComotozNick Активность: 666 offline Опыт: 26,206 Активность:	ну смотри эффенктом все работает, в с этим нет... так где объявить локалку, чтобы она действовала во всем тригге...? (посмотри код я его немного поправил - сначала я забыл убрать из тригга глобалку...)
18.06.2006, 12:42	#6 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

DioD offline Опыт: 45,134 Активность:	99% мусора и ничего больше, убири мусор и сразу увидишь в чём дело.
18.06.2006, 12:49	#7 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

DioD offline Опыт: 45,134 Активность:	Вот именно что я знаю, просто если постоянно говорить готовый результат толку не будет. Я даже прогу кинул специальную, скачай не пожалеешь.
18.06.2006, 13:03	#8 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

ComotozNick Активность: 666 offline Опыт: 26,206 Активность:	DioD конечно спасибо (у проги посмотрел лучше интерфейс чем у той с которой я работал - JassEditor_1.1a) - щас попробую прогнать через прогу...
18.06.2006, 13:08	#9 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

DioD offline Опыт: 45,134 Активность:	Возможности этой проги очень обширны, главное настроить её правильно.
18.06.2006, 13:24	#10 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Опции темы	Поиск в этой теме
Версия для печати	Поиск в этой теме: Расширенный поиск