Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > comp.lang.forth > #51814

Re: Basic in Forth: an old gem

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>

Show all headers | View raw


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


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