中国虚拟军事网(VME)- 专注于武装突袭等优秀虚拟军事游戏

 找回密码
 加入VME

QQ登录

只需一步,快速开始

扫一扫,访问微社区

搜索
查看: 14225|回复: 87

[原创] 火箭弹覆盖脚本V1.81【作者WCRffsx】

  [复制链接]
发表于 2010-11-25 23:33:57 | 显示全部楼层 |阅读模式
本帖最后由 FFUR2007SLX2_5 于 2011-6-1 22:12 编辑

火箭弹覆盖脚本V1.81



使用方法:
1、把.sqf脚本放置在你所保存过的任务中,任务在我的文档ARMA2 OA/user/mission中可以找到。
2、随后进入编辑器加载脚本所在的任务。
3、放置一个逻辑,或移动目标,给它随便命名,比如Area。这就是要被轰炸的地区。
4、放置一架在空中飞行的攻击机,任意地点,任意取名,例如Myplane.
5、在攻击机的init中输入RC=[Myplane,Area,0.2] execVM "WCRffsx_fnc_70mm.sqf" 解释下:【飞机名,轰炸地点,火箭弹发射间隔(数字)】 execVM "xxx.sqf"
6、及时关注新版本并覆盖旧版本。

注意
1、脚本运行前攻击机不要组队
2、对应脚本必须支持对应机型
   WCRffsx_fnc_70mm.sqf对应机型为A10 用于MP编辑
   WCRffsx_fnc_S8T.sqf对应机型为SU25 用于MP编辑


下载地址:  
A10火箭弹覆盖V1.81  MP:http://www.vdisk.cn/down/index/6037165A6418
SU25火箭弹覆盖V1.81  MP:http://www.vdisk.cn/down/index/6037198A2417
==========================================================================
相关下载
自杀式袭击,汽车炸弹脚本下载:http://www.chinavme.com/thread-15911-1-1.html
动态装备生成脚本下载:http://www.chinavme.com/thread-15911-1-1.html
空降脚本下载:http://www.chinavme.com/thread-16053-1-1.html
CO - Traffic Transportion System (TTS) download: http://www.chinavme.com/thread-18284-1-1.html
Turret destorying effect script download: http://www.chinavme.com/thread-18088-1-1.html

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?加入VME

x
发表于 2010-11-26 11:15:14 | 显示全部楼层
bym101,如果你要查看本帖隐藏内容请回复


 楼主| 发表于 2010-11-26 12:14:46 | 显示全部楼层
本帖最后由 FFUR2007SLX2_5 于 2010-12-1 23:18 编辑


使用方法:
把WCRffsx_S8TCoverage.sqs放置在你所保存过的任务中,在我的文档ARMA2 OA/user/mission中可以找到。
脚本下载:  V1.3
1、随后进入编辑器加载脚本所在的任务。
2、放置一个逻辑,或随便什么东西,给它随便命名,比如Area。这就是要被轰炸的地区。
3、放置一架在空中飞的Su25,任意地点,任意取名,例如Su25.
4、在A10的init中输入[Su25,Area,0.2] exec "WCRffsx_S8Tcoverage.sqs" 解释下:【飞机名,轰炸地点,火箭弹发射间隔(数字)】 exec "WCRffsx_S8Tcoverage.sqs"

源码
  1. ;////Let a fixed wing aircraft use S8T FFAR cover an area                                                            \\\\
  2. ;////Author: WCR_ffsx                                                                                                 \\\\
  3. ;////Usage [aircraft,BombingArea,frequency between each Rockets] exec "WCRffsx_70mmCoverage.sqs"                       \\\\
  4. ;////Example: Create a fixed wing aircraft like Su25, init is flying. Then use logic to locate                          \\\\
  5. ;////your bombing area. Finally, use number to fill in the third position in the arrary as launching frequency.          \\\\
  6. ;////My mailbox:ffur2007slx2_5@126.com                                                                                    \\\\
  7. ;////======================================================================================================================\\\\
  8. private ["_AmmoNum"]
  9. WCR_Su25=_this select 0
  10. WCR_BombArea=_this select 1
  11. WCR_frequency=_this select 2
  12. _AmmoNum=40
  13. if (local player && alive player && player distance WCR_BombArea <=2500 && (damage WCR_Su25<0.1) && (WCR_Su25 Ammo "S8Launcher">=40)) then {goto "Start"} else {hintSilent "Rockets coverage support is not available at present";goto "exit"}
  14. #start
  15. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {goto "start0"} else {goto "exit"}
  16. #start0
  17. WCR_Su25Init=[] spawn {WCR_Su25 disableAI "AutoTarget";WCR_Su25 disableAI "Target";WCR_Su25 flyInHeight 500;WCR_Su25 setpos [getpos WCR_BombArea select 0,(getpos WCR_BombArea select 1)-3000,getpos WCR_Su25 select 2];removeAllWeapons WCR_Su25;"US_Soldier_EP1" createUnit [[getpos WCR_BombArea select 0,(getpos WCR_BombArea select 1)-500,0],WCR_BombArea,"WCR_observer=this;removeallweapons this;dostop this;this setcaptive true;this disableai 'autotarget';this disableai 'target';hideObject this",0]}
  18. ~0.1
  19. #start1
  20. if (alive WCR_Su25 &&(damage WCR_Su25<0.1)) then {WCR_Su25 move getpos WCR_observer} else {goto "exit"}
  21. if ((WCR_Su25 distance WCR_BombArea <=2500) && (alive WCR_Su25) && (damage WCR_Su25<0.1)) then {goto "AngleAdjust"} else {goto "Start1"}
  22. #AngleAdjust
  23. WCR_Su25 flyInHeight 550
  24. ~15
  25. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {WCR_Su25 setVectorDirAndUp [[0,10,-17],[0,10,0]]} else {goto "exit"}
  26. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {WCR_Su25 move getpos WCR_BombArea} else {goto "exit"}
  27. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {WCR_Su25 flyinheight 100} else {goto "exit"}
  28. ~0.25
  29. #Fire
  30. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {Launcher="R_S8T_AT" createVehicle [(getpos WCR_Su25 select 0)-7,(getpos WCR_Su25 select 1),(getpos WCR_Su25 select 2)-7]} else {goto "exit"}
  31. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {Launcher setDir getDir WCR_Su25} else {goto "exit"}
  32. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {Launcher setVectorDirAndUp [[0,10,-11],[0,10,0]]} else {goto "exit"}
  33. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {Launcher0="R_S8T_AT" createVehicle [(getpos WCR_Su25 select 0)+7,(getpos WCR_Su25 select 1),(getpos WCR_Su25 select 2)-7]} else {goto "exit"}
  34. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {Launcher0 setDir getDir WCR_Su25} else {goto "exit"}
  35. if (alive WCR_Su25 && (damage WCR_Su25<0.1)) then {Launcher0 setVectorDirAndUp [[0,10,-11],[0,10,0]]} else {goto "exit"}
  36. ~WCR_frequency
  37. _AmmoNum=_AmmoNum-2
  38. if (_AmmoNum>0 && alive WCR_Su25) then {goto "Fire"} else {goto "exit"}
  39. if (_AmmoNum==0 && alive WCR_Su25) then {WCR_Su25 flyinheight 500; deleteVehicle WCR_observer; WCR_Su25 setCaptive false; WCR_Su25 enableAI "AUTOTARGET"; WCR_Su25 enableAI "TARGET"; WCR_Su25 setVehicleAmmo 0.5} else {goto "exit"}
  40. #exit
  41. exit
复制代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?加入VME

x
发表于 2010-11-26 12:31:40 | 显示全部楼层
w我来进行多人测试。。。
发表于 2010-11-26 12:32:02 | 显示全部楼层
w我来进行多人测试。。。
发表于 2010-11-29 12:11:41 | 显示全部楼层
看看你这个脚本
 楼主| 发表于 2010-12-1 23:21:12 | 显示全部楼层
更新至V1.4
发表于 2010-12-1 23:55:00 | 显示全部楼层
顶。。。。。。。。。。。
发表于 2010-12-2 11:07:14 | 显示全部楼层
再顶,,,,
 楼主| 发表于 2010-12-2 14:18:59 | 显示全部楼层
目前V1.4版发现有问题,A10可以被重复呼叫的bug将于今晚V1.5中修正。
 楼主| 发表于 2010-12-2 19:49:44 | 显示全部楼层
V1.5修正:
A10可以重复发射火箭弹问题
飞机有时会自己损坏

发表于 2010-12-2 23:21:56 | 显示全部楼层
蛋疼= =...
为什么我用这个脚本的时候...
不管是1.0-1.5......
A10都没打中目标地点...
并且自己无故冒黑烟...
甚至有时候直接投朝下撞地面...
然后....
轰= =...
我是用无线电触发器触发的...
为什么额...
 楼主| 发表于 2010-12-2 23:32:29 | 显示全部楼层
aa3969711 发表于 2010-12-2 23:21
蛋疼= =...
为什么我用这个脚本的时候...
不管是1.0-1.5......

V1.5中A10不会再冒烟了,不过发射散布点还有点问题,建议在较平坦地域使用。
V1.6再继续测试中。
发表于 2010-12-3 11:14:20 | 显示全部楼层
回复 FFUR2007SLX2_5 的帖子

蛋疼= =...
我就是V1.5...
我逻辑是放在机场的...
够平坦了...
可A10就是不轰那...
都不知道它往哪轰...
而且轰完就一头栽地...
 楼主| 发表于 2010-12-4 23:28:59 | 显示全部楼层
V1.6修正:
进一步改进火箭弹覆盖范围
基本适用于所有地图

您需要登录后才可以回帖 登录 | 加入VME

本版积分规则

中国虚拟军事网  

GMT+8, 2018-7-22 22:22

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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