- Timestamp:
- Jul 15, 2012 8:24:17 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
specdomain/trunk/src/specdomain/doc/ex_markup/hkl_ioc.mac
r1021 r1022 1 #=============================================================================== 2 #**************SPEC macros for the Advanced Photon Source*********************** 3 #=============================================================================== 4 # 5 # Beamline/Sector: 4ID 6 # 7 # Macro Package: hkl_ioc.mac 8 # 9 # Version: 1.0 (August,2005) 10 # 11 # Description: A user defined calcHKL to write the current HKL postion to a 12 # soft IOC. It requires spec softioc running. 13 # 14 # Written by: X. Jiao 08/08/2005 15 # 16 # Modified by: 17 # 18 # User macros: ioc_HKL -> to turn on/off the feature of putting HKL to shared 19 # memory. 20 # 21 # Internal macros: ioc_put_HKL -> write HKL to the soft IOC 22 # 23 # Modification history: 24 # 25 #$Log$ 26 #Revision 1.3 2006/05/22 20:34:35 jiaox 27 #removed unsed lines in ioc_HKL. 28 # 29 #Revision 1.2 2006/05/11 17:46:31 jiaox 30 #Added CVS Log entry. 31 # 32 #=============================================================================== 1 """ 2 SPEC macros for the Advanced Photon Source 3 4 Beamline/Sector 5 4ID 6 7 Macro Package 8 hkl_ioc.mac 9 10 Version 11 1.0 (August,2005) 12 13 Description 14 A user defined calcHKL to write the current HKL postion to a 15 soft IOC. It requires spec softioc running. 16 17 Written by 18 X. Jiao 08/08/2005 19 20 Modified by: 21 22 User macros 23 ioc_HKL -> to turn on/off the feature of putting HKL to shared 24 memory. 25 26 Internal macros 27 ioc_put_HKL -> write HKL to the soft IOC 28 29 Modification history: 30 31 ======== =================== ======= ===================================== 32 Revision date/time author remarks 33 ======== =================== ======= ===================================== 34 1.3 2006/05/22 20:34:35 jiaox removed unsed lines in ioc_HKL. 35 1.2 2006/05/11 17:46:31 jiaox Added CVS Log entry. 36 ======== =================== ======= ===================================== 37 """ 33 38 34 39 #=============================================================================== … … 57 62 #=============================================================================== 58 63 def ioc_HKL '{ 64 """to turn on/off the feature of putting HKL to shared memory.""" 59 65 60 66 if($# != 1) { eprint "Usage: ioc_HKL on/off ";exit} … … 79 85 #=============================================================================== 80 86 def ioc_put_HKL ' 87 """write HKL to the soft IOC""" 88 81 89 epics_put(sprintf("%s:H",SIOC_PV),H) 82 90 epics_put(sprintf("%s:K",SIOC_PV),K)
Note: See TracChangeset
for help on using the changeset viewer.