summaryrefslogtreecommitdiff
path: root/vimtutor.com
diff options
context:
space:
mode:
Diffstat (limited to 'vimtutor.com')
-rwxr-xr-xvimtutor.com104
1 files changed, 104 insertions, 0 deletions
diff --git a/vimtutor.com b/vimtutor.com
new file mode 100755
index 000000000..0e6854be6
--- /dev/null
+++ b/vimtutor.com
@@ -0,0 +1,104 @@
+$ !
+$ !=====================================================================
+$ !
+$ ! VimTutor.com version 29-Aug-2002
+$ !
+$ ! Author: Tom Wyant <Thomas.R.Wyant-III@usa.dupont.com>
+$ !
+$ ! This DCL command procedure executes the vimtutor command
+$ ! (suprise, suprise!) which gives you a brief tutorial on the VIM
+$ ! editor. Languages other than the default are supported in the
+$ ! usual way, as are at least some of the command qualifiers,
+$ ! though you'll need to play some fairly serious games with DCL
+$ ! to specify ones that need quoting.
+$ !
+$ ! Copyright (c) 2002 E. I. DuPont de Nemours and Company, Inc
+$ !
+$ ! This program is free software; you can redistribute it and/or
+$ ! modify it under the terms of the VIM license as available from
+$ ! the vim 6.1 ":help license" command or (at your option) the
+$ ! license from any later version of vim.
+$ !
+$ ! This program is distributed in the hope that it will be useful,
+$ ! but WITHOUT ANY WARRANTY; without even the implied warranty of
+$ ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+$ !
+$ !=====================================================================
+$ !
+$ !
+$ ! Check for the existence of VIM, and die if it isn't there.
+$ !
+$ if f$search ("vim:vim.exe") .eqs. ""
+$ then
+$ write sys$error "Error - Can't run tutoral. VIM not found."
+$ exit
+$ endif
+$ !
+$ !
+$ ! Pick up the argument, if any.
+$ !
+$ inx = 0
+$ arg_loop:
+$ inx = inx + 1
+$ if f$type (p'inx') .nes. ""
+$ then
+$ if p'inx' .nes. "" .and. f$locate ("-", p'inx') .ne. 0
+$ then
+$ xx = p'inx'
+$ assign/nolog "''xx'" xx
+$ p'inx' = ""
+$ endif
+$ goto arg_loop
+$ endif
+$ !
+$ !
+$ ! Make sure we clean up our toys when we're through playing.
+$ !
+$ on error then goto exit
+$ !
+$ !
+$ ! Create the VIM foreign command if needed
+$ !
+$ if f$type (vim) .eqs. "" then vim := $vim:vim
+$ !
+$ !
+$ ! Build the name for our temp file.
+$ !
+$ tutfil = "sys$login:vimtutor_" + -
+ f$edit (f$getjpi (0, "pid"), "trim") + "."
+$ assign/nolog 'tutfil' TUTORCOPY
+$ !
+$ !
+$ ! Copy the selected file to the temp file
+$ !
+$ assign/nolog/user nla0: sys$error
+$ assign/nolog/user nla0: sys$output
+$ vim -u "NONE" -c "so $VIMRUNTIME/tutor/tutor.vim"
+$ !
+$ !
+$ ! Run the tutorial
+$ !
+$ assign/nolog/user sys$command sys$input
+$ vim -u "NONE" -c "set nocp" 'p1' 'p2' 'p3' 'p4' 'p5' 'p6' 'p7' 'p8' 'tutfil'
+$ !
+$ !
+$ ! Ditch the copy.
+$ !
+$ exit:
+$ if f$type (tutfil) .nes. "" .and. f$search (tutfil) .nes. "" then -
+$ delete 'tutfil';*
+$ if f$type (xx) .nes. "" then deassign xx
+$ deassign TUTORCOPY
+$ exit
+$ !
+$ !=====================================================================
+$ !
+$ ! Modification history
+$ !
+$ ! 29-Aug-2002 T. R. Wyant
+$ ! Changed license to vim.
+$ ! Fix error "input is not from a terminal"
+$ ! Juggle documentation (copyright and contact to front,
+$ ! modification history to end).
+$ ! 25-Jul-2002 T. R. Wyant
+$ ! Initial version