Datapoint's Advanced System Language.

A cross between C and Pascal by Gene Hughes with custom features for Datapoint hardware (no stack). It is used internally by Datapoint.