Clean

EVT - Event Handling/EVT-101 - UNIT OnEventHit Example/EVT-101 - UNIT OnEventHit Example.lua

@@ -0,0 +1,32 @@
+---
+-- Name: EVT-101 - UNIT OnEventHit Example
+-- Author: FlightControl
+-- Date Created: 7 Feb 2017
+--
+-- # Situation:
+--
+-- A plane is flying in the air and shoots an missile to a ground target.
+-- 
+-- # Test cases:
+-- 
+-- 1. Observe the plane shooting the missile.
+-- 2. Observe when the missile hits the target, a dcs.log entry is written in the logging.
+-- 3. Check the contents of the fields of the S_EVENT_HIT entry.
+
+Plane = UNIT:FindByName( "Plane" )
+
+Tank = UNIT:FindByName( "Tank" )
+
+Plane:HandleEvent( EVENTS.Hit )
+Tank:HandleEvent( EVENTS.Hit )
+
+function Plane:OnEventHit( EventData )
+
+  Plane:MessageToAll( "I just got hit!", 15, "Alert!" )
+end
+
+function Tank:OnEventHit( EventData )
+  Tank:MessageToAll( "I just got hit!", 15, "Alert!" )
+end
+
+

EVT - Event Handling/EVT-101 - UNIT OnEventHit 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-101 - UNIT OnEventHit 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" *