zAstronomical Clock € ASTROCLK.EXE aC:\QB4 /1  ˙P  AS INTEGER dx AS INTEGER bp AS INTEGER si AS INTEGER di AS INTEGER flags AS INTEGā`