> You know the funny thing is that programmers who use decent editors
> don't seem to find the whole indentation thing so challenging. ;^)
> 
> Cheers,
> 
> Ken


I once declared that UV's FORMAT (as verb or from ED) would be the
standard formatter.
Programmers grumbled.
I said the source is in APP.PROGS.  Change it if you prefer something
different.
No one did.


Speaking of editors,  I have an ED prestore macro that shows the level
of indentation. 
Very handy to line things up.

It show's Mark's program as:

0001:       OPEN FILE1 TO F.FILE1 THEN
0002: 1     |  OPEN FILE2 TO F.FILE2 THEN
0003: 2     |  |  OPEN FILE3 TO F.FILE3 THEN
0004: 3     |  |  |  EOF=0
0005: 3     |  |  |  LOOP READNEXT ID ELSE EOF=1 UNTIL EOF DO
0006: 4     |  |  |  |  PROCESS, PROCESS, PROCESS
0007: 3     |  |  |  REPEAT
0008: 2     |  |  END ELSE PRINT "CAN'T OPEN FILE3"
0009: 1     |  END ELSE PRINT "CAN'T OPEN FILE2"
0010:       END ELSE PRINT "CAN'T OPEN FILE1"
0011:    END

&ED& LEVELS
0001: E
0002: BLOCK
0003: FORMAT
0004: C//~/B
0005: C/~                                 /9     |  |  |  |  |  |  |  |
|  /B
0006: C/~                              /8     |  |  |  |  |  |  |  |  /B
0007: C/~                           /7     |  |  |  |  |  |  |  /B
0008: C/~                        /6     |  |  |  |  |  |  /B
0009: C/~                     /5     |  |  |  |  |  /B
0010: C/~                  /4     |  |  |  |  /B
0011: C/~               /3     |  |  |  /B
0012: C/~            /2     |  |  /B
0013: C/~         /1     |  /B
0014: C/~      /      /B
0015: C/~//B
0016: BLOCK
0017: PAUSE
0018: OOPS


Set the block using ">" & "<" commands.
.X LEVELS
.XR at the pause prompt will OOPS it.

ED: the best of 70's technology!

- cds

P.S. Actually , I like UltraEdit.
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to