[Tustep-Liste] zusammenfassen von Registereinträgen

[Michael Trauth]

Lieber Herr Schälkle, lieber Thomas,

> Vielleicht gehts aber doch einfacher.
> Ich bin gespannt auf andere Lösungen.

Andere Lösungen? Was könnte denn damit wohl gemeint
sein? ;o)) - Auf die Gefahr hin, gesteinigt zu werden,
schleppe ich hier einen kopiere-Elfzeiler an:

#ko,q,z,,+,*
zf+   1   :>/'>/:
al    1   :<>>/'<>>/:
liv   1   i1 i2
rr    1   if (i1.EQ.(i2-1)) goto 22;
xxb   1   :<>>/'<>>/:>=01{}<=01:
erz   1   1
xxb   2   :<>>/'<>>/:>=01-<=01:-<>>/'<>>/:-<=01:
erz   2   1
spn        3  8
sp2       11 11
xxx       |{}|'|
*eof

Der produziert, wenn man ihm als Eingabe
:	3'5'6'7'9'10
vorsetzt, als Ergebnis das gewünschte "3'5-7'9-10".
Auch nicht *besonders* elegant, aber vielleicht hat
ja noch jemand anders eine zündende Idee?


Viele Grüße reihum von

Michael Trauth


---------------------------------------------------------------
Dr. Michael Trauth                  e-mail: trauth at uni-trier.de
Rechenzentrum                       office: Tel. 0651-201-3413
der Universitaet                            Fax  0651-201-3921
Universitaetsring                secretary: Tel. 0651-201-3417
D-54286 Trier
---------------------------------------------------------------