Example of a JScript
# O5 w6 C' Z( @7 d% Hvar vbOKCancel = 1; , ~! }5 I, j9 T0 N! _7 K
var vbCancel = 2; ( [* F7 M7 w; ~& c6 c
var vbInformation = 64; $ N2 }( Y1 L8 ~7 p
var Finished=false;
7 \( T, e. r) i& _4 E
. c) Q! S5 m1 c; B3 b) Pvar WSHShell = new ActiveXObject("WScript.Shell");
( b1 Y* T/ s) ]0 [$ T
) Y& }/ y. k" E# { _var simple = WScript.CreateObject("Tecnomatix.PlantSimulation.RemoteControl.9", "RemoteControl_"); - {4 G4 }9 z1 z6 T5 T6 b2 c
5 h5 Q% l* n6 b4 i
simple.SetLicenseType("Runtime"); ; T: R0 ?& G; \2 @' k: M
4 { t D2 k. i3 J& M3 e
try
8 s) U& j& `# @7 x/ J6 h4 x& Y% ^# ~{
. C" r- d- }4 N: I' T3 M# a // Enter the path to a model file!
0 C* t4 q' x) W* V% f( W: a simple.LoadModel("C:\\Models\\Test.spp"); - @% K; v7 C, Z& w
} 0 q: f! ~% z% T$ j9 I
catch (e)
& m5 L3 ~; x8 L9 |{ ( g2 E2 v2 A0 G# T- a
WScript.Echo("Could not load Model!");
/ a. A0 g& i2 { WScript.Quit();
2 i+ r M* D, |7 g/ V5 N/ n" k} : i& [" A" v6 v
: n9 c' v$ I; ~ R; f( Ntry / {; T( K8 c! L/ a2 Q C( } ~
{
( v! S9 M+ U: K _ simple.SetValue(".Models.Frame.Buffer.procTime", 700.0); } catch (e) { + }7 S3 a% c, U7 }9 @
r=WSHShell.Popup(e.description, 0, "Continue?", vbOKCancel + vbInformation);
7 K+ |) Y. s9 ?0 @ if (r == vbCancel)
0 r3 {& v( ?' c% k- ]: B2 q; h+ r { y; [$ e' u% Z. \
simple.CloseModel(); " ?, l( R% ?. _3 v/ t
WScript.Quit();
, J: t) N8 K) }. k6 Y0 g( ]( a1 E! z } , |) X7 o$ c; O/ e3 _8 q/ n7 e
} R4 T: A. ~( ?5 ^* B6 F
7 A: X+ s, G* k2 f7 K7 \simple.StartSimulation(".Models.Frame.EventController");
8 a! G' h( d6 S$ E , \. O& X" D$ M9 j
if (simple.IsSimulationRunning()) ; C2 Q) O' ~8 \: I) H
WScript.Echo("Simulation is running!"); + G3 H' c' q5 f4 z
3 u2 e; P* ?6 ~3 @// Wait until simulation is finished ; K5 {' M/ a% z" D5 T5 A: C
while (!Finished) WScript.Sleep(2000);
- d$ m( [0 N8 y" D5 K/ S' b Y0 y$ W! X( | O- T% m
simple.CloseModel(); # v0 S7 s3 `% v' S8 L* ` ~
simple.Quit(); 7 Q9 e9 A8 X9 n3 @6 F& N6 p( l
WScript.Quit();
9 ]7 e4 ^, z# x3 b1 v L$ @
" e! V* V; I4 N a0 z" ?% f' r- k
function RemoteControl_SimulationFinished() , t; f g9 c0 o2 Q/ S
{
v- M0 B# |" ^& V WScript.Echo("Simulation Finished!"); |