Example of a JScript . w& V) ~9 B# ?- @
var vbOKCancel = 1; 0 }% `3 i/ D L' ~/ W" X% {
var vbCancel = 2; $ A8 J' k' _* {1 O
var vbInformation = 64;
/ ^2 N. j: u# l! h/ s$ Vvar Finished=false; 5 J, e8 U) H/ ~- s
5 R' |: f. d x1 [% J: Xvar WSHShell = new ActiveXObject("WScript.Shell");
) s5 B! L$ u" @& r L4 @, B2 R; ^
) |% V' ?% q: hvar simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); M) @2 H+ ~; o' a' Q& K
- a; n, A3 b7 U% k
simple.SetLicenseType("Runtime"); ( f- f8 t1 d8 z
( n4 i( I p( k8 N# dtry , P" K+ [+ o, [+ g( {6 s2 x; y! ]
{ u/ B; M& l4 n
// Enter the path to a model file! 8 _' E: r/ g1 e
simple.LoadModel("C:\\Models\\Test.spp"); - r# V( f8 Q7 l4 W6 Q
}
- t. K- W& o. ~# Ocatch (e)
* p. |9 W6 I, |3 B: c{ 0 e7 K1 ^# h1 d
WScript.Echo("Could not load Model!"); ' S/ D N# v6 c7 O
WScript.Quit();
# h+ T7 V0 o; g! A8 |0 R! h9 C% Z}
# I( s0 O$ ^" k6 j$ J1 [+ V% _ ( p6 ? J) b; o4 U$ \7 X, w; k$ E
try ; s6 N: ^5 R3 W
{ 5 Y" U8 D' {; [/ @
simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) { + S2 U7 D9 i- r( T/ {' T
r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation); * S2 y: c' [ ]% ?3 r* B
if (r == vbCancel)
& E# n* }) d1 }3 w { / h# S: U7 k7 {3 X3 @ x: q- }
simple.CloseModel();
; a8 F, W( `7 l( [/ G" n" P* E+ i WScript.Quit();
8 s- P- H( C1 @: t/ a! q" m+ | } - \4 q" n" J" w
} ( G" I- [! \2 N" N+ K8 `
- i5 b6 ~2 F, {# d9 Wsimple.StartSimulation(".Models.Frame.EventController");
5 i8 K# u2 o% q
7 w% A. m1 O! s+ Fif (simple.IsSimulationRunning()) & @- D) m/ C9 `% p5 h) c* I
WScript.Echo("Simulation is running!");
5 w G7 P3 N: m1 v' A: ^8 K* ^4 X 6 w* W$ H! J6 J# u
// Wait until simulation is finished ( W' W2 z: n8 }4 ?( L
while (!Finished) WScript.Sleep(2000); 9 q, Y! y- `" _" } t3 Q
E9 S; A. ?: G+ O# k+ z9 J& tsimple.CloseModel();
7 n% D5 d3 n z- \" ?& \' Fsimple.Quit(); # \3 I- x) k1 ^- a
WScript.Quit();
+ ~+ o: P9 z4 J' q
: r' O y$ C; m* x7 C6 g+ V & X O. C- W7 p8 {& V; D4 s! V) j
function RemoteControl_SimulationFinished() - v! f) Z+ A6 q9 g
{
# R. {2 |6 K9 J- ]+ h5 }% { v WScript.Echo("Simulation Finished!"); |