436b908489
for [EMCMOT]BASE_PERIOD since it is not used in most sim configs Signed-off-by: Dewey Garrett <dgarrett@panix.com>
29 lines
909 B
Tcl
29 lines
909 B
Tcl
# Notes:
|
|
# 1) ::env() is a global associative array of environmental variables
|
|
# as exported by the main LinuxCNC script (linuxcnc)
|
|
# 2) Settings from the ini file are available as global associative
|
|
# arrays named: ::SECTION(varname)
|
|
# example: ::EMCMOT(SERVO_PERIOD)
|
|
# 3) procs are from sim_lib.tcl
|
|
|
|
#begin-----------------------------------------------------------------
|
|
source [file join $::env(HALLIB_DIR) sim_lib.tcl]
|
|
|
|
set axes [eval set axes $::TRAJ(COORDINATES)] ;# eval to handle list {}
|
|
set axes [string tolower $axes] ;# expect lowercase throughout
|
|
set number_of_axes $::TRAJ(AXES)
|
|
|
|
set base_period 0 ;# 0 means no thread
|
|
if [info exists ::EMCMOT(BASE_PERIOD)] {
|
|
set base_period $::EMCMOT(BASE_PERIOD)
|
|
}
|
|
|
|
core_sim $axes \
|
|
$number_of_axes \
|
|
$::EMCMOT(SERVO_PERIOD) \
|
|
$base_period
|
|
|
|
make_ddts $axes
|
|
simulated_home $axes
|
|
use_hal_manualtoolchange
|
|
sim_spindle
|