Example of a JScript
4 {0 q6 M% F5 g' m4 t# Hvar vbOKCancel = 1; 4 s5 a. T* q. K8 V* z! @2 D3 z
var vbCancel = 2;
( } J, [6 A0 e' o3 nvar vbInformation = 64; & Q: i8 Y. H/ c% z
var Finished=false; 2 S( J0 H+ }! p+ M7 E9 I% c
6 R9 W+ K* r/ ]/ u& Q3 F
var WSHShell = new ActiveXObject("WScript.Shell"); ( b; i1 }% J+ ~; L2 X$ ]0 }
+ x- f& i+ Q X+ X1 n& Dvar simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); l( a0 A/ n; z4 g1 e. I' f
' s* w! J' l6 p( C# T' u
simple.SetLicenseType("Runtime"); : B7 g& p) q- e' _; A. h0 j6 H4 h& f
2 r T) J$ H6 C
try
6 f! V) ?# G" L: ]: R{
+ O, v# V O6 P" d& R // Enter the path to a model file!
( r: x& D# G0 b7 E simple.LoadModel("C:\\Models\\Test.spp"); . n: r+ x/ A$ n) M
} ) Z. `* i2 D" Q+ K$ ?# x1 @
catch (e)
9 u( `1 V6 a$ R# c6 U: }{ 9 ]$ y5 ~$ O1 D& \3 G
WScript.Echo("Could not load Model!");
! a; d/ m& P+ ~: F WScript.Quit(); ' N7 S7 n# Y: y, o! X* p
} 3 Q; [' F3 u# D* p L6 G2 M' h: q
: t6 d1 z: e; z7 |% }7 |, a2 R# Etry ) A/ Z8 T/ @6 T7 l, {# R
{
- i/ s4 {4 [9 C8 l; B0 R simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) {
, H* Q4 K; c( H r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation);
" \- j: v, D0 d# U5 J5 n if (r == vbCancel)
6 {: F1 x; r$ h7 c& F0 D0 _$ h7 v { ) R+ S0 y. K! H( l* t1 O) |
simple.CloseModel(); - M& S8 S. C; j' U* d9 u
WScript.Quit();
/ p+ I3 d. I- u* P O$ B } ( E9 I7 v- {) o0 F" p( E
} & ?, m& {1 P7 K
$ o; d b' S7 Y2 J0 t1 N' ?simple.StartSimulation(".Models.Frame.EventController"); * ~) U( f/ J. v6 A. ^
% K; H8 E, P5 n& |8 h% Xif (simple.IsSimulationRunning())
+ K4 r/ D8 Y1 w2 c& S0 C+ M WScript.Echo("Simulation is running!");
8 Y4 o, O# g$ {. _
8 X0 }" R! F- f. d// Wait until simulation is finished + n1 R! u. W" {0 [& E
while (!Finished) WScript.Sleep(2000); 6 u/ u+ M# p2 C5 j; }
/ D/ F/ u9 {( v7 W& k5 Y# xsimple.CloseModel();
/ C c, q! z) l4 U8 |simple.Quit();
! v, m% Q# T" p1 L; oWScript.Quit(); 6 y6 A9 k+ F; k8 @
5 O- [5 ?0 M" U : }( n$ [! T) O/ m' @; ^
function RemoteControl_SimulationFinished() * |; C7 C! `% s ?$ a# F. E
{
' ~# V# G3 @. r6 W% a8 e WScript.Echo("Simulation Finished!"); |