Code: Select all
runtimes=20
xpanel("Run Control")
xvalue("Simulation Repititions", "runtimes")
xbutton("Run", "gorun()")
xpanel()
proc gorun() {
for n=0, runtimes-1 {
run()
}
}
proc run() {
preprocess()
print "RUNNING SIMULATION..."
stdinit()
continuerun(tstop)
postprocess()
}