AminetAminet
Search:
84782 packages online
About
Recent
Browse
Search
Upload
Setup
Services

text/edit/GoToLblCED.lha

Mirror:Random
Showing: i386-aros icongeneric icon
No screenshot available
Short:List and go to labels in CygnusEd
Author: Axel.Greve at siemens.com
Uploader:Axel Greve siemens com
Type:text/edit
Version:1.0
Architecture:generic
Date:2002-11-07
Requires:CygnusEd 4.20, rexxtricks.library, AmigaDOS 'Delete' command
Download:text/edit/GoToLblCED.lha - View contents
Readme:text/edit/GoToLblCED.readme
Downloads:533

ENGLISH:
This script uses the rexxtricks.library v38.6 by Jürgen Kohrmeyer
which You can find in the util/rexx dir of Aminet. I want to
thank Jürgen for his library, without his development this
program wouldn't have been possible.

These files are Freeware. Do with it whatever You want, but You
are not allowed to make profit with it. I am not responsible for
GURUs or data loss caused by usage of this program - You use it
at Your own risk.

GoToLbl.ced is an ARexx script for use with CygnusEd. It has been
tested with v4.20 of CEd but may work with earlier versions.
Ths script lists all labels in the active view. The list is
sorted by label names and shown in a RexxTricks 'VIEWLIST'
requester. Along with the label the corresponding line number and
the contents of the previous line (which f.ex may be a comment)
is displayed. By selecting a list entry the cursor jumps to that
specific line. You can use CygnusEd's auto-mark function
(keyboard shortcut RAmiga+4) to toggle between the label's
position and the old position the cursor had before jumping to
the label.
Note: The VIEWLIST requester's window is set to a width of 560
      pixels in this script. If You want to change this value You
      must edit the line 66. With a value of 0 or commenting out
      this line You can force RexxTricks to take control over the
      requester's width. By un-commenting line 67 You can control
      the requester's height.
Although this script is intended for usage with ARexx scripts it
may be used for other languages' sources (such as Basic) as long
as the label names follow these rules:
  o  The label must be the first space-delimited word in the line
  o  The label must not contain any spaces ('20'x)
  o  The label must end with a colon (':')

Installation: Copy this file to where You keep Your CEd scripts,
REXX: or <Path_of_CygnusEd>/cedscripts/ are good ideas.

Please be careful with the authors eMail given above. It is at
my companies domain, and I do not wanna lose their faith (nor
my job)...
Please send any comments, ideas for improvements / usage with
other programming languages, or just "Hello"s, to the address
given above.


DEUTSCH:
Dieses Script benutzt die rexxtricks.library v38.6 von Jürgen
Kohrmeyer, welche Sie im Verzeichnis util/rexx des Aminets finden
koennen. Ich moechte Jürgen fuer die Entwicklung der Library
danken, ohne die dieses Programm nicht moeglich gewesen waere.

Diese Dateien sind Freeware. Tun Sie damit, was immer Sie wollen,
aber es ist nicht erlaubt, Profit damit zu machen. Ich bin nicht
fuer GURUs oder Datenverluste verantwortlich, die durch Verwen-
dung dieses Programms entstehen - Sie benutzen es auf eigenes
Risiko.

GoToLbl.ced ist ein ARexx Script zur Verwendung mit CygnusEd. Es
wurde getestet mit v4.20 von CEd, kann evtl. aber auch mit
frueheren Versionen laufen.
Dieses Script listet alle Labels (Sprungmarken) im aktiven View.
Die Liste wird alphabetisch sortiert und mittels des 'VIEWLIST'
Requesters der RexxTricks Library angezeigt. Zusammen mit den
Namen der Labels werden die zugehoerigen Zeilennummern und die
Inhalte der jeweils voraus gehenden Zeilen (welche z. B. eine
Kommentierung des Labels enthalten) angezeigt. Durch Auswahl
eines Listeneintrags springt der Cursor in die entsprechende
Zeile. Sie koennen die Auto-Mark Funktion von CygnusEd benutzen
(Tastaturkuerzel RAmiga+4), um zwischen der Labelposition und
der alten Cursorposition hin und her zu springen.
Anmerkung: Im Script wird die Breite des Requesterfensters auf
      560 Pixel eingestellt. Wenn Sie diesen Wert veraendern
      wollen, muessen Sie die Zeile 66 editieren. Mit einem Wert
      von 0 oder durch Kommentieren der Zeile uebernimmt
      RexxTricks die Kontrolle ueber die Requesterbreite. Durch
      Ent-Kommentieren der Zeile 67 koennen Sie die Hoehe des
      Requesters bestimmen.
Obwohl das Script fuer die Verwendung fuer ARexx Scripte gedacht
ist, kann es auch fuer andere Quelltexte (wie Basic) verwendet
werden, wenn die Labelnamen folgenden Regeln folgen:
  o  Das Label muss das erste durch Leerzeichen begrenzte Wort
     in der Zeile sein
  o  Das Label darf keine Leerzeichen ('20'x) enthalten
  o  Das Label muss mit einem Doppelpunkt (':') enden

Installation: Kopieren Sie das Script dorthin, wo Sie Ihre CEd
Scripte aufbewahren, REXX: oder <Pfad_zu_CygnusEd>/cedscripts/
waeren gute Ideen.

Bitte benutzen Sie die oben angegebene eMail-Adresse des Autors
mit der gegebenen Vorsicht. Sie ist die Domaene meines Broetchen-
gebers, und ich moechte sein Vertrauen (und meinen Job) nicht
verlieren...
Bitte senden Sie Kommentare, Verbesserungswuensche, Ideen fuer
die Verwendung mit anderen Programmiersprachen oder einfach nur
"Hallo"s an die oben angegebene Adresse.


Contents of text/edit/GoToLblCED.lha
 PERMSSN    UID  GID    PACKED    SIZE  RATIO     CRC       STAMP          NAME
---------- ----------- ------- ------- ------ ---------- ------------ -------------
[generic]                    0       0 ****** -lh0- 0000 Nov  4  2002 GoToLblCED/
[generic]                 1122    2193  51.2% -lh5- 640b Nov  4  2002 GoToLblCED/Deutsch/GoToLbl.ced
[generic]                 1071    2123  50.4% -lh5- e7d0 Nov  4  2002 GoToLblCED/English/GoToLbl.ced
[generic]                 2421    5017  48.3% -lh5- c65c Nov  4  2002 GoToLblCED/GoToLblCED.readme
---------- ----------- ------- ------- ------ ---------- ------------ -------------
 Total         4 files    4614    9333  49.4%            Nov  6  2002
Page generated in 0.02 seconds
Aminet © 1992-2024 Urban Müller and the Aminet team. Aminet contact address: <aminetaminet net>