DIGS.VTF and ENV.VTF

* digs.vtf v0.2 - by digs
* NOTE:
* 1. Replace [KEY] with your preferred key choice.
* 2. All of these macros assume any needed external commands
* are either in the current working directory or on your path.
* 3. Macros that incorporate block functions assume that you've
* marked your blocks (^KB,^KK) in advance.
*
* PGP: encrypt/decrypt a block using the 'command line version' of PGP,
* available from: http://web.mit.edu/network/pgp.html
* Encrypt a block
[KEY]<Esc >[Encrypt]<N>
	^KW_tmp.pgp[Enter]
	[AltR]pgp -seaw _tmp.pgp[Enter]
	[Esc]^KY^KR_tmp.asc[Enter]
	^KJ_tmp.asc[Enter]
* Decrypt a block
[KEY]<Esc >[Decrypt]<N>
	^KW_tmp.pgp[Enter]
	[AltR]pgp -m _tmp.pgp[Enter]
	[Esc]^KJ_tmp.pgp[Enter]
*
* REPLY: adds a reply to a block using sed i.e. "> veni vidi vici",
* available from: http://www.simtel.net/pub/simtelnet/msdos/txtutl/sed15x.zip
[KEY]<Esc >[Reply  ]<N>
	^KW_reply.tmp[Enter]
	[AltR]sed "s/`^/> /" _reply.tmp >_reply.new[Enter]
	[Esc]^KY^KR_reply.new[Enter]
	[AltR]del _reply.*[Enter]
	[Esc]
*
* HTM>TXT: strips HTML encoded blocks leaving pure text using sed,
* available from: http://www.simtel.net/pub/simtelnet/msdos/txtutl/sed15x.zip
[KEY]<Esc >[HTM>TXT]<N>
	^KWpre._ht[Enter]
	[AltR]sed -e :a -e "s/<`[`^>]*>//g;/</N;//ba" pre._ht >post._ht[Enter]
	[Esc]^KY^KRpost._ht[Enter]
	[AltR]del *._ht[Enter]
	[Esc]
*
* TXT2HTM: converts a block to HTML using txt2htm,
* available from: http://www.geocities.com/SiliconValley/Horizon/3409/
[KEY]<Esc >[TXT>HTM]<N>
	^KW+_txt.tmp[Enter]
	[AltR]txt2htm _txt.tmp _htm.tmp[Enter]
	[Esc]^KY^KR_htm.tmp[Enter]
	[AltR]del *.tmp[Enter]
	[Esc]
*
* TAGCASE: converts case of HTML tags within a block using tagcase,
* available from: http://www.simtel.net/pub/simtelnet/msdos/html/tagcase0.zip
* Convert HTML tags to upper case
[KEY]<Esc >[Uptag  ]<N>
	^KW+intag.tmp[Enter]
	[AltR]tagcase + <intag.tmp >outtag.tmp[Enter]
	[Esc]^KY^KRouttag.tmp[Enter]
	[AltR]del *.tmp[Enter]
	[Esc]
*
* Convert HTML tags to lower case
[KEY]<Esc >[Downtag]<N>
	^KW+intag.tmp[Enter]
	[AltR]tagcase - <intag.tmp >outtag.tmp[Enter]
	[Esc]^KY^KRouttag.tmp[Enter]
	[AltR]del *.tmp[Enter]
	[Esc]
*
* URLGRAB: filters a block, extracting URL's using urlgrab,
* available from: http://www.simtel.net/pub/simtelnet/msdos/html/urlgr157.zip
[KEY]<Esc >[Urlgrab]<N>
	^KW+_url.tmp[Enter]
	[AltR]urlgrab -s -f links.htm _url.tmp[Enter]
	[Esc]^KH^KJ_url.tmp[Enter]
*
* SORT: sorts a block using the sort command as included with MSDOS
[KEY]<Esc >[Sort   ]<N>
	^KW_pre.srt[Enter]
	[AltR]sort < _pre.srt >_post.srt[Enter]
	[Esc]^KY^KR_post.srt[Enter]
	[AltR]del *.srt[Enter]
	[Esc]
*
* STASH: appends a block to a compressed file (stash.gz) using gzip,
* available from: http://www.gzip.org/
[KEY]<Esc >[Stash  ]<N>
	^KW\_stash[Enter]
	[AltR]type \_stash|gzip -9 >>\stash.gz[Enter]
	[Esc]
	[AltR]echo --|gzip -9 >>\stash.gz[Enter]
	[Esc]
	^KJ\_stash[Enter]^KH
*
* JUSTIFY: this macro will justify a single file/segment
[KEY]<Esc >[Justify]<N>
	[Esc]*J
	[Esc]*Y^QR
	[Esc]1
	[Esc]$2^B
	[Esc]!1[Esc]2
	[Esc]*y
	[Esc]*j
	[Esc]*F^QR
*
* SCROLL: auto scroll screen one line at a time.
* Increase delay "[Esc];" for faster boxen
* Fine tune by adjusting screen height: AltE
* fast scroll
[KEY]<Esc >[Scroll ]<N>
	^Z
	[Esc];
	[Esc]![
* slow scroll
*[KEY]<Esc >[Scroll ]<N>
	^Z
	[Esc];
	[Esc];
	[Esc]![
*
* NOTES: provides a date stamp IF the first character of the first line
* is a '.' This is used as an 'autoexec' macro for a journal or log,
* without affecting other files (unless they too begin with '.')
[KEY]<Esc >[Notes  ]<N>
	^QR
	[Esc]~.x^QC[Enter]
	[AltD][Enter][Enter][Enter]--[Up][Home]
	[Esc]!x
	[Esc]x
	[Esc]!]
*
* END digs.vtf

Go back to:

Top of page

Macro Viewer

Mostly VDE

* ENV.VTF
* Envelope
*
* This macro will print a business sized addressed envelope,
* including return address for each entry separated by a blank line:
*
* Quantum Widgets Inc.
* 3000 Canal Ave.
* Pharaoh Face, Mars
* Zipcode
*                    <-- blank line
* Helix DNA Corp.
* OY812 Research Park
* Quagmire Way, Saturn
* Zipcode
*
* The string, ^KPA2 is formatted for business sized envelopes - 4.25x9.5"
* Substitute, ^KPA1 for letter sized envelopes - 3.5x6.5"
* Replace, "NAME\ADDRESS\CITY, STATE\ZIP" with your return address.
* Reference VDE.DOC (ENVELOPES) for further info.
*
[F01]<ESC >[Envelop]<N>
		^QR
		[Esc]1
		[Esc]~^M2^X
		[Esc]!1
		[Esc]2^KB
		[Esc]3
		[Esc]=^M4^X
		[Esc]!3
		[Esc]4^E
		^QD^KK
		^KPA2"NAME\ADDRESS\CITY, STATE\ZIP"[Enter]
		^KH^X^QS
		[Esc]!1
*
* END ENV.VTF

Go back to:

Top of page

Macro Viewer

Mostly VDE