Clean

EVT - Event Handling/EVT-103 - UNIT OnEventLand Example/EVT-103 - UNIT OnEventLand Example.lua

@@ -0,0 +1,38 @@
+---
+-- Name: EVT-103 - UNIT OnEventLand Example
+-- Author: FlightControl
+-- Date Created: 7 Feb 2017
+--
+-- # Situation:
+--
+-- An AI plane is landing on an airfield.
+-- When the plane landed, a new plane is spawned.
+-- 
+-- # Test cases:
+-- 
+-- 1. Observe the plane landing.
+-- 2. When the AI plane lands, observe the new plane being spawned.
+-- 3. Check the contents of the fields of the S_EVENT_LAND entry in the dcs.log file.
+
+-- Create a variable PlaneAI that holds a reference to UNIT object (created by moose at the beginning of the mission) with the name "PlaneAI".
+PlaneAI = UNIT:FindByName( "PlaneAI" )
+
+-- Create a SPAWN object to spawn a new plane once the hold one lands.
+SpawnPlane = SPAWN:New( "SpawnPlaneAI" )
+
+-- Declare a new variable that will hold the new spawned SpawnPlaneAI
+local NewPlane
+
+
+-- Subscribe to the event Land. The Land event occurs when a plane lands at an airfield.
+PlaneAI:HandleEvent( EVENTS.Land )
+
+-- Because the PlaneAI object is subscribed to the Land event, the following method will be automatically
+-- called when the land event is happening FOR THE PlaneAI UNIT only!
+function PlaneAI:OnEventLand( EventData )
+
+  -- Okay, the PlaneAI has landed, now spawn the new plane ( a predator )
+  NewPlane = SpawnPlane:Spawn()
+end
+
+

EVT - Event Handling/EVT-103 - UNIT OnEventLand Example/pack.ps1

@@ -0,0 +1,10 @@
+$dir = split-path -parent $MyInvocation.MyCommand.Definition
+cd $dir
+$file = Split-Path $dir -leaf
+
+$dir
+$file
+
+cd "_unpacked"
+. 7z a -r -y -tzip "..\$file.miz" *
+cd ..

EVT - Event Handling/EVT-103 - UNIT OnEventLand Example/unpack.ps1

@@ -0,0 +1,7 @@
+$dir = split-path -parent $MyInvocation.MyCommand.Definition
+cd $dir
+$file = Split-Path $dir -leaf
+Remove-Item .\_unpacked -Force -Recurse
+md "_unpacked"
+cd "_unpacked"
+. 7z x -r -y "..\$file.miz" *