XGM Forum - Experience and Respawn System

//=========================================================================== function InitTrig_AddCreepToSystem takes nothing returns nothing local region rectRegion = CreateRegion() call RegionAddRect(rectRegion,GetWorldBounds()) set gg_trg_AddCreepToSystem = CreateTrigger( ) call TriggerRegisterEnterRegion(gg_trg_AddCreepToSystem, rectRegion, null) call TriggerAddCondition( gg_trg_AddCreepToSystem, Condition( function Trig_AddCreepToSystem_Conditions ) ) call TriggerAddAction( gg_trg_AddCreepToSystem, function Trig_AddCreepToSystem_Actions ) endfunction

Vadik29, юзай вот эту прогу...
И старайся использовать понятные имена функций и и переменных и расставлять комментарии, это в разы повысит популярность сей системы...

» пример кода

((код jass

function Trig_Wind_Strike_Conditions takes nothing returns boolean
return GetRandomInt( 0, 100 ) <= 20 and GetUnitAbilityLevel( GetAttacker( ), 'A02B' ) > 0 проверка шанса и наличия способности 'A02B' у нападающего юнита..
endfunction

function Trig_EnemySlashed_Conditions takes nothing returns boolean
return GetEventDamageSource( ) == LoadUnitHandle( udg_hash, GetHandleId( GetTriggeringTrigger( ) ), 0 ) and GetUnitAbilityLevel( GetTriggerUnit( ), 'B00B' ) > 0 or GetUnitAbilityLevel( GetTriggerUnit( ), 'B00C' ) > 0 проверка получения удара по баффу
endfunction

function Group_Wind_Strike_Actions takes nothing returns nothing наносит урон по группе противников...
local unit enemy = GetEnumUnit( )
if IsUnitType( enemy, UNIT_TYPE_GIANT ) or GetUnitLevel(enemy)>15 then
call UnitDamageTarget( udg_TempUnit, enemy, udg_TempReal / 1.65, true, false, ATTACK_TYPE_HERO, DAMAGE_TYPE_NORMAL, WEAPON_TYPE_METAL_HEAVY_SLICE )
call FloatingTextFadeout( GetOwningPlayer( udg_TempUnit ), enemy, GetColoredString( 0, "-" + I2S( R2I( udg_TempReal / 1.75 ) ) +"!" ) )
else
call UnitDamageTarget( udg_TempUnit, enemy, udg_TempReal, true,false, ATTACK_TYPE_HERO, DAMAGE_TYPE_NORMAL, WEAPON_TYPE_METAL_HEAVY_SLICE )
endif
if GetUnitAbilityLevel(udg_TempUnit,'BUav') > 0 or GetUnitAbilityLevel( udg_TempUnit, 'Blpv' ) > 0 then
call SetUnitState(udg_TempUnit,UNIT_STATE_LIFE, GetUnitState(udg_TempUnit,UNIT_STATE_LIFE) + udg_TempReal*0.25)
endif
call AddSpecialEffectTargetToTimed( "Abilities\\Spells\\Other\\Stampede\\StampedeMissileDeath.mdl", enemy, "chest", 2.00 )
set enemy = null
endfunction

function Trig_Wind_Strike_Slash takes nothing returns nothing
сектор обьявления локальных переменных
local unit WindMaster = GetEventDamageSource( )
local unit Enemy = GetTriggerUnit( )
local real Damage = 0.33 * GetUnitAbilityLevel( WindMaster, 'A02B' )
local trigger trg = GetTriggeringTrigger( )
local group grp = CreateGroup( )

call DisableTrigger( trg )

удаляем вспогогательные способности и баффы
call UnitRemoveAbility( Enemy, 'B00B' ) удаляем бафф N 1 с цели
call UnitRemoveAbility( Enemy, 'B00C' ) удаляем бафф № 2 с цели
call UnitRemoveAbility( WindMaster, 'A00B' ) удаляем спеллбук у атаковавшего, там + скорости атаки и яд
сектор урон вторичным целям
call GroupEnumUnitsInRange( grp, GetUnitX( Enemy ), GetUnitY( Enemy ), 225.00, GetAliveEnemy( GetOwningPlayer( WindMaster ) ) ) ищем наземных, живиых, огранических врагов в радиусе 255.
set udg_TempReal = GetHeroAgi( WindMaster, true ) * Damage + 15.00 задаём урон для вторичных целей
set udg_TempUnit = WindMaster
call ForGroup( grp, function Group_Wind_Strike_Actions ) наносим урон вторичным целям
call DestroyGroup( grp ) удяляем группу
сектор удаляение триггра и очистка памяти хешьтаблицы
call FlushChildHashtable( udg_hash, GetHandleId( trg ) ) чистим хеш, там сохрянён атакер.

call TriggerClearActions( trg ) удялем деиствия
call TriggerClearConditions( trg ) удяляем условия
call DestroyTrigger( trg ) удаляем локальный триггер
сектор обнуления переменных
set WindMaster = null
set Enemy = null
set grp = null
set trg = null
endfunction

function Trig_Wind_Strike_Actions takes nothing returns nothing
local unit WindMaster = GetAttacker( )
local unit Enemy = GetTriggerUnit( )
local trigger trg = CreateTrigger( )
local timer t = CreateTimer( )
даём атаковавшему впомогательные скилы и устанавливаем анимацию
call UnitAddAbility( WindMaster, 'A00B' )
call SetUnitAnimation( WindMaster, "attack walk stand spin" )
сохраняем необходимые данные в Хеш
call SaveTriggerHandle( udg_hash, GetHandleId( t ), 0, trg )
call SaveUnitHandle( udg_hash, GetHandleId( trg ), 0, WindMaster )
создаём локальный триггер и запускаем таёмер...
call TriggerRegisterUnitEvent( trg, Enemy, EVENT_UNIT_DAMAGED )
call TriggerAddCondition( trg, Condition( function Trig_EnemySlashed_Conditions ) )
call TriggerAddAction( trg, function Trig_Wind_Strike_Slash )
call TimerStart( t, 0.330, false, function RemoveTrigger )

set WindMaster = null
set Enemy = null
set trg = null
set t = null
endfunction

===========================================================================
function InitTrig_Wind_Strike takes nothing returns nothing
set gg_trg_Wind_Strike = CreateTrigger( )
call AbilityPreload( 'A02B' )
call TriggerRegisterPlayerUnitEvent( gg_trg_Wind_Strike, Player( 12 ), EVENT_PLAYER_UNIT_ATTACKED, null )
call TriggerAddCondition( gg_trg_Wind_Strike, Condition( function Trig_Wind_Strike_Conditions ) )
call TriggerAddAction( gg_trg_Wind_Strike, function Trig_Wind_Strike_Actions )
endfunction
))

function Trig_Protect_Item_Actions takes nothing returns nothing local unit u = GetTriggerUnit() local item it = GetManipulatedItem() local player p = GetLocalPlayer() local unit c = LoadUnitHandle(udg_Hash, GetHandleId(it), 0) local player pc = GetOwningPlayer(c) if u != c and c != null and GetUnitTypeId(u) != 'e000' then call UnitRemoveItem(u, it) if p == GetOwningPlayer(u) then call DisplayTextToPlayer(p, 0, 0, "Этот предмет принадлежит игроку " + udg_Color[GetPlayerId(pc)] + GetPlayerName(pc)) endif endif set u = null set c = null set p = null set pc = null set it = null endfunction

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

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

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

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

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

BB-коды Вкл.

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

[IMG] код Вкл.

HTML код Выкл.

SID69 DET offline Опыт: 19,693 Активность:	Vadik29, Лол, сам не шарит. Если ты не понял, это был стеб, я в курсе, что такое оптимизация "~Arti, А не то что ты скинул".
18.08.2012, 00:59	#21 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Vadik29 Choice Battle 1.6а offline Опыт: 15,845 Активность:	beril, вот бы еще монстры возрождались в зависимости от левела героя. В смысле?
18.08.2012, 09:05	#26 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Vadik29 Choice Battle 1.6а offline Опыт: 15,845 Активность:	quq_CCCP, Я им уже давно по коду прошелся, ладно как время появится добавлю коменты во все нужные места)
20.08.2012, 12:35	#34 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Vadik29 Choice Battle 1.6а offline Опыт: 15,845 Активность:	NIKZ, xgm.ru/forum/showthread.php?t=18742 считывай Ты мне в коде конкретно скажи, а не статьями разбрасывайся. Jass-мастер нашелся
20.08.2012, 13:54	#36 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

NIKZ Изучаю Jass offline Опыт: 6,036 Активность:	Vadik29, опять навязываешь. Я не jass мастер, до него мне далеко. Я даю советы, а ты себе навязываешь, что я такой то мастер...В заголовке "еще немного о переменных" прочитай, мне помогло
20.08.2012, 14:25	#37 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

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