Pick3: PICK Buttons for swig
In Rquake: Seismic Hypocenter Determination

Description Usage Arguments Details Value Author(s) See Also Examples

Picking functions for swig

1	Pick3(nh, g)

`nh`	waveform list for RSEIS
`g`	plotting parameter list for interactive program

Buttons can be defined on the fly.

Pick3: Multiple picks on a panel

The return value depends on the nature of the function as it is returned to the main code swig. Choices for returning to swig are: break, replot, revert, replace, donothing, exit.

Jonathan M. Lees<jonathan.lees@unc.edu>

swig, PickWin

## Not run: 
library(RSEIS)
MYFUNC<-function(nh, g)
  {
    print("pressed MYFUNC")
    d = data.frame(list(stations=nh$STNS, components=nh$COMPS))
print(d)        
    g$action = "replot"
    invisible(list(global.vars=g))	
  }

STDLAB=c("DONE", "QUIT", "SELBUT" , "MYFUNC" )
data(GH)
JJ = swig(GH, sel=1:10, STDLAB=STDLAB)


## End(Not run)