Example of a JScript , Z" O( D0 r# X
var vbOKCancel = 1; 1 F/ j% m! F1 r/ s) Z
var vbCancel = 2;
9 H% ]4 D c& p+ u3 K9 Pvar vbInformation = 64;
, q) k# }! p' C0 \1 svar Finished=false; % ]$ w9 s: d" I$ r' V
9 n/ z2 ~- Z% Q7 M' |
var WSHShell = new ActiveXObject("WScript.Shell"); * n$ L6 j5 T4 x7 r; p
' L/ w% h) i/ C9 h( m
var simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); 5 p [+ e6 D- F6 D8 s0 E1 ]
# c# l+ N- p1 I
simple.SetLicenseType("Runtime"); ! N& n7 ~8 p# l8 P
+ Y, N1 u( Y2 k$ _" {+ k2 Ftry $ C5 P! I, [ G" {& c4 \* m
{
3 M; F0 E& y6 _* n& X0 z; Y // Enter the path to a model file!
% @" H) u. f5 z! M3 o9 E5 v simple.LoadModel("C:\\Models\\Test.spp");
* b3 z" u; S; N/ e; B+ q}
* Q1 k1 ~( a4 O" y8 ^7 hcatch (e)
0 M U: e0 K* _* ^# J' v4 X{
W, J% e2 ~5 t) J& \ WScript.Echo("Could not load Model!");
+ S* @; J# k$ V0 L8 K' C7 u WScript.Quit();
0 @9 b$ I* Q; N0 w e2 n}
) R. L" d* P6 b) ~8 b6 w
( z. A- O7 D+ S& O% a) Xtry
! v8 W7 u4 y" X- L{
; g8 ^! ?% o. I1 ^ b6 z simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) { r/ E0 ]# j" q& e
r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation); 7 ^' t% o/ e0 R; a, q
if (r == vbCancel) 9 R6 N; P( ?1 e' q. u4 O
{
% s) L$ t5 I7 n# L: P1 [ simple.CloseModel(); * A3 _' t2 e; V
WScript.Quit();
! N; r( L1 d, m! P; D0 s }
: i+ W" r; A) c @/ K} / l. j9 H+ J0 {
. f1 x" C" m8 G9 D# h, }" J! m
simple.StartSimulation(".Models.Frame.EventController");
" C4 u5 Y- |, ?! g0 D# e% {# X , x3 h T/ j- t$ _5 @ @' I4 l
if (simple.IsSimulationRunning())
7 b; f5 r$ N4 p+ A WScript.Echo("Simulation is running!"); 1 P. K( r' a7 g
2 Z" k( T, m2 d8 e r" m8 g
// Wait until simulation is finished
' M! H) H4 C% ?; Bwhile (!Finished) WScript.Sleep(2000); : g3 @& ^5 N% X g3 E& ^& E
% B# H: m6 V6 t$ s, ^: g
simple.CloseModel(); 5 j' a% x4 ]+ d+ I' q$ b8 m
simple.Quit();
% x- w4 u4 I0 T/ m ]: jWScript.Quit(); 6 y. ^7 c; R8 B( H9 X
7 ^7 O* P# g( i
" I6 P/ N4 w' B, K( U) ?
function RemoteControl_SimulationFinished() 8 R" H8 U& L0 e9 P- @! p# X$ B
{ ( L4 T$ r! y# i. u) i5 T
WScript.Echo("Simulation Finished!"); |