:Disp "The Time Is" :Prompt H :H-12(int(H/12))->C :Prompt M :Prompt S :s/60+M->N :abs(5.5N-30C)->X :X-360int(x/360)-D :If D>180 :Disp 360-D :Else :Disp D