You can subscribe to this list here.
2004 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(70) |
---|---|---|---|---|---|---|---|---|---|---|---|---|
2005 |
Jan
(38) |
Feb
(4) |
Mar
(11) |
Apr
(49) |
May
(81) |
Jun
(65) |
Jul
(36) |
Aug
(57) |
Sep
(63) |
Oct
(57) |
Nov
(49) |
Dec
(41) |
2006 |
Jan
(75) |
Feb
(80) |
Mar
(10) |
Apr
(13) |
May
(100) |
Jun
(100) |
Jul
(77) |
Aug
(87) |
Sep
(80) |
Oct
(124) |
Nov
(39) |
Dec
(41) |
2007 |
Jan
(20) |
Feb
(32) |
Mar
(32) |
Apr
(43) |
May
(146) |
Jun
(40) |
Jul
(49) |
Aug
(33) |
Sep
(25) |
Oct
(19) |
Nov
(11) |
Dec
(8) |
2008 |
Jan
(4) |
Feb
(11) |
Mar
(31) |
Apr
(40) |
May
(34) |
Jun
(24) |
Jul
(39) |
Aug
(104) |
Sep
(27) |
Oct
(35) |
Nov
(34) |
Dec
(97) |
2009 |
Jan
(75) |
Feb
(29) |
Mar
(45) |
Apr
(76) |
May
(121) |
Jun
(103) |
Jul
(67) |
Aug
(28) |
Sep
(22) |
Oct
(39) |
Nov
(9) |
Dec
(15) |
2010 |
Jan
(7) |
Feb
(39) |
Mar
(40) |
Apr
(57) |
May
(67) |
Jun
(69) |
Jul
(49) |
Aug
(68) |
Sep
(22) |
Oct
(7) |
Nov
(2) |
Dec
(10) |
2011 |
Jan
|
Feb
|
Mar
(10) |
Apr
(4) |
May
(6) |
Jun
(10) |
Jul
(16) |
Aug
(23) |
Sep
(9) |
Oct
|
Nov
(28) |
Dec
(3) |
2012 |
Jan
(11) |
Feb
(10) |
Mar
(1) |
Apr
|
May
(4) |
Jun
(3) |
Jul
(3) |
Aug
(4) |
Sep
(2) |
Oct
|
Nov
|
Dec
(1) |
2013 |
Jan
|
Feb
(7) |
Mar
(30) |
Apr
(4) |
May
(4) |
Jun
(8) |
Jul
(10) |
Aug
(4) |
Sep
|
Oct
(2) |
Nov
(24) |
Dec
(13) |
2014 |
Jan
(7) |
Feb
(2) |
Mar
|
Apr
(1) |
May
(9) |
Jun
|
Jul
(3) |
Aug
(9) |
Sep
|
Oct
(2) |
Nov
|
Dec
(3) |
2015 |
Jan
(4) |
Feb
(2) |
Mar
|
Apr
|
May
|
Jun
(1) |
Jul
|
Aug
(5) |
Sep
(1) |
Oct
(4) |
Nov
(7) |
Dec
(39) |
2016 |
Jan
(17) |
Feb
(2) |
Mar
(2) |
Apr
|
May
(1) |
Jun
(1) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(1) |
Dec
(2) |
2017 |
Jan
|
Feb
(3) |
Mar
|
Apr
|
May
(1) |
Jun
(2) |
Jul
|
Aug
(3) |
Sep
|
Oct
|
Nov
|
Dec
(2) |
2018 |
Jan
|
Feb
|
Mar
(2) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2019 |
Jan
|
Feb
|
Mar
(1) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2022 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(1) |
Jun
|
Jul
|
Aug
|
Sep
(1) |
Oct
(2) |
Nov
(1) |
Dec
(1) |
2023 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
(1) |
Sep
|
Oct
(1) |
Nov
|
Dec
|
2025 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
(1) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
From: Alex M. <ale...@us...> - 2004-12-21 00:19:11
|
Update of /cvsroot/win32forth/win32forth/doc/SciEdit In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/doc/SciEdit Added Files: SciEdit.htm Log Message: Commit of base Win32Forth --- NEW FILE: SciEdit.htm --- <html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns="http://www.w3.org/TR/REC-html40"> <head> <meta http-equiv=Content-Type content="text/html; charset=windows-1252"> <meta name=ProgId content=Word.Document> <meta name=Generator content="Microsoft Word 11"> <meta name=Originator content="Microsoft Word 11"> <link rel=File-List href="Win32Forth%20SciEdit_files/filelist.xml"> <title>Win32Forth SciEdit</title> <!--[if gte mso 9]><xml> <o:DocumentProperties> <o:Author>Administrator</o:Author> <o:LastAuthor>Administrator</o:LastAuthor> <o:Revision>2</o:Revision> <o:TotalTime>156</o:TotalTime> <o:Created>2004-09-13T00:46:00Z</o:Created> <o:LastSaved>2004-09-13T00:46:00Z</o:LastSaved> <o:Pages>1</o:Pages> <o:Words>938</o:Words> <o:Characters>5351</o:Characters> <o:Lines>44</o:Lines> <o:Paragraphs>12</o:Paragraphs> <o:CharactersWithSpaces>6277</o:CharactersWithSpaces> <o:Version>11.6360</o:Version> </o:DocumentProperties> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:SpellingState>Clean</w:SpellingState> <w:GrammarState>Clean</w:GrammarState> <w:PunctuationKerning/> <w:ValidateAgainstSchemas/> <w:SaveIfXMLInvalid>false</w:SaveIfXMLInvalid> <w:IgnoreMixedContent>false</w:IgnoreMixedContent> <w:AlwaysShowPlaceholderText>false</w:AlwaysShowPlaceholderText> <w:Compatibility> <w:BreakWrappedTables/> <w:SnapToGridInCell/> <w:WrapTextWithPunct/> <w:UseAsianBreakRules/> <w:DontGrowAutofit/> </w:Compatibility> <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel> </w:WordDocument> </xml><![endif]--><!--[if gte mso 9]><xml> <w:LatentStyles DefLockedState="false" LatentStyleCount="156"> </w:LatentStyles> </xml><![endif]--> <style> <!-- /* Font Definitions */ @font-face {font-family:Wingdings; panose-1:5 0 0 0 0 0 0 0 0 0; mso-font-charset:2; mso-generic-font-family:auto; mso-font-pitch:variable; mso-font-signature:0 268435456 0 0 -2147483648 0;} /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.SpellE {mso-style-name:""; mso-spl-e:yes;} span.GramE {mso-style-name:""; mso-gram-e:yes;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} /* List Definitions */ @list l0 {mso-list-id:1367558575; mso-list-type:hybrid; mso-list-template-ids:1474879050 67698689 67698691 67698693 67698689 67698691 67698693 67698689 67698691 67698693;} @list l0:level1 {mso-level-number-format:bullet; mso-level-text:\F0B7; mso-level-tab-stop:.5in; mso-level-number-position:left; text-indent:-.25in; font-family:Symbol;} @list l0:level2 {mso-level-number-format:bullet; mso-level-text:o; mso-level-tab-stop:1.0in; mso-level-number-position:left; text-indent:-.25in; font-family:"Courier New";} ol {margin-bottom:0in;} ul {margin-bottom:0in;} --> </style> <!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:"Table Normal"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-parent:""; mso-padding-alt:0in 5.4pt 0in 5.4pt; mso-para-margin:0in; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Times New Roman"; mso-ansi-language:#0400; mso-fareast-language:#0400; mso-bidi-language:#0400;} </style> <![endif]--> </head> <body lang=EN-US style='tab-interval:.5in'> <div class=Section1> <p class=MsoNormal align=center style='text-align:center'>Win32Forth <span class=SpellE>SciEdit</span></p> <p class=MsoNormal align=center style='text-align:center'><o:p> </o:p></p> <p class=MsoNormal>SciEditMdi.exe is a Multiple Document Interface (MDI) text editor for Win32Forth.<span style='mso-spacerun:yes'> </span>It is written in Win32Forth utilizing the w32fScintilla.dll.</p> <p class=MsoNormal><o:p> </o:p></p> <p class=MsoNormal><span class=SpellE>SciEdit</span> provides the ability to edit source files for Win32Forth.</p> <p class=MsoNormal><o:p> </o:p></p> <p class=MsoNormal>The menus and toolbar provide the options that are available.<span style='mso-spacerun:yes'> </span>The interface is similar to most typical Windows programs and should be mostly familiar to users who have used other editors.</p> <p class=MsoNormal><o:p> </o:p></p> <p class=MsoNormal>The tool bar buttons can be assigned to perform similar functions to those on the menus.<span style='mso-spacerun:yes'> </span>The menus may list shortcut keys on the right hand side of the option description.<span style='mso-spacerun:yes'> </span>Shortcut keys can be used to quickly perform commands without clicking the corresponding toolbar button or navigating to the menu selection.</p> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The file menu contains choices that have to do with opening and saving files as well as the usual Exit option :</li> </ul> <p class=MsoNormal><o:p> </o:p></p> <p class=MsoNormal style='margin-left:.5in'>The first 3 choices have to do with opening and closing edit windows and loading and saving files to be edited.</p> <ul style='margin-top:0in' type=disc> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>New File opens an empty editing window where text can be entered and edited.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Open File allows opening an existing file from the file system.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Close File closes the active editing window.</li> </ul> </ul> <p class=MsoNormal style='margin-left:.25in'><o:p> </o:p></p> <p class=MsoNormal style='margin-left:.5in'>The next 3 choices have to do with saving files to the file system.</p> <ul style='margin-top:0in' type=disc> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Save writes the currently selected edit window to the file system in the file that was opened for editing or asks for a file path and name if none currently is assigned.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Save <span class=GramE>As</span> allows saving the currently selected edit window to the file system in a user specified file path and name.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Save <span class=GramE>All</span> is a multiple application of the save command.</li> </ul> </ul> <p class=MsoNormal style='margin-left:.25in'><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Open Highlighted File </li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Open HTML File prompts for the file to open and then displays the HTML file as it would appear in a web browser.</li> </ul> </ul> <p class=MsoNormal style='margin-left:.25in'><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Exit asks if any unsaved files should be saved and then closes the program.</li> </ul> </ul> <p class=MsoNormal style='margin-left:.25in'><o:p> </o:p></p> <p class=MsoNormal style='margin-left:.5in'>The most recently edited files are listed just below the exit choice for easy access to re-open them for editing.</p> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The Edit menu contains text manipulation commands :</li> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Undo reverses the most recent edit action.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Redo reverses the most recent undo edit action.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Cut removes the selected text and places it on the clipboard.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Copy copies the selected text to the clipboard.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Paste copies the clipboard contents to the current cursor position.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Delete removes the currently selected text from the edited document.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Line Cut removes the selected line of text and places it on the clipboard.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Line Copy copies the selected line of text and places it on the clipboard.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Line Delete removes the selected line of text from the edited document.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Line Transpose</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Line Duplicate creates a copy of the selected line of text.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Select All selects all the text in the current edit window.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Remove Selection un-selects any selections that have been made.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Search Text allows text to be specified to be searched for and then finds any occurrence of the specified text and positions the edit window so the text is visible and highlights the matched text.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Search <span class=GramE>Next</span> repeats the most recently specified search action.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Find text in files allows multiple files to be specified and searched for matching text.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Insert Date inserts the current system date at the current cursor position.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Insert Date and Time inserts the current system date and time at the current cursor position.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Block comment allows a group of specified lines to be commented out.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Block <span class=GramE>uncomment</span> removes a previous block comment from a group of specified lines.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Lower Case converts the highlighted text to lower case.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Upper Case converts the highlighted text to upper case.</li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The View menu contains:</li> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Display Line Endings shows the line ending characters which are usually not visible.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Display White Space shows spaces and tabs which are usually not visible.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Display Line Numbers shows numbers in the left hand margin to indicate how far down in the file the line is.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Colorize Source shows keywords and various other items of text in distinctive colors to allow for easy identification.<span style='mso-spacerun:yes'> </span>Makes editing source code easier on the eyes and helps identify spelling errors.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Browse switches the display mode from simple text editing to <span class=SpellE>hyperlinking</span>.<span style='mso-spacerun:yes'> </span>Right clicking words in a source file will jump to the definition of the word if it can be located.</li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The Options menu contains:</li> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Line Endings allows specifying the character or characters to be used to terminate lines based on the target operating system custom.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Create Backup Files specifies that the original files should be saved as backup files before changes are made.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Save All Files <span class=GramE>Before</span> Compile writes any unsaved changes to the file system before performing the compilation process.<span style='mso-spacerun:yes'> </span>This can prevent loss of changes if the machine crashes or hangs before the file could otherwise be saved.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Set Tab Options allows specifying how the Tab key should be handled.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Show Status Bar toggles display of the status bar at the bottom of the window.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Show Toolbar toggles display of the toolbar just below the menu.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Customize Toolbar provides an edit dialog for modifying the contents and order of the toolbar buttons.</li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The Win32Forth menu contains:</li> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Compile invokes the Win32Forth compilation process with the active window as input.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Debug </li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Class and Vocabulary Browser <span class=GramE>displays</span> a tree view containing class and vocabulary names that are currently defined in the Win32Forth system.</li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The Window menu contains the customary window position adjustment options:</li> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Tile <span class=GramE>Horizontally</span> displays the windows the full width of the client area with each active window the same size vertically.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Tile <span class=GramE>Vertically</span> displays the windows the full height of the client area with each active window the same size horizontally.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Arrange allows positioning the active windows.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Cascade overlaps the windows so that their title bars are visible and stepped for easy location.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Close <span class=GramE>All</span> closes all open edit windows.</li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> <ul style='margin-top:0in' type=disc> <li class=MsoNormal style='mso-list:l0 level1 lfo1;tab-stops:list .5in'>The Help menu contains:</li> <ul style='margin-top:0in' type=circle> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Help <span class=GramE>For</span> Highlighted ANS word will open the ANS documentation to the section describing the selected ANS word.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Win32Forth Documentation opens the Win32Forth help in the default web browser.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>ANS Forth Standard opens the ANS documentation in the default web browser.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Win32Forth Project Group opens the Win32Forth.org home page in the default web browser.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>Win32Forth Forum opens the Win32Forth Yahoo discussion group home page in the default web browser.</li> <li class=MsoNormal style='mso-list:l0 level2 lfo1;tab-stops:list 1.0in'>About shows the customary credits and version numbers for the program.</li> </ul> </ul> <p class=MsoNormal><o:p> </o:p></p> </div> </body> </html> |
From: Alex M. <ale...@us...> - 2004-12-21 00:19:02
|
Update of /cvsroot/win32forth/win32forth/demos/AccelDemo In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/demos/AccelDemo Added Files: Accel.f AccelDemo.bmp AccelDemo.f Log Message: Commit of base Win32Forth --- NEW FILE: Accel.f --- \ --------------------------------------------------------------------------- \ ACCEL.F \ Windows Accelerator Table support for Win32Forth \ \ Written by Dirk Busch (dbu) \ eMail: di...@SP... \ ^^ ^^^^ remove this \ \ Version 1.0 May 17th, 2003 - 21:30 \ Version 1.1 May 22nd, 2003 - 17:54 \ Version 1.2 (for Win32Forth 6.07.07 and later) August 30th, 2003 dbu \ Version 1.3 (for Win32Forth 6.09.12 and later) Samstag, September 11 2004 \ --------------------------------------------------------------------------- cr .( Windows Accelerator Table support...) \ --------------------------------------------------------------------------- \ helper words \ --------------------------------------------------------------------------- \ --------------------------------------------------------------------------- \ Debug support \ --------------------------------------------------------------------------- in-system 0 value Debug-Accelerator-Table-Support : Dump-Accelerator-Key-Table { addr -- } cr ." Accelerator-Key-Table:" addr cell+ addr @ 0 do dup i 10 * + cr dup 8 h.R SPACE dup c@ 2 h.R SPACE dup 2 + w@ 4 h.R SPACE dup 4 + w@ 4 h.R SPACE 6 + @ >NAME .ID loop drop cr ; : Dump-Windows-Accelerator-Key-Table ( addr count -- ) cr ." Windows-Accelerator-Key-Table:" over swap 0 do dup i 6 * + cr dup 8 h.R SPACE dup c@ 2 h.R SPACE dup 2 + w@ 4 h.R SPACE 4 + w@ 4 h.R SPACE loop 2drop cr ; in-application 0 value ACCEL-HNDL variable ACCEL-PTR \ --------------------------------------------------------------------------- \ compiling accelerator table into dictionary \ --------------------------------------------------------------------------- 1 constant FVIRTKEY \ yet another missing Windows constant : ACCELTABLE ( -- <-name-> ) CREATE HERE 0 , NOSTACK1 ; : ACCELENTRY { flags key-code cmd-id xt -- } flags FVIRTKEY or FNOINVERT or c, 0 c, key-code w, cmd-id w, xt , ; : ACCELEND ( -- ) HERE OVER - 10 ( table entry length ) / SWAP ! ; \ --------------------------------------------------------------------------- \ Create and destroy Windows Accelerator Table \ --------------------------------------------------------------------------- : Destroy-Accelerator-Table ( -- ) \ destroy's the Windows Accelerator Table ACCEL-HNDL 0<> if ACCEL-HNDL call DestroyAcceleratorTable drop then 0 to ACCEL-HNDL ACCEL-PTR OFF ; : Create-Accelerator-Table { addr \ addr2 -- } \ takes the Accelerator-Key-Table and builds a Windows Accelerator Table Destroy-Accelerator-Table \ debug stuff ------ Turnkeyed? 0= \IN-SYSTEM-OK if Debug-Accelerator-Table-Support \IN-SYSTEM-OK if addr Dump-Accelerator-Key-Table \IN-SYSTEM-OK then then \ ------------------ addr ACCEL-PTR ! \ Copy the Accelerator-Key-Table to a buffer addr @ 6 * MALLOC to addr2 addr cell+ addr2 ( addr' addr2 ) addr @ 0 ( addr' addr2 do loop ) do ( addr' addr2 ) 2dup 6 cmove swap 10 + swap 6 + loop 2drop \ debug stuff ------ Turnkeyed? 0= \IN-SYSTEM-OK if Debug-Accelerator-Table-Support \IN-SYSTEM-OK if addr2 addr @ Dump-Windows-Accelerator-Key-Table \IN-SYSTEM-OK then then \ ------------------ \ Create the Accelerator Table from the global memory handle addr @ addr2 rel>abs ( count addr2 ) call CreateAcceleratorTable ( hAccelTable ) \ free buffer addr2 RELEASE dup to ACCEL-HNDL 0= if Destroy-Accelerator-Table then ; \ --------------------------------------------------------------------------- \ handle accelerator key \ --------------------------------------------------------------------------- : Get-Accelerator-Table-Entry { addr cmd-id \ table-offset -- table-offset >= 0 } -1 to table-offset addr cell+ \ move to first table entry addr @ 0 do i 10 * 4 + \ addr' offset over + w@ \ addr' cmd-id' cmd-id = \ addr' flag if i to table-offset leave then loop drop table-offset ; : Is-Accelerator-Key ( addr cmd-id -- flag ) Get-Accelerator-Table-Entry 0 >= ; : Get-Accelerator-Key-CFA { addr cmd-id -- cfa } addr cmd-id Get-Accelerator-Table-Entry 10 * 6 + addr cell+ + @ ; : Handle-Key-Table ( cmd-id -- true | false ) ACCEL-PTR @ swap 2dup Is-Accelerator-Key if Get-Accelerator-Key-CFA execute true else 2drop false then ; DEFER ACCEL-KEY ' NOOP IS ACCEL-KEY \ Handler for key entries : HandleMessagesEx { pMsg -- 0 } pMsg TRUE msg-chain do-chain nip if ACCEL-HNDL if pMsg ACCEL-HNDL pMsg @ \ get the message's HWND Call TranslateAccelerator 0= if pMsg Call TranslateMessage drop pMsg Call DispatchMessage drop then else pMsg Call TranslateMessage drop pMsg Call DispatchMessage drop then then 0 ; 1 callback &HandleMessagesEx HandleMessagesEx \ callback for DoForthFunc \ --------------------------------------------------------------------------- \s How to use: \ --------------------------------------------------------------------------- \ 1 to Debug-Accelerator-Table-Support \ turn debug-support on \ 1. define the Word's to be executed by an accelerator key : handle-alt-a ( -- ) ; : handle-ctrl-b ( -- ) beep ; : handle-alt-ctrl-c ( -- ) ; : handle-alt-ctrl-r ( -- ) ; \ 2. Define the accelerator key table ACCELTABLE Accelerator-Key-Table \ Flags (Virt-)Key-Code Command-ID CFA FALT 'A' 4711 ' handle-alt-a ACCELENTRY FCONTROL 'B' 4712 ' handle-ctrl-b ACCELENTRY FALT FCONTROL or 'C' 4713 ' handle-alt-ctrl-c ACCELENTRY FALT FCONTROL or 'R' 4714 ' handle-alt-ctrl-r ACCELENTRY ACCELEND \ mark the end of table \ 3. init Accelerator Table the support \ Best place to do is in WM_CREATE-Message-Handler Accelerator-Key-Table Create-Accelerator-Table \ 4. let w32f processes the windows message with our own function &HandleMessagesEx &CB-MSG ! \ 5. later deinit the Accelerator Table support \ Best place to do is in WM_DESTROY-Message-Handler Destroy-Accelerator-Table \ see AcceleratorTableDemo for a working demo |
From: Alex M. <ale...@us...> - 2004-12-21 00:19:00
|
Update of /cvsroot/win32forth/win32forth/apps/WinEd/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/apps/WinEd/res Added Files: WinEd.bmp WinEdit.h WinEdit.res Log Message: Commit of base Win32Forth --- NEW FILE: WinEd.bmp --- (This appears to be a binary file; contents omitted.) --- NEW FILE: WinEdit.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: WinEdit.h --- #define ID_FILELIST 102 #define ID_CURRENTFILE 104 #define ID_DIRECTORY 105 #define ID_MASK 106 #define ID_OPEN 107 #define IDD_SEARCHINFILES 100 #define ID_SEARCHTEXT 108 #define ID_FILECOUNT 113 #define ID_LINETEXT 114 #define ID_CASE 115 #define IDD_SIZE 200 #define ID_TEXTSIZE 201 #define ID_FONT 202 #define ID_TEXTFONT 203 #define IDD_OPTIONS 300 #define ID_AUTOSAVE 301 #define ID_PROMPT 302 #define ID_OPENPROMPT 303 #define IDB_AUTOSAVE 304 #define IDB_OPENPROMPT 305 #define IDE_EXT 306 #define IDB_SAVEFIND 309 #define IDB_TOOLBAR 308 #define IDE_WRAP 310 #define IDB_SAVEMARGIN 312 #define IDD_FILES 400 #define IDL_FILES 401 #define IDE_PATH 313 #define ID_SUBDIR 112 #define IDE_TAB 317 #define IDE_MIN 320 #define IDE_LPI 321 #define IDB_STEP 501 #define IDB_NEST 502 #define IDB_UNEST 503 #define IDB_CONT 504 #define IDB_JUMP 505 #define IDB_DONE 506 #define IDB_PROC 507 #define IDB_HERE 508 #define IDD_DEBUG 600 #define IDL_STACK 601 #define IDR_DECIMAL 603 #define IDR_HEX 604 #define IDL_RETURN 607 #define IDL_WORDS 609 #define IDT_NAME 610 #define IDB_INQUIRE 605 #define IDT_RESULT 606 #define IDB_BORDER 323 #define IDE_COLS 325 #define IDB_PAGELINES 327 #define ID_ALLOCCUR 116 #define IDB_WEB 328 #define IDB_CONSOLE 330 #define IDE_CONLINES 331 #define IDB_FULL 334 #define IDB_COLORIZE 316 #define IDB_SAVE 117 #define IDB_RECENTFILES 324 #define IDB_CHOOSE_PATH 118 |
From: Alex M. <ale...@us...> - 2004-12-21 00:18:59
|
Update of /cvsroot/win32forth/win32forth/apps/ProMgr/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/apps/ProMgr/res Added Files: pbitmaps.BMP treeimages.bmp Log Message: Commit of base Win32Forth --- NEW FILE: treeimages.bmp --- (This appears to be a binary file; contents omitted.) --- NEW FILE: pbitmaps.BMP --- (This appears to be a binary file; contents omitted.) |
From: Alex M. <ale...@us...> - 2004-12-21 00:18:59
|
Update of /cvsroot/win32forth/win32forth/apps/SciEdit/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/apps/SciEdit/res Added Files: Toolbar.bmp Log Message: Commit of base Win32Forth --- NEW FILE: Toolbar.bmp --- (This appears to be a binary file; contents omitted.) |
From: Alex M. <ale...@us...> - 2004-12-21 00:18:56
|
Update of /cvsroot/win32forth/win32forth/apps/ProMgr In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/apps/ProMgr Added Files: AboutForm.f ProjectManager.f zipper.f Log Message: Commit of base Win32Forth --- NEW FILE: ProjectManager.f --- \ $Id: ProjectManager.f,v 1.1 2004/12/21 00:18:46 alex_mcdonald Exp $ anew -ProjectManager.f comment: May 15, 2004 08:57:31 PM - factored out project manager into a separate application First integrated into ForthForm, butI thought that it would be a little cumbersome to have the additional files required - especially the Zip32.dll and w32fScintilla.dll - distributed with ForthForm. Sonntag, Mai 30 2004 - dbu - Changed to display up to 1MB Text in the preview window under WinNT 4 and later. Under all other Windows versions 64KB Text is displayed. - Changed to store the Paths relative to &forthdir in the Projekt file - Made the text preview window readonly - Changed to save/restore the window position of the main window - Added simple command line handling to open a project file - Changed to include into the next Win32Forth distribution [...1592 lines suppressed...] :noname ( -- ) init-console if initialization-chain do-chain then exception@ if bye then default-application ; is default-hello 0 0 ' projectmanager application project 1 pause-seconds bye [ELSE] \ debug ProjectManager ProjectManager [THEN] |
From: Alex M. <ale...@us...> - 2004-12-21 00:18:55
|
Update of /cvsroot/win32forth/win32forth/apps/ForthForm/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981/apps/ForthForm/res Added Files: FFBITMAPS.BMP PICTURE.BMP SCRLDOWN.BMP SCRLUP.BMP STATIC.BMP Splitwin-type3.bmp Splitwin-type4.bmp Splitwin-type5.bmp Splitwin-type6.bmp splitwin-type1.bmp splitwin-type2.BMP Log Message: Commit of base Win32Forth --- NEW FILE: STATIC.BMP --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SCRLUP.BMP --- (This appears to be a binary file; contents omitted.) --- NEW FILE: splitwin-type2.BMP --- (This appears to be a binary file; contents omitted.) --- NEW FILE: splitwin-type1.bmp --- (This appears to be a binary file; contents omitted.) --- NEW FILE: FFBITMAPS.BMP --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Splitwin-type5.bmp --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Splitwin-type6.bmp --- (This appears to be a binary file; contents omitted.) --- NEW FILE: PICTURE.BMP --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SCRLDOWN.BMP --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Splitwin-type4.bmp --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Splitwin-type3.bmp --- (This appears to be a binary file; contents omitted.) |
From: Alex M. <ale...@us...> - 2004-12-21 00:18:51
|
Update of /cvsroot/win32forth/win32forth In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22981 Added Files: FORTHFORM.CFG Help.cfg Hyper.cfg WIN32FOR.DBG Win32for.cfg Win32forUser.cfg WinEdColorize.f Wincon.dll Zip32.dll fkernel.exe setup.exe w32fConsole.dll w32fHtmlDisplay.dll w32fScintilla.dll Log Message: Commit of base Win32Forth --- NEW FILE: w32fConsole.dll --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Hyper.cfg --- DIRS SRC\KERNEL;SRC\CONSOLE;SRC ; the directories we want to index '*=disable command' SPECS *.F ; The file spec masks we want to index EXCLUDE TEST.F ; an experimental file, it doesn't need to be indexed KEEPPATH ON ; should we keep the file paths in index file AFTER 0 ; start looking after column 0 (a number) BEFORE 132 ; stop looking at column 132 (a number) STOPAT \ ; stop looking when "\" found TYPE 0 ": " TYPE 0 "HYPER " TYPE 0 "CODE " TYPE 0 "USER " TYPE 0 "NCODE " TYPE 0 "CREATE " TYPE 0 "CONSTANT " TYPE 0 "WINCONSTANT " TYPE 0 "VALUE " TYPE 0 "DEFER " TYPE 0 "VARIABLE " TYPE 0 "2VARIABLE " TYPE 0 "VOCABULARY " TYPE 0 "#VOCABULARY " TYPE 0 "INTEGER " TYPE 0 "FILE-HANDLE " TYPE 0 "ARRAY " TYPE 0 "TABLE " TYPE 0 "SYNONYM " TYPE 0 "#DEFINE " TYPE 0 "FKEY " TYPE 0 "LITKEY " TYPE 0 "SPLKEY " TYPE 0 ":M " TYPE 0 "I: " TYPE 0 "H: " TYPE 0 "INT " TYPE 0 ":CLASS " TYPE 0 ":OBJECT " TYPE 0 "|CLASS " TYPE 0 "PROC " TYPE 0 "NEWPROC " TYPE 0 "NEWCOLOR " TYPE 0 "NEW-CHAIN " TYPE 0 "NAMED-NEW$ " TYPE 0 "ED-FIELD+ " TYPE 0 "POINTER " TYPE 0 "NEW-COLOR " TYPE 0 "MAKE-CURSOR " TYPE 0 "FONT " ; ; The semicolon character in the first column causes the index compiler to stop looking at this configuration file. HYPERTEXT COMPILER DOCUMENTATION by Tom Zimmer The hypertext compile function of WinEd makes it easy to build hypertext index files for the WinEd [formerly called WinView] editor. Various compielr directives can be included in this file to allow the hypertext compiler to build WINEDIT.NDX containing the index references to all of the words you want to access easily. COMPILER DIRECTIVES Six index compiler directives are currently supported, they each start with the word "TYPE" followed by a type number and a quoted "string" parameter: +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ TYPE 0 "string" Pick up and index the word IMMEDIATELY following string. No space delimiter is required. If you want to space delimit the string, include a space within the quotes. Examples: ": " "CONSTANT " "CODE " etc. This type can pick up words following, as will be the case with the above examples, or you can pick up words starting with a character by not including a space at the end of the string. An example of this is the graphic symbol above "ø", which compiles any word starting with this symbol. That is any hypertext destination link. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ TYPE 1 ":" Pick up and index the word preceeding this symbol. That is index all words that end in a ":" character. Normally used for assembler labels. NAME: This will include name in the index file. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ TYPE 2 "LABEL " n Pick up and index the word at the start of this line, skipping 'n' words in the ine where "string" was found. This is typically used to include references to the assembler word LABEL as it is used in some assemblers, but it is also useful for indexing the ANS Forth document. x.x.x.x SYMBOL_NAME LABEL SYMBOL_NAME will be included in the index file. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ TYPE 3 "string " Index a matching word as found at the start of a line. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ TYPE 4 "STRING " n Pick up and index the word preceeding "string", skip 'n' words preceeding "string". SYMBOL STRING SYMBOL will be included in the index file. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ TYPE 5 "string of where to stop" Stop indexing any file when "string of where to stop" is found in a line. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ MULTIPLE INDEX COMMANDS Several of the above index commands can be included one per line before the line starting with a ";" character. The index compiler currently supports sixty four (64) index compiler commands in the above format. EXAMPLE LINES FOR FORTH The following lines can be included in HYPER.NDX tell the compiler to index forth functions, constants and variables. These are only examples of the type of entries that can be incuded. TYPE 0 "CODE " TYPE 0 "CREATE " TYPE 0 "CONSTANT " TYPE 0 "DEFER " TYPE 0 "VARIABLE " TYPE 0 "VALUE " TYPE 0 "ARRAY " --- NEW FILE: WinEdColorize.f --- \ Color configuration for WinEd \ n1 n2 name: n1 = action n2 = color name = blank-delimited string \ action color name \ Actions: \ 1 = colorize single word n1=non-number is a comment \ 2 = same color to end of line \ 3 = same color to ) \ 4 = same color to " \ 5 = same color to } \ 6 = same color to ] \ 7 = same color to > \ 8 = color the first word of a pair, the second word is black \ 9 = same color in a pair \ 10 = start of comment \ 11 = start of comment \ Colors: \ 0 black 1 red 2 green 3 yellow \ 4 blue 5 magenta 6 cyan 7 ltgray \ 8 dkgray 9 ltred 10 ltgreen 11 ltyellow \ 12 ltblue 13 ltmagenta 14 ltcyan 15 gray \ 16 brown 17 ltgrey 18 dkmagenta \ act color 9 13 CALL 1 16 ENTRY 1 18 CODE defining words that come in pairs 1 12 CFA-CODE green 1 12 END-CODE yellow 1 12 C; 9 9 : 9 1 :M does not color the second word like it should 1 9 :NONAME 1 9 ; 1 9 :M 1 9 ;M 1 9 :CLASS 1 9 ;CLASS ltyellow 1 9 :OBJECT 1 9 ;OBJECT 1 9 EXIT unusual control things that should stand out 1 9 ?EXIT 1 9 LEAVE 1 9 UNLOOP 1 9 QUIT 1 9 RECURSE 1 9 IF control structures 1 9 -IF 1 9 ELSE 1 9 THEN 1 9 BEGIN 1 9 WHILE 1 9 REPEAT 1 9 AGAIN 1 9 UNTIL 1 9 CONTINUE 1 9 DO 1 9 ?DO 1 9 DO-THRU 1 9 LOOP 1 9 +LOOP 1 9 CASE 1 9 OF 1 9 ENDOF 1 9 ENDCASE 1 6 HERE dictionary and search order 1 6 ORG 1 6 ALLOT 1 6 ALSO 1 6 ONLY 1 6 PREVIOUS 1 6 DEFINITIONS 1 6 IMMEDIATE 1 6 COMPILE-ONLY 1 6 ALIGN 1 6 ENVIRONMENT? 1 6 IN-APPLICATION 1 6 IN-SYSTEM 1 6 MARKER 1 6 ANEW 1 13 VALUE single defining words 1 5 CONSTANT 1 5 VARIABLE 1 5 2CONSTANT 1 5 2VARIABLE 1 5 USER 1 5 INT 9 3 LOCAL local variable 1 5 DEFER 1 5 CREATE 1 5 DOES> 1 5 VOCABULARY 5 3 { locals between { and } 2 2 \ 2 2 // 3 2 ( 3 2 C( 3 2 .( 4 1 ." string constants 4 1 S" 4 1 C" 4 1 ABORT" 4 1 Z" 4 1 Z," 4 1 +Z," 9 1 H# number follows, color both 9 1 ' 9 1 ['] 9 1 [CHAR] 1 1 FALSE other constants 1 1 TRUE 1 1 BL 9 13 POSTPONE 9 13 [COMPILE] 9 13 TO 9 13 +TO 9 13 IS 1 9 #IF conditional compilation 1 9 #ELSE 1 9 #THEN 1 9 [IF] 1 9 [ELSE] 1 9 [THEN] 9 9 INCLUDE 9 9 FLOAD 9 9 FSAVE 9 9 NEEDS 1 9 [ 1 9 ] 9 9 IMAGE-SAVE 9 9 TURNKEY \ Other ANS CORE 1 4 ! 1 4 # 1 4 #> 1 4 #S 1 4 * 1 4 */ 1 4 */MOD 1 4 + 1 4 +! 1 4 , 1 4 - 1 4 . 1 4 / 1 4 /MOD 1 4 0< 1 4 0= 1 4 1+ 1 4 1- 1 4 2! 1 4 2* 1 4 2/ 1 4 2@ 1 4 2DROP 1 4 2DUP 1 4 2OVER 1 4 2SWAP 1 4 < 1 4 <# 1 4 = 1 4 > 1 4 >BODY 1 4 >IN 1 4 >NUMBER 1 4 >R 1 4 ?DUP 1 4 @ 1 4 ABS 1 4 ABORT 1 4 ACCEPT 1 4 ALIGNED 1 4 AND 1 4 BASE 1 4 C! 1 4 C, 1 4 C@ 1 4 CELL+ 1 4 CELLS 1 4 CHAR 1 4 CHAR+ 1 4 CHARS 1 4 COUNT 1 4 CR 1 4 DECIMAL 1 4 DEPTH 1 4 DROP 1 4 DUP 1 4 EMIT 1 4 EVALUATE 1 4 EXECUTE 1 4 FILL 1 4 FIND 1 4 FM/MOD 1 4 HOLD 1 4 I 1 4 INVERT 1 4 J 1 4 KEY 1 4 LITERAL 1 4 LSHIFT 1 4 M* 1 4 MAX 1 4 MIN 1 4 MOD 1 4 MOVE 1 4 NEGATE 1 4 OR 1 4 OVER 1 4 R> 1 4 R@ 1 4 ROT 1 4 RSHIFT 1 4 S>D 1 4 SIGN 1 4 SM/REM 1 4 SOURCE 1 4 SPACE 1 4 SPACES 1 4 STATE 1 4 SWAP 1 4 TYPE 1 4 U. 1 4 U< 1 4 UM* 1 4 UM/MOD 1 4 WORD 1 4 XOR \ Other ANS EXT 1 15 #TIB 1 15 .R 1 15 0<> 1 15 0> 1 15 2>R 1 15 2R> 1 15 2R@ 1 15 <> 1 15 COMPILE, 1 15 CONVERT 1 15 ERASE 1 15 EXPECT 1 15 HEX 1 15 NIP 1 15 PAD 1 15 PARSE 1 15 PICK 1 15 QUERY 1 15 REFILL 1 15 RESTORE-INPUT 1 15 ROLL 1 15 SAVE-INPUT 1 15 SOURCE-ID 1 15 SPAN 1 15 TIB 1 15 TUCK 1 15 U.R 1 15 U> 1 15 UNUSED 1 15 WITHIN \ Other stuff used in Firmware Studio 1 12 LOCO 1 12 ASSEMBLE 1 12 MACRO: 1 12 MULTI for MULTI..REPEAT 1 12 IF_Z assembler control structures 1 12 IF_NZ 1 12 IF_C 1 12 IF_NC 1 12 IF_EQ 1 12 IF_NE 1 12 WHILE_Z 1 12 WHILE_NZ 1 12 WHILE_C 1 12 WHILE_NC 1 12 WHILE_EQ 1 12 WHILE_NE 1 12 UNTIL_Z 1 12 UNTIL_NZ 1 12 UNTIL_C 1 12 UNTIL_NC 1 12 UNTIL_EQ 1 12 UNTIL_NE 1 12 NEVER works like 0 IF \ for processors with SKIP instruction 1 12 NOWAY works like 0 WHILE 1 12 FOR 1 12 NEXT 1 6 RAM 1 6 ROM 1 6 {{ 1 6 }} 1 6 LOW-TOKENS 1 6 MAIN-TOKENS 1 6 TEMP-TOKENS 1 9 >TOKEN# 1 5 ASMBYTE 1 5 ASMWORD 1 5 ASMLONG 1 5 ASMARRAY 1 5 ASMLABEL 9 1 ASMLABEL? \ 10 2 COMMENT: \ 11 2 COMMENT; \ 10 2 (( \ 11 2 )) \ 3 0 ((( \s #entry creates entry creates VALUES entry# entry-#bytes editAsBinary? WinEdWindow WinEdToolbar ConsoleWindow printed-columns find-top-margin -right-edge low-right-edge start-text-size start-width start-height drag-barV drag-barH drag-thick edit-min console-height listHeight listHeightDefault using98/NT? console-savelines first-line-saved show-console? recent-files? findComboEdit addFileMenu colorize? page-lines? auto-new? auto-margin? mousedown? focusing? minimized? tool-bar? floating-bar? min-tool-bar? save-find? WinEd-web? save-margin? all-occur? save-minutes open-previous? term-canceled? second-copy? as-pc? start-browse? interpreting? max-toolbar displayingLine --- NEW FILE: fkernel.exe --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Wincon.dll --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Zip32.dll --- (This appears to be a binary file; contents omitted.) --- NEW FILE: w32fScintilla.dll --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Help.cfg --- DIRS doc\dpans ; the directories we want to index '*=disable command' SPECS *.TXT ; The file spec masks we want to index EXCLUDE KEEPPATH ON ; should we keep the file paths in index file AFTER 0 ; start looking after column 0 (a number) BEFORE 100 ; stop looking at column 100 (a number) TYPE 2 " CORE" 1 TYPE 2 " BLOCK" 1 TYPE 2 " DOUBLE" 1 TYPE 2 " EXCEPTION" 1 TYPE 2 " FACILITY" 1 TYPE 2 " FILE" 1 TYPE 2 " FLOATING" 1 TYPE 2 " LOCAL" 1 TYPE 2 " MEMORY" 1 TYPE 2 " TOOLS" 1 TYPE 2 " SEARCH" 1 TYPE 2 " STRING" 1 TYPE 5 "17.6.2" ;mark for the ANS document for where to stop scanning --- NEW FILE: WIN32FOR.DBG --- (This appears to be a binary file; contents omitted.) --- NEW FILE: FORTHFORM.CFG --- \ Forthform.cfg \ Examples of commands that can go in this file \ set-help c:\win32for\hlp\win32.hlp \ SetBackGroundImage c:\imagefiles\sparrow.jpg \ ltgray to backgroundcolor \ set your own background color \ set the editor filename \ s" %DIRcedt.exe /L:%LINE %FILENAME " editor$ place --- NEW FILE: setup.exe --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Win32for.cfg --- \ $Id: Win32for.cfg,v 1.1 2004/12/21 00:18:42 alex_mcdonald Exp $ \ \ All system configurations should be in this file .( Win32Forth: a Forth for Windows 95/98/ME/NT/2K/XP) .version .cversion .builtby .platform .( , ) .mem-free .words .dir cr .( Loading Win32For.CFG ) cr \ load user configuration file LoadUserConfig \ cr \ .( *** For documentation, press F1 ***) cr \ .( *** For the editor, press F2 ***) cr --- NEW FILE: w32fHtmlDisplay.dll --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Win32forUser.cfg --- \ Win32ForUser.cfg \ All user defined configurations should be in this file .( Loading Win32ForUser.CFG ) cr \ ------------------------------------------------------------------------------ \ set some system variables \ ------------------------------------------------------------------------------ false to border? \ should a border be printed on each page? \ ------------------------------------------------------------------------------ \ set default folder for TRUNKEY, FSAVE and APPLICATION \ ------------------------------------------------------------------------------ \ &forthdir count &appdir place \ ------------------------------------------------------------------------------ \ set Editor \ ------------------------------------------------------------------------------ 0 value SystemEditor : >WinEd ( -- ) \ set WinEd as default Editor 0 to SystemEditor s" %DIRWinEd.exe '%FILENAME' %LINE" editor$ place s" %DIRWinEd.exe /B '%FILENAME' %LINE" browse$ place ; : >SciEditMDI ( -- ) \ set SciEditMDI as default Editor 1 to SystemEditor s" SciEditMdi.exe /e %LINE '%FILENAME'" editor$ place s" SciEditMdi.exe /b %LINE '%FILENAME'" browse$ place ; >SciEditMDI \ ------------------------------------------------------------------------------ \ the end... \ ------------------------------------------------------------------------------ cr .( Program path is: ) .program cr .( Forth path is: ) .forthdir cr .( Application path is: ) .appdir cr cr .( System Editor is: ) SystemEditor 0 = [if] .( WinEd ) [then] SystemEditor 1 = [if] .( SciEdit ) [then] cr |
From: Alex M. <ale...@us...> - 2004-12-20 23:16:36
|
Update of /cvsroot/win32forth/win32forth/src/lib/fmacro In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22450/fmacro Log Message: Directory /cvsroot/win32forth/win32forth/src/lib/fmacro added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:15:31
|
Update of /cvsroot/win32forth/win32forth/src/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22146/res Log Message: Directory /cvsroot/win32forth/win32forth/src/res added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:15:31
|
Update of /cvsroot/win32forth/win32forth/src/old In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22146/old Log Message: Directory /cvsroot/win32forth/win32forth/src/old added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:15:31
|
Update of /cvsroot/win32forth/win32forth/src/tools In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22146/tools Log Message: Directory /cvsroot/win32forth/win32forth/src/tools added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:15:31
|
Update of /cvsroot/win32forth/win32forth/src/console In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22146/console Log Message: Directory /cvsroot/win32forth/win32forth/src/console added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:15:31
|
Update of /cvsroot/win32forth/win32forth/src/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22146/lib Log Message: Directory /cvsroot/win32forth/win32forth/src/lib added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:15:29
|
Update of /cvsroot/win32forth/win32forth/src/kernel In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22146/kernel Log Message: Directory /cvsroot/win32forth/win32forth/src/kernel added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:12:53
|
Update of /cvsroot/win32forth/win32forth/doc/ProMgr In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21478/ProMgr Log Message: Directory /cvsroot/win32forth/win32forth/doc/ProMgr added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:12:53
|
Update of /cvsroot/win32forth/win32forth/doc/Guide In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21478/Guide Log Message: Directory /cvsroot/win32forth/win32forth/doc/Guide added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:12:53
|
Update of /cvsroot/win32forth/win32forth/doc/ForthForm In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21478/ForthForm Log Message: Directory /cvsroot/win32forth/win32forth/doc/ForthForm added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:12:53
|
Update of /cvsroot/win32forth/win32forth/doc/SciEdit In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21478/SciEdit Log Message: Directory /cvsroot/win32forth/win32forth/doc/SciEdit added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:12:37
|
Update of /cvsroot/win32forth/win32forth/doc/dpans In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21478/dpans Log Message: Directory /cvsroot/win32forth/win32forth/doc/dpans added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:11:44
|
Update of /cvsroot/win32forth/win32forth/demos/AccelDemo In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21270/AccelDemo Log Message: Directory /cvsroot/win32forth/win32forth/demos/AccelDemo added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:10:55
|
Update of /cvsroot/win32forth/win32forth/apps/WinEd/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21075/res Log Message: Directory /cvsroot/win32forth/win32forth/apps/WinEd/res added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:09:51
|
Update of /cvsroot/win32forth/win32forth/apps/SciEdit/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20710/res Log Message: Directory /cvsroot/win32forth/win32forth/apps/SciEdit/res added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:09:06
|
Update of /cvsroot/win32forth/win32forth/apps/ProMgr/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20619/res Log Message: Directory /cvsroot/win32forth/win32forth/apps/ProMgr/res added to the repository |
From: Alex M. <ale...@us...> - 2004-12-20 23:08:27
|
Update of /cvsroot/win32forth/win32forth/apps/ForthForm/res In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20499/res Log Message: Directory /cvsroot/win32forth/win32forth/apps/ForthForm/res added to the repository |