Routine details
top TOUCH_X_EVENT
TOUCH_X_EVENT, event
** *************
** touch_x event parser
Parameters
- event
top TOUCH_RP
TOUCH_RP, iinst, paath, f_sub
** ********
** READ path & sub_dir only
Parameters
- iinst
- paath
- f_sub
top TOUCH_R
TOUCH_R, t_up, t_inst, t_fnu, t_lnu, c_y, y_e, t_sd, t_st, t_ip, exist
** *******
** READ IN TOUCH.UP
Parameters
- t_up
- t_inst
- t_fnu
- t_lnu
- c_y
- y_e
- t_sd
- t_st
- t_ip
- exist
top TOUCH_X
TOUCH_X, xlinst, pth0, manage
** *******
** BEGIN TOUCH_X PROCEDURE
** Parameters recieved : XLINST(DATA ARRAY), PTH0(Path to store "touch.up")
Parameters
- xlinst
- pth0
- manage