Example of a JScript
/ v( n; a/ h$ j: Q- vvar vbOKCancel = 1;
+ y H$ u' {% O F- ]% uvar vbCancel = 2;
* S9 j# q4 f, H9 j6 X8 A. U; ?& y, dvar vbInformation = 64; ! G. o. [$ R) x7 ~$ E: K
var Finished=false; $ H6 o" u5 ]% A f/ m( G
9 V! A. |$ |' d8 p
var WSHShell = new ActiveXObject("WScript.Shell"); 5 g# L% T1 p$ v5 n
$ l' z _& E; tvar simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); + P" T7 Y' K6 g& Q: T7 r! g2 n
7 N+ q! @) o% c' J: L! b
simple.SetLicenseType("Runtime"); 2 z* C( i$ l2 ^
" A: H: `" J3 u2 [3 o' w; S! f
try
$ E1 H0 c% s0 m8 X8 j' d/ C% J" ^{ 8 ~. d, N1 } @( g
// Enter the path to a model file!
$ e* T" y2 m' p simple.LoadModel("C:\\Models\\Test.spp"); 2 T: u/ u2 ^: N9 C
}
, Y" s4 h+ ~/ Bcatch (e) : S; V" z) \1 v
{
6 J4 o" ^/ E3 j" R/ f. Q WScript.Echo("Could not load Model!");
2 R" k, M7 r% w0 U WScript.Quit(); : P W6 I: A0 S( r7 r2 z
}
. z; `" X, q1 G4 ~( q" k # v% z" J- _8 _! ?
try + j+ Z" v" `) O w" q
{
& N0 g2 G; W1 H' J7 F9 @. T simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) {
/ v3 H% c% U1 w, v! f) G r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation);
* O* ^+ S! o" d0 E w' b8 a2 } if (r == vbCancel) * l) |2 T7 u3 N% T3 w
{
7 J- E I) U4 O! f simple.CloseModel(); * _2 W+ p. S0 u P- }& W; ^3 [( `
WScript.Quit();
2 L1 G8 Y) S% Q2 Y& m }
, l+ \: k( p6 c5 f' F; c# b}
' D# {, f! S) ]' x! `' b
4 U& G) |2 v/ F* v8 @simple.StartSimulation(".Models.Frame.EventController");
; T- u& J$ W( m8 } ( S: g% x# |$ y R
if (simple.IsSimulationRunning()) $ ~% \0 T4 Y/ z' @
WScript.Echo("Simulation is running!"); ! i& o6 @% L4 b, V( ?, q9 J$ z
7 u5 g' k( E' x; M" i
// Wait until simulation is finished 1 z* p9 {5 X' J# K7 N8 C6 p
while (!Finished) WScript.Sleep(2000); 7 ~6 w; v! K6 k4 m
5 l0 T# y- F+ r, }6 S* H
simple.CloseModel(); 0 [3 ?; z0 |# w, u- g
simple.Quit(); 4 R) `) g8 D+ ?$ A. U5 e! K
WScript.Quit();
1 N+ ]+ _" y1 h3 w8 }" X
! l( K8 C0 z7 G9 z
9 y& n# Y7 k9 L( E8 F9 {function RemoteControl_SimulationFinished()
5 x! @8 R( {3 d& J& M( C2 h+ w{ % o+ r( D/ H# |( N
WScript.Echo("Simulation Finished!"); |