int main(int argc, char *argv[])
{
s2opendo("/?"); /* Prompt for display type */
s2swin(-1.,1., -1.,1., -1.,1.); /* Set the window coordinates */
s2box("BCDET",0,0,"BCDET",0,0,"BCDET",0,0); /* Draw coordinate box */
s2show(1); /* Open the s2plot window */
return 1;
}
nemo_main()
{
permanent bool first=TRUE;
int argc = 1;
static char *argv[] = {"snaps2plot", NULL};
float size = 1.0;
extern string yapp_string;
setparams();
/* also: check env var S2PLOT_DEV */
#if 0
s2opend("/?", argc, argv);
#else
s2opendo(yapp_string);
#endif
s2swin((float)xrange[0], (float)xrange[1],
(float)yrange[0], (float)yrange[1],
(float)zrange[0], (float)zrange[1]);
s2box(s2box_opt,0,0,s2box_opt,0,0,s2box_opt,0,0);
s2lab(xlabel,ylabel,zlabel,input);
instr = stropen(input, "r");
get_history(instr);
compfuncs();
#ifdef COLOR
setcolors();
#endif
while (scansnap()) {
if (! trakflag) {
if (first) {
first = FALSE;
} else {
sleep(FRAMEDELAY);
plframe();
}
}
plotsnap();
warning("Can only do first selected snapshot");
s2show(1);
/* how to clear and advance to next snapshot */
}
}
