Example of a JScript 8 I- F% n" |1 ^# j x
var vbOKCancel = 1;
O% x! f9 P# }: M9 w# v" G7 |var vbCancel = 2;
5 J5 |6 Y5 G$ G9 zvar vbInformation = 64; , I( W$ ^6 F; t" ^; ?- i: G
var Finished=false;
# ~2 N0 B/ S, H. {- F7 |
# W' _1 D) e" c C- N+ D- uvar WSHShell = new ActiveXObject("WScript.Shell"); " @& J j( g6 k5 d. Y+ c
: c1 y& b; E, _, D+ ]var simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); 5 x. x& K4 b! l' C! b
6 `! s7 Q2 |; e- D" jsimple.SetLicenseType("Runtime");
$ q4 G. X; A6 Q$ D
3 M9 Q) @- K" F# p3 ?try 5 C( f- H, l; \$ v; r
{ ( d, h) }, i& m" q6 j
// Enter the path to a model file! 7 B# @ ]) {7 ~* \5 A5 F
simple.LoadModel("C:\\Models\\Test.spp"); 4 K6 t; [+ c7 B6 o
} ( _% K) g! T6 }. G1 N2 |" O' _
catch (e)
% ^1 Q. S0 y( M6 b{ ; o$ [) [. M( _5 Z. H
WScript.Echo("Could not load Model!"); , O! f! _7 P8 g5 d
WScript.Quit(); 5 c6 D2 j& U/ h8 x/ c" n+ o
} $ J0 P/ X& ]& ^& L
. X1 `4 ]; k" k" m Ctry ' r* K5 L( I2 K6 v* y
{ 6 s, K0 I4 h$ T( z, @: L
simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) {
4 H. m) D+ P' w4 o r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation); : R! r/ l3 I% j2 J3 ]. y7 _; M' d
if (r == vbCancel)
* ?2 n* Q8 K5 P; }1 _6 ]# T- E {
; f" X1 @" [3 ~# N; f- x simple.CloseModel(); & Y" t1 t/ @2 E0 c6 b3 M9 U
WScript.Quit(); % u4 x M: \$ z6 k8 V" ~# l
}
! o/ O8 n: `$ V* c0 z}
+ q. W' l3 I* v8 N
" X: a( N* L* F9 V2 x% E! h$ Gsimple.StartSimulation(".Models.Frame.EventController"); 2 z6 _8 {! R! S: U0 V- m4 A
, f1 O6 F8 V4 j5 y3 j
if (simple.IsSimulationRunning()) + S, ^: K/ J+ _* i1 x
WScript.Echo("Simulation is running!");
& F3 E' ~: V3 z4 r/ P
9 [* C1 l& r, p7 f( D8 G0 n// Wait until simulation is finished ) X! x: J3 U( p3 e+ X& P, S
while (!Finished) WScript.Sleep(2000); ! \: w% v. C# J
$ I5 L2 N* a, j1 W1 t) qsimple.CloseModel();
4 I$ U8 W& u9 A# k, E# Esimple.Quit();
- D/ C# Y: y v" FWScript.Quit(); * V! P) J' n& Q* j: l
, j& S: `) u3 ?: `0 M! L% O* Z5 Q5 L
" ^4 C" `! Q$ k+ {; m
function RemoteControl_SimulationFinished()
5 |" P1 d1 H: ^( @* }8 y{ ) b+ m8 x7 r6 O3 g+ j& e+ P
WScript.Echo("Simulation Finished!"); |