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

util/rexx/RexxJump.lha

Mirror:Random
Showing:m68k-amigaosppc-amigaosppc-morphosi386-arosi386-amithlonppc-warpupppc-powerupgeneric
No screenshot available
Short:Handy Text editor tool, Jump to Labels via List
Author:Bruce steers <bsteers at btinternet.com>
Uploader:http://www btinternet com/~bsteers/
Version:1.2 (23.01.00)
Architecture:m68k-amigaos
Required:AWNPipe , An Editor with ARexx
Date:2000-02-01
Download:http://aminet.net/util/rexx/RexxJump.lha - View contents
Readme:http://aminet.net/util/rexx/RexxJump.readme
Downloads:247

---------------------------------------------------------------------

Intro:

RexxJump is a tool i wrote because of those times when you load up an
old ARexx script you wrote and then think where the hell's that
function gone ! , and you can't quite remember it's name to use your
Editors Search function :-\

Basically RexxJump reads through an ARexx script and then presents
you with a list of all functions ( 1st word of a line ends in ':' )
---------------------------------------------------------------------

Usage:

double click WB icon or run with no args to load a doc via file requester
or execute 'rexxjump <Filename>'

You double click a browsernode and your editor will automatically
jump to the right line number.

you can enter a new name in the string gadget to load another doc.


The little Chooser Button next to the Quit Button has 3 functions...

Refresh ; This will re-read the document
LoadNew ; This calls a requester to read a new doc
settins ; See below
---------------------------------------------------------------------

Settings:

RexxJump is set up best to use BED , it also has defaults for GoldED
and DigitalQuill but as i do not use these i haven't made them perfect
but you can edit the commands used for jumping to suit your own editor,
you must know it's ARexx commands.

the default BED Settings may look a bit complicated but set up this way
I can run RexxJump at any time (even if doc or editor are closed)

the main Jump settings are ARexx functions

IF YOU GET THIS TO WORK WITH OTHER EDITORS OR IMPROVE THE SETTINGS IN
ANY WAY , PLEASE SEND ME YOUR .Cgf file SO I CAN UPGRADE THE SUPPORT
THANKS


The ARexx settings are split into 3 parts and are placed in their correct
string gadgets using ';' to separate lines ...

here i give the defaults for BED

(1).  the function to check editor is Running.
note: i use %f to add the filename)

Get Editor:
if ~show(p,'BED') then do
address command 'run >nil: BED "%f"'
address command 'waitforport BED'
end
-----------------------

(2). the function to address the port of the open document
note: the last command actually addresses the port

Access Doc:
address BED
getdocuments
docs=result
fp='%f'
name=substr(fp,max(lastpos('/',fp),lastpos(':',fp))+1)
if index(docs,name)==0 then opendoc fp
Getport fp
port=RESULT
address value port
-----------------------

(3). the function to move to the line
note: i use BED's 'activatewindow' function to activate the doc

Jump Line:
move %n CENTER
activatewindow
-----------------------

Other Settings:

Line Numbers:

whether to display line numbers or not ?

---------------------------------------------------------------------


TODO:

i intend to make this program recognise different file extentions so
it can be used for other file formats,

examples.

  TYPE     , EXTENTION ,  LABEL SYNTAX
-----------,-----------,---------------
ARexx      , #?rexx#?  , <name>:
Amiga_E    , #?.e      , PROC <name>(
AmigaGuide , #?.guide  ,  at NODE "<name>"

these will be held in the settings file

the first definition will be the fallback type.

you will be able to alter / add / remove them to your liking,


---------------------------------------------------------------------


please sent reports/suggestions/questions to bsteers at btinternet.com


Bruce Steers <bsteers at btinternet.com>
http://www.btinternet.com/~bsteers/


Contents of util/rexx/RexxJump.lha
 PERMSSN    UID  GID    PACKED    SIZE  RATIO     CRC       STAMP          NAME
---------- ----------- ------- ------- ------ ---------- ------------ -------------
[generic]                  709    1328  53.4% -lh5- 7b27 Jan 22  2000 RexxJump.info
[generic]                 4059   12086  33.6% -lh5- 6d2a Jan 23  2000 RexxJump/RexxJump
[generic]                 1447    2916  49.6% -lh5- 64d4 Jan 22  2000 RexxJump/RexxJump.info
[generic]                 1670    3574  46.7% -lh5- 8098 Jan 23  2000 RexxJump/RexxJump.readme
[generic]                  808    1351  59.8% -lh5- 4c1e Jan 22  2000 RexxJump/RexxJump.readme.info
---------- ----------- ------- ------- ------ ---------- ------------ -------------
 Total         5 files    8693   21255  40.9%            Feb  1  2000

Aminet © 1992-2022 Urban Müller and the Aminet team. Aminet contact address: <aminetaminet net>