[Win32forth-cvs] win32forth/src floadcmdline.f,NONE,1.1

[Jos v.d.V. <jo...@us...>]

Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18854/src

Added Files:
	floadcmdline.f 
Log Message:
Jos: Experimental shell integration for Win32Forth

--- NEW FILE: floadcmdline.f ---
Anew -FloadCmdLine

\ *D doc\
\ *! FloadCmdLine
\ *T Experimental shell integration for Win32Forth

\ ** \nFloadCmdLine allows compiling from the context menu.
\ ** \nUse CMenuExtender v1.2.1.2 to create a new context entry.
\ ** \nThe CMenuExtender can be downloaded from:
\ ** \nhttp://www.monctoncomputerservice.com/revenger_inc/download.html

\ *P \bHow it works:\d
\ ** \n1.Create a menu entry for Win32Forth using CMExtEd.
\ ** \n2.Name it Win32Forth.
\ ** \n3.Enter FloadCmdLine on the commandline in CMExtEd.
\ ** \n4.Use change to check it.
\ ** \n5.Be sure that Append file is active.
\ ** \n6.Compile FloadCmdLine.f with Win32Forth.
\ ** \n7.Save Win32Forth in a tempory directory and leave Win32Forth.
\ ** \n8.Replace the Win32Forth in your Win32Forth directory.
\ ** \n9.Then start the explorer and click right on a *.f file.
\ ** \n10.Choose Win32Forth.

\ *P \bNotes:\d
\ ** \n1.Only testet under XP.
\ ** \n2.It is also possible to add WinEd to the context menu. 
\ ** Then leave the commandline in CMExtEd empty.

in-system

: FloadCmdLine ( - )
\ *G  Compiles the file in the command line.

    cmdline ascii " scan 1 - swap 1+ swap 2dup
    "path-only" temp$ place
    temp$ zcount  temp$ count "chdir drop count type
    cr cmdline type cr
    1 - "fload ok quit
 ;

in-application

also hidden save-forth
1 pause-seconds
bye