short b1 = 2500;
long elwood = 3*BSIZE, jake = BSIZE -2;