Lua Script実用例集

{name='JASDF Tsuiki Air Base', guid='588456b9-d277-4a6e-9aeb-249cdce5ad0e'}
{name='ROKAF Gimhae Air Base', guid='9f7c59ab-a123-4e56-bc3f-40c61c3300c5'}
{name='ROKAF 8355th Unit (Ullung-do)', guid='801b49bb-96d7-45bd-b085-8fcd5b4a0ced'}

local unit=ScenEdit_GetUnit ()

unit.heading

unit.heading=135

ScenEdit_SetUnit({name=unitname, heading=135})

local name ="陣営名"
local side = VP_GetSide ({side="陣営名"})
print(side)

local side = "陣営名"
local name = "ユニットの名前"
local unit = ScenEdit_GetUnit({side=side, name=name})
print(unit)

local guid = "ユニットのguid"
local unit = ScenEdit_GetUnit({guid=guid})
print(unit)

>> return ScenEdit_GetUnit({name="306 TFS #904"})
unit {
 type = 'Aircraft',
 subtype = '2001',
 name = '306 TFS #904',
 side = 'Japan',
 guid = 'b237eecf-302f-449b-9951-818ff49f0af0',
 class = 'F-15J Eagle',
 proficiency = 'Regular',
 latitude = '36.3938888888889',
 longitude = '136.407777777778',
 altitude = '6',
 heading = '0',
 speed = '350',
 throttle = 'Loiter',
 autodetectable = 'False',
 base = 'JASDF Komatsu Air Base',
 mission = 'JPN CAP',
 mounts = '2',
 magazines = '2',
 unitstate = 'Tasked',
 fuelstate = 'None',
 weaponstate = 'None',
 AllowMultiMission = 'False',
 AssignedMissionsQueue = 'table',
}

local group = "groupname"
return GetUnit ({name=group})

local guid = "コンタクトのguid"
local contact = VP_GetContact ({guid=guid})
print(contact)

local side = "陣営名"
local mission = "ミッション名"
local mission = ScenEdit_GetMission (side,mission)
print(mission)

--対空パトロールミッション"JPN CAP"の情報
>> local side = "Japan"
local mission = "JPN CAP"
local mission = ScenEdit_GetMission (side,mission)
print(mission)
mission {
 guid = '0a35715c-b8b7-443f-bf32-003d68a53cc4',
 name = 'JPN CAP',
 side = 'Japan',
 type = 'Patrol',
 subtype = 'AAW Patrol',
 isactive = 'True',
 starttime = '',
 endtime = '',
 SISH = 'False',
 aar = 'table',
 unitlist = 'table',
}

--対空パトロールミッション"JPN CAP"の情報
>> local side = "Japan"
local mission = "JPN CAP"
local mission = ScenEdit_GetMission (side,mission)
print(mission.patrolmission)
{ ProsecutionZone = {
[1] = { name = 'JADIZ #2' },
[2] = { name = 'JADIZ #3' },
[3] = { name = 'JADIZ #4' },
[4] = { name = 'JADIZ #5' },
[5] = { name = 'JADIZ #18' },
[6] = { name = 'JADIZ #19' }
},
TransitThrottleAircraft = Loiter,
GroupMemberEngageDistance = 5,
 StationThrottleShip = Loiter,
BoatsToInvestigate = Group_x1,
UseFlightSize = 'Yes',
StationThrottleAircraft = Loiter,
CheckOPA = 'Yes',
StationThrottleSubmarine = Loiter,
GroupSize = 'Command_Core.Mission+_GroupSize',
FlightsToInvestigate = Flight_x1,
AttackDistanceAircraft = 80,
PatrolZone = {
[1] = { name = '0deg @10nm' },
[2] = { name = '60deg @10nm' },
[3] = { name = '120deg @10nm' },
[4] = { name = '180deg @10nm' },
[5] = { name = '240deg @10nm' },
[6] = { name = '300deg @10nm' }
},
AttackTerrainFollowingAircraft = 'No',
FlightSize = 'Command_Core.Mission+_FlightSize',
UseGroupSize = 'No',
LoopType = RandomWithinArea,
WingmanEngageDistance = 5,
OneThirdRule = 'Yes',
TransitTerrainFollowingAircraft = 'No',
OnStation = 0,
ActiveEMCON = 'No',
CheckWWR = 'Yes',
BoatsToEngage = All,
Type = AAW,
TransitThrottleSubmarine = Cruise,
FlightsToEngage = All,
MinAircraftReq = 'NoPreferences',
StationTerrainFollowingAircraft = 'No',
TransitThrottleShip = Cruise }

local side = side -- 陣営名
ScenEdit_SetSideOptions ({Side=side, switchto=true})

local side= ScenEdit_PlayerSide()
local dbid = 633
local number = 20
local delay = 0
local area = {"Minefield #1", "Minefield #2", "Minefield #3", "Minefield #4"}
ScenEdit_AddMinefield ( {side=side, dbid=dbid, number=number, delay=delay, area=area } )

local side= ScenEdit_PlayerSide()
local area = {"Minefield #1", "Minefield #2", "Minefield #3", "Minefield #4"}
ScenEdit_DeleteMinefield({side=side, area=area } )

lat='N40.00.00'
lon='W70.40.00'

ScenEdit_AddReferencePoint({side="playerside", lat=lat, lon=lon, locked=true})

local side = ScenEdit_PlayerSide()　--陣営
local rpname = "RP-4" --基準ポイントその1
local bearing = 90 --基準ポイントその1からの角度
local distance = 10 --基準ポイントその1からの距離

基準ポイント2を生成
local rpfrom =ScenEdit_GetReferencePoint({side=side, name=rpname})
local newrp = World_GetPointFromBearing({latitude=rpfrom.latitude, longitude=rpfrom.longitude, bearing=bearing, distance=distance})
ScenEdit_AddReferencePoint({side=side, latitude=newrp.latitude, longitude=newrp.longitude, highlighted=false, locked=true})

local side= ScenEdit_PlayerSide()
local guid = ScenEdit_SelectedUnits().units[1].guid
local unit = ScenEdit_GetUnit({guid=guid})
local circle = World_GetCircleFromPoint({latitude=unit.latitude,
longitude=unit.longitude, numpoints=24,radius=150})

for k, v in ipairs(circle) do
    ScenEdit_AddReferencePoint({side=side, latitude=v.latitude,
    longitude=v.longitude, highlighted=true, locked=false})
end

--N36.10.50, E140.24.52に"Hyakuri Airbase"という名前の飛行場を追加する

local side = ScenEdit_PlayerSide()
local name = 'Hyakuri Airbase'
local unittype = 'Facility'
local dbid = 1714
local lat = '36.10.50'
local lon = '140.24.52'
local heading = 45 --飛行場の針路はゲーム中表示されないが着陸機の飛行方向に影響

local unit = ScenEdit_AddUnit({side=side, name=name, type=unittype, dbid=dbid, lat=lat, lon=lon, heading=heading})

local guid = '87YZY5-0HMNQ0PA58NEB' --ユニットのGUID
local unit = ScenEdit_GetUnit({guid=guid})
unit.latitude = "N11.22.33"
unit.longitude  ="E11.22.33"

local unit = 'Moi Air Base'
local loadoutid = 627
local quantity = 30

ScenEdit_FillMagsForLoadout({unit= unit, loadoutid=loadoutid, quantity=quantity})

local oldside = "元陣営の陣営名およびGUID"
local newside = "新陣営の陣営名およびGUID"
local side = VP_GetSide ({side = oldside})

for k, v in pairs(side.units) do
  ScenEdit_SetUnitSide({side = oldside, guid = v.guid, newside = newside})
end

local guid = guid
ScenEdit_SetUnit({guid =guid, OutOfComms=true})
ScenEdit_SetUnit({guid =guid, OutOfComms=false})

ScenEdit_DeleteUnit({side = "United States", unitname = "USS Abcd" })
ScenEdit_KillUnit({side = "United States", unitname = "USS Abcd" })

local guid = '87YZY5-0HMNQ0PA58NEB' --ユニットのGUID
local unit = ScenEdit_GetUnit({guid=guid})
print(unit.fuel)

local guid = '8558e224-d1e3-4040-a087-9283267b1d1c' --ユニットのGUID
ScenEdit_SetUnit({guid=guid, fuel= { {3001, 9000} } })

local guid = '8558e224-d1e3-4040-a087-9283267b1d1c' --ユニットのGUID
local unit = ScenEdit_GetUnit({guid=guid})
ScenEdit_SetUnit({guid=guid, fuel= { {3001, math.floor(0.5+unit.fuel[3001].max*0.7)} } })

local unit = EcenEdit_GetUnit({guid=GUID})
local course = {}
table.insert (course, {TypeOf = 'ManualPlottedCourseWaypoint', latitude=wp1.latitude, longitude= wp1.longitude, presetAltitude=6, presetThrottle=2})
table.insert (course, {TypeOf = 'ManualPlottedCourseWaypoint', latitude=wp2.latitude, longitude= wp2.longitude, presetAltitude=6, presetThrottle=2})
table.insert (course, {TypeOf = 'LandingMarshal', latitude=wp3.latitude, longitude= wp3.longitude, presetAltitude=6, presetThrottle=2})
unit.course=course

local guid = '87YZY5-0HMNOB5T4SJ1U'
ScenEdit_SetUnit({guid=guid, course= {} })

ScenEdit_AssignUnitToMission('目標の名前またはGUID', 'ミッションの名前')

ScenEdit_AssignUnitToMission('a1d75aac-d6b1-4e35-8ce4-34969f115cd3', 'killer 552')

local unit = "Senjou Taro" --Barkを表示するユニットの名前
local text = "敵の潜水艦を発見！" --Barkの内容
local R = 255 --テキストカラーの赤成分 (0-255)
local B = 255 --テキストカラーの青成分 (0-255)
local G = 127 --テキストカラーの緑成分 (0-255)
local moveUpward = true --falseにするとテキストが浮き上がらない
local fade = true --falseにするとテキストがフェードアウトしない
local lifeTime = 5 --テキストの表示秒数
local fontSize = 30 --テキストフォントの大きさ

ScenEdit_CreateBarkNotification_Unit(unit, text, R, B, G,
moveUpward,fade,lifeTime,fontSize)

function getContactGUID(detecterside_guid, originalunitguid)
	local unitA = ScenEdit_GetUnit({guid=originalunitguid})
	for key, value in pairs(unitA.ascontact)do
		if value.side == detecterside_guid
			then return value.guid
			else return "none"
		end
	end
end

上記のfunctionを入れたうえで
local A1 = getContactGUID("NNQBOL-0HMLCELCRRE66","dd153-yugiri")
print(A1)

local contact = VP_GetContact({guid=contactguid})
return contact.actualunitid

local guid= '87YZY5-0HMNQ0PA3EA88' --対象ユニットのGUID
local dbid = 2914 --兵装自体のDBIDではなく"Add Weapon Mount"画面に表示されるIDであることに注意
local arc_mount = {"SMF2", "SMF1", "SMA2", "SMA1", "PMF2", "PMF1", "PMA2", "PMA1"}
for i = 1, 4 do
ScenEdit_UpdateUnit({guid=guid, mode="add_mount", dbid=dbid, arc_mount=arc_mount})
i = i+1
end

--[[
弾頭DBIDの例 (CWDB/DB3K)
-210 = 250lb Mk81
-549/288 = 500lb Mk82
-302 = 1000lb Mk83
-521/299 = 2000lb Mk84
-1033 = 1kT nuclear
]]

local guid = "87YZY5-0HMFCCN38FA5J" --ユニットのGUID（あるいはユニット名を指定する）
local warheadid = 157 --爆発させる弾頭のDBID
---
local target = ScenEdit_GetUnit({guid=guid})
ScenEdit_AddExplosion({warheadid=warheadid, latitude=target.latitude, longitude=target.longitude, alitude=target.altitude})

ScenEdit_PlaySound("Impact_directhit_large.mp3")

local guid = " ユニットのGUID"
local arc = {"PMF2", "PB1", "PB2", "SB1", "SB2", "SMF1"}

ScenEdit_UpdateUnit({guid=v, mode="add_mount", dbid=2668, arc_mount=arc })

local side = "陣営名"
local mission = "ミッション名"
local mission = ScenEdit_GetMission(side, mission)
local arc = {"PMF2", "PB1", "PB2", "SB1", "SB2", "SMF1"}

for k, v in pairs (mission.unitlist) do
  ScenEdit_UpdateUnit({guid=v, mode="add_mount", dbid=2668, arc_mount=arc })
end

local unit1 = ScenEdit_GetUnit({name='unit1name', guid="unit1guid"})
local unit2 = ScenEdit_GetUnit({name='unit2name', guid="unit2guid"})
local group = "groupname" --ユニットを編入するグループ名（なければ新規作成）

unit1.group = group
unit2.group = group

local unit1 = ScenEdit_GetUnit({name='unit1name', guid="unit1guid"})
local group = ScenEdit_GetUnit({name='groupname', guid="groupguid"})

group.group.lead = unit1.guid

local unit1 = ScenEdit_GetUnit({name='unit1name', guid="unit1guid"}) --グループリーダー
local unit2 = ScenEdit_GetUnit({name='unit2name', guid="unit2guid"}) --グループメンバー

--bearingはグループリーダーからみたグループメンバーのいる方位
--値は0-360以内である必要がある（これ以外の数値だとメンバーの位置が正しく設定されない）

bearing2=unit1.heading+120　--bearing2=unit1の針路+120度とした
if bearing2 <0 then
	bearing2 = bearing2+360
elseif bearing2 >360 then
	bearing2 = bearing2 %360
end

unit2.formation = {type=1 , sprint=false, bearing=bearing2, distance =5}

ScenEdit_SetUnit({side="陣営", guid ="ユニットのGUID", group = "適当な名前"})
--実例
ScenEdit_SetUnit({side="Red", unitname="DD 154 Amagiri", group = "unitv"})

local unit1 = ScenEdit_GetUnit({guid=unit1guid})
unit1.group="none"

local currenttime=ScenEdit_CurrentTime()
return os.date("!%Y-%m-%d %X", currenttime)

local currenttime = ScenEdit_CurrentTime()

local time
if currenttime <0 then
	time= os.date("!*t", ScenEdit_CurrentTime()+3155760000)
    time = (time.year-100).. "-" ..string.format("%02d", time.month).. "-" ..string.format("%02d", time.day).. " "
    ..EpochToUTC_Time(currenttime)
else
    time = os.date("!%Y-%m-%d %X", currenttime)
end

print(time)

TimeA = ScenEdit_CurrentTime()
if (TimeA == 時間) then
     return true
else
     return false
end

>ScenEdit_PlaySound("banzai.mp3")

>ScenEdit_PlaySound("voices/banzai.mp3")

local title = "冬戦争"
local description = [[ 1939年8月にドイツとソ連が不可侵条約を締結したことで、戦いの
矛先はフィンランドへ向けられる。この条約においてドイツはソ連
に、フィンランドを含めたバルト諸国の併合も認めた。当然ながらこ
れはすべて秘密協定であった。しかし時間とともにその密約は
フィンランド政府の知るところとなる。ソ連との軍事的緊張の高ま
りを受け、フィンランドがドイツに援助を求めたとき、ドイツはこれ
に応じない姿勢を示したのだ。もしもソ連と戦争になった場合、フ
ィンランドは大国にたった一国で立ち向かわねばならないというこ
とだ。そうした状況の中、ソ連がフィンランド領内に軍事基地を建
設する許可を求めてきた。だがフィンランドはこれを拒絶した｡そ
して1939年11月30日、ソ連は1932年に結ばれた不可侵条約を破
棄、フィンランドへの侵攻を開始する。こうして始まった"冬戦争"
は1940年3月13日のモスクワ講和条約をもって終結、フィンランド
はソヴィエト連邦に南東部を割譲することとなった。

（決定のもたらす影響については、ボタンにカーソルを重ねると表
示される説明をご覧ください。）]]

local interactions = {"かかってこい！　相手になってやる！","ソ連の圧力に屈する"}

local decision = UI_CallAdvancedDialog (title, description, interactions)
print(decision)

::point1::
local text = [[
<!DOCTYPE html>
<html>
<head>
    <meta charset="UTF-8">
    <title>Example</title>
	<STYLE>
	body {
		background-color: #3c3f46;
		color: #FFFFFF;
		font-family: "MS Pゴシック" ;
	}
	</STYLE>
</head>
<body>
<P><i>Please select one of options at the end of message.</i></P>
<hr>
<h1>冬戦争</h1>
<p> 1939年8月にドイツとソ連が不可侵条約を締結したことで、戦いの<br>
矛先はフィンランドへ向けられる。この条約においてドイツはソ連<br>
に、フィンランドを含めたバルト諸国の併合も認めた。当然ながらこ<br>
れはすべて秘密協定であった。しかし時間とともにその密約は<br>
フィンランド政府の知るところとなる。ソ連との軍事的緊張の高ま<br>
りを受け、フィンランドがドイツに援助を求めたとき、ドイツはこれ<br>
に応じない姿勢を示したのだ。もしもソ連と戦争になった場合、フ<br>
ィンランドは大国にたった一国で立ち向かわねばならないというこ<br>
とだ。そうした状況の中、ソ連がフィンランド領内に軍事基地を建<br>
設する許可を求めてきた。だがフィンランドはこれを拒絶した｡そ<br>
して1939年11月30日、ソ連は1932年に結ばれた不可侵条約を破<br>
棄、フィンランドへの侵攻を開始する。こうして始まった"冬戦争"<br>
は1940年3月13日のモスクワ講和条約をもって終結、フィンランド<br>
はソヴィエト連邦に南東部を割譲することとなった。</p>
<p><i>（決定のもたらす影響については、ボタンにカーソルを重ねると表<br>
示される説明をご覧ください。）</i></p>
<hr>
   <table>
	<caption>DECISIONS:</caption>
	<tr>
		<td>
			<input type="radio" name="option" value="0" id="0">
			<label for="0">かかってこい！　相手になってやる！</label>
		</td>
	</tr>
	<tr>
		<td>
			<input type="radio" name="option" value="1" id="1">
			<label for="1">ソ連の圧力に屈する</label>
		</td>
        </tr>
    </table>

</body>
</html>
]]

local button = UI_CallAdvancedHTMLDialog("冬戦争", text, {"DECISION"})
print(button)

if not button.option then
    print("選択なし")
	goto point1
end