home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 2: PC
/
frozenfish_august_1995.bin
/
bbs
/
d09xx
/
d0957.lha
/
PARex
/
PARexScripts
/
StripGUIDE.pxs
< prev
next >
Wrap
Text File
|
1993-11-24
|
5KB
|
145 lines
; PARex v3.xx script: "PAREX:StripGUIDE.pxs"
; ~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~
; Update: 13-Nov-93
; $VER: StripGUIDE.pxs 39.019 (13.11.93) PARex v3.xx script for StripGUIDE.
; All commands upto AmigaGuide v3.0 (v39.11) are supported. New commands can be
; added in a jiffy!
; ## Preserve fake AmigaGuide commands ##
REPL \\@ BY \\@ ; PARex interpretes "\\@" as "\@" !!
; ## The following AmigaGuide commands should only occur once, and at the beginning! ##
{ REPL "@DATABASE # #\"{#?}#\"\n"
BY "Database: \"{}\"\n"
OR "Database: \"\e[1m{}\e[0m\"\n" WHEN bold
CONTEXT ; remember the name after the command!
TIMES 1 } ; the @DATABASE command only occurs once, so there's
; no need to search for it again (speeds up searching)
; STRIP @DATABASE TO \n TIMES 1 ; this commands discards the DATABASE command (remove
; previous line and remove the first ";" ot this line
; to use this command
{ REPL "@MASTER # #\"{#?}#\"\n"
BY "MasterDoc: \"{}\"\n"
OR "MasterDoc: \"\e[1m{}\e[0m\"\n" WHEN bold
CONTEXT
TIMES 1 }
; STRIP @MASTER TO \n TIMES 1 ; completely discards this line (remove previous line
; and un-comment this line to use)
{ REPL "@AUTHOR # #\"{#?}#\"\n"
BY "Author: \"{}\"\n"
OR "Author: \"\e[1m{}\e[0m\"\n" WHEN bold
CONTEXT
TIMES 1 }
; STRIP @AUTHOR TO \n TIMES 1 ; completely discards this line (remove previous line
; and un-comment this line to use)
{ REPL "@(C) # #\"{#?}#\"\n"
BY "⌐: \"{}\"\n"
OR "⌐: \"\e[1m{}\e[0m\"\n" WHEN bold
CONTEXT
TIMES 1 }
; STRIP @(C) TO \n TIMES 1 ; completely discards this line (remove previous line
; and un-comment this line to use)
{ REPL "@$VER: # #\"{#?}#\"\n"
BY "$VER: \"{}\"\n"
OR "$VER: \"\e[1m{}\e[0m\"\n" WHEN bold
CONTEXT
TIMES 1 }
; STRIP @$VER: TO \n TIMES 1 ; completely discards this line (remove previous line
; and un-comment this line to use)
STRIP @WORDWRAP TO \n TIMES 1 ; ...
; ## The following AmigaGuide commands refer to the manner in which the text is shown. ##
; ## These commands are only supported with AmigaGuide v3.x and later! ##
REPL @{b} BY \e[1m OR "" WHEN plaintext
REPL @{ub} BY \e[0m OR "" WHEN plaintext
REPL @{i} BY \e[3m OR "" WHEN plaintext
REPL @{ui} BY \e[0m OR "" WHEN plaintext
REPL @{u} BY \e[4m OR "" WHEN plaintext
REPL @{uu} BY \e[0m OR "" WHEN plaintext
REPL "@{fg text}" BY \e[31m OR "" WHEN plaintext
REPL "@{fg shine}" BY \e[32m OR "" WHEN plaintext
REPL "@{fg shadow}" BY \e[6\"z OR "" WHEN plaintext
REPL "@{fg fill}" BY \e[33m OR "" WHEN plaintext
REPL "@{fg filltext}" BY \e[31m OR "" WHEN plaintext
REPL "@{fg back}" BY \e[30m OR "" WHEN plaintext
REPL "@{fg highlight}" BY \e[32m OR "" WHEN plaintext
REPL "@{bg text}" BY \e[41m OR "" WHEN plaintext
REPL "@{bg shine}" BY \e[42m OR "" WHEN plaintext
REPL "@{bg shadow}" BY \e[6"z OR "" WHEN plaintext
REPL "@{bg fill}" BY \e[43m OR "" WHEN plaintext
REPL "@{bg filltext}" BY \e[41m OR "" WHEN plaintext
REPL "@{bg back}" BY \e[40m OR "" WHEN plaintext
REPL "@{bg highlight}" BY \e[42m OR "" WHEN plaintext
; ## AmigaGuide commands that we can completely discard since they don't carry any info! ##
STRIP @REM TO \n ; catches both @REM and @REMARK !
STRIP @ENDNODE TO \n ; discards this command
STRIP @FONT TO \n ; ...
STRIP @INDEX TO \n ; ...
STRIP @HELP TO \n ; ...
STRIP @KEYWORDS TO \n ; ...
STRIP @TOC TO \n ; ...
STRIP @PREV TO \n ; ...
STRIP @NEXT TO \n ; ...
; ## Some AmigaGuide commands where the info is useful to keep! ##
{ REPL "@NODE # ?#? # #\"{#?}#\"\n"
BY {}\n
OR \e[1m{}\e[0m\n WHEN bold
CONTEXT }
STRIP @NODE TO \n ; in case no title is given, discard
{ REPL "@DNODE # ?#? # #\"{#?}#\"\n"
BY {}\n
OR \e[1m{}\e[0m\n WHEN bold
CONTEXT }
STRIP @DNODE TO \n ; in case no title is given, discard
{ REPL "@TITLE # #\"{#?}#\"\n"
BY {}\n
OR \e[1m{}\e[0m\n WHEN bold
CONTEXT }
{ REPL "@'{\"{#?}\"#?'}"
BY {}
OR \e[1m{}\e[0m WHEN bold
CONTEXT }
EXITPXS ; just to note to PARex that what follows is of no importance!
; -- Comments --
o The 'WHEN bold' refers to the WHEN option when PARex is started. Only if you start
PARex with 'WHEN bold' will the preserved string be printed in bold text, otherwise
plain text is used!
o Some AmigaGuide commands only occur once in the document, therefore we may use TIMES 1
to indicate to PARex that we only need to search for a command once. This will speed
up the searching, since unnecesary searching is avoided!
o The 'WHEN plaintext' forces PARex to remove all text attributes.