int p;
extern int edata;
extern int end;
start()
{
int  *s;
  asm ("lda #stack");
  asm ("tcs");
  for (s = &edata; s != &end; s++)
    *s = 0;

  main();
  exit(0);
}