Example of a JScript 5 p9 m6 \; C$ m' n: k2 u; n
var vbOKCancel = 1; 2 V0 p+ m2 r; T4 W* T
var vbCancel = 2; $ O6 Y$ F1 _% r5 s) T1 Z
var vbInformation = 64;
& _, X- {7 D$ C9 e+ Pvar Finished=false; # g8 Z# ]# S# a! N& @, d& f
/ i2 u" M2 b0 g" Rvar WSHShell = new ActiveXObject("WScript.Shell"); 5 T+ Y/ `' S4 { R1 g
3 M* H& J, h" H
var simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); " e8 ~; h7 K4 a2 p; A
9 z! S' S0 B! u3 z/ b5 o$ W) w
simple.SetLicenseType("Runtime");
p1 U1 F7 {1 E: |
, t2 x9 t# m( ?# ^3 `try
/ v9 Q, N3 y7 q! W! F9 {9 |{
7 c: I+ r+ g! j7 ? F4 d // Enter the path to a model file! . q% z1 @6 ^) a; n/ R7 H) k
simple.LoadModel("C:\\Models\\Test.spp");
" _# H" W8 C( I}
/ S0 X+ \- d. P! Mcatch (e) o7 s+ P9 {# f
{
/ Z( U' V) C& @& I WScript.Echo("Could not load Model!");
$ ^/ K: `/ P1 g4 Z |# H& ]/ ]( G WScript.Quit();
+ P0 Z: L+ [( H! M" C} 6 c0 H; [: q1 v% j; G1 b2 b
# { Q1 t/ R" N. R$ E
try
h) f( v8 A' D; s# v4 W! B1 o{
4 M& v; Z/ r: `# q; L5 W simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) { 3 D- I+ M. G; ~# r9 O% h
r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation); 0 j: l$ j" m$ |7 m5 e' H
if (r == vbCancel)
# M& w6 O4 `+ N. `% Z. Y { 9 L/ y* o6 N4 E% K: t) Q
simple.CloseModel(); f0 D9 ^! A% z8 r
WScript.Quit();
: P! W/ K$ B9 @, X }
9 U5 z9 Z# e+ r; r! S7 w}
* e/ @* I0 ?5 |( S$ q' T6 ^$ | ! H& P' v+ r! t) Z9 K5 Q: m6 ]
simple.StartSimulation(".Models.Frame.EventController"); ; Y5 s' @ b7 h
" N) ^2 t9 r# H5 y' S
if (simple.IsSimulationRunning()) 8 T5 C# v- F. C" g. O
WScript.Echo("Simulation is running!"); $ z$ M' v; d) u/ F4 z' l
8 I9 B+ N1 C# |& o
// Wait until simulation is finished
) g7 f2 O" P0 |while (!Finished) WScript.Sleep(2000); 9 V3 w$ p- t, l! ]2 n1 Y, n1 [2 `. I! T
U+ B5 E( V( _2 {" y# ?% N
simple.CloseModel(); 5 `% W! n# B3 a; E3 V2 J
simple.Quit();
, m4 N7 Z" d5 KWScript.Quit(); " b4 ~7 B9 ^) S4 `0 n
" i$ o7 i+ G2 M* n+ s1 ~+ t3 p
6 X, c# ?0 C+ Q
function RemoteControl_SimulationFinished()
* J: T1 p7 L+ S; q6 n" G% }{
` q4 W2 x+ m# I WScript.Echo("Simulation Finished!"); |