package Ġuk . t vid al . ansi Ċ Ċ import Ġjava . lang . System . line Separator Ċ Ċ enum Ġclass ĠAn si Move ( val Ġdirection : ĠChar ) Ġ{ ĊĠĠĠ ĠUP (' A '), ĊĠĠĠ ĠDOWN (' B '), ĊĠĠĠ ĠRIGHT (' C '), ĊĠĠĠ ĠLEFT (' D '), ĊĠĠĠ ĠNEXT (' E '), ĊĠĠĠ ĠPRE V (' F '), ĊĠĠĠ ĠCOL (' G '), ĊĠĠĠ ĠPOS (' H '), ĊĠĠĠ ĠCLEAR _ DISPLAY (' J '), ĊĠĠĠ ĠCLEAR _ LINE (' K '), ĊĠĠĠ ĠSC ROLL _ UP (' S '), ĊĠĠĠ ĠSC ROLL _ DOWN (' T '), ĊĠĠĠ ĠSAVE _ CURSOR (' s '), ĊĠĠĠ ĠREST ORE _ CURSOR (' u '); ĊĊĠĠĠ Ġoperator Ġfun Ġinvoke ( value : ĠAny , Ġdefault : ĠString Ġ= Ġline Separator ()) Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( has Ansi Support ) Ġprint ("$ ESC [$ value $ direction ") ĊĠĠĠĠĠĠĠ Ġelse Ġprint ( default ) ĊĠĠĠ Ġ} Ċ }