设为首页收藏
切换到窄版

 找回密码
 点一下
GA地精研究院»论坛 › 地精研究院 › 技能区 › 沟壑技能如何弄成属性伤害?
返回列表 发新帖
查看: 1633|回复: 11

沟壑技能如何弄成属性伤害?

[复制链接]
发表于 2014-12-6 00:04:02 | 显示全部楼层 |阅读模式
本帖最后由 RoyalFlare 于 2014-12-6 17:07 编辑

  2. globals
  3.     gamecache udg_Titans_Cache=null
  4. endglobals
  5. function H2I takes handle H returns integer
  6.     return H
  7.     return 0
  8. endfunction
  9. function I2U takes integer I returns unit
  10.     return I
  11.     return null
  12. endfunction
  13. function H2S takes handle H returns string
  14.     return I2S(H2I(H))
  15.     return null
  16. endfunction
  17. function FlushEx takes string MissionKey returns nothing
  18.     call FlushStoredMission(udg_Titans_Cache,MissionKey)
  19. endfunction
  20. function SaveInteger takes string MissionKey,string Key,integer Value returns nothing
  21.     call StoreInteger(udg_Titans_Cache,MissionKey,Key,Value)
  22. endfunction
  23. function SaveReal takes string MissionKey,string Key,real Value returns nothing
  24.     call StoreReal(udg_Titans_Cache,MissionKey,Key,Value)
  25. endfunction
  26. function GetInteger takes string MissionKey,string Key returns integer
  27.     return GetStoredInteger(udg_Titans_Cache,MissionKey,Key)
  28. endfunction
  29. function GetReal takes string MissionKey,string Key returns real
  30.     return GetStoredReal(udg_Titans_Cache,MissionKey,Key)
  31. endfunction

  33. function BigCreviceRun takes nothing returns nothing
  34.     local real Face
  35.     local real x
  36.     local real y
  37.     local unit Unia
  38.     local unit Unib
  39.     local real NeedExtent=GetReal("BigCrevice"+H2S(GetExpiredTimer()),"NeedExtent")
  40.     local real HoofExtent=GetReal("BigCrevice"+H2S(GetExpiredTimer()),"HoofExtent")
  41.     if HoofExtent<NeedExtent then
  42.         set Face=GetReal("BigCrevice"+H2S(GetExpiredTimer()),"Face")
  43.         set x=GetReal("BigCrevice"+H2S(GetExpiredTimer()),"x")
  44.         set y=GetReal("BigCrevice"+H2S(GetExpiredTimer()),"y")
  45.         set Unia=I2U(GetInteger("BigCrevice"+H2S(GetExpiredTimer()),"Hero"))
  46.         set Unib=CreateUnit(GetOwningPlayer(Unia),'u00B',x,y,0)
  47.         call UnitAddAbility(Unib,'A0A0')
  48.         call SetUnitAbilityLevel(Unib,'A0A0',GetUnitAbilityLevel(Unia,'A07Y'))
  49.         call IssuePointOrderById(Unib,852224,x,y)
  50.         call UnitApplyTimedLife(Unib,'BHwe',2)
  51.         call DestroyEffect(AddSpecialEffect("Abilities\\Weapons\\TreantMissile\\TreantMissile.mdx",x,y))
  52.         call DestroyEffect(AddSpecialEffect("Abilities\\Weapons\\AncientProtectorMissile\\AncientProtectorMissile.mdx",x,y))
  53.         set x=x+80*Cos(Face*(3.14159/180))
  54.         set y=y+80*Sin(Face*(3.14159/180))
  55.         call SaveReal("BigCrevice"+H2S(GetExpiredTimer()),"x",x)
  56.         call SaveReal("BigCrevice"+H2S(GetExpiredTimer()),"y",y)
  57.         call SaveReal("BigCrevice"+H2S(GetExpiredTimer()),"HoofExtent",HoofExtent+80)
  58.         set Unia=null
  59.         set Unib=null
  60.     else
  61.         call FlushEx("BigCrevice"+H2S(GetExpiredTimer()))
  62.         call PauseTimer(GetExpiredTimer())
  63.         call DestroyTimer(GetExpiredTimer())
  64.     endif
  65. endfunction
  66. function BigCrevice takes unit Unia,real x,real y returns nothing
  67.     local timer Tima=CreateTimer()
  68.     local real Face=(180/3.14159)*Atan2(y-GetUnitY(Unia),x-GetUnitX(Unia))
  69.     call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Orc\\WarStomp\\WarStompCaster.mdl",GetUnitX(Unia),GetUnitY(Unia)))
  70.     call SaveReal("BigCrevice"+H2S(Tima),"NeedExtent",(GetUnitAbilityLevel(Unia,'A07Y')*100)+800)
  71.     call SaveReal("BigCrevice"+H2S(Tima),"HoofExtent",0)
  72.     call SaveReal("BigCrevice"+H2S(Tima),"Face",Face)
  73.     call SaveReal("BigCrevice"+H2S(Tima),"x",GetUnitX(Unia)+64*Cos(Face*(3.14159/180)))
  74.     call SaveReal("BigCrevice"+H2S(Tima),"y",GetUnitY(Unia)+64*Sin(Face*(3.14159/180)))
  75.     call SaveInteger("BigCrevice"+H2S(Tima),"Hero",H2I(Unia))
  76.     call TimerStart(Tima,0.03,true,function BigCreviceRun)
  77.     set Tima=null
  78. endfunction
  79. //===========================================================================
  80. function InitTrig_Big_Crevice takes nothing returns nothing
  81. endfunction
复制代码

今天参考了louter的模拟火焰雨技能演示 照着格式摸索着写了1个撼地神牛的沟壑技能 如何捕捉马甲单位释放的技能命令并选取直线范围区域造成属性伤害?
游戏缓存真心伤不起
@希瓦 @chyj4747 @ckpig
技能, 如何

相关帖子
回复

使用道具 举报

 楼主| 发表于 2014-12-6 00:05:12 | 显示全部楼层
本帖最后由 RoyalFlare 于 2014-12-6 17:12 编辑

真心想念猪头酱和actboy168 哦.还有louter Jass启蒙导师呢
如果他们还活跃在论坛的话
@zhuzeitou
回复

使用道具 举报

 楼主| 发表于 2014-12-6 01:04:54 | 显示全部楼层
本帖最后由 RoyalFlare 于 2014-12-6 17:42 编辑

  2. function SpellPitLordEstimate takes nothing returns boolean
  3.     local location Loca
  4.     local unit Unia=null
  5.     if GetSpellAbilityId()=='A07Y' then
  6.         set Loca=GetSpellTargetLoc()
  7.         set Unia=GetSpellTargetUnit()
  8.         if Unia!=null then
  9.             call BigCrevice(GetTriggerUnit(),GetUnitX(Unia),GetUnitY(Unia))
  10.         else
  11.             call BigCrevice(GetTriggerUnit(),GetLocationX(Loca),GetLocationY(Loca))
  12.         endif
  13.         call RemoveLocation(Loca)
  14.         set Unia=null
  15.         set Loca=null
  16. endfunction
  17. function SpellPitLord takes unit Unia returns nothing
  18.     local trigger Tria=CreateTrigger()
  19.     call TriggerRegisterUnitEvent(Tria,Unia,EVENT_UNIT_SPELL_EFFECT)
  20.     call TriggerAddCondition(Tria,Condition(function SpellPitLordEstimate))
  21.     set Tria=null
  22. endfunction
  23. function InitTrig_Spell_PitLord takes nothing returns nothing
  24. endfunction
复制代码
调用的方法= =

点评

RoyalFlare
请说明具体添加在哪1行 谢谢  发表于 2014-12-6 18:37
希瓦
少了一个endif和return  发表于 2014-12-6 18:34
回复

使用道具 举报

发表于 2014-12-6 01:34:42 | 显示全部楼层
创建马甲那里选范围内单位造成伤害不就好了。。
英雄你也存了能取到
回复

使用道具 举报

 楼主| 发表于 2014-12-6 17:09:19 | 显示全部楼层
本帖最后由 RoyalFlare 于 2014-12-6 17:11 编辑

@chyj4747 JassHelper提示 Missing Endblock(缺少结束部分字符) 编译不通过
求解到底是哪1行的问题
顺便吐槽1下 为什麽在技能区发Jass相关的问题总是查看的人多回复的人少 大部分的帖子都这样

回复

使用道具 举报

发表于 2014-12-6 18:23:36 | 显示全部楼层
RoyalFlare 发表于 2014-12-6 17:09
@chyj4747 JassHelper提示 Missing Endblock(缺少结束部分字符) 编译不通过
求解到底是哪1行的问题
顺便 ...

板凳第15、16行看起来怪怪的哦

点评

RoyalFlare
=_=因为我精简了部分代码 调用的部分关联3个技能的ID 我去掉了2个部分 把A0A1和A0A1部分的条件抹杀了 保留A07Y部分 于是悲剧就这麽发生了  详情 回复 发表于 2014-12-6 18:35
回复

使用道具 举报

 楼主| 发表于 2014-12-6 18:35:39 | 显示全部楼层
本帖最后由 RoyalFlare 于 2014-12-6 19:09 编辑
zhuzeitou 发表于 2014-12-6 18:23
板凳第15、16行看起来怪怪的哦


  2. function SpellPitLordEstimate takes nothing returns boolean
  3.     local location Loca
  4.     local unit Unia=null
  5.     if GetSpellAbilityId()=='A07Y' then
  6.         set Loca=GetSpellTargetLoc()
  7.         set Unia=GetSpellTargetUnit()
  8.         if Unia!=null then
  9.             call BigCrevice(GetTriggerUnit(),GetUnitX(Unia),GetUnitY(Unia))
  10.         else
  11.             call BigCrevice(GetTriggerUnit(),GetLocationX(Loca),GetLocationY(Loca))
  12.         endif
  13.         call RemoveLocation(Loca)
  14.         set Unia=null
  15.         set Loca=null
  16.         endif
  17.         return false
  18. endfunction
  19. function SpellPitLord takes unit Unia returns nothing
  20.     local trigger Tria=CreateTrigger()
  21.     call TriggerRegisterUnitEvent(Tria,Unia,EVENT_UNIT_SPELL_EFFECT)
  22.     call TriggerAddCondition(Tria,Condition(function SpellPitLordEstimate))
  23.     set Tria=null
  24. endfunction
  25. //===========================================================================
  26. function InitTrig_SpellPitLord takes nothing returns nothing
  27. endfunction
复制代码


根据希瓦的提示添加了endif 和return false 然后...
Line 404:  Symbol udg_Titans_Cache multiply defined
于是悲剧就这麽发生了

点评

希瓦
变量重定义了？用JassCraft检查一下语法吧，we的jass语法检查不靠谱啊  发表于 2014-12-10 01:38
回复

使用道具 举报

 楼主| 发表于 2014-12-6 18:38:36 | 显示全部楼层
本帖最后由 RoyalFlare 于 2014-12-6 19:36 编辑

智商不够用了XD 求帮忙的说
call UnitDamageTargetBJ应该写在哪1行里? call ForGroup呢?

点评

RoyalFlare
gamecache udg_Titans_Cache=null 删除这部分之后地图成功保存 全局变量不能重复定义 我又二逼了  发表于 2014-12-6 19:21
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 点一下

本版积分规则

Archiver|移动端|小黑屋|地精研究院

GMT+8, 2024-12-4 17:08 , Processed in 0.123573 second(s), 21 queries .

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表