home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
comm
/
envoy100.zip
/
PARFORM
< prev
next >
Wrap
Text File
|
1990-03-15
|
1KB
|
26 lines
;-----------------------------------------------------------------------------
; Envoy Command file Parform
;
; Assigns Macro definitions to reformat a paragraph
;
; Enter the command DO PARFORM to execute this file. After this,
; press alt-z to reformat the current paragraph of the edit file.
;
; The scan code of the alt-z key is 300. Scan codes 400 and 401
; cannot be entered from the keyboard. The Macro functions assigned to
; these codes are executed with the MACRO DO Command.
;-----------------------------------------------------------------------------
;Macro 400 => break a line at column 81 if it needs it
;Macro 401 => Go down. If not a blank line call macro 400
;Alt-Z => reformat a paragraph
Macro 400 #Go Endline#If Column 82#Go Column 80#Go Word#Breakline#EndIf#Go Endline#If Column 82#Go Column 80#Go Word#Breakline#EndIf#
Macro 401 #Go Down#Go Endline#If Column 2#Joinline#Macro Do 400#EndIf#Go Endline
Macro 300 #Label Loop# Mac do 400#Mac do 401#If colu 2#Else#Go Down#Go col 1#Unblock#Exit#Endif#If Endfi#Exit#Endif#Jump Loop