SE 3800, Sample Code