The LAMP Application

Generated by IDLdoc

single page | use frames     summary     class     fields     routine details     file attributes

lamp_mac/

magnet_win.pro


Routines

result = magnet_fget(base, default)

result = magnet_glat(base, def)

result = magnet_split(atom, conx)

magnet_conx, st

magnet_clall, st

magnet_clear, flog, st

magnet_sav, flog, st

magnet_mov, flog, st, pos

magnet_par, st, butid, export, PCENT=PCENT, WDRAW=WDRAW

M_DYING, id

magnet_event, ev

magnet_MATsym, ev, uv, ok

magnet_MATsym_event, ev

magnet_propa, flg, st, newp, newV=newV

magmod_event, ev

magnet_modct, st

magnet_freq, bas0, flog, bas, dnu, evtop

magmov_event, ev

magnet_movie, bas0, bas

magpla_event, ev

magnet_plane, bas0, bas

magnet_win, file, PLOT=PLOT, W=W, timer=timer, none=none, anidr=anidr

Routine details

top magnet_fget

result = magnet_fget(base, default)

******* *********** ** ** Get numeric fields from GUI (pointed by base)

Parameters

base
default

top magnet_glat

result = magnet_glat(base, def)

******* *********** ** ** Get a b c fields from GUI (pointed by base)

Parameters

base
def

top magnet_split

result = magnet_split(atom, conx)

******* ************ ** ** Separate symbol & bonds (c-3-5-8)

Parameters

atom
conx

top magnet_conx

magnet_conx, st

** *********** ** ** Create bonds (c-3-5-8)

Parameters

st

top magnet_clall

magnet_clall, st

** ************ ** ** Clear all atom inputs

Parameters

st

top magnet_clear

magnet_clear, flog, st

** ************ ** ** Clear atom inputs by item

Parameters

flog
st

top magnet_sav

magnet_sav, flog, st

** ********** ** ** Read all atom input fields and put in memory ** st.DATA ->atoms (0:2=coord 3=site 4=width 5=color 6=length 7:*=Rmoments+Imoment+Phase , index) ** st.SYMBOL ->tsymbo (index) ** st.COLOR ->tcolor (index)

Parameters

flog
st

top magnet_mov

magnet_mov, flog, st, pos

** ********** ** ** put values from memory starting at st.CURSEQ into GUI atom fields

Parameters

flog
st
pos

top magnet_par

magnet_par, st, butid, export, PCENT=PCENT, WDRAW=WDRAW

** ********** ** ** 0) if butid=-3 -> export plot image & return ** 1) if butid=-1 -> read a file and put atom & parameter values in GUI ** 1) if butid=-4 -> import from Wks, put atom & parameter values in GUI ** 2) Get back parameters fields from GUI ** 3) Put atom & parameter values into W,X,Y,Z,PV,PTXT,P and gives them to a workspace ** 4) if butid=-2 -> write a NeXus file ** 5) if butid> 0 -> do a plot

Parameters

st
butid
export

Keywords

PCENT
WDRAW

top M_DYING

M_DYING, id

** ******* ** when dying, map lamp again

Parameters

id

top magnet_event

magnet_event, ev

** ************ ** ** The event handler

Parameters

ev

top magnet_MATsym

magnet_MATsym, ev, uv, ok

** ************* ** makes little 3*3 input matrix gui

Parameters

ev
uv
ok

top magnet_MATsym_event

magnet_MATsym_event, ev

** ******************* ** event handler for input 3*3 matrix uv (0, 1 , 2 , 3 , 4 , 5 )

Parameters

ev

top magnet_propa

magnet_propa, flg, st, newp, newV=newV

** ************ ** ** Handle the propagation fields

Parameters

flg
st
newp

Keywords

newV

top magmod_event

magmod_event, ev

** ************ ** ** Event handler for MAGNET_MODCT

Parameters

ev

top magnet_modct

magnet_modct, st

** ************ ** ** GUI atom color table

Parameters

st

top magnet_freq

magnet_freq, bas0, flog, bas, dnu, evtop

** *********** ** ** Frequency selector GUI

Parameters

bas0
flog
bas
dnu
evtop

top magmov_event

magmov_event, ev

** ************ ** ** Event handler for MAGNET_MOVIE

Parameters

ev

top magnet_movie

magnet_movie, bas0, bas

** ************ ** ** Rotate , atoms displacement , snapshot ... GUI.

Parameters

bas0
bas

top magpla_event

magpla_event, ev

** ************ ** ** Event handler for MAGNET_PLANE

Parameters

ev

top magnet_plane

magnet_plane, bas0, bas

** ************ ** ** Add/remove planes , objects and change object attributes GUI

Parameters

bas0
bas

top magnet_win

magnet_win, file, PLOT=PLOT, W=W, timer=timer, none=none, anidr=anidr

** ********** ** ** The GUI CONSTRUCTOR

Parameters

file

Keywords

PLOT
W
timer
none
anidr

File attributes

Modification date: Tue Oct 1 14:36:01 2013
Lines: 2,174