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


Groups > comp.lang.forth > #35188

Re: Christmas Card

From Paul E Bennett <Paul_E.Bennett@topmail.co.uk>
Newsgroups comp.lang.forth
Subject Re: Christmas Card
Date 2014-12-24 15:31 +0000
Organization Hidecs Consultancy
Message-ID <cg04i0FufttU1@mid.individual.net> (permalink)
References <84b9a45f-2172-44d2-a271-26543183acad@googlegroups.com>

Show all headers | View raw


humptydumpty wrote:

> Hi all!
> 
> From collision of thiking to make a Christmas card and some fooling around
> with permutations, resulted something not permutations nor an usual card,
> tested under GForth:
> 
> --->8

[%X]

Initially had to resolve the page-width issue as some comment text and code 
got wrapped by my editor.  Then had to figure out the differences between 
your Random and the one in VFX.

I ended up redifining the VFX random with:-

: RANDOM ( S: n -- #rand )
\ G: Return a random positive number modulo n
  RANDOM SWAP 
  MOD ABS
;


The end result is very pleasing. Well done HumptyDumpty. 

Happy Yuletide to all, and a Prosperous New Year Forthing away.

-- 
********************************************************************
Paul E. Bennett IEng MIET.....<email://Paul_E.Bennett@topmail.co.uk>
Forth based HIDECS Consultancy.............<http://www.hidecs.co.uk>
Mob: +44 (0)7811-639972
Tel: +44 (0)1235-510979
Going Forth Safely ..... EBA. www.electric-boat-association.org.uk..
********************************************************************

Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread


Thread

Christmas Card humptydumpty <ouatubi@gmail.com> - 2014-12-23 23:44 -0800
  Re: Christmas Card "David N. Williams" <williams@umich.edu> - 2014-12-24 08:09 -0500
  Re: Christmas Card Paul E Bennett <Paul_E.Bennett@topmail.co.uk> - 2014-12-24 15:31 +0000
    Re: Christmas Card Coos Haak <chforth@hccnet.nl> - 2014-12-24 17:42 +0100
  Re: Christmas Card mhx@iae.nl - 2014-12-24 12:04 -0800
  Re: Christmas Card visualforth@rocketmail.com - 2014-12-24 12:42 -0800
  Re: Christmas Card Matthias Koch <matthias.koch@hot.uni-hannover.de> - 2015-01-07 11:42 +0100
    Re: Christmas Card humptydumpty <ouatubi@gmail.com> - 2015-01-07 05:19 -0800
      Re: Christmas Card Matthias Koch <matthias.koch@hot.uni-hannover.de> - 2015-01-07 18:34 +0100
  Re: Christmas Card Steve Graham <jsgrahamus@yahoo.com> - 2015-01-07 10:44 -0800

csiph-web