Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.lang.forth > #51814
| From | "Ed" <invalid@nospam.com> |
|---|---|
| Newsgroups | comp.lang.forth |
| Subject | Re: Basic in Forth: an old gem |
| Date | 2016-10-13 10:50 +1000 |
| Organization | Aioe.org NNTP Server |
| Message-ID | <ntmi9q$ehr$1@gioia.aioe.org> (permalink) |
| References | <ntlfme$sfa$1@cherry.spenarnc.xs4all.nl> <35e5237f-7f5a-4b17-9f76-8b9e4f6c80bc@googlegroups.com> |
trans wrote: > On Wednesday, October 12, 2016 at 9:51:52 AM UTC-4, Albert van der Horst wrote: > > By accident, specifying suboptimal search commands to google, > > in order to find a Basic written in Forth I found this > > > > http://www.nicholson.com/rhn/files/Tiny_BASIC_in_Forth.txt > > > > ... > > > > \ [ basic: GOSUB demo ] 19Jul84map > > INTEGER K > > 9 ARRAY COORDINATE > > > > : RUN BASIC > > 10 FOR K = 1 TO 9 > > 20 LET COORDINATE K = 10 - K > > 30 GOSUB 60 > > 40 NEXT K > > 50 GOTO 80 > > 60 PRINT COORDINATE K > > 70 RETURN > > 80 END > > Damn Forth is amazing. To cater to all customers, microcontroller vendor AM Research (AMR Forth) included a BASIC compiler (written in Forth). The source for entire system may still be available somewhere. Another 'BASIC in Forth' can be found in 4tH. Of course, once you know Forth who needs BASIC. The same can be said for abstraction and other attempts to 'dumb down' Forth.
Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread
Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-12 16:00 +0200
Re: Basic in Forth: an old gem trans <transfire@gmail.com> - 2016-10-12 10:19 -0700
Re: Basic in Forth: an old gem "Ed" <invalid@nospam.com> - 2016-10-13 10:50 +1000
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-13 03:24 +0200
Re: Basic in Forth: an old gem "Ed" <invalid@nospam.com> - 2016-10-13 12:51 +1000
Re: Basic in Forth: an old gem Hans Bezemer <the.beez.speaks@gmail.com> - 2016-10-13 17:41 +0200
Re: Basic in Forth: an old gem mhx@iae.nl - 2016-10-12 11:37 -0700
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-12 21:20 +0200
Re: Basic in Forth: an old gem Mark Wills <markwills1970@gmail.com> - 2016-10-13 05:01 -0700
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-13 14:27 +0200
Re: Basic in Forth: an old gem Coos Haak <htrofhc@gmail.com> - 2016-10-13 16:27 +0200
Re: Basic in Forth: an old gem hughaguilar96@gmail.com - 2016-10-13 14:08 -0700
Re: Basic in Forth: an old gem Lars Brinkhoff <lars.spam@nocrew.org> - 2016-10-14 07:26 +0200
Re: Basic in Forth: an old gem hughaguilar96@gmail.com - 2016-10-14 01:07 -0700
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-14 00:48 +0200
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-16 11:49 +0200
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-16 21:16 +0200
Re: Basic in Forth: an old gem jim <anon@example.com> - 2016-10-17 00:37 +0100
Re: Basic in Forth: an old gem foxaudioresearch@gmail.com - 2016-10-18 12:02 -0700
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-18 15:51 +0200
Re: Basic in Forth: an old gem Doug Hoffman <glidedog@gmail.com> - 2016-10-18 10:30 -0400
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-18 18:54 +0200
Re: Basic in Forth: an old gem Doug Hoffman <glidedog@gmail.com> - 2016-10-18 14:51 -0400
Re: Basic in Forth: an old gem albert@cherry.spenarnc.xs4all.nl (Albert van der Horst) - 2016-10-19 14:32 +0200
csiph-web