Example of a JScript
. G2 ], Q9 t' U; _var vbOKCancel = 1; 7 e0 `- N2 d0 H
var vbCancel = 2;
2 t& ^3 L& J7 O5 z2 uvar vbInformation = 64; ; J( A" }# \: x( I! l
var Finished=false; 1 w. S5 _$ ^0 [! j6 H% K
" O% m# H8 }6 r' N7 q7 l1 Q* A
var WSHShell = new ActiveXObject("WScript.Shell"); $ Y. Z4 s+ z& D* Q5 N; L' Z+ x
4 G- O& W- u/ h& V5 x8 v6 t
var simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_");
/ |0 [/ q- r$ T" I1 e2 g9 c # ?- j U; ^' ?" {. y* l
simple.SetLicenseType("Runtime"); 2 n5 C" @. r" H2 c9 s
4 |( {3 x3 o5 r( b
try 8 R* {( C, \) ]) H! q+ B
{
( S% r2 t$ t: F; s$ ]% u+ F // Enter the path to a model file! ) ]8 z' R& ?$ {/ s. P0 e; t# ^. s& n( o
simple.LoadModel("C:\\Models\\Test.spp"); 1 `4 k& [( d2 T
} % M2 o* a4 [2 y2 V1 p; _5 @
catch (e)
2 ?' V$ p* w% ~4 N* k% j{
: U7 A- V8 o( a9 ~# d6 Y WScript.Echo("Could not load Model!");
0 p: e- ]6 s$ R/ B! [ WScript.Quit(); * v! l) m! X; ^! E; ?) i
} 7 z9 q; k; b3 W. v" J
1 {% N2 R$ J" b6 Z
try 7 G& q/ J7 `- N$ W
{ % P0 x7 I3 ^+ D
simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) { $ g _6 S/ B$ y8 y! d
r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation);
. _% I. S. [$ d0 ~& |3 T if (r == vbCancel) / o3 y* {4 a) c' F
{
" G6 }! ?- y, @6 Y" M simple.CloseModel();
+ V- J Z: T" @/ ?% C WScript.Quit(); ' N2 [. M3 K/ v4 C
}
$ O" F/ ]1 Y5 }7 o; q |: B8 F}
7 y. T+ t2 s4 N# x8 S
! g! M4 |. W2 S+ Bsimple.StartSimulation(".Models.Frame.EventController");
: [* {* N( W& w) i1 F6 i1 b' w
2 _! H4 X7 s- D! r: A8 i& p5 ?if (simple.IsSimulationRunning()) + k1 y1 Q1 `/ E/ G
WScript.Echo("Simulation is running!"); 2 v6 q( W( Q, t+ E. ^' e
1 p* p+ C9 I' a( @2 |// Wait until simulation is finished
' n6 B& `. T4 x( O6 Uwhile (!Finished) WScript.Sleep(2000); i& d5 M3 X# p m& f5 c, G
@) C! O+ [ G: Q3 {( L
simple.CloseModel(); 6 N% R1 i" x+ j0 c( k- M6 z& V
simple.Quit();
( X/ e8 H! O8 f* {1 F% y' I NWScript.Quit(); 6 E6 r- T; b+ c
5 i$ \6 Y I9 ]" E! ^* T
" g1 Q: G+ u( W ?function RemoteControl_SimulationFinished() {! Z8 {7 z8 K" W/ N, J O
{ + n1 i" H' p$ D
WScript.Echo("Simulation Finished!"); |