home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Editor / DVD!FX17.LHA / FrexxEd / fpl / SimpleIndent.FPL < prev    next >
Encoding:
Text File  |  1994-11-18  |  351 b   |  19 lines
  1. export void Indent()
  2. {
  3.   int counter=0;
  4.   int column=ReadInfo("byte_position");
  5.   int chara;
  6.   string output="\n";
  7.  
  8.   while (counter<column) {
  9.     chara=GetChar(counter);
  10.     if (chara==' ' || chara=='\t')
  11.       output=joinstr(output, itoc(chara));
  12.     else
  13.       break;
  14.     counter++;
  15.   }
  16.   Output(output);
  17. }
  18. AssignKey("Indent();", "Shift 'Enter'");
  19.