home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Professional
/
OS2PRO194.ISO
/
os2
/
prgramer
/
forth1
/
forth.doc
next >
Wrap
Text File
|
1992-10-12
|
5KB
|
164 lines
KA9DGX Forth
KA9DGX forth - Copyright(C) 1992, Michael A. Warot, all rights reserved
Produced in the United States of America
This software is furnished under a license agreement or nondisclosure
agreement. TThe software may be used or copied only in accordance with
the terms of the agreement. No part of this program may be reproduced
or transmitted in any form or by any means, electronic or mechanical,
including photo-copying and recording, for any purpose without the
express written permission of the author.
The following paragraph does not apply in the United Kingdom or any
country where such provisions are inconsistent with local law:
MICHAEL A. WAROT OFFERS THIS PROGRAM "AS IS" WITHOUT WARRANTY OF
ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE
IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
Some states do not allow disclaimer of express or implied warranties in
certain transactions, therefore, this statement may not apply to you.
MICHAEL A. WAROT may have patents or pending patent applications covering
the subject matter in this program. The furnishing of this program does
not give you any license to these patents. You can send license inquiries,
in writing, to MICHAEL A. WAROT, 7751 Chestnut Ave. Hammond, Indiana 46324
MICHAEL A. WAROT hereby grants you permission for this distribution of
this program, provided it is distributed in it's complete, un-altered form,
and a no fee exceeding $3.00(US) is charged for is distribution.
MICHAEL A. WAROT hereby grants you permission to use this program for a
trial period of thirty(30) days, after which time you must obtain a
license for it's continued use.
Abstract: This program is a small, 32Bit TEXT MODE forth for OS/2.
Version: Version 0.003 ßeta
Requirements: OS/2 version 2.0 or later
P3+ (iAPX386 or better)
Licensing information:
Licensing fees:
First Computer - $2.00
Additional CPU's - $1.00
A copy of the source code, is available for $10.00
To obtain a license for this program, please complete the following
and send with payment to:
Michael A. Warot
7751 Chestnut Avenue
Hammond, Indiana 46324-3223
NAME:
COMPANY:
ADDRESS:
CITY:
STATE/PROVINCE:
ZIP CODE:
COUNTRY:
Number of program licenses:
Please send any comments to the above address or via Email at
ka9dgx@chinet.chi.il.us
**************************** Authors Notes ******************************
This is my first attempt at doing OS/2 Full Screen, FLAT32 code.
It was written using the editor from Borland's Turbo Pascal 6.0
It is compiled using MicroSoft's MASM version 6.0
It was linked using LINK386 supplied with IBM's OS/2 version 2.0
This program requires OS/2 version 2.0 or later, and ONLY runs in
full screen text mode.
Because of the limited nature of this compiler, no file saving features
have been added at this time, however future versions of this program
will have the ability to load and save ASCII files.
I haven't done much FORTH in my life, so if this seems non-standard,
it probably is.
The source code for this fine program is available for $10.00 (US)
(3 Orders of magnitude less than the $500 and 90 Hours I've put in so far)
************************* MODIFICATION HISTORY ***********************
This document was last updated Oct 8,1992
10/12/92 - Version 0.004
Fix bugs:
Error handling routine got contents of stack, instead of address
Correct handling of IMMEDIATE definitions
Add EMIT - Uses VioWrtTTY, and not STDOUT
* Thanks to Larry Bank for his VIO32.ASM sample program.
I only wish I had that sooner.
* Emit makes it possible to use ANSI strings to set colors for output
I will soon add GotoXY, GetXY and ClrScr....!
10/08/92 - Version 0.003
Add code to do handle compiling constants, etc.
Add : ; LITERAL and COMPILECALL to vocabulary
Add internal routine to dump registers, when needed for debugging.
Add a real set of legal disclaimers to documentation.
10/07/92 - Version 0.002
Finally figure out how to get a keystroke from OS/2
(No help from IBM what so ever!)
Add KEY to vocabulary list (Whew)
************************* Current Vocabulary *************************
: ; COMPILECALL LITERAL KEY HEX DECIMAL BASE ! @ BYE VLIST
SWAP DUP XOR OR AND U/ U* / * - + .