Example of a JScript # {% X( Y) P/ h4 Z* L4 H* Y
var vbOKCancel = 1;
+ A) X# u. i# [, |! ?2 cvar vbCancel = 2;
( j8 p6 d, g$ s! {7 f$ Zvar vbInformation = 64; . E& A; ^3 A. L
var Finished=false; ! L: A* ~# Y- @( I3 A7 V
. d% H# U7 ? q# [* L1 I# n7 r
var WSHShell = new ActiveXObject("WScript.Shell");
3 m! @' T2 C& ?7 [" ^5 z7 @
# O1 {6 C# z, w+ L) Tvar simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_");
6 n* {/ u @7 i, e2 h3 T
8 J" ^7 {% B& o& c9 r6 Ksimple.SetLicenseType("Runtime"); ! o$ ?2 e) V) m% o0 v
4 p( v' m1 |4 r* B, Q# x9 ]try 5 U0 \* d( Z% h& g0 j
{
5 M1 p: U4 {( N // Enter the path to a model file!
- G' k+ J& d. t) e simple.LoadModel("C:\\Models\\Test.spp");
1 N2 z# a+ u6 c. j1 T} 9 |1 w7 z- ]2 p8 y( r5 s
catch (e) ) D5 o0 A/ { Z; d1 N
{ $ _5 c+ [ F: a# n$ ]( C
WScript.Echo("Could not load Model!");
* v7 ^2 ?; e x WScript.Quit();
$ M/ h5 Z- a. U4 s}
, R. N2 o( a9 M9 U
* D I9 e; o' _4 A7 stry
8 J: j6 J4 d3 \1 K" K* _5 M{
- m0 V/ v# y8 D5 ~' A% A h( ? simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) {
( I1 m" c1 R' N) K- M& f r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation); * R2 g* e5 \7 e, W5 W- N9 D7 n
if (r == vbCancel)
! x4 r* k, Z( F& ]! j. E, y ` {
6 i- L: n: w& ? simple.CloseModel(); # f) u+ f# w2 D
WScript.Quit(); * `0 w8 w7 |8 ^% i& l: [( q
}
1 ]2 f- `& d' [& @+ h6 d v} " k8 h4 Y { e/ C
! `2 {0 a( S6 l/ e) S
simple.StartSimulation(".Models.Frame.EventController"); Q5 ~2 t. E; a8 O5 D. T$ y: h4 h: X
3 b: V+ i; ?6 {- Aif (simple.IsSimulationRunning())
; p! X; g6 U$ M' ] WScript.Echo("Simulation is running!");
7 I) C( o; Z, r5 S. h" {- F 2 r5 B4 j1 f8 G- h% p4 y
// Wait until simulation is finished 2 n) [' f& K3 ]6 V7 a9 ^ F9 X
while (!Finished) WScript.Sleep(2000); : z- c' i7 U0 ^. ?8 ]+ v
# ]9 I. y7 H$ a" q; C0 asimple.CloseModel(); ) e/ j0 M; {6 `, u
simple.Quit();
) j9 T# H2 L4 n6 u u8 ]WScript.Quit();
3 l* H2 p# A2 G+ i. v( T! K
8 i$ _4 o5 u0 s3 t. |0 W; n
, ~' d# F" {& q( lfunction RemoteControl_SimulationFinished() 4 r* H8 |* \# T; W# u5 h, M" q
{
3 b' t8 n" W8 ^2 t WScript.Echo("Simulation Finished!"); |