home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 2: PC
/
frozenfish_august_1995.bin
/
bbs
/
d09xx
/
d0957.lha
/
PARex
/
PARexScripts
/
StripGUIDE.pxs.prx
< prev
next >
Wrap
Text File
|
1994-01-16
|
4KB
|
97 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