% -*- mode: slang; -*- 
% http://www.geocities.com/tsca.geo/slang.html

 define untaball ()
  {
         variable wiersz = (what_line), kolumna = (what_column);
         bob (); push_mark (); eob ();
         untab ();
         goto_line (wiersz); goto_column (kolumna); 
  }
% --- end here ---------------------------------------------------------------

    Source: geocities.com/tsca.geo/slang

               ( geocities.com/tsca.geo)