Added some comments.
r1476 | ffr | 2007-02-13 16:20:09 +1100 (Tue, 13 Feb 2007) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
f4a85b93a9
commit
06d35ac3f9
@@ -5,6 +5,8 @@ puts "# !!- AUTOGENERATED FROM $args(-f) -!!"
|
||||
puts "# !!- DO NOT MODIFY -!!"
|
||||
puts "# [clock format [clock seconds] -format %c]\n"
|
||||
|
||||
# Use 'unknown' to suppress commands which refer to ansto specfic
|
||||
# motor parameters.
|
||||
proc unknown {args} {
|
||||
set param [lindex $args 1];
|
||||
set nonsim_motpars [list speed home hardlowerlim hardupperlim accel decel maxSpeed minSpeed maxAccel minDecel blockage_check_interval]
|
||||
@@ -13,8 +15,11 @@ proc unknown {args} {
|
||||
}
|
||||
}
|
||||
source ../utility.tcl
|
||||
|
||||
# Duplicate any proc definitions
|
||||
proc my_proc {args} {puts "proc $args"}
|
||||
|
||||
# Generate a SIM motor definition a DMC2280 motor definition.
|
||||
proc Motor {name type par} {
|
||||
global motors
|
||||
upvar #0 $par arr
|
||||
|
||||
Reference in New Issue
Block a user